<?php
/*
php bcd码压缩-把十进制数字压缩到十六进制数据中
例如 0091 压缩后 0x00 0x91
*/
$string = '0091';
$bytes = Bytes::getBytes($string);
print_r($bytes);
/*
Array
(
[0] => 48
[1] => 48
[2] => 57
[3] => 49
)
*/
$asc=Bytes::AscToHex($bytes,4);//4位压缩成2位
print_r($asc);
/*
Array
(
[0] => 0
[1] => 145
)
*/
echo Bytes::toStr($asc);
/*
0091
*/
$hex=Bytes::HexToAsc($asc,2);//反操作2位还原成4位
print_r($hex);
/*
Array
(
[0] => 48
[1] => 48
[2] => 57
[3] => 49
)
*/
?>

<?php
/**
* php bcd码压缩
* 把十进制数字压缩到十六进制数据中
* @author phpff.com
* Created on 2011-7-15
*/
class Bytes {
/**
* 转换一个String字符串为byte数组
* @param $str 需要转换的字符串
* @param $bytes 目标byte数组
* @author phpff.com
*/
public static function getBytes($string) {
$bytes = array();
for($i = 0; $i < strlen($string); $i++){
$bytes[] = ord($string[$i]);
}
return $bytes;
}
/**
* 将字节数组转化为String类型的数据
* @param $bytes 字节数组
* @param $str 目标字符串
* @return 一个String类型的数据
*/
public static function toStr($bytes) {
$str = '';
foreach($bytes as $ch) {
$str .= bin2hex(chr($ch));
}
return $str;
}
/**
* asc码转成16进制数据
* @param $asc asc数字字符串
* @param $AscLen 需要转换的字符串长度
* @return 16进制数组
* @author phpff.com
*/
public static function AscToHex( $asc, $AscLen) {
$i=0;
$Hex=array();
for($i = 0; 2*$i < $AscLen; $i++)
{
/*A:0x41(0100 0001),a:0x61(0110 0001),右移4位后都是0001,加0x90等0xa*/
$Hex[$i] = (chr($asc[2*$i]) << 4);
if (!(chr($asc[2*$i]) >= '0' && chr($asc[2*$i]) <= '9' )){
$Hex[$i] += 0x90;
}
if(2*$i+1 >= $AscLen){
break;
}
$Hex[$i] |= (chr($asc[2*$i+1]) & 0x0f);
if (!(chr($asc[2*$i+1]) >= '0' && chr($asc[2*$i+1]) <= '9' )){
$Hex[$i] += 0x09;
}
}
return $Hex;
}
/**
* 将16进制的数据转换成asc码
* @param $Hex 16进制数组
* @param $HexLen 16进制数组长度
* @return asc数组
* @author phpff.com
*/
public static function HexToAsc($Hex, $HexLen) {
$i=0;
$Temp=0;
for($i = 0; $i < $HexLen; $i++ )
{
$Temp = ($Hex[$i] & 0xf0) >> 4;
if ($Temp < 10){
$Asc[2*$i] = (0x30 + $Temp);
}else{
$Asc[2*$i] = (0x37 + $Temp);
}
$Temp = $Hex[$i] & 0x0f;
if ($Temp < 10){
$Asc[2*$i+1] = (0x30 + $Temp);
}else{
$Asc[2*$i+1] = (0x37 + $Temp);
}
}
return $Asc;
}
}
?>