1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
| <?php
class Mcrypt {
public static $default_key = 'a!takA:dlmcldEv,e';
/*
* 字符加解密,一次一密,可定时解密有效
*
*/
public static function encode($string, $key = '', $expiry = 0) {
$ckeyLength = 16;
$key = md5($key ? $key : self::$default_key);
$key = md5(substr($key, 0, 16).$key.md5(substr($key, 16, 16)));
$keya = md5(substr($key, 0, 16));
$keyb = md5(substr($key, 16, 16));
$keyc = substr(md5(microtime()), -$ckeyLength);
$cryptkey = $keya . md5($keya . $keyc);
$keyLength = mb_strlen($cryptkey);
$string = sprintf('%010d', $expiry ? $expiry + intval(time()) : 0) . substr(md5($string . $keyb), 0, 16) . $string;
$stringLength = mb_strlen($string);
$rndkey = array();
for ($i = 0; $i <= 255; $i++) {
$rndkey[$i] = self::char_unicode($cryptkey[$i % $keyLength], False);
}
$box = range(0, 255);
for ($j = $i = 0; $i < 256; $i++) {
$j = ($j + $box[$i] + $rndkey[$i]) % 256;
$tmp = $box[$i];
$box[$i] = $box[$j];
$box[$j] = $tmp;
}
$result = '';
for ($a = $j = $i = 0; $i < $stringLength; $i++) {
$a = ($a + 1) % 256;
$j = ($j + $box[$a]) % 256;
$tmp = $box[$a];
$box[$a] = $box[$j];
$box[$j] = $tmp;
$result .= self::char_unicode(self::char_unicode(mb_substr($string, $i, 1, 'UTF-8'), False) ^ ($box[($box[$a] + $box[$j]) % 256]));
}
$result = $keyc . str_replace('=', '', base64_encode($result));
$result = str_replace(array(
'+',
'/',
'='
), array(
'-',
'_',
'.'
), $result);
return $result;
}
/**
* 字符加解密,一次一密,可定时解密有效
*
*/
public static function decode($string, $key = '') {
$string = str_replace(array(
'-',
'_',
'.'
), array(
'+',
'/',
'='
), $string);
$ckeyLength = 16;
$key = md5($key ? $key : self::$default_key);
$key = md5(substr($key, 0, 16).$key.md5(substr($key, 16, 16)));
$keya = md5(substr($key, 0, 16));
$keyb = md5(substr($key, 16, 16));
$keyc = substr($string, 0, $ckeyLength);
$cryptkey = $keya . md5($keya . $keyc);
$keyLength = strlen($cryptkey);
$string = base64_decode(substr($string, $ckeyLength));
$stringLength = mb_strlen($string);
$rndkey = array();
for ($i = 0; $i <= 255; $i++) {
$rndkey[$i] = self::char_unicode($cryptkey[$i % $keyLength], False);
}
$box = range(0, 255);
for ($j = $i = 0; $i < 256; $i++) {
$j = ($j + $box[$i] + $rndkey[$i]) % 256;
$tmp = $box[$i];
$box[$i] = $box[$j];
$box[$j] = $tmp;
}
$result = '';
for ($a = $j = $i = 0; $i < $stringLength; $i++) {
$a = ($a + 1) % 256;
$j = ($j + $box[$a]) % 256;
$tmp = $box[$a];
$box[$a] = $box[$j];
$box[$j] = $tmp;
$result .= self::char_unicode(self::char_unicode(mb_substr($string, $i, 1, 'UTF-8'), False) ^ ($box[($box[$a] + $box[$j]) % 256]));
}
if ((substr($result, 0, 10) == 0 || substr($result, 0, 10) - time() > 0) && substr($result, 10, 16) == substr(md5(substr($result, 26) . $keyb), 0, 16)) {
return substr($result, 26);
} else {
return '';
}
}
public static function char_unicode($str, $DECODE = True) {
$result = '';
if ($DECODE === False) {
$unicodestr = intval(base_convert(bin2hex(iconv('utf-8', 'UCS-4', $str)), 16, 10));
$result = $unicodestr;
} else {
$temp = intval($str);
$result = iconv('UCS-2BE', 'utf-8', ($temp < 256) ? chr(0) . chr($temp) : chr($temp / 256) . chr($temp % 256));
}
return $result;
}
}
|