虽说分享是传统的美德，但我们有时候辛辛苦苦写一些程序只是为了卖点小钱，挣点辛苦费，也防止有些没有道德的人倒卖，所以我们不得不对我们的程序进行加密，以下我们来介绍一下如何通过PHP的自定义函数来加密我们的PHP源代码。oc3华陈数据科技
第一个方法oc3华陈数据科技
oc3华陈数据科技
<?php oc3华陈数据科技
function encode_file_contents($filename) { oc3华陈数据科技
$type=strtolower(substr(strrchr($filename,'.'),1)); oc3华陈数据科技
if ('php' == $type && is_file($filename) && is_writable($filename)) { // 如果是PHP文件 并且可写 则进行压缩编码 oc3华陈数据科技
$contents = file_get_contents($filename); // 判断文件是否已经被编码处理 oc3华陈数据科技
$contents = php_strip_whitespace($filename); oc3华陈数据科技
oc3华陈数据科技
// 去除PHP头部和尾部标识 oc3华陈数据科技
$headerPos = strpos($contents,'<?php'); oc3华陈数据科技
$footerPos = strrpos($contents,'?>'); oc3华陈数据科技
$contents = substr($contents, $headerPos + 5, $footerPos - $headerPos); oc3华陈数据科技
$encode = base64_encode(gzdeflate($contents)); // 开始编码 oc3华陈数据科技
$encode = '<?php'."\n eval(gzinflate(base64_decode("."'".$encode."'".")));\n\n?>"; oc3华陈数据科技
oc3华陈数据科技
return file_put_contents($filename, $encode); oc3华陈数据科技
} oc3华陈数据科技
return false; oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
//调用函数 oc3华陈数据科技
$filename = 'dam.php'; oc3华陈数据科技
encode_file_contents($filename); oc3华陈数据科技
echo "OK,加密完成！" oc3华陈数据科技
?>oc3华陈数据科技
oc3华陈数据科技
第二个方法oc3华陈数据科技
oc3华陈数据科技
<?php oc3华陈数据科技
oc3华陈数据科技
function RandAbc($length = "") { // 返回随机字符串 oc3华陈数据科技
$str = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"; oc3华陈数据科技
return str_shuffle($str); oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
$filename = 'index.php'; //要加密的文件 oc3华陈数据科技
$T_k1 = RandAbc(); //随机密匙1 oc3华陈数据科技
$T_k2 = RandAbc(); //随机密匙2 oc3华陈数据科技
$vstr = file_get_contents($filename); oc3华陈数据科技
$v1 = base64_encode($vstr); oc3华陈数据科技
$c = strtr($v1, $T_k1, $T_k2); //根据密匙替换对应字符。 oc3华陈数据科技
$c = $T_k1.$T_k2.$c; oc3华陈数据科技
$q1 = "O00O0O"; oc3华陈数据科技
$q2 = "O0O000"; oc3华陈数据科技
$q3 = "O0OO00"; oc3华陈数据科技
$q4 = "OO0O00"; oc3华陈数据科技
$q5 = "OO0000"; oc3华陈数据科技
$q6 = "O00OO0"; oc3华陈数据科技
$s = '$'.$q6.'=urldecode("%6E1%7A%62%2F%6D%615%5C%76%740%6928%2D%70%78%75%71%79%2A6%6C%72%6B%64%679%5F%65%68%63%73%77%6F4%2B%6637%6A");$'.$q1.'=$'.$q6.'{3}.$'.$q6.'{6}.$'.$q6.'{33}.$'.$q6.'{30};$'.$q3.'=$'.$q6.'{33}.$'.$q6.'{10}.$'.$q6.'{24}.$'.$q6.'{10}.$'.$q6.'{24};$'.$q4.'=$'.$q3.'{0}.$'.$q6.'{18}.$'.$q6.'{3}.$'.$q3.'{0}.$'.$q3.'{1}.$'.$q6.'{24};$'.$q5.'=$'.$q6.'{7}.$'.$q6.'{13};$'.$q1.'.=$'.$q6.'{22}.$'.$q6.'{36}.$'.$q6.'{29}.$'.$q6.'{26}.$'.$q6.'{30}.$'.$q6.'{32}.$'.$q6.'{35}.$'.$q6.'{26}.$'.$q6.'{30};eval($'.$q1.'("'.base64_encode('$'.$q2.'="'.$c.'";eval(\'?>\'.$'.$q1.'($'.$q3.'($'.$q4.'($'.$q2.',$'.$q5.'*2),$'.$q4.'($'.$q2.',$'.$q5.',$'.$q5.'),$'.$q4.'($'.$q2.',0,$'.$q5.'))));').'"));'; oc3华陈数据科技
oc3华陈数据科技
$s = '<?php '."\n".$s."\n".' ?>'; oc3华陈数据科技
//echo $s; oc3华陈数据科技
// 生成 加密后的PHP文件 oc3华陈数据科技
$fpp1 = fopen('temp_'.$filename, 'w'); oc3华陈数据科技
fwrite($fpp1, $s) or die('写文件错误'); oc3华陈数据科技
oc3华陈数据科技
?>oc3华陈数据科技
oc3华陈数据科技
第三个方法oc3华陈数据科技
<?php oc3华陈数据科技
oc3华陈数据科技
class text_auth oc3华陈数据科技
{ oc3华陈数据科技
var $n_iter; oc3华陈数据科技
oc3华陈数据科技
function text_auth() oc3华陈数据科技
{ oc3华陈数据科技
$this->setIter(32); oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
function setIter($n_iter) oc3华陈数据科技
{ oc3华陈数据科技
$this->n_iter = $n_iter; oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
function getIter() oc3华陈数据科技
{ oc3华陈数据科技
return $this->n_iter; oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
function encrypt($data, $key) oc3华陈数据科技
{ oc3华陈数据科技
$n = $this->_resize($data, 4); oc3华陈数据科技
oc3华陈数据科技
$data_long[0] = $n; oc3华陈数据科技
$n_data_long = $this->_str2long(1, $data, $data_long); oc3华陈数据科技
oc3华陈数据科技
$n = count($data_long); oc3华陈数据科技
if (($n & 1) == 1) { oc3华陈数据科技
$data_long[$n] = chr(0); oc3华陈数据科技
$n_data_long++; oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
$this->_resize($key, 16, true); oc3华陈数据科技
if ( '' == $key ) oc3华陈数据科技
$key = '0000000000000000'; oc3华陈数据科技
oc3华陈数据科技
$n_key_long = $this->_str2long(0, $key, $key_long); oc3华陈数据科技
oc3华陈数据科技
$enc_data = ''; oc3华陈数据科技
$w = array(0, 0); oc3华陈数据科技
$j = 0; oc3华陈数据科技
$k = array(0, 0, 0, 0); oc3华陈数据科技
for ($i = 0; $i < $n_data_long; ++$i) { oc3华陈数据科技
if ($j + 4 <= $n_key_long) { oc3华陈数据科技
$k[0] = $key_long[$j]; oc3华陈数据科技
$k[1] = $key_long[$j + 1]; oc3华陈数据科技
$k[2] = $key_long[$j + 2]; oc3华陈数据科技
$k[3] = $key_long[$j + 3]; oc3华陈数据科技
} else { oc3华陈数据科技
$k[0] = $key_long[$j % $n_key_long]; oc3华陈数据科技
$k[1] = $key_long[($j + 1) % $n_key_long]; oc3华陈数据科技
$k[2] = $key_long[($j + 2) % $n_key_long]; oc3华陈数据科技
$k[3] = $key_long[($j + 3) % $n_key_long]; oc3华陈数据科技
} oc3华陈数据科技
$j = ($j + 4) % $n_key_long; oc3华陈数据科技
oc3华陈数据科技
$this->_encipherLong($data_long[$i], $data_long[++$i], $w, $k); oc3华陈数据科技
oc3华陈数据科技
$enc_data .= $this->_long2str($w[0]); oc3华陈数据科技
$enc_data .= $this->_long2str($w[1]); oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
return $enc_data; oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
function decrypt($enc_data, $key) oc3华陈数据科技
{ oc3华陈数据科技
$n_enc_data_long = $this->_str2long(0, $enc_data, $enc_data_long); oc3华陈数据科技
oc3华陈数据科技
$this->_resize($key, 16, true); oc3华陈数据科技
if ( '' == $key ) oc3华陈数据科技
$key = '0000000000000000'; oc3华陈数据科技
oc3华陈数据科技
$n_key_long = $this->_str2long(0, $key, $key_long); oc3华陈数据科技
oc3华陈数据科技
$data = ''; oc3华陈数据科技
$w = array(0, 0); oc3华陈数据科技
$j = 0; oc3华陈数据科技
$len = 0; oc3华陈数据科技
$k = array(0, 0, 0, 0); oc3华陈数据科技
$pos = 0; oc3华陈数据科技
oc3华陈数据科技
for ($i = 0; $i < $n_enc_data_long; $i += 2) { oc3华陈数据科技
if ($j + 4 <= $n_key_long) { oc3华陈数据科技
$k[0] = $key_long[$j]; oc3华陈数据科技
$k[1] = $key_long[$j + 1]; oc3华陈数据科技
$k[2] = $key_long[$j + 2]; oc3华陈数据科技
$k[3] = $key_long[$j + 3]; oc3华陈数据科技
} else { oc3华陈数据科技
$k[0] = $key_long[$j % $n_key_long]; oc3华陈数据科技
$k[1] = $key_long[($j + 1) % $n_key_long]; oc3华陈数据科技
$k[2] = $key_long[($j + 2) % $n_key_long]; oc3华陈数据科技
$k[3] = $key_long[($j + 3) % $n_key_long]; oc3华陈数据科技
} oc3华陈数据科技
$j = ($j + 4) % $n_key_long; oc3华陈数据科技
oc3华陈数据科技
$this->_decipherLong($enc_data_long[$i], $enc_data_long[$i + 1], $w, $k); oc3华陈数据科技
oc3华陈数据科技
if (0 == $i) { oc3华陈数据科技
$len = $w[0]; oc3华陈数据科技
if (4 <= $len) { oc3华陈数据科技
$data .= $this->_long2str($w[1]); oc3华陈数据科技
} else { oc3华陈数据科技
$data .= substr($this->_long2str($w[1]), 0, $len % 4); oc3华陈数据科技
} oc3华陈数据科技
} else { oc3华陈数据科技
$pos = ($i - 1) * 4; oc3华陈数据科技
if ($pos + 4 <= $len) { oc3华陈数据科技
$data .= $this->_long2str($w[0]); oc3华陈数据科技
oc3华陈数据科技
if ($pos + 8 <= $len) { oc3华陈数据科技
$data .= $this->_long2str($w[1]); oc3华陈数据科技
} elseif ($pos + 4 < $len) { oc3华陈数据科技
$data .= substr($this->_long2str($w[1]), 0, $len % 4); oc3华陈数据科技
} oc3华陈数据科技
} else { oc3华陈数据科技
$data .= substr($this->_long2str($w[0]), 0, $len % 4); oc3华陈数据科技
} oc3华陈数据科技
} oc3华陈数据科技
} oc3华陈数据科技
return $data; oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
function _encipherLong($y, $z, &$w, &$k) oc3华陈数据科技
{ oc3华陈数据科技
$sum = (integer) 0; oc3华陈数据科技
$delta = 0x9E3779B9; oc3华陈数据科技
$n = (integer) $this->n_iter; oc3华陈数据科技
oc3华陈数据科技
while ($n-- > 0) { oc3华陈数据科技
$y = $this->_add($y, oc3华陈数据科技
$this->_add($z << 4 ^ $this->_rshift($z, 5), $z) ^ oc3华陈数据科技
$this->_add($sum, $k[$sum & 3])); oc3华陈数据科技
$sum = $this->_add($sum, $delta); oc3华陈数据科技
$z = $this->_add($z, oc3华陈数据科技
$this->_add($y << 4 ^ $this->_rshift($y, 5), $y) ^ oc3华陈数据科技
$this->_add($sum, $k[$this->_rshift($sum, 11) & 3])); oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
$w[0] = $y; oc3华陈数据科技
$w[1] = $z; oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
function _decipherLong($y, $z, &$w, &$k) oc3华陈数据科技
{ oc3华陈数据科技
$sum = 0xC6EF3720; oc3华陈数据科技
$delta = 0x9E3779B9; oc3华陈数据科技
$n = (integer) $this->n_iter; oc3华陈数据科技
oc3华陈数据科技
while ($n-- > 0) { oc3华陈数据科技
$z = $this->_add($z, oc3华陈数据科技
-($this->_add($y << 4 ^ $this->_rshift($y, 5), $y) ^ oc3华陈数据科技
$this->_add($sum, $k[$this->_rshift($sum, 11) & 3]))); oc3华陈数据科技
$sum = $this->_add($sum, -$delta); oc3华陈数据科技
$y = $this->_add($y, oc3华陈数据科技
-($this->_add($z << 4 ^ $this->_rshift($z, 5), $z) ^ oc3华陈数据科技
$this->_add($sum, $k[$sum & 3]))); oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
$w[0] = $y; oc3华陈数据科技
$w[1] = $z; oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
function _resize(&$data, $size, $nonull = false) oc3华陈数据科技
{ oc3华陈数据科技
$n = strlen($data); oc3华陈数据科技
$nmod = $n % $size; oc3华陈数据科技
if ( 0 == $nmod ) oc3华陈数据科技
$nmod = $size; oc3华陈数据科技
oc3华陈数据科技
if ($nmod > 0) { oc3华陈数据科技
if ($nonull) { oc3华陈数据科技
for ($i = $n; $i < $n - $nmod + $size; ++$i) { oc3华陈数据科技
$data[$i] = $data[$i % $n]; oc3华陈数据科技
} oc3华陈数据科技
} else { oc3华陈数据科技
for ($i = $n; $i < $n - $nmod + $size; ++$i) { oc3华陈数据科技
$data[$i] = chr(0); oc3华陈数据科技
} oc3华陈数据科技
} oc3华陈数据科技
} oc3华陈数据科技
return $n; oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
function _hex2bin($str) oc3华陈数据科技
{ oc3华陈数据科技
$len = strlen($str); oc3华陈数据科技
return pack('H' . $len, $str); oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
function _str2long($start, &$data, &$data_long) oc3华陈数据科技
{ oc3华陈数据科技
$n = strlen($data); oc3华陈数据科技
oc3华陈数据科技
$tmp = unpack('N*', $data); oc3华陈数据科技
$j = $start; oc3华陈数据科技
oc3华陈数据科技
foreach ($tmp as $value) oc3华陈数据科技
$data_long[$j++] = $value; oc3华陈数据科技
oc3华陈数据科技
return $j; oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
function _long2str($l) oc3华陈数据科技
{ oc3华陈数据科技
return pack('N', $l); oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
function _rshift($integer, $n) oc3华陈数据科技
{ oc3华陈数据科技
if (0xffffffff < $integer || -0xffffffff > $integer) { oc3华陈数据科技
$integer = fmod($integer, 0xffffffff + 1); oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
if (0x7fffffff < $integer) { oc3华陈数据科技
$integer -= 0xffffffff + 1.0; oc3华陈数据科技
} elseif (-0x80000000 > $integer) { oc3华陈数据科技
$integer += 0xffffffff + 1.0; oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
if (0 > $integer) { oc3华陈数据科技
$integer &= 0x7fffffff; oc3华陈数据科技
$integer >>= $n; oc3华陈数据科技
$integer |= 1 << (31 - $n); oc3华陈数据科技
} else { oc3华陈数据科技
$integer >>= $n; oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
return $integer; oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
function _add($i1, $i2) oc3华陈数据科技
{ oc3华陈数据科技
$result = 0.0; oc3华陈数据科技
oc3华陈数据科技
foreach (func_get_args() as $value) { oc3华陈数据科技
if (0.0 > $value) { oc3华陈数据科技
$value -= 1.0 + 0xffffffff; oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
$result += $value; oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
if (0xffffffff < $result || -0xffffffff > $result) { oc3华陈数据科技
$result = fmod($result, 0xffffffff + 1); oc3华陈数据科技
} oc3华陈数据科技
oc3华陈数据科技
if (0x7fffffff < $result) { oc3华陈数据科技
$result -= 0xffffffff + 1.0; oc3华陈数据科技
} elseif (-0x80000000 > $result) { oc3华陈数据科技
$result += 0xffffffff + 1.0; oc3华陈数据科技
} oc3华陈数据科技
return $result; oc3华陈数据科技
} oc3华陈数据科技
} oc3华陈数据科技
?> oc3华陈数据科技
使用方法参考如下：oc3华陈数据科技
// 加密过程oc3华陈数据科技
view sourceprint?oc3华陈数据科技
$text_file = S_ROOT . './456.php'; oc3华陈数据科技
$str = @file_get_contents($text_file); oc3华陈数据科技
oc3华陈数据科技
require_once S_ROOT . "./text_auth.php"; oc3华陈数据科技
$text_auth = new text_auth(64); oc3华陈数据科技
oc3华陈数据科技
$str = $text_auth->encrypt($str, "qianyunlai.com"); oc3华陈数据科技
oc3华陈数据科技
$filename = S_ROOT . './789.php'; // 加密后的文本为二进制，普通的文本编辑器无法正常查看 oc3华陈数据科技
file_put_contents($filename, $str); oc3华陈数据科技
// 解密过程oc3华陈数据科技
view sourceprintoc3华陈数据科技
?01 $text_file = S_ROOT . './789.php'; oc3华陈数据科技
$str = @file_get_contents($text_file); oc3华陈数据科技
oc3华陈数据科技
require_once S_ROOT . "./text_auth.php"; oc3华陈数据科技
$text_auth = new text_auth(64); oc3华陈数据科技
oc3华陈数据科技
$str = $text_auth->decrypt($str, "qianyunlai.com"); oc3华陈数据科技
oc3华陈数据科技
$filename = S_ROOT . './456.php'; oc3华陈数据科技
file_put_contents($filename, $str);oc3华陈数据科技
oc3华陈数据科技
oc3华陈数据科技
|
