1
|
|
|
<?php |
2
|
|
|
/* |
3
|
|
|
* PHP QR Code encoder |
4
|
|
|
* |
5
|
|
|
* Masking |
6
|
|
|
* |
7
|
|
|
* Based on libqrencode C library distributed under LGPL 2.1 |
8
|
|
|
* Copyright (C) 2006, 2007, 2008, 2009 Kentaro Fukuchi <[email protected]> |
9
|
|
|
* |
10
|
|
|
* PHP QR Code is distributed under LGPL 3 |
11
|
|
|
* Copyright (C) 2010 Dominik Dzienia <deltalab at poczta dot fm> |
12
|
|
|
* |
13
|
|
|
* This library is free software; you can redistribute it and/or |
14
|
|
|
* modify it under the terms of the GNU Lesser General Public |
15
|
|
|
* License as published by the Free Software Foundation; either |
16
|
|
|
* version 3 of the License, or any later version. |
17
|
|
|
* |
18
|
|
|
* This library is distributed in the hope that it will be useful, |
19
|
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
20
|
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
21
|
|
|
* Lesser General Public License for more details. |
22
|
|
|
* |
23
|
|
|
* You should have received a copy of the GNU Lesser General Public |
24
|
|
|
* License along with this library; if not, write to the Free Software |
25
|
|
|
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA |
26
|
|
|
*/ |
27
|
|
|
namespace tinymeng\code\Gateways\qrcode; |
28
|
|
|
|
29
|
|
|
define('N1', 3); |
30
|
|
|
define('N2', 3); |
31
|
|
|
define('N3', 40); |
32
|
|
|
define('N4', 10); |
33
|
|
|
|
34
|
|
|
class QRmask { |
35
|
|
|
|
36
|
|
|
public $runLength = array(); |
37
|
|
|
|
38
|
|
|
//---------------------------------------------------------------------- |
39
|
|
|
public function __construct() |
40
|
|
|
{ |
41
|
|
|
$this->runLength = array_fill(0, QRSPEC_WIDTH_MAX + 1, 0); |
42
|
|
|
} |
43
|
|
|
|
44
|
|
|
//---------------------------------------------------------------------- |
45
|
|
|
public function writeFormatInformation($width, &$frame, $mask, $level) |
46
|
|
|
{ |
47
|
|
|
$blacks = 0; |
48
|
|
|
$format = QRspec::getFormatInfo($mask, $level); |
49
|
|
|
|
50
|
|
|
for($i=0; $i<8; $i++) { |
51
|
|
|
if($format & 1) { |
52
|
|
|
$blacks += 2; |
53
|
|
|
$v = 0x85; |
54
|
|
|
} else { |
55
|
|
|
$v = 0x84; |
56
|
|
|
} |
57
|
|
|
|
58
|
|
|
$frame[8][$width - 1 - $i] = chr($v); |
59
|
|
|
if($i < 6) { |
60
|
|
|
$frame[$i][8] = chr($v); |
61
|
|
|
} else { |
62
|
|
|
$frame[$i + 1][8] = chr($v); |
63
|
|
|
} |
64
|
|
|
$format = $format >> 1; |
65
|
|
|
} |
66
|
|
|
|
67
|
|
|
for($i=0; $i<7; $i++) { |
68
|
|
|
if($format & 1) { |
69
|
|
|
$blacks += 2; |
70
|
|
|
$v = 0x85; |
71
|
|
|
} else { |
72
|
|
|
$v = 0x84; |
73
|
|
|
} |
74
|
|
|
|
75
|
|
|
$frame[$width - 7 + $i][8] = chr($v); |
76
|
|
|
if($i == 0) { |
77
|
|
|
$frame[8][7] = chr($v); |
78
|
|
|
} else { |
79
|
|
|
$frame[8][6 - $i] = chr($v); |
80
|
|
|
} |
81
|
|
|
|
82
|
|
|
$format = $format >> 1; |
83
|
|
|
} |
84
|
|
|
|
85
|
|
|
return $blacks; |
86
|
|
|
} |
87
|
|
|
|
88
|
|
|
//---------------------------------------------------------------------- |
89
|
|
|
public function mask0($x, $y) { return ($x+$y)&1; } |
90
|
|
|
public function mask1($x, $y) { return ($y&1); } |
91
|
|
|
public function mask2($x, $y) { return ($x%3); } |
92
|
|
|
public function mask3($x, $y) { return ($x+$y)%3; } |
93
|
|
|
public function mask4($x, $y) { return (((int)($y/2))+((int)($x/3)))&1; } |
94
|
|
|
public function mask5($x, $y) { return (($x*$y)&1)+($x*$y)%3; } |
95
|
|
|
public function mask6($x, $y) { return ((($x*$y)&1)+($x*$y)%3)&1; } |
96
|
|
|
public function mask7($x, $y) { return ((($x*$y)%3)+(($x+$y)&1))&1; } |
97
|
|
|
|
98
|
|
|
//---------------------------------------------------------------------- |
99
|
|
|
private function generateMaskNo($maskNo, $width, $frame) |
100
|
|
|
{ |
101
|
|
|
$bitMask = array_fill(0, $width, array_fill(0, $width, 0)); |
102
|
|
|
|
103
|
|
|
for($y=0; $y<$width; $y++) { |
104
|
|
|
for($x=0; $x<$width; $x++) { |
105
|
|
|
if(ord($frame[$y][$x]) & 0x80) { |
106
|
|
|
$bitMask[$y][$x] = 0; |
107
|
|
|
} else { |
108
|
|
|
$maskFunc = call_user_func(array($this, 'mask'.$maskNo), $x, $y); |
109
|
|
|
$bitMask[$y][$x] = ($maskFunc == 0)?1:0; |
110
|
|
|
} |
111
|
|
|
|
112
|
|
|
} |
113
|
|
|
} |
114
|
|
|
|
115
|
|
|
return $bitMask; |
116
|
|
|
} |
117
|
|
|
|
118
|
|
|
//---------------------------------------------------------------------- |
119
|
|
|
public static function serial($bitFrame) |
120
|
|
|
{ |
121
|
|
|
$codeArr = array(); |
122
|
|
|
|
123
|
|
|
foreach ($bitFrame as $line) |
124
|
|
|
$codeArr[] = join('', $line); |
125
|
|
|
|
126
|
|
|
return gzcompress(join("\n", $codeArr), 9); |
127
|
|
|
} |
128
|
|
|
|
129
|
|
|
//---------------------------------------------------------------------- |
130
|
|
|
public static function unserial($code) |
131
|
|
|
{ |
132
|
|
|
$codeArr = array(); |
133
|
|
|
|
134
|
|
|
$codeLines = explode("\n", gzuncompress($code)); |
135
|
|
|
foreach ($codeLines as $line) |
136
|
|
|
$codeArr[] = str_split($line); |
137
|
|
|
|
138
|
|
|
return $codeArr; |
139
|
|
|
} |
140
|
|
|
|
141
|
|
|
//---------------------------------------------------------------------- |
142
|
|
|
public function makeMaskNo($maskNo, $width, $s, &$d, $maskGenOnly = false) |
143
|
|
|
{ |
144
|
|
|
$b = 0; |
145
|
|
|
$bitMask = array(); |
146
|
|
|
|
147
|
|
|
$fileName = QR_CACHE_DIR.'mask_'.$maskNo.DIRECTORY_SEPARATOR.'mask_'.$width.'_'.$maskNo.'.dat'; |
148
|
|
|
|
149
|
|
|
if (QR_CACHEABLE) { |
150
|
|
|
if (file_exists($fileName)) { |
151
|
|
|
$bitMask = self::unserial(file_get_contents($fileName)); |
152
|
|
|
} else { |
153
|
|
|
$bitMask = $this->generateMaskNo($maskNo, $width, $s, $d); |
|
|
|
|
154
|
|
|
if (!file_exists(QR_CACHE_DIR.'mask_'.$maskNo)) |
155
|
|
|
mkdir(QR_CACHE_DIR.'mask_'.$maskNo); |
156
|
|
|
file_put_contents($fileName, self::serial($bitMask)); |
157
|
|
|
} |
158
|
|
|
} else { |
159
|
|
|
$bitMask = $this->generateMaskNo($maskNo, $width, $s, $d); |
160
|
|
|
} |
161
|
|
|
|
162
|
|
|
if ($maskGenOnly) |
163
|
|
|
return; |
164
|
|
|
|
165
|
|
|
$d = $s; |
166
|
|
|
|
167
|
|
|
for($y=0; $y<$width; $y++) { |
168
|
|
|
for($x=0; $x<$width; $x++) { |
169
|
|
|
if($bitMask[$y][$x] == 1) { |
170
|
|
|
$d[$y][$x] = chr(ord($s[$y][$x]) ^ (int)$bitMask[$y][$x]); |
171
|
|
|
} |
172
|
|
|
$b += (int)(ord($d[$y][$x]) & 1); |
173
|
|
|
} |
174
|
|
|
} |
175
|
|
|
|
176
|
|
|
return $b; |
177
|
|
|
} |
178
|
|
|
|
179
|
|
|
//---------------------------------------------------------------------- |
180
|
|
|
public function makeMask($width, $frame, $maskNo, $level) |
181
|
|
|
{ |
182
|
|
|
$masked = array_fill(0, $width, str_repeat("\0", $width)); |
183
|
|
|
$this->makeMaskNo($maskNo, $width, $frame, $masked); |
184
|
|
|
$this->writeFormatInformation($width, $masked, $maskNo, $level); |
185
|
|
|
|
186
|
|
|
return $masked; |
187
|
|
|
} |
188
|
|
|
|
189
|
|
|
//---------------------------------------------------------------------- |
190
|
|
|
public function calcN1N3($length) |
191
|
|
|
{ |
192
|
|
|
$demerit = 0; |
193
|
|
|
|
194
|
|
|
for($i=0; $i<$length; $i++) { |
195
|
|
|
|
196
|
|
|
if($this->runLength[$i] >= 5) { |
197
|
|
|
$demerit += (N1 + ($this->runLength[$i] - 5)); |
198
|
|
|
} |
199
|
|
|
if($i & 1) { |
200
|
|
|
if(($i >= 3) && ($i < ($length-2)) && ($this->runLength[$i] % 3 == 0)) { |
201
|
|
|
$fact = (int)($this->runLength[$i] / 3); |
202
|
|
|
if(($this->runLength[$i-2] == $fact) && |
203
|
|
|
($this->runLength[$i-1] == $fact) && |
204
|
|
|
($this->runLength[$i+1] == $fact) && |
205
|
|
|
($this->runLength[$i+2] == $fact)) { |
206
|
|
|
if(($this->runLength[$i-3] < 0) || ($this->runLength[$i-3] >= (4 * $fact))) { |
207
|
|
|
$demerit += N3; |
208
|
|
|
} else if((($i+3) >= $length) || ($this->runLength[$i+3] >= (4 * $fact))) { |
209
|
|
|
$demerit += N3; |
210
|
|
|
} |
211
|
|
|
} |
212
|
|
|
} |
213
|
|
|
} |
214
|
|
|
} |
215
|
|
|
return $demerit; |
216
|
|
|
} |
217
|
|
|
|
218
|
|
|
//---------------------------------------------------------------------- |
219
|
|
|
public function evaluateSymbol($width, $frame) |
220
|
|
|
{ |
221
|
|
|
$head = 0; |
222
|
|
|
$demerit = 0; |
223
|
|
|
|
224
|
|
|
for($y=0; $y<$width; $y++) { |
225
|
|
|
$head = 0; |
226
|
|
|
$this->runLength[0] = 1; |
227
|
|
|
|
228
|
|
|
$frameY = $frame[$y]; |
229
|
|
|
|
230
|
|
|
if ($y>0) |
231
|
|
|
$frameYM = $frame[$y-1]; |
232
|
|
|
|
233
|
|
|
for($x=0; $x<$width; $x++) { |
234
|
|
|
if(($x > 0) && ($y > 0)) { |
235
|
|
|
$b22 = ord($frameY[$x]) & ord($frameY[$x-1]) & ord($frameYM[$x]) & ord($frameYM[$x-1]); |
|
|
|
|
236
|
|
|
$w22 = ord($frameY[$x]) | ord($frameY[$x-1]) | ord($frameYM[$x]) | ord($frameYM[$x-1]); |
237
|
|
|
|
238
|
|
|
if(($b22 | ($w22 ^ 1))&1) { |
239
|
|
|
$demerit += N2; |
240
|
|
|
} |
241
|
|
|
} |
242
|
|
|
if(($x == 0) && (ord($frameY[$x]) & 1)) { |
243
|
|
|
$this->runLength[0] = -1; |
244
|
|
|
$head = 1; |
245
|
|
|
$this->runLength[$head] = 1; |
246
|
|
|
} else if($x > 0) { |
247
|
|
|
if((ord($frameY[$x]) ^ ord($frameY[$x-1])) & 1) { |
248
|
|
|
$head++; |
249
|
|
|
$this->runLength[$head] = 1; |
250
|
|
|
} else { |
251
|
|
|
$this->runLength[$head]++; |
252
|
|
|
} |
253
|
|
|
} |
254
|
|
|
} |
255
|
|
|
|
256
|
|
|
$demerit += $this->calcN1N3($head+1); |
257
|
|
|
} |
258
|
|
|
|
259
|
|
|
for($x=0; $x<$width; $x++) { |
260
|
|
|
$head = 0; |
261
|
|
|
$this->runLength[0] = 1; |
262
|
|
|
|
263
|
|
|
for($y=0; $y<$width; $y++) { |
264
|
|
|
if($y == 0 && (ord($frame[$y][$x]) & 1)) { |
265
|
|
|
$this->runLength[0] = -1; |
266
|
|
|
$head = 1; |
267
|
|
|
$this->runLength[$head] = 1; |
268
|
|
|
} else if($y > 0) { |
269
|
|
|
if((ord($frame[$y][$x]) ^ ord($frame[$y-1][$x])) & 1) { |
270
|
|
|
$head++; |
271
|
|
|
$this->runLength[$head] = 1; |
272
|
|
|
} else { |
273
|
|
|
$this->runLength[$head]++; |
274
|
|
|
} |
275
|
|
|
} |
276
|
|
|
} |
277
|
|
|
|
278
|
|
|
$demerit += $this->calcN1N3($head+1); |
279
|
|
|
} |
280
|
|
|
|
281
|
|
|
return $demerit; |
282
|
|
|
} |
283
|
|
|
|
284
|
|
|
|
285
|
|
|
//---------------------------------------------------------------------- |
286
|
|
|
public function mask($width, $frame, $level) |
287
|
|
|
{ |
288
|
|
|
$minDemerit = PHP_INT_MAX; |
289
|
|
|
$bestMaskNum = 0; |
|
|
|
|
290
|
|
|
$bestMask = array(); |
|
|
|
|
291
|
|
|
|
292
|
|
|
$checked_masks = array(0,1,2,3,4,5,6,7); |
293
|
|
|
|
294
|
|
|
if (QR_FIND_FROM_RANDOM !== false) { |
|
|
|
|
295
|
|
|
|
296
|
|
|
$howManuOut = 8-(QR_FIND_FROM_RANDOM % 9); |
297
|
|
|
for ($i = 0; $i < $howManuOut; $i++) { |
298
|
|
|
$remPos = rand (0, count($checked_masks)-1); |
299
|
|
|
unset($checked_masks[$remPos]); |
300
|
|
|
$checked_masks = array_values($checked_masks); |
301
|
|
|
} |
302
|
|
|
|
303
|
|
|
} |
304
|
|
|
|
305
|
|
|
$bestMask = $frame; |
306
|
|
|
|
307
|
|
|
foreach($checked_masks as $i) { |
308
|
|
|
$mask = array_fill(0, $width, str_repeat("\0", $width)); |
309
|
|
|
|
310
|
|
|
$demerit = 0; |
|
|
|
|
311
|
|
|
$blacks = 0; |
|
|
|
|
312
|
|
|
$blacks = $this->makeMaskNo($i, $width, $frame, $mask); |
313
|
|
|
$blacks += $this->writeFormatInformation($width, $mask, $i, $level); |
314
|
|
|
$blacks = (int)(100 * $blacks / ($width * $width)); |
315
|
|
|
$demerit = (int)((int)(abs($blacks - 50) / 5) * N4); |
316
|
|
|
$demerit += $this->evaluateSymbol($width, $mask); |
317
|
|
|
|
318
|
|
|
if($demerit < $minDemerit) { |
319
|
|
|
$minDemerit = $demerit; |
320
|
|
|
$bestMask = $mask; |
321
|
|
|
$bestMaskNum = $i; |
322
|
|
|
} |
323
|
|
|
} |
324
|
|
|
|
325
|
|
|
return $bestMask; |
326
|
|
|
} |
327
|
|
|
|
328
|
|
|
//---------------------------------------------------------------------- |
329
|
|
|
} |
330
|
|
|
|
This check compares calls to functions or methods with their respective definitions. If the call has more arguments than are defined, it raises an issue.
If a function is defined several times with a different number of parameters, the check may pick up the wrong definition and report false positives. One codebase where this has been known to happen is Wordpress. Please note the @ignore annotation hint above.