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

/src/libs/qrcode/phpqrcode.php

https://github.com/mips-lab/jetons
PHP | 3609 lines | 2340 code | 731 blank | 538 comment | 436 complexity | d91dbc28755d36a008319ff9340f83ce MD5 | raw file
Possible License(s): LGPL-3.0 
    

  1. <?php
    2. 

  2. 

  3. /*
    4. 

  4.  * PHP QR Code encoder
    5. 

  5.  *
    6. 

  6.  * This file contains MERGED version of PHP QR Code library.
    7. 

  7.  * It was auto-generated from full version for your convenience.
    8. 

  8.  *
    9. 

  9.  * This merged version was configured to not require any external files,
    10. 

  10.  * with disabled cache, error logging and weaker but faster mask matching.
    11. 

  11.  * If you need tune it up please use non-merged version.
    12. 

  12.  *
    13. 

  13.  * For full version, documentation, examples of use please visit:
    14. 

  14.  *
    15. 

  15.  *    http://phpqrcode.sourceforge.net/
    16. 

  16.  *    https://sourceforge.net/projects/phpqrcode/
    17. 

  17.  *    https://github.com/t0k4rt/phpqrcode
    18. 

  18.  *
    19. 

  19.  * PHP QR Code is distributed under LGPL 3
    20. 

  20.  * Copyright (C) 2010 Dominik Dzienia <deltalab at poczta dot fm>
    21. 

  21.  *
    22. 

  22.  * This library is free software; you can redistribute it and/or
    23. 

  23.  * modify it under the terms of the GNU Lesser General Public
    24. 

  24.  * License as published by the Free Software Foundation; either
    25. 

  25.  * version 3 of the License, or any later version.
    26. 

  26.  *
    27. 

  27.  * This library is distributed in the hope that it will be useful,
    28. 

  28.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
    29. 

  29.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
    30. 

  30.  * Lesser General Public License for more details.
    31. 

  31.  *
    32. 

  32.  * You should have received a copy of the GNU Lesser General Public
    33. 

  33.  * License along with this library; if not, write to the Free Software
    34. 

  34.  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
    35. 

  35.  */
    36. 

  36.  
    37. 

  37.  
    38. 

  38. 

  39. /*
    40. 

  40.  * Version: 1.1.4
    41. 

  41.  * Build: 2010100721
    42. 

  42.  */
    43. 

  43. 

  44. 

  45. 

  46. //---- qrconst.php -----------------------------
    47. 

  47. 

  48. 

  49. 

  50. 

  51. 

  52. /*
    53. 

  53.  * PHP QR Code encoder
    54. 

  54.  *
    55. 

  55.  * Common constants
    56. 

  56.  *
    57. 

  57.  * Based on libqrencode C library distributed under LGPL 2.1
    58. 

  58.  * Copyright (C) 2006, 2007, 2008, 2009 Kentaro Fukuchi <fukuchi@megaui.net>
    59. 

  59.  *
    60. 

  60.  * PHP QR Code is distributed under LGPL 3
    61. 

  61.  * Copyright (C) 2010 Dominik Dzienia <deltalab at poczta dot fm>
    62. 

  62.  *
    63. 

  63.  * This library is free software; you can redistribute it and/or
    64. 

  64.  * modify it under the terms of the GNU Lesser General Public
    65. 

  65.  * License as published by the Free Software Foundation; either
    66. 

  66.  * version 3 of the License, or any later version.
    67. 

  67.  *
    68. 

  68.  * This library is distributed in the hope that it will be useful,
    69. 

  69.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
    70. 

  70.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
    71. 

  71.  * Lesser General Public License for more details.
    72. 

  72.  *
    73. 

  73.  * You should have received a copy of the GNU Lesser General Public
    74. 

  74.  * License along with this library; if not, write to the Free Software
    75. 

  75.  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
    76. 

  76.  */
    77. 

  77.  
    78. 

  78. 	// Encoding modes
    79. 

  79. 	 
    80. 

  80. 	define('QR_MODE_NUL', -1);
    81. 

  81. 	define('QR_MODE_NUM', 0);
    82. 

  82. 	define('QR_MODE_AN', 1);
    83. 

  83. 	define('QR_MODE_8', 2);
    84. 

  84. 	define('QR_MODE_KANJI', 3);
    85. 

  85. 	define('QR_MODE_STRUCTURE', 4);
    86. 

  86. 

  87. 	// Levels of error correction.
    88. 

  88. 

  89. 	define('QR_ECLEVEL_L', 0);
    90. 

  90. 	define('QR_ECLEVEL_M', 1);
    91. 

  91. 	define('QR_ECLEVEL_Q', 2);
    92. 

  92. 	define('QR_ECLEVEL_H', 3);
    93. 

  93. 	
    94. 

  94. 	// Supported output formats
    95. 

  95. 	
    96. 

  96. 	define('QR_FORMAT_TEXT', 0);
    97. 

  97. 	define('QR_FORMAT_PNG',  1);
    98. 

  98. 	
    99. 

  99. 	class qrstr {
    100. 

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

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

  102. 		}
    103. 

  103. 	}	
    104. 

  104. 

  105. 

  106. 

  107. //---- merged_config.php -----------------------------
    108. 

  108. 

  109. 

  110. 

  111. 

  112. /*
    113. 

  113.  * PHP QR Code encoder
    114. 

  114.  *
    115. 

  115.  * Config file, tuned-up for merged verion
    116. 

  116.  */
    117. 

  117.      
    118. 

  118.     define('QR_CACHEABLE', false);       // use cache - more disk reads but less CPU power, masks and format templates are stored there
    119. 

  119.     define('QR_CACHE_DIR', false);       // used when QR_CACHEABLE === true
    120. 

  120.     define('QR_LOG_DIR', false);         // default error logs dir   
    121. 

  121.     
    122. 

  122.     define('QR_FIND_BEST_MASK', true);                                                          // if true, estimates best mask (spec. default, but extremally slow; set to false to significant performance boost but (propably) worst quality code
    123. 

  123.     define('QR_FIND_FROM_RANDOM', 2);                                                       // if false, checks all masks available, otherwise value tells count of masks need to be checked, mask id are got randomly
    124. 

  124.     define('QR_DEFAULT_MASK', 2);                                                               // when QR_FIND_BEST_MASK === false
    125. 

  125.                                                   
    126. 

  126.     define('QR_PNG_MAXIMUM_SIZE',  1024);                                                       // maximum allowed png image width (in pixels), tune to make sure GD and PHP can handle such big images
    127. 

  127.                                                   
    128. 

  128. 

  129. 

  130. 

  131. //---- qrtools.php -----------------------------
    132. 

  132. 

  133. 

  134. 

  135. 

  136. /*
    137. 

  137.  * PHP QR Code encoder
    138. 

  138.  *
    139. 

  139.  * Toolset, handy and debug utilites.
    140. 

  140.  *
    141. 

  141.  * PHP QR Code is distributed under LGPL 3
    142. 

  142.  * Copyright (C) 2010 Dominik Dzienia <deltalab at poczta dot fm>
    143. 

  143.  *
    144. 

  144.  * This library is free software; you can redistribute it and/or
    145. 

  145.  * modify it under the terms of the GNU Lesser General Public
    146. 

  146.  * License as published by the Free Software Foundation; either
    147. 

  147.  * version 3 of the License, or any later version.
    148. 

  148.  *
    149. 

  149.  * This library is distributed in the hope that it will be useful,
    150. 

  150.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
    151. 

  151.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
    152. 

  152.  * Lesser General Public License for more details.
    153. 

  153.  *
    154. 

  154.  * You should have received a copy of the GNU Lesser General Public
    155. 

  155.  * License along with this library; if not, write to the Free Software
    156. 

  156.  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
    157. 

  157.  */
    158. 

  158. 

  159.     class QRtools {
    160. 

  160.     
    161. 

  161.         //----------------------------------------------------------------------
    162. 

  162.         public static function binarize($frame)
    163. 

  163.         {
    164. 

  164.             $len = count($frame);
    165. 

  165.             foreach ($frame as &$frameLine) {
    166. 

  166.                 
    167. 

  167.                 for($i=0; $i<$len; $i++) {
    168. 

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

  169.                 }
    170. 

  170.             }
    171. 

  171.             
    172. 

  172.             return $frame;
    173. 

  173.         }
    174. 

  174.         
    175. 

  175.         //----------------------------------------------------------------------
    176. 

  176.         public static function tcpdfBarcodeArray($code, $mode = 'QR,L', $tcPdfVersion = '4.5.037')
    177. 

  177.         {
    178. 

  178.             $barcode_array = array();
    179. 

  179.             
    180. 

  180.             if (!is_array($mode))
    181. 

  181.                 $mode = explode(',', $mode);
    182. 

  182.                 
    183. 

  183.             $eccLevel = 'L';
    184. 

  184.                 
    185. 

  185.             if (count($mode) > 1) {
    186. 

  186.                 $eccLevel = $mode[1];
    187. 

  187.             }
    188. 

  188.                 
    189. 

  189.             $qrTab = QRcode::text($code, false, $eccLevel);
    190. 

  190.             $size = count($qrTab);
    191. 

  191.                 
    192. 

  192.             $barcode_array['num_rows'] = $size;
    193. 

  193.             $barcode_array['num_cols'] = $size;
    194. 

  194.             $barcode_array['bcode'] = array();
    195. 

  195.                 
    196. 

  196.             foreach ($qrTab as $line) {
    197. 

  197.                 $arrAdd = array();
    198. 

  198.                 foreach(str_split($line) as $char)
    199. 

  199.                     $arrAdd[] = ($char=='1')?1:0;
    200. 

  200.                 $barcode_array['bcode'][] = $arrAdd;
    201. 

  201.             }
    202. 

  202.                     
    203. 

  203.             return $barcode_array;
    204. 

  204.         }
    205. 

  205.         
    206. 

  206.         //----------------------------------------------------------------------
    207. 

  207.         public static function clearCache()
    208. 

  208.         {
    209. 

  209.             self::$frames = array();
    210. 

  210.         }
    211. 

  211.         
    212. 

  212.         //----------------------------------------------------------------------
    213. 

  213.         public static function buildCache()
    214. 

  214.         {
    215. 

  215. 			QRtools::markTime('before_build_cache');
    216. 

  216. 			
    217. 

  217. 			$mask = new QRmask();
    218. 

  218.             for ($a=1; $a <= QRSPEC_VERSION_MAX; $a++) {
    219. 

  219.                 $frame = QRspec::newFrame($a);
    220. 

  220.                 if (QR_IMAGE) {
    221. 

  221.                     $fileName = QR_CACHE_DIR.'frame_'.$a.'.png';
    222. 

  222.                     QRimage::png(self::binarize($frame), $fileName, 1, 0);
    223. 

  223.                 }
    224. 

  224. 				
    225. 

  225. 				$width = count($frame);
    226. 

  226. 				$bitMask = array_fill(0, $width, array_fill(0, $width, 0));
    227. 

  227. 				for ($maskNo=0; $maskNo<8; $maskNo++)
    228. 

  228. 					$mask->makeMaskNo($maskNo, $width, $frame, $bitMask, true);
    229. 

  229.             }
    230. 

  230. 			
    231. 

  231. 			QRtools::markTime('after_build_cache');
    232. 

  232.         }
    233. 

  233. 

  234.         //----------------------------------------------------------------------
    235. 

  235.         public static function log($outfile, $err)
    236. 

  236.         {
    237. 

  237.             if (QR_LOG_DIR !== false) {
    238. 

  238.                 if ($err != '') {
    239. 

  239.                     if ($outfile !== false) {
    240. 

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

  241.                     } else {
    242. 

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

  243.                     }
    244. 

  244.                 }    
    245. 

  245.             }
    246. 

  246.         }
    247. 

  247.         
    248. 

  248.         //----------------------------------------------------------------------
    249. 

  249.         public static function dumpMask($frame) 
    250. 

  250.         {
    251. 

  251.             $width = count($frame);
    252. 

  252.             for($y=0;$y<$width;$y++) {
    253. 

  253.                 for($x=0;$x<$width;$x++) {
    254. 

  254.                     echo ord($frame[$y][$x]).',';
    255. 

  255.                 }
    256. 

  256.             }
    257. 

  257.         }
    258. 

  258.         
    259. 

  259.         //----------------------------------------------------------------------
    260. 

  260.         public static function markTime($markerId)
    261. 

  261.         {
    262. 

  262.             list($usec, $sec) = explode(" ", microtime());
    263. 

  263.             $time = ((float)$usec + (float)$sec);
    264. 

  264.             
    265. 

  265.             if (!isset($GLOBALS['qr_time_bench']))
    266. 

  266.                 $GLOBALS['qr_time_bench'] = array();
    267. 

  267.             
    268. 

  268.             $GLOBALS['qr_time_bench'][$markerId] = $time;
    269. 

  269.         }
    270. 

  270.         
    271. 

  271.         //----------------------------------------------------------------------
    272. 

  272.         public static function timeBenchmark()
    273. 

  273.         {
    274. 

  274.             self::markTime('finish');
    275. 

  275.         
    276. 

  276.             $lastTime = 0;
    277. 

  277.             $startTime = 0;
    278. 

  278.             $p = 0;
    279. 

  279. 

  280.             echo '<table cellpadding="3" cellspacing="1">
    281. 

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

  282.                     <tbody>';
    283. 

    284. 

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

  285.                 if ($p > 0) {
    286. 

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

  287.                 } else {
    288. 

  288.                     $startTime = $thisTime;
    289. 

  289.                 }
    290. 

  290.                 
    291. 

  291.                 $p++;
    292. 

  292.                 $lastTime = $thisTime;
    293. 

  293.             }
    294. 

  294.             
    295. 

  295.             echo '</tbody><tfoot>
    296. 

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

  297.             </tfoot>
    298. 

  298.             </table>';
    299. 

  299.         }
    300. 

  300.         
    301. 

  301.         public static function save($content, $filename_path)
    302. 

  302.         {           
    303. 

  303.             try {
    304. 

  304.                 $handle = fopen($filename_path, "w");
    305. 

  305.                 fwrite($handle, $content);
    306. 

  306.                 fclose($handle);
    307. 

  307.                 return true;
    308. 

  308.             } catch (Exception $e) {
    309. 

  309.                 echo 'Exception reรงue : ',  $e->getMessage(), "\n";
    310. 

  310.             }      
    311. 

  311.             
    312. 

  312.         }
    313. 

  313.         
    314. 

  314.     }
    315. 

  315.     
    316. 

  316.     //##########################################################################
    317. 

  317.     
    318. 

  318.     QRtools::markTime('start');
    319. 

  319.     
    320. 

  320. 

  321. 

  322. 

  323. //---- qrspec.php -----------------------------
    324. 

  324. 

  325. 

  326. 

  327. 

  328. /*
    329. 

  329.  * PHP QR Code encoder
    330. 

  330.  *
    331. 

  331.  * QR Code specifications
    332. 

  332.  *
    333. 

  333.  * Based on libqrencode C library distributed under LGPL 2.1
    334. 

  334.  * Copyright (C) 2006, 2007, 2008, 2009 Kentaro Fukuchi <fukuchi@megaui.net>
    335. 

  335.  *
    336. 

  336.  * PHP QR Code is distributed under LGPL 3
    337. 

  337.  * Copyright (C) 2010 Dominik Dzienia <deltalab at poczta dot fm>
    338. 

  338.  *
    339. 

  339.  * The following data / specifications are taken from
    340. 

  340.  * "Two dimensional symbol -- QR-code -- Basic Specification" (JIS X0510:2004)
    341. 

  341.  *  or
    342. 

  342.  * "Automatic identification and data capture techniques -- 
    343. 

  343.  *  QR Code 2005 bar code symbology specification" (ISO/IEC 18004:2006)
    344. 

  344.  *
    345. 

  345.  * This library is free software; you can redistribute it and/or
    346. 

  346.  * modify it under the terms of the GNU Lesser General Public
    347. 

  347.  * License as published by the Free Software Foundation; either
    348. 

  348.  * version 3 of the License, or any later version.
    349. 

  349.  *
    350. 

  350.  * This library is distributed in the hope that it will be useful,
    351. 

  351.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
    352. 

  352.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
    353. 

  353.  * Lesser General Public License for more details.
    354. 

  354.  *
    355. 

  355.  * You should have received a copy of the GNU Lesser General Public
    356. 

  356.  * License along with this library; if not, write to the Free Software
    357. 

  357.  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
    358. 

  358.  */
    359. 

  359.  
    360. 

  360.     define('QRSPEC_VERSION_MAX', 40);
    361. 

  361.     define('QRSPEC_WIDTH_MAX',   177);
    362. 

  362. 

  363.     define('QRCAP_WIDTH',        0);
    364. 

  364.     define('QRCAP_WORDS',        1);
    365. 

  365.     define('QRCAP_REMINDER',     2);
    366. 

  366.     define('QRCAP_EC',           3);
    367. 

  367. 

  368.     class QRspec {
    369. 

  369.     
    370. 

  370.         public static $capacity = array(
    371. 

  371.             array(  0,    0, 0, array(   0,    0,    0,    0)),
    372. 

  372.             array( 21,   26, 0, array(   7,   10,   13,   17)), // 1
    373. 

  373.             array( 25,   44, 7, array(  10,   16,   22,   28)),
    374. 

  374.             array( 29,   70, 7, array(  15,   26,   36,   44)),
    375. 

  375.             array( 33,  100, 7, array(  20,   36,   52,   64)),
    376. 

  376.             array( 37,  134, 7, array(  26,   48,   72,   88)), // 5
    377. 

  377.             array( 41,  172, 7, array(  36,   64,   96,  112)),
    378. 

  378.             array( 45,  196, 0, array(  40,   72,  108,  130)),
    379. 

  379.             array( 49,  242, 0, array(  48,   88,  132,  156)),
    380. 

  380.             array( 53,  292, 0, array(  60,  110,  160,  192)),
    381. 

  381.             array( 57,  346, 0, array(  72,  130,  192,  224)), //10
    382. 

  382.             array( 61,  404, 0, array(  80,  150,  224,  264)),
    383. 

  383.             array( 65,  466, 0, array(  96,  176,  260,  308)),
    384. 

  384.             array( 69,  532, 0, array( 104,  198,  288,  352)),
    385. 

  385.             array( 73,  581, 3, array( 120,  216,  320,  384)),
    386. 

  386.             array( 77,  655, 3, array( 132,  240,  360,  432)), //15
    387. 

  387.             array( 81,  733, 3, array( 144,  280,  408,  480)),
    388. 

  388.             array( 85,  815, 3, array( 168,  308,  448,  532)),
    389. 

  389.             array( 89,  901, 3, array( 180,  338,  504,  588)),
    390. 

  390.             array( 93,  991, 3, array( 196,  364,  546,  650)),
    391. 

  391.             array( 97, 1085, 3, array( 224,  416,  600,  700)), //20
    392. 

  392.             array(101, 1156, 4, array( 224,  442,  644,  750)),
    393. 

  393.             array(105, 1258, 4, array( 252,  476,  690,  816)),
    394. 

  394.             array(109, 1364, 4, array( 270,  504,  750,  900)),
    395. 

  395.             array(113, 1474, 4, array( 300,  560,  810,  960)),
    396. 

  396.             array(117, 1588, 4, array( 312,  588,  870, 1050)), //25
    397. 

  397.             array(121, 1706, 4, array( 336,  644,  952, 1110)),
    398. 

  398.             array(125, 1828, 4, array( 360,  700, 1020, 1200)),
    399. 

  399.             array(129, 1921, 3, array( 390,  728, 1050, 1260)),
    400. 

  400.             array(133, 2051, 3, array( 420,  784, 1140, 1350)),
    401. 

  401.             array(137, 2185, 3, array( 450,  812, 1200, 1440)), //30
    402. 

  402.             array(141, 2323, 3, array( 480,  868, 1290, 1530)),
    403. 

  403.             array(145, 2465, 3, array( 510,  924, 1350, 1620)),
    404. 

  404.             array(149, 2611, 3, array( 540,  980, 1440, 1710)),
    405. 

  405.             array(153, 2761, 3, array( 570, 1036, 1530, 1800)),
    406. 

  406.             array(157, 2876, 0, array( 570, 1064, 1590, 1890)), //35
    407. 

  407.             array(161, 3034, 0, array( 600, 1120, 1680, 1980)),
    408. 

  408.             array(165, 3196, 0, array( 630, 1204, 1770, 2100)),
    409. 

  409.             array(169, 3362, 0, array( 660, 1260, 1860, 2220)),
    410. 

  410.             array(173, 3532, 0, array( 720, 1316, 1950, 2310)),
    411. 

  411.             array(177, 3706, 0, array( 750, 1372, 2040, 2430)) //40
    412. 

  412.         );
    413. 

  413.         
    414. 

  414.         //----------------------------------------------------------------------
    415. 

  415.         public static function getDataLength($version, $level)
    416. 

  416.         {
    417. 

  417.             return self::$capacity[$version][QRCAP_WORDS] - self::$capacity[$version][QRCAP_EC][$level];
    418. 

  418.         }
    419. 

  419.         
    420. 

  420.         //----------------------------------------------------------------------
    421. 

  421.         public static function getECCLength($version, $level)
    422. 

  422.         {
    423. 

  423.             return self::$capacity[$version][QRCAP_EC][$level];
    424. 

  424.         }
    425. 

  425.         
    426. 

  426.         //----------------------------------------------------------------------
    427. 

  427.         public static function getWidth($version)
    428. 

  428.         {
    429. 

  429.             return self::$capacity[$version][QRCAP_WIDTH];
    430. 

  430.         }
    431. 

  431.         
    432. 

  432.         //----------------------------------------------------------------------
    433. 

  433.         public static function getRemainder($version)
    434. 

  434.         {
    435. 

  435.             return self::$capacity[$version][QRCAP_REMINDER];
    436. 

  436.         }
    437. 

  437.         
    438. 

  438.         //----------------------------------------------------------------------
    439. 

  439.         public static function getMinimumVersion($size, $level)
    440. 

  440.         {
    441. 

  441. 

  442.             for($i=1; $i<= QRSPEC_VERSION_MAX; $i++) {
    443. 

  443.                 $words  = self::$capacity[$i][QRCAP_WORDS] - self::$capacity[$i][QRCAP_EC][$level];
    444. 

  444.                 if($words >= $size) 
    445. 

  445.                     return $i;
    446. 

  446.             }
    447. 

  447. 

  448.             return -1;
    449. 

  449.         }
    450. 

  450.     
    451. 

  451.         //######################################################################
    452. 

  452.         
    453. 

  453.         public static $lengthTableBits = array(
    454. 

  454.             array(10, 12, 14),
    455. 

  455.             array( 9, 11, 13),
    456. 

  456.             array( 8, 16, 16),
    457. 

  457.             array( 8, 10, 12)
    458. 

  458.         );
    459. 

  459.         
    460. 

  460.         //----------------------------------------------------------------------
    461. 

  461.         public static function lengthIndicator($mode, $version)
    462. 

  462.         {
    463. 

  463.             if ($mode == QR_MODE_STRUCTURE)
    464. 

  464.                 return 0;
    465. 

  465.                 
    466. 

  466.             if ($version <= 9) {
    467. 

  467.                 $l = 0;
    468. 

  468.             } else if ($version <= 26) {
    469. 

  469.                 $l = 1;
    470. 

  470.             } else {
    471. 

  471.                 $l = 2;
    472. 

  472.             }
    473. 

  473. 

  474.             return self::$lengthTableBits[$mode][$l];
    475. 

  475.         }
    476. 

  476.         
    477. 

  477.         //----------------------------------------------------------------------
    478. 

  478.         public static function maximumWords($mode, $version)
    479. 

  479.         {
    480. 

  480.             if($mode == QR_MODE_STRUCTURE) 
    481. 

  481.                 return 3;
    482. 

  482.                 
    483. 

  483.             if($version <= 9) {
    484. 

  484.                 $l = 0;
    485. 

  485.             } else if($version <= 26) {
    486. 

  486.                 $l = 1;
    487. 

  487.             } else {
    488. 

  488.                 $l = 2;
    489. 

  489.             }
    490. 

  490. 

  491.             $bits = self::$lengthTableBits[$mode][$l];
    492. 

  492.             $words = (1 << $bits) - 1;
    493. 

  493.             
    494. 

  494.             if($mode == QR_MODE_KANJI) {
    495. 

  495.                 $words *= 2; // the number of bytes is required
    496. 

  496.             }
    497. 

  497. 

  498.             return $words;
    499. 

  499.         }
    500. 

  500. 

  501.         // Error correction code -----------------------------------------------
    502. 

  502.         // Table of the error correction code (Reed-Solomon block)
    503. 

  503.         // See Table 12-16 (pp.30-36), JIS X0510:2004.
    504. 

  504. 

  505.         public static $eccTable = array(
    506. 

  506.             array(array( 0,  0), array( 0,  0), array( 0,  0), array( 0,  0)),
    507. 

  507.             array(array( 1,  0), array( 1,  0), array( 1,  0), array( 1,  0)), // 1
    508. 

  508.             array(array( 1,  0), array( 1,  0), array( 1,  0), array( 1,  0)),
    509. 

  509.             array(array( 1,  0), array( 1,  0), array( 2,  0), array( 2,  0)),
    510. 

  510.             array(array( 1,  0), array( 2,  0), array( 2,  0), array( 4,  0)),
    511. 

  511.             array(array( 1,  0), array( 2,  0), array( 2,  2), array( 2,  2)), // 5
    512. 

  512.             array(array( 2,  0), array( 4,  0), array( 4,  0), array( 4,  0)),
    513. 

  513.             array(array( 2,  0), array( 4,  0), array( 2,  4), array( 4,  1)),
    514. 

  514.             array(array( 2,  0), array( 2,  2), array( 4,  2), array( 4,  2)),
    515. 

  515.             array(array( 2,  0), array( 3,  2), array( 4,  4), array( 4,  4)),
    516. 

  516.             array(array( 2,  2), array( 4,  1), array( 6,  2), array( 6,  2)), //10
    517. 

  517.             array(array( 4,  0), array( 1,  4), array( 4,  4), array( 3,  8)),
    518. 

  518.             array(array( 2,  2), array( 6,  2), array( 4,  6), array( 7,  4)),
    519. 

  519.             array(array( 4,  0), array( 8,  1), array( 8,  4), array(12,  4)),
    520. 

  520.             array(array( 3,  1), array( 4,  5), array(11,  5), array(11,  5)),
    521. 

  521.             array(array( 5,  1), array( 5,  5), array( 5,  7), array(11,  7)), //15
    522. 

  522.             array(array( 5,  1), array( 7,  3), array(15,  2), array( 3, 13)),
    523. 

  523.             array(array( 1,  5), array(10,  1), array( 1, 15), array( 2, 17)),
    524. 

  524.             array(array( 5,  1), array( 9,  4), array(17,  1), array( 2, 19)),
    525. 

  525.             array(array( 3,  4), array( 3, 11), array(17,  4), array( 9, 16)),
    526. 

  526.             array(array( 3,  5), array( 3, 13), array(15,  5), array(15, 10)), //20
    527. 

  527.             array(array( 4,  4), array(17,  0), array(17,  6), array(19,  6)),
    528. 

  528.             array(array( 2,  7), array(17,  0), array( 7, 16), array(34,  0)),
    529. 

  529.             array(array( 4,  5), array( 4, 14), array(11, 14), array(16, 14)),
    530. 

  530.             array(array( 6,  4), array( 6, 14), array(11, 16), array(30,  2)),
    531. 

  531.             array(array( 8,  4), array( 8, 13), array( 7, 22), array(22, 13)), //25
    532. 

  532.             array(array(10,  2), array(19,  4), array(28,  6), array(33,  4)),
    533. 

  533.             array(array( 8,  4), array(22,  3), array( 8, 26), array(12, 28)),
    534. 

  534.             array(array( 3, 10), array( 3, 23), array( 4, 31), array(11, 31)),
    535. 

  535.             array(array( 7,  7), array(21,  7), array( 1, 37), array(19, 26)),
    536. 

  536.             array(array( 5, 10), array(19, 10), array(15, 25), array(23, 25)), //30
    537. 

  537.             array(array(13,  3), array( 2, 29), array(42,  1), array(23, 28)),
    538. 

  538.             array(array(17,  0), array(10, 23), array(10, 35), array(19, 35)),
    539. 

  539.             array(array(17,  1), array(14, 21), array(29, 19), array(11, 46)),
    540. 

  540.             array(array(13,  6), array(14, 23), array(44,  7), array(59,  1)),
    541. 

  541.             array(array(12,  7), array(12, 26), array(39, 14), array(22, 41)), //35
    542. 

  542.             array(array( 6, 14), array( 6, 34), array(46, 10), array( 2, 64)),
    543. 

  543.             array(array(17,  4), array(29, 14), array(49, 10), array(24, 46)),
    544. 

  544.             array(array( 4, 18), array(13, 32), array(48, 14), array(42, 32)),
    545. 

  545.             array(array(20,  4), array(40,  7), array(43, 22), array(10, 67)),
    546. 

  546.             array(array(19,  6), array(18, 31), array(34, 34), array(20, 61)),//40
    547. 

  547.         );                                                                       
    548. 

  548. 

  549.         //----------------------------------------------------------------------
    550. 

  550.         // CACHEABLE!!!
    551. 

  551.         
    552. 

  552.         public static function getEccSpec($version, $level, array &$spec)
    553. 

  553.         {
    554. 

  554.             if (count($spec) < 5) {
    555. 

  555.                 $spec = array(0,0,0,0,0);
    556. 

  556.             }
    557. 

  557. 

  558.             $b1   = self::$eccTable[$version][$level][0];
    559. 

  559.             $b2   = self::$eccTable[$version][$level][1];
    560. 

  560.             $data = self::getDataLength($version, $level);
    561. 

  561.             $ecc  = self::getECCLength($version, $level);
    562. 

  562. 

  563.             if($b2 == 0) {
    564. 

  564.                 $spec[0] = $b1;
    565. 

  565.                 $spec[1] = (int)($data / $b1);
    566. 

  566.                 $spec[2] = (int)($ecc / $b1);
    567. 

  567.                 $spec[3] = 0; 
    568. 

  568.                 $spec[4] = 0;
    569. 

  569.             } else {
    570. 

  570.                 $spec[0] = $b1;
    571. 

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

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

  573.                 $spec[3] = $b2;
    574. 

  574.                 $spec[4] = $spec[1] + 1;
    575. 

  575.             }
    576. 

  576.         }
    577. 

  577. 

  578.         // Alignment pattern ---------------------------------------------------
    579. 

  579. 

  580.         // Positions of alignment patterns.
    581. 

  581.         // This array includes only the second and the third position of the 
    582. 

  582.         // alignment patterns. Rest of them can be calculated from the distance 
    583. 

  583.         // between them.
    584. 

  584.          
    585. 

  585.         // See Table 1 in Appendix E (pp.71) of JIS X0510:2004.
    586. 

  586.          
    587. 

  587.         public static $alignmentPattern = array(      
    588. 

  588.             array( 0,  0),
    589. 

  589.             array( 0,  0), array(18,  0), array(22,  0), array(26,  0), array(30,  0), // 1- 5
    590. 

  590.             array(34,  0), array(22, 38), array(24, 42), array(26, 46), array(28, 50), // 6-10
    591. 

  591.             array(30, 54), array(32, 58), array(34, 62), array(26, 46), array(26, 48), //11-15
    592. 

  592.             array(26, 50), array(30, 54), array(30, 56), array(30, 58), array(34, 62), //16-20
    593. 

  593.             array(28, 50), array(26, 50), array(30, 54), array(28, 54), array(32, 58), //21-25
    594. 

  594.             array(30, 58), array(34, 62), array(26, 50), array(30, 54), array(26, 52), //26-30
    595. 

  595.             array(30, 56), array(34, 60), array(30, 58), array(34, 62), array(30, 54), //31-35
    596. 

  596.             array(24, 50), array(28, 54), array(32, 58), array(26, 54), array(30, 58), //35-40
    597. 

  597.         );                                                                                  
    598. 

  598. 

  599.         
    600. 

  600.         /** --------------------------------------------------------------------
    601. 

  601.          * Put an alignment marker.
    602. 

  602.          * @param frame
    603. 

  603.          * @param width
    604. 

  604.          * @param ox,oy center coordinate of the pattern
    605. 

  605.          */
    606. 

  606.         public static function putAlignmentMarker(array &$frame, $ox, $oy)
    607. 

  607.         {
    608. 

  608.             $finder = array(
    609. 

  609.                 "\xa1\xa1\xa1\xa1\xa1",
    610. 

  610.                 "\xa1\xa0\xa0\xa0\xa1",
    611. 

  611.                 "\xa1\xa0\xa1\xa0\xa1",
    612. 

  612.                 "\xa1\xa0\xa0\xa0\xa1",
    613. 

  613.                 "\xa1\xa1\xa1\xa1\xa1"
    614. 

  614.             );                        
    615. 

  615.             
    616. 

  616.             $yStart = $oy-2;         
    617. 

  617.             $xStart = $ox-2;
    618. 

  618.             
    619. 

  619.             for($y=0; $y<5; $y++) {
    620. 

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

  621.             }
    622. 

  622.         }
    623. 

  623. 

  624.         //----------------------------------------------------------------------
    625. 

  625.         public static function putAlignmentPattern($version, &$frame, $width)
    626. 

  626.         {
    627. 

  627.             if($version < 2)
    628. 

  628.                 return;
    629. 

  629. 

  630.             $d = self::$alignmentPattern[$version][1] - self::$alignmentPattern[$version][0];
    631. 

  631.             if($d < 0) {
    632. 

  632.                 $w = 2;
    633. 

  633.             } else {
    634. 

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

  635.             }
    636. 

  636. 

  637.             if($w * $w - 3 == 1) {
    638. 

  638.                 $x = self::$alignmentPattern[$version][0];
    639. 

  639.                 $y = self::$alignmentPattern[$version][0];
    640. 

  640.                 self::putAlignmentMarker($frame, $x, $y);
    641. 

  641.                 return;
    642. 

  642.             }
    643. 

  643. 

  644.             $cx = self::$alignmentPattern[$version][0];
    645. 

  645.             for($x=1; $x<$w - 1; $x++) {
    646. 

  646.                 self::putAlignmentMarker($frame, 6, $cx);
    647. 

  647.                 self::putAlignmentMarker($frame, $cx,  6);
    648. 

  648.                 $cx += $d;
    649. 

  649.             }
    650. 

  650. 

  651.             $cy = self::$alignmentPattern[$version][0];
    652. 

  652.             for($y=0; $y<$w-1; $y++) {
    653. 

  653.                 $cx = self::$alignmentPattern[$version][0];
    654. 

  654.                 for($x=0; $x<$w-1; $x++) {
    655. 

  655.                     self::putAlignmentMarker($frame, $cx, $cy);
    656. 

  656.                     $cx += $d;
    657. 

  657.                 }
    658. 

  658.                 $cy += $d;
    659. 

  659.             }
    660. 

  660.         }
    661. 

  661. 

  662.         // Version information pattern -----------------------------------------
    663. 

  663. 

  664. 		// Version information pattern (BCH coded).
    665. 

  665.         // See Table 1 in Appendix D (pp.68) of JIS X0510:2004.
    666. 

  666.         
    667. 

  667. 		// size: [QRSPEC_VERSION_MAX - 6]
    668. 

  668. 		
    669. 

  669.         public static $versionPattern = array(
    670. 

  670.             0x07c94, 0x085bc, 0x09a99, 0x0a4d3, 0x0bbf6, 0x0c762, 0x0d847, 0x0e60d,
    671. 

  671.             0x0f928, 0x10b78, 0x1145d, 0x12a17, 0x13532, 0x149a6, 0x15683, 0x168c9,
    672. 

  672.             0x177ec, 0x18ec4, 0x191e1, 0x1afab, 0x1b08e, 0x1cc1a, 0x1d33f, 0x1ed75,
    673. 

  673.             0x1f250, 0x209d5, 0x216f0, 0x228ba, 0x2379f, 0x24b0b, 0x2542e, 0x26a64,
    674. 

  674.             0x27541, 0x28c69
    675. 

  675.         );
    676. 

  676. 

  677.         //----------------------------------------------------------------------
    678. 

  678.         public static function getVersionPattern($version)
    679. 

  679.         {
    680. 

  680.             if($version < 7 || $version > QRSPEC_VERSION_MAX)
    681. 

  681.                 return 0;
    682. 

  682. 

  683.             return self::$versionPattern[$version -7];
    684. 

  684.         }
    685. 

  685. 

  686.         // Format information --------------------------------------------------
    687. 

  687.         // See calcFormatInfo in tests/test_qrspec.c (orginal qrencode c lib)
    688. 

  688.         
    689. 

  689.         public static $formatInfo = array(
    690. 

  690.             array(0x77c4, 0x72f3, 0x7daa, 0x789d, 0x662f, 0x6318, 0x6c41, 0x6976),
    691. 

  691.             array(0x5412, 0x5125, 0x5e7c, 0x5b4b, 0x45f9, 0x40ce, 0x4f97, 0x4aa0),
    692. 

  692.             array(0x355f, 0x3068, 0x3f31, 0x3a06, 0x24b4, 0x2183, 0x2eda, 0x2bed),
    693. 

  693.             array(0x1689, 0x13be, 0x1ce7, 0x19d0, 0x0762, 0x0255, 0x0d0c, 0x083b)
    694. 

  694.         );
    695. 

  695. 

  696.         public static function getFormatInfo($mask, $level)
    697. 

  697.         {
    698. 

  698.             if($mask < 0 || $mask > 7)
    699. 

  699.                 return 0;
    700. 

  700.                 
    701. 

  701.             if($level < 0 || $level > 3)
    702. 

  702.                 return 0;                
    703. 

  703. 

  704.             return self::$formatInfo[$level][$mask];
    705. 

  705.         }
    706. 

  706. 

  707.         // Frame ---------------------------------------------------------------
    708. 

  708.         // Cache of initial frames.
    709. 

  709.          
    710. 

  710.         public static $frames = array();
    711. 

  711. 

  712.         /** --------------------------------------------------------------------
    713. 

  713.          * Put a finder pattern.
    714. 

  714.          * @param frame
    715. 

  715.          * @param width
    716. 

  716.          * @param ox,oy upper-left coordinate of the pattern
    717. 

  717.          */
    718. 

  718.         public static function putFinderPattern(&$frame, $ox, $oy)
    719. 

  719.         {
    720. 

  720.             $finder = array(
    721. 

  721.                 "\xc1\xc1\xc1\xc1\xc1\xc1\xc1",
    722. 

  722.                 "\xc1\xc0\xc0\xc0\xc0\xc0\xc1",
    723. 

  723.                 "\xc1\xc0\xc1\xc1\xc1\xc0\xc1",
    724. 

  724.                 "\xc1\xc0\xc1\xc1\xc1\xc0\xc1",
    725. 

  725.                 "\xc1\xc0\xc1\xc1\xc1\xc0\xc1",
    726. 

  726.                 "\xc1\xc0\xc0\xc0\xc0\xc0\xc1",
    727. 

  727.                 "\xc1\xc1\xc1\xc1\xc1\xc1\xc1"
    728. 

  728.             );                            
    729. 

  729.             
    730. 

  730.             for($y=0; $y<7; $y++) {
    731. 

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

  732.             }
    733. 

  733.         }
    734. 

  734. 

  735.         //----------------------------------------------------------------------
    736. 

  736.         public static function createFrame($version)
    737. 

  737.         {
    738. 

  738.             $width = self::$capacity[$version][QRCAP_WIDTH];
    739. 

  739.             $frameLine = str_repeat ("\0", $width);
    740. 

  740.             $frame = array_fill(0, $width, $frameLine);
    741. 

  741. 

  742.             // Finder pattern
    743. 

  743.             self::putFinderPattern($frame, 0, 0);
    744. 

  744.             self::putFinderPattern($frame, $width - 7, 0);
    745. 

  745.             self::putFinderPattern($frame, 0, $width - 7);
    746. 

  746.             
    747. 

  747.             // Separator
    748. 

  748.             $yOffset = $width - 7;
    749. 

  749.             
    750. 

  750.             for($y=0; $y<7; $y++) {
    751. 

  751.                 $frame[$y][7] = "\xc0";
    752. 

  752.                 $frame[$y][$width - 8] = "\xc0";
    753. 

  753.                 $frame[$yOffset][7] = "\xc0";
    754. 

  754.                 $yOffset++;
    755. 

  755.             }
    756. 

  756.             
    757. 

  757.             $setPattern = str_repeat("\xc0", 8);
    758. 

  758.             
    759. 

  759.             QRstr::set($frame, 0, 7, $setPattern);
    760. 

  760.             QRstr::set($frame, $width-8, 7, $setPattern);
    761. 

  761.             QRstr::set($frame, 0, $width - 8, $setPattern);
    762. 

  762.         
    763. 

  763.             // Format info
    764. 

  764.             $setPattern = str_repeat("\x84", 9);
    765. 

  765.             QRstr::set($frame, 0, 8, $setPattern);
    766. 

  766.             QRstr::set($frame, $width - 8, 8, $setPattern, 8);
    767. 

  767.             
    768. 

  768.             $yOffset = $width - 8;
    769. 

  769. 

  770.             for($y=0; $y<8; $y++,$yOffset++) {
    771. 

  771.                 $frame[$y][8] = "\x84";
    772. 

  772.                 $frame[$yOffset][8] = "\x84";
    773. 

  773.             }
    774. 

  774. 

  775.             // Timing pattern  
    776. 

  776.             
    777. 

  777.             for($i=1; $i<$width-15; $i++) {
    778. 

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

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

  780.             }
    781. 

  781.             
    782. 

  782.             // Alignment pattern  
    783. 

  783.             self::putAlignmentPattern($version, $frame, $width);
    784. 

  784.             
    785. 

  785.             // Version information 
    786. 

  786.             if($version >= 7) {
    787. 

  787.                 $vinf = self::getVersionPattern($version);
    788. 

  788. 

  789.                 $v = $vinf;
    790. 

  790.                 
    791. 

  791.                 for($x=0; $x<6; $x++) {
    792. 

  792.                     for($y=0; $y<3; $y++) {
    793. 

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

  794.                         $v = $v >> 1;
    795. 

  795.                     }
    796. 

  796.                 }
    797. 

  797. 

  798.                 $v = $vinf;
    799. 

  799.                 for($y=0; $y<6; $y++) {
    800. 

  800.                     for($x=0; $x<3; $x++) {
    801. 

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

  802.                         $v = $v >> 1;
    803. 

  803.                     }
    804. 

  804.                 }
    805. 

  805.             }
    806. 

  806.     
    807. 

  807.             // and a little bit...  
    808. 

  808.             $frame[$width - 8][8] = "\x81";
    809. 

  809.             
    810. 

  810.             return $frame;
    811. 

  811.         }
    812. 

  812. 

  813.         //----------------------------------------------------------------------
    814. 

  814.         public static function debug($frame, $binary_mode = false)
    815. 

  815.         {
    816. 

  816.             if ($binary_mode) {
    817. 

  817.             
    818. 

  818.                     foreach ($frame as &$frameLine) {
    819. 

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

  820.                         $frameLine = join('&#9608;&#9608;', explode('1', $frameLine));
    821. 

  821.                     }
    822. 

  822.                     
    823. 

  823.                     ?>
    824. 

  824.                 <style>
    825. 

  825.                     .m { background-color: white; }
    826. 

  826.                 </style>
    827. 

  827.                 <?php
    828. 

  828.                     echo '<pre><tt><br/ ><br/ ><br/ >&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;';
    829. 

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

  830.                     echo '</tt></pre><br/ ><br/ ><br/ ><br/ ><br/ ><br/ >';
    831. 

  831.             
    832. 

  832.             } else {
    833. 

  833.             
    834. 

  834.                 foreach ($frame as &$frameLine) {
    835. 

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

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

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

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

  839.                     $frameLine = join('<span class="s">&#9671;</span>', explode("\x84", $frameLine)); //format 0
    840. 

  840.                     $frameLine = join('<span class="s">&#9670;</span>', explode("\x85", $frameLine)); //format 1
    841. 

  841.                     $frameLine = join('<span class="x">&#9762;</span>', explode("\x81", $frameLine)); //special bit
    842. 

  842.                     $frameLine = join('<span class="c">&nbsp;</span>',  explode("\x90", $frameLine)); //clock 0
    843. 

  843.                     $frameLine = join('<span class="c">&#9719;</span>', explode("\x91", $frameLine)); //clock 1
    844. 

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

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

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

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

  848.                 }
    849. 

  849.                 
    850. 

  850.                 ?>
    851. 

  851.                 <style>
    852. 

  852.                     .p { background-color: yellow; }
    853. 

  853.                     .m { background-color: #00FF00; }
    854. 

  854.                     .s { background-color: #FF0000; }
    855. 

  855.                     .c { background-color: aqua; }
    856. 

  856.                     .x { background-color: pink; }
    857. 

  857.                     .f { background-color: gold; }
    858. 

  858.                 </style>
    859. 

  859.                 <?php
    860. 

  860.                 echo "<pre><tt>";
    861. 

  861.                 echo join("<br/ >", $frame);
    862. 

  862.                 echo "</tt></pre>";
    863. 

  863.             
    864. 

  864.             }
    865. 

  865.         }
    866. 

  866. 

  867.         //----------------------------------------------------------------------
    868. 

  868.         public static function serial($frame)
    869. 

  869.         {
    870. 

  870.             return gzcompress(join("\n", $frame), 9);
    871. 

  871.         }
    872. 

  872.         
    873. 

  873.         //----------------------------------------------------------------------
    874. 

  874.         public static function unserial($code)
    875. 

  875.         {
    876. 

  876.             return explode("\n", gzuncompress($code));
    877. 

  877.         }
    878. 

  878.         
    879. 

  879.         //----------------------------------------------------------------------
    880. 

  880.         public static function newFrame($version)
    881. 

  881.         {
    882. 

  882.             if($version < 1 || $version > QRSPEC_VERSION_MAX) 
    883. 

  883.                 return null;
    884. 

  884. 

  885.             if(!isset(self::$frames[$version])) {
    886. 

  886.                 
    887. 

  887.                 $fileName = QR_CACHE_DIR.'frame_'.$version.'.dat';
    888. 

  888.                 
    889. 

  889.                 if (QR_CACHEABLE) {
    890. 

  890.                     if (file_exists($fileName)) {
    891. 

  891.                         self::$frames[$version] = self::unserial(file_get_contents($fileName));
    892. 

  892.                     } else {
    893. 

  893.                         self::$frames[$version] = self::createFrame($version);
    894. 

  894.                         file_put_contents($fileName, self::serial(self::$frames[$version]));
    895. 

  895.                     }
    896. 

  896.                 } else {
    897. 

  897.                     self::$frames[$version] = self::createFrame($version);
    898. 

  898.                 }
    899. 

  899.             }
    900. 

  900.             
    901. 

  901.             if(is_null(self::$frames[$version]))
    902. 

  902.                 return null;
    903. 

  903. 

  904.             return self::$frames[$version];
    905. 

  905.         }
    906. 

  906. 

  907.         //----------------------------------------------------------------------
    908. 

  908.         public static function rsBlockNum($spec)     { return $spec[0] + $spec[3]; }
    909. 

  909.         public static function rsBlockNum1($spec)    { return $spec[0]; }
    910. 

  910.         public static function rsDataCodes1($spec)   { return $spec[1]; }
    911. 

  911.         public static function rsEccCodes1($spec)    { return $spec[2]; }
    912. 

  912.         public static function rsBlockNum2($spec)    { return $spec[3]; }
    913. 

  913.         public static function rsDataCodes2($spec)   { return $spec[4]; }
    914. 

  914.         public static function rsEccCodes2($spec)    { return $spec[2]; }
    915. 

  915.         public static function rsDataLength($spec)   { return ($spec[0] * $spec[1]) + ($spec[3] * $spec[4]);    }
    916. 

  916.         public static function rsEccLength($spec)    { return ($spec[0] + $spec[3]) * $spec[2]; }
    917. 

  917.         
    918. 

  918.     }
    919. 

  919. 

  920. 

  921. 

  922. //---- qrimage.php -----------------------------
    923. 

  923. 

  924. 

  925. 

  926. 

  927. /*
    928. 

  928.  * PHP QR Code encoder
    929. 

  929.  *
    930. 

  930.  * Image output of code using GD2
    931. 

  931.  *
    932. 

  932.  * PHP QR Code is distributed under LGPL 3
    933. 

  933.  * Copyright (C) 2010 Dominik Dzienia <deltalab at poczta dot fm>
    934. 

  934.  *
    935. 

  935.  * This library is free software; you can redistribute it and/or
    936. 

  936.  * modify it under the terms of the GNU Lesser General Public
    937. 

  937.  * License as published by the Free Software Foundation; either
    938. 

  938.  * version 3 of the License, or any later version.
    939. 

  939.  *
    940. 

  940.  * This library is distributed in the hope that it will be useful,
    941. 

  941.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
    942. 

  942.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
    943. 

  943.  * Lesser General Public License for more details.
    944. 

  944.  *
    945. 

  945.  * You should have received a copy of the GNU Lesser General Public
    946. 

  946.  * License along with this library; if not, write to the Free Software
    947. 

  947.  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
    948. 

  948.  */
    949. 

  949.  
    950. 

  950.     define('QR_IMAGE', true);
    951. 

  951. 

  952.     class QRimage {
    953. 

  953.     
    954. 

  954.         //----------------------------------------------------------------------
    955. 

  955.         public static function png($frame, $filename = false, $pixelPerPoint = 4, $outerFrame = 4,$saveandprint=FALSE, $back_color, $fore_color) 
    956. 

  956.         {
    957. 

  957.             $image = self::image($frame, $pixelPerPoint, $outerFrame, $back_color, $fore_color);
    958. 

  958.             
    959. 

  959.             if ($filename === false) {
    960. 

  960.                 Header("Content-type: image/png");
    961. 

  961.                 ImagePng($image);
    962. 

  962.             } else {
    963. 

  963.                 if($saveandprint===TRUE){
    964. 

  964.                     ImagePng($image, $filename);
    965. 

  965.                     header("Content-type: image/png");
    966. 

  966.                     ImagePng($image);
    967. 

  967.                 }else{
    968. 

  968.                     ImagePng($image, $filename);
    969. 

  969.                 }
    970. 

  970.             }
    971. 

  971.             
    972. 

  972.             ImageDestroy($image);
    973. 

  973.         }
    974. 

  974.     
    975. 

  975.         //----------------------------------------------------------------------
    976. 

  976.         public static function jpg($frame, $filename = false, $pixelPerPoint = 8, $outerFrame = 4, $q = 85) 
    977. 

  977.         {
    978. 

  978.             $image = self::image($frame, $pixelPerPoint, $outerFrame, $back_color, $fore_color);
    979. 

  979.             
    980. 

  980.             if ($filename === false) {
    981. 

  981.                 Header("Content-type: image/jpeg");
    982. 

  982.                 ImageJpeg($image, null, $q);
    983. 

  983.             } else {
    984. 

  984.                 ImageJpeg($image, $filename, $q);            
    985. 

  985.             }
    986. 

  986.             
    987. 

  987.             ImageDestroy($image);
    988. 

  988.         }
    989. 

  989.     
    990. 

  990.         //----------------------------------------------------------------------
    991. 

  991.         private static function image($frame, $pixelPerPoint = 4, $outerFrame = 4, $back_color = 0xFFFFFF, $fore_color = 0x000000) 
    992. 

  992.         {
    993. 

  993.             $h = count($frame);
    994. 

  994.             $w = strlen($frame[0]);
    995. 

  995.             
    996. 

  996.             $imgW = $w + 2*$outerFrame;
    997. 

  997.             $imgH = $h + 2*$outerFrame;
    998. 

  998.             
    999. 

  999.             $base_image =ImageCreate($imgW, $imgH);
    1000. 

  1000.             
    1001. 

  1001.             // convert a hexadecimal color code into decimal eps format (green = 0 1 0, blue = 0 0 1, ...)
    1002. 

  1002.             $r1 = round((($fore_color & 0xFF0000) >> 16), 5);
    1003. 

  1003.             $b1 = round((($fore_color & 0x00FF00) >> 8), 5);
    1004. 

  1004.             $g1 = round(($fore_color & 0x0000FF), 5);
    1005. 

  1005. 

  1006.             // convert a hexadecimal color code into decimal eps format (green = 0 1 0, blue = 0 0 1, ...)
    1007. 

  1007.             $r2 = round((($back_color & 0xFF0000) >> 16), 5);
    1008. 

  1008.             $b2 = round((($back_color & 0x00FF00) >> 8), 5);
    1009. 

  1009.             $g2 = round(($back_color & 0x0000FF), 5);
    1010. 

  1010. 

  1011. 

  1012.             
    1013. 

  1013.             $col[0] = ImageColorAllocate($base_image,$r2,$b2,$g2);
    1014. 

  1014.             $col[1] = ImageColorAllocate($base_image,$r1,$b1,$g1);
    1015. 

  1015. 

  1016.             imagefill($base_image, 0, 0, $col[0]);
    1017. 

  1017. 

  1018.             for($y=0; $y<$h; $y++) {
    1019. 

  1019.                 for($x=0; $x<$w; $x++) {
    1020. 

  1020.                     if ($frame[$y][$x] == '1') {
    1021. 

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

  1022.                     }
    1023. 

  1023.                 }
    1024. 

  1024.             }
    1025. 

  1025.             
    1026. 

  1026.             $target_image =ImageCreate($imgW * $pixelPerPoint, $imgH * $pixelPerPoint);
    1027. 

  1027.             ImageCopyResized($target_image, $base_image, 0, 0, 0, 0, $imgW * $pixelPerPoint, $imgH * $pixelPerPoint, $imgW, $imgH);
    1028. 

  1028.             ImageDestroy($base_image);
    1029. 

  1029.             
    1030. 

  1030.             return $target_image;
    1031. 

  1031.         }
    1032. 

  1032.     }
    1033. 

  1033. 

  1034. 

  1035. 

  1036. //---- qrinput.php -----------------------------
    1037. 

  1037. 

  1038. 

  1039. 

  1040. 

  1041. /*
    1042. 

  1042.  * PHP QR Code encoder
    1043. 

  1043.  *
    1044. 

  1044.  * Input encoding class
    1045. 

  1045.  *
    1046. 

  1046.  * Based on libqrencode C library distributed under LGPL 2.1
    1047. 

  1047.  * Copyright (C) 2006, 2007, 2008, 2009 Kentaro Fukuchi <fukuchi@megaui.net>
    1048. 

  1048.  *
    1049. 

  1049.  * PHP QR Code is distributed under LGPL 3
    1050. 

  1050.  * Copyright (C) 2010 Dominik Dzienia <deltalab at poczta dot fm>
    1051. 

  1051.  *
    1052. 

  1052.  * This library is free software; you can redistribute it and/or
    1053. 

  1053.  * modify it under the terms of the GNU Lesser General Public
    1054. 

  1054.  * License as published by the Free Software Foundation; either
    1055. 

  1055.  * version 3 of the License, or any later version.
    1056. 

  1056.  *
    1057. 

  1057.  * This library is distributed in the hope that it will be useful,
    1058. 

  1058.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
    1059. 

  1059.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
    1060. 

  1060.  * Lesser General Public License for more details.
    1061. 

  1061.  *
    1062. 

  1062.  * You should have received a copy of the GNU Lesser General Public
    1063. 

  1063.  * License along with this library; if not, write to the Free Software
    1064. 

  1064.  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
    1065. 

  1065.  */
    1066. 

  1066.  
    1067. 

  1067.     define('STRUCTURE_HEADER_BITS',  20);
    1068. 

  1068.     define('MAX_STRUCTURED_SYMBOLS', 16);
    1069. 

  1069. 

  1070.     class QRinputItem {
    1071. 

  1071.     
    1072. 

  1072.         public $mode;
    1073. 

  1073.         public $size;
    1074. 

  1074.         public $data;
    1075. 

  1075.         public $bstream;
    1076. 

  1076. 

  1077.         public function __construct($mode, $size, $data, $bstream = null) 
    1078. 

  1078.         {
    1079. 

  1079.             $setData = array_slice($data, 0, $size);
    1080. 

  1080.             
    1081. 

  1081.             if (count($setData) < $size) {
    1082. 

  1082.                 $setData = array_merge($setData, array_fill(0,$size-count($setData),0));
    1083. 

  1083.             }
    1084. 

  1084.         
    1085. 

  1085.             if(!QRinput::check($mode, $size, $setData)) {
    1086. 

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

  1087.                 return null;
    1088. 

  1088.             }
    1089. 

  1089.             
    1090. 

  1090.             $this->mode = $mode;
    1091. 

  1091.             $this->size = $size;
    1092. 

  1092.             $this->data = $setData;
    1093. 

  1093.             $this->bstream = $bstream;
    1094. 

  1094.         }
    1095. 

  1095.         
    1096. 

  1096.         //----------------------------------------------------------------------
    1097. 

  1097.         public function encodeModeNum($version)
    1098. 

  1098.         {
    1099. 

  1099.             try {
    1100. 

  1100.             
    1101. 

  1101.                 $words = (int)($this->size / 3);
    1102. 

  1102.                 $bs = new QRbitstream();
    1103. 

  1103.                 
    1104. 

  1104.                 $val = 0x1;
    1105. 

  1105.                 $bs->appendNum(4, $val);
    1106. 

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

  1107. 

  1108.                 for($i=0; $i<$words; $i++) {
    1109. 

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

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

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

  1112.                     $bs->appendNum(10, $val);
    1113. 

  1113.                 }
    1114. 

  1114. 

  1115.                 if($this->size - $words * 3 == 1) {
    1116. 

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

  1117.                     $bs->appendNum(4, $val);
    1118. 

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

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

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

  1121.                     $bs->appendNum(7, $val);
    1122. 

  1122.                 }
    1123. 

  1123. 

  1124.                 $this->bstream = $bs;
    1125. 

  1125.                 return 0;
    1126. 

  1126.                 
    1127. 

  1127.             } catch (Exception $e) {
    1128. 

  1128.                 return -1;
    1129. 

  1129.             }
    1130. 

  1130.         }
    1131. 

  1131.         
    1132. 

  1132.         //----------------------------------------------------------------------
    1133. 

  1133.         public function encodeModeAn($version)
    1134. 

  1134.         {
    1135. 

  1135.             try {
    1136. 

  1136.                 $words = (int)($this->size / 2);
    1137. 

  1137.                 $bs = new QRbitstream();
    1138. 

  1138.                 
    1139. 

  1139.                 $bs->appendNum(4, 0x02);
    1140. 

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

  1141. 

  1142.                 for($i=0; $i<$words; $i++) {
    1143. 

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

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

  1145. 

  1146.                     $bs->appendNum(11, $val);
    1147. 

  1147.                 }
    1148. 

  1148. 

  1149.                 if($this->size & 1) {
    1150. 

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

  1151.                     $bs->appendNum(6, $val);
    1152. 

  1152.                 }
    1153. 

  1153.         
    1154. 

  1154.                 $this->bstream = $bs;
    1155. 

  1155.                 return 0;
    1156. 

  1156.             
    1157. 

  1157.             } catch (Exception $e) {
    1158. 

  1158.                 return -1;
    1159. 

  1159.             }
    1160. 

  1160.         }
    1161. 

  1161.         
    1162. 

  1162.         //----------------------------------------------------------------------
    1163. 

  1163.         public function encodeMode8($version)
    1164. 

  1164.         {
    1165. 

  1165.             try {
    1166. 

  1166.                 $bs = new QRbitstream();
    1167. 

  1167. 

  1168.                 $bs->appendNum(4, 0x4);
    1169. 

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

  1170. 

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

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

  1173.                 }
    1174. 

  1174. 

  1175.                 $this->bstream = $bs;
    1176. 

  1176.                 return 0;
    1177. 

  1177.             
    1178. 

  1178.             } catch (Exception $e) {
    1179. 

  1179.                 return -1;
    1180. 

  1180.             }
    1181. 

  1181.         }
    1182. 

  1182.         
    1183. 

  1183.         //----------------------------------------------------------------------
    1184. 

  1184.         public function encodeModeKanji($version)
    1185. 

  1185.         {
    1186. 

  1186.             try {
    1187. 

  1187. 

  1188.                 $bs = new QRbitrtream();
    1189. 

  1189.                 
    1190. 

  1190.                 $bs->appendNum(4, 0x8);
    1191. 

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

  1192. 

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

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

  1195.                     if($val <= 0x9ffc) {
    1196. 

  1196.                         $val -= 0x8140;
    1197. 

  1197.                     } else {
    1198. 

  1198.                         $val -= 0xc140;
    1199. 

  1199.                     }
    1200. 

  1200.                     
    1201. 

  1201.                     $h = ($val >> 8) * 0xc0;
    1202. 

  1202.                     $val = ($val & 0xff) + $h;
    1203. 

  1203. 

  1204.                     $bs->appendNum(13, $val);
    1205. 

  1205.                 }
    1206. 

  1206. 

  1207.                 $this->bstream = $bs;
    1208. 

  1208.                 return 0;
    1209. 

  1209.             
    1210. 

  1210.             } catch (Exception $e) {
    1211. 

  1211.                 return -1;
    1212. 

  1212.             }
    1213. 

  1213.         }
    1214. 

  1214. 

  1215.         //----------------------------------------------------------------------
    1216. 

  1216.         public function encodeModeStructure()
    1217. 

  1217.         {
    1218. 

  1218.             try {
    1219. 

  1219.                 $bs =  new QRbitstream();
    1220. 

  1220.                 
    1221. 

  1221.                 $bs->appendNum(4, 0x03);
    1222. 

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

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

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

  1225. 

  1226.                 $this->bstream = $bs;
    1227. 

  1227.                 return 0;
    1228. 

  1228.             
    1229. 

  1229.             } catch (Exception $e) {
    1230. 

  1230.                 return -1;
    1231. 

  1231.             }
    1232. 

  1232.         }
    1233. 

  1233.         
    1234. 

  1234.         //----------------------------------------------------------------------
    1235. 

  1235.         public function estimateBitStreamSizeOfEntry($version)
    1236. 

  1236.         {
    1237. 

  1237.             $bits = 0;
    1238. 

  1238. 

  1239.             if($version == 0) 
    1240. 

  1240.                 $version = 1;
    1241. 

  1241. 

  1242.             switch($this->mode) {
    1243. 

  1243.                 case QR_MODE_NUM:        $bits = QRinput::estimateBitsModeNum($this->size);    break;
    1244. 

  1244.                 case QR_MODE_AN:        $bits = QRinput::estimateBitsModeAn($this->size);    break;
    1245. 

  1245.                 case QR_MODE_8:            $bits = QRinput::estimateBitsMode8($this->size);    break;
    1246. 

  1246.                 case QR_MODE_KANJI:        $bits = QRinput::estimateBitsModeKanji($this->size);break;
    1247. 

  1247.                 case QR_MODE_STRUCTURE:    return STRUCTURE_HEADER_BITS;            
    1248. 

  1248.                 default:
    1249. 

  1249.                     return 0;
    1250. 

  1250.             }
    1251. 

  1251. 

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

  1253.             $m = 1 << $l;
    1254. 

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

  1255. 

  1256.             $bits += $num * (4 + $l);
    1257. 

  1257. 

  1258.             return $bits;
    1259. 

  1259.         }
    1260. 

  1260.         
    1261. 

  1261.         //----------------------------------------------------------------------
    1262. 

  1262.         public function encodeBitStream($version)
    1263. 

  1263.         {
    1264. 

  1264.             try {
    1265. 

  1265.             
    1266. 

  1266.                 unset($this->bstream);
    1267. 

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

  1268.                 
    1269. 

  1269.                 if($this->size > $words) {
    1270. 

  1270.                 
    1271. 

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

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

  1273. 

  1274.                     $st1->encodeBitStream($version);
    1275. 

  1275.                     $st2->encodeBitStream($version);
    1276. 

  1276.                     
    1277. 

  1277.                     $this->bstream = new QRbitstream();
    1278. 

  1278.                     $this->bstream->append($st1->bstream);
    1279. 

  1279.                     $this->bstream->append($st2->bstream);
    1280. 

  1280.                     
    1281. 

  1281.                     unset($st1);
    1282. 

  1282.                     unset($st2);
    1283. 

  1283.                     
    1284. 

  1284.                 } else {
    1285. 

  1285.                     
    1286. 

  1286.                     $ret = 0;
    1287. 

  1287.                     
    1288. 

  1288.                     switch($this->mode) {
    1289. 

  1289.                         case QR_MODE_NUM:        $ret = $this->encodeModeNum($version);    break;
    1290. 

  1290.                         case QR_MODE_AN:        $ret = $this->encodeModeAn($version);    break;
    1291. 

  1291.                         case QR_MODE_8:            $ret = $this->encodeMode8($version);    break;
    1292. 

  1292.                         case QR_MODE_KANJI:        $ret = $this->encodeModeKanji($version);break;
    1293. 

  1293.                         case QR_MODE_STRUCTURE:    $ret = $this->encodeModeStructure();    break;
    1294. 

  1294.                         
    1295. 

  1295.                         default:
    1296. 

  1296.                             break;
    1297. 

  1297.                     }
    1298. 

  1298.                     
    1299. 

  1299.                     if($ret < 0)
    1300. 

  1300.                         return -1;
    1301. 

  1301.                 }
    1302. 

  1302. 

  1303.                 return $this->bstream->size();
    1304. 

  1304.             
    1305. 

  1305.             } catch (Exception $e) {
    1306. 

  1306.                 return -1;
    1307. 

  1307.             }
    1308. 

  1308.         }
    1309. 

  1309.     };
    1310. 

  1310.     
    1311. 

  1311.     //##########################################################################
    1312. 

  1312. 

  1313.     class QRinput {
    1314. 

  1314. 

  1315.         public $items;
    1316. 

  1316.         
    1317. 

  1317.         private $version;
    1318. 

  1318.         private $level;
    1319. 

  1319.         
    1320. 

  1320.         //----------------------------------------------------------------------
    1321. 

  1321.         public function __construct($version = 0, $level = QR_ECLEVEL_L)
    1322. 

  1322.         {
    1323. 

  1323.             if ($version < 0 || $version > QRSPEC_VERSION_MAX || $level > QR_ECLEVEL_H) {
    1324. 

  1324.                 throw new Exception('Invalid version no');
    1325. 

  1325.                 return NULL;
    1326. 

  1326.             }
    1327. 

  1327.             
    1328. 

  1328.             $this->version = $version;
    1329. 

  1329.             $this->level = $level;
    1330. 

  1330.         }
    1331. 

  1331.         
    1332. 

  1332.         //----------------------------------------------------------------------
    1333. 

  1333.         public function getVersion()
    1334. 

  1334.         {
    1335. 

  1335.             return $this->version;
    1336. 

  1336.         }
    1337. 

  1337.         
    1338. 

  1338.         //----------------------------------------------------------------------
    1339. 

  1339.         public function setVersion($version)
    1340. 

  1340.         {
    1341. 

  1341.             if($version < 0 || $version > QRSPEC_VERSION_MAX) {
    1342. 

  1342.                 throw new Exception('Invalid version no');
    1343. 

  1343.                 return -1;
    1344. 

  1344.             }
    1345. 

  1345. 

  1346.             $this->version = $version;
    1347. 

  1347. 

  1348.             return 0;
    1349. 

  1349.         }
    1350. 

  1350.         
    1351. 

  1351.         //----------------------------------------------------------------------
    1352. 

  1352.         public function getErrorCorrectionLevel()
    1353. 

  1353.         {
    1354. 

  1354.             return $this->level;
    1355. 

  1355.         }
    1356. 

  1356. 

  1357.         //----------------------------------------------------------------------
    1358. 

  1358.         public function setErrorCorrectionLevel($level)
    1359. 

  1359.         {
    1360. 

  1360.             if($level > QR_ECLEVEL_H) {
    1361. 

  1361.                 throw new Exception('Invalid ECLEVEL');
    1362. 

  1362.                 return -1;
    1363. 

  1363.             }
    1364. 

  1364. 

  1365.             $this->level = $level;
    1366. 

  1366. 

  1367.             return 0;
    1368. 

  1368.         }
    1369. 

  1369.         
    1370. 

  1370.         //----------------------------------------------------------------------
    1371. 

  1371.         public function appendEntry(QRinputItem $entry)
    1372. 

  1372.         {
    1373. 

  1373.             $this->items[] = $entry;
    1374. 

  1374.         }
    1375. 

  1375.         
    1376. 

  1376.         //----------------------------------------------------------------------
    1377. 

  1377.         public function append($mode, $size, $data)
    1378. 

  1378.         {
    1379. 

  1379.             try {
    1380. 

  1380.                 $entry = new QRinputItem($mode, $size, $data);
    1381. 

  1381.                 $this->items[] = $entry;
    1382. 

  1382.                 return 0;
    1383. 

  1383.             } catch (Exception $e) {
    1384. 

  1384.                 return -1;
    1385. 

  1385.             }
    1386. 

  1386.         }
    1387. 

  1387.         
    1388. 

  1388.         //----------------------------------------------------------------------
    1389. 

  1389.         
    1390. 

  1390.         public function insertStructuredAppendHeader($size, $index, $parity)
    1391. 

  1391.         {
    1392. 

  1392.             if( $size > MAX_STRUCTURED_SYMBOLS ) {
    1393. 

  1393.                 throw new Exception('insertStructuredAppendHeader wrong size');
    1394. 

  1394.             }
    1395. 

  1395.             
    1396. 

  1396.             if( $index <= 0 || $index > MAX_STRUCTURED_SYMBOLS ) {
    1397. 

  1397.                 throw new Exception('insertStructuredAppendHeader wrong index');
    1398. 

  1398.             }
    1399. 

  1399. 

  1400.             $buf = array($size, $index, $parity);
    1401. 

  1401.             
    1402. 

  1402.             try {
    1403. 

  1403.                 $entry = new QRinputItem(QR_MODE_STRUCTURE, 3, buf);
    1404. 

  1404.                 array_unshift($this->items, $entry);
    1405. 

  1405.                 return 0;
    1406. 

  1406.             } catch (Exception $e) {
    1407. 

  1407.                 return -1;
    1408. 

  1408.             }
    1409. 

  1409.         }
    1410. 

  1410. 

  1411.         //----------------------------------------------------------------------
    1412. 

  1412.         public function calcParity()
    1413. 

  1413.         {
    1414. 

  1414.             $parity = 0;
    1415. 

  1415.             
    1416. 

  1416.             foreach($this->items as $item) {
    1417. 

  1417.                 if($item->mode != QR_MODE_STRUCTURE) {
    1418. 

  1418.                     for($i=$item->size-1; $i>=0; $i--) {
    1419. 

  1419.                         $parity ^= $item->data[$i];
    1420. 

  1420.                     }
    1421. 

  1421.                 }
    1422. 

  1422.             }
    1423. 

  1423. 

  1424.             return $parity;
    1425. 

  1425.         }
    1426. 

  1426.         
    1427. 

  1427.         //----------------------------------------------------------------------
    1428. 

  1428.         public static function checkModeNum($size, $data)
    1429. 

  1429.         {
    1430. 

  1430.             for($i=0; $i<$size; $i++) {
    1431. 

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

  1432.                     return false;
    1433. 

  1433.                 }
    1434. 

  1434.             }
    1435. 

  1435. 

  1436.             return true;
    1437. 

  1437.         }
    1438. 

  1438. 

  1439.         //----------------------------------------------------------------------
    1440. 

  1440.         public static function estimateBitsModeNum($size)
    1441. 

  1441.         {
    1442. 

  1442.             $w = (int)$size / 3;
    1443. 

  1443.             $bits = $w * 10;
    1444. 

  1444.             
    1445. 

  1445.             switch($size - $w * 3) {
    1446. 

  1446.                 case 1:
    1447. 

  1447.                     $bits += 4;
    1448. 

  1448.                     break;
    1449. 

  1449.                 case 2:
    1450. 

  1450.                     $bits += 7;
    1451. 

  1451.                     break;
    1452. 

  1452.                 default:
    1453. 

  1453.                     break;
    1454. 

  1454.             }
    1455. 

  1455. 

  1456.             return $bits;
    1457. 

  1457.         }
    1458. 

  1458.         
    1459. 

  1459.         //----------------------------------------------------------------------
    1460. 

  1460.         public static $anTable = array(
    1461. 

  1461.             -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
    1462. 

  1462.             -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
    1463. 

  1463.             36, -1, -1, -1, 37, 38, -1, -1, -1, -1, 39, 40, -1, 41, 42, 43,
    1464. 

  1464.              0,  1,  2,  3,  4,  5,  6,  7,  8,  9, 44, -1, -1, -1, -1, -1,
    1465. 

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

  1466.             25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, -1, -1, -1, -1, -1,
    1467. 

  1467.             -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
    1468. 

  1468.             -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1
    1469. 

  1469.         );
    1470. 

  1470.         
    1471. 

  1471.         //----------------------------------------------------------------------
    1472. 

  1472.         public static function lookAnTable($c)
    1473. 

  1473.         {
    1474. 

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

  1475.         }
    1476. 

  1476.         
    1477. 

  1477.         //----------------------------------------------------------------------
    1478. 

  1478.         public static function checkModeAn($size, $data)
    1479. 

  1479.         {
    1480. 

  1480.             for($i=0; $i<$size; $i++) {
    1481. 

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

  1482.                     return false;
    1483. 

  1483.                 }
    1484. 

  1484.             }
    1485. 

  1485. 

  1486.             return true;
    1487. 

  1487.         }
    1488. 

  1488.         
    1489. 

  1489.         //----------------------------------------------------------------------
    1490. 

  1490.         public static function estimateBitsModeAn($size)
    1491. 

  1491.         {
    1492. 

  1492.             $w = (int)($size / 2);
    1493. 

  1493.             $bits = $w * 11;
    1494. 

  1494.             
    1495. 

  1495.             if($size & 1) {
    1496. 

  1496.                 $bits += 6;
    1497. 

  1497.             }
    1498. 

  1498. 

  1499.             return $bits;
    1500. 

  1500.         }
    1501. 

  1501.     
    1502. 

  1502.         //----------------------------------------------------------------------
    1503. 

  1503.         public static function estimateBitsMode8($size)
    1504. 

  1504.         {
    1505. 

  1505.             return $size * 8;
    1506. 

  1506.         }
    1507. 

  1507.         
    1508. 

  1508.         //----------------------------------------------------------------------
    1509. 

  1509.         public function estimateBitsModeKanji($size)
    1510. 

  1510.         {
    1511. 

  1511.             return (int)(($size / 2) * 13);
    1512. 

  1512.         }
    1513. 

  1513.         
    1514. 

  1514.         //----------------------------------------------------------------------
    1515. 

  1515.         public static function checkModeKanji($size, $data)
    1516. 

  1516.         {
    1517. 

  1517.             if($size & 1)
    1518. 

  1518.                 return false;
    1519. 

  1519. 

  1520.             for($i=0; $i<$size; $i+=2) {
    1521. 

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

  1522.                 if( $val < 0x8140 
    1523. 

  1523.                 || ($val > 0x9ffc && $val < 0xe040) 
    1524. 

  1524.                 || $val > 0xebbf) {
    1525. 

  1525.                     return false;
    1526. 

  1526.                 }
    1527. 

  1527.             }
    1528. 

  1528. 

  1529.             return true;
    1530. 

  1530.         }
    1531. 

  1531. 

  1532.         /***********************************************************************
    1533. 

  1533.          * Validation
    1534. 

  1534.          **********************************************************************/
    1535. 

  1535. 

  1536.         public static function check($mode, $size, $data)
    1537. 

  1537.         {
    1538. 

  1538.             if($size <= 0) 
    1539. 

  1539.                 return false;
    1540. 

  1540. 

  1541.             switch($mode) {
    1542. 

  1542.                 case QR_MODE_NUM:       return self::checkModeNum($size, $data);   break;
    1543. 

  1543.                 case QR_MODE_AN:        return self::checkModeAn($size, $data);    break;
    1544. 

  1544.                 case QR_MODE_KANJI:     return self::checkModeKanji($size, $data); break;
    1545. 

  1545.                 case QR_MODE_8:         return true; break;
    1546. 

  1546.                 case QR_MODE_STRUCTURE: return true; break;
    1547. 

  1547.                 
    1548. 

  1548.                 default:
    1549. 

  1549.                     break;
    1550. 

  1550.             }
    1551. 

  1551. 

  1552.             return false;
    1553. 

  1553.         }
    1554. 

  1554.         
    1555. 

  1555.         
    1556. 

  1556.         //----------------------------------------------------------------------
    1557. 

  1557.         public function estimateBitStreamSize($version)
    1558. 

  1558.         {
    1559. 

  1559.             $bits = 0;
    1560. 

  1560. 

  1561.             foreach($this->items as $item) {
    1562. 

  1562.                 $bits += $item->estimateBitStreamSizeOfEntry($version);
    1563. 

  1563.             }
    1564. 

  1564. 

  1565.             return $bits;
    1566. 

  1566.         }
    1567. 

  1567.         
    1568. 

  1568.         //----------------------------------------------------------------------
    1569. 

  1569.         public function estimateVersion()
    1570. 

  1570.         {
    1571. 

  1571.             $version = 0;
    1572. 

  1572.             $prev = 0;
    1573. 

  1573.             do {
    1574. 

  1574.                 $prev = $version;
    1575. 

  1575.                 $bits = $this->estimateBitStreamSize($prev);
    1576. 

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

  1577.                 if ($version < 0) {
    1578. 

  1578.                     return -1;
    1579. 

  1579.                 }
    1580. 

  1580.             } while ($version > $prev);
    1581. 

  1581. 

  1582.             return $version;
    1583. 

  1583.         }
    1584. 

  1584.         
    1585. 

  1585.         //----------------------------------------------------------------------
    1586. 

  1586.         public static function lengthOfCode($mode, $version, $bits)
    1587. 

  1587.         {
    1588. 

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

  1589.             switch($mode) {
    1590. 

  1590.                 case QR_MODE_NUM:
    1591. 

  1591.                     $chunks = (int)($payload / 10);
    1592. 

  1592.                     $remain = $payload - $chunks * 10;
    1593. 

  1593.                     $size = $chunks * 3;
    1594. 

  1594.                     if($remain >= 7) {
    1595. 

  1595.                         $size += 2;
    1596. 

  1596.                     } else if($remain >= 4) {
    1597. 

  1597.                         $size += 1;
    1598. 

  1598.                     }
    1599. 

  1599.                     break;
    1600. 

  1600.                 case QR_MODE_AN:
    1601. 

  1601.                     $chunks = (int)($payload / 11);
    1602. 

  1602.                     $remain = $payload - $chunks * 11;
    1603. 

  1603.                     $size = $chunks * 2;
    1604. 

  1604.                     if($remain >= 6) 
    1605. 

  1605.                         $size++;
    1606. 

  1606.                     break;
    1607. 

  1607.                 case QR_MODE_8:
    1608. 

  1608.                     $size = (int)($payload / 8);
    1609. 

  1609.                     break;
    1610. 

  1610.                 case QR_MODE_KANJI:
    1611. 

  1611.                     $size = (int)(($payload / 13) * 2);
    1612. 

  1612.                     break;
    1613. 

  1613.                 case QR_MODE_STRUCTURE:
    1614. 

  1614.                     $size = (int)($payload / 8);
    1615. 

  1615.                     break;
    1616. 

  1616.                 default:
    1617. 

  1617.                     $size = 0;
    1618. 

  1618.                     break;
    1619. 

  1619.             }
    1620. 

  1620.             
    1621. 

  1621.             $maxsize = QRspec::maximumWords($mode, $version);
    1622. 

  1622.             if($size < 0) $size = 0;
    1623. 

  1623.             if($size > $maxsize) $size = $maxsize;
    1624. 

  1624. 

  1625.             return $size;
    1626. 

  1626.         }
    1627. 

  1627.         
    1628. 

  1628.         //----------------------------------------------------------------------
    1629. 

  1629.         public function createBitStream()
    1630. 

  1630.         {
    1631. 

  1631.             $total = 0;
    1632. 

  1632. 

  1633.             foreach($this->items as $item) {
    1634. 

  1634.                 $bits = $item->encodeBitStream($this->version);
    1635. 

  1635.                 
    1636. 

  1636.                 if($bits < 0) 
    1637. 

  1637.                     return -1;
    1638. 

  1638.                     
    1639. 

  1639.                 $total += $bits;
    1640. 

  1640.             }
    1641. 

  1641. 

  1642.             return $total;
    1643. 

  1643.         }
    1644. 

  1644.         
    1645. 

  1645.         //----------------------------------------------------------------------
    1646. 

  1646.         public function convertData()
    1647. 

  1647.         {
    1648. 

  1648.             $ver = $this->estimateVersion();
    1649. 

  1649.             if($ver > $this->getVersion()) {
    1650. 

  1650.                 $this->setVersion($ver);
    1651. 

  1651.             }
    1652. 

  1652. 

  1653.             for(;;) {
    1654. 

  1654.                 $bits = $this->createBitStream();
    1655. 

  1655.                 
    1656. 

  1656.                 if($bits < 0) 
    1657. 

  1657.                     return -1;
    1658. 

  1658.                     
    1659. 

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

  1660.                 if($ver < 0) {
    1661. 

  1661.                     throw new Exception('WRONG VERSION');
    1662. 

  1662.                     return -1;
    1663. 

  1663.                 } else if($ver > $this->getVersion()) {
    1664. 

  1664.                     $this->setVersion($ver);
    1665. 

  1665.                 } else {
    1666. 

  1666.                     break;
    1667. 

  1667.                 }
    1668. 

  1668.             }
    1669. 

  1669. 

  1670.             return 0;
    1671. 

  1671.         }
    1672. 

  1672.         
    1673. 

  1673.         //----------------------------------------------------------------------
    1674. 

  1674.         public function appendPaddingBit(&$bstream)
    1675. 

  1675.         {
    1676. 

  1676.             $bits = $bstream->size();
    1677. 

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

  1678.             $maxbits = $maxwords * 8;
    1679. 

  1679. 

  1680.             if ($maxbits == $bits) {
    1681. 

  1681.                 return 0;
    1682. 

  1682.             }
    1683. 

  1683. 

  1684.             if ($maxbits - $bits < 5) {
    1685. 

  1685.                 return $bstream->appendNum($maxbits - $bits, 0);
    1686. 

  1686.             }
    1687. 

  1687. 

  1688.             $bits += 4;
    1689. 

  1689.             $words = (int)(($bits + 7) / 8);
    1690. 

  1690. 

  1691.             $padding = new QRbitstream();
    1692. 

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

  1693.             
    1694. 

  1694.             if($ret < 0) 
    1695. 

  1695.                 return $ret;
    1696. 

  1696. 

  1697.             $padlen = $maxwords - $words;
    1698. 

  1698.             
    1699. 

  1699.             if($padlen > 0) {
    1700. 

  1700.                 
    1701. 

  1701.                 $padbuf = array();
    1702. 

  1702.                 for($i=0; $i<$padlen; $i++) {
    1703. 

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

  1704.                 }
    1705. 

  1705.                 
    1706. 

  1706.                 $ret = $padding->appendBytes($padlen, $padbuf);
    1707. 

  1707.                 
    1708. 

  1708.                 if($ret < 0)
    1709. 

  1709.                     return $ret;
    1710. 

  1710.                 
    1711. 

  1711.             }
    1712. 

  1712. 

  1713.             $ret = $bstream->append($padding);
    1714. 

  1714.             
    1715. 

  1715.             return $ret;
    1716. 

  1716.         }
    1717. 

  1717. 

  1718.         //----------------------------------------------------------------------
    1719. 

  1719.         public function mergeBitStream()
    1720. 

  1720.         {
    1721. 

  1721.             if($this->convertData() < 0) {
    1722. 

  1722.                 return null;
    1723. 

  1723.             }
    1724. 

  1724. 

  1725.             $bstream = new QRbitstream();
    1726. 

  1726.             
    1727. 

  1727.             foreach($this->items as $item) {
    1728. 

  1728.                 $ret = $bstream->append($item->bstream);
    1729. 

  1729.                 if($ret < 0) {
    1730. 

  1730.                     return null;
    1731. 

  1731.                 }
    1732. 

  1732.             }
    1733. 

  1733. 

  1734.             return $bstream;
    1735. 

  1735.         }
    1736. 

  1736. 

  1737.         //----------------------------------------------------------------------
    1738. 

  1738.         public function getBitStream()
    1739. 

  1739.         {
    1740. 

  1740. 

  1741.             $bstream = $this->mergeBitStream();
    1742. 

  1742.             
    1743. 

  1743.             if($bstream == null) {
    1744. 

  1744.                 return null;
    1745. 

  1745.             }
    1746. 

  1746.             
    1747. 

  1747.             $ret = $this->appendPaddingBit($bstream);
    1748. 

  1748.             if($ret < 0) {
    1749. 

  1749.                 return null;
    1750. 

  1750.             }
    1751. 

  1751. 

  1752.             return $bstream;
    1753. 

  1753.         }
    1754. 

  1754.         
    1755. 

  1755.         //----------------------------------------------------------------------
    1756. 

  1756.         public function getByteStream()
    1757. 

  1757.         {
    1758. 

  1758.             $bstream = $this->getBitStream();
    1759. 

  1759.             if($bstream == null) {
    1760. 

  1760.                 return null;
    1761. 

  1761.             }
    1762. 

  1762.             
    1763. 

  1763.             return $bstream->toByte();
    1764. 

  1764.         }
    1765. 

  1765.     }
    1766. 

  1766.         
    1767. 

  1767.         
    1768. 

  1768.     
    1769. 

  1769. 

  1770. 

  1771. 

  1772. //---- qrbitstream.php -----------------------------
    1773. 

  1773. 

  1774. 

  1775. 

  1776. 

  1777. /*
    1778. 

  1778.  * PHP QR Code encoder
    1779. 

  1779.  *
    1780. 

  1780.  * Bitstream class
    1781. 

  1781.  *
    1782. 

  1782.  * Based on libqrencode C library distributed under LGPL 2.1
    1783. 

  1783.  * Copyright (C) 2006, 2007, 2008, 2009 Kentaro Fukuchi <fukuchi@megaui.net>
    1784. 

  1784.  *
    1785. 

  1785.  * PHP QR Code is distributed under LGPL 3
    1786. 

  1786.  * Copyright (C) 2010 Dominik Dzienia <deltalab at poczta dot fm>
    1787. 

  1787.  *
    1788. 

  1788.  * This library is free software; you can redistribute it and/or
    1789. 

  1789.  * modify it under the terms of the GNU Lesser General Public
    1790. 

  1790.  * License as published by the Free Software Foundation; either
    1791. 

  1791.  * version 3 of the License, or any later version.
    1792. 

  1792.  *
    1793. 

  1793.  * This library is distributed in the hope that it will be useful,
    1794. 

  1794.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
    1795. 

  1795.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
    1796. 

  1796.  * Lesser General Public License for more details.
    1797. 

  1797.  *
    1798. 

  1798.  * You should have received a copy of the GNU Lesser General Public
    1799. 

  1799.  * License along with this library; if not, write to the Free Software
    1800. 

  1800.  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
    1801. 

  1801.  */
    1802. 

  1802.      
    1803. 

  1803.     class QRbitstream {
    1804. 

  1804.     
    1805. 

  1805.         public $data = array();
    1806. 

  1806.         
    1807. 

  1807.         //----------------------------------------------------------------------
    1808. 

  1808.         public function size()
    1809. 

  1809.         {
    1810. 

  1810.             return count($this->data);
    1811. 

  1811.         }
    1812. 

  1812.         
    1813. 

  1813.         //----------------------------------------------------------------------
    1814. 

  1814.         public function allocate($setLength)
    1815. 

  1815.         {
    1816. 

  1816.             $this->data = array_fill(0, $setLength, 0);
    1817. 

  1817.             return 0;
    1818. 

  1818.         }
    1819. 

  1819.     
    1820. 

  1820.         //----------------------------------------------------------------------
    1821. 

  1821.         public static function newFromNum($bits, $num)
    1822. 

  1822.         {
    1823. 

  1823.             $bstream = new QRbitstream();
    1824. 

  1824.             $bstream->allocate($bits);
    1825. 

  1825.             
    1826. 

  1826.             $mask = 1 << ($bits - 1);
    1827. 

  1827.             for($i=0; $i<$bits; $i++) {
    1828. 

  1828.                 if($num & $mask) {
    1829. 

  1829.                     $bstream->data[$i] = 1;
    1830. 

  1830.                 } else {
    1831. 

  1831.                     $bstream->data[$i] = 0;
    1832. 

  1832.                 }
    1833. 

  1833.                 $mask = $mask >> 1;
    1834. 

  1834.             }
    1835. 

  1835. 

  1836.             return $bstream;
    1837. 

  1837.         }
    1838. 

  1838.         
    1839. 

  1839.         //----------------------------------------------------------------------
    1840. 

  1840.         public static function newFromBytes($size, $data)
    1841. 

  1841.         {
    1842. 

  1842.             $bstream = new QRbitstream();
    1843. 

  1843.             $bstream->allocate($size * 8);
    1844. 

  1844.             $p=0;
    1845. 

  1845. 

  1846.             for($i=0; $i<$size; $i++) {
    1847. 

  1847.                 $mask = 0x80;
    1848. 

  1848.                 for($j=0; $j<8; $j++) {
    1849. 

  1849.                     if($data[$i] & $mask) {
    1850. 

  1850.                         $bstream->data[$p] = 1;
    1851. 

  1851.                     } else {
    1852. 

  1852.                         $bstream->data[$p] = 0;
    1853. 

  1853.                     }
    1854. 

  1854.                     $p++;
    1855. 

  1855.                     $mask = $mask >> 1;
    1856. 

  1856.                 }
    1857. 

  1857.             }
    1858. 

  1858. 

  1859.             return $bstream;
    1860. 

  1860.         }
    1861. 

  1861.         
    1862. 

  1862.         //----------------------------------------------------------------------
    1863. 

  1863.         public function append(QRbitstream $arg)
    1864. 

  1864.         {
    1865. 

  1865.             if (is_null($arg)) {
    1866. 

  1866.                 return -1;
    1867. 

  1867.             }
    1868. 

  1868.             
    1869. 

  1869.             if($arg->size() == 0) {
    1870. 

  1870.                 return 0;
    1871. 

  1871.             }
    1872. 

  1872.             
    1873. 

  1873.             if($this->size() == 0) {
    1874. 

  1874.                 $this->data = $arg->data;
    1875. 

  1875.                 return 0;
    1876. 

  1876.             }
    1877. 

  1877.             
    1878. 

  1878.             $this->data = array_values(array_merge($this->data, $arg->data));
    1879. 

  1879. 

  1880.             return 0;
    1881. 

  1881.         }
    1882. 

  1882.         
    1883. 

  1883.         //----------------------------------------------------------------------
    1884. 

  1884.         public function appendNum($bits, $num)
    1885. 

  1885.         {
    1886. 

  1886.             if ($bits == 0) 
    1887. 

  1887.                 return 0;
    1888. 

  1888. 

  1889.             $b = QRbitstream::newFromNum($bits, $num);
    1890. 

  1890.             
    1891. 

  1891.             if(is_null($b))
    1892. 

  1892.                 return -1;
    1893. 

  1893. 

  1894.             $ret = $this->append($b);
    1895. 

  1895.             unset($b);
    1896. 

  1896. 

  1897.             return $ret;
    1898. 

  1898.         }
    1899. 

  1899. 

  1900.         //----------------------------------------------------------------------
    1901. 

  1901.         public function appendBytes($size, $data)
    1902. 

  1902.         {
    1903. 

  1903.             if ($size == 0) 
    1904. 

  1904.                 return 0;
    1905. 

  1905. 

  1906.             $b = QRbitstream::newFromBytes($size, $data);
    1907. 

  1907.             
    1908. 

  1908.             if(is_null($b))
    1909. 

  1909.                 return -1;
    1910. 

  1910. 

  1911.             $ret = $this->append($b);
    1912. 

  1912.             unset($b);
    1913. 

  1913. 

  1914.             return $ret;
    1915. 

  1915.         }
    1916. 

  1916.         
    1917. 

  1917.         //----------------------------------------------------------------------
    1918. 

  1918.         public function toByte()
    1919. 

  1919.         {
    1920. 

  1920.         
    1921. 

  1921.             $size = $this->size();
    1922. 

  1922. 

  1923.             if($size == 0) {
    1924. 

  1924.                 return array();
    1925. 

  1925.             }
    1926. 

  1926.             
    1927. 

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

  1928.             $bytes = (int)($size / 8);
    1929. 

  1929. 

  1930.             $p = 0;
    1931. 

  1931.             
    1932. 

  1932.             for($i=0; $i<$bytes; $i++) {
    1933. 

  1933.                 $v = 0;
    1934. 

  1934.                 for($j=0; $j<8; $j++) {
    1935. 

  1935.                     $v = $v << 1;
    1936. 

  1936.                     $v |= $this->data[$p];
    1937. 

  1937.                     $p++;
    1938. 

  1938.                 }
    1939. 

  1939.                 $data[$i] = $v;
    1940. 

  1940.             }
    1941. 

  1941.             
    1942. 

  1942.             if($size & 7) {
    1943. 

  1943.                 $v = 0;
    1944. 

  1944.                 for($j=0; $j<($size & 7); $j++) {
    1945. 

  1945.                     $v = $v << 1;
    1946. 

  1946.                     $v |= $this->data[$p];
    1947. 

  1947.                     $p++;
    1948. 

  1948.                 }
    1949. 

  1949.                 $data[$bytes] = $v;
    1950. 

  1950.             }
    1951. 

  1951. 

  1952.             return $data;
    1953. 

  1953.         }
    1954. 

  1954. 

  1955.     }
    1956. 

  1956. 

  1957. 

  1958. 

  1959. 

  1960. //---- qrsplit.php -----------------------------
    1961. 

  1961. 

  1962. 

  1963. 

  1964. 

  1965. /*
    1966. 

  1966.  * PHP QR Code encoder
    1967. 

  1967.  *
    1968. 

  1968.  * Input splitting classes
    1969. 

  1969.  *
    1970. 

  1970.  * Based on libqrencode C library distributed under LGPL 2.1
    1971. 

  1971.  * Copyright (C) 2006, 2007, 2008, 2009 Kentaro Fukuchi <fukuchi@megaui.net>
    1972. 

  1972.  *
    1973. 

  1973.  * PHP QR Code is distributed under LGPL 3
    1974. 

  1974.  * Copyright (C) 2010 Dominik Dzienia <deltalab at poczta dot fm>
    1975. 

  1975.  *
    1976. 

  1976.  * The following data / specifications are taken from
    1977. 

  1977.  * "Two dimensional symbol -- QR-code -- Basic Specification" (JIS X0510:2004)
    1978. 

  1978.  *  or
    1979. 

  1979.  * "Automatic identification and data capture techniques -- 
    1980. 

  1980.  *  QR Code 2005 bar code symbology specification" (ISO/IEC 18004:2006)
    1981. 

  1981.  *
    1982. 

  1982.  * This library is free software; you can redistribute it and/or
    1983. 

  1983.  * modify it under the terms of the GNU Lesser General Public
    1984. 

  1984.  * License as published by the Free Software Foundation; either
    1985. 

  1985.  * version 3 of the License, or any later version.
    1986. 

  1986.  *
    1987. 

  1987.  * This library is distributed in the hope that it will be useful,
    1988. 

  1988.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
    1989. 

  1989.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
    1990. 

  1990.  * Lesser General Public License for more details.
    1991. 

  1991.  *
    1992. 

  1992.  * You should have received a copy of the GNU Lesser General Public
    1993. 

  1993.  * License along with this library; if not, write to the Free Software
    1994. 

  1994.  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
    1995. 

  1995.  */
    1996. 

  1996.     class QRsplit {
    1997. 

  1997. 

  1998.         public $dataStr = '';
    1999. 

  1999.         public $input;
    2000. 

  2000.         public $modeHint;
    2001. 

  2001. 

  2002.         //----------------------------------------------------------------------
    2003. 

  2003.         public function __construct($dataStr, $input, $modeHint) 
    2004. 

  2004.         {
    2005. 

  2005.             $this->dataStr  = $dataStr;
    2006. 

  2006.             $this->input    = $input;
    2007. 

  2007.             $this->modeHint = $modeHint;
    2008. 

  2008.         }
    2009. 

  2009.         
    2010. 

  2010.         //----------------------------------------------------------------------
    2011. 

  2011.         public static function isdigitat($str, $pos)
    2012. 

  2012.         {    
    2013. 

  2013.             if ($pos >= strlen($str))
    2014. 

  2014.                 return false;
    2015. 

  2015.             
    2016. 

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

  2017.         }
    2018. 

  2018.         
    2019. 

  2019.         //----------------------------------------------------------------------
    2020. 

  2020.         public static function isalnumat($str, $pos)
    2021. 

  2021.         {
    2022. 

  2022.             if ($pos >= strlen($str))
    2023. 

  2023.                 return false;
    2024. 

  2024.                 
    2025. 

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

  2026.         }
    2027. 

  2027. 

  2028.         //----------------------------------------------------------------------
    2029. 

  2029.         public function identifyMode($pos)
    2030. 

  2030.         {
    2031. 

  2031.             if ($pos >= strlen($this->dataStr)) 
    2032. 

  2032.                 return QR_MODE_NUL;
    2033. 

  2033.                 
    2034. 

  2034.             $c = $this->dataStr[$pos];
    2035. 

  2035.             
    2036. 

  2036.             if(self::isdigitat($this->dataStr, $pos)) {
    2037. 

  2037.                 return QR_MODE_NUM;
    2038. 

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

  2039.                 return QR_MODE_AN;
    2040. 

  2040.             } else if($this->modeHint == QR_MODE_KANJI) {
    2041. 

  2041.             
    2042. 

  2042.                 if ($pos+1 < strlen($this->dataStr)) 
    2043. 

  2043.                 {
    2044. 

  2044.                     $d = $this->dataStr[$pos+1];
    2045. 

  2045.                     $word = (ord($c) << 8) | ord($d);
    2046. 

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

  2047.                         return QR_MODE_KANJI;
    2048. 

  2048.                     }
    2049. 

  2049.                 }
    2050. 

  2050.             }
    2051. 

  2051. 

  2052.             return QR_MODE_8;
    2053. 

  2053.         } 
    2054. 

  2054.         
    2055. 

  2055.         //----------------------------------------------------------------------
    2056. 

  2056.         public function eatNum()
    2057. 

  2057.         {
    2058. 

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

  2059. 

  2060.             $p = 0;
    2061. 

  2061.             while(self::isdigitat($this->dataStr, $p)) {
    2062. 

  2062.                 $p++;
    2063. 

  2063.             }
    2064. 

  2064.             
    2065. 

  2065.             $run = $p;
    2066. 

  2066.             $mode = $this->identifyMode($p);
    2067. 

  2067.             
    2068. 

  2068.             if($mode == QR_MODE_8) {
    2069. 

  2069.                 $dif = QRinput::estimateBitsModeNum($run) + 4 + $ln
    2070. 

  2070.                      + QRinput::estimateBitsMode8(1)         // + 4 + l8
    2071. 

  2071.                      - QRinput::estimateBitsMode8($run + 1); // - 4 - l8
    2072. 

  2072.                 if($dif > 0) {
    2073. 

  2073.                     return $this->eat8();
    2074. 

  2074.                 }
    2075. 

  2075.             }
    2076. 

  2076.             if($mode == QR_MODE_AN) {
    2077. 

  2077.                 $dif = QRinput::estimateBitsModeNum($run) + 4 + $ln
    2078. 

  2078.                      + QRinput::estimateBitsModeAn(1)        // + 4 + la
    2079. 

  2079.                      - QRinput::estimateBitsModeAn($run + 1);// - 4 - la
    2080. 

  2080.                 if($dif > 0) {
    2081. 

  2081.                     return $this->eatAn();
    2082. 

  2082.                 }
    2083. 

  2083.             }
    2084. 

  2084.             
    2085. 

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

  2086.             if($ret < 0)
    2087. 

  2087.                 return -1;
    2088. 

  2088. 

  2089.             return $run;
    2090. 

  2090.         }
    2091. 

  2091.         
    2092. 

  2092.         //----------------------------------------------------------------------
    2093. 

  2093.         public function eatAn()
    2094. 

  2094.         {
    2095. 

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

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

  2097. 

  2098.             $p = 0;
    2099. 

  2099.             
    2100. 

  2100.             while(self::isalnumat($this->dataStr, $p)) {
    2101. 

  2101.                 if(self::isdigitat($this->dataStr, $p)) {
    2102. 

  2102.                     $q = $p;
    2103. 

  2103.                     while(self::isdigitat($this->dataStr, $q)) {
    2104. 

  2104.                         $q++;
    2105. 

  2105.                     }
    2106. 

  2106.                     
    2107. 

  2107.                     $dif = QRinput::estimateBitsModeAn($p) // + 4 + la
    2108. 

  2108.                          + QRinput::estimateBitsModeNum($q - $p) + 4 + $ln
    2109. 

  2109.                          - QRinput::estimateBitsModeAn($q); // - 4 - la
    2110. 

  2110.                          
    2111. 

  2111.                     if($dif < 0) {
    2112. 

  2112.                         break;
    2113. 

  2113.                     } else {
    2114. 

  2114.                         $p = $q;
    2115. 

  2115.                     }
    2116. 

  2116.                 } else {
    2117. 

  2117.                     $p++;
    2118. 

  2118.                 }
    2119. 

  2119.             }
    2120. 

  2120. 

  2121.             $run = $p;
    2122. 

  2122. 

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

  2124.                 $dif = QRinput::estimateBitsModeAn($run) + 4 + $la
    2125. 

  2125.                      + QRinput::estimateBitsMode8(1) // + 4 + l8
    2126. 

  2126.                       - QRinput::estimateBitsMode8($run + 1); // - 4 - l8
    2127. 

  2127.                 if($dif > 0) {
    2128. 

  2128.                     return $this->eat8();
    2129. 

  2129.                 }
    2130. 

  2130.             }
    2131. 

  2131. 

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

  2133.             if($ret < 0)
    2134. 

  2134.                 return -1;
    2135. 

  2135. 

  2136.             return $run;
    2137. 

  2137.         }
    2138. 

  2138.         
    2139. 

  2139.         //----------------------------------------------------------------------
    2140. 

  2140.         public function eatKanji()
    2141. 

  2141.         {
    2142. 

  2142.             $p = 0;
    2143. 

  2143.             
    2144. 

  2144.             while($this->identifyMode($p) == QR_MODE_KANJI) {
    2145. 

  2145.                 $p += 2;
    2146. 

  2146.             }
    2147. 

  2147.             
    2148. 

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

  2149.             if($ret < 0)
    2150. 

  2150.                 return -1;
    2151. 

  2151. 

  2152.             return $run;
    2153. 

  2153.         }
    2154. 

  2154. 

  2155.         //----------------------------------------------------------------------
    2156. 

  2156.         public function eat8()
    2157. 

  2157.         {
    2158. 

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

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

  2160. 

  2161.             $p = 1;
    2162. 

  2162.             $dataStrLen = strlen($this->dataStr);
    2163. 

  2163.             
    2164. 

  2164.             while($p < $dataStrLen) {
    2165. 

  2165.                 
    2166. 

  2166.                 $mode = $this->identifyMode($p);
    2167. 

  2167.                 if($mode == QR_MODE_KANJI) {
    2168. 

  2168.                     break;
    2169. 

  2169.                 }
    2170. 

  2170.                 if($mode == QR_MODE_NUM) {
    2171. 

  2171.                     $q = $p;
    2172. 

  2172.                     while(self::isdigitat($this->dataStr, $q)) {
    2173. 

  2173.                         $q++;
    2174. 

  2174.                     }
    2175. 

  2175.                     $dif = QRinput::estimateBitsMode8($p) // + 4 + l8
    2176. 

  2176.                          + QRinput::estimateBitsModeNum($q - $p) + 4 + $ln
    2177. 

  2177.                          - QRinput::estimateBitsMode8($q); // - 4 - l8
    2178. 

  2178.                     if($dif < 0) {
    2179. 

  2179.                         break;
    2180. 

  2180.                     } else {
    2181. 

  2181.                         $p = $q;
    2182. 

  2182.                     }
    2183. 

  2183.                 } else if($mode == QR_MODE_AN) {
    2184. 

  2184.                     $q = $p;
    2185. 

  2185.                     while(self::isalnumat($this->dataStr, $q)) {
    2186. 

  2186.                         $q++;
    2187. 

  2187.                     }
    2188. 

  2188.                     $dif = QRinput::estimateBitsMode8($p)  // + 4 + l8
    2189. 

  2189.                          + QRinput::estimateBitsModeAn($q - $p) + 4 + $la
    2190. 

  2190.                          - QRinput::estimateBitsMode8($q); // - 4 - l8
    2191. 

  2191.                     if($dif < 0) {
    2192. 

  2192.                         break;
    2193. 

  2193.                     } else {
    2194. 

  2194.                         $p = $q;
    2195. 

  2195.                     }
    2196. 

  2196.                 } else {
    2197. 

  2197.                     $p++;
    2198. 

  2198.                 }
    2199. 

  2199.             }
    2200. 

  2200. 

  2201.             $run = $p;
    2202. 

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

  2203.             
    2204. 

  2204.             if($ret < 0)
    2205. 

  2205.                 return -1;
    2206. 

  2206. 

  2207.             return $run;
    2208. 

  2208.         }
    2209. 

  2209. 

  2210.         //----------------------------------------------------------------------
    2211. 

  2211.         public function splitString()
    2212. 

  2212.         {
    2213. 

  2213.             while (strlen($this->dataStr) > 0)
    2214. 

  2214.             {
    2215. 

  2215.                 if($this->dataStr == '')
    2216. 

  2216.                     return 0;
    2217. 

  2217. 

  2218.                 $mode = $this->identifyMode(0);
    2219. 

  2219.                 
    2220. 

  2220.                 switch ($mode) {
    2221. 

  2221.                     case QR_MODE_NUM: $length = $this->eatNum(); break;
    2222. 

  2222.                     case QR_MODE_AN:  $length = $this->eatAn(); break;
    2223. 

  2223.                     case QR_MODE_KANJI:
    2224. 

  2224.                         if ($hint == QR_MODE_KANJI)
    2225. 

  2225.                                 $length = $this->eatKanji();
    2226. 

  2226.                         else    $length = $this->eat8();
    2227. 

  2227.                         break;
    2228. 

  2228.                     default: $length = $this->eat8(); break;
    2229. 

  2229.                 
    2230. 

  2230.                 }
    2231. 

  2231. 

  2232.                 if($length == 0) return 0;
    2233. 

  2233.                 if($length < 0)  return -1;
    2234. 

  2234.                 
    2235. 

  2235.                 $this->dataStr = substr($this->dataStr, $length);
    2236. 

  2236.             }
    2237. 

  2237.         }
    2238. 

  2238. 

  2239.         //----------------------------------------------------------------------
    2240. 

  2240.         public function toUpper()
    2241. 

  2241.         {
    2242. 

  2242.             $stringLen = strlen($this->dataStr);
    2243. 

  2243.             $p = 0;
    2244. 

  2244.             
    2245. 

  2245.             while ($p<$stringLen) {
    2246. 

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

  2247.                 if($mode == QR_MODE_KANJI) {
    2248. 

  2248.                     $p += 2;
    2249. 

  2249.                 } else {
    2250. 

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

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

  2252.                     }
    2253. 

  2253.                     $p++;
    2254. 

  2254.                 }
    2255. 

  2255.             }
    2256. 

  2256. 

  2257.             return $this->dataStr;
    2258. 

  2258.         }
    2259. 

  2259. 

  2260.         //----------------------------------------------------------------------
    2261. 

  2261.         public static function splitStringToQRinput($string, QRinput $input, $modeHint, $casesensitive = true)
    2262. 

  2262.         {
    2263. 

  2263.             if(is_null($string) || $string == '\0' || $string == '') {
    2264. 

  2264.                 throw new Exception('empty string!!!');
    2265. 

  2265.             }
    2266. 

  2266. 

  2267.             $split = new QRsplit($string, $input, $modeHint);
    2268. 

  2268.             
    2269. 

  2269.             if(!$casesensitive)
    2270. 

  2270.                 $split->toUpper();
    2271. 

  2271.                 
    2272. 

  2272.             return $split->splitString();
    2273. 

  2273.         }
    2274. 

  2274.     }
    2275. 

  2275. 

  2276. 

  2277. 

  2278. //---- qrrscode.php -----------------------------
    2279. 

  2279. 

  2280. 

  2281. 

  2282. 

  2283. /*
    2284. 

  2284.  * PHP QR Code encoder
    2285. 

  2285.  *
    2286. 

  2286.  * Reed-Solomon error correction support
    2287. 

  2287.  * 
    2288. 

  2288.  * Copyright (C) 2002, 2003, 2004, 2006 Phil Karn, KA9Q
    2289. 

  2289.  * (libfec is released under the GNU Lesser General Public License.)
    2290. 

  2290.  *
    2291. 

  2291.  * Based on libqrencode C library distributed under LGPL 2.1
    2292. 

  2292.  * Copyright (C) 2006, 2007, 2008, 2009 Kentaro Fukuchi <fukuchi@megaui.net>
    2293. 

  2293.  *
    2294. 

  2294.  * PHP QR Code is distributed under LGPL 3
    2295. 

  2295.  * Copyright (C) 2010 Dominik Dzienia <deltalab at poczta dot fm>
    2296. 

  2296.  *
    2297. 

  2297.  * This library is free software; you can redistribute it and/or
    2298. 

  2298.  * modify it under the terms of the GNU Lesser General Public
    2299. 

  2299.  * License as published by the Free Software Foundation; either
    2300. 

  2300.  * version 3 of the License, or any later version.
    2301. 

  2301.  *
    2302. 

  2302.  * This library is distributed in the hope that it will be useful,
    2303. 

  2303.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
    2304. 

  2304.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
    2305. 

  2305.  * Lesser General Public License for more details.
    2306. 

  2306.  *
    2307. 

  2307.  * You should have received a copy of the GNU Lesser General Public
    2308. 

  2308.  * License along with this library; if not, write to the Free Software
    2309. 

  2309.  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
    2310. 

  2310.  */
    2311. 

  2311.  
    2312. 

  2312.     class QRrsItem {
    2313. 

  2313.     
    2314. 

  2314.         public $mm;                  // Bits per symbol 
    2315. 

  2315.         public $nn;                  // Symbols per block (= (1<<mm)-1) 
    2316. 

  2316.         public $alpha_to = array();  // log lookup table 
    2317. 

  2317.         public $index_of = array();  // Antilog lookup table 
    2318. 

  2318.         public $genpoly = array();   // Generator polynomial 
    2319. 

  2319.         public $nroots;              // Number of generator roots = number of parity symbols 
    2320. 

  2320.         public $fcr;                 // First consecutive root, index form 
    2321. 

  2321.         public $prim;                // Primitive element, index form 
    2322. 

  2322.         public $iprim;               // prim-th root of 1, index form 
    2323. 

  2323.         public $pad;                 // Padding bytes in shortened block 
    2324. 

  2324.         public $gfpoly;
    2325. 

  2325.     
    2326. 

  2326.         //----------------------------------------------------------------------
    2327. 

  2327.         public function modnn($x)
    2328. 

  2328.         {
    2329. 

  2329.             while ($x >= $this->nn) {
    2330. 

  2330.                 $x -= $this->nn;
    2331. 

  2331.                 $x = ($x >> $this->mm) + ($x & $this->nn);
    2332. 

  2332.             }
    2333. 

  2333.             
    2334. 

  2334.             return $x;
    2335. 

  2335.         }
    2336. 

  2336.         
    2337. 

  2337.         //----------------------------------------------------------------------
    2338. 

  2338.         public static function init_rs_char($symsize, $gfpoly, $fcr, $prim, $nroots, $pad)
    2339. 

  2339.         {
    2340. 

  2340.             // Common code for intializing a Reed-Solomon control block (char or int symbols)
    2341. 

  2341.             // Copyright 2004 Phil Karn, KA9Q
    2342. 

  2342.             // May be used under the terms of the GNU Lesser General Public License (LGPL)
    2343. 

  2343. 

  2344.             $rs = null;
    2345. 

  2345.             
    2346. 

  2346.             // Check parameter ranges
    2347. 

  2347.             if($symsize < 0 || $symsize > 8)                     return $rs;
    2348. 

  2348.             if($fcr < 0 || $fcr >= (1<<$symsize))                return $rs;
    2349. 

  2349.             if($prim <= 0 || $prim >= (1<<$symsize))             return $rs;
    2350. 

  2350.             if($nroots < 0 || $nroots >= (1<<$symsize))          return $rs; // Can't have more roots than symbol values!
    2351. 

  2351.             if($pad < 0 || $pad >= ((1<<$symsize) -1 - $nroots)) return $rs; // Too much padding
    2352. 

  2352. 

  2353.             $rs = new QRrsItem();
    2354. 

  2354.             $rs->mm = $symsize;
    2355. 

  2355.             $rs->nn = (1<<$symsize)-1;
    2356. 

  2356.             $rs->pad = $pad;
    2357. 

  2357. 

  2358.             $rs->alpha_to = array_fill(0, $rs->nn+1, 0);
    2359. 

  2359.             $rs->index_of = array_fill(0, $rs->nn+1, 0);
    2360. 

  2360.           
    2361. 

  2361.             // PHP style macro replacement ;)
    2362. 

  2362.             $NN =& $rs->nn;
    2363. 

  2363.             $A0 =& $NN;
    2364. 

  2364.             
    2365. 

  2365.             // Generate Galois field lookup tables
    2366. 

  2366.             $rs->index_of[0] = $A0; // log(zero) = -inf
    2367. 

  2367.             $rs->alpha_to[$A0] = 0; // alpha**-inf = 0
    2368. 

  2368.             $sr = 1;
    2369. 

  2369.           
    2370. 

  2370.             for($i=0; $i<$rs->nn; $i++) {
    2371. 

  2371.                 $rs->index_of[$sr] = $i;
    2372. 

  2372.                 $rs->alpha_to[$i] = $sr;
    2373. 

  2373.                 $sr <<= 1;
    2374. 

  2374.                 if($sr & (1<<$symsize)) {
    2375. 

  2375.                     $sr ^= $gfpoly;
    2376. 

  2376.                 }
    2377. 

  2377.                 $sr &= $rs->nn;
    2378. 

  2378.             }
    2379. 

  2379.             
    2380. 

  2380.             if($sr != 1){
    2381. 

  2381.                 // field generator polynomial is not primitive!
    2382. 

  2382.                 $rs = NULL;
    2383. 

  2383.                 return $rs;
    2384. 

  2384.             }
    2385. 

  2385. 

  2386.             /* Form RS code generator polynomial from its roots */
    2387. 

  2387.             $rs->genpoly = array_fill(0, $nroots+1, 0);
    2388. 

  2388.         
    2389. 

  2389.             $rs->fcr = $fcr;
    2390. 

  2390.             $rs->prim = $prim;
    2391. 

  2391.             $rs->nroots = $nroots;
    2392. 

  2392.             $rs->gfpoly = $gfpoly;
    2393. 

  2393. 

  2394.             /* Find prim-th root of 1, used in decoding */
    2395. 

  2395.             for($iprim=1;($iprim % $prim) != 0;$iprim += $rs->nn)
    2396. 

  2396.             ; // intentional empty-body loop!
    2397. 

  2397.             
    2398. 

  2398.             $rs->iprim = (int)($iprim / $prim);
    2399. 

  2399.             $rs->genpoly[0] = 1;
    2400. 

  2400.             
    2401. 

  2401.             for ($i = 0,$root=$fcr*$prim; $i < $nroots; $i++, $root += $prim) {
    2402. 

  2402.                 $rs->genpoly[$i+1] = 1;
    2403. 

  2403. 

  2404.                 // Multiply rs->genpoly[] by  @**(root + x)
    2405. 

  2405.                 for ($j = $i; $j > 0; $j--) {
    2406. 

  2406.                     if ($rs->genpoly[$j] != 0) {
    2407. 

  2407.                         $rs->genpoly[$j] = $rs->genpoly[$j-1] ^ $rs->alpha_to[$rs->modnn($rs->index_of[$rs->genpoly[$j]] + $root)];
    2408. 

  2408.                     } else {
    2409. 

  2409.                         $rs->genpoly[$j] = $rs->genpoly[$j-1];
    2410. 

  2410.                     }
    2411. 

  2411.                 }
    2412. 

  2412.                 // rs->genpoly[0] can never be zero
    2413. 

  2413.                 $rs->genpoly[0] = $rs->alpha_to[$rs->modnn($rs->index_of[$rs->genpoly[0]] + $root)];
    2414. 

  2414.             }
    2415. 

  2415.             
    2416. 

  2416.             // convert rs->genpoly[] to index form for quicker encoding
    2417. 

  2417.             for ($i = 0; $i <= $nroots; $i++)
    2418. 

  2418.                 $rs->genpoly[$i] = $rs->index_of[$rs->genpoly[$i]];
    2419. 

  2419. 

  2420.             return $rs;
    2421. 

  2421.         }
    2422. 

  2422.         
    2423. 

  2423.         //----------------------------------------------------------------------
    2424. 

  2424.         public function encode_rs_char($data, &$parity)
    2425. 

  2425.         {
    2426. 

  2426.             $MM       =& $this->mm;
    2427. 

  2427.             $NN       =& $this->nn;
    2428. 

  2428.             $ALPHA_TO =& $this->alpha_to;
    2429. 

  2429.             $INDEX_OF =& $this->index_of;
    2430. 

  2430.             $GENPOLY  =& $this->genpoly;
    2431. 

  2431.             $NROOTS   =& $this->nroots;
    2432. 

  2432.             $FCR      =& $this->fcr;
    2433. 

  2433.             $PRIM     =& $this->prim;
    2434. 

  2434.             $IPRIM    =& $this->iprim;
    2435. 

  2435.             $PAD      =& $this->pad;
    2436. 

  2436.             $A0       =& $NN;
    2437. 

  2437. 

  2438.             $parity = array_fill(0, $NROOTS, 0);
    2439. 

  2439. 

  2440.             for($i=0; $i< ($NN-$NROOTS-$PAD); $i++) {
    2441. 

  2441.                 
    2442. 

  2442.                 $feedback = $INDEX_OF[$data[$i] ^ $parity[0]];
    2443. 

  2443.                 if($feedback != $A0) {      
    2444. 

  2444.                     // feedback term is non-zero
    2445. 

  2445.             
    2446. 

  2446.                     // This line is unnecessary when GENPOLY[NROOTS] is unity, as it must
    2447. 

  2447.                     // always be for the polynomials constructed by init_rs()
    2448. 

  2448.                     $feedback = $this->modnn($NN - $GENPOLY[$NROOTS] + $feedback);
    2449. 

  2449.             
    2450. 

  2450.                     for($j=1;$j<$NROOTS;$j++) {
    2451. 

  2451.                         $parity[$j] ^= $ALPHA_TO[$this->modnn($feedback + $GENPOLY[$NROOTS-$j])];
    2452. 

  2452.                     }
    2453. 

  2453.                 }
    2454. 

  2454.                 
    2455. 

  2455.                 // Shift 
    2456. 

  2456.                 array_shift($parity);
    2457. 

  2457.                 if($feedback != $A0) {
    2458. 

  2458.                     array_push($parity, $ALPHA_TO[$this->modnn($feedback + $GENPOLY[0])]);
    2459. 

  2459.                 } else {
    2460. 

  2460.                     array_push($parity, 0);
    2461. 

  2461.                 }
    2462. 

  2462.             }
    2463. 

  2463.         }
    2464. 

  2464.     }
    2465. 

  2465.     
    2466. 

  2466.     //##########################################################################
    2467. 

  2467.     
    2468. 

  2468.     class QRrs {
    2469. 

  2469.     
    2470. 

  2470.         public static $items = array();
    2471. 

  2471.         
    2472. 

  2472.         //----------------------------------------------------------------------
    2473. 

  2473.         public static function init_rs($symsize, $gfpoly, $fcr, $prim, $nroots, $pad)
    2474. 

  2474.         {
    2475. 

  2475.             foreach(self::$items as $rs) {
    2476. 

  2476.                 if($rs->pad != $pad)       continue;
    2477. 

  2477.                 if($rs->nroots != $nroots) continue;
    2478. 

  2478.                 if($rs->mm != $symsize)    continue;
    2479. 

  2479.                 if($rs->gfpoly != $gfpoly) continue;
    2480. 

  2480.                 if($rs->fcr != $fcr)       continue;
    2481. 

  2481.                 if($rs->prim != $prim)     continue;
    2482. 

  2482. 

  2483.                 return $rs;
    2484. 

  2484.             }
    2485. 

  2485. 

  2486.             $rs = QRrsItem::init_rs_char($symsize, $gfpoly, $fcr, $prim, $nroots, $pad);
    2487. 

  2487.             array_unshift(self::$items, $rs);
    2488. 

  2488. 

  2489.             return $rs;
    2490. 

  2490.         }
    2491. 

  2491.     }
    2492. 

  2492. 

  2493. 

  2494. 

  2495. //---- qrmask.php -----------------------------
    2496. 

  2496. 

  2497. 

  2498. 

  2499. 

  2500. /*
    2501. 

  2501.  * PHP QR Code encoder
    2502. 

  2502.  *
    2503. 

  2503.  * Masking
    2504. 

  2504.  *
    2505. 

  2505.  * Based on libqrencode C library distributed under LGPL 2.1
    2506. 

  2506.  * Copyright (C) 2006, 2007, 2008, 2009 Kentaro Fukuchi <fukuchi@megaui.net>
    2507. 

  2507.  *
    2508. 

  2508.  * PHP QR Code is distributed under LGPL 3
    2509. 

  2509.  * Copyright (C) 2010 Dominik Dzienia <deltalab at poczta dot fm>
    2510. 

  2510.  *
    2511. 

  2511.  * This library is free software; you can redistribute it and/or
    2512. 

  2512.  * modify it under the terms of the GNU Lesser General Public
    2513. 

  2513.  * License as published by the Free Software Foundation; either
    2514. 

  2514.  * version 3 of the License, or any later version.
    2515. 

  2515.  *
    2516. 

  2516.  * This library is distributed in the hope that it will be useful,
    2517. 

  2517.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
    2518. 

  2518.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
    2519. 

  2519.  * Lesser General Public License for more details.
    2520. 

  2520.  *
    2521. 

  2521.  * You should have received a copy of the GNU Lesser General Public
    2522. 

  2522.  * License along with this library; if not, write to the Free Software
    2523. 

  2523.  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
    2524. 

  2524.  */
    2525. 

  2525.  
    2526. 

  2526. 	define('N1', 3);
    2527. 

  2527. 	define('N2', 3);
    2528. 

  2528. 	define('N3', 40);
    2529. 

  2529. 	define('N4', 10);
    2530. 

  2530. 

  2531. 	class QRmask {
    2532. 

  2532. 	
    2533. 

  2533. 		public $runLength = array();
    2534. 

  2534. 		
    2535. 

  2535. 		//----------------------------------------------------------------------
    2536. 

  2536. 		public function __construct() 
    2537. 

  2537.         {
    2538. 

  2538.             $this->runLength = array_fill(0, QRSPEC_WIDTH_MAX + 1, 0);
    2539. 

  2539.         }
    2540. 

  2540.         
    2541. 

  2541.         //----------------------------------------------------------------------
    2542. 

  2542.         public function writeFormatInformation($width, &$frame, $mask, $level)
    2543. 

  2543.         {
    2544. 

  2544.             $blacks = 0;
    2545. 

  2545.             $format =  QRspec::getFormatInfo($mask, $level);
    2546. 

  2546. 

  2547.             for($i=0; $i<8; $i++) {
    2548. 

  2548.                 if($format & 1) {
    2549. 

  2549.                     $blacks += 2;
    2550. 

  2550.                     $v = 0x85;
    2551. 

  2551.                 } else {
    2552. 

  2552.                     $v = 0x84;
    2553. 

  2553.                 }
    2554. 

  2554.                 
    2555. 

  2555.                 $frame[8][$width - 1 - $i] = chr($v);
    2556. 

  2556.                 if($i < 6) {
    2557. 

  2557.                     $frame[$i][8] = chr($v);
    2558. 

  2558.                 } else {
    2559. 

  2559.                     $frame[$i + 1][8] = chr($v);
    2560. 

  2560.                 }
    2561. 

  2561.                 $format = $format >> 1;
    2562. 

  2562.             }
    2563. 

  2563.             
    2564. 

  2564.             for($i=0; $i<7; $i++) {
    2565. 

  2565.                 if($format & 1) {
    2566. 

  2566.                     $blacks += 2;
    2567. 

  2567.                     $v = 0x85;
    2568. 

  2568.                 } else {
    2569. 

  2569.                     $v = 0x84;
    2570. 

  2570.                 }
    2571. 

  2571.                 
    2572. 

  2572.                 $frame[$width - 7 + $i][8] = chr($v);
    2573. 

  2573.                 if($i == 0) {
    2574. 

  2574.                     $frame[8][7] = chr($v);
    2575. 

  2575.                 } else {
    2576. 

  2576.                     $frame[8][6 - $i] = chr($v);
    2577. 

  2577.                 }
    2578. 

  2578.                 
    2579. 

  2579.                 $format = $format >> 1;
    2580. 

  2580.             }
    2581. 

  2581. 

  2582.             return $blacks;
    2583. 

  2583.         }
    2584. 

  2584.         
    2585. 

  2585.         //----------------------------------------------------------------------
    2586. 

  2586.         public function mask0($x, $y) { return ($x+$y)&1;                       }
    2587. 

  2587.         public function mask1($x, $y) { return ($y&1);                          }
    2588. 

  2588.         public function mask2($x, $y) { return ($x%3);                          }
    2589. 

  2589.         public function mask3($x, $y) { return ($x+$y)%3;                       }
    2590. 

  2590.         public function mask4($x, $y) { return (((int)($y/2))+((int)($x/3)))&1; }
    2591. 

  2591.         public function mask5($x, $y) { return (($x*$y)&1)+($x*$y)%3;           }
    2592. 

  2592.         public function mask6($x, $y) { return ((($x*$y)&1)+($x*$y)%3)&1;       }
    2593. 

  2593.         public function mask7($x, $y) { return ((($x*$y)%3)+(($x+$y)&1))&1;     }
    2594. 

  2594.         
    2595. 

  2595.         //----------------------------------------------------------------------
    2596. 

  2596.         private function generateMaskNo($maskNo, $width, $frame)
    2597. 

  2597.         {
    2598. 

  2598.             $bitMask = array_fill(0, $width, array_fill(0, $width, 0));
    2599. 

  2599.             
    2600. 

  2600.             for($y=0; $y<$width; $y++) {
    2601. 

  2601.                 for($x=0; $x<$width; $x++) {
    2602. 

  2602.                     if(ord($frame[$y][$x]) & 0x80) {
    2603. 

  2603.                         $bitMask[$y][$x] = 0;
    2604. 

  2604.                     } else {
    2605. 

  2605.                         $maskFunc = call_user_func(array($this, 'mask'.$maskNo), $x, $y);
    2606. 

  2606.                         $bitMask[$y][$x] = ($maskFunc == 0)?1:0;
    2607. 

  2607.                     }
    2608. 

  2608.                     
    2609. 

  2609.                 }
    2610. 

  2610.             }
    2611. 

  2611.             
    2612. 

  2612.             return $bitMask;
    2613. 

  2613.         }
    2614. 

  2614.         
    2615. 

  2615.         //----------------------------------------------------------------------
    2616. 

  2616.         public static function serial($bitFrame)
    2617. 

  2617.         {
    2618. 

  2618.             $codeArr = array();
    2619. 

  2619.             
    2620. 

  2620.             foreach ($bitFrame as $line)
    2621. 

  2621.                 $codeArr[] = join('', $line);
    2622. 

  2622.                 
    2623. 

  2623.             return gzcompress(join("\n", $codeArr), 9);
    2624. 

  2624.         }
    2625. 

  2625.         
    2626. 

  2626.         //----------------------------------------------------------------------
    2627. 

  2627.         public static function unserial($code)
    2628. 

  2628.         {
    2629. 

  2629.             $codeArr = array();
    2630. 

  2630.             
    2631. 

  2631.             $codeLines = explode("\n", gzuncompress($code));
    2632. 

  2632.             foreach ($codeLines as $line)
    2633. 

  2633.                 $codeArr[] = str_split($line);
    2634. 

  2634.             
    2635. 

  2635.             return $codeArr;
    2636. 

  2636.         }
    2637. 

  2637.         
    2638. 

  2638.         //----------------------------------------------------------------------
    2639. 

  2639.         public function makeMaskNo($maskNo, $width, $s, &$d, $maskGenOnly = false) 
    2640. 

  2640.         {
    2641. 

  2641.             $b = 0;
    2642. 

  2642.             $bitMask = array();
    2643. 

  2643.             
    2644. 

  2644.             $fileName = QR_CACHE_DIR.'mask_'.$maskNo.DIRECTORY_SEPARATOR.'mask_'.$width.'_'.$maskNo.'.dat';
    2645. 

  2645. 

  2646.             if (QR_CACHEABLE) {
    2647. 

  2647.                 if (file_exists($fileName)) {
    2648. 

  2648.                     $bitMask = self::unserial(file_get_contents($fileName));
    2649. 

  2649.                 } else {
    2650. 

  2650.                     $bitMask = $this->generateMaskNo($maskNo, $width, $s, $d);
    2651. 

  2651.                     if (!file_exists(QR_CACHE_DIR.'mask_'.$maskNo))
    2652. 

  2652.                         mkdir(QR_CACHE_DIR.'mask_'.$maskNo);
    2653. 

  2653.                     file_put_contents($fileName, self::serial($bitMask));
    2654. 

  2654.                 }
    2655. 

  2655.             } else {
    2656. 

  2656.                 $bitMask = $this->generateMaskNo($maskNo, $width, $s, $d);
    2657. 

  2657.             }
    2658. 

  2658. 

  2659.             if ($maskGenOnly)
    2660. 

  2660.                 return;
    2661. 

  2661.                 
    2662. 

  2662.             $d = $s;
    2663. 

  2663. 

  2664.             for($y=0; $y<$width; $y++) {
    2665. 

  2665.                 for($x=0; $x<$width; $x++) {
    2666. 

  2666.                     if($bitMask[$y][$x] == 1) {
    2667. 

  2667.                         $d[$y][$x] = chr(ord($s[$y][$x]) ^ (int)$bitMask[$y][$x]);
    2668. 

  2668.                     }
    2669. 

  2669.                     $b += (int)(ord($d[$y][$x]) & 1);
    2670. 

  2670.                 }
    2671. 

  2671.             }
    2672. 

  2672. 

  2673.             return $b;
    2674. 

  2674.         }
    2675. 

  2675.         
    2676. 

  2676.         //----------------------------------------------------------------------
    2677. 

  2677.         public function makeMask($width, $frame, $maskNo, $level)
    2678. 

  2678.         {
    2679. 

  2679.             $masked = array_fill(0, $width, str_repeat("\0", $width));
    2680. 

  2680.             $this->makeMaskNo($maskNo, $width, $frame, $masked);
    2681. 

  2681.             $this->writeFormatInformation($width, $masked, $maskNo, $level);
    2682. 

  2682.        
    2683. 

  2683.             return $masked;
    2684. 

  2684.         }
    2685. 

  2685.         
    2686. 

  2686.         //----------------------------------------------------------------------
    2687. 

  2687.         public function calcN1N3($length)
    2688. 

  2688.         {
    2689. 

  2689.             $demerit = 0;
    2690. 

  2690. 

  2691.             for($i=0; $i<$length; $i++) {
    2692. 

  2692.                 
    2693. 

  2693.                 if($this->runLength[$i] >= 5) {
    2694. 

  2694.                     $demerit += (N1 + ($this->runLength[$i] - 5));
    2695. 

  2695.                 }
    2696. 

  2696.                 if($i & 1) {
    2697. 

  2697.                     if(($i >= 3) && ($i < ($length-2)) && ($this->runLength[$i] % 3 == 0)) {
    2698. 

  2698.                         $fact = (int)($this->runLength[$i] / 3);
    2699. 

  2699.                         if(($this->runLength[$i-2] == $fact) &&
    2700. 

  2700.                            ($this->runLength[$i-1] == $fact) &&
    2701. 

  2701.                            ($this->runLength[$i+1] == $fact) &&
    2702. 

  2702.                            ($this->runLength[$i+2] == $fact)) {
    2703. 

  2703.                             if(($this->runLength[$i-3] < 0) || ($this->runLength[$i-3] >= (4 * $fact))) {
    2704. 

  2704.                                 $demerit += N3;
    2705. 

  2705.                             } else if((($i+3) >= $length) || ($this->runLength[$i+3] >= (4 * $fact))) {
    2706. 

  2706.                                 $demerit += N3;
    2707. 

  2707.                             }
    2708. 

  2708.                         }
    2709. 

  2709.                     }
    2710. 

  2710.                 }
    2711. 

  2711.             }
    2712. 

  2712.             return $demerit;
    2713. 

  2713.         }
    2714. 

  2714.         
    2715. 

  2715.         //----------------------------------------------------------------------
    2716. 

  2716.         public function evaluateSymbol($width, $frame)
    2717. 

  2717.         {
    2718. 

  2718.             $head = 0;
    2719. 

  2719.             $demerit = 0;
    2720. 

  2720. 

  2721.             for($y=0; $y<$width; $y++) {
    2722. 

  2722.                 $head = 0;
    2723. 

  2723.                 $this->runLength[0] = 1;
    2724. 

  2724.                 
    2725. 

  2725.                 $frameY = $frame[$y];
    2726. 

  2726.                 
    2727. 

  2727.                 if ($y>0)
    2728. 

  2728.                     $frameYM = $frame[$y-1];
    2729. 

  2729.                 
    2730. 

  2730.                 for($x=0; $x<$width; $x++) {
    2731. 

  2731.                     if(($x > 0) && ($y > 0)) {
    2732. 

  2732.                         $b22 = ord($frameY[$x]) & ord($frameY[$x-1]) & ord($frameYM[$x]) & ord($frameYM[$x-1]);
    2733. 

  2733.                         $w22 = ord($frameY[$x]) | ord($frameY[$x-1]) | ord($frameYM[$x]) | ord($frameYM[$x-1]);
    2734. 

  2734.                         
    2735. 

  2735.                         if(($b22 | ($w22 ^ 1))&1) {                                                                     
    2736. 

  2736.                             $demerit += N2;
    2737. 

  2737.                         }
    2738. 

  2738.                     }
    2739. 

  2739.                     if(($x == 0) && (ord($frameY[$x]) & 1)) {
    2740. 

  2740.                         $this->runLength[0] = -1;
    2741. 

  2741.                         $head = 1;
    2742. 

  2742.                         $this->runLength[$head] = 1;
    2743. 

  2743.                     } else if($x > 0) {
    2744. 

  2744.                         if((ord($frameY[$x]) ^ ord($frameY[$x-1])) & 1) {
    2745. 

  2745.                             $head++;
    2746. 

  2746.                             $this->runLength[$head] = 1;
    2747. 

  2747.                         } else {
    2748. 

  2748.                             $this->runLength[$head]++;
    2749. 

  2749.                         }
    2750. 

  2750.                     }
    2751. 

  2751.                 }
    2752. 

  2752.     
    2753. 

  2753.                 $demerit += $this->calcN1N3($head+1);
    2754. 

  2754.             }
    2755. 

  2755. 

  2756.             for($x=0; $x<$width; $x++) {
    2757. 

  2757.                 $head = 0;
    2758. 

  2758.                 $this->runLength[0] = 1;
    2759. 

  2759.                 
    2760. 

  2760.                 for($y=0; $y<$width; $y++) {
    2761. 

  2761.                     if($y == 0 && (ord($frame[$y][$x]) & 1)) {
    2762. 

  2762.                         $this->runLength[0] = -1;
    2763. 

  2763.                         $head = 1;
    2764. 

  2764.                         $this->runLength[$head] = 1;
    2765. 

  2765.                     } else if($y > 0) {
    2766. 

  2766.                         if((ord($frame[$y][$x]) ^ ord($frame[$y-1][$x])) & 1) {
    2767. 

  2767.                             $head++;
    2768. 

  2768.                             $this->runLength[$head] = 1;
    2769. 

  2769.                         } else {
    2770. 

  2770.                             $this->runLength[$head]++;
    2771. 

  2771.                         }
    2772. 

  2772.                     }
    2773. 

  2773.                 }
    2774. 

  2774.             
    2775. 

  2775.                 $demerit += $this->calcN1N3($head+1);
    2776. 

  2776.             }
    2777. 

  2777. 

  2778.             return $demerit;
    2779. 

  2779.         }
    2780. 

  2780.         
    2781. 

  2781.         
    2782. 

  2782.         //----------------------------------------------------------------------
    2783. 

  2783.         public function mask($width, $frame, $level)
    2784. 

  2784.         {
    2785. 

  2785.             $minDemerit = PHP_INT_MAX;
    2786. 

  2786.             $bestMaskNum = 0;
    2787. 

  2787.             $bestMask = array();
    2788. 

  2788.             
    2789. 

  2789.             $checked_masks = array(0,1,2,3,4,5,6,7);
    2790. 

  2790.             
    2791. 

  2791.             if (QR_FIND_FROM_RANDOM !== false) {
    2792. 

  2792.             
    2793. 

  2793.                 $howManuOut = 8-(QR_FIND_FROM_RANDOM % 9);
    2794. 

  2794.                 for ($i = 0; $i <  $howManuOut; $i++) {
    2795. 

  2795.                     $remPos = rand (0, count($checked_masks)-1);
    2796. 

  2796.                     unset($checked_masks[$remPos]);
    2797. 

  2797.                     $checked_masks = array_values($checked_masks);
    2798. 

  2798.                 }
    2799. 

  2799.             
    2800. 

  2800.             }
    2801. 

  2801.             
    2802. 

  2802.             $bestMask = $frame;
    2803. 

  2803.              
    2804. 

  2804.             foreach($checked_masks as $i) {
    2805. 

  2805.                 $mask = array_fill(0, $width, str_repeat("\0", $width));
    2806. 

  2806. 

  2807.                 $demerit = 0;
    2808. 

  2808.                 $blacks = 0;
    2809. 

  2809.                 $blacks  = $this->makeMaskNo($i, $width, $frame, $mask);
    2810. 

  2810.                 $blacks += $this->writeFormatInformation($width, $mask, $i, $level);
    2811. 

  2811.                 $blacks  = (int)(100 * $blacks / ($width * $width));
    2812. 

  2812.                 $demerit = (int)((int)(abs($blacks - 50) / 5) * N4);
    2813. 

  2813.                 $demerit += $this->evaluateSymbol($width, $mask);
    2814. 

  2814.                 
    2815. 

  2815.                 if($demerit < $minDemerit) {
    2816. 

  2816.                     $minDemerit = $demerit;
    2817. 

  2817.                     $bestMask = $mask;
    2818. 

  2818.                     $bestMaskNum = $i;
    2819. 

  2819.                 }
    2820. 

  2820.             }
    2821. 

  2821.             
    2822. 

  2822.             return $bestMask;
    2823. 

  2823.         }
    2824. 

  2824.         
    2825. 

  2825.         //----------------------------------------------------------------------
    2826. 

  2826.     }
    2827. 

  2827. 

  2828. 

  2829. 

  2830. 

  2831. //---- qrencode.php -----------------------------
    2832. 

  2832. 

  2833. 

  2834. 

  2835. 

  2836. /*
    2837. 

  2837.  * PHP QR Code encoder
    2838. 

  2838.  *
    2839. 

  2839.  * Main encoder classes.
    2840. 

  2840.  *
    2841. 

  2841.  * Based on libqrencode C library distributed under LGPL 2.1
    2842. 

  2842.  * Copyright (C) 2006, 2007, 2008, 2009 Kentaro Fukuchi <fukuchi@megaui.net>
    2843. 

  2843.  *
    2844. 

  2844.  * PHP QR Code is distributed under LGPL 3
    2845. 

  2845.  * Copyright (C) 2010 Dominik Dzienia <deltalab at poczta dot fm>
    2846. 

  2846.  *
    2847. 

  2847.  * This library is free software; you can redistribute it and/or
    2848. 

  2848.  * modify it under the terms of the GNU Lesser General Public
    2849. 

  2849.  * License as published by the Free Software Foundation; either
    2850. 

  2850.  * version 3 of the License, or any later version.
    2851. 

  2851.  *
    2852. 

  2852.  * This library is distributed in the hope that it will be useful,
    2853. 

  2853.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
    2854. 

  2854.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
    2855. 

  2855.  * Lesser General Public License for more details.
    2856. 

  2856.  *
    2857. 

  2857.  * You should have received a copy of the GNU Lesser General Public
    2858. 

  2858.  * License along with this library; if not, write to the Free Software
    2859. 

  2859.  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
    2860. 

  2860.  */
    2861. 

  2861.  
    2862. 

  2862.     class QRrsblock {
    2863. 

  2863.         public $dataLength;
    2864. 

  2864.         public $data = array();
    2865. 

  2865.         public $eccLength;
    2866. 

  2866.         public $ecc = array();
    2867. 

  2867.         
    2868. 

  2868.         public function __construct($dl, $data, $el, &$ecc, QRrsItem $rs)
    2869. 

  2869.         {
    2870. 

  2870.             $rs->encode_rs_char($data, $ecc);
    2871. 

  2871.         
    2872. 

  2872.             $this->dataLength = $dl;
    2873. 

  2873.             $this->data = $data;
    2874. 

  2874.             $this->eccLength = $el;
    2875. 

  2875.             $this->ecc = $ecc;
    2876. 

  2876.         }
    2877. 

  2877.     };
    2878. 

  2878.     
    2879. 

  2879.     //##########################################################################
    2880. 

  2880. 

  2881.     class QRrawcode {
    2882. 

  2882.         public $version;
    2883. 

  2883.         public $datacode = array();
    2884. 

  2884.         public $ecccode = array();
    2885. 

  2885.         public $blocks;
    2886. 

  2886.         public $rsblocks = array(); //of RSblock
    2887. 

  2887.         public $count;
    2888. 

  2888.         public $dataLength;
    2889. 

  2889.         public $eccLength;
    2890. 

  2890.         public $b1;
    2891. 

  2891.         
    2892. 

  2892.         //----------------------------------------------------------------------
    2893. 

  2893.         public function __construct(QRinput $input)
    2894. 

  2894.         {
    2895. 

  2895.             $spec = array(0,0,0,0,0);
    2896. 

  2896.             
    2897. 

  2897.             $this->datacode = $input->getByteStream();
    2898. 

  2898.             if(is_null($this->datacode)) {
    2899. 

  2899.                 throw new Exception('null imput string');
    2900. 

  2900.             }
    2901. 

  2901. 

  2902.             QRspec::getEccSpec($input->getVersion(), $input->getErrorCorrectionLevel(), $spec);
    2903. 

  2903. 

  2904.             $this->version = $input->getVersion();
    2905. 

  2905.             $this->b1 = QRspec::rsBlockNum1($spec);
    2906. 

  2906.             $this->dataLength = QRspec::rsDataLength($spec);
    2907. 

  2907.             $this->eccLength = QRspec::rsEccLength($spec);
    2908. 

  2908.             $this->ecccode = array_fill(0, $this->eccLength, 0);
    2909. 

  2909.             $this->blocks = QRspec::rsBlockNum($spec);
    2910. 

  2910.             
    2911. 

  2911.             $ret = $this->init($spec);
    2912. 

  2912.             if($ret < 0) {
    2913. 

  2913.                 throw new Exception('block alloc error');
    2914. 

  2914.                 return null;
    2915. 

  2915.             }
    2916. 

  2916. 

  2917.             $this->count = 0;
    2918. 

  2918.         }
    2919. 

  2919.         
    2920. 

  2920.         //----------------------------------------------------------------------
    2921. 

  2921.         public function init(array $spec)
    2922. 

  2922.         {
    2923. 

  2923.             $dl = QRspec::rsDataCodes1($spec);
    2924. 

  2924.             $el = QRspec::rsEccCodes1($spec);
    2925. 

  2925.             $rs = QRrs::init_rs(8, 0x11d, 0, 1, $el, 255 - $dl - $el);
    2926. 

  2926.             
    2927. 

  2927. 

  2928.             $blockNo = 0;
    2929. 

  2929.             $dataPos = 0;
    2930. 

  2930.             $eccPos = 0;
    2931. 

  2931.             for($i=0; $i<QRspec::rsBlockNum1($spec); $i++) {
    2932. 

  2932.                 $ecc = array_slice($this->ecccode,$eccPos);
    2933. 

  2933.                 $this->rsblocks[$blockNo] = new QRrsblock($dl, array_slice($this->datacode, $dataPos), $el,  $ecc, $rs);
    2934. 

  2934.                 $this->ecccode = array_merge(array_slice($this->ecccode,0, $eccPos), $ecc);
    2935. 

  2935.                 
    2936. 

  2936.                 $dataPos += $dl;
    2937. 

  2937.                 $eccPos += $el;
    2938. 

  2938.                 $blockNo++;
    2939. 

  2939.             }
    2940. 

  2940. 

  2941.             if(QRspec::rsBlockNum2($spec) == 0)
    2942. 

  2942.                 return 0;
    2943. 

  2943. 

  2944.             $dl = QRspec::rsDataCodes2($spec);
    2945. 

  2945.             $el = QRspec::rsEccCodes2($spec);
    2946. 

  2946.             $rs = QRrs::init_rs(8, 0x11d, 0, 1, $el, 255 - $dl - $el);
    2947. 

  2947.             
    2948. 

  2948.             if($rs == NULL) return -1;
    2949. 

  2949.             
    2950. 

  2950.             for($i=0; $i<QRspec::rsBlockNum2($spec); $i++) {
    2951. 

  2951.                 $ecc = array_slice($this->ecccode,$eccPos);
    2952. 

  2952.                 $this->rsblocks[$blockNo] = new QRrsblock($dl, array_slice($this->datacode, $dataPos), $el, $ecc, $rs);
    2953. 

  2953.                 $this->ecccode = array_merge(array_slice($this->ecccode,0, $eccPos), $ecc);
    2954. 

  2954.                 
    2955. 

  2955.                 $dataPos += $dl;
    2956. 

  2956.                 $eccPos += $el;
    2957. 

  2957.                 $blockNo++;
    2958. 

  2958.             }
    2959. 

  2959. 

  2960.             return 0;
    2961. 

  2961.         }
    2962. 

  2962.         
    2963. 

  2963.         //----------------------------------------------------------------------
    2964. 

  2964.         public function getCode()
    2965. 

  2965.         {
    2966. 

  2966.             $ret;
    2967. 

  2967. 

  2968.             if($this->count < $this->dataLength) {
    2969. 

  2969.                 $row = $this->count % $this->blocks;
    2970. 

  2970.                 $col = $this->count / $this->blocks;
    2971. 

  2971.                 if($col >= $this->rsblocks[0]->dataLength) {
    2972. 

  2972.                     $row += $this->b1;
    2973. 

  2973.                 }
    2974. 

  2974.                 $ret = $this->rsblocks[$row]->data[$col];
    2975. 

  2975.             } else if($this->count < $this->dataLength + $this->eccLength) {
    2976. 

  2976.                 $row = ($this->count - $this->dataLength) % $this->blocks;
    2977. 

  2977.                 $col = ($this->count - $this->dataLength) / $this->blocks;
    2978. 

  2978.                 $ret = $this->rsblocks[$row]->ecc[$col];
    2979. 

  2979.             } else {
    2980. 

  2980.                 return 0;
    2981. 

  2981.             }
    2982. 

  2982.             $this->count++;
    2983. 

  2983.             
    2984. 

  2984.             return $ret;
    2985. 

  2985.         }
    2986. 

  2986.     }
    2987. 

  2987. 

  2988.     //##########################################################################
    2989. 

  2989.     
    2990. 

  2990.     class QRcode {
    2991. 

  2991.     
    2992. 

  2992.         public $version;
    2993. 

  2993.         public $width;
    2994. 

  2994.         public $data; 
    2995. 

  2995.         
    2996. 

  2996.         //----------------------------------------------------------------------
    2997. 

  2997.         public function encodeMask(QRinput $input, $mask)
    2998. 

  2998.         {
    2999. 

  2999.             if($input->getVersion() < 0 || $input->getVersion() > QRSPEC_VERSION_MAX) {
    3000. 

  3000.                 throw new Exception('wrong version');
    3001. 

  3001.             }
    3002. 

  3002.             if($input->getErrorCorrectionLevel() > QR_ECLEVEL_H) {
    3003. 

  3003.                 throw new Exception('wrong level');
    3004. 

  3004.             }
    3005. 

  3005. 

  3006.             $raw = new QRrawcode($input);
    3007. 

  3007.             
    3008. 

  3008.             QRtools::markTime('after_raw');
    3009. 

  3009.             
    3010. 

  3010.             $version = $raw->version;
    3011. 

  3011.             $width = QRspec::getWidth($version);
    3012. 

  3012.             $frame = QRspec::newFrame($version);
    3013. 

  3013.             
    3014. 

  3014.             $filler = new FrameFiller($width, $frame);
    3015. 

  3015.             if(is_null($filler)) {
    3016. 

  3016.                 return NULL;
    3017. 

  3017.             }
    3018. 

  3018. 

  3019.             // inteleaved data and ecc codes
    3020. 

  3020.             for($i=0; $i<$raw->dataLength + $raw->eccLength; $i++) {
    3021. 

  3021.                 $code = $raw->getCode();
    3022. 

  3022.                 $bit = 0x80;
    3023. 

  3023.                 for($j=0; $j<8; $j++) {
    3024. 

  3024.                     $addr = $filler->next();
    3025. 

  3025.                     $filler->setFrameAt($addr, 0x02 | (($bit & $code) != 0));
    3026. 

  3026.                     $bit = $bit >> 1;
    3027. 

  3027.                 }
    3028. 

  3028.             }
    3029. 

  3029.             
    3030. 

  3030.             QRtools::markTime('after_filler');
    3031. 

  3031.             
    3032. 

  3032.             unset($raw);
    3033. 

  3033.             
    3034. 

  3034.             // remainder bits
    3035. 

  3035.             $j = QRspec::getRemainder($version);
    3036. 

  3036.             for($i=0; $i<$j; $i++) {
    3037. 

  3037.                 $addr = $filler->next();
    3038. 

  3038.                 $filler->setFrameAt($addr, 0x02);
    3039. 

  3039.             }
    3040. 

  3040.             
    3041. 

  3041.             $frame = $filler->frame;
    3042. 

  3042.             unset($filler);
    3043. 

  3043.             
    3044. 

  3044.             
    3045. 

  3045.             // masking
    3046. 

  3046.             $maskObj = new QRmask();
    3047. 

  3047.             if($mask < 0) {
    3048. 

  3048.             
    3049. 

  3049.                 if (QR_FIND_BEST_MASK) {
    3050. 

  3050.                     $masked = $maskObj->mask($width, $frame, $input->getErrorCorrectionLevel());
    3051. 

  3051.                 } else {
    3052. 

  3052.                     $masked = $maskObj->makeMask($width, $frame, (intval(QR_DEFAULT_MASK) % 8), $input->getErrorCorrectionLevel());
    3053. 

  3053.                 }
    3054. 

  3054.             } else {
    3055. 

  3055.                 $masked = $maskObj->makeMask($width, $frame, $mask, $input->getErrorCorrectionLevel());
    3056. 

  3056.             }
    3057. 

  3057.             
    3058. 

  3058.             if($masked == NULL) {
    3059. 

  3059.                 return NULL;
    3060. 

  3060.             }
    3061. 

  3061.             
    3062. 

  3062.             QRtools::markTime('after_mask');
    3063. 

  3063.             
    3064. 

  3064.             $this->version = $version;
    3065. 

  3065.             $this->width = $width;
    3066. 

  3066.             $this->data = $masked;
    3067. 

  3067.             
    3068. 

  3068.             return $this;
    3069. 

  3069.         }
    3070. 

  3070.     
    3071. 

  3071.         //----------------------------------------------------------------------
    3072. 

  3072.         public function encodeInput(QRinput $input)
    3073. 

  3073.         {
    3074. 

  3074.             return $this->encodeMask($input, -1);
    3075. 

  3075.         }
    3076. 

  3076.         
    3077. 

  3077.         //----------------------------------------------------------------------
    3078. 

  3078.         public function encodeString8bit($string, $version, $level)
    3079. 

  3079.         {
    3080. 

  3080.             if(string == NULL) {
    3081. 

  3081.                 throw new Exception('empty string!');
    3082. 

  3082.                 return NULL;
    3083. 

  3083.             }
    3084. 

  3084. 

  3085.             $input = new QRinput($version, $level);
    3086. 

  3086.             if($input == NULL) return NULL;
    3087. 

  3087. 

  3088.             $ret = $input->append($input, QR_MODE_8, strlen($string), str_split($string));
    3089. 

  3089.             if($ret < 0) {
    3090. 

  3090.                 unset($input);
    3091. 

  3091.                 return NULL;
    3092. 

  3092.             }
    3093. 

  3093.             return $this->encodeInput($input);
    3094. 

  3094.         }
    3095. 

  3095. 

  3096.         //----------------------------------------------------------------------
    3097. 

  3097.         public function encodeString($string, $version, $level, $hint, $casesensitive)
    3098. 

  3098.         {
    3099. 

  3099. 

  3100.             if($hint != QR_MODE_8 && $hint != QR_MODE_KANJI) {
    3101. 

  3101.                 throw new Exception('bad hint');
    3102. 

  3102.                 return NULL;
    3103. 

  3103.             }
    3104. 

  3104. 

  3105.             $input = new QRinput($version, $level);
    3106. 

  3106.             if($input == NULL) return NULL;
    3107. 

  3107. 

  3108.             $ret = QRsplit::splitStringToQRinput($string, $input, $hint, $casesensitive);
    3109. 

  3109.             if($ret < 0) {
    3110. 

  3110.                 return NULL;
    3111. 

  3111.             }
    3112. 

  3112. 

  3113.             return $this->encodeInput($input);
    3114. 

  3114.         }
    3115. 

  3115.         
    3116. 

  3116.         //----------------------------------------------------------------------
    3117. 

  3117.         public static function png($text, $outfile = false, $level = QR_ECLEVEL_L, $size = 3, $margin = 4, $saveandprint=false, $back_color = 0xFFFFFF, $fore_color = 0x000000) 
    3118. 

  3118.         {
    3119. 

  3119.             $enc = QRencode::factory($level, $size, $margin, $back_color, $fore_color);
    3120. 

  3120.             return $enc->encodePNG($text, $outfile, $saveandprint=false);
    3121. 

  3121.         }
    3122. 

  3122. 

  3123.         //----------------------------------------------------------------------
    3124. 

  3124.         public static function text($text, $outfile = false, $level = QR_ECLEVEL_L, $size = 3, $margin = 4) 
    3125. 

  3125.         {
    3126. 

  3126.             $enc = QRencode::factory($level, $size, $margin);
    3127. 

  3127.             return $enc->encode($text, $outfile);
    3128. 

  3128.         }
    3129. 

  3129.         
    3130. 

  3130.         //----------------------------------------------------------------------
    3131. 

  3131.         public static function eps($text, $outfile = false, $level = QR_ECLEVEL_L, $size = 3, $margin = 4, $saveandprint=false, $back_color = 0xFFFFFF, $fore_color = 0x000000) 
    3132. 

  3132.         {
    3133. 

  3133.             $enc = QRencode::factory($level, $size, $margin, $back_color, $fore_color);
    3134. 

  3134.             return $enc->encodeEPS($text, $outfile, $saveandprint=false);
    3135. 

  3135.         }
    3136. 

  3136.         
    3137. 

  3137.         //----------------------------------------------------------------------
    3138. 

  3138.         public static function svg($text, $outfile = false, $level = QR_ECLEVEL_L, $size = 3, $margin = 4, $saveandprint=false, $back_color = 0xFFFFFF, $fore_color = 0x000000) 
    3139. 

  3139.         {
    3140. 

  3140.             $enc = QRencode::factory($level, $size, $margin, $back_color, $fore_color);
    3141. 

  3141.             return $enc->encodeSVG($text, $outfile, $saveandprint=false);
    3142. 

  3142.         }
    3143. 

  3143. 

  3144.         //----------------------------------------------------------------------
    3145. 

  3145.         public static function raw($text, $outfile = false, $level = QR_ECLEVEL_L, $size = 3, $margin = 4) 
    3146. 

  3146.         {
    3147. 

  3147.             $enc = QRencode::factory($level, $size, $margin);
    3148. 

  3148.             return $enc->encodeRAW($text, $outfile);
    3149. 

  3149.         }
    3150. 

  3150.     }
    3151. 

  3151.     
    3152. 

  3152.     //##########################################################################
    3153. 

  3153.     
    3154. 

  3154.     class FrameFiller {
    3155. 

  3155.     
    3156. 

  3156.         public $width;
    3157. 

  3157.         public $frame;
    3158. 

  3158.         public $x;
    3159. 

  3159.         public $y;
    3160. 

  3160.         public $dir;
    3161. 

  3161.         public $bit;
    3162. 

  3162.         
    3163. 

  3163.         //----------------------------------------------------------------------
    3164. 

  3164.         public function __construct($width, &$frame)
    3165. 

  3165.         {
    3166. 

  3166.             $this->width = $width;
    3167. 

  3167.             $this->frame = $frame;
    3168. 

  3168.             $this->x = $width - 1;
    3169. 

  3169.             $this->y = $width - 1;
    3170. 

  3170.             $this->dir = -1;
    3171. 

  3171.             $this->bit = -1;
    3172. 

  3172.         }
    3173. 

  3173.         
    3174. 

  3174.         //----------------------------------------------------------------------
    3175. 

  3175.         public function setFrameAt($at, $val)
    3176. 

  3176.         {
    3177. 

  3177.             $this->frame[$at['y']][$at['x']] = chr($val);
    3178. 

  3178.         }
    3179. 

  3179.         
    3180. 

  3180.         //----------------------------------------------------------------------
    3181. 

  3181.         public function getFrameAt($at)
    3182. 

  3182.         {
    3183. 

  3183.             return ord($this->frame[$at['y']][$at['x']]);
    3184. 

  3184.         }
    3185. 

  3185.         
    3186. 

  3186.         //----------------------------------------------------------------------
    3187. 

  3187.         public function next()
    3188. 

  3188.         {
    3189. 

  3189.             do {
    3190. 

  3190.             
    3191. 

  3191.                 if($this->bit == -1) {
    3192. 

  3192.                     $this->bit = 0;
    3193. 

  3193.                     return array('x'=>$this->x, 'y'=>$this->y);
    3194. 

  3194.                 }
    3195. 

  3195. 

  3196.                 $x = $this->x;
    3197. 

  3197.                 $y = $this->y;
    3198. 

  3198.                 $w = $this->width;
    3199. 

  3199. 

  3200.                 if($this->bit == 0) {
    3201. 

  3201.                     $x--;
    3202. 

  3202.                     $this->bit++;
    3203. 

  3203.                 } else {
    3204. 

  3204.                     $x++;
    3205. 

  3205.                     $y += $this->dir;
    3206. 

  3206.                     $this->bit--;
    3207. 

  3207.                 }
    3208. 

  3208. 

  3209.                 if($this->dir < 0) {
    3210. 

  3210.                     if($y < 0) {
    3211. 

  3211.                         $y = 0;
    3212. 

  3212.                         $x -= 2;
    3213. 

  3213.                         $this->dir = 1;
    3214. 

  3214.                         if($x == 6) {
    3215. 

  3215.                             $x--;
    3216. 

  3216.                             $y = 9;
    3217. 

  3217.                         }
    3218. 

  3218.                     }
    3219. 

  3219.                 } else {
    3220. 

  3220.                     if($y == $w) {
    3221. 

  3221.                         $y = $w - 1;
    3222. 

  3222.                         $x -= 2;
    3223. 

  3223.                         $this->dir = -1;
    3224. 

  3224.                         if($x == 6) {
    3225. 

  3225.                             $x--;
    3226. 

  3226.                             $y -= 8;
    3227. 

  3227.                         }
    3228. 

  3228.                     }
    3229. 

  3229.                 }
    3230. 

  3230.                 if($x < 0 || $y < 0) return null;
    3231. 

  3231. 

  3232.                 $this->x = $x;
    3233. 

  3233.                 $this->y = $y;
    3234. 

  3234. 

  3235.             } while(ord($this->frame[$y][$x]) & 0x80);
    3236. 

  3236.                         
    3237. 

  3237.             return array('x'=>$x, 'y'=>$y);
    3238. 

  3238.         }
    3239. 

  3239.         
    3240. 

  3240.     } ;
    3241. 

  3241.     
    3242. 

  3242.     //##########################################################################    
    3243. 

  3243.     
    3244. 

  3244.     class QRencode {
    3245. 

  3245.     
    3246. 

  3246.         public $casesensitive = true;
    3247. 

  3247.         public $eightbit = false;
    3248. 

  3248.         
    3249. 

  3249.         public $version = 0;
    3250. 

  3250.         public $size = 3;
    3251. 

  3251.         public $margin = 4;
    3252. 

  3252.         public $back_color = 0xFFFFFF;
    3253. 

  3253.         public $fore_color = 0x000000;
    3254. 

  3254.         
    3255. 

  3255.         public $structured = 0; // not supported yet
    3256. 

  3256.         
    3257. 

  3257.         public $level = QR_ECLEVEL_L;
    3258. 

  3258.         public $hint = QR_MODE_8;
    3259. 

  3259.         
    3260. 

  3260.         //----------------------------------------------------------------------
    3261. 

  3261.         public static function factory($level = QR_ECLEVEL_L, $size = 3, $margin = 4, $back_color = 0xFFFFFF, $fore_color = 0x000000)
    3262. 

  3262.         {
    3263. 

  3263.             $enc = new QRencode();
    3264. 

  3264.             $enc->size = $size;
    3265. 

  3265.             $enc->margin = $margin;
    3266. 

  3266.             $enc->fore_color = $fore_color;
    3267. 

  3267.             $enc->back_color = $back_color;
    3268. 

  3268.             
    3269. 

  3269.             switch ($level.'') {
    3270. 

  3270.                 case '0':
    3271. 

  3271.                 case '1':
    3272. 

  3272.                 case '2':
    3273. 

  3273.                 case '3':
    3274. 

  3274.                         $enc->level = $level;
    3275. 

  3275.                     break;
    3276. 

  3276.                 case 'l':
    3277. 

  3277.                 case 'L':
    3278. 

  3278.                         $enc->level = QR_ECLEVEL_L;
    3279. 

  3279.                     break;
    3280. 

  3280.                 case 'm':
    3281. 

  3281.                 case 'M':
    3282. 

  3282.                         $enc->level = QR_ECLEVEL_M;
    3283. 

  3283.                     break;
    3284. 

  3284.                 case 'q':
    3285. 

  3285.                 case 'Q':
    3286. 

  3286.                         $enc->level = QR_ECLEVEL_Q;
    3287. 

  3287.                     break;
    3288. 

  3288.                 case 'h':
    3289. 

  3289.                 case 'H':
    3290. 

  3290.                         $enc->level = QR_ECLEVEL_H;
    3291. 

  3291.                     break;
    3292. 

  3292.             }
    3293. 

  3293.             
    3294. 

  3294.             return $enc;
    3295. 

  3295.         }
    3296. 

  3296.         
    3297. 

  3297.         //----------------------------------------------------------------------
    3298. 

  3298.         public function encodeRAW($intext, $outfile = false) 
    3299. 

  3299.         {
    3300. 

  3300.             $code = new QRcode();
    3301. 

  3301. 

  3302.             if($this->eightbit) {
    3303. 

  3303.                 $code->encodeString8bit($intext, $this->version, $this->level);
    3304. 

  3304.             } else {
    3305. 

  3305.                 $code->encodeString($intext, $this->version, $this->level, $this->hint, $this->casesensitive);
    3306. 

  3306.             }
    3307. 

  3307.             
    3308. 

  3308.             return $code->data;
    3309. 

  3309.         }
    3310. 

  3310. 

  3311.         //----------------------------------------------------------------------
    3312. 

  3312.         public function encode($intext, $outfile = false) 
    3313. 

  3313.         {
    3314. 

  3314.             $code = new QRcode();
    3315. 

  3315. 

  3316.             if($this->eightbit) {
    3317. 

  3317.                 $code->encodeString8bit($intext, $this->version, $this->level);
    3318. 

  3318.             } else {
    3319. 

  3319.                 $code->encodeString($intext, $this->version, $this->level, $this->hint, $this->casesensitive);
    3320. 

  3320.             }
    3321. 

  3321.             
    3322. 

  3322.             QRtools::markTime('after_encode');
    3323. 

  3323.             
    3324. 

  3324.             if ($outfile!== false) {
    3325. 

  3325.                 file_put_contents($outfile, join("\n", QRtools::binarize($code->data)));
    3326. 

  3326.             } else {
    3327. 

  3327.                 return QRtools::binarize($code->data);
    3328. 

  3328.             }
    3329. 

  3329.         }
    3330. 

  3330.         
    3331. 

  3331.         //----------------------------------------------------------------------
    3332. 

  3332.         public function encodePNG($intext, $outfile = false,$saveandprint=false) 
    3333. 

  3333.         {
    3334. 

  3334.             try {
    3335. 

  3335.             
    3336. 

  3336.                 ob_start();
    3337. 

  3337.                 $tab = $this->encode($intext);
    3338. 

  3338.                 $err = ob_get_contents();
    3339. 

  3339.                 ob_end_clean();
    3340. 

  3340.                 
    3341. 

  3341.                 if ($err != '')
    3342. 

  3342.                     QRtools::log($outfile, $err);
    3343. 

  3343.                 
    3344. 

  3344.                 $maxSize = (int)(QR_PNG_MAXIMUM_SIZE / (count($tab)+2*$this->margin));
    3345. 

  3345.                 
    3346. 

  3346.                 QRimage::png($tab, $outfile, min(max(1, $this->size), $maxSize), $this->margin,$saveandprint, $this->back_color, $this->fore_color);
    3347. 

  3347.             
    3348. 

  3348.             } catch (Exception $e) {
    3349. 

  3349.             
    3350. 

  3350.                 QRtools::log($outfile, $e->getMessage());
    3351. 

  3351.             
    3352. 

  3352.             }
    3353. 

  3353.         }
    3354. 

  3354.         
    3355. 

  3355.         //----------------------------------------------------------------------
    3356. 

  3356.         public function encodeEPS($intext, $outfile = false,$saveandprint=false) 
    3357. 

  3357.         {
    3358. 

  3358.             try {
    3359. 

  3359.             
    3360. 

  3360.                 ob_start();
    3361. 

  3361.                 $tab = $this->encode($intext);
    3362. 

  3362.                 $err = ob_get_contents();
    3363. 

  3363.                 ob_end_clean();
    3364. 

  3364.                 
    3365. 

  3365.                 if ($err != '')
    3366. 

  3366.                     QRtools::log($outfile, $err);
    3367. 

  3367.                 
    3368. 

  3368.                 $maxSize = (int)(QR_PNG_MAXIMUM_SIZE / (count($tab)+2*$this->margin));
    3369. 

  3369.                 
    3370. 

  3370.                 return QRvect::eps($tab, $outfile, min(max(1, $this->size), $maxSize), $this->margin,$saveandprint, $this->back_color, $this->fore_color);
    3371. 

  3371.             
    3372. 

  3372.             } catch (Exception $e) {
    3373. 

  3373.             
    3374. 

  3374.                 QRtools::log($outfile, $e->getMessage());
    3375. 

  3375.             
    3376. 

  3376.             }
    3377. 

  3377.         }
    3378. 

  3378. 

  3379.         //----------------------------------------------------------------------
    3380. 

  3380.         public function encodeSVG($intext, $outfile = false,$saveandprint=false) 
    3381. 

  3381.         {
    3382. 

  3382.             try {
    3383. 

  3383.             
    3384. 

  3384.                 ob_start();
    3385. 

  3385.                 $tab = $this->encode($intext);
    3386. 

  3386.                 $err = ob_get_contents();
    3387. 

  3387.                 ob_end_clean();
    3388. 

  3388.                 
    3389. 

  3389.                 if ($err != '')
    3390. 

  3390.                     QRtools::log($outfile, $err);
    3391. 

  3391.                 
    3392. 

  3392.                 $maxSize = (int)(QR_PNG_MAXIMUM_SIZE / (count($tab)+2*$this->margin));
    3393. 

  3393.                 
    3394. 

  3394.                 return QRvect::svg($tab, $outfile, min(max(1, $this->size), $maxSize), $this->margin,$saveandprint, $this->back_color, $this->fore_color);
    3395. 

  3395.             
    3396. 

  3396.             } catch (Exception $e) {
    3397. 

  3397.             
    3398. 

  3398.                 QRtools::log($outfile, $e->getMessage());
    3399. 

  3399.             
    3400. 

  3400.             }
    3401. 

  3401.         }
    3402. 

  3402.     }
    3403. 

  3403. 

  3404. 

  3405. 

  3406. 

  3407. //---- qrvect.php -----------------------------
    3408. 

  3408. 

  3409. 

  3410. 

  3411. 

  3412. /*
    3413. 

  3413.  * PHP QR Code encoder
    3414. 

  3414.  *
    3415. 

  3415.  * Image output of code using GD2
    3416. 

  3416.  *
    3417. 

  3417.  * PHP QR Code is distributed under LGPL 3
    3418. 

  3418.  * Copyright (C) 2010 Dominik Dzienia <deltalab at poczta dot fm>
    3419. 

  3419.  *
    3420. 

  3420.  * This library is free software; you can redistribute it and/or
    3421. 

  3421.  * modify it under the terms of the GNU Lesser General Public
    3422. 

  3422.  * License as published by the Free Software Foundation; either
    3423. 

  3423.  * version 3 of the License, or any later version.
    3424. 

  3424.  *
    3425. 

  3425.  * This library is distributed in the hope that it will be useful,
    3426. 

  3426.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
    3427. 

  3427.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
    3428. 

  3428.  * Lesser General Public License for more details.
    3429. 

  3429.  *
    3430. 

  3430.  * You should have received a copy of the GNU Lesser General Public
    3431. 

  3431.  * License along with this library; if not, write to the Free Software
    3432. 

  3432.  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
    3433. 

  3433.  */
    3434. 

  3434.  
    3435. 

  3435.     define('QR_VECT', true);
    3436. 

  3436. 

  3437.     class QRvect {
    3438. 

  3438.     
    3439. 

  3439.         //----------------------------------------------------------------------
    3440. 

  3440.         public static function eps($frame, $filename = false, $pixelPerPoint = 4, $outerFrame = 4,$saveandprint=FALSE, $back_color = 0xFFFFFF, $fore_color = 0x000000) 
    3441. 

  3441.         {
    3442. 

  3442.             $vect = self::vectEPS($frame, $pixelPerPoint, $outerFrame, $back_color, $fore_color);
    3443. 

  3443.             
    3444. 

  3444.             if ($filename === false) {
    3445. 

  3445.                 header("Content-Type: application/postscript");
    3446. 

  3446.                 header('Content-Disposition: filename="qrcode.eps"');
    3447. 

  3447.                 return $vect;
    3448. 

  3448.             } else {
    3449. 

  3449.                 if($saveandprint===TRUE){
    3450. 

  3450.                     QRtools::save($vect, $filename);
    3451. 

  3451.                     header("Content-Type: application/postscript");
    3452. 

  3452.                     header('Content-Disposition: filename="'.$filename.'"');
    3453. 

  3453.                     return $vect;
    3454. 

  3454.                 }else{
    3455. 

  3455.                     QRtools::save($vect, $filename);
    3456. 

  3456.                 }
    3457. 

  3457.             }
    3458. 

  3458.         }
    3459. 

  3459.         
    3460. 

  3460.     
    3461. 

  3461.         //----------------------------------------------------------------------
    3462. 

  3462.         private static function vectEPS($frame, $pixelPerPoint = 4, $outerFrame = 4, $back_color = 0xFFFFFF, $fore_color = 0x000000) 
    3463. 

  3463.         {
    3464. 

  3464.             $h = count($frame);
    3465. 

  3465.             $w = strlen($frame[0]);
    3466. 

  3466.             
    3467. 

  3467.             $imgW = $w + 2*$outerFrame;
    3468. 

  3468.             $imgH = $h + 2*$outerFrame;
    3469. 

  3469.             
    3470. 

  3470.             
    3471. 

  3471.             
    3472. 

  3472.             
    3473. 

  3473.             // convert a hexadecimal color code into decimal eps format (green = 0 1 0, blue = 0 0 1, ...)
    3474. 

  3474.             $r = round((($fore_color & 0xFF0000) >> 16) / 255, 5);
    3475. 

  3475.             $b = round((($fore_color & 0x00FF00) >> 8) / 255, 5);
    3476. 

  3476.             $g = round(($fore_color & 0x0000FF) / 255, 5);
    3477. 

  3477.             $fore_color = $r.' '.$b.' '.$g;
    3478. 

  3478.             
    3479. 

  3479.             // convert a hexadecimal color code into decimal eps format (green = 0 1 0, blue = 0 0 1, ...)
    3480. 

  3480.             $r = round((($back_color & 0xFF0000) >> 16) / 255, 5);
    3481. 

  3481.             $b = round((($back_color & 0x00FF00) >> 8) / 255, 5);
    3482. 

  3482.             $g = round(($back_color & 0x0000FF) / 255, 5);
    3483. 

  3483.             $back_color = $r.' '.$b.' '.$g;
    3484. 

  3484.             
    3485. 

  3485.             $output = 
    3486. 

  3486.             '%!PS-Adobe EPSF-3.0'."\n".
    3487. 

  3487.             '%%Creator: Zend_Matrixcode_Qrcode'."\n".
    3488. 

  3488.             '%%Title: QRcode'."\n".
    3489. 

  3489.             '%%CreationDate: '.date('Y-m-d')."\n".
    3490. 

  3490.             '%%DocumentData: Clean7Bit'."\n".
    3491. 

  3491.             '%%LanguageLevel: 2'."\n".
    3492. 

  3492.             '%%Pages: 1'."\n".
    3493. 

  3493.             '%%BoundingBox: 0 0 '.$imgW * $pixelPerPoint.' '.$imgH * $pixelPerPoint."\n";
    3494. 

  3494.             
    3495. 

  3495.             // set the scale
    3496. 

  3496.             $output .= $pixelPerPoint.' '.$pixelPerPoint.' scale'."\n";
    3497. 

  3497.             // position the center of the coordinate system
    3498. 

  3498.             
    3499. 

  3499.             $output .= $outerFrame.' '.$outerFrame.' translate'."\n";
    3500. 

  3500.            
    3501. 

  3501.            
    3502. 

  3502.             
    3503. 

  3503.             
    3504. 

  3504.             // redefine the 'rectfill' operator to shorten the syntax
    3505. 

  3505.             $output .= '/F { rectfill } def'."\n";
    3506. 

  3506.             
    3507. 

  3507.             // set the symbol color
    3508. 

  3508.             $output .= $back_color.' setrgbcolor'."\n";
    3509. 

  3509.             $output .= '-'.$outerFrame.' -'.$outerFrame.' '.($w + 2*$outerFrame).' '.($h + 2*$outerFrame).' F'."\n";
    3510. 

  3510.             
    3511. 

  3511.             
    3512. 

  3512.             // set the symbol color
    3513. 

  3513.             $output .= $fore_color.' setrgbcolor'."\n";
    3514. 

  3514. 

  3515.             // Convert the matrix into pixels
    3516. 

  3516. 

  3517.             for($i=0; $i<$h; $i++) {
    3518. 

  3518.                 for($j=0; $j<$w; $j++) {
    3519. 

  3519.                     if( $frame[$i][$j] == '1') {
    3520. 

  3520.                         $y = $h - 1 - $i;
    3521. 

  3521.                         $x = $j;
    3522. 

  3522.                         $output .= $x.' '.$y.' 1 1 F'."\n";
    3523. 

  3523.                     }
    3524. 

  3524.                 }
    3525. 

  3525.             }
    3526. 

  3526.             
    3527. 

  3527.             
    3528. 

  3528.             $output .='%%EOF';
    3529. 

  3529.             
    3530. 

  3530.             return $output;
    3531. 

  3531.         }
    3532. 

  3532.         
    3533. 

  3533.         //----------------------------------------------------------------------
    3534. 

  3534.         public static function svg($frame, $filename = false, $pixelPerPoint = 4, $outerFrame = 4,$saveandprint=FALSE, $back_color, $fore_color) 
    3535. 

  3535.         {
    3536. 

  3536.             $vect = self::vectSVG($frame, $pixelPerPoint, $outerFrame, $back_color, $fore_color);
    3537. 

  3537.             
    3538. 

  3538.             if ($filename === false) {
    3539. 

  3539.                 header("Content-Type: image/svg+xml");
    3540. 

  3540.                 header('Content-Disposition: filename="qrcode.svg"');
    3541. 

  3541.                 return $vect;
    3542. 

  3542.             } else {
    3543. 

  3543.                 if($saveandprint===TRUE){
    3544. 

  3544.                     QRtools::save($vect, $filename);
    3545. 

  3545.                     header("Content-Type: image/svg+xml");
    3546. 

  3546.                     header('Content-Disposition: filename="'.$filename.'"');
    3547. 

  3547.                     return $vect;
    3548. 

  3548.                 }else{
    3549. 

  3549.                     QRtools::save($vect, $filename);
    3550. 

  3550.                 }
    3551. 

  3551.             }
    3552. 

  3552.         }
    3553. 

  3553.         
    3554. 

  3554.     
    3555. 

  3555.         //----------------------------------------------------------------------
    3556. 

  3556.         private static function vectSVG($frame, $pixelPerPoint = 4, $outerFrame = 4, $back_color = 0xFFFFFF, $fore_color = 0x000000) 
    3557. 

  3557.         {
    3558. 

  3558.             $h = count($frame);
    3559. 

  3559.             $w = strlen($frame[0]);
    3560. 

  3560.             
    3561. 

  3561.             $imgW = $w + 2*$outerFrame;
    3562. 

  3562.             $imgH = $h + 2*$outerFrame;
    3563. 

  3563.             
    3564. 

  3564.             
    3565. 

  3565.             $output = 
    3566. 

  3566.             '<?xml version="1.0" encoding="utf-8"?>'."\n".
    3567. 

  3567.             '<svg version="1.1" baseProfile="full"  width="'.$imgW * $pixelPerPoint.'" height="'.$imgH * $pixelPerPoint.'" viewBox="0 0 '.$imgW * $pixelPerPoint.' '.$imgH * $pixelPerPoint.'"
    3568. 

  3568.              xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink" xmlns:ev="http://www.w3.org/2001/xml-events">'."\n".
    3569. 

  3569.             '<desc></desc>'."\n";
    3570. 

  3570. 

  3571.             $output = 
    3572. 

  3572.             '<?xml version="1.0" encoding="utf-8"?>'."\n".
    3573. 

  3573.             '<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 20010904//EN" "http://www.w3.org/TR/2001/REC-SVG-20010904/DTD/svg10.dtd">'."\n".
    3574. 

  3574.             '<svg xmlns="http://www.w3.org/2000/svg" xml:space="preserve" xmlns:xlink="http://www.w3.org/1999/xlink" width="'.$imgW * $pixelPerPoint.'" height="'.$imgH * $pixelPerPoint.'" viewBox="0 0 '.$imgW * $pixelPerPoint.' '.$imgH * $pixelPerPoint.'">'."\n".
    3575. 

  3575.             '<desc></desc>'."\n";
    3576. 

  3576.                 
    3577. 

  3577.             if(!empty($back_color)) {
    3578. 

  3578.                 $backgroundcolor = str_pad(dechex($back_color), 6, "0");
    3579. 

  3579.                 $output .= '<rect width="'.$imgW * $pixelPerPoint.'" height="'.$imgH * $pixelPerPoint.'" fill="#'.$backgroundcolor.'" cx="0" cy="0" />'."\n";
    3580. 

  3580.             }
    3581. 

  3581.                 
    3582. 

  3582.             $output .= 
    3583. 

  3583.             '<defs>'."\n".
    3584. 

  3584.             '<rect id="p" width="'.$pixelPerPoint.'" height="'.$pixelPerPoint.'" />'."\n".
    3585. 

  3585.             '</defs>'."\n".
    3586. 

  3586.             '<g fill="#'.str_pad(dechex($fore_color), 6, "0").'">'."\n";
    3587. 

  3587.                 
    3588. 

  3588.                 
    3589. 

  3589.             // Convert the matrix into pixels
    3590. 

  3590. 

  3591.             for($i=0; $i<$h; $i++) {
    3592. 

  3592.                 for($j=0; $j<$w; $j++) {
    3593. 

  3593.                     if( $frame[$i][$j] == '1') {
    3594. 

  3594.                         $y = ($i + $outerFrame) * $pixelPerPoint;
    3595. 

  3595.                         $x = ($j + $outerFrame) * $pixelPerPoint;
    3596. 

  3596.                         $output .= '<use x="'.$x.'" y="'.$y.'" xlink:href="#p" />'."\n";
    3597. 

  3597.                     }
    3598. 

  3598.                 }
    3599. 

  3599.             }
    3600. 

  3600.             $output .= 
    3601. 

  3601.             '</g>'."\n".
    3602. 

  3602.             '</svg>';
    3603. 

  3603.             
    3604. 

  3604.             return $output;
    3605. 

  3605.         }
    3606. 

  3606.     }
    3607. 

  3607.     
    3608. 

  3608.     
    3609. 

  3609. 

  3610.