simple-machines-forum/Sources/Subs-Sound.php

136 lines
4.5 KiB
PHP
Raw Normal View History

2024-07-22 14:45:07 +00:00
<?php
/**
* Handles sound processing. In order to make sure the visual
* verification is still accessible for all users, a sound clip is being addded
* that reads the letters that are being shown.
*
* Simple Machines Forum (SMF)
*
* @package SMF
* @author Simple Machines https://www.simplemachines.org
* @copyright 2022 Simple Machines and individual contributors
* @license https://www.simplemachines.org/about/smf/license.php BSD
*
* @version 2.1.2
*/
if (!defined('SMF'))
die('No direct access...');
/**
* Creates a wave file that spells the letters of $word.
* Tries the user's language first, and defaults to english.
* Used by VerificationCode() (Register.php).
*
* @param string $word
* @return boolean false on failure
*/
function createWaveFile($word)
{
global $settings, $user_info;
// Allow max 2 requests per 20 seconds.
if (($ip = cache_get_data('wave_file/' . $user_info['ip'], 20)) > 2 || ($ip2 = cache_get_data('wave_file/' . $user_info['ip2'], 20)) > 2)
die(send_http_status(400));
cache_put_data('wave_file/' . $user_info['ip'], $ip ? $ip + 1 : 1, 20);
cache_put_data('wave_file/' . $user_info['ip2'], $ip2 ? $ip2 + 1 : 1, 20);
// Fixate randomization for this word.
$tmp = unpack('n', md5($word . session_id()));
mt_srand(end($tmp));
// Try to see if there's a sound font in the user's language.
if (file_exists($settings['default_theme_dir'] . '/fonts/sound/a.' . $user_info['language'] . '.wav'))
$sound_language = $user_info['language'];
// English should be there.
elseif (file_exists($settings['default_theme_dir'] . '/fonts/sound/a.english.wav'))
$sound_language = 'english';
// Guess not...
else
return false;
// File names are in lower case so lets make sure that we are only using a lower case string
$word = strtolower($word);
// Loop through all letters of the word $word.
$sound_word = '';
for ($i = 0; $i < strlen($word); $i++)
{
$sound_letter = implode('', file($settings['default_theme_dir'] . '/fonts/sound/' . $word[$i] . '.' . $sound_language . '.wav'));
if (strpos($sound_letter, 'data') === false)
return false;
$sound_letter = substr($sound_letter, strpos($sound_letter, 'data') + 8);
switch ($word[$i] === 's' ? 0 : mt_rand(0, 2))
{
case 0 :
for ($j = 0, $n = strlen($sound_letter); $j < $n; $j++)
for ($k = 0, $m = round(mt_rand(15, 25) / 10); $k < $m; $k++)
$sound_word .= $word[$i] === 's' ? $sound_letter[$j] : chr(mt_rand(max(ord($sound_letter[$j]) - 1, 0x00), min(ord($sound_letter[$j]) + 1, 0xFF)));
break;
case 1:
for ($j = 0, $n = strlen($sound_letter) - 1; $j < $n; $j += 2)
$sound_word .= (mt_rand(0, 3) == 0 ? '' : $sound_letter[$j]) . (mt_rand(0, 3) === 0 ? $sound_letter[$j + 1] : $sound_letter[$j]) . (mt_rand(0, 3) === 0 ? $sound_letter[$j] : $sound_letter[$j + 1]) . $sound_letter[$j + 1] . (mt_rand(0, 3) == 0 ? $sound_letter[$j + 1] : '');
$sound_word .= str_repeat($sound_letter[$n], 2);
break;
case 2:
$shift = 0;
for ($j = 0, $n = strlen($sound_letter); $j < $n; $j++)
{
if (mt_rand(0, 10) === 0)
$shift += mt_rand(-3, 3);
for ($k = 0, $m = round(mt_rand(15, 25) / 10); $k < $m; $k++)
$sound_word .= chr(min(max(ord($sound_letter[$j]) + $shift, 0x00), 0xFF));
}
break;
}
$sound_word .= str_repeat(chr(0x80), mt_rand(10000, 10500));
}
$data_size = strlen($sound_word);
$file_size = $data_size + 0x24;
$content_length = $file_size + 0x08;
$sample_rate = 16000;
// Disable compression.
ob_end_clean();
header_remove('content-encoding');
header('content-encoding: none');
header('accept-ranges: bytes');
header('connection: close');
header('cache-control: no-cache');
// Output the wav.
header('content-type: audio/x-wav');
header('expires: ' . gmdate('D, d M Y H:i:s', time() + 525600 * 60) . ' GMT');
if (isset($_SERVER['HTTP_RANGE']))
{
list($a, $range) = explode("=", $_SERVER['HTTP_RANGE'], 2);
list($range) = explode(",", $range, 2);
list($range, $range_end) = explode("-", $range);
$range = intval($range);
$range_end = !$range_end ? $content_length - 1 : intval($range_end);
$new_length = $range_end - $range + 1;
send_http_status(206);
header("content-length: $new_length");
header("content-range: bytes $range-$range_end/$content_length");
}
else
header("content-length: " . $content_length);
echo pack('nnVnnnnnnnnVVnnnnV', 0x5249, 0x4646, $file_size, 0x5741, 0x5645, 0x666D, 0x7420, 0x1000, 0x0000, 0x0100, 0x0100, $sample_rate, $sample_rate, 0x0100, 0x0800, 0x6461, 0x7461, $data_size), $sound_word;
// Noting more to add.
die();
}
?>