Какой-то парадокс с pack на php

@Eggman · Регистрация: 19.01.2010

Эти коды все время возвращают нули

PHP

<?php
$w='B0';
echo pack("v",0x.$w);
?>

PHP

<?php
$w='B0';
echo pack("v",'0x'.$w);
?>

PHP

<?php
$w='B0';
echo pack("v",0x.$w);
?>

PHP

<?php
$w='B0';
echo pack("v","0x$w");
?>

PHP

<?php
$w='0xB0';
echo pack("v",$w);
?>

PHP

<?php
$w='0xB0';
echo pack("v",$w);
?>

а этот возвращает нужный символ

PHP

1
2
3

<?php
echo pack("v",0xB0);
?>

Не могу понять в чем дело((

@romchiksoad · 12.03.2010, 19:13

Сообщение от Eggman

Не могу понять в чем дело(

походу не только ты

Добавлено через 44 секунды
попробуй в переменную $w записывать без кавычек

Vovan-VE · 12.03.2010, 19:20

0x - ошибка синтаксиса
0xB0 - целое число в шеснданцатиричной форме
'0xB0' - тупо-строка из 4 символов

А чего Вы хотите добиться этим кодом?

Humanoid · 12.03.2010, 19:24

Если указано 'v', значит число должно быть 16-ричным. Например, можно

PHP

1	pack('v',0xb0b0);

@Eggman · 13.03.2010, 10:44 **[ТС]**

Программу хотел сделать.ПРинцип действия:рисуешь к примеру в пейнте белым карандашом на черном фоне вертикально волну,программа открывает получившийся рисунок,сконирует по порядку
каждую строку пикселей и постепенно формирует звуковой файл,который уже будет воспроизводиться,в принципе все готово,только в спецификации wav-файлов междду 56 и 60 символом должен находиться размер данных представленный Ansi-сиволами,и между 4 и 8сиволом должен находиться полный размер файла минус восемь байт.Вот код программ:

PHP

<?php
#Высота 229;Ширина 1205 Цвет черный
set_time_limit(100);
$y=1;
$x=1;
$string='';
$cvet=pack("v*",0xFFFF);
$cvet2=pack("v*",0xFF);
$cvet=$cvet.SUBSTR($cvet2,0,1);
#ECHO $cvet;
// Получаем содержимое файла
$fp=fopen('muzika.bmp',"r");
$content=fread($fp,filesize('muzika.bmp'));
fclose($fp);
// Вывод содержимого файла
#print($content);
//
$gr=strrev(substr($content,18,4));
$gr=hexdec(bin2hex($gr));
//
echo 'Гориз.разм='.$gr.'|';
$vr=strrev(substr($content,22,4));
$vr=hexdec(bin2hex($vr));
echo 'Вертик.разм='.$vr.'|';
$co=substr($content,54);
while (strlen($co)>0){
if(($x-1)==$gr){
$os=4-(($gr*3)%4);
#echo $os;
$co=substr($co,$os);
$y++;
$x=1;
};
$p[$y][$x]=substr($co,0,3);
if ($p[$y][$x]==$cvet)
{
$hexzv=round($x/$gr*256);
$hexzv=dechex($hexzv);
if(strlen($hexzv)==1){$hexzv='0'.$hexzv;};
$hexzv=$hexzv;
 
$hey=pack("n*",$hexzv);
$hey=substr($hey,1,1);
$string=$string.$hey;
//x-это высота звука
 
};
$co=substr($co,3);
#echo $co;
$x++;
};
$fp=fopen("sablon.wav","r");
$content=fread($fp,filesize("sablon.wav"));
fclose($fp);
#unlink ("muzika.wav");
$f=fopen("muzika.wav","w");
$dlin=dechex(strlen($string));
 
if(strlen($dlin)==2){$dlin='00'.$dlin;};
if(strlen($dlin)==3){$dlin='0'.$dlin;};
if(strlen($dlin)==1){$dlin='000'.$dlin;};
#strrev
echo $dlin;
echo strlen($dlin);
$dlin=$dlin;
$dlin2=substr($dlin,2,2);
echo $dlin2;
$hey2=pack("v*",$dlin2);
echo $hey2;
$content=substr($content,0,56).$hey2.substr($content,58);
fwrite($f,$content.$string);
fclose($f);
?>

Самое удивительное верхний pack работает как надо.Не приложу ума где кроется загадка.

Добавлено через 4 минуты

Сообщение от Humanoid

Если указано 'v', значит число должно быть 16-ричным. Например, можно

PHP

1	pack('v',0xb0b0);

Дело в том что это-то работает,как и в самом первом посту передал,все глюки начинаются с передачи pack переменных

Добавлено через 4 минуты

Сообщение от romchiksoad

походу не только ты

Добавлено через 44 секунды
попробуй в переменную $w записывать без кавычек

Точно то что нужно,огромное спасибо,оказывается данные можно и без кавычек писать))))
Только вот,как мне это реализовать на коде,изначально же у меня не строка кода а переменная,единственныей выход который я вижу это eval

Добавлено через 7 минут

PHP

<?php
#Высота 229;Ширина 1205 Цвет черный
set_time_limit(100);
$y=1;
$x=1;
$string='';
$cvet=pack("v*",0xFFFF);
$cvet2=pack("v*",0xFF);
$cvet=$cvet.SUBSTR($cvet2,0,1);
#ECHO $cvet;
// Получаем содержимое файла
$fp=fopen('muzika.bmp',"r");
$content=fread($fp,filesize('muzika.bmp'));
fclose($fp);
// Вывод содержимого файла
#print($content);
//
$gr=strrev(substr($content,18,4));
$gr=hexdec(bin2hex($gr));
//
echo 'Гориз.разм='.$gr.'|';
$vr=strrev(substr($content,22,4));
$vr=hexdec(bin2hex($vr));
echo 'Вертик.разм='.$vr.'|';
$co=substr($content,54);
while (strlen($co)>0){
if(($x-1)==$gr){
$os=4-(($gr*3)%4);
#echo $os;
$co=substr($co,$os);
$y++;
$x=1;
};
$p[$y][$x]=substr($co,0,3);
if ($p[$y][$x]==$cvet)
{
$hexzv=round($x/$gr*256);
$hexzv=dechex($hexzv);
if(strlen($hexzv)==1){$hexzv='0'.$hexzv;};
$hexzv=$hexzv;
 
$hey=pack("n*",$hexzv);
$hey=substr($hey,1,1);
$string=$string.$hey;
//x-это высота звука
 
};
$co=substr($co,3);
#echo $co;
$x++;
};
$fp=fopen("sablon.wav","r");
$content=fread($fp,filesize("sablon.wav"));
fclose($fp);
#unlink ("muzika.wav");
$f=fopen("muzika.wav","w");
$dlin=dechex(strlen($string));
 
if(strlen($dlin)==2){$dlin='00'.$dlin;};
if(strlen($dlin)==3){$dlin='0'.$dlin;};
if(strlen($dlin)==1){$dlin='000'.$dlin;};
#strrev
echo $dlin;
eval ("\$hey2=pack(\"v*\",0x$dlin);");
echo $hey2;
$content=substr($content,0,56).$hey2.substr($content,58);
fwrite($f,$content.$string);
fclose($f);
?>

Всё отлично работает!)) Правда код несколько громоздкий где while,может как-то можно оптимизировать?

@romchiksoad 1957 / 796 / 89 Регистрация: 03.11.2009 Сообщений: 3,066 Записей в блоге: 2
	12.03.2010, 19:13	2
	Сообщение от Eggman Не могу понять в чем дело( походу не только ты Добавлено через 44 секунды попробуй в переменную $w записывать без кавычек 1

Vovan-VE 13207 / 6595 / 1041 Регистрация: 10.01.2008 Сообщений: 15,069
	12.03.2010, 19:20	3
	0x - ошибка синтаксиса 0xB0 - целое число в шеснданцатиричной форме '0xB0' - тупо-строка из 4 символов А чего Вы хотите добиться этим кодом? 0