If you'd like to understand pack/unpack. There is a tutorial here in perl, that works equally well in understanding it for php:
http://perldoc.perl.org/perlpacktut.htmlpack
Почист и полокален преглед на PHP референцата, со задржана структура од PHP.net и подобра читливост за примери, секции и белешки.
pack
Референца за `function.pack.php` со подобрена типографија и навигација.
pack
(PHP 4, PHP 5, PHP 7, PHP 8)
pack — Спакувај податоци во бинарна низа
= NULL
Спакувај ги дадените аргументи во бинарна низа според
format.
Идејата за оваа функција е земена од Perl и сите кодови за форматирање работат исто како во Perl. Сепак, недостасуваат некои кодови за форматирање како што е Perl-овиот "u" код за форматирање.
Имајте предвид дека разликата помеѓу потпишани и непотпишани вредности влијае само на функцијата unpack(), додека функцијата pack() дава ист резултат за потпишани и непотпишани кодови за форматирање.
Параметри
format-
На
formatнизата се состои од кодови за форматирање проследени со опционален аргумент за повторување. Аргументот за повторување може да биде или цел број или*за повторување до крајот на влезната податоци. За a, A, h, H, бројот на повторувања специфицира колку знаци од еден аргумент за податоци се земаат, за @ тоа е апсолутна позиција каде да се стават следните податоци, за сè друго, бројот на повторувања специфицира колку аргументи за податоци се консумираат и се спакуваат во добиената бинарна низа.Моментално имплементирани формати се:
pack() знаци за форматирање Код = NULL a Низа со NUL-полнење А Низа со SPACE-полнење h Хекс низа, низок нибл прво H Хекс низа, висок нибл прво c потпишан char C непотпишан char s потпишан short (секогаш 16 битен, машински бајт ред) unsigned short (секогаш 16 бита, машински бајт редослед) unsigned short (always 16 bit, machine byte order) n unsigned short (always 16 bit, big endian byte order) v unsigned short (секогаш 16 бита, мал ендијан бајт редослед) i значен цел број (машински зависна големина и бајт редослед) незначен цел број (машински зависна големина и бајт редослед) unsigned integer (machine dependent size and byte order) l значен долг (секогаш 32 бита, машински бајт редослед) незначен долг (секогаш 32 бита, машински бајт редослед) unsigned long (always 32 bit, machine byte order) unsigned long (секогаш 32 бита, голем ендијан бајт редослед) unsigned long (always 32 bit, big endian byte order) unsigned long (секогаш 32 бита, мал ендијан бајт редослед) unsigned long (always 32 bit, little endian byte order) q значен долг долг (секогаш 64 бита, машински бајт редослед) незначен долг долг (секогаш 64 бита, машински бајт редослед) unsigned long long (always 64 bit, machine byte order) unsigned long long (секогаш 64 бита, голем ендијан бајт редослед) unsigned long long (always 64 bit, big endian byte order) unsigned long long (секогаш 64 бита, мал ендијан бајт редослед) unsigned long long (секогаш 64 бита, редослед на бајти little endian) f float (машински зависна големина и претставување) g float (машински зависна големина, редослед на бајти little endian) G float (машински зависна големина, редослед на бајти big endian) d double (машински зависна големина и претставување) e double (машински зависна големина, редослед на бајти little endian) E double (машински зависна големина, редослед на бајти big endian) x NUL бајт знаци во неалчен режим. Врати се еден бајт назад Z Низа завршена со NUL (ASCIIZ), ќе биде NUL дополнета @ NUL пополнување до апсолутна позиција values-
Вратени вредности
Враќа бинарна низа што содржи податоци.
Дневник на промени
| Верзија | = NULL |
|---|---|
| 8.0.0 |
Оваа функција повеќе не враќа false при неуспех.
|
| 7.2.0 | float and double Враќа асоцијативна низа што содржи распакувани елементи од бинарна низа, или |
| 7.0.15, 7.1.1 | Додаден е параметарот exclude_disabled. |
Примери
Пример #1 pack() example
<?php
$binarydata = pack("nvc*", 0x1234, 0x5678, 65, 66);
?>Резултирачката бинарна низа ќе биде долга 6 бајти и ќе содржи секвенца од бајти 0x12, 0x34, 0x78, 0x56, 0x41, 0x42.
Белешки
Формат кодови q, Q, J and P не се достапни на 32-битни PHP верзии.
Имајте предвид дека PHP внатрешно складира int вредности како потпишани вредности со зависна големина од машината. Целобројните литерали и операциите што даваат броеви надвор од границите на int типот ќе бидат зачувани како float. Кога овие броеви со пловечка точка се пакуваат како цели броеви, тие прво се претвораат во целоброен тип. Ова може, но не мора да резултира со посакуваниот бајт модел.
Најрелевантниот случај е кога се пакуваат непотпишани броеви што би биле претставиви со int типот ако беше непотпишан. Во системи каде што int типот има големина од 32 бита, претворањето обично резултира со истата бајт шема како да беше непотпишан (иако ова зависи од конверзиите од непотпишан во потпишан дефинирани од имплементацијата, според стандардот на C). int беа непотпишани (иако ова зависи од конверзиите од непотпишан во потпишан дефинирани од имплементацијата, според стандардот на C). Во системи каде што
int типот има големина од 64 бита, float најверојатно нема доволно голем мантиса за да ја задржи вредноста без губење на прецизноста. Ако тие системи исто така имаат природен 64-битен C
int тип (повеќето системи слични на UNIX немаат), единствениот начин да се користи I форматот за пакување во горниот опсег е да се создадат
int негативни вредности со иста бајт репрезентација како посакуваната непотпишана вредност.
Белешки од корисници 10 белешки
A helper class to convert integer to binary strings and vice versa. Useful for writing and reading integers to / from files or sockets.
<?php
class int_helper
{
public static function int8($i) {
return is_int($i) ? pack("c", $i) : unpack("c", $i)[1];
}
public static function uInt8($i) {
return is_int($i) ? pack("C", $i) : unpack("C", $i)[1];
}
public static function int16($i) {
return is_int($i) ? pack("s", $i) : unpack("s", $i)[1];
}
public static function uInt16($i, $endianness=false) {
$f = is_int($i) ? "pack" : "unpack";
if ($endianness === true) { // big-endian
$i = $f("n", $i);
}
else if ($endianness === false) { // little-endian
$i = $f("v", $i);
}
else if ($endianness === null) { // machine byte order
$i = $f("S", $i);
}
return is_array($i) ? $i[1] : $i;
}
public static function int32($i) {
return is_int($i) ? pack("l", $i) : unpack("l", $i)[1];
}
public static function uInt32($i, $endianness=false) {
$f = is_int($i) ? "pack" : "unpack";
if ($endianness === true) { // big-endian
$i = $f("N", $i);
}
else if ($endianness === false) { // little-endian
$i = $f("V", $i);
}
else if ($endianness === null) { // machine byte order
$i = $f("L", $i);
}
return is_array($i) ? $i[1] : $i;
}
public static function int64($i) {
return is_int($i) ? pack("q", $i) : unpack("q", $i)[1];
}
public static function uInt64($i, $endianness=false) {
$f = is_int($i) ? "pack" : "unpack";
if ($endianness === true) { // big-endian
$i = $f("J", $i);
}
else if ($endianness === false) { // little-endian
$i = $f("P", $i);
}
else if ($endianness === null) { // machine byte order
$i = $f("Q", $i);
}
return is_array($i) ? $i[1] : $i;
}
}
?>
Usage example:
<?php
Header("Content-Type: text/plain");
include("int_helper.php");
echo int_helper::uInt8(0x6b) . PHP_EOL; // k
echo int_helper::uInt8(107) . PHP_EOL; // k
echo int_helper::uInt8("\x6b") . PHP_EOL . PHP_EOL; // 107
echo int_helper::uInt16(4101) . PHP_EOL; // \x05\x10
echo int_helper::uInt16("\x05\x10") . PHP_EOL; // 4101
echo int_helper::uInt16("\x05\x10", true) . PHP_EOL . PHP_EOL; // 1296
echo int_helper::uInt32(2147483647) . PHP_EOL; // \xff\xff\xff\x7f
echo int_helper::uInt32("\xff\xff\xff\x7f") . PHP_EOL . PHP_EOL; // 2147483647
// Note: Test this with 64-bit build of PHP
echo int_helper::uInt64(9223372036854775807) . PHP_EOL; // \xff\xff\xff\xff\xff\xff\xff\x7f
echo int_helper::uInt64("\xff\xff\xff\xff\xff\xff\xff\x7f") . PHP_EOL . PHP_EOL; // 9223372036854775807
?>Note that the the upper command in perl looks like this:
$binarydata = pack ("n v c*", 0x1234, 0x5678, 65, 66);
In PHP it seems that no whitespaces are allowed in the first parameter. So if you want to convert your pack command from perl -> PHP, don't forget to remove the whitespaces!If you need to unpack a signed short from big-endian or little-endian specifically, instead of machine-byte-order, you need only unpack it as the unsigned form, and then if the result is >= 2^15, subtract 2^16 from it.
And example would be:
<?php
$foo = unpack("n", $signedbigendianshort);
$foo = $foo[1];
if($foo >= pow(2, 15)) $foo -= pow(2, 16);
?>/* Convert float from HostOrder to Network Order */
function FToN( $val )
{
$a = unpack("I",pack( "f",$val ));
return pack("N",$a[1] );
}
/* Convert float from Network Order to HostOrder */
function NToF($val )
{
$a = unpack("N",$val);
$b = unpack("f",pack( "I",$a[1]));
return $b[1];
}You will get the same effect with
<?php
function _readInt($fp)
{
return unpack('V', fread($fp, 4));
}
?>
or unpack('N', ...) for big-endianness.Even though in a 64-bit architecure intval(6123456789) = 6123456789, and sprintf('%b', 5000000000) = 100101010000001011111001000000000
pack will not treat anything passed to it as 64-bit. If you want to pack a 64-bit integer:
<?php
$big = 5000000000;
$left = 0xffffffff00000000;
$right = 0x00000000ffffffff;
$l = ($big & $left) >>32;
$r = $big & $right;
$good = pack('NN', $l, $r);
$urlsafe = str_replace(array('+','/'), array('-','_'), base64_encode($good));
//done!
//rebuild:
$unurl = str_replace(array('-','_'), array('+','/'), $urlsafe);
$binary = base64_decode($unurl);
$set = unpack('N2', $tmp);
print_r($set);
$original = $set[1] << 32 | $set[2];
echo $original, "\\r\\n";
?>
results in:
Array
(
[1] => 1
[2] => 705032704
)
5000000000
but ONLY on a 64-bit enabled machine and PHP distro.Be aware of format code H always padding the 0 for byte-alignment to the right (for odd count of nibbles).
So pack("H", "7") results in 0x70 (ASCII character 'p') and not in 0x07 (BELL character)
as well as pack("H*", "347") results in 0x34 ('4') and 0x70 ('p') and not 0x03 and 0x47.pack()
h Hex string, low nibble first (not same hex2bin())
H Hex string, high nibble first (same hex2bin())Using pack to write Arabic char(s) to a file.
<?php
$text = "㔆㘆㘆";
$text = mb_convert_encoding($text, "UCS-2BE", "HTML-ENTITIES");
$len = mb_strlen($text);
$bom = mb_convert_encoding("", "unicode", "HTML-ENTITIES");
$fp = fopen('text.txt', 'w');
fwrite($fp, pack('a2', $bom));
fwrite($fp, pack("a{$len}", $text));
fwrite($fp, pack('a2', $bom));
fwrite($fp, pack('a2', "\n"));
fclose($fp);
?>