PageRenderTime 58ms CodeModel.GetById 21ms RepoModel.GetById 0ms app.codeStats 1ms

/source/plugin/mobile/qrcode.class.php

https://github.com/kuaileshike/upload
PHP | 2673 lines | 2117 code | 550 blank | 6 comment | 432 complexity | a84b00a45d73dd25f04e27a2d966fd43 MD5 | raw file

Large files files are truncated, but you can click here to view the full file

    

  1. <?php
    2. 

  2. 

  3. /**
    4. 

  4.  *      [Discuz!] (C)2001-2099 Comsenz Inc.
    5. 

  5.  *      This is NOT a freeware, use is subject to license terms
    6. 

  6.  *
    7. 

  7.  *      $Id: qrcode.class.php 27464 2012-02-01 09:12:37Z monkey $
    8. 

  8.  */
    9. 

  9. 

  10. define('QR_MODE_NUL', -1);
    11. 

  11. define('QR_MODE_NUM', 0);
    12. 

  12. define('QR_MODE_AN', 1);
    13. 

  13. define('QR_MODE_8', 2);
    14. 

  14. define('QR_MODE_KANJI', 3);
    15. 

  15. define('QR_MODE_STRUCTURE', 4);
    16. 

  16. define('QR_ECLEVEL_L', 0);
    17. 

  17. define('QR_ECLEVEL_M', 1);
    18. 

  18. define('QR_ECLEVEL_Q', 2);
    19. 

  19. define('QR_ECLEVEL_H', 3);
    20. 

  20. define('QR_FORMAT_TEXT', 0);
    21. 

  21. define('QR_FORMAT_PNG', 1);
    22. 

  22. 

  23. class qrstr {
    24. 

  24. 

  25. 	public static function set(&$srctab, $x, $y, $repl, $replLen = false) {
    26. 

  26. 		$srctab[$y] = substr_replace($srctab[$y], ($replLen !== false) ? substr($repl, 0, $replLen) : $repl, $x, ($replLen !== false) ? $replLen : strlen($repl));
    27. 

  27. 	}
    28. 

  28. 

  29. }
    30. 

  30. 

  31. define('QR_CACHEABLE', false);
    32. 

  32. define('QR_CACHE_DIR', false);
    33. 

  33. define('QR_LOG_DIR', false);
    34. 

  34. define('QR_FIND_BEST_MASK', true);
    35. 

  35. define('QR_FIND_FROM_RANDOM', 2);
    36. 

  36. define('QR_DEFAULT_MASK', 2);
    37. 

  37. define('QR_PNG_MAXIMUM_SIZE', 1024);
    38. 

  38. 

  39. class QRtools {
    40. 

  40. 

  41. 	public static function binarize($frame) {
    42. 

  42. 		$len = count($frame);
    43. 

  43. 		foreach ($frame as &$frameLine) {
    44. 

  44. 

  45. 			for ($i = 0; $i < $len; $i++) {
    46. 

  46. 				$frameLine[$i] = (ord($frameLine[$i]) & 1) ? '1' : '0';
    47. 

  47. 			}
    48. 

  48. 		}
    49. 

  49. 

  50. 		return $frame;
    51. 

  51. 	}
    52. 

  52. 

  53. 	public static function tcpdfBarcodeArray($code, $mode = 'QR,L', $tcPdfVersion = '4.5.037') {
    54. 

  54. 		$barcode_array = array();
    55. 

  55. 

  56. 		if (!is_array($mode))
    57. 

  57. 			$mode = explode(',', $mode);
    58. 

  58. 

  59. 		$eccLevel = 'L';
    60. 

  60. 

  61. 		if (count($mode) > 1) {
    62. 

  62. 			$eccLevel = $mode[1];
    63. 

  63. 		}
    64. 

  64. 

  65. 		$qrTab = QRcode::text($code, false, $eccLevel);
    66. 

  66. 		$size = count($qrTab);
    67. 

  67. 

  68. 		$barcode_array['num_rows'] = $size;
    69. 

  69. 		$barcode_array['num_cols'] = $size;
    70. 

  70. 		$barcode_array['bcode'] = array();
    71. 

  71. 

  72. 		foreach ($qrTab as $line) {
    73. 

  73. 			$arrAdd = array();
    74. 

  74. 			foreach (str_split($line) as $char)
    75. 

  75. 				$arrAdd[] = ($char == '1') ? 1 : 0;
    76. 

  76. 			$barcode_array['bcode'][] = $arrAdd;
    77. 

  77. 		}
    78. 

  78. 

  79. 		return $barcode_array;
    80. 

  80. 	}
    81. 

  81. 

  82. 	public static function clearCache() {
    83. 

  83. 		self::$frames = array();
    84. 

  84. 	}
    85. 

  85. 

  86. 	public static function buildCache() {
    87. 

  87. 		QRtools::markTime('before_build_cache');
    88. 

  88. 

  89. 		$mask = new QRmask();
    90. 

  90. 		for ($a = 1; $a <= QRSPEC_VERSION_MAX; $a++) {
    91. 

  91. 			$frame = QRspec::newFrame($a);
    92. 

  92. 			if (QR_IMAGE) {
    93. 

  93. 				$fileName = QR_CACHE_DIR . 'frame_' . $a . '.png';
    94. 

  94. 				QRimage::png(self::binarize($frame), $fileName, 1, 0);
    95. 

  95. 			}
    96. 

  96. 

  97. 			$width = count($frame);
    98. 

  98. 			$bitMask = array_fill(0, $width, array_fill(0, $width, 0));
    99. 

  99. 			for ($maskNo = 0; $maskNo < 8; $maskNo++)
    100. 

  100. 				$mask->makeMaskNo($maskNo, $width, $frame, $bitMask, true);
    101. 

  101. 		}
    102. 

  102. 

  103. 		QRtools::markTime('after_build_cache');
    104. 

  104. 	}
    105. 

  105. 

  106. 	public static function log($outfile, $err) {
    107. 

  107. 		if (QR_LOG_DIR !== false) {
    108. 

  108. 			if ($err != '') {
    109. 

  109. 				if ($outfile !== false) {
    110. 

  110. 					file_put_contents(QR_LOG_DIR . basename($outfile) . '-errors.txt', date('Y-m-d H:i:s') . ': ' . $err, FILE_APPEND);
    111. 

  111. 				} else {
    112. 

  112. 					file_put_contents(QR_LOG_DIR . 'errors.txt', date('Y-m-d H:i:s') . ': ' . $err, FILE_APPEND);
    113. 

  113. 				}
    114. 

  114. 			}
    115. 

  115. 		}
    116. 

  116. 	}
    117. 

  117. 

  118. 	public static function dumpMask($frame) {
    119. 

  119. 		$width = count($frame);
    120. 

  120. 		for ($y = 0; $y < $width; $y++) {
    121. 

  121. 			for ($x = 0; $x < $width; $x++) {
    122. 

  122. 				echo ord($frame[$y][$x]) . ',';
    123. 

  123. 			}
    124. 

  124. 		}
    125. 

  125. 	}
    126. 

  126. 

  127. 	public static function markTime($markerId) {
    128. 

  128. 		list($usec, $sec) = explode(" ", microtime());
    129. 

  129. 		$time = ((float) $usec + (float) $sec);
    130. 

  130. 

  131. 		if (!isset($GLOBALS['qr_time_bench']))
    132. 

  132. 			$GLOBALS['qr_time_bench'] = array();
    133. 

  133. 

  134. 		$GLOBALS['qr_time_bench'][$markerId] = $time;
    135. 

  135. 	}
    136. 

  136. 

  137. 	public static function timeBenchmark() {
    138. 

  138. 		self::markTime('finish');
    139. 

  139. 

  140. 		$lastTime = 0;
    141. 

  141. 		$startTime = 0;
    142. 

  142. 		$p = 0;
    143. 

  143. 

  144. 		echo '<table cellpadding="3" cellspacing="1">
    145. 

  145.                     <thead><tr style="border-bottom:1px solid silver"><td colspan="2" style="text-align:center">BENCHMARK</td></tr></thead>
    146. 

  146.                     <tbody>';
    147. 

    148. 

  148. 		foreach ($GLOBALS['qr_time_bench'] as $markerId => $thisTime) {
    149. 

  149. 			if ($p > 0) {
    150. 

  150. 				echo '<tr><th style="text-align:right">till ' . $markerId . ': </th><td>' . number_format($thisTime - $lastTime, 6) . 's</td></tr>';
    151. 

  151. 			} else {
    152. 

  152. 				$startTime = $thisTime;
    153. 

  153. 			}
    154. 

  154. 

  155. 			$p++;
    156. 

  156. 			$lastTime = $thisTime;
    157. 

  157. 		}
    158. 

  158. 

  159. 		echo '</tbody><tfoot>
    160. 

  160.                 <tr style="border-top:2px solid black"><th style="text-align:right">TOTAL: </th><td>' . number_format($lastTime - $startTime, 6) . 's</td></tr>
    161. 

  161.             </tfoot>
    162. 

  162.             </table>';
    163. 

  163. 	}
    164. 

  164. 

  165. }
    166. 

  166. 

  167. QRtools::markTime('start');
    168. 

  168. 

  169. define('QRSPEC_VERSION_MAX', 40);
    170. 

  170. define('QRSPEC_WIDTH_MAX', 177);
    171. 

  171. define('QRCAP_WIDTH', 0);
    172. 

  172. define('QRCAP_WORDS', 1);
    173. 

  173. define('QRCAP_REMINDER', 2);
    174. 

  174. define('QRCAP_EC', 3);
    175. 

  175. 

  176. class QRspec {
    177. 

  177. 

  178. 	public static $capacity = array(
    179. 

  179. 	    array(0, 0, 0, array(0, 0, 0, 0)),
    180. 

  180. 	    array(21, 26, 0, array(7, 10, 13, 17)),
    181. 

  181. 	    array(25, 44, 7, array(10, 16, 22, 28)),
    182. 

  182. 	    array(29, 70, 7, array(15, 26, 36, 44)),
    183. 

  183. 	    array(33, 100, 7, array(20, 36, 52, 64)),
    184. 

  184. 	    array(37, 134, 7, array(26, 48, 72, 88)),
    185. 

  185. 	    array(41, 172, 7, array(36, 64, 96, 112)),
    186. 

  186. 	    array(45, 196, 0, array(40, 72, 108, 130)),
    187. 

  187. 	    array(49, 242, 0, array(48, 88, 132, 156)),
    188. 

  188. 	    array(53, 292, 0, array(60, 110, 160, 192)),
    189. 

  189. 	    array(57, 346, 0, array(72, 130, 192, 224)),
    190. 

  190. 	    array(61, 404, 0, array(80, 150, 224, 264)),
    191. 

  191. 	    array(65, 466, 0, array(96, 176, 260, 308)),
    192. 

  192. 	    array(69, 532, 0, array(104, 198, 288, 352)),
    193. 

  193. 	    array(73, 581, 3, array(120, 216, 320, 384)),
    194. 

  194. 	    array(77, 655, 3, array(132, 240, 360, 432)),
    195. 

  195. 	    array(81, 733, 3, array(144, 280, 408, 480)),
    196. 

  196. 	    array(85, 815, 3, array(168, 308, 448, 532)),
    197. 

  197. 	    array(89, 901, 3, array(180, 338, 504, 588)),
    198. 

  198. 	    array(93, 991, 3, array(196, 364, 546, 650)),
    199. 

  199. 	    array(97, 1085, 3, array(224, 416, 600, 700)),
    200. 

  200. 	    array(101, 1156, 4, array(224, 442, 644, 750)),
    201. 

  201. 	    array(105, 1258, 4, array(252, 476, 690, 816)),
    202. 

  202. 	    array(109, 1364, 4, array(270, 504, 750, 900)),
    203. 

  203. 	    array(113, 1474, 4, array(300, 560, 810, 960)),
    204. 

  204. 	    array(117, 1588, 4, array(312, 588, 870, 1050)),
    205. 

  205. 	    array(121, 1706, 4, array(336, 644, 952, 1110)),
    206. 

  206. 	    array(125, 1828, 4, array(360, 700, 1020, 1200)),
    207. 

  207. 	    array(129, 1921, 3, array(390, 728, 1050, 1260)),
    208. 

  208. 	    array(133, 2051, 3, array(420, 784, 1140, 1350)),
    209. 

  209. 	    array(137, 2185, 3, array(450, 812, 1200, 1440)),
    210. 

  210. 	    array(141, 2323, 3, array(480, 868, 1290, 1530)),
    211. 

  211. 	    array(145, 2465, 3, array(510, 924, 1350, 1620)),
    212. 

  212. 	    array(149, 2611, 3, array(540, 980, 1440, 1710)),
    213. 

  213. 	    array(153, 2761, 3, array(570, 1036, 1530, 1800)),
    214. 

  214. 	    array(157, 2876, 0, array(570, 1064, 1590, 1890)),
    215. 

  215. 	    array(161, 3034, 0, array(600, 1120, 1680, 1980)),
    216. 

  216. 	    array(165, 3196, 0, array(630, 1204, 1770, 2100)),
    217. 

  217. 	    array(169, 3362, 0, array(660, 1260, 1860, 2220)),
    218. 

  218. 	    array(173, 3532, 0, array(720, 1316, 1950, 2310)),
    219. 

  219. 	    array(177, 3706, 0, array(750, 1372, 2040, 2430))
    220. 

  220. 	);
    221. 

  221. 

  222. 	public static function getDataLength($version, $level) {
    223. 

  223. 		return self::$capacity[$version][QRCAP_WORDS] - self::$capacity[$version][QRCAP_EC][$level];
    224. 

  224. 	}
    225. 

  225. 

  226. 	public static function getECCLength($version, $level) {
    227. 

  227. 		return self::$capacity[$version][QRCAP_EC][$level];
    228. 

  228. 	}
    229. 

  229. 

  230. 	public static function getWidth($version) {
    231. 

  231. 		return self::$capacity[$version][QRCAP_WIDTH];
    232. 

  232. 	}
    233. 

  233. 

  234. 	public static function getRemainder($version) {
    235. 

  235. 		return self::$capacity[$version][QRCAP_REMINDER];
    236. 

  236. 	}
    237. 

  237. 

  238. 	public static function getMinimumVersion($size, $level) {
    239. 

  239. 

  240. 		for ($i = 1; $i <= QRSPEC_VERSION_MAX; $i++) {
    241. 

  241. 			$words = self::$capacity[$i][QRCAP_WORDS] - self::$capacity[$i][QRCAP_EC][$level];
    242. 

  242. 			if ($words >= $size)
    243. 

  243. 				return $i;
    244. 

  244. 		}
    245. 

  245. 

  246. 		return -1;
    247. 

  247. 	}
    248. 

  248. 

  249. 	public static $lengthTableBits = array(
    250. 

  250. 	    array(10, 12, 14),
    251. 

  251. 	    array(9, 11, 13),
    252. 

  252. 	    array(8, 16, 16),
    253. 

  253. 	    array(8, 10, 12)
    254. 

  254. 	);
    255. 

  255. 

  256. 	public static function lengthIndicator($mode, $version) {
    257. 

  257. 		if ($mode == QR_MODE_STRUCTURE)
    258. 

  258. 			return 0;
    259. 

  259. 

  260. 		if ($version <= 9) {
    261. 

  261. 			$l = 0;
    262. 

  262. 		} else if ($version <= 26) {
    263. 

  263. 			$l = 1;
    264. 

  264. 		} else {
    265. 

  265. 			$l = 2;
    266. 

  266. 		}
    267. 

  267. 

  268. 		return self::$lengthTableBits[$mode][$l];
    269. 

  269. 	}
    270. 

  270. 

  271. 	public static function maximumWords($mode, $version) {
    272. 

  272. 		if ($mode == QR_MODE_STRUCTURE)
    273. 

  273. 			return 3;
    274. 

  274. 

  275. 		if ($version <= 9) {
    276. 

  276. 			$l = 0;
    277. 

  277. 		} else if ($version <= 26) {
    278. 

  278. 			$l = 1;
    279. 

  279. 		} else {
    280. 

  280. 			$l = 2;
    281. 

  281. 		}
    282. 

  282. 

  283. 		$bits = self::$lengthTableBits[$mode][$l];
    284. 

  284. 		$words = (1 << $bits) - 1;
    285. 

  285. 

  286. 		if ($mode == QR_MODE_KANJI) {
    287. 

  287. 			$words *= 2;
    288. 

  288. 		}
    289. 

  289. 

  290. 		return $words;
    291. 

  291. 	}
    292. 

  292. 

  293. 	public static $eccTable = array(
    294. 

  294. 	    array(array(0, 0), array(0, 0), array(0, 0), array(0, 0)),
    295. 

  295. 	    array(array(1, 0), array(1, 0), array(1, 0), array(1, 0)),
    296. 

  296. 	    array(array(1, 0), array(1, 0), array(1, 0), array(1, 0)),
    297. 

  297. 	    array(array(1, 0), array(1, 0), array(2, 0), array(2, 0)),
    298. 

  298. 	    array(array(1, 0), array(2, 0), array(2, 0), array(4, 0)),
    299. 

  299. 	    array(array(1, 0), array(2, 0), array(2, 2), array(2, 2)),
    300. 

  300. 	    array(array(2, 0), array(4, 0), array(4, 0), array(4, 0)),
    301. 

  301. 	    array(array(2, 0), array(4, 0), array(2, 4), array(4, 1)),
    302. 

  302. 	    array(array(2, 0), array(2, 2), array(4, 2), array(4, 2)),
    303. 

  303. 	    array(array(2, 0), array(3, 2), array(4, 4), array(4, 4)),
    304. 

  304. 	    array(array(2, 2), array(4, 1), array(6, 2), array(6, 2)),
    305. 

  305. 	    array(array(4, 0), array(1, 4), array(4, 4), array(3, 8)),
    306. 

  306. 	    array(array(2, 2), array(6, 2), array(4, 6), array(7, 4)),
    307. 

  307. 	    array(array(4, 0), array(8, 1), array(8, 4), array(12, 4)),
    308. 

  308. 	    array(array(3, 1), array(4, 5), array(11, 5), array(11, 5)),
    309. 

  309. 	    array(array(5, 1), array(5, 5), array(5, 7), array(11, 7)),
    310. 

  310. 	    array(array(5, 1), array(7, 3), array(15, 2), array(3, 13)),
    311. 

  311. 	    array(array(1, 5), array(10, 1), array(1, 15), array(2, 17)),
    312. 

  312. 	    array(array(5, 1), array(9, 4), array(17, 1), array(2, 19)),
    313. 

  313. 	    array(array(3, 4), array(3, 11), array(17, 4), array(9, 16)),
    314. 

  314. 	    array(array(3, 5), array(3, 13), array(15, 5), array(15, 10)),
    315. 

  315. 	    array(array(4, 4), array(17, 0), array(17, 6), array(19, 6)),
    316. 

  316. 	    array(array(2, 7), array(17, 0), array(7, 16), array(34, 0)),
    317. 

  317. 	    array(array(4, 5), array(4, 14), array(11, 14), array(16, 14)),
    318. 

  318. 	    array(array(6, 4), array(6, 14), array(11, 16), array(30, 2)),
    319. 

  319. 	    array(array(8, 4), array(8, 13), array(7, 22), array(22, 13)),
    320. 

  320. 	    array(array(10, 2), array(19, 4), array(28, 6), array(33, 4)),
    321. 

  321. 	    array(array(8, 4), array(22, 3), array(8, 26), array(12, 28)),
    322. 

  322. 	    array(array(3, 10), array(3, 23), array(4, 31), array(11, 31)),
    323. 

  323. 	    array(array(7, 7), array(21, 7), array(1, 37), array(19, 26)),
    324. 

  324. 	    array(array(5, 10), array(19, 10), array(15, 25), array(23, 25)),
    325. 

  325. 	    array(array(13, 3), array(2, 29), array(42, 1), array(23, 28)),
    326. 

  326. 	    array(array(17, 0), array(10, 23), array(10, 35), array(19, 35)),
    327. 

  327. 	    array(array(17, 1), array(14, 21), array(29, 19), array(11, 46)),
    328. 

  328. 	    array(array(13, 6), array(14, 23), array(44, 7), array(59, 1)),
    329. 

  329. 	    array(array(12, 7), array(12, 26), array(39, 14), array(22, 41)),
    330. 

  330. 	    array(array(6, 14), array(6, 34), array(46, 10), array(2, 64)),
    331. 

  331. 	    array(array(17, 4), array(29, 14), array(49, 10), array(24, 46)),
    332. 

  332. 	    array(array(4, 18), array(13, 32), array(48, 14), array(42, 32)),
    333. 

  333. 	    array(array(20, 4), array(40, 7), array(43, 22), array(10, 67)),
    334. 

  334. 	    array(array(19, 6), array(18, 31), array(34, 34), array(20, 61)),
    335. 

  335. 	);
    336. 

  336. 

  337. 	public static function getEccSpec($version, $level, array &$spec) {
    338. 

  338. 		if (count($spec) < 5) {
    339. 

  339. 			$spec = array(0, 0, 0, 0, 0);
    340. 

  340. 		}
    341. 

  341. 

  342. 		$b1 = self::$eccTable[$version][$level][0];
    343. 

  343. 		$b2 = self::$eccTable[$version][$level][1];
    344. 

  344. 		$data = self::getDataLength($version, $level);
    345. 

  345. 		$ecc = self::getECCLength($version, $level);
    346. 

  346. 

  347. 		if ($b2 == 0) {
    348. 

  348. 			$spec[0] = $b1;
    349. 

  349. 			$spec[1] = (int) ($data / $b1);
    350. 

  350. 			$spec[2] = (int) ($ecc / $b1);
    351. 

  351. 			$spec[3] = 0;
    352. 

  352. 			$spec[4] = 0;
    353. 

  353. 		} else {
    354. 

  354. 			$spec[0] = $b1;
    355. 

  355. 			$spec[1] = (int) ($data / ($b1 + $b2));
    356. 

  356. 			$spec[2] = (int) ($ecc / ($b1 + $b2));
    357. 

  357. 			$spec[3] = $b2;
    358. 

  358. 			$spec[4] = $spec[1] + 1;
    359. 

  359. 		}
    360. 

  360. 	}
    361. 

  361. 

  362. 	public static $alignmentPattern = array(
    363. 

  363. 	    array(0, 0),
    364. 

  364. 	    array(0, 0), array(18, 0), array(22, 0), array(26, 0), array(30, 0),
    365. 

  365. 	    array(34, 0), array(22, 38), array(24, 42), array(26, 46), array(28, 50),
    366. 

  366. 	    array(30, 54), array(32, 58), array(34, 62), array(26, 46), array(26, 48),
    367. 

  367. 	    array(26, 50), array(30, 54), array(30, 56), array(30, 58), array(34, 62),
    368. 

  368. 	    array(28, 50), array(26, 50), array(30, 54), array(28, 54), array(32, 58),
    369. 

  369. 	    array(30, 58), array(34, 62), array(26, 50), array(30, 54), array(26, 52),
    370. 

  370. 	    array(30, 56), array(34, 60), array(30, 58), array(34, 62), array(30, 54),
    371. 

  371. 	    array(24, 50), array(28, 54), array(32, 58), array(26, 54), array(30, 58),
    372. 

  372. 	);
    373. 

  373. 

  374. 	public static function putAlignmentMarker(array &$frame, $ox, $oy) {
    375. 

  375. 		$finder = array(
    376. 

  376. 		    "\xa1\xa1\xa1\xa1\xa1",
    377. 

  377. 		    "\xa1\xa0\xa0\xa0\xa1",
    378. 

  378. 		    "\xa1\xa0\xa1\xa0\xa1",
    379. 

  379. 		    "\xa1\xa0\xa0\xa0\xa1",
    380. 

  380. 		    "\xa1\xa1\xa1\xa1\xa1"
    381. 

  381. 		);
    382. 

  382. 

  383. 		$yStart = $oy - 2;
    384. 

  384. 		$xStart = $ox - 2;
    385. 

  385. 

  386. 		for ($y = 0; $y < 5; $y++) {
    387. 

  387. 			QRstr::set($frame, $xStart, $yStart + $y, $finder[$y]);
    388. 

  388. 		}
    389. 

  389. 	}
    390. 

  390. 

  391. 	public static function putAlignmentPattern($version, &$frame, $width) {
    392. 

  392. 		if ($version < 2)
    393. 

  393. 			return;
    394. 

  394. 

  395. 		$d = self::$alignmentPattern[$version][1] - self::$alignmentPattern[$version][0];
    396. 

  396. 		if ($d < 0) {
    397. 

  397. 			$w = 2;
    398. 

  398. 		} else {
    399. 

  399. 			$w = (int) (($width - self::$alignmentPattern[$version][0]) / $d + 2);
    400. 

  400. 		}
    401. 

  401. 

  402. 		if ($w * $w - 3 == 1) {
    403. 

  403. 			$x = self::$alignmentPattern[$version][0];
    404. 

  404. 			$y = self::$alignmentPattern[$version][0];
    405. 

  405. 			self::putAlignmentMarker($frame, $x, $y);
    406. 

  406. 			return;
    407. 

  407. 		}
    408. 

  408. 

  409. 		$cx = self::$alignmentPattern[$version][0];
    410. 

  410. 		for ($x = 1; $x < $w - 1; $x++) {
    411. 

  411. 			self::putAlignmentMarker($frame, 6, $cx);
    412. 

  412. 			self::putAlignmentMarker($frame, $cx, 6);
    413. 

  413. 			$cx += $d;
    414. 

  414. 		}
    415. 

  415. 

  416. 		$cy = self::$alignmentPattern[$version][0];
    417. 

  417. 		for ($y = 0; $y < $w - 1; $y++) {
    418. 

  418. 			$cx = self::$alignmentPattern[$version][0];
    419. 

  419. 			for ($x = 0; $x < $w - 1; $x++) {
    420. 

  420. 				self::putAlignmentMarker($frame, $cx, $cy);
    421. 

  421. 				$cx += $d;
    422. 

  422. 			}
    423. 

  423. 			$cy += $d;
    424. 

  424. 		}
    425. 

  425. 	}
    426. 

  426. 

  427. 	public static $versionPattern = array(
    428. 

  428. 	    0x07c94, 0x085bc, 0x09a99, 0x0a4d3, 0x0bbf6, 0x0c762, 0x0d847, 0x0e60d,
    429. 

  429. 	    0x0f928, 0x10b78, 0x1145d, 0x12a17, 0x13532, 0x149a6, 0x15683, 0x168c9,
    430. 

  430. 	    0x177ec, 0x18ec4, 0x191e1, 0x1afab, 0x1b08e, 0x1cc1a, 0x1d33f, 0x1ed75,
    431. 

  431. 	    0x1f250, 0x209d5, 0x216f0, 0x228ba, 0x2379f, 0x24b0b, 0x2542e, 0x26a64,
    432. 

  432. 	    0x27541, 0x28c69
    433. 

  433. 	);
    434. 

  434. 

  435. 	public static function getVersionPattern($version) {
    436. 

  436. 		if ($version < 7 || $version > QRSPEC_VERSION_MAX)
    437. 

  437. 			return 0;
    438. 

  438. 

  439. 		return self::$versionPattern[$version - 7];
    440. 

  440. 	}
    441. 

  441. 

  442. 	public static $formatInfo = array(
    443. 

  443. 	    array(0x77c4, 0x72f3, 0x7daa, 0x789d, 0x662f, 0x6318, 0x6c41, 0x6976),
    444. 

  444. 	    array(0x5412, 0x5125, 0x5e7c, 0x5b4b, 0x45f9, 0x40ce, 0x4f97, 0x4aa0),
    445. 

  445. 	    array(0x355f, 0x3068, 0x3f31, 0x3a06, 0x24b4, 0x2183, 0x2eda, 0x2bed),
    446. 

  446. 	    array(0x1689, 0x13be, 0x1ce7, 0x19d0, 0x0762, 0x0255, 0x0d0c, 0x083b)
    447. 

  447. 	);
    448. 

  448. 

  449. 	public static function getFormatInfo($mask, $level) {
    450. 

  450. 		if ($mask < 0 || $mask > 7)
    451. 

  451. 			return 0;
    452. 

  452. 

  453. 		if ($level < 0 || $level > 3)
    454. 

  454. 			return 0;
    455. 

  455. 

  456. 		return self::$formatInfo[$level][$mask];
    457. 

  457. 	}
    458. 

  458. 

  459. 	public static $frames = array();
    460. 

  460. 

  461. 	public static function putFinderPattern(&$frame, $ox, $oy) {
    462. 

  462. 		$finder = array(
    463. 

  463. 		    "\xc1\xc1\xc1\xc1\xc1\xc1\xc1",
    464. 

  464. 		    "\xc1\xc0\xc0\xc0\xc0\xc0\xc1",
    465. 

  465. 		    "\xc1\xc0\xc1\xc1\xc1\xc0\xc1",
    466. 

  466. 		    "\xc1\xc0\xc1\xc1\xc1\xc0\xc1",
    467. 

  467. 		    "\xc1\xc0\xc1\xc1\xc1\xc0\xc1",
    468. 

  468. 		    "\xc1\xc0\xc0\xc0\xc0\xc0\xc1",
    469. 

  469. 		    "\xc1\xc1\xc1\xc1\xc1\xc1\xc1"
    470. 

  470. 		);
    471. 

  471. 

  472. 		for ($y = 0; $y < 7; $y++) {
    473. 

  473. 			QRstr::set($frame, $ox, $oy + $y, $finder[$y]);
    474. 

  474. 		}
    475. 

  475. 	}
    476. 

  476. 

  477. 	public static function createFrame($version) {
    478. 

  478. 		$width = self::$capacity[$version][QRCAP_WIDTH];
    479. 

  479. 		$frameLine = str_repeat("\0", $width);
    480. 

  480. 		$frame = array_fill(0, $width, $frameLine);
    481. 

  481. 

  482. 		self::putFinderPattern($frame, 0, 0);
    483. 

  483. 		self::putFinderPattern($frame, $width - 7, 0);
    484. 

  484. 		self::putFinderPattern($frame, 0, $width - 7);
    485. 

  485. 

  486. 		$yOffset = $width - 7;
    487. 

  487. 

  488. 		for ($y = 0; $y < 7; $y++) {
    489. 

  489. 			$frame[$y][7] = "\xc0";
    490. 

  490. 			$frame[$y][$width - 8] = "\xc0";
    491. 

  491. 			$frame[$yOffset][7] = "\xc0";
    492. 

  492. 			$yOffset++;
    493. 

  493. 		}
    494. 

  494. 

  495. 		$setPattern = str_repeat("\xc0", 8);
    496. 

  496. 

  497. 		QRstr::set($frame, 0, 7, $setPattern);
    498. 

  498. 		QRstr::set($frame, $width - 8, 7, $setPattern);
    499. 

  499. 		QRstr::set($frame, 0, $width - 8, $setPattern);
    500. 

  500. 

  501. 		$setPattern = str_repeat("\x84", 9);
    502. 

  502. 		QRstr::set($frame, 0, 8, $setPattern);
    503. 

  503. 		QRstr::set($frame, $width - 8, 8, $setPattern, 8);
    504. 

  504. 

  505. 		$yOffset = $width - 8;
    506. 

  506. 

  507. 		for ($y = 0; $y < 8; $y++, $yOffset++) {
    508. 

  508. 			$frame[$y][8] = "\x84";
    509. 

  509. 			$frame[$yOffset][8] = "\x84";
    510. 

  510. 		}
    511. 

  511. 

  512. 

  513. 		for ($i = 1; $i < $width - 15; $i++) {
    514. 

  514. 			$frame[6][7 + $i] = chr(0x90 | ($i & 1));
    515. 

  515. 			$frame[7 + $i][6] = chr(0x90 | ($i & 1));
    516. 

  516. 		}
    517. 

  517. 

  518. 		self::putAlignmentPattern($version, $frame, $width);
    519. 

  519. 

  520. 		if ($version >= 7) {
    521. 

  521. 			$vinf = self::getVersionPattern($version);
    522. 

  522. 

  523. 			$v = $vinf;
    524. 

  524. 

  525. 			for ($x = 0; $x < 6; $x++) {
    526. 

  526. 				for ($y = 0; $y < 3; $y++) {
    527. 

  527. 					$frame[($width - 11) + $y][$x] = chr(0x88 | ($v & 1));
    528. 

  528. 					$v = $v >> 1;
    529. 

  529. 				}
    530. 

  530. 			}
    531. 

  531. 

  532. 			$v = $vinf;
    533. 

  533. 			for ($y = 0; $y < 6; $y++) {
    534. 

  534. 				for ($x = 0; $x < 3; $x++) {
    535. 

  535. 					$frame[$y][$x + ($width - 11)] = chr(0x88 | ($v & 1));
    536. 

  536. 					$v = $v >> 1;
    537. 

  537. 				}
    538. 

  538. 			}
    539. 

  539. 		}
    540. 

  540. 

  541. 		$frame[$width - 8][8] = "\x81";
    542. 

  542. 

  543. 		return $frame;
    544. 

  544. 	}
    545. 

  545. 

  546. 	public static function debug($frame, $binary_mode = false) {
    547. 

  547. 		if ($binary_mode) {
    548. 

  548. 

  549. 			foreach ($frame as &$frameLine) {
    550. 

  550. 				$frameLine = join('<span class="m">&nbsp;&nbsp;</span>', explode('0', $frameLine));
    551. 

  551. 				$frameLine = join('&#9608;&#9608;', explode('1', $frameLine));
    552. 

  552. 			}
    553. 

  553. 			?>
    554. 

  554. 			<style>
    555. 

  555. 				.m { background-color: white; }
    556. 

  556. 			</style>
    557. 

  557. 			<?php
    558. 

  558. 

  559. 			echo '<pre><tt><br/ ><br/ ><br/ >&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;';
    560. 

  560. 			echo join("<br/ >&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;", $frame);
    561. 

  561. 			echo '</tt></pre><br/ ><br/ ><br/ ><br/ ><br/ ><br/ >';
    562. 

  562. 		} else {
    563. 

  563. 

  564. 			foreach ($frame as &$frameLine) {
    565. 

  565. 				$frameLine = join('<span class="m">&nbsp;</span>', explode("\xc0", $frameLine));
    566. 

  566. 				$frameLine = join('<span class="m">&#9618;</span>', explode("\xc1", $frameLine));
    567. 

  567. 				$frameLine = join('<span class="p">&nbsp;</span>', explode("\xa0", $frameLine));
    568. 

  568. 				$frameLine = join('<span class="p">&#9618;</span>', explode("\xa1", $frameLine));
    569. 

  569. 				$frameLine = join('<span class="s">&#9671;</span>', explode("\x84", $frameLine));
    570. 

  570. 				$frameLine = join('<span class="s">&#9670;</span>', explode("\x85", $frameLine));
    571. 

  571. 				$frameLine = join('<span class="x">&#9762;</span>', explode("\x81", $frameLine));
    572. 

  572. 				$frameLine = join('<span class="c">&nbsp;</span>', explode("\x90", $frameLine));
    573. 

  573. 				$frameLine = join('<span class="c">&#9719;</span>', explode("\x91", $frameLine));
    574. 

  574. 				$frameLine = join('<span class="f">&nbsp;</span>', explode("\x88", $frameLine));
    575. 

  575. 				$frameLine = join('<span class="f">&#9618;</span>', explode("\x89", $frameLine));
    576. 

  576. 				$frameLine = join('&#9830;', explode("\x01", $frameLine));
    577. 

  577. 				$frameLine = join('&#8901;', explode("\0", $frameLine));
    578. 

  578. 			}
    579. 

  579. 			?>
    580. 

  580. 			<style>
    581. 

  581. 				.p { background-color: yellow; }
    582. 

  582. 				.m { background-color: #00FF00; }
    583. 

  583. 				.s { background-color: #FF0000; }
    584. 

  584. 				.c { background-color: aqua; }
    585. 

  585. 				.x { background-color: pink; }
    586. 

  586. 				.f { background-color: gold; }
    587. 

  587. 			</style>
    588. 

  588. 			<?php
    589. 

  589. 

  590. 			echo "<pre><tt>";
    591. 

  591. 			echo join("<br/ >", $frame);
    592. 

  592. 			echo "</tt></pre>";
    593. 

  593. 		}
    594. 

  594. 	}
    595. 

  595. 

  596. 	public static function serial($frame) {
    597. 

  597. 		return gzcompress(join("\n", $frame), 9);
    598. 

  598. 	}
    599. 

  599. 

  600. 	public static function unserial($code) {
    601. 

  601. 		return explode("\n", gzuncompress($code));
    602. 

  602. 	}
    603. 

  603. 

  604. 	public static function newFrame($version) {
    605. 

  605. 		if ($version < 1 || $version > QRSPEC_VERSION_MAX)
    606. 

  606. 			return null;
    607. 

  607. 

  608. 		if (!isset(self::$frames[$version])) {
    609. 

  609. 

  610. 			$fileName = QR_CACHE_DIR . 'frame_' . $version . '.dat';
    611. 

  611. 

  612. 			if (QR_CACHEABLE) {
    613. 

  613. 				if (file_exists($fileName)) {
    614. 

  614. 					self::$frames[$version] = self::unserial(file_get_contents($fileName));
    615. 

  615. 				} else {
    616. 

  616. 					self::$frames[$version] = self::createFrame($version);
    617. 

  617. 					file_put_contents($fileName, self::serial(self::$frames[$version]));
    618. 

  618. 				}
    619. 

  619. 			} else {
    620. 

  620. 				self::$frames[$version] = self::createFrame($version);
    621. 

  621. 			}
    622. 

  622. 		}
    623. 

  623. 

  624. 		if (is_null(self::$frames[$version]))
    625. 

  625. 			return null;
    626. 

  626. 

  627. 		return self::$frames[$version];
    628. 

  628. 	}
    629. 

  629. 

  630. 	public static function rsBlockNum($spec) {
    631. 

  631. 		return $spec[0] + $spec[3];
    632. 

  632. 	}
    633. 

  633. 

  634. 	public static function rsBlockNum1($spec) {
    635. 

  635. 		return $spec[0];
    636. 

  636. 	}
    637. 

  637. 

  638. 	public static function rsDataCodes1($spec) {
    639. 

  639. 		return $spec[1];
    640. 

  640. 	}
    641. 

  641. 

  642. 	public static function rsEccCodes1($spec) {
    643. 

  643. 		return $spec[2];
    644. 

  644. 	}
    645. 

  645. 

  646. 	public static function rsBlockNum2($spec) {
    647. 

  647. 		return $spec[3];
    648. 

  648. 	}
    649. 

  649. 

  650. 	public static function rsDataCodes2($spec) {
    651. 

  651. 		return $spec[4];
    652. 

  652. 	}
    653. 

  653. 

  654. 	public static function rsEccCodes2($spec) {
    655. 

  655. 		return $spec[2];
    656. 

  656. 	}
    657. 

  657. 

  658. 	public static function rsDataLength($spec) {
    659. 

  659. 		return ($spec[0] * $spec[1]) + ($spec[3] * $spec[4]);
    660. 

  660. 	}
    661. 

  661. 

  662. 	public static function rsEccLength($spec) {
    663. 

  663. 		return ($spec[0] + $spec[3]) * $spec[2];
    664. 

  664. 	}
    665. 

  665. 

  666. }
    667. 

  667. 

  668. define('QR_IMAGE', true);
    669. 

  669. 

  670. class QRimage {
    671. 

  671. 

  672. 	public static function png($frame, $filename = false, $pixelPerPoint = 4, $outerFrame = 4, $saveandprint = FALSE) {
    673. 

  673. 		$image = self::image($frame, $pixelPerPoint, $outerFrame);
    674. 

  674. 

  675. 		if ($filename === false) {
    676. 

  676. 			Header("Content-type: image/png");
    677. 

  677. 			ImagePng($image);
    678. 

  678. 		} else {
    679. 

  679. 			if ($saveandprint === TRUE) {
    680. 

  680. 				ImagePng($image, $filename);
    681. 

  681. 				header("Content-type: image/png");
    682. 

  682. 				ImagePng($image);
    683. 

  683. 			} else {
    684. 

  684. 				ImagePng($image, $filename);
    685. 

  685. 			}
    686. 

  686. 		}
    687. 

  687. 

  688. 		ImageDestroy($image);
    689. 

  689. 	}
    690. 

  690. 

  691. 	public static function jpg($frame, $filename = false, $pixelPerPoint = 8, $outerFrame = 4, $q = 85) {
    692. 

  692. 		$image = self::image($frame, $pixelPerPoint, $outerFrame);
    693. 

  693. 

  694. 		if ($filename === false) {
    695. 

  695. 			Header("Content-type: image/jpeg");
    696. 

  696. 			ImageJpeg($image, null, $q);
    697. 

  697. 		} else {
    698. 

  698. 			ImageJpeg($image, $filename, $q);
    699. 

  699. 		}
    700. 

  700. 

  701. 		ImageDestroy($image);
    702. 

  702. 	}
    703. 

  703. 

  704. 	private static function image($frame, $pixelPerPoint = 4, $outerFrame = 4) {
    705. 

  705. 		$h = count($frame);
    706. 

  706. 		$w = strlen($frame[0]);
    707. 

  707. 

  708. 		$imgW = $w + 2 * $outerFrame;
    709. 

  709. 		$imgH = $h + 2 * $outerFrame;
    710. 

  710. 

  711. 		$base_image = ImageCreate($imgW, $imgH);
    712. 

  712. 

  713. 		$col[0] = ImageColorAllocate($base_image, 255, 255, 255);
    714. 

  714. 		$col[1] = ImageColorAllocate($base_image, 0, 0, 0);
    715. 

  715. 

  716. 		imagefill($base_image, 0, 0, $col[0]);
    717. 

  717. 

  718. 		for ($y = 0; $y < $h; $y++) {
    719. 

  719. 			for ($x = 0; $x < $w; $x++) {
    720. 

  720. 				if ($frame[$y][$x] == '1') {
    721. 

  721. 					ImageSetPixel($base_image, $x + $outerFrame, $y + $outerFrame, $col[1]);
    722. 

  722. 				}
    723. 

  723. 			}
    724. 

  724. 		}
    725. 

  725. 

  726. 		$target_image = ImageCreate($imgW * $pixelPerPoint, $imgH * $pixelPerPoint);
    727. 

  727. 		ImageCopyResized($target_image, $base_image, 0, 0, 0, 0, $imgW * $pixelPerPoint, $imgH * $pixelPerPoint, $imgW, $imgH);
    728. 

  728. 		ImageDestroy($base_image);
    729. 

  729. 

  730. 		return $target_image;
    731. 

  731. 	}
    732. 

  732. 

  733. }
    734. 

  734. 

  735. define('STRUCTURE_HEADER_BITS', 20);
    736. 

  736. define('MAX_STRUCTURED_SYMBOLS', 16);
    737. 

  737. 

  738. class QRinputItem {
    739. 

  739. 

  740. 	public $mode;
    741. 

  741. 	public $size;
    742. 

  742. 	public $data;
    743. 

  743. 	public $bstream;
    744. 

  744. 

  745. 	public function __construct($mode, $size, $data, $bstream = null) {
    746. 

  746. 		$setData = array_slice($data, 0, $size);
    747. 

  747. 

  748. 		if (count($setData) < $size) {
    749. 

  749. 			$setData = array_merge($setData, array_fill(0, $size - count($setData), 0));
    750. 

  750. 		}
    751. 

  751. 

  752. 		if (!QRinput::check($mode, $size, $setData)) {
    753. 

  753. 			throw new Exception('Error m:' . $mode . ',s:' . $size . ',d:' . join(',', $setData));
    754. 

  754. 			return null;
    755. 

  755. 		}
    756. 

  756. 

  757. 		$this->mode = $mode;
    758. 

  758. 		$this->size = $size;
    759. 

  759. 		$this->data = $setData;
    760. 

  760. 		$this->bstream = $bstream;
    761. 

  761. 	}
    762. 

  762. 

  763. 	public function encodeModeNum($version) {
    764. 

  764. 		try {
    765. 

  765. 

  766. 			$words = (int) ($this->size / 3);
    767. 

  767. 			$bs = new QRbitstream();
    768. 

  768. 

  769. 			$val = 0x1;
    770. 

  770. 			$bs->appendNum(4, $val);
    771. 

  771. 			$bs->appendNum(QRspec::lengthIndicator(QR_MODE_NUM, $version), $this->size);
    772. 

  772. 

  773. 			for ($i = 0; $i < $words; $i++) {
    774. 

  774. 				$val = (ord($this->data[$i * 3]) - ord('0')) * 100;
    775. 

  775. 				$val += (ord($this->data[$i * 3 + 1]) - ord('0')) * 10;
    776. 

  776. 				$val += (ord($this->data[$i * 3 + 2]) - ord('0'));
    777. 

  777. 				$bs->appendNum(10, $val);
    778. 

  778. 			}
    779. 

  779. 

  780. 			if ($this->size - $words * 3 == 1) {
    781. 

  781. 				$val = ord($this->data[$words * 3]) - ord('0');
    782. 

  782. 				$bs->appendNum(4, $val);
    783. 

  783. 			} else if ($this->size - $words * 3 == 2) {
    784. 

  784. 				$val = (ord($this->data[$words * 3]) - ord('0')) * 10;
    785. 

  785. 				$val += (ord($this->data[$words * 3 + 1]) - ord('0'));
    786. 

  786. 				$bs->appendNum(7, $val);
    787. 

  787. 			}
    788. 

  788. 

  789. 			$this->bstream = $bs;
    790. 

  790. 			return 0;
    791. 

  791. 		} catch (Exception $e) {
    792. 

  792. 			return -1;
    793. 

  793. 		}
    794. 

  794. 	}
    795. 

  795. 

  796. 	public function encodeModeAn($version) {
    797. 

  797. 		try {
    798. 

  798. 			$words = (int) ($this->size / 2);
    799. 

  799. 			$bs = new QRbitstream();
    800. 

  800. 

  801. 			$bs->appendNum(4, 0x02);
    802. 

  802. 			$bs->appendNum(QRspec::lengthIndicator(QR_MODE_AN, $version), $this->size);
    803. 

  803. 

  804. 			for ($i = 0; $i < $words; $i++) {
    805. 

  805. 				$val = (int) QRinput::lookAnTable(ord($this->data[$i * 2])) * 45;
    806. 

  806. 				$val += (int) QRinput::lookAnTable(ord($this->data[$i * 2 + 1]));
    807. 

  807. 

  808. 				$bs->appendNum(11, $val);
    809. 

  809. 			}
    810. 

  810. 

  811. 			if ($this->size & 1) {
    812. 

  812. 				$val = QRinput::lookAnTable(ord($this->data[$words * 2]));
    813. 

  813. 				$bs->appendNum(6, $val);
    814. 

  814. 			}
    815. 

  815. 

  816. 			$this->bstream = $bs;
    817. 

  817. 			return 0;
    818. 

  818. 		} catch (Exception $e) {
    819. 

  819. 			return -1;
    820. 

  820. 		}
    821. 

  821. 	}
    822. 

  822. 

  823. 	public function encodeMode8($version) {
    824. 

  824. 		try {
    825. 

  825. 			$bs = new QRbitstream();
    826. 

  826. 

  827. 			$bs->appendNum(4, 0x4);
    828. 

  828. 			$bs->appendNum(QRspec::lengthIndicator(QR_MODE_8, $version), $this->size);
    829. 

  829. 

  830. 			for ($i = 0; $i < $this->size; $i++) {
    831. 

  831. 				$bs->appendNum(8, ord($this->data[$i]));
    832. 

  832. 			}
    833. 

  833. 

  834. 			$this->bstream = $bs;
    835. 

  835. 			return 0;
    836. 

  836. 		} catch (Exception $e) {
    837. 

  837. 			return -1;
    838. 

  838. 		}
    839. 

  839. 	}
    840. 

  840. 

  841. 	public function encodeModeKanji($version) {
    842. 

  842. 		try {
    843. 

  843. 

  844. 			$bs = new QRbitrtream();
    845. 

  845. 

  846. 			$bs->appendNum(4, 0x8);
    847. 

  847. 			$bs->appendNum(QRspec::lengthIndicator(QR_MODE_KANJI, $version), (int) ($this->size / 2));
    848. 

  848. 

  849. 			for ($i = 0; $i < $this->size; $i+=2) {
    850. 

  850. 				$val = (ord($this->data[$i]) << 8) | ord($this->data[$i + 1]);
    851. 

  851. 				if ($val <= 0x9ffc) {
    852. 

  852. 					$val -= 0x8140;
    853. 

  853. 				} else {
    854. 

  854. 					$val -= 0xc140;
    855. 

  855. 				}
    856. 

  856. 

  857. 				$h = ($val >> 8) * 0xc0;
    858. 

  858. 				$val = ($val & 0xff) + $h;
    859. 

  859. 

  860. 				$bs->appendNum(13, $val);
    861. 

  861. 			}
    862. 

  862. 

  863. 			$this->bstream = $bs;
    864. 

  864. 			return 0;
    865. 

  865. 		} catch (Exception $e) {
    866. 

  866. 			return -1;
    867. 

  867. 		}
    868. 

  868. 	}
    869. 

  869. 

  870. 	public function encodeModeStructure() {
    871. 

  871. 		try {
    872. 

  872. 			$bs = new QRbitstream();
    873. 

  873. 

  874. 			$bs->appendNum(4, 0x03);
    875. 

  875. 			$bs->appendNum(4, ord($this->data[1]) - 1);
    876. 

  876. 			$bs->appendNum(4, ord($this->data[0]) - 1);
    877. 

  877. 			$bs->appendNum(8, ord($this->data[2]));
    878. 

  878. 

  879. 			$this->bstream = $bs;
    880. 

  880. 			return 0;
    881. 

  881. 		} catch (Exception $e) {
    882. 

  882. 			return -1;
    883. 

  883. 		}
    884. 

  884. 	}
    885. 

  885. 

  886. 	public function estimateBitStreamSizeOfEntry($version) {
    887. 

  887. 		$bits = 0;
    888. 

  888. 

  889. 		if ($version == 0)
    890. 

  890. 			$version = 1;
    891. 

  891. 

  892. 		switch ($this->mode) {
    893. 

  893. 			case QR_MODE_NUM: $bits = QRinput::estimateBitsModeNum($this->size);
    894. 

  894. 				break;
    895. 

  895. 			case QR_MODE_AN: $bits = QRinput::estimateBitsModeAn($this->size);
    896. 

  896. 				break;
    897. 

  897. 			case QR_MODE_8: $bits = QRinput::estimateBitsMode8($this->size);
    898. 

  898. 				break;
    899. 

  899. 			case QR_MODE_KANJI: $bits = QRinput::estimateBitsModeKanji($this->size);
    900. 

  900. 				break;
    901. 

  901. 			case QR_MODE_STRUCTURE: return STRUCTURE_HEADER_BITS;
    902. 

  902. 			default:
    903. 

  903. 				return 0;
    904. 

  904. 		}
    905. 

  905. 

  906. 		$l = QRspec::lengthIndicator($this->mode, $version);
    907. 

  907. 		$m = 1 << $l;
    908. 

  908. 		$num = (int) (($this->size + $m - 1) / $m);
    909. 

  909. 

  910. 		$bits += $num * (4 + $l);
    911. 

  911. 

  912. 		return $bits;
    913. 

  913. 	}
    914. 

  914. 

  915. 	public function encodeBitStream($version) {
    916. 

  916. 		try {
    917. 

  917. 

  918. 			unset($this->bstream);
    919. 

  919. 			$words = QRspec::maximumWords($this->mode, $version);
    920. 

  920. 

  921. 			if ($this->size > $words) {
    922. 

  922. 

  923. 				$st1 = new QRinputItem($this->mode, $words, $this->data);
    924. 

  924. 				$st2 = new QRinputItem($this->mode, $this->size - $words, array_slice($this->data, $words));
    925. 

  925. 

  926. 				$st1->encodeBitStream($version);
    927. 

  927. 				$st2->encodeBitStream($version);
    928. 

  928. 

  929. 				$this->bstream = new QRbitstream();
    930. 

  930. 				$this->bstream->append($st1->bstream);
    931. 

  931. 				$this->bstream->append($st2->bstream);
    932. 

  932. 

  933. 				unset($st1);
    934. 

  934. 				unset($st2);
    935. 

  935. 			} else {
    936. 

  936. 

  937. 				$ret = 0;
    938. 

  938. 

  939. 				switch ($this->mode) {
    940. 

  940. 					case QR_MODE_NUM: $ret = $this->encodeModeNum($version);
    941. 

  941. 						break;
    942. 

  942. 					case QR_MODE_AN: $ret = $this->encodeModeAn($version);
    943. 

  943. 						break;
    944. 

  944. 					case QR_MODE_8: $ret = $this->encodeMode8($version);
    945. 

  945. 						break;
    946. 

  946. 					case QR_MODE_KANJI: $ret = $this->encodeModeKanji($version);
    947. 

  947. 						break;
    948. 

  948. 					case QR_MODE_STRUCTURE: $ret = $this->encodeModeStructure();
    949. 

  949. 						break;
    950. 

  950. 

  951. 					default:
    952. 

  952. 						break;
    953. 

  953. 				}
    954. 

  954. 

  955. 				if ($ret < 0)
    956. 

  956. 					return -1;
    957. 

  957. 			}
    958. 

  958. 

  959. 			return $this->bstream->size();
    960. 

  960. 		} catch (Exception $e) {
    961. 

  961. 			return -1;
    962. 

  962. 		}
    963. 

  963. 	}
    964. 

  964. 

  965. }
    966. 

  966. 

  967. ;
    968. 

  968. 

  969. class QRinput {
    970. 

  970. 

  971. 	public $items;
    972. 

  972. 	private $version;
    973. 

  973. 	private $level;
    974. 

  974. 

  975. 	public function __construct($version = 0, $level = QR_ECLEVEL_L) {
    976. 

  976. 		if ($version < 0 || $version > QRSPEC_VERSION_MAX || $level > QR_ECLEVEL_H) {
    977. 

  977. 			throw new Exception('Invalid version no');
    978. 

  978. 			return NULL;
    979. 

  979. 		}
    980. 

  980. 

  981. 		$this->version = $version;
    982. 

  982. 		$this->level = $level;
    983. 

  983. 	}
    984. 

  984. 

  985. 	public function getVersion() {
    986. 

  986. 		return $this->version;
    987. 

  987. 	}
    988. 

  988. 

  989. 	public function setVersion($version) {
    990. 

  990. 		if ($version < 0 || $version > QRSPEC_VERSION_MAX) {
    991. 

  991. 			throw new Exception('Invalid version no');
    992. 

  992. 			return -1;
    993. 

  993. 		}
    994. 

  994. 

  995. 		$this->version = $version;
    996. 

  996. 

  997. 		return 0;
    998. 

  998. 	}
    999. 

  999. 

  1000. 	public function getErrorCorrectionLevel() {
    1001. 

  1001. 		return $this->level;
    1002. 

  1002. 	}
    1003. 

  1003. 

  1004. 	public function setErrorCorrectionLevel($level) {
    1005. 

  1005. 		if ($level > QR_ECLEVEL_H) {
    1006. 

  1006. 			throw new Exception('Invalid ECLEVEL');
    1007. 

  1007. 			return -1;
    1008. 

  1008. 		}
    1009. 

  1009. 

  1010. 		$this->level = $level;
    1011. 

  1011. 

  1012. 		return 0;
    1013. 

  1013. 	}
    1014. 

  1014. 

  1015. 	public function appendEntry(QRinputItem $entry) {
    1016. 

  1016. 		$this->items[] = $entry;
    1017. 

  1017. 	}
    1018. 

  1018. 

  1019. 	public function append($mode, $size, $data) {
    1020. 

  1020. 		try {
    1021. 

  1021. 			$entry = new QRinputItem($mode, $size, $data);
    1022. 

  1022. 			$this->items[] = $entry;
    1023. 

  1023. 			return 0;
    1024. 

  1024. 		} catch (Exception $e) {
    1025. 

  1025. 			return -1;
    1026. 

  1026. 		}
    1027. 

  1027. 	}
    1028. 

  1028. 

  1029. 	public function insertStructuredAppendHeader($size, $index, $parity) {
    1030. 

  1030. 		if ($size > MAX_STRUCTURED_SYMBOLS) {
    1031. 

  1031. 			throw new Exception('insertStructuredAppendHeader wrong size');
    1032. 

  1032. 		}
    1033. 

  1033. 

  1034. 		if ($index <= 0 || $index > MAX_STRUCTURED_SYMBOLS) {
    1035. 

  1035. 			throw new Exception('insertStructuredAppendHeader wrong index');
    1036. 

  1036. 		}
    1037. 

  1037. 

  1038. 		$buf = array($size, $index, $parity);
    1039. 

  1039. 

  1040. 		try {
    1041. 

  1041. 			$entry = new QRinputItem(QR_MODE_STRUCTURE, 3, buf);
    1042. 

  1042. 			array_unshift($this->items, $entry);
    1043. 

  1043. 			return 0;
    1044. 

  1044. 		} catch (Exception $e) {
    1045. 

  1045. 			return -1;
    1046. 

  1046. 		}
    1047. 

  1047. 	}
    1048. 

  1048. 

  1049. 	public function calcParity() {
    1050. 

  1050. 		$parity = 0;
    1051. 

  1051. 

  1052. 		foreach ($this->items as $item) {
    1053. 

  1053. 			if ($item->mode != QR_MODE_STRUCTURE) {
    1054. 

  1054. 				for ($i = $item->size - 1; $i >= 0; $i--) {
    1055. 

  1055. 					$parity ^= $item->data[$i];
    1056. 

  1056. 				}
    1057. 

  1057. 			}
    1058. 

  1058. 		}
    1059. 

  1059. 

  1060. 		return $parity;
    1061. 

  1061. 	}
    1062. 

  1062. 

  1063. 	public static function checkModeNum($size, $data) {
    1064. 

  1064. 		for ($i = 0; $i < $size; $i++) {
    1065. 

  1065. 			if ((ord($data[$i]) < ord('0')) || (ord($data[$i]) > ord('9'))) {
    1066. 

  1066. 				return false;
    1067. 

  1067. 			}
    1068. 

  1068. 		}
    1069. 

  1069. 

  1070. 		return true;
    1071. 

  1071. 	}
    1072. 

  1072. 

  1073. 	public static function estimateBitsModeNum($size) {
    1074. 

  1074. 		$w = (int) $size / 3;
    1075. 

  1075. 		$bits = $w * 10;
    1076. 

  1076. 

  1077. 		switch ($size - $w * 3) {
    1078. 

  1078. 			case 1:
    1079. 

  1079. 				$bits += 4;
    1080. 

  1080. 				break;
    1081. 

  1081. 			case 2:
    1082. 

  1082. 				$bits += 7;
    1083. 

  1083. 				break;
    1084. 

  1084. 			default:
    1085. 

  1085. 				break;
    1086. 

  1086. 		}
    1087. 

  1087. 

  1088. 		return $bits;
    1089. 

  1089. 	}
    1090. 

  1090. 

  1091. 	public static $anTable = array(
    1092. 

  1092. 	    -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
    1093. 

  1093. 	    -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
    1094. 

  1094. 	    36, -1, -1, -1, 37, 38, -1, -1, -1, -1, 39, 40, -1, 41, 42, 43,
    1095. 

  1095. 	    0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 44, -1, -1, -1, -1, -1,
    1096. 

  1096. 	    -1, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24,
    1097. 

  1097. 	    25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, -1, -1, -1, -1, -1,
    1098. 

  1098. 	    -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
    1099. 

  1099. 	    -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1
    1100. 

  1100. 	);
    1101. 

  1101. 

  1102. 	public static function lookAnTable($c) {
    1103. 

  1103. 		return (($c > 127) ? -1 : self::$anTable[$c]);
    1104. 

  1104. 	}
    1105. 

  1105. 

  1106. 	public static function checkModeAn($size, $data) {
    1107. 

  1107. 		for ($i = 0; $i < $size; $i++) {
    1108. 

  1108. 			if (self::lookAnTable(ord($data[$i])) == -1) {
    1109. 

  1109. 				return false;
    1110. 

  1110. 			}
    1111. 

  1111. 		}
    1112. 

  1112. 

  1113. 		return true;
    1114. 

  1114. 	}
    1115. 

  1115. 

  1116. 	public static function estimateBitsModeAn($size) {
    1117. 

  1117. 		$w = (int) ($size / 2);
    1118. 

  1118. 		$bits = $w * 11;
    1119. 

  1119. 

  1120. 		if ($size & 1) {
    1121. 

  1121. 			$bits += 6;
    1122. 

  1122. 		}
    1123. 

  1123. 

  1124. 		return $bits;
    1125. 

  1125. 	}
    1126. 

  1126. 

  1127. 	public static function estimateBitsMode8($size) {
    1128. 

  1128. 		return $size * 8;
    1129. 

  1129. 	}
    1130. 

  1130. 

  1131. 	public function estimateBitsModeKanji($size) {
    1132. 

  1132. 		return (int) (($size / 2) * 13);
    1133. 

  1133. 	}
    1134. 

  1134. 

  1135. 	public static function checkModeKanji($size, $data) {
    1136. 

  1136. 		if ($size & 1)
    1137. 

  1137. 			return false;
    1138. 

  1138. 

  1139. 		for ($i = 0; $i < $size; $i+=2) {
    1140. 

  1140. 			$val = (ord($data[$i]) << 8) | ord($data[$i + 1]);
    1141. 

  1141. 			if ($val < 0x8140
    1142. 

  1142. 				|| ($val > 0x9ffc && $val < 0xe040)
    1143. 

  1143. 				|| $val > 0xebbf) {
    1144. 

  1144. 				return false;
    1145. 

  1145. 			}
    1146. 

  1146. 		}
    1147. 

  1147. 

  1148. 		return true;
    1149. 

  1149. 	}
    1150. 

  1150. 

  1151. 	public static function check($mode, $size, $data) {
    1152. 

  1152. 		if ($size <= 0)
    1153. 

  1153. 			return false;
    1154. 

  1154. 

  1155. 		switch ($mode) {
    1156. 

  1156. 			case QR_MODE_NUM: return self::checkModeNum($size, $data);
    1157. 

  1157. 				break;
    1158. 

  1158. 			case QR_MODE_AN: return self::checkModeAn($size, $data);
    1159. 

  1159. 				break;
    1160. 

  1160. 			case QR_MODE_KANJI: return self::checkModeKanji($size, $data);
    1161. 

  1161. 				break;
    1162. 

  1162. 			case QR_MODE_8: return true;
    1163. 

  1163. 				break;
    1164. 

  1164. 			case QR_MODE_STRUCTURE: return true;
    1165. 

  1165. 				break;
    1166. 

  1166. 

  1167. 			default:
    1168. 

  1168. 				break;
    1169. 

  1169. 		}
    1170. 

  1170. 

  1171. 		return false;
    1172. 

  1172. 	}
    1173. 

  1173. 

  1174. 	public function estimateBitStreamSize($version) {
    1175. 

  1175. 		$bits = 0;
    1176. 

  1176. 

  1177. 		foreach ($this->items as $item) {
    1178. 

  1178. 			$bits += $item->estimateBitStreamSizeOfEntry($version);
    1179. 

  1179. 		}
    1180. 

  1180. 

  1181. 		return $bits;
    1182. 

  1182. 	}
    1183. 

  1183. 

  1184. 	public function estimateVersion() {
    1185. 

  1185. 		$version = 0;
    1186. 

  1186. 		$prev = 0;
    1187. 

  1187. 		do {
    1188. 

  1188. 			$prev = $version;
    1189. 

  1189. 			$bits = $this->estimateBitStreamSize($prev);
    1190. 

  1190. 			$version = QRspec::getMinimumVersion((int) (($bits + 7) / 8), $this->level);
    1191. 

  1191. 			if ($version < 0) {
    1192. 

  1192. 				return -1;
    1193. 

  1193. 			}
    1194. 

  1194. 		} while ($version > $prev);
    1195. 

  1195. 

  1196. 		return $version;
    1197. 

  1197. 	}
    1198. 

  1198. 

  1199. 	public static function lengthOfCode($mode, $version, $bits) {
    1200. 

  1200. 		$payload = $bits - 4 - QRspec::lengthIndicator($mode, $version);
    1201. 

  1201. 		switch ($mode) {
    1202. 

  1202. 			case QR_MODE_NUM:
    1203. 

  1203. 				$chunks = (int) ($payload / 10);
    1204. 

  1204. 				$remain = $payload - $chunks * 10;
    1205. 

  1205. 				$size = $chunks * 3;
    1206. 

  1206. 				if ($remain >= 7) {
    1207. 

  1207. 					$size += 2;
    1208. 

  1208. 				} else if ($remain >= 4) {
    1209. 

  1209. 					$size += 1;
    1210. 

  1210. 				}
    1211. 

  1211. 				break;
    1212. 

  1212. 			case QR_MODE_AN:
    1213. 

  1213. 				$chunks = (int) ($payload / 11);
    1214. 

  1214. 				$remain = $payload - $chunks * 11;
    1215. 

  1215. 				$size = $chunks * 2;
    1216. 

  1216. 				if ($remain >= 6)
    1217. 

  1217. 					$size++;
    1218. 

  1218. 				break;
    1219. 

  1219. 			case QR_MODE_8:
    1220. 

  1220. 				$size = (int) ($payload / 8);
    1221. 

  1221. 				break;
    1222. 

  1222. 			case QR_MODE_KANJI:
    1223. 

  1223. 				$size = (int) (($payload / 13) * 2);
    1224. 

  1224. 				break;
    1225. 

  1225. 			case QR_MODE_STRUCTURE:
    1226. 

  1226. 				$size = (int) ($payload / 8);
    1227. 

  1227. 				break;
    1228. 

  1228. 			default:
    1229. 

  1229. 				$size = 0;
    1230. 

  1230. 				break;
    1231. 

  1231. 		}
    1232. 

  1232. 

  1233. 		$maxsize = QRspec::maximumWords($mode, $version);
    1234. 

  1234. 		if ($size < 0)
    1235. 

  1235. 			$size = 0;
    1236. 

  1236. 		if ($size > $maxsize)
    1237. 

  1237. 			$size = $maxsize;
    1238. 

  1238. 

  1239. 		return $size;
    1240. 

  1240. 	}
    1241. 

  1241. 

  1242. 	public function createBitStream() {
    1243. 

  1243. 		$total = 0;
    1244. 

  1244. 

  1245. 		foreach ($this->items as $item) {
    1246. 

  1246. 			$bits = $item->encodeBitStream($this->version);
    1247. 

  1247. 

  1248. 			if ($bits < 0)
    1249. 

  1249. 				return -1;
    1250. 

  1250. 

  1251. 			$total += $bits;
    1252. 

  1252. 		}
    1253. 

  1253. 

  1254. 		return $total;
    1255. 

  1255. 	}
    1256. 

  1256. 

  1257. 	public function convertData() {
    1258. 

  1258. 		$ver = $this->estimateVersion();
    1259. 

  1259. 		if ($ver > $this->getVersion()) {
    1260. 

  1260. 			$this->setVersion($ver);
    1261. 

  1261. 		}
    1262. 

  1262. 

  1263. 		for (;;) {
    1264. 

  1264. 			$bits = $this->createBitStream();
    1265. 

  1265. 

  1266. 			if ($bits < 0)
    1267. 

  1267. 				return -1;
    1268. 

  1268. 

  1269. 			$ver = QRspec::getMinimumVersion((int) (($bits + 7) / 8), $this->level);
    1270. 

  1270. 			if ($ver < 0) {
    1271. 

  1271. 				throw new Exception('WRONG VERSION');
    1272. 

  1272. 				return -1;
    1273. 

  1273. 			} else if ($ver > $this->getVersion()) {
    1274. 

  1274. 				$this->setVersion($ver);
    1275. 

  1275. 			} else {
    1276. 

  1276. 				break;
    1277. 

  1277. 			}
    1278. 

  1278. 		}
    1279. 

  1279. 

  1280. 		return 0;
    1281. 

  1281. 	}
    1282. 

  1282. 

  1283. 	public function appendPaddingBit(&$bstream) {
    1284. 

  1284. 		$bits = $bstream->size();
    1285. 

  1285. 		$maxwords = QRspec::getDataLength($this->version, $this->level);
    1286. 

  1286. 		$maxbits = $maxwords * 8;
    1287. 

  1287. 

  1288. 		if ($maxbits == $bits) {
    1289. 

  1289. 			return 0;
    1290. 

  1290. 		}
    1291. 

  1291. 

  1292. 		if ($maxbits - $bits < 5) {
    1293. 

  1293. 			return $bstream->appendNum($maxbits - $bits, 0);
    1294. 

  1294. 		}
    1295. 

  1295. 

  1296. 		$bits += 4;
    1297. 

  1297. 		$words = (int) (($bits + 7) / 8);
    1298. 

  1298. 

  1299. 		$padding = new QRbitstream();
    1300. 

  1300. 		$ret = $padding->appendNum($words * 8 - $bits + 4, 0);
    1301. 

  1301. 

  1302. 		if ($ret < 0)
    1303. 

  1303. 			return $ret;
    1304. 

  1304. 

  1305. 		$padlen = $maxwords - $words;
    1306. 

  1306. 

  1307. 		if ($padlen > 0) {
    1308. 

  1308. 

  1309. 			$padbuf = array();
    1310. 

  1310. 			for ($i = 0; $i < $padlen; $i++) {
    1311. 

  1311. 				$padbuf[$i] = ($i & 1) ? 0x11 : 0xec;
    1312. 

  1312. 			}
    1313. 

  1313. 

  1314. 			$ret = $padding->appendBytes($padlen, $padbuf);
    1315. 

  1315. 

  1316. 			if ($ret < 0)
    1317. 

  1317. 				return $ret;
    1318. 

  1318. 		}
    1319. 

  1319. 

  1320. 		$ret = $bstream->append($padding);
    1321. 

  1321. 

  1322. 		return $ret;
    1323. 

  1323. 	}
    1324. 

  1324. 

  1325. 	public function mergeBitStream() {
    1326. 

  1326. 		if ($this->convertData() < 0) {
    1327. 

  1327. 			return null;
    1328. 

  1328. 		}
    1329. 

  1329. 

  1330. 		$bstream = new QRbitstream();
    1331. 

  1331. 

  1332. 		foreach ($this->items as $item) {
    1333. 

  1333. 			$ret = $bstream->append($item->bstream);
    1334. 

  1334. 			if ($ret < 0) {
    1335. 

  1335. 				return null;
    1336. 

  1336. 			}
    1337. 

  1337. 		}
    1338. 

  1338. 

  1339. 		return $bstream;
    1340. 

  1340. 	}
    1341. 

  1341. 

  1342. 	public function getBitStream() {
    1343. 

  1343. 

  1344. 		$bstream = $this->mergeBitStream();
    1345. 

  1345. 

  1346. 		if ($bstream == null) {
    1347. 

  1347. 			return null;
    1348. 

  1348. 		}
    1349. 

  1349. 

  1350. 		$ret = $this->appendPaddingBit($bstream);
    1351. 

  1351. 		if ($ret < 0) {
    1352. 

  1352. 			return null;
    1353. 

  1353. 		}
    1354. 

  1354. 

  1355. 		return $bstream;
    1356. 

  1356. 	}
    1357. 

  1357. 

  1358. 	public function getByteStream() {
    1359. 

  1359. 		$bstream = $this->getBitStream();
    1360. 

  1360. 		if ($bstream == null) {
    1361. 

  1361. 			return null;
    1362. 

  1362. 		}
    1363. 

  1363. 

  1364. 		return $bstream->toByte();
    1365. 

  1365. 	}
    1366. 

  1366. 

  1367. }
    1368. 

  1368. 

  1369. class QRbitstream {
    1370. 

  1370. 

  1371. 	public $data = array();
    1372. 

  1372. 

  1373. 	public function size() {
    1374. 

  1374. 		return count($this->data);
    1375. 

  1375. 	}
    1376. 

  1376. 

  1377. 	public function allocate($setLength) {
    1378. 

  1378. 		$this->data = array_fill(0, $setLength, 0);
    1379. 

  1379. 		return 0;
    1380. 

  1380. 	}
    1381. 

  1381. 

  1382. 	public static function newFromNum($bits, $num) {
    1383. 

  1383. 		$bstream = new QRbitstream();
    1384. 

  1384. 		$bstream->allocate($bits);
    1385. 

  1385. 

  1386. 		$mask = 1 << ($bits - 1);
    1387. 

  1387. 		for ($i = 0; $i < $bits; $i++) {
    1388. 

  1388. 			if ($num & $mask) {
    1389. 

  1389. 				$bstream->data[$i] = 1;
    1390. 

  1390. 			} else {
    1391. 

  1391. 				$bstream->data[$i] = 0;
    1392. 

  1392. 			}
    1393. 

  1393. 			$mask = $mask >> 1;
    1394. 

  1394. 		}
    1395. 

  1395. 

  1396. 		return $bstream;
    1397. 

  1397. 	}
    1398. 

  1398. 

  1399. 	public static function newFromBytes($size, $data) {
    1400. 

  1400. 		$bstream = new QRbitstream();
    1401. 

  1401. 		$bstream->allocate($size * 8);
    1402. 

  1402. 		$p = 0;
    1403. 

  1403. 

  1404. 		for ($i = 0; $i < $size; $i++) {
    1405. 

  1405. 			$mask = 0x80;
    1406. 

  1406. 			for ($j = 0; $j < 8; $j++) {
    1407. 

  1407. 				if ($data[$i] & $mask) {
    1408. 

  1408. 					$bstream->data[$p] = 1;
    1409. 

  1409. 				} else {
    1410. 

  1410. 					$bstream->data[$p] = 0;
    1411. 

  1411. 				}
    1412. 

  1412. 				$p++;
    1413. 

  1413. 				$mask = $mask >> 1;
    1414. 

  1414. 			}
    1415. 

  1415. 		}
    1416. 

  1416. 

  1417. 		return $bstream;
    1418. 

  1418. 	}
    1419. 

  1419. 

  1420. 	public function append(QRbitstream $arg) {
    1421. 

  1421. 		if (is_null($arg)) {
    1422. 

  1422. 			return -1;
    1423. 

  1423. 		}
    1424. 

  1424. 

  1425. 		if ($arg->size() == 0) {
    1426. 

  1426. 			return 0;
    1427. 

  1427. 		}
    1428. 

  1428. 

  1429. 		if ($this->size() == 0) {
    1430. 

  1430. 			$this->data = $arg->data;
    1431. 

  1431. 			return 0;
    1432. 

  1432. 		}
    1433. 

  1433. 

  1434. 		$this->data = array_values(array_merge($this->data, $arg->data));
    1435. 

  1435. 

  1436. 		return 0;
    1437. 

  1437. 	}
    1438. 

  1438. 

  1439. 	public function appendNum($bits, $num) {
    1440. 

  1440. 		if ($bits == 0)
    1441. 

  1441. 			return 0;
    1442. 

  1442. 

  1443. 		$b = QRbitstream::newFromNum($bits, $num);
    1444. 

  1444. 

  1445. 		if (is_null($b))
    1446. 

  1446. 			return -1;
    1447. 

  1447. 

  1448. 		$ret = $this->append($b);
    1449. 

  1449. 		unset($b);
    1450. 

  1450. 

  1451. 		return $ret;
    1452. 

  1452. 	}
    1453. 

  1453. 

  1454. 	public function appendBytes($size, $data) {
    1455. 

  1455. 		if ($size == 0)
    1456. 

  1456. 			return 0;
    1457. 

  1457. 

  1458. 		$b = QRbitstream::newFromBytes($size, $data);
    1459. 

  1459. 

  1460. 		if (is_null($b))
    1461. 

  1461. 			return -1;
    1462. 

  1462. 

  1463. 		$ret = $this->append($b);
    1464. 

  1464. 		unset($b);
    1465. 

  1465. 

  1466. 		return $ret;
    1467. 

  1467. 	}
    1468. 

  1468. 

  1469. 	public function toByte() {
    1470. 

  1470. 

  1471. 		$size = $this->size();
    1472. 

  1472. 

  1473. 		if ($size == 0) {
    1474. 

  1474. 			return array();
    1475. 

  1475. 		}
    1476. 

  1476. 

  1477. 		$data = array_fill(0, (int) (($size + 7) / 8), 0);
    1478. 

  1478. 		$bytes = (int) ($size / 8);
    1479. 

  1479. 

  1480. 		$p = 0;
    1481. 

  1481. 

  1482. 		for ($i = 0; $i < $bytes; $i++) {
    1483. 

  1483. 			$v = 0;
    1484. 

  1484. 			for ($j = 0; $j < 8; $j++) {
    1485. 

  1485. 				$v = $v << 1;
    1486. 

  1486. 				$v |= $this->data[$p];
    1487. 

  1487. 				$p++;
    1488. 

  1488. 			}
    1489. 

  1489. 			$data[$i] = $v;
    1490. 

  1490. 		}
    1491. 

  1491. 

  1492. 		if ($size & 7) {
    1493. 

  1493. 			$v = 0;
    1494. 

  1494. 			for ($j = 0; $j < ($size & 7); $j++) {
    1495. 

  1495. 				$v = $v << 1;
    1496. 

  1496. 				$v |= $this->data[$p];
    1497. 

  1497. 				$p++;
    1498. 

  1498. 			}
    1499. 

  1499. 			$data[$bytes] = $v;
    1500. 

  1500. 		}
    1501. 

  1501. 

  1502. 		return $data;
    1503. 

  1503. 	}
    1504. 

  1504. 

  1505. }
    1506. 

  1506. 

  1507. class QRsplit {
    1508. 

  1508. 

  1509. 	public $dataStr = '';
    1510. 

  1510. 	public $input;
    1511. 

  1511. 	public $modeHint;
    1512. 

  1512. 

  1513. 	public function __construct($dataStr, $input, $modeHint) {
    1514. 

  1514. 		$this->dataStr = $dataStr;
    1515. 

  1515. 		$this->input = $input;
    1516. 

  1516. 		$this->modeHint = $modeHint;
    1517. 

  1517. 	}
    1518. 

  1518. 

  1519. 	public static function isdigitat($str, $pos) {
    1520. 

  1520. 		if ($pos >= strlen($str))
    1521. 

  1521. 			return false;
    1522. 

  1522. 

  1523. 		return ((ord($str[$pos]) >= ord('0')) && (ord($str[$pos]) <= ord('9')));
    1524. 

  1524. 	}
    1525. 

  1525. 

  1526. 	public static function isalnumat($str, $pos) {
    1527. 

  1527. 		if ($pos >= strlen($str))
    1528. 

  1528. 			return false;
    1529. 

  1529. 

  1530. 		return (QRinput::lookAnTable(ord($str[$pos])) >= 0);
    1531. 

  1531. 	}
    1532. 

  1532. 

  1533. 	public function identifyMode($pos) {
    1534. 

  1534. 		if ($pos >= strlen($this->dataStr))
    1535. 

  1535. 			return QR_MODE_NUL;
    1536. 

  1536. 

  1537. 		$c = $this->dataStr[$pos];
    1538. 

  1538. 

  1539. 		if (self::isdigitat($this->dataStr, $pos)) {
    1540. 

  1540. 			return QR_MODE_NUM;
    1541. 

  1541. 		} else if (self::isalnumat($this->dataStr, $pos)) {
    1542. 

  1542. 			return QR_MODE_AN;
    1543. 

  1543. 		} else if ($this->modeHint == QR_MODE_KANJI) {
    1544. 

  1544. 

  1545. 			if ($pos + 1 < strlen($this->dataStr)) {
    1546. 

  1546. 				$d = $this->dataStr[$pos + 1];
    1547. 

  1547. 				$word = (ord($c) << 8) | ord($d);
    1548. 

  1548. 				if (($word >= 0x8140 && $word <= 0x9ffc) || ($word >= 0xe040 && $word <= 0xebbf)) {
    1549. 

  1549. 					return QR_MODE_KANJI;
    1550. 

  1550. 				}
    1551. 

  1551. 			}
    1552. 

  1552. 		}
    1553. 

  1553. 

  1554. 		return QR_MODE_8;
    1555. 

  1555. 	}
    1556. 

  1556. 

  1557. 	public function eatNum() {
    1558. 

  1558. 		$ln = QRspec::lengthIndicator(QR_MODE_NUM, $this->input->getVersion());
    1559. 

  1559. 

  1560. 		$p = 0;
    1561. 

  1561. 		while (self::isdigitat($this->dataStr, $p)) {
    1562. 

  1562. 			$p++;
    1563. 

  1563. 		}
    1564. 

  1564. 

  1565. 		$run = $p;
    1566. 

  1566. 		$mode = $this->identifyMode($p);
    1567. 

  1567. 

  1568. 		if ($mode == QR_MODE_8) {
    1569. 

  1569. 			$dif = QRinput::estimateBitsModeNum($run) + 4 + $ln
    1570. 

  1570. 				+ QRinput::estimateBitsMode8(1)
    1571. 

  1571. 				- QRinput::estimateBitsMode8($run + 1);
    1572. 

  1572. 			if ($dif > 0) {
    1573. 

  1573. 				return $this->eat8();
    1574. 

  1574. 			}
    1575. 

  1575. 		}
    1576. 

  1576. 		if ($mode == QR_MODE_AN) {
    1577. 

  1577. 			$dif = QRinput::estimateBitsModeNum($run) + 4 + $ln
    1578. 

  1578. 				+ QRinput::estimateBitsModeAn(1)
    1579. 

  1579. 				- QRinput::estimateBitsModeAn($run + 1);
    1580. 

  1580. 			if ($dif > 0) {
    1581. 

  1581. 				return $this->eatAn();
    1582. 

  1582. 			}
    1583. 

  1583. 		}
    1584. 

  1584. 

  1585. 		$ret = $this->input->append(QR_MODE_NUM, $run, str_split($this->dataStr));
    1586. 

  1586. 		if ($ret < 0)
    1587. 

  1587. 			return -1;
    1588. 

  1588. 

  1589. 		return $run;
    1590. 

  1590. 	}
    1591. 

  1591. 

  1592. 	public function eatAn() {
    1593. 

  1593. 		$la = QRspec::lengthIndicator(QR_MODE_AN, $this->input->getVersion());
    1594. 

  1594. 		$ln = QRspec::lengthIndicator(QR_MODE_NUM, $this->input->getVersion());
    1595. 

  1595. 

  1596. 		$p = 0;
    1597. 

  1597. 

  1598. 		while (self::isalnumat($this->dataStr, $p)) {
    1599. 

  1599. 			if (self::isdigitat($this->dataStr, $p)) {
    1600. 

  1600. 				$q = $p;
    1601. 

  1601. 				while (self::isdigitat($this->dataStr, $q)) {
    1602. 

  1602. 					$q++;
    1603. 

  1603. 				}
    1604. 

  1604. 

  1605. 				$dif = QRinput::estimateBitsModeAn($p)
    1606. 

  1606. 					+ QRinput::estimateBitsModeNum($q - $p) + 4 + $ln
    1607. 

  1607. 					- QRinput::estimateBitsModeAn($q);
    1608. 

  1608. 

  1609. 				if ($dif < 0) {
    1610. 

  1610. 					break;
    1611. 

  1611. 				} else {
    1612. 

  1612. 					$p = $q;
    1613. 

  1613. 				}
    1614. 

  1614. 			} else {
    1615. 

  1615. 				$p++;
    1616. 

  1616. 			}
    1617. 

  1617. 		}
    1618. 

  1618. 

  1619. 		$run = $p;
    1620. 

  1620. 

  1621. 		if (!self::isalnumat($this->dataStr, $p)) {
    1622. 

  1622. 			$dif = QRinput::estimateBitsModeAn($run) + 4 + $la
    1623. 

  1623. 				+ QRinput::estimateBitsMode8(1)
    1624. 

  1624. 				- QRinput::estimateBitsMode8($run + 1);
    1625. 

  1625. 			if ($dif > 0) {
    1626. 

  1626. 				return $this->eat8();
    1627. 

  1627. 			}
    1628. 

  1628. 		}
    1629. 

  1629. 

  1630. 		$ret = $this->input->append(QR_MODE_AN, $run, str_split($this->dataStr));
    1631. 

  1631. 		if ($ret < 0)
    1632. 

  1632. 			return -1;
    1633. 

  1633. 

  1634. 		return $run;
    1635. 

  1635. 	}
    1636. 

  1636. 

  1637. 	public function eatKanji() {
    1638. 

  1638. 		$p = 0;
    1639. 

  1639. 

  1640. 		while ($this->identifyMode($p) == QR_MODE_KANJI) {
    1641. 

  1641. 			$p += 2;
    1642. 

  1642. 		}
    1643. 

  1643. 

  1644. 		$ret = $this->input->append(QR_MODE_KANJI, $p, str_split($this->dataStr));
    1645. 

  1645. 		if ($ret < 0)
    1646. 

  1646. 			return -1;
    1647. 

  1647. 

  1648. 		return $run;
    1649. 

  1649. 	}
    1650. 

  1650. 

  1651. 	public function eat8() {
    1652. 

  1652. 		$la = QRspec::lengthIndicator(QR_MODE_AN, $this->input->getVersion());
    1653. 

  1653. 		$ln = QRspec::lengthIndicator(QR_MODE_NUM, $this->input->getVersion());
    1654. 

  1654. 

  1655. 		$p = 1;
    1656. 

  1656. 		$dataStrLen = strlen($this->dataStr);
    1657. 

  1657. 

  1658. 		while ($p < $dataStrLen) {
    1659. 

  1659. 

  1660. 			$mode = $this->identifyMode($p);
    1661. 

  1661. 			if ($mode == QR_MODE_KANJI) {
    1662. 

  1662. 				break;
    1663. 

  1663. 			}
    1664. 

  1664. 			if ($mode == QR_MODE_NUM) {
    1665. 

  1665. 				$q = $p;
    1666. 

  1666. 				while (self::isdigitat($this->dataStr, $q)) {
    1667. 

  1667. 					$q++;
    1668. 

  1668. 				}
    1669. 

  1669. 				$dif = QRinput::estimateBitsMode8($p)
    1670. 

  1670. 					+ QRinput::estimateBitsModeNum($q - $p) + 4 + $ln
    1671. 

  1671. 					- QRinput::estimateBitsMode8($q);
    1672. 

  1672. 				if ($dif < 0) {
    1673. 

  1673. 					break;
    1674. 

  1674. 				} else {
    1675. 

  1675. 					$p = $q;
    1676. 

  1676. 				}
    1677. 

  1677. 			} else if ($mode == QR_MODE_AN) {
    1678. 

  1678. 				$q = $p;
    1679. 

  1679. 				while (self::isalnumat($this->dataStr, $q)) {
    1680. 

  1680. 					$q++;
    1681. 

  1681. 				}
    1682. 

  1682. 				$dif = QRinput::estimateBitsMode8($p)
    1683. 

  1683. 					+ QRinput::estimateBitsModeAn($q - $p) + 4 + $la
    1684. 

  1684. 					- QRinput::estimateBitsMode8($q);
    1685. 

  1685. 				if ($dif < 0) {
    1686. 

  1686. 					break;
    1687. 

  1687. 				} else {
    1688. 

  1688. 					$p = $q;
    1689. 

  1689. 				}
    1690. 

  1690. 			} else {
    1691. 

  1691. 				$p++;
    1692. 

  1692. 			}
    1693. 

  1693. 		}
    1694. 

  1694. 

  1695. 		$run = $p;
    1696. 

  1696. 		$ret = $this->input->append(QR_MODE_8, $run, str_split($this->dataStr));
    1697. 

  1697. 

  1698. 		if ($ret < 0)
    1699. 

  1699. 			return -1;
    1700. 

  1700. 

  1701. 		return $run;
    1702. 

  1702. 	}
    1703. 

  1703. 

  1704. 	public function splitString() {
    1705. 

  1705. 		while (strlen($this->dataStr) > 0) {
    1706. 

  1706. 			if ($this->dataStr == '')
    1707. 

  1707. 				return 0;
    1708. 

  1708. 

  1709. 			$mode = $this->identifyMode(0);
    1710. 

  1710. 

  1711. 			switch ($mode) {
    1712. 

  1712. 				case QR_MODE_NUM: $length = $this->eatNum();
    1713. 

  1713. 					break;
    1714. 

  1714. 				case QR_MODE_AN: $length = $this->eatAn();
    1715. 

  1715. 					break;
    1716. 

  1716. 				case QR_MODE_KANJI:
    1717. 

  1717. 					if ($hint == QR_MODE_KANJI)
    1718. 

  1718. 						$length = $this->eatKanji();
    1719. 

  1719. 					else
    1720. 

  1720. 						$length = $this->eat8();
    1721. 

  1721. 					break;
    1722. 

  1722. 				default: $length = $this->eat8();
    1723. 

  1723. 					break;
    1724. 

  1724. 			}
    1725. 

  1725. 

  1726. 			if ($length == 0)
    1727. 

  1727. 				return 0;
    1728. 

  1728. 			if ($length < 0)
    1729. 

  1729. 				return -1;
    1730. 

  1730. 

  1731. 			$this->dataStr = substr($this->dataStr, $length);
    1732. 

  1732. 		}
    1733. 

  1733. 	}
    1734. 

  1734. 

  1735. 	public function toUpper() {
    1736. 

  1736. 		$stringLen = strlen($this->dataStr);
    1737. 

  1737. 		$p = 0;
    1738. 

  1738. 

  1739. 		while ($p < $stringLen) {
    1740. 

  1740. 			$mode = self::identifyMode(substr($this->dataStr, $p), $this->modeHint);
    1741. 

  1741. 			if ($mode == QR_MODE_KANJI) {
    1742. 

  1742. 				$p += 2;
    1743. 

  1743. 			} else {
    1744. 

  1744. 				if (ord($this->dataStr[$p]) >= ord('a') && ord($this->dataStr[$p]) <= ord('z')) {
    1745. 

  1745. 					$this->dataStr[$p] = chr(ord($this->dataStr[$p]) - 32);
    1746. 

  1746. 				}
    1747. 

  1747. 				$p++;
    1748. 

  1748. 			}
    1749. 

  1749. 		}
    1750. 

  1750. 

  1751. 		return $this->dataStr;
    1752. 

  1752. 	}
    1753. 

  1753. 

  1754. 	public static function splitStringToQRinput($string, QRinput $input, $modeHint, $casesensitive = true) {
    1755. 

  1755. 		if (is_null($string) || $string == '\0' || $string == '') {
    1756. 

  1756. 			throw new Exception('empty string!!!');
    1757. 

  1757. 		}
    1758. 

  1758. 

  1759. 		$split = new QRsplit($string, $input, $modeHint);
    1760. 

  1760. 

  1761. 		if (!$casesensitive)
    1762. 

  1762. 			$split->toUpper();
    1763. 

  1763. 

  1764. 		return $split->splitString();
    1765. 

  1765. 	}
    1766. 

  1766. 

  1767. }
    1768. 

  1768. 

  1769. class QRrsItem {
    1770. 

  1770. 

  1771. 	public $mm;
    1772. 

  1772. 	public $nn;
    1773. 

  1773. 	public $alpha_to = array();
    1774. 

  1774. 	public $index_of = array();
    1775. 

  1775. 	public $genpoly = array();
    1776. 

  1776. 	public $nroots;
    1777. 

  1777. 	public $fcr;
    1778. 

  1778. 	public $prim;
    1779. 

  1779. 	public $iprim;
    1780. 

  1780. 	public $pad;
    1781. 

  1781. 	public $gfpoly;
    1782. 

  1782. 

  1783. 	public function modnn($x) {
    1784. 

  1784. 		while ($x >= $this->nn) {
    1785. 

  1785. 			$x -= $this->nn;
    1786. 

  1786. 			$x = ($x >> $this->mm) + ($x & $this->nn);
    1787. 

  1787. 		}
    1788. 

  1788. 

  1789. 		return $x;
    1790. 

  1790. 	}
    1791. 

  1791. 

  1792. 	public static function init_rs_char($symsize, $gfpoly, $fcr, $prim, $nroots, $pad) {
    1793. 

  1793. 

  1794. 		$rs = null;
    1795. 

  1795. 

  1796. 		if ($symsize < 0 || $symsize > 8)
    1797. 

  1797. 			return $rs;
    1798. 

  1798. 		if ($fcr < 0 || $fcr >= (1 << $symsize))
    1799. 

  1799. 			return $rs;
    1800. 

  1800. 		if ($prim <= 0 || $prim >= (1 << $symsize))
    1801. 

  1801. 			return $rs;
    1802. 

  1802. 		if ($nroots < 0 || $nroots >= (1 << $symsize))
    1803. 

  1803. 			return $rs;
    1804. 

  1804. 		if ($pad < 0 || $pad >= ((1 << $symsize) - 1 - $nroots))
    1805. 

  1805. 			return $rs;
    1806. 

  1806. 

  1807. 		$rs = new QRrsItem();
    1808. 

  1808. 		$rs->mm = $symsize;
    1809. 

  1809. 		$rs->nn = (1 << $symsize) - 1;
    1810. 

  1810. 		$rs->pad = $pad;
    1811. 

  1811. 

  1812. 		$rs->alpha_to = array_fill(0, $rs->nn + 1, 0);
    1813. 

  1813. 		$rs->index_of = array_fill(0, $rs->nn + 1, 0);
    1814. 

  1814. 

  1815. 		$NN = & $rs->nn;
    1816. 

  1816. 		$A0 = & $NN;
    1817. 

  1817. 

  1818. 		$rs->index_of[0] = $A0;
    1819. 

  1819. 		$rs->alpha_to[$A0] = 0;
    1820. 

  1820. 		$sr = 1;
    1821. 

  1821. 

  1822. 		for ($i = 0; $i < $rs->nn; $i++) {
    1823. 

  1823. 			$rs->index_of[$sr] = $i;
    1824. 

  1824. 			$rs->alpha_to[$i] = $sr;
    1825. 

  1825. 			$sr <<= 1;
    1826. 

  1826. 			if ($sr & (1 << $symsize)) {
    1827. 

  1827. 				$sr ^= $gfpoly;
    1828. 

  1828. 			}
    1829. 

  1829. 			$sr &= $rs->nn;
    1830. 

  1830. 		}
    1831. 

  1831. 

  1832. 		if ($sr != 1) {
    1833. 

  1833. 			$rs = NULL;
    1834. 

  1834. 			return $rs;
    1835. 

  1835. 		}
    1836. 

  1836. 

  1837. 		$rs->genpoly = array_fill(0, $nroots + 1, 0);
    1838. 

  1838. 

  1839. 		$rs->fcr = $fcr;
    1840. 

  1840. 		$rs->prim = $prim;
    1841. 

  1841. 		$rs->nroots = $nroots;
    1842. 

  1842. 		$rs->gfpoly = $gfpoly;
    1843. 

  1843. 

  1844. 		for ($iprim = 1; ($iprim % $prim) != 0; $iprim += $rs->nn)
    1845. 

  1845. 			;
    1846. 

  1846. 

  1847. 		$rs->iprim = (int) ($iprim / $prim);
    1848. 

  1848. 		$rs->genpoly[0] = 1;
    1849. 

  1849. 

  1850. 		for ($i = 0, $root = $fcr * $prim; $i < $nroots; $i++, $root += $prim) {
    1851. 

  1851. 			$rs->genpoly[$i + 1] = 1;
    1852. 

  1852. 

  1853. 			for ($j = $i; $j > 0; $j--) {
    1854. 

  1854. 				if ($rs->genpoly[$j] != 0) {
    1855. 

  1855. 					$rs->genpoly[$j] = $rs->genpoly[$j - 1] ^ $rs->alpha_to[$rs->modnn($rs->index_of[$rs->genpoly[$j]] + $root)];
    1856. 

  1856. 				} else {
    1857. 

  1857. 					$rs->genpoly[$j] = $rs->genpoly[$j - 1];
    1858. 

  1858. 				}
    1859. 

  1859. 			}
    1860. 

  1860. 			$rs->genpoly[0] = $rs->alpha_to[$rs->modnn($rs->index_of[$rs->genpoly[0]] + $root)];
    1861. 

  1861. 		}
    1862. 

  1862. 

  1863. 		for ($i = 0; $i <= $nroots; $i++)
    1864. 

  1864. 			$rs->genpoly[$i] = $rs->index_of[$rs->genpoly[$i]];
    1865. 

  1865. 

  1866. 		return $rs;
    1867. 

  1867. 	}
    1868. 

  1868. 

  1869. 	public function encode_rs_char($data, &$parity) {
    1870. 

  1870. 		$MM = & $this->mm;
    1871. 

  1871. 		$NN = & $this->nn;
    1872. 

  1872. 		$ALPHA_TO = & $this->alpha_to;
    1873. 

  1873. 		$INDEX_OF = & $this->index_of;
    1874. 

  1874. 		$GENPOLY = & $this->genpoly;
    1875. 

  1875. 		$NROOTS = & $this->nroots;
    1876. 

  1876. 		$FCR = & $this->fcr;
    1877. 

  1877. 		$PRIM = & $this->prim;
    1878. 

  1878. 		$IPRIM = & $this->iprim;
    1879. 

  1879. 		$PAD = & $this->pad;
    1880. 

  1880. 		$A0 = & $NN;
    1881. 

  1881. 

  1882. 		$parity = array_fill(0, $NROOTS, 0);
    1883. 

  1883. 

  1884. 		for ($i = 0; $i < ($NN - $NROOTS - $PAD); $i++) {
    1885. 

  1885. 

  1886. 			$feedback = $INDEX_OF[$data[$i] ^ $parity[0]];
    1887. 

  1887. 			if ($feedback != $A0) {
    1888. 

  1888. 

  1889. 				$feedback = $this->modnn($NN - $GENPOLY[$NROOTS] + $feedback);
    1890. 

  1890. 

  1891. 				for ($j = 1; $j < $NROOTS; $j++) {
    1892. 

  1892. 					$parity[$j] ^= $ALPHA_TO[$this->modnn($feedback + $GENPOLY[$NROOTS - $j])];
    1893. 

  1893. 				}
    1894. 

  1894. 			}
    1895. 

  1895. 

  1896. 			array_shift($parity);
    1897. 

  1897. 			if ($feedback != $A0) {
    1898. 

  1898. 				array_push($parity, $ALPHA_TO[$this->modnn($feedback + $GENPOLY[0])]);
    1899. 

  1899. 			} else {
    1900. 

  1900. 				array_push($parity, 0);
    1901. 

  1901. 			}
    1902. 

  1902. 		}
    1903. 

  1903. 	}
    1904. 

  1904. 

  1905. }
    1906. 

  1906. 

  1907. class QRrs {
    1908. 

  1908. 

  1909. 	public static $items = array();
    1910. 

  1910. 

  1911. 	public static function init_rs($symsize, $gfpoly, $fcr, $prim, $nroots, $pad) {
    1912. 

  1912. 		foreach (self::$items as $rs) {
    1913. 

  1913. 			if ($rs->pad != $pad)
    1914. 

  1914. 				continue;
    1915. 

  1915. 			if ($rs->nroots != $nroots)
    1916. 

  1916. 				continue;
    1917. 

  1917. 			if ($rs->mm != $symsize)
    1918. 

  1918. 				continue;
    1919. 

  1919. 			if ($rs->gfpoly != $gfpoly)
    1920. 

  1920. 				continue;
    1921. 

  1921. 			if ($rs->fcr != $fcr)
    1922. 

  1922. 				continue;
    1923. 

  1923. 			if ($rs->prim != $prim)
    1924. 

  1924. 				continue;
    1925. 

  1925. 

  1926. 			return $rs;
    1927. 

  1927. 		}
    1928. 

  1928. 

  1929. 		$rs = QRrsItem::init_rs_char($symsize, $gfpoly, $fcr, $prim, $nroots, $pad);
    1930. 

  1930. 		array_unshift(self::$items, $rs);
    1931. 

  1931. 

  1932. 		return $rs;
    1933. 

  1933. 	}
    1934. 

  1934. 

  1935. }
    1936. 

  1936. 

  1937. define('N1', 3);
    1938. 

  1938. define('N2', 3);
    1939. 

  1939. define('N3', 40);
    1940. 

  1940. define('N4', 10);
    1941. 

  1941. 

  1942. class QRmask {
    1943. 

  1943. 

  1944. 	public $runLength = array();
    1945. 

  1945. 

  1946. 	public function __construct() {
    1947. 

  1947. 		$this->runLength = array_fill(0, QRSPEC_WIDTH_MAX + 1, 0);
    1948. 

  1948. 	}
    1949. 

  1949. 

  1950. 	public function writeFormatInformation($width, &$frame, $mask, $level) {
    1951. 

  1951. 		$blacks = 0;
    1952. 

  1952. 		$format = QRspec::getFormatInfo($mask, $level);
    1953. 

  1953. 

  1954. 		for ($i = 0; $i < 8; $i++) {
    1955. 

  1955. 			if ($format & 1) {
    1956. 

  1956. 				$blacks += 2;
    1957. 

  1957. 				$v = 0x85;
    1958. 

  1958. 			} else {
    1959. 

  1959. 				$v = 0x84;
    1960. 

  1960. 			}
    1961. 

  1961. 

  1962. 			$frame[8][$width - 1 - $i] = chr($v);
    1963. 

  1963. 			if ($i < 6) {
    1964. 

  1964. 				$frame[$i][8] = chr($v);
    1965. 

  1965. 			} else {
    1966. 

  1966. 				$frame[$i + 1][8] = chr($v);
    1967. 

  1967. 			}
    1968. 

  1968. 			$format = $format >> 1;
    1969. 

  1969. 		}
    1970. 

  1970. 

  1971. 		for ($i = 0; $i < 7; $i++) {
    1972. 

  1972. 			if ($format & 1) {
    1973. 

  1973. 				$blacks += 2;
    1974. 

  1974. 				$v = 0x85;
    1975. 

  1975. 			} else {
    1976. 

  1976. 				$v = 0x84;
    1977. 

  1977. 			}
    1978. 

  1978. 

  1979. 			$frame[$width - 7 + $i][8] = chr($v);
    1980. 

  1980. 			if ($i == 0) {
    1981. 

  1981. 				$frame[8][7] = chr($v);
    1982. 

  1982. 			} else {
    1983. 

  1983. 				$frame[8][6 - $i] = chr($v);
    1984. 

  1984. 			}
    1985. 

  1985. 

  1986. 			$format = $format >> 1;
    1987. 

  1987. 		}
    1988. 

  1988. 

  1989. 		return $blacks;
    1990. 

  1990. 	}
    1991. 

  1991. 

  1992. 	public function mask0($x, $y) {
    1993. 

  1993. 		return ($x + $y) & 1;
    1994. 

  1994. 	}
    1995. 

  1995. 

  1996. 	public function mask1($x, $y) {
    1997. 

  1997. 		return ($y & 1);
    1998. 

  1998. 	}
    1999. 

  1999. 

  2000. 	public function mask2($x, $y) {
    2001. 

  2001. 		return ($x % 3);
    2002. 

  2002. 	}
    2003. 

  2003. 

  2004. 	public function mask3($x, $y) {
    2005. 

  2005. 		return ($x + $y) % 3;
    2006. 

  2006. 	}
    2007. 

  2007. 

  2008. 	public function mask4($x, $y) {
    2009. 

  2009. 		return (((int) ($y / 2)) + ((int) ($x / 3))) & 1;
    2010. 

  2010. 	}
    2011. 

  2011. 

  2012. 	public function mask5($x, $y) {
    2013. 

  2013. 		return (($x * $y) & 1) + ($x * $y) % 3;
    2014. 

  2014. 	}
    2015. 

  2015. 

  2016. 	public function mask6($x, $y) {
    2017. 

  2017. 		return ((($x * $y) & 1) + ($x * $y) % 3) & 1;
    2018. 

  2018. 	}
    2019. 

  2019. 

  2020. 	public function mask7($x, $y) {
    2021. 

  2021. 		return ((($x * $y) % 3) + (($x + $y) & 1)) & 1;
    2022. 

  2022. 	}
    2023. 

  2023. 

  2024. 	private function generateMaskNo($maskNo, $width, $frame) {
    2025. 

  2025. 		$bitMask = array_fill(0, $width, array_fill(0, $width, 0));
    2026. 

  2026. 

  2027. 		for ($y = 0; $y < $width; $y++) {
    2028. 

  2028. 			for ($x = 0; $x < $width; $x++) {
    2029. 

  2029. 				if (ord($frame[$y][$x]) & 0x80) {
    2030. 

  2030. 					$bitMask[$y][$x] = 0;
    2031. 

  2031. 				} else {
    2032. 

  2032. 					$maskFunc = call_user_func(array($this, 'mask' . $maskNo), $x, $y);
    2033. 

  2033. 					$bitMask[$y][$x] = ($maskFunc == 0) ? 1 : 0;
    2034. 

  2034. 				}
    2035. 

  2035. 			}
    2036. 

  2036. 		}
    2037. 

  2037. 

  2038. 		return $bitMask;
    2039. 

  2039. 	}
    2040. 

  2040. 

  2041. 	public static function serial($bitFrame) {
    2042. 

  2042. 		$codeArr = array();
    2043. 

  2043. 

  2044. 		foreach ($bitFrame as $line)
    2045. 

  2045. 			$codeArr[] = join('', $line);
    2046. 

  2046. 

  2047. 		return gzcompress(join("\n", $codeArr), 9);
    2048. 

  2048. 	}
    2049. 

  2049. 

  2050. 	public static function unserial($code) {
    2051. 

  2051. 		$codeArr = array();
    2052. 

  2052. 

  2053. 		$codeLines = explode("\n", gzuncompress($code));
    2054. 

  2054. 		foreach ($codeLines as $line)
    2055. 

  2055. 			$codeArr[] = str_split($line);
    2056. 

  2056. 

  2057. 		return $codeArr;
    2058. 

  2058. 	}
    2059. 

  2059. 

  2060. 	public function makeMaskNo($maskNo, $width, $s, &$d, $maskGenOnly = false) {
    2061. 

  2061. 		$b = 0;
    2062. 

  2062. 		$bitMask = array();
    2063. 

  2063. 

  2064. 		$fileName = QR_CACHE_DIR . 'mask_' . $maskNo . DIRECTORY_SEPARATOR . 'mask_' . $width . '_' . $maskNo . '.dat';
    2065. 

  2065. 

  2066. 		if (QR_CACHEABLE) {
    2067. 

  2067. 			if (file_exists($fileName)) {
    2068. 

  2068. 				$bitMask = self::unserial(file_get_contents($fileName));
    2069. 

  2069. 			} else {
    2070. 

  2070. 				$bitMask = $this->generateMaskNo($maskNo, $width, $s, $d);
    2071. 

  2071. 				if (!file_exists(QR_CACHE_DIR . 'mask_' . $maskNo))
    2072. 

  2072. 					mkdir(QR_CACHE_DIR . 'mask_' . $maskNo);
    2073. 

  2073. 				file_put_contents($fileName, self::serial($bitMask));
    2074. 

  2074. 			}
    2075. 

  2075. 		} else {
    2076. 

  2076. 			$bitMask = $this->generateMaskNo($maskNo, $width, $s, $d);
    2077. 

  2077. 		}
    2078. 

  2078. 

  2079. 		if ($maskGenOnly)
    2080. 

  2080. 			return;
    2081. 

  2081. 

  2082. 		$d = $s;
    2083. 

  2083. 

  2084. 		for ($y = 0; $y < $width; $y++) {
    2085. 

  2085. 			for ($x = 0; $x < $width; $x++) {
    2086. 

  2086. 				if ($bitMas…
    2087.

Large files files are truncated, but you can click here to view the full file