PageRenderTime 67ms CodeModel.GetById 26ms RepoModel.GetById 0ms app.codeStats 0ms

/application/libraries/mpdf/classes/barcode.php

https://bitbucket.org/jojoluzifer/kkucardweb
PHP | 1965 lines | 1701 code | 44 blank | 220 comment | 264 complexity | d2d827faf3ff06d51b19e6c0a9d2a481 MD5 | raw file
Possible License(s): LGPL-2.1

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

    

  1. <?php
    2. 

  2. 

  3. // Adapted for mPDF from TCPDF barcode. Original Details left below.
    4. 

  4. 

  5. //============================================================+
    6. 

  6. // File name   : barcodes.php
    7. 

  7. // Begin       : 2008-06-09
    8. 

  8. // Last Update : 2009-04-15
    9. 

  9. // Version     : 1.0.008
    10. 

  10. // License     : GNU LGPL (http://www.gnu.org/copyleft/lesser.html)
    11. 

  11. // 	----------------------------------------------------------------------------
    12. 

  12. //  Copyright (C) 2008-2009 Nicola Asuni - Tecnick.com S.r.l.
    13. 

  13. // 	
    14. 

  14. // 	This program is free software: you can redistribute it and/or modify
    15. 

  15. // 	it under the terms of the GNU Lesser General Public License as published by
    16. 

  16. // 	the Free Software Foundation, either version 2.1 of the License, or
    17. 

  17. // 	(at your option) any later version.
    18. 

  18. // 	
    19. 

  19. // 	This program is distributed in the hope that it will be useful,
    20. 

  20. // 	but WITHOUT ANY WARRANTY; without even the implied warranty of
    21. 

  21. // 	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    22. 

  22. // 	GNU Lesser General Public License for more details.
    23. 

  23. // 	
    24. 

  24. // 	You should have received a copy of the GNU Lesser General Public License
    25. 

  25. // 	along with this program.  If not, see <http://www.gnu.org/licenses/>.
    26. 

  26. // 	
    27. 

  27. // 	See LICENSE.TXT file for more information.
    28. 

  28. //  ----------------------------------------------------------------------------
    29. 

  29. //
    30. 

  30. // Description : PHP class to creates array representations for 
    31. 

  31. //               common 1D barcodes to be used with TCPDF.
    32. 

  32. //
    33. 

  33. // Author: Nicola Asuni
    34. 

  34. //
    35. 

  35. // (c) Copyright:
    36. 

  36. //               Nicola Asuni
    37. 

  37. //               Tecnick.com S.r.l.
    38. 

  38. //               Via della Pace, 11
    39. 

  39. //               09044 Quartucciu (CA)
    40. 

  40. //               ITALY
    41. 

  41. //               www.tecnick.com
    42. 

  42. //               info@tecnick.com
    43. 

  43. //============================================================+
    44. 

  44. 

  45. class PDFBarcode {
    46. 

  46. 	
    47. 

  47. 	protected $barcode_array;
    48. 

  48. 	protected $gapwidth;
    49. 

  49. 	protected $print_ratio;
    50. 

  50. 	protected $daft;
    51. 

  51. 

  52. 	public function __construct() {
    53. 

  53. 

  54. 	}
    55. 

  55. 	
    56. 

  56. 	public function getBarcodeArray($code, $type, $pr='') {
    57. 

  57. 		$this->setBarcode($code, $type, $pr);
    58. 

  58. 		return $this->barcode_array;
    59. 

  59. 	}
    60. 

  60. 	public function getChecksum($code, $type) {
    61. 

  61. 		$this->setBarcode($code, $type);
    62. 

  62. 		if (!$this->barcode_array) { return ''; }
    63. 

  63. 		else { return $this->barcode_array['checkdigit']; }
    64. 

  64. 	}
    65. 

  65. 

  66. 	public function setBarcode($code, $type, $pr='') {
    67. 

  67. 		$this->print_ratio = 1;
    68. 

  68. 		switch (strtoupper($type)) {
    69. 

  69. 			case 'ISBN':
    70. 

  70. 			case 'ISSN':
    71. 

  71. 			case 'EAN13': { // EAN 13
    72. 

  72. 				$arrcode = $this->barcode_eanupc($code, 13);
    73. 

  73. 				$arrcode['lightmL'] = 11;	// LEFT light margin =  x X-dim (http://www.gs1uk.org)
    74. 

  74. 				$arrcode['lightmR'] = 7;	// RIGHT light margin =  x X-dim (http://www.gs1uk.org)
    75. 

  75. 				$arrcode['nom-X'] = 0.33;	// Nominal value for X-dim in mm (http://www.gs1uk.org)
    76. 

  76. 				$arrcode['nom-H'] = 25.93;	// Nominal bar height in mm incl. numerals (http://www.gs1uk.org)
    77. 

  77. 				break;
    78. 

  78. 			}
    79. 

  79. 			case 'UPCA': { // UPC-A
    80. 

  80. 				$arrcode = $this->barcode_eanupc($code, 12);
    81. 

  81. 				$arrcode['lightmL'] = 9;	// LEFT light margin =  x X-dim (http://www.gs1uk.org)
    82. 

  82. 				$arrcode['lightmR'] = 9;	// RIGHT light margin =  x X-dim (http://www.gs1uk.org)
    83. 

  83. 				$arrcode['nom-X'] = 0.33;	// Nominal value for X-dim in mm (http://www.gs1uk.org)
    84. 

  84. 				$arrcode['nom-H'] = 25.91;	// Nominal bar height in mm incl. numerals (http://www.gs1uk.org)
    85. 

  85. 				break;
    86. 

  86. 			}
    87. 

  87. 			case 'UPCE': { // UPC-E
    88. 

  88. 				$arrcode = $this->barcode_eanupc($code, 6);
    89. 

  89. 				$arrcode['lightmL'] = 9;	// LEFT light margin =  x X-dim (http://www.gs1uk.org)
    90. 

  90. 				$arrcode['lightmR'] = 7;	// RIGHT light margin =  x X-dim (http://www.gs1uk.org)
    91. 

  91. 				$arrcode['nom-X'] = 0.33;	// Nominal value for X-dim in mm (http://www.gs1uk.org)
    92. 

  92. 				$arrcode['nom-H'] = 25.93;	// Nominal bar height in mm incl. numerals (http://www.gs1uk.org)
    93. 

  93. 				break;
    94. 

  94. 			}
    95. 

  95. 			case 'EAN8': { // EAN 8
    96. 

  96. 				$arrcode = $this->barcode_eanupc($code, 8);
    97. 

  97. 				$arrcode['lightmL'] = 7;	// LEFT light margin =  x X-dim (http://www.gs1uk.org)
    98. 

  98. 				$arrcode['lightmR'] = 7;	// RIGHT light margin =  x X-dim (http://www.gs1uk.org)
    99. 

  99. 				$arrcode['nom-X'] = 0.33;	// Nominal value for X-dim in mm (http://www.gs1uk.org)
    100. 

  100. 				$arrcode['nom-H'] = 21.64;	// Nominal bar height in mm incl. numerals (http://www.gs1uk.org)
    101. 

  101. 				break;
    102. 

  102. 			}
    103. 

  103. 			case 'EAN2': { // 2-Digits UPC-Based Extention
    104. 

  104. 				$arrcode = $this->barcode_eanext($code, 2);
    105. 

  105. 				$arrcode['lightmL'] = 7;	// LEFT light margin =  x X-dim (estimated)
    106. 

  106. 				$arrcode['lightmR'] = 7;	// RIGHT light margin =  x X-dim (estimated)
    107. 

  107. 				$arrcode['sepM'] = 9;		// SEPARATION margin =  x X-dim (http://web.archive.org/web/19990501035133/http://www.uc-council.org/d36-d.htm)
    108. 

  108. 				$arrcode['nom-X'] = 0.33;	// Nominal value for X-dim in mm (http://www.gs1uk.org)
    109. 

  109. 				$arrcode['nom-H'] = 20;	// Nominal bar height in mm incl. numerals (estimated) not used when combined
    110. 

  110. 				break;
    111. 

  111. 			}
    112. 

  112. 			case 'EAN5': { // 5-Digits UPC-Based Extention
    113. 

  113. 				$arrcode = $this->barcode_eanext($code, 5);
    114. 

  114. 				$arrcode['lightmL'] = 7;	// LEFT light margin =  x X-dim (estimated)
    115. 

  115. 				$arrcode['lightmR'] = 7;	// RIGHT light margin =  x X-dim (estimated)
    116. 

  116. 				$arrcode['sepM'] = 9;		// SEPARATION margin =  x X-dim (http://web.archive.org/web/19990501035133/http://www.uc-council.org/d36-d.htm)
    117. 

  117. 				$arrcode['nom-X'] = 0.33;	// Nominal value for X-dim in mm (http://www.gs1uk.org)
    118. 

  118. 				$arrcode['nom-H'] = 20;	// Nominal bar height in mm incl. numerals (estimated) not used when combined
    119. 

  119. 				break;
    120. 

  120. 			}
    121. 

  121. 

  122. 			case 'IMB': { // IMB - Intelligent Mail Barcode - Onecode - USPS-B-3200
    123. 

  123. 				$xdim = 0.508;			// Nominal value for X-dim (bar width) in mm (spec.)
    124. 

  124. 				$bpi = 22;				// Bars per inch
    125. 

  125. 				// Ratio of Nominal value for width of spaces in mm / Nominal value for X-dim (bar width) in mm based on bars per inch
    126. 

  126. 				$this->gapwidth =  ((25.4/$bpi) - $xdim)/$xdim; 
    127. 

  127. 				$this->daft = array('D'=>2, 'A'=>2, 'F'=>3, 'T'=>1);	// Descender; Ascender; Full; Tracker bar heights
    128. 

  128. 				$arrcode = $this->barcode_imb($code);
    129. 

  129. 				$arrcode['nom-X'] = $xdim ;
    130. 

  130. 				$arrcode['nom-H'] = 3.68;	// Nominal value for Height of Full bar in mm (spec.) 
    131. 

  131. 									// USPS-B-3200 Revision C = 4.623
    132. 

  132. 									// USPS-B-3200 Revision E = 3.68
    133. 

  133. 				$arrcode['quietL'] = 3.175;	// LEFT Quiet margin =  mm (spec.)
    134. 

  134. 				$arrcode['quietR'] = 3.175;	// RIGHT Quiet margin =  mm (spec.)
    135. 

  135. 				$arrcode['quietTB'] = 0.711;	// TOP/BOTTOM Quiet margin =  mm (spec.)
    136. 

  136. 				break;
    137. 

  137. 			}
    138. 

  138. 			case 'RM4SCC': { // RM4SCC (Royal Mail 4-state Customer Code) - CBC (Customer Bar Code)
    139. 

  139. 				$xdim = 0.508;			// Nominal value for X-dim (bar width) in mm (spec.)
    140. 

  140. 				$bpi = 22;				// Bars per inch
    141. 

  141. 				// Ratio of Nominal value for width of spaces in mm / Nominal value for X-dim (bar width) in mm based on bars per inch
    142. 

  142. 				$this->gapwidth =  ((25.4/$bpi) - $xdim)/$xdim; 
    143. 

  143. 				$this->daft = array('D'=>5, 'A'=>5, 'F'=>8, 'T'=>2);	// Descender; Ascender; Full; Tracker bar heights
    144. 

  144. 				$arrcode = $this->barcode_rm4scc($code, false);
    145. 

  145. 				$arrcode['nom-X'] = $xdim ;
    146. 

  146. 				$arrcode['nom-H'] = 5.0;	// Nominal value for Height of Full bar in mm (spec.)
    147. 

  147. 				$arrcode['quietL'] = 2;		// LEFT Quiet margin =  mm (spec.)
    148. 

  148. 				$arrcode['quietR'] = 2;		// RIGHT Quiet margin =  mm (spec.)
    149. 

  149. 				$arrcode['quietTB'] = 2;	// TOP/BOTTOM Quiet margin =  mm (spec?)
    150. 

  150. 				break;
    151. 

  151. 			}
    152. 

  152. 			case 'KIX': { // KIX (Klant index - Customer index)
    153. 

  153. 				$xdim = 0.508;			// Nominal value for X-dim (bar width) in mm (spec.)
    154. 

  154. 				$bpi = 22;				// Bars per inch
    155. 

  155. 				// Ratio of Nominal value for width of spaces in mm / Nominal value for X-dim (bar width) in mm based on bars per inch
    156. 

  156. 				$this->gapwidth =  ((25.4/$bpi) - $xdim)/$xdim; 
    157. 

  157. 				$this->daft = array('D'=>5, 'A'=>5, 'F'=>8, 'T'=>2);	// Descender; Ascender; Full; Tracker bar heights
    158. 

  158. 				$arrcode = $this->barcode_rm4scc($code, true);
    159. 

  159. 				$arrcode['nom-X'] = $xdim ;
    160. 

  160. 				$arrcode['nom-H'] = 5.0;	// Nominal value for Height of Full bar in mm (? spec.)
    161. 

  161. 				$arrcode['quietL'] = 2;		// LEFT Quiet margin =  mm (spec.)
    162. 

  162. 				$arrcode['quietR'] = 2;		// RIGHT Quiet margin =  mm (spec.)
    163. 

  163. 				$arrcode['quietTB'] = 2;	// TOP/BOTTOM Quiet margin =  mm (spec.)
    164. 

  164. 				break;
    165. 

  165. 			}
    166. 

  166. 			case 'POSTNET': { // POSTNET
    167. 

  167. 				$xdim = 0.508;			// Nominal value for X-dim (bar width) in mm (spec.)
    168. 

  168. 				$bpi = 22;				// Bars per inch
    169. 

  169. 				// Ratio of Nominal value for width of spaces in mm / Nominal value for X-dim (bar width) in mm based on bars per inch
    170. 

  170. 				$this->gapwidth =  ((25.4/$bpi) - $xdim)/$xdim; 
    171. 

  171. 				$arrcode = $this->barcode_postnet($code, false);
    172. 

  172. 				$arrcode['nom-X'] = $xdim ;
    173. 

  173. 				$arrcode['nom-H'] = 3.175;	// Nominal value for Height of Full bar in mm (spec.)
    174. 

  174. 				$arrcode['quietL'] = 3.175;	// LEFT Quiet margin =  mm (?spec.)
    175. 

  175. 				$arrcode['quietR'] = 3.175;	// RIGHT Quiet margin =  mm (?spec.)
    176. 

  176. 				$arrcode['quietTB'] = 1.016;	// TOP/BOTTOM Quiet margin =  mm (?spec.)
    177. 

  177. 				break;
    178. 

  178. 			}
    179. 

  179. 			case 'PLANET': { // PLANET
    180. 

  180. 				$xdim = 0.508;			// Nominal value for X-dim (bar width) in mm (spec.)
    181. 

  181. 				$bpi = 22;				// Bars per inch
    182. 

  182. 				// Ratio of Nominal value for width of spaces in mm / Nominal value for X-dim (bar width) in mm based on bars per inch
    183. 

  183. 				$this->gapwidth =  ((25.4/$bpi) - $xdim)/$xdim; 
    184. 

  184. 				$arrcode = $this->barcode_postnet($code, true);
    185. 

  185. 				$arrcode['nom-X'] = $xdim ;
    186. 

  186. 				$arrcode['nom-H'] = 3.175;	// Nominal value for Height of Full bar in mm (spec.)
    187. 

  187. 				$arrcode['quietL'] = 3.175;	// LEFT Quiet margin =  mm (?spec.)
    188. 

  188. 				$arrcode['quietR'] = 3.175;	// RIGHT Quiet margin =  mm (?spec.)
    189. 

  189. 				$arrcode['quietTB'] = 1.016;	// TOP/BOTTOM Quiet margin =  mm (?spec.)
    190. 

  190. 				break;
    191. 

  191. 			}
    192. 

  192. 

  193. 			case 'C93':	{	// CODE 93 - USS-93
    194. 

  194. 				$arrcode = $this->barcode_code93($code);
    195. 

  195. 				if ($arrcode == false) { break; }
    196. 

  196. 				$arrcode['nom-X'] = 0.381;	// Nominal value for X-dim (bar width) in mm (2 X min. spec.)
    197. 

  197. 				$arrcode['nom-H'] = 10;		// Nominal value for Height of Full bar in mm (non-spec.)
    198. 

  198. 				$arrcode['lightmL'] = 10;	// LEFT light margin =  x X-dim (spec.)
    199. 

  199. 				$arrcode['lightmR'] = 10;	// RIGHT light margin =  x X-dim (spec.)
    200. 

  200. 				$arrcode['lightTB'] = 0;	// TOP/BOTTOM light margin =  x X-dim (non-spec.)
    201. 

  201. 				break;
    202. 

  202. 			}
    203. 

  203. 			case 'CODE11': {	// CODE 11
    204. 

  204. 				if ($pr > 0) { $this->print_ratio = $pr; }
    205. 

  205. 				else { $this->print_ratio = 3; }		// spec: Pr= 1:2.24 - 1:3.5
    206. 

  206. 				$arrcode = $this->barcode_code11($code);
    207. 

  207. 				if ($arrcode == false) { break; }
    208. 

  208. 				$arrcode['nom-X'] = 0.381;	// Nominal value for X-dim (bar width) in mm (2 X min. spec.)
    209. 

  209. 				$arrcode['nom-H'] = 10;		// Nominal value for Height of Full bar in mm (non-spec.)
    210. 

  210. 				$arrcode['lightmL'] = 10;	// LEFT light margin =  x X-dim (spec.)
    211. 

  211. 				$arrcode['lightmR'] = 10;	// RIGHT light margin =  x X-dim (spec.)
    212. 

  212. 				$arrcode['lightTB'] = 0;	// TOP/BOTTOM light margin =  x X-dim (non-spec.)
    213. 

  213. 				break;
    214. 

  214. 			}
    215. 

  215. 			case 'MSI':		// MSI (Variation of Plessey code)
    216. 

  216. 			case 'MSI+': {	// MSI + CHECKSUM (modulo 11)
    217. 

  217. 				if (strtoupper($type)=='MSI') { $arrcode = $this->barcode_msi($code, false); }
    218. 

  218. 				if (strtoupper($type)=='MSI+') { $arrcode = $this->barcode_msi($code, true); }
    219. 

  219. 				if ($arrcode == false) { break; }
    220. 

  220. 				$arrcode['nom-X'] = 0.381;	// Nominal value for X-dim (bar width) in mm (2 X min. spec.)
    221. 

  221. 				$arrcode['nom-H'] = 10;		// Nominal value for Height of Full bar in mm (non-spec.)
    222. 

  222. 				$arrcode['lightmL'] = 12;	// LEFT light margin =  x X-dim (spec.)
    223. 

  223. 				$arrcode['lightmR'] = 12;	// RIGHT light margin =  x X-dim (spec.)
    224. 

  224. 				$arrcode['lightTB'] = 0;	// TOP/BOTTOM light margin =  x X-dim (non-spec.)
    225. 

  225. 				break;
    226. 

  226. 			}
    227. 

  227. 			case 'CODABAR': {	// CODABAR
    228. 

  228. 				if ($pr > 0) { $this->print_ratio = $pr; }
    229. 

  229. 				else { $this->print_ratio = 2.5; }		// spec: Pr= 1:2 - 1:3 (>2.2 if X<0.50)
    230. 

  230. 				if (strtoupper($type)=='CODABAR') { $arrcode = $this->barcode_codabar($code); }
    231. 

  231. 				if ($arrcode == false) { break; }
    232. 

  232. 				$arrcode['nom-X'] = 0.381;	// Nominal value for X-dim (bar width) in mm (2 X min. spec.)
    233. 

  233. 				$arrcode['nom-H'] = 10;		// Nominal value for Height of Full bar in mm (non-spec.)
    234. 

  234. 				$arrcode['lightmL'] = 10;	// LEFT light margin =  x X-dim (spec.)
    235. 

  235. 				$arrcode['lightmR'] = 10;	// RIGHT light margin =  x X-dim (spec.)
    236. 

  236. 				$arrcode['lightTB'] = 0;	// TOP/BOTTOM light margin =  x X-dim (non-spec.)
    237. 

  237. 				break;
    238. 

  238. 			}
    239. 

  239. 			case 'C128A':	// CODE 128 A
    240. 

  240. 			case 'C128B':	// CODE 128 B
    241. 

  241. 			case 'C128C': 	// CODE 128 C
    242. 

  242. 			case 'EAN128A': 	// EAN 128 A
    243. 

  243. 			case 'EAN128B': 	// EAN 128 B
    244. 

  244. 			case 'EAN128C': {	// EAN 128 C
    245. 

  245. 				if (strtoupper($type)=='C128A') { $arrcode = $this->barcode_c128($code, 'A'); }
    246. 

  246. 				if (strtoupper($type)=='C128B') { $arrcode = $this->barcode_c128($code, 'B'); }
    247. 

  247. 				if (strtoupper($type)=='C128C') { $arrcode = $this->barcode_c128($code, 'C'); }
    248. 

  248. 				if (strtoupper($type)=='EAN128A') { $arrcode = $this->barcode_c128($code, 'A', true); }
    249. 

  249. 				if (strtoupper($type)=='EAN128B') { $arrcode = $this->barcode_c128($code, 'B', true); }
    250. 

  250. 				if (strtoupper($type)=='EAN128C') { $arrcode = $this->barcode_c128($code, 'C', true); }
    251. 

  251. 				if ($arrcode == false) { break; }
    252. 

  252. 				$arrcode['nom-X'] = 0.381;	// Nominal value for X-dim (bar width) in mm (2 X min. spec.)
    253. 

  253. 				$arrcode['nom-H'] = 10;		// Nominal value for Height of Full bar in mm (non-spec.)
    254. 

  254. 				$arrcode['lightmL'] = 10;	// LEFT light margin =  x X-dim (spec.)
    255. 

  255. 				$arrcode['lightmR'] = 10;	// RIGHT light margin =  x X-dim (spec.)
    256. 

  256. 				$arrcode['lightTB'] = 0;	// TOP/BOTTOM light margin =  x X-dim (non-spec.)
    257. 

  257. 				break;
    258. 

  258. 			}
    259. 

  259. 			case 'C39':		// CODE 39 - ANSI MH10.8M-1983 - USD-3 - 3 of 9.
    260. 

  260. 			case 'C39+':	// CODE 39 with checksum
    261. 

  261. 			case 'C39E':	// CODE 39 EXTENDED
    262. 

  262. 			case 'C39E+': {	// CODE 39 EXTENDED + CHECKSUM
    263. 

  263. 				if ($pr > 0) { $this->print_ratio = $pr; }
    264. 

  264. 				else { $this->print_ratio = 2.5; }	// spec: Pr= 1:2 - 1:3 (>2.2 if X<0.50)
    265. 

  265. 				$code = str_replace(chr(194).chr(160), ' ', $code);	// mPDF 5.3.95  (for utf-8 encoded)
    266. 

  266. 				$code = str_replace(chr(160), ' ', $code);	// mPDF 5.3.95	(for win-1252)
    267. 

  267. 				if (strtoupper($type)=='C39') { $arrcode = $this->barcode_code39($code, false, false); }
    268. 

  268. 				if (strtoupper($type)=='C39+') { $arrcode = $this->barcode_code39($code, false, true); }
    269. 

  269. 				if (strtoupper($type)=='C39E') { $arrcode = $this->barcode_code39($code, true, false); }
    270. 

  270. 				if (strtoupper($type)=='C39E+') { $arrcode = $this->barcode_code39($code, true, true); }
    271. 

  271. 				if ($arrcode == false) { break; }
    272. 

  272. 				$arrcode['nom-X'] = 0.381;	// Nominal value for X-dim (bar width) in mm (2 X min. spec.)
    273. 

  273. 				$arrcode['nom-H'] = 10;		// Nominal value for Height of Full bar in mm (non-spec.)
    274. 

  274. 				$arrcode['lightmL'] = 10;	// LEFT light margin =  x X-dim (spec.)
    275. 

  275. 				$arrcode['lightmR'] = 10;	// RIGHT light margin =  x X-dim (spec.)
    276. 

  276. 				$arrcode['lightTB'] = 0;	// TOP/BOTTOM light margin =  x X-dim (non-spec.)
    277. 

  277. 				break;
    278. 

  278. 			}
    279. 

  279. 			case 'S25':		// Standard 2 of 5
    280. 

  280. 			case 'S25+': {	// Standard 2 of 5 + CHECKSUM
    281. 

  281. 				if ($pr > 0) { $this->print_ratio = $pr; }
    282. 

  282. 				else { $this->print_ratio = 3; }		// spec: Pr=1:3/1:4.5
    283. 

  283. 				if (strtoupper($type)=='S25') { $arrcode = $this->barcode_s25($code, false); }
    284. 

  284. 				if (strtoupper($type)=='S25+') { $arrcode = $this->barcode_s25($code, true); }
    285. 

  285. 				if ($arrcode == false) { break; }
    286. 

  286. 				$arrcode['nom-X'] = 0.381;	// Nominal value for X-dim (bar width) in mm (2 X min. spec.)
    287. 

  287. 				$arrcode['nom-H'] = 10;		// Nominal value for Height of Full bar in mm (non-spec.)
    288. 

  288. 				$arrcode['lightmL'] = 10;	// LEFT light margin =  x X-dim (spec.)
    289. 

  289. 				$arrcode['lightmR'] = 10;	// RIGHT light margin =  x X-dim (spec.)
    290. 

  290. 				$arrcode['lightTB'] = 0;	// TOP/BOTTOM light margin =  x X-dim (non-spec.)
    291. 

  291. 				break;
    292. 

  292. 			}
    293. 

  293. 			case 'I25':  // Interleaved 2 of 5
    294. 

  294. 			case 'I25+': { // Interleaved 2 of 5 + CHECKSUM
    295. 

  295. 				if ($pr > 0) { $this->print_ratio = $pr; }
    296. 

  296. 				else { $this->print_ratio = 2.5; }	// spec: Pr= 1:2 - 1:3 (>2.2 if X<0.50)
    297. 

  297. 				if (strtoupper($type)=='I25') { $arrcode = $this->barcode_i25($code, false); }
    298. 

  298. 				if (strtoupper($type)=='I25+') { $arrcode = $this->barcode_i25($code, true); }
    299. 

  299. 				if ($arrcode == false) { break; }
    300. 

  300. 				$arrcode['nom-X'] = 0.381;	// Nominal value for X-dim (bar width) in mm (2 X min. spec.)
    301. 

  301. 				$arrcode['nom-H'] = 10;		// Nominal value for Height of Full bar in mm (non-spec.)
    302. 

  302. 				$arrcode['lightmL'] = 10;	// LEFT light margin =  x X-dim (spec.)
    303. 

  303. 				$arrcode['lightmR'] = 10;	// RIGHT light margin =  x X-dim (spec.)
    304. 

  304. 				$arrcode['lightTB'] = 0;	// TOP/BOTTOM light margin =  x X-dim (non-spec.)
    305. 

  305. 				break;
    306. 

  306. 			}
    307. 

  307. 			case 'I25B':  // Interleaved 2 of 5 + Bearer bars
    308. 

  308. 			case 'I25B+': { // Interleaved 2 of 5 + CHECKSUM + Bearer bars
    309. 

  309. 				if ($pr > 0) { $this->print_ratio = $pr; }
    310. 

  310. 				else { $this->print_ratio = 2.5; }	// spec: Pr= 1:2 - 1:3 (>2.2 if X<0.50)
    311. 

  311. 				if (strtoupper($type)=='I25B') { $arrcode = $this->barcode_i25($code, false); }
    312. 

  312. 				if (strtoupper($type)=='I25B+') { $arrcode = $this->barcode_i25($code, true); }
    313. 

  313. 				if ($arrcode == false) { break; }
    314. 

  314. 				$arrcode['nom-X'] = 0.381;	// Nominal value for X-dim (bar width) in mm (2 X min. spec.)
    315. 

  315. 				$arrcode['nom-H'] = 10;		// Nominal value for Height of Full bar in mm (non-spec.)
    316. 

  316. 				$arrcode['lightmL'] = 10;	// LEFT light margin =  x X-dim (spec.)
    317. 

  317. 				$arrcode['lightmR'] = 10;	// RIGHT light margin =  x X-dim (spec.)
    318. 

  318. 				$arrcode['lightTB'] = 2;	// TOP/BOTTOM light margin =  x X-dim (non-spec.) - used for bearer bars
    319. 

  319. 				break;
    320. 

  320. 			}
    321. 

  321. 			default: {
    322. 

  322. 				$this->barcode_array = false;
    323. 

  323. 			}
    324. 

  324. 		}
    325. 

  325. 		$this->barcode_array = $arrcode;
    326. 

  326. 	}
    327. 

  327. 	
    328. 

  328. 	/**
    329. 

  329. 	 * CODE 39 - ANSI MH10.8M-1983 - USD-3 - 3 of 9.
    330. 

  330. 	 */
    331. 

  331. 	protected function barcode_code39($code, $extended=false, $checksum=false) {
    332. 

  332. 		$chr['0'] = '111221211';
    333. 

  333. 		$chr['1'] = '211211112';
    334. 

  334. 		$chr['2'] = '112211112';
    335. 

  335. 		$chr['3'] = '212211111';
    336. 

  336. 		$chr['4'] = '111221112';
    337. 

  337. 		$chr['5'] = '211221111';
    338. 

  338. 		$chr['6'] = '112221111';
    339. 

  339. 		$chr['7'] = '111211212';
    340. 

  340. 		$chr['8'] = '211211211';
    341. 

  341. 		$chr['9'] = '112211211';
    342. 

  342. 		$chr['A'] = '211112112';
    343. 

  343. 		$chr['B'] = '112112112';
    344. 

  344. 		$chr['C'] = '212112111';
    345. 

  345. 		$chr['D'] = '111122112';
    346. 

  346. 		$chr['E'] = '211122111';
    347. 

  347. 		$chr['F'] = '112122111';
    348. 

  348. 		$chr['G'] = '111112212';
    349. 

  349. 		$chr['H'] = '211112211';
    350. 

  350. 		$chr['I'] = '112112211';
    351. 

  351. 		$chr['J'] = '111122211';
    352. 

  352. 		$chr['K'] = '211111122';
    353. 

  353. 		$chr['L'] = '112111122';
    354. 

  354. 		$chr['M'] = '212111121';
    355. 

  355. 		$chr['N'] = '111121122';
    356. 

  356. 		$chr['O'] = '211121121';
    357. 

  357. 		$chr['P'] = '112121121';
    358. 

  358. 		$chr['Q'] = '111111222';
    359. 

  359. 		$chr['R'] = '211111221';
    360. 

  360. 		$chr['S'] = '112111221';
    361. 

  361. 		$chr['T'] = '111121221';
    362. 

  362. 		$chr['U'] = '221111112';
    363. 

  363. 		$chr['V'] = '122111112';
    364. 

  364. 		$chr['W'] = '222111111';
    365. 

  365. 		$chr['X'] = '121121112';
    366. 

  366. 		$chr['Y'] = '221121111';
    367. 

  367. 		$chr['Z'] = '122121111';
    368. 

  368. 		$chr['-'] = '121111212';
    369. 

  369. 		$chr['.'] = '221111211';
    370. 

  370. 		$chr[' '] = '122111211';
    371. 

  371. 		$chr['$'] = '121212111';
    372. 

  372. 		$chr['/'] = '121211121';
    373. 

  373. 		$chr['+'] = '121112121';
    374. 

  374. 		$chr['%'] = '111212121';
    375. 

  375. 		$chr['*'] = '121121211';
    376. 

  376. 		
    377. 

  377. 		$code = strtoupper($code);
    378. 

  378. 		if ($extended) {
    379. 

  379. 			// extended mode
    380. 

  380. 			$code = $this->encode_code39_ext($code);
    381. 

  381. 		}
    382. 

  382. 		if ($code === false) {
    383. 

  383. 			return false;
    384. 

  384. 		}
    385. 

  385. 		if ($checksum) {
    386. 

  386. 			// checksum
    387. 

  387. 			$checkdigit = $this->checksum_code39($code);
    388. 

  388. 			$code .= $checkdigit ;
    389. 

  389. 		}
    390. 

  390. 		// add start and stop codes
    391. 

  391. 		$code = '*'.$code.'*';
    392. 

  392. 		
    393. 

  393. 		$bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
    394. 

  394. 		$k = 0;
    395. 

  395. 		$clen = strlen($code);
    396. 

  396. 		for ($i = 0; $i < $clen; ++$i) {
    397. 

  397. 			$char = $code[$i];
    398. 

  398. 			if(!isset($chr[$char])) {
    399. 

  399. 				// invalid character
    400. 

  400. 				return false;
    401. 

  401. 			}
    402. 

  402. 			for ($j = 0; $j < 9; ++$j) {
    403. 

  403. 				if (($j % 2) == 0) {
    404. 

  404. 					$t = true; // bar
    405. 

  405. 				} else {
    406. 

  406. 					$t = false; // space
    407. 

  407. 				}
    408. 

  408. 				$x = $chr[$char][$j];
    409. 

  409. 				if ($x == 2) { $w = $this->print_ratio; }
    410. 

  410. 				else { $w = 1; }
    411. 

  411. 

  412. 				$bararray['bcode'][$k] = array('t' => $t, 'w' => $w, 'h' => 1, 'p' => 0);
    413. 

  413. 				$bararray['maxw'] += $w;
    414. 

  414. 				++$k;
    415. 

  415. 			}
    416. 

  416. 			$bararray['bcode'][$k] = array('t' => false, 'w' => 1, 'h' => 1, 'p' => 0);
    417. 

  417. 			$bararray['maxw'] += 1;
    418. 

  418. 			++$k;
    419. 

  419. 		}
    420. 

  420. 		$bararray['checkdigit'] = $checkdigit;
    421. 

  421. 		return $bararray;
    422. 

  422. 	}
    423. 

  423. 	
    424. 

  424. 	/**
    425. 

  425. 	 * Encode a string to be used for CODE 39 Extended mode.
    426. 

  426. 	 */
    427. 

  427. 	protected function encode_code39_ext($code) {
    428. 

  428. 		$encode = array(
    429. 

  429. 			chr(0) => '%U', chr(1) => '$A', chr(2) => '$B', chr(3) => '$C',
    430. 

  430. 			chr(4) => '$D', chr(5) => '$E', chr(6) => '$F', chr(7) => '$G',
    431. 

  431. 			chr(8) => '$H', chr(9) => '$I', chr(10) => '$J', chr(11) => '£K',
    432. 

  432. 			chr(12) => '$L', chr(13) => '$M', chr(14) => '$N', chr(15) => '$O',
    433. 

  433. 			chr(16) => '$P', chr(17) => '$Q', chr(18) => '$R', chr(19) => '$S',
    434. 

  434. 			chr(20) => '$T', chr(21) => '$U', chr(22) => '$V', chr(23) => '$W',
    435. 

  435. 			chr(24) => '$X', chr(25) => '$Y', chr(26) => '$Z', chr(27) => '%A',
    436. 

  436. 			chr(28) => '%B', chr(29) => '%C', chr(30) => '%D', chr(31) => '%E',
    437. 

  437. 			chr(32) => ' ', chr(33) => '/A', chr(34) => '/B', chr(35) => '/C',
    438. 

  438. 			chr(36) => '/D', chr(37) => '/E', chr(38) => '/F', chr(39) => '/G',
    439. 

  439. 			chr(40) => '/H', chr(41) => '/I', chr(42) => '/J', chr(43) => '/K',
    440. 

  440. 			chr(44) => '/L', chr(45) => '-', chr(46) => '.', chr(47) => '/O',
    441. 

  441. 			chr(48) => '0', chr(49) => '1', chr(50) => '2', chr(51) => '3',
    442. 

  442. 			chr(52) => '4', chr(53) => '5', chr(54) => '6', chr(55) => '7',
    443. 

  443. 			chr(56) => '8', chr(57) => '9', chr(58) => '/Z', chr(59) => '%F',
    444. 

  444. 			chr(60) => '%G', chr(61) => '%H', chr(62) => '%I', chr(63) => '%J',
    445. 

  445. 			chr(64) => '%V', chr(65) => 'A', chr(66) => 'B', chr(67) => 'C',
    446. 

  446. 			chr(68) => 'D', chr(69) => 'E', chr(70) => 'F', chr(71) => 'G',
    447. 

  447. 			chr(72) => 'H', chr(73) => 'I', chr(74) => 'J', chr(75) => 'K',
    448. 

  448. 			chr(76) => 'L', chr(77) => 'M', chr(78) => 'N', chr(79) => 'O',
    449. 

  449. 			chr(80) => 'P', chr(81) => 'Q', chr(82) => 'R', chr(83) => 'S',
    450. 

  450. 			chr(84) => 'T', chr(85) => 'U', chr(86) => 'V', chr(87) => 'W',
    451. 

  451. 			chr(88) => 'X', chr(89) => 'Y', chr(90) => 'Z', chr(91) => '%K',
    452. 

  452. 			chr(92) => '%L', chr(93) => '%M', chr(94) => '%N', chr(95) => '%O',
    453. 

  453. 			chr(96) => '%W', chr(97) => '+A', chr(98) => '+B', chr(99) => '+C',
    454. 

  454. 			chr(100) => '+D', chr(101) => '+E', chr(102) => '+F', chr(103) => '+G',
    455. 

  455. 			chr(104) => '+H', chr(105) => '+I', chr(106) => '+J', chr(107) => '+K',
    456. 

  456. 			chr(108) => '+L', chr(109) => '+M', chr(110) => '+N', chr(111) => '+O',
    457. 

  457. 			chr(112) => '+P', chr(113) => '+Q', chr(114) => '+R', chr(115) => '+S',
    458. 

  458. 			chr(116) => '+T', chr(117) => '+U', chr(118) => '+V', chr(119) => '+W',
    459. 

  459. 			chr(120) => '+X', chr(121) => '+Y', chr(122) => '+Z', chr(123) => '%P',
    460. 

  460. 			chr(124) => '%Q', chr(125) => '%R', chr(126) => '%S', chr(127) => '%T');
    461. 

  461. 		$code_ext = '';
    462. 

  462. 		$clen = strlen($code);
    463. 

  463. 		for ($i = 0 ; $i < $clen; ++$i) {
    464. 

  464. 			if (ord($code[$i]) > 127) {
    465. 

  465. 				return false;
    466. 

  466. 			}
    467. 

  467. 			$code_ext .= $encode[$code[$i]];
    468. 

  468. 		}
    469. 

  469. 		return $code_ext;
    470. 

  470. 	}
    471. 

  471. 	
    472. 

  472. 	/**
    473. 

  473. 	 * Calculate CODE 39 checksum (modulo 43).
    474. 

  474. 	 */
    475. 

  475. 	protected function checksum_code39($code) {
    476. 

  476. 		$chars = array(
    477. 

  477. 			'0', '1', '2', '3', '4', '5', '6', '7', '8', '9',
    478. 

  478. 			'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K',
    479. 

  479. 			'L', 'M', 'N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U', 'V',
    480. 

  480. 			'W', 'X', 'Y', 'Z', '-', '.', ' ', '$', '/', '+', '%');
    481. 

  481. 		$sum = 0;
    482. 

  482. 		$clen = strlen($code);
    483. 

  483. 		for ($i = 0 ; $i < $clen; ++$i) {
    484. 

  484. 			$k = array_keys($chars, $code[$i]);
    485. 

  485. 			$sum += $k[0];
    486. 

  486. 		}
    487. 

  487. 		$j = ($sum % 43);
    488. 

  488. 		return $chars[$j];
    489. 

  489. 	}
    490. 

  490. 	
    491. 

  491. 	/**
    492. 

  492. 	 * CODE 93 - USS-93
    493. 

  493. 	 * Compact code similar to Code 39
    494. 

  494. 	 */
    495. 

  495. 	protected function barcode_code93($code) {
    496. 

  496. 		$chr['0'] = '131112';
    497. 

  497. 		$chr['1'] = '111213';
    498. 

  498. 		$chr['2'] = '111312';
    499. 

  499. 		$chr['3'] = '111411';
    500. 

  500. 		$chr['4'] = '121113';
    501. 

  501. 		$chr['5'] = '121212';
    502. 

  502. 		$chr['6'] = '121311';
    503. 

  503. 		$chr['7'] = '111114';
    504. 

  504. 		$chr['8'] = '131211';
    505. 

  505. 		$chr['9'] = '141111';
    506. 

  506. 		$chr['A'] = '211113';
    507. 

  507. 		$chr['B'] = '211212';
    508. 

  508. 		$chr['C'] = '211311';
    509. 

  509. 		$chr['D'] = '221112';
    510. 

  510. 		$chr['E'] = '221211';
    511. 

  511. 		$chr['F'] = '231111';
    512. 

  512. 		$chr['G'] = '112113';
    513. 

  513. 		$chr['H'] = '112212';
    514. 

  514. 		$chr['I'] = '112311';
    515. 

  515. 		$chr['J'] = '122112';
    516. 

  516. 		$chr['K'] = '132111';
    517. 

  517. 		$chr['L'] = '111123';
    518. 

  518. 		$chr['M'] = '111222';
    519. 

  519. 		$chr['N'] = '111321';
    520. 

  520. 		$chr['O'] = '121122';
    521. 

  521. 		$chr['P'] = '131121';
    522. 

  522. 		$chr['Q'] = '212112';
    523. 

  523. 		$chr['R'] = '212211';
    524. 

  524. 		$chr['S'] = '211122';
    525. 

  525. 		$chr['T'] = '211221';
    526. 

  526. 		$chr['U'] = '221121';
    527. 

  527. 		$chr['V'] = '222111';
    528. 

  528. 		$chr['W'] = '112122';
    529. 

  529. 		$chr['X'] = '112221';
    530. 

  530. 		$chr['Y'] = '122121';
    531. 

  531. 		$chr['Z'] = '123111';
    532. 

  532. 		$chr['-'] = '121131';
    533. 

  533. 		$chr['.'] = '311112';
    534. 

  534. 		$chr[' '] = '311211';
    535. 

  535. 		$chr['$'] = '321111';
    536. 

  536. 		$chr['/'] = '112131';
    537. 

  537. 		$chr['+'] = '113121';
    538. 

  538. 		$chr['%'] = '211131';
    539. 

  539. 		$chr[128] = '121221'; // ($)
    540. 

  540. 		$chr[129] = '311121'; // (/)
    541. 

  541. 		$chr[130] = '122211'; // (+)
    542. 

  542. 		$chr[131] = '312111'; // (%)
    543. 

  543. 		$chr['*'] = '111141';
    544. 

  544. 		$code = strtoupper($code);
    545. 

  545. 		$encode = array(
    546. 

  546. 			chr(0) => chr(131).'U', chr(1) => chr(128).'A', chr(2) => chr(128).'B', chr(3) => chr(128).'C',
    547. 

  547. 			chr(4) => chr(128).'D', chr(5) => chr(128).'E', chr(6) => chr(128).'F', chr(7) => chr(128).'G',
    548. 

  548. 			chr(8) => chr(128).'H', chr(9) => chr(128).'I', chr(10) => chr(128).'J', chr(11) => '£K',
    549. 

  549. 			chr(12) => chr(128).'L', chr(13) => chr(128).'M', chr(14) => chr(128).'N', chr(15) => chr(128).'O',
    550. 

  550. 			chr(16) => chr(128).'P', chr(17) => chr(128).'Q', chr(18) => chr(128).'R', chr(19) => chr(128).'S',
    551. 

  551. 			chr(20) => chr(128).'T', chr(21) => chr(128).'U', chr(22) => chr(128).'V', chr(23) => chr(128).'W',
    552. 

  552. 			chr(24) => chr(128).'X', chr(25) => chr(128).'Y', chr(26) => chr(128).'Z', chr(27) => chr(131).'A',
    553. 

  553. 			chr(28) => chr(131).'B', chr(29) => chr(131).'C', chr(30) => chr(131).'D', chr(31) => chr(131).'E',
    554. 

  554. 			chr(32) => ' ', chr(33) => chr(129).'A', chr(34) => chr(129).'B', chr(35) => chr(129).'C',
    555. 

  555. 			chr(36) => chr(129).'D', chr(37) => chr(129).'E', chr(38) => chr(129).'F', chr(39) => chr(129).'G',
    556. 

  556. 			chr(40) => chr(129).'H', chr(41) => chr(129).'I', chr(42) => chr(129).'J', chr(43) => chr(129).'K',
    557. 

  557. 			chr(44) => chr(129).'L', chr(45) => '-', chr(46) => '.', chr(47) => chr(129).'O',
    558. 

  558. 			chr(48) => '0', chr(49) => '1', chr(50) => '2', chr(51) => '3',
    559. 

  559. 			chr(52) => '4', chr(53) => '5', chr(54) => '6', chr(55) => '7',
    560. 

  560. 			chr(56) => '8', chr(57) => '9', chr(58) => chr(129).'Z', chr(59) => chr(131).'F',
    561. 

  561. 			chr(60) => chr(131).'G', chr(61) => chr(131).'H', chr(62) => chr(131).'I', chr(63) => chr(131).'J',
    562. 

  562. 			chr(64) => chr(131).'V', chr(65) => 'A', chr(66) => 'B', chr(67) => 'C',
    563. 

  563. 			chr(68) => 'D', chr(69) => 'E', chr(70) => 'F', chr(71) => 'G',
    564. 

  564. 			chr(72) => 'H', chr(73) => 'I', chr(74) => 'J', chr(75) => 'K',
    565. 

  565. 			chr(76) => 'L', chr(77) => 'M', chr(78) => 'N', chr(79) => 'O',
    566. 

  566. 			chr(80) => 'P', chr(81) => 'Q', chr(82) => 'R', chr(83) => 'S',
    567. 

  567. 			chr(84) => 'T', chr(85) => 'U', chr(86) => 'V', chr(87) => 'W',
    568. 

  568. 			chr(88) => 'X', chr(89) => 'Y', chr(90) => 'Z', chr(91) => chr(131).'K',
    569. 

  569. 			chr(92) => chr(131).'L', chr(93) => chr(131).'M', chr(94) => chr(131).'N', chr(95) => chr(131).'O',
    570. 

  570. 			chr(96) => chr(131).'W', chr(97) => chr(130).'A', chr(98) => chr(130).'B', chr(99) => chr(130).'C',
    571. 

  571. 			chr(100) => chr(130).'D', chr(101) => chr(130).'E', chr(102) => chr(130).'F', chr(103) => chr(130).'G',
    572. 

  572. 			chr(104) => chr(130).'H', chr(105) => chr(130).'I', chr(106) => chr(130).'J', chr(107) => chr(130).'K',
    573. 

  573. 			chr(108) => chr(130).'L', chr(109) => chr(130).'M', chr(110) => chr(130).'N', chr(111) => chr(130).'O',
    574. 

  574. 			chr(112) => chr(130).'P', chr(113) => chr(130).'Q', chr(114) => chr(130).'R', chr(115) => chr(130).'S',
    575. 

  575. 			chr(116) => chr(130).'T', chr(117) => chr(130).'U', chr(118) => chr(130).'V', chr(119) => chr(130).'W',
    576. 

  576. 			chr(120) => chr(130).'X', chr(121) => chr(130).'Y', chr(122) => chr(130).'Z', chr(123) => chr(131).'P',
    577. 

  577. 			chr(124) => chr(131).'Q', chr(125) => chr(131).'R', chr(126) => chr(131).'S', chr(127) => chr(131).'T');
    578. 

  578. 		$code_ext = '';
    579. 

  579. 		$clen = strlen($code);
    580. 

  580. 		for ($i = 0 ; $i < $clen; ++$i) {
    581. 

  581. 			if (ord($code[$i]) > 127) {
    582. 

  582. 				return false;
    583. 

  583. 			}
    584. 

  584. 			$code_ext .= $encode[$code[$i]];
    585. 

  585. 		}
    586. 

  586. 		// checksum
    587. 

  587. 		$checkdigit = $this->checksum_code93($code);
    588. 

  588. 		$code .= $checkdigit ;
    589. 

  589. 		// add start and stop codes
    590. 

  590. 		$code = '*'.$code.'*';
    591. 

  591. 		$bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
    592. 

  592. 		$k = 0;
    593. 

  593. 		$clen = strlen($code);
    594. 

  594. 		for ($i = 0; $i < $clen; ++$i) {
    595. 

  595. 			$char = $code[$i];
    596. 

  596. 			if(!isset($chr[$char])) {
    597. 

  597. 				// invalid character
    598. 

  598. 				return false;
    599. 

  599. 			}
    600. 

  600. 			for ($j = 0; $j < 6; ++$j) {
    601. 

  601. 				if (($j % 2) == 0) {
    602. 

  602. 					$t = true; // bar
    603. 

  603. 				} else {
    604. 

  604. 					$t = false; // space
    605. 

  605. 				}
    606. 

  606. 				$w = $chr[$char][$j];
    607. 

  607. 				$bararray['bcode'][$k] = array('t' => $t, 'w' => $w, 'h' => 1, 'p' => 0);
    608. 

  608. 				$bararray['maxw'] += $w;
    609. 

  609. 				++$k;
    610. 

  610. 			}
    611. 

  611. 		}
    612. 

  612. 		$bararray['bcode'][$k] = array('t' => true, 'w' => 1, 'h' => 1, 'p' => 0);
    613. 

  613. 		$bararray['maxw'] += 1;
    614. 

  614. 		++$k;		
    615. 

  615. 		$bararray['checkdigit'] = $checkdigit;
    616. 

  616. 		return $bararray;
    617. 

  617. 	}
    618. 

  618. 	
    619. 

  619. 	/**
    620. 

  620. 	 * Calculate CODE 93 checksum (modulo 47).
    621. 

  621. 	 */
    622. 

  622. 	protected function checksum_code93($code) {
    623. 

  623. 		$chars = array(
    624. 

  624. 			'0', '1', '2', '3', '4', '5', '6', '7', '8', '9',
    625. 

  625. 			'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K',
    626. 

  626. 			'L', 'M', 'N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U', 'V',
    627. 

  627. 			'W', 'X', 'Y', 'Z', '-', '.', ' ', '$', '/', '+', '%');
    628. 

  628. 		// translate special characters
    629. 

  629. 		$code = strtr($code, chr(128).chr(129).chr(130).chr(131), '$/+%');	
    630. 

  630. 		$len = strlen($code);
    631. 

  631. 		// calculate check digit C
    632. 

  632. 		$p = 1;
    633. 

  633. 		$check = 0;
    634. 

  634. 		for ($i = ($len - 1); $i >= 0; --$i) {
    635. 

  635. 			$k = array_keys($chars, $code[$i]);
    636. 

  636. 			$check += ($k[0] * $p);
    637. 

  637. 			++$p;
    638. 

  638. 			if ($p > 20) {
    639. 

  639. 				$p = 1;
    640. 

  640. 			}
    641. 

  641. 		}
    642. 

  642. 		$check %= 47;
    643. 

  643. 		$c = $chars[$check];
    644. 

  644. 		$code .= $c;
    645. 

  645. 		// calculate check digit K
    646. 

  646. 		$p = 1;
    647. 

  647. 		$check = 0;
    648. 

  648. 		for ($i = $len; $i >= 0; --$i) {
    649. 

  649. 			$k = array_keys($chars, $code[$i]);
    650. 

  650. 			$check += ($k[0] * $p);
    651. 

  651. 			++$p;
    652. 

  652. 			if ($p > 15) {
    653. 

  653. 				$p = 1;
    654. 

  654. 			}
    655. 

  655. 		}
    656. 

  656. 		$check %= 47;
    657. 

  657. 		$k = $chars[$check];
    658. 

  658. 		return $c.$k;
    659. 

  659. 	}
    660. 

  660. 	
    661. 

  661. 	/**
    662. 

  662. 	 * Checksum for standard 2 of 5 barcodes.
    663. 

  663. 	 */
    664. 

  664. 	protected function checksum_s25($code) {
    665. 

  665. 		$len = strlen($code);
    666. 

  666. 		$sum = 0;
    667. 

  667. 		for ($i = 0; $i < $len; $i+=2) {
    668. 

  668. 			$sum += $code[$i];
    669. 

  669. 		}
    670. 

  670. 		$sum *= 3;
    671. 

  671. 		for ($i = 1; $i < $len; $i+=2) {
    672. 

  672. 			$sum += ($code[$i]);
    673. 

  673. 		}
    674. 

  674. 		$r = $sum % 10;
    675. 

  675. 		if($r > 0) {
    676. 

  676. 			$r = (10 - $r);
    677. 

  677. 		}
    678. 

  678. 		return $r;
    679. 

  679. 	}
    680. 

  680. 	
    681. 

  681. 	/**
    682. 

  682. 	 * MSI.
    683. 

  683. 	 * Variation of Plessey code, with similar applications 
    684. 

  684. 	 * Contains digits (0 to 9) and encodes the data only in the width of bars.
    685. 

  685. 	 */
    686. 

  686. 	protected function barcode_msi($code, $checksum=false) {
    687. 

  687. 		$chr['0'] = '100100100100';
    688. 

  688. 		$chr['1'] = '100100100110';
    689. 

  689. 		$chr['2'] = '100100110100';
    690. 

  690. 		$chr['3'] = '100100110110';
    691. 

  691. 		$chr['4'] = '100110100100';
    692. 

  692. 		$chr['5'] = '100110100110';
    693. 

  693. 		$chr['6'] = '100110110100';
    694. 

  694. 		$chr['7'] = '100110110110';
    695. 

  695. 		$chr['8'] = '110100100100';
    696. 

  696. 		$chr['9'] = '110100100110';
    697. 

  697. 		$chr['A'] = '110100110100';
    698. 

  698. 		$chr['B'] = '110100110110';
    699. 

  699. 		$chr['C'] = '110110100100';
    700. 

  700. 		$chr['D'] = '110110100110';
    701. 

  701. 		$chr['E'] = '110110110100';
    702. 

  702. 		$chr['F'] = '110110110110';
    703. 

  703. 		if ($checksum) {
    704. 

  704. 			// add checksum
    705. 

  705. 			$clen = strlen($code);
    706. 

  706. 			$p = 2;
    707. 

  707. 			$check = 0;
    708. 

  708. 			for ($i = ($clen - 1); $i >= 0; --$i) {
    709. 

  709. 				$check += (hexdec($code[$i]) * $p);
    710. 

  710. 				++$p;
    711. 

  711. 				if ($p > 7) {
    712. 

  712. 					$p = 2;
    713. 

  713. 				}
    714. 

  714. 			}
    715. 

  715. 			$check %= 11;
    716. 

  716. 			if ($check > 0) {
    717. 

  717. 				$check = 11 - $check;
    718. 

  718. 			}
    719. 

  719. 			$code .= $check;
    720. 

  720. 			$checkdigit = $check;
    721. 

  721. 		}
    722. 

  722. 		$seq = '110'; // left guard
    723. 

  723. 		$clen = strlen($code);
    724. 

  724. 		for ($i = 0; $i < $clen; ++$i) {
    725. 

  725. 			$digit = $code[$i];
    726. 

  726. 			if (!isset($chr[$digit])) {
    727. 

  727. 				// invalid character
    728. 

  728. 				return false;
    729. 

  729. 			}
    730. 

  730. 			$seq .= $chr[$digit];
    731. 

  731. 		}		
    732. 

  732. 		$seq .= '1001'; // right guard
    733. 

  733. 		$bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
    734. 

  734. 		$bararray['checkdigit'] = $checkdigit;
    735. 

  735. 		return $this->binseq_to_array($seq, $bararray);
    736. 

  736. 	}
    737. 

  737. 	
    738. 

  738. 	/**
    739. 

  739. 	 * Standard 2 of 5 barcodes.
    740. 

  740. 	 * Used in airline ticket marking, photofinishing
    741. 

  741. 	 * Contains digits (0 to 9) and encodes the data only in the width of bars.
    742. 

  742. 	 */
    743. 

  743. 	protected function barcode_s25($code, $checksum=false) {
    744. 

  744. 		$chr['0'] = '10101110111010';
    745. 

  745. 		$chr['1'] = '11101010101110';
    746. 

  746. 		$chr['2'] = '10111010101110';
    747. 

  747. 		$chr['3'] = '11101110101010';
    748. 

  748. 		$chr['4'] = '10101110101110';
    749. 

  749. 		$chr['5'] = '11101011101010';
    750. 

  750. 		$chr['6'] = '10111011101010';
    751. 

  751. 		$chr['7'] = '10101011101110';
    752. 

  752. 		$chr['8'] = '10101110111010';
    753. 

  753. 		$chr['9'] = '10111010111010';
    754. 

  754. 		if ($checksum) {
    755. 

  755. 			// add checksum
    756. 

  756. 			$checkdigit = $this->checksum_s25($code);
    757. 

  757. 			$code .= $checkdigit ;
    758. 

  758. 		}
    759. 

  759. 		if((strlen($code) % 2) != 0) {
    760. 

  760. 			// add leading zero if code-length is odd
    761. 

  761. 			$code = '0'.$code;
    762. 

  762. 		}
    763. 

  763. 		$seq = '11011010';
    764. 

  764. 		$clen = strlen($code);
    765. 

  765. 		for ($i = 0; $i < $clen; ++$i) {
    766. 

  766. 			$digit = $code[$i];
    767. 

  767. 			if (!isset($chr[$digit])) {
    768. 

  768. 				// invalid character
    769. 

  769. 				return false;
    770. 

  770. 			}
    771. 

  771. 			$seq .= $chr[$digit];
    772. 

  772. 		}		
    773. 

  773. 		$seq .= '1101011';
    774. 

  774. 		$bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
    775. 

  775. 		$bararray['checkdigit'] = $checkdigit;
    776. 

  776. 		return $this->binseq_to_array($seq, $bararray);
    777. 

  777. 	}
    778. 

  778. 	
    779. 

  779. 	/**
    780. 

  780. 	 * Convert binary barcode sequence to barcode array
    781. 

  781. 	 */
    782. 

  782. 	protected function binseq_to_array($seq, $bararray) {
    783. 

  783. 		$len = strlen($seq);
    784. 

  784. 		$w = 0;
    785. 

  785. 		$k = 0;
    786. 

  786. 		for ($i = 0; $i < $len; ++$i) {
    787. 

  787. 			$w += 1;
    788. 

  788. 			if (($i == ($len - 1)) OR (($i < ($len - 1)) AND ($seq[$i] != $seq[($i+1)]))) {
    789. 

  789. 				if ($seq[$i] == '1') {
    790. 

  790. 					$t = true; // bar
    791. 

  791. 				} else {
    792. 

  792. 					$t = false; // space
    793. 

  793. 				}
    794. 

  794. 				$bararray['bcode'][$k] = array('t' => $t, 'w' => $w, 'h' => 1, 'p' => 0);
    795. 

  795. 				$bararray['maxw'] += $w;
    796. 

  796. 				++$k;
    797. 

  797. 				$w = 0;
    798. 

  798. 			}
    799. 

  799. 		}
    800. 

  800. 		return $bararray;
    801. 

  801. 	}
    802. 

  802. 	
    803. 

  803. 	/**
    804. 

  804. 	 * Interleaved 2 of 5 barcodes.
    805. 

  805. 	 * Compact numeric code, widely used in industry, air cargo
    806. 

  806. 	 * Contains digits (0 to 9) and encodes the data in the width of both bars and spaces.
    807. 

  807. 	 */
    808. 

  808. 	protected function barcode_i25($code, $checksum=false) {
    809. 

  809. 		$chr['0'] = '11221';
    810. 

  810. 		$chr['1'] = '21112';
    811. 

  811. 		$chr['2'] = '12112';
    812. 

  812. 		$chr['3'] = '22111';
    813. 

  813. 		$chr['4'] = '11212';
    814. 

  814. 		$chr['5'] = '21211';
    815. 

  815. 		$chr['6'] = '12211';
    816. 

  816. 		$chr['7'] = '11122';
    817. 

  817. 		$chr['8'] = '21121';
    818. 

  818. 		$chr['9'] = '12121';
    819. 

  819. 		$chr['A'] = '11';
    820. 

  820. 		$chr['Z'] = '21';
    821. 

  821. 		if ($checksum) {
    822. 

  822. 			// add checksum
    823. 

  823. 			$checkdigit = $this->checksum_s25($code);
    824. 

  824. 			$code .= $checkdigit ;
    825. 

  825. 		}
    826. 

  826. 		if((strlen($code) % 2) != 0) {
    827. 

  827. 			// add leading zero if code-length is odd
    828. 

  828. 			$code = '0'.$code;
    829. 

  829. 		}
    830. 

  830. 		// add start and stop codes
    831. 

  831. 		$code = 'AA'.strtolower($code).'ZA';
    832. 

  832. 			
    833. 

  833. 		$bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
    834. 

  834. 		$k = 0;
    835. 

  835. 		$clen = strlen($code);
    836. 

  836. 		for ($i = 0; $i < $clen; $i = ($i + 2)) {
    837. 

  837. 			$char_bar = $code[$i];
    838. 

  838. 			$char_space = $code[$i+1];
    839. 

  839. 			if((!isset($chr[$char_bar])) OR (!isset($chr[$char_space]))) {
    840. 

  840. 				// invalid character
    841. 

  841. 				return false;
    842. 

  842. 			}
    843. 

  843. 			// create a bar-space sequence
    844. 

  844. 			$seq = '';
    845. 

  845. 			$chrlen = strlen($chr[$char_bar]);
    846. 

  846. 			for ($s = 0; $s < $chrlen; $s++){
    847. 

  847. 				$seq .= $chr[$char_bar][$s] . $chr[$char_space][$s];
    848. 

  848. 			}
    849. 

  849. 			$seqlen = strlen($seq);
    850. 

  850. 			for ($j = 0; $j < $seqlen; ++$j) {
    851. 

  851. 				if (($j % 2) == 0) {
    852. 

  852. 					$t = true; // bar
    853. 

  853. 				} else {
    854. 

  854. 					$t = false; // space
    855. 

  855. 				}
    856. 

  856. 				$x = $seq[$j];
    857. 

  857. 				if ($x == 2) { $w = $this->print_ratio; }
    858. 

  858. 				else { $w = 1; }
    859. 

  859. 

  860. 				$bararray['bcode'][$k] = array('t' => $t, 'w' => $w, 'h' => 1, 'p' => 0);
    861. 

  861. 				$bararray['maxw'] += $w;
    862. 

  862. 				++$k;
    863. 

  863. 			}
    864. 

  864. 		}
    865. 

  865. 		$bararray['checkdigit'] = $checkdigit;
    866. 

  866. 		return $bararray;
    867. 

  867. 	}
    868. 

  868. 	
    869. 

  869. 	/**
    870. 

  870. 	 * C128 barcodes. 
    871. 

  871. 	 * Very capable code, excellent density, high reliability; in very wide use world-wide
    872. 

  872. 	 */
    873. 

  873. 	protected function barcode_c128($code, $type='B', $ean=false) {
    874. 

  874. 		$chr = array(
    875. 

  875. 			'212222', /* 00 */
    876. 

  876. 			'222122', /* 01 */
    877. 

  877. 			'222221', /* 02 */
    878. 

  878. 			'121223', /* 03 */
    879. 

  879. 			'121322', /* 04 */
    880. 

  880. 			'131222', /* 05 */
    881. 

  881. 			'122213', /* 06 */
    882. 

  882. 			'122312', /* 07 */
    883. 

  883. 			'132212', /* 08 */
    884. 

  884. 			'221213', /* 09 */
    885. 

  885. 			'221312', /* 10 */
    886. 

  886. 			'231212', /* 11 */
    887. 

  887. 			'112232', /* 12 */
    888. 

  888. 			'122132', /* 13 */
    889. 

  889. 			'122231', /* 14 */
    890. 

  890. 			'113222', /* 15 */
    891. 

  891. 			'123122', /* 16 */
    892. 

  892. 			'123221', /* 17 */
    893. 

  893. 			'223211', /* 18 */
    894. 

  894. 			'221132', /* 19 */
    895. 

  895. 			'221231', /* 20 */
    896. 

  896. 			'213212', /* 21 */
    897. 

  897. 			'223112', /* 22 */
    898. 

  898. 			'312131', /* 23 */
    899. 

  899. 			'311222', /* 24 */
    900. 

  900. 			'321122', /* 25 */
    901. 

  901. 			'321221', /* 26 */
    902. 

  902. 			'312212', /* 27 */
    903. 

  903. 			'322112', /* 28 */
    904. 

  904. 			'322211', /* 29 */
    905. 

  905. 			'212123', /* 30 */
    906. 

  906. 			'212321', /* 31 */
    907. 

  907. 			'232121', /* 32 */
    908. 

  908. 			'111323', /* 33 */
    909. 

  909. 			'131123', /* 34 */
    910. 

  910. 			'131321', /* 35 */
    911. 

  911. 			'112313', /* 36 */
    912. 

  912. 			'132113', /* 37 */
    913. 

  913. 			'132311', /* 38 */
    914. 

  914. 			'211313', /* 39 */
    915. 

  915. 			'231113', /* 40 */
    916. 

  916. 			'231311', /* 41 */
    917. 

  917. 			'112133', /* 42 */
    918. 

  918. 			'112331', /* 43 */
    919. 

  919. 			'132131', /* 44 */
    920. 

  920. 			'113123', /* 45 */
    921. 

  921. 			'113321', /* 46 */
    922. 

  922. 			'133121', /* 47 */
    923. 

  923. 			'313121', /* 48 */
    924. 

  924. 			'211331', /* 49 */
    925. 

  925. 			'231131', /* 50 */
    926. 

  926. 			'213113', /* 51 */
    927. 

  927. 			'213311', /* 52 */
    928. 

  928. 			'213131', /* 53 */
    929. 

  929. 			'311123', /* 54 */
    930. 

  930. 			'311321', /* 55 */
    931. 

  931. 			'331121', /* 56 */
    932. 

  932. 			'312113', /* 57 */
    933. 

  933. 			'312311', /* 58 */
    934. 

  934. 			'332111', /* 59 */
    935. 

  935. 			'314111', /* 60 */
    936. 

  936. 			'221411', /* 61 */
    937. 

  937. 			'431111', /* 62 */
    938. 

  938. 			'111224', /* 63 */
    939. 

  939. 			'111422', /* 64 */
    940. 

  940. 			'121124', /* 65 */
    941. 

  941. 			'121421', /* 66 */
    942. 

  942. 			'141122', /* 67 */
    943. 

  943. 			'141221', /* 68 */
    944. 

  944. 			'112214', /* 69 */
    945. 

  945. 			'112412', /* 70 */
    946. 

  946. 			'122114', /* 71 */
    947. 

  947. 			'122411', /* 72 */
    948. 

  948. 			'142112', /* 73 */
    949. 

  949. 			'142211', /* 74 */
    950. 

  950. 			'241211', /* 75 */
    951. 

  951. 			'221114', /* 76 */
    952. 

  952. 			'413111', /* 77 */
    953. 

  953. 			'241112', /* 78 */
    954. 

  954. 			'134111', /* 79 */
    955. 

  955. 			'111242', /* 80 */
    956. 

  956. 			'121142', /* 81 */
    957. 

  957. 			'121241', /* 82 */
    958. 

  958. 			'114212', /* 83 */
    959. 

  959. 			'124112', /* 84 */
    960. 

  960. 			'124211', /* 85 */
    961. 

  961. 			'411212', /* 86 */
    962. 

  962. 			'421112', /* 87 */
    963. 

  963. 			'421211', /* 88 */
    964. 

  964. 			'212141', /* 89 */
    965. 

  965. 			'214121', /* 90 */
    966. 

  966. 			'412121', /* 91 */
    967. 

  967. 			'111143', /* 92 */
    968. 

  968. 			'111341', /* 93 */
    969. 

  969. 			'131141', /* 94 */
    970. 

  970. 			'114113', /* 95 */
    971. 

  971. 			'114311', /* 96 */
    972. 

  972. 			'411113', /* 97 */
    973. 

  973. 			'411311', /* 98 */
    974. 

  974. 			'113141', /* 99 */
    975. 

  975. 			'114131', /* 100 */
    976. 

  976. 			'311141', /* 101 */
    977. 

  977. 			'411131', /* 102 */
    978. 

  978. 			'211412', /* 103 START A */
    979. 

  979. 			'211214', /* 104 START B  */
    980. 

  980. 			'211232', /* 105 START C  */
    981. 

  981. 			'233111', /* STOP */
    982. 

  982. 			'200000'  /* END */
    983. 

  983. 		);
    984. 

  984. 		$keys = '';
    985. 

  985. 		switch(strtoupper($type)) {
    986. 

  986. 			case 'A': {
    987. 

  987. 				$startid = 103;
    988. 

  988. 				$keys = ' !"#$%&\'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\]^_';
    989. 

  989. 				for ($i = 0; $i < 32; ++$i) {
    990. 

  990. 					$keys .= chr($i);
    991. 

  991. 				}
    992. 

  992. 				break;
    993. 

  993. 			}
    994. 

  994. 			case 'B': {
    995. 

  995. 				$startid = 104;
    996. 

  996. 				$keys = ' !"#$%&\'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\]^_`abcdefghijklmnopqrstuvwxyz{|}~'.chr(127);
    997. 

  997. 				break;
    998. 

  998. 			}
    999. 

  999. 			case 'C': {
    1000. 

  1000. 				$startid = 105;
    1001. 

  1001. 				$keys = '';
    1002. 

  1002. 				if ((strlen($code) % 2) != 0) {
    1003. 

  1003. 					// The length of barcode value must be even ($code). You must pad the number with zeros
    1004. 

  1004. 					return false;
    1005. 

  1005. 				}
    1006. 

  1006. 				for ($i = 0; $i <= 99; ++$i) {
    1007. 

  1007. 					$keys .= chr($i);
    1008. 

  1008. 				}
    1009. 

  1009. 				$new_code = '';
    1010. 

  1010. 				$hclen = (strlen($code) / 2);
    1011. 

  1011. 				for ($i = 0; $i < $hclen; ++$i) {
    1012. 

  1012. 					$new_code .= chr(intval($code{(2 * $i)}.$code{(2 * $i + 1)}));
    1013. 

  1013. 				}
    1014. 

  1014. 				$code = $new_code;
    1015. 

  1015. 				break;
    1016. 

  1016. 			}
    1017. 

  1017. 			default: {
    1018. 

  1018. 				return false;
    1019. 

  1019. 			}
    1020. 

  1020. 		}
    1021. 

  1021. 

  1022. 		// calculate check character
    1023. 

  1023. 		$sum = $startid;
    1024. 

  1024. 		if ($ean) { $code = chr(102) . $code; }	// Add FNC 1 - which identifies it as EAN-128
    1025. 

  1025. 		$clen = strlen($code);
    1026. 

  1026. 		for ($i = 0; $i < $clen; ++$i) {
    1027. 

  1027. 			if ($ean && $i==0) { $sum += 102; }
    1028. 

  1028. 			else { $sum +=  (strpos($keys, $code[$i]) * ($i+1)); }
    1029. 

  1029. 		}
    1030. 

  1030. 		$check = ($sum % 103);
    1031. 

  1031. 		$checkdigit = $check ;
    1032. 

  1032. 		// add start, check and stop codes
    1033. 

  1033. 		$code = chr($startid).$code.chr($check).chr(106).chr(107);
    1034. 

  1034. 		$bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
    1035. 

  1035. 		$k = 0;
    1036. 

  1036. 		$len = strlen($code);
    1037. 

  1037. 		for ($i = 0; $i < $len; ++$i) {
    1038. 

  1038. 			$ck = strpos($keys, $code[$i]);
    1039. 

  1039. 			if (($i == 0) || ($ean && $i==1) | ($i > ($len-4))) {
    1040. 

  1040. 				$char_num = ord($code[$i]);
    1041. 

  1041. 				$seq = $chr[$char_num];
    1042. 

  1042. 			} elseif(($ck >= 0) AND isset($chr[$ck])) {
    1043. 

  1043. 					$seq = $chr[$ck];
    1044. 

  1044. 			} else {
    1045. 

  1045. 				// invalid character
    1046. 

  1046. 				return false;
    1047. 

  1047. 			}
    1048. 

  1048. 			for ($j = 0; $j < 6; ++$j) {
    1049. 

  1049. 				if (($j % 2) == 0) {
    1050. 

  1050. 					$t = true; // bar
    1051. 

  1051. 				} else {
    1052. 

  1052. 					$t = false; // space
    1053. 

  1053. 				}
    1054. 

  1054. 				$w = $seq[$j];
    1055. 

  1055. 				$bararray['bcode'][$k] = array('t' => $t, 'w' => $w, 'h' => 1, 'p' => 0);
    1056. 

  1056. 				$bararray['maxw'] += $w;
    1057. 

  1057. 				++$k;
    1058. 

  1058. 			}
    1059. 

  1059. 		}
    1060. 

  1060. 		$bararray['checkdigit'] = $checkdigit;
    1061. 

  1061. 		return $bararray;		
    1062. 

  1062. 	}
    1063. 

  1063. 	
    1064. 

  1064. 	/**
    1065. 

  1065. 	 * EAN13 and UPC-A barcodes.
    1066. 

  1066. 	 * EAN13: European Article Numbering international retail product code
    1067. 

  1067. 	 * UPC-A: Universal product code seen on almost all retail products in the USA and Canada
    1068. 

  1068. 	 * UPC-E: Short version of UPC symbol
    1069. 

  1069. 	 */
    1070. 

  1070. 	protected function barcode_eanupc($code, $len=13) {
    1071. 

  1071. 		$upce = false;
    1072. 

  1072. 		$checkdigit = false;
    1073. 

  1073. 		if ($len == 6) {
    1074. 

  1074. 			$len = 12; // UPC-A
    1075. 

  1075. 			$upce = true; // UPC-E mode
    1076. 

  1076. 		}
    1077. 

  1077. 		$data_len = $len - 1;
    1078. 

  1078. 		//Padding
    1079. 

  1079. 		$code = str_pad($code, $data_len, '0', STR_PAD_LEFT);
    1080. 

  1080. 		$code_len = strlen($code);
    1081. 

  1081. 		// calculate check digit
    1082. 

  1082. 		$sum_a = 0;
    1083. 

  1083. 		for ($i = 1; $i < $data_len; $i+=2) {
    1084. 

  1084. 			$sum_a += $code[$i];
    1085. 

  1085. 		}
    1086. 

  1086. 		if ($len > 12) {
    1087. 

  1087. 			$sum_a *= 3;
    1088. 

  1088. 		}
    1089. 

  1089. 		$sum_b = 0;
    1090. 

  1090. 		for ($i = 0; $i < $data_len; $i+=2) {
    1091. 

  1091. 			$sum_b += ($code[$i]);
    1092. 

  1092. 		}
    1093. 

  1093. 		if ($len < 13) {
    1094. 

  1094. 			$sum_b *= 3;
    1095. 

  1095. 		}
    1096. 

  1096. 		$r = ($sum_a + $sum_b) % 10;
    1097. 

  1097. 		if($r > 0) {
    1098. 

  1098. 			$r = (10 - $r);
    1099. 

  1099. 		}
    1100. 

  1100. 		if ($code_len == $data_len) {
    1101. 

  1101. 			// add check digit
    1102. 

  1102. 			$code .= $r;
    1103. 

  1103. 			$checkdigit = $r;
    1104. 

  1104. 		} elseif ($r !== intval($code[$data_len])) {
    1105. 

  1105. 			// wrong checkdigit
    1106. 

  1106. 			return false;
    1107. 

  1107. 		}
    1108. 

  1108. 		if ($len == 12) {
    1109. 

  1109. 			// UPC-A
    1110. 

  1110. 			$code = '0'.$code;
    1111. 

  1111. 			++$len;
    1112. 

  1112. 		}
    1113. 

  1113. 		if ($upce) {
    1114. 

  1114. 			// convert UPC-A to UPC-E
    1115. 

  1115. 			$tmp = substr($code, 4, 3);
    1116. 

  1116. 			$prod_code = intval(substr($code,7,5));	// product code
    1117. 

  1117. 			$invalid_upce = false;
    1118. 

  1118. 			if (($tmp == '000') OR ($tmp == '100') OR ($tmp == '200')) {
    1119. 

  1119. 				// manufacturer code ends in 000, 100, or 200
    1120. 

  1120. 				$upce_code = substr($code, 2, 2).substr($code, 9, 3).substr($code, 4, 1);
    1121. 

  1121. 				if ($prod_code > 999) { $invalid_upce = true; }
    1122. 

  1122. 			} else {
    1123. 

  1123. 				$tmp = substr($code, 5, 2);
    1124. 

  1124. 				if ($tmp == '00') {
    1125. 

  1125. 					// manufacturer code ends in 00
    1126. 

  1126. 					$upce_code = substr($code, 2, 3).substr($code, 10, 2).'3';
    1127. 

  1127. 					if ($prod_code > 99) { $invalid_upce = true; }
    1128. 

  1128. 				} else {
    1129. 

  1129. 					$tmp = substr($code, 6, 1);
    1130. 

  1130. 					if ($tmp == '0') {
    1131. 

  1131. 						// manufacturer code ends in 0
    1132. 

  1132. 						$upce_code = substr($code, 2, 4).substr($code, 11, 1).'4';
    1133. 

  1133. 						if ($prod_code > 9) { $invalid_upce = true; }
    1134. 

  1134. 					} else {
    1135. 

  1135. 						// manufacturer code does not end in zero
    1136. 

  1136. 						$upce_code = substr($code, 2, 5).substr($code, 11, 1);
    1137. 

  1137. 						if ($prod_code > 9) { $invalid_upce = true; }
    1138. 

  1138. 					}
    1139. 

  1139. 				}
    1140. 

  1140. 			}
    1141. 

  1141. 			if ($invalid_upce) { die("Error - UPC-A cannot produce a valid UPC-E barcode"); }	// Error generating a UPCE code
    1142. 

  1142. 		}
    1143. 

  1143. 		//Convert digits to bars
    1144. 

  1144. 		$codes = array(
    1145. 

  1145. 			'A'=>array( // left odd parity
    1146. 

  1146. 				'0'=>'0001101',
    1147. 

  1147. 				'1'=>'0011001',
    1148. 

  1148. 				'2'=>'0010011',
    1149. 

  1149. 				'3'=>'0111101',
    1150. 

  1150. 				'4'=>'0100011',
    1151. 

  1151. 				'5'=>'0110001',
    1152. 

  1152. 				'6'=>'0101111',
    1153. 

  1153. 				'7'=>'0111011',
    1154. 

  1154. 				'8'=>'0110111',
    1155. 

  1155. 				'9'=>'0001011'),
    1156. 

  1156. 			'B'=>array( // left even parity
    1157. 

  1157. 				'0'=>'0100111',
    1158. 

  1158. 				'1'=>'0110011',
    1159. 

  1159. 				'2'=>'0011011',
    1160. 

  1160. 				'3'=>'0100001',
    1161. 

  1161. 				'4'=>'0011101',
    1162. 

  1162. 				'5'=>'0111001',
    1163. 

  1163. 				'6'=>'0000101',
    1164. 

  1164. 				'7'=>'0010001',
    1165. 

  1165. 				'8'=>'0001001',
    1166. 

  1166. 				'9'=>'0010111'),
    1167. 

  1167. 			'C'=>array( // right
    1168. 

  1168. 				'0'=>'1110010',
    1169. 

  1169. 				'1'=>'1100110',
    1170. 

  1170. 				'2'=>'1101100',
    1171. 

  1171. 				'3'=>'1000010',
    1172. 

  1172. 				'4'=>'1011100',
    1173. 

  1173. 				'5'=>'1001110',
    1174. 

  1174. 				'6'=>'1010000',
    1175. 

  1175. 				'7'=>'1000100',
    1176. 

  1176. 				'8'=>'1001000',
    1177. 

  1177. 				'9'=>'1110100')
    1178. 

  1178. 		);
    1179. 

  1179. 		$parities = array(
    1180. 

  1180. 			'0'=>array('A','A','A','A','A','A'),
    1181. 

  1181. 			'1'=>array('A','A','B','A','B','B'),
    1182. 

  1182. 			'2'=>array('A','A','B','B','A','B'),
    1183. 

  1183. 			'3'=>array('A','A','B','B','B','A'),
    1184. 

  1184. 			'4'=>array('A','B','A','A','B','B'),
    1185. 

  1185. 			'5'=>array('A','B','B','A','A','B'),
    1186. 

  1186. 			'6'=>array('A','B','B','B','A','A'),
    1187. 

  1187. 			'7'=>array('A','B','A','B','A','B'),
    1188. 

  1188. 			'8'=>array('A','B','A','B','B','A'),
    1189. 

  1189. 			'9'=>array('A','B','B','A','B','A')
    1190. 

  1190. 		);
    1191. 

  1191. 		$upce_parities = array();
    1192. 

  1192. 		$upce_parities[0] = array(
    1193. 

  1193. 			'0'=>array('B','B','B','A','A','A'),
    1194. 

  1194. 			'1'=>array('B','B','A','B','A','A'),
    1195. 

  1195. 			'2'=>array('B','B','A','A','B','A'),
    1196. 

  1196. 			'3'=>array('B','B','A','A','A','B'),
    1197. 

  1197. 			'4'=>array('B','A','B','B','A','A'),
    1198. 

  1198. 			'5'=>array('B','A','A','B','B','A'),
    1199. 

  1199. 			'6'=>array('B','A','A','A','B','B'),
    1200. 

  1200. 			'7'=>array('B','A','B','A','B','A'),
    1201. 

  1201. 			'8'=>array('B','A','B','A','A','B'),
    1202. 

  1202. 			'9'=>array('B','A','A','B','A','B')
    1203. 

  1203. 		);
    1204. 

  1204. 		$upce_parities[1] = array(
    1205. 

  1205. 			'0'=>array('A','A','A','B','B','B'),
    1206. 

  1206. 			'1'=>array('A','A','B','A','B','B'),
    1207. 

  1207. 			'2'=>array('A','A','B','B','A','B'),
    1208. 

  1208. 			'3'=>array('A','A','B','B','B','A'),
    1209. 

  1209. 			'4'=>array('A','B','A','A','B','B'),
    1210. 

  1210. 			'5'=>array('A','B','B','A','A','B'),
    1211. 

  1211. 			'6'=>array('A','B','B','B','A','A'),
    1212. 

  1212. 			'7'=>array('A','B','A','B','A','B'),
    1213. 

  1213. 			'8'=>array('A','B','A','B','B','A'),
    1214. 

  1214. 			'9'=>array('A','B','B','A','B','A')
    1215. 

  1215. 		);
    1216. 

  1216. 		$k = 0;
    1217. 

  1217. 		$seq = '101'; // left guard bar
    1218. 

  1218. 		if ($upce) {
    1219. 

  1219. 			$bararray = array('code' => $upce_code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
    1220. 

  1220. 			$p = $upce_parities[$code{1}][$r];
    1221. 

  1221. 			for ($i = 0; $i < 6; ++$i) {
    1222. 

  1222. 				$seq .= $codes[$p[$i]][$upce_code[$i]];
    1223. 

  1223. 			}
    1224. 

  1224. 			$seq .= '010101'; // right guard bar
    1225. 

  1225. 		} else {
    1226. 

  1226. 			$bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
    1227. 

  1227. 			$half_len = ceil($len / 2);
    1228. 

  1228. 			if ($len == 8) {
    1229. 

  1229. 				for ($i = 0; $i < $half_len; ++$i) {
    1230. 

  1230. 					$seq .= $codes['A'][$code[$i]];
    1231. 

  1231. 				}
    1232. 

  1232. 			} else {
    1233. 

  1233. 				$p = $parities[$code{0}];
    1234. 

  1234. 				for ($i = 1; $i < $half_len; ++$i) {
    1235. 

  1235. 					$seq .= $codes[$p[$i-1]][$code[$i]];
    1236. 

  1236. 				}
    1237. 

  1237. 			}
    1238. 

  1238. 			$seq .= '01010'; // center guard bar
    1239. 

  1239. 			for ($i = $half_len; $i < $len; ++$i) {
    1240. 

  1240. 				$seq .= $codes['C'][$code[$i]];
    1241. 

  1241. 			}
    1242. 

  1242. 			$seq .= '101'; // right guard bar
    1243. 

  1243. 		}
    1244. 

  1244. 		$clen = strlen($seq);
    1245. 

  1245. 		$w = 0;
    1246. 

  1246. 		for ($i = 0; $i < $clen; ++$i) {
    1247. 

  1247. 			$w += 1;
    1248. 

  1248. 			if (($i == ($clen - 1)) OR (($i < ($clen - 1)) AND ($seq[$i] != $seq[($i+1)]))) {
    1249. 

  1249. 				if ($seq[$i] == '1') {
    1250. 

  1250. 					$t = true; // bar
    1251. 

  1251. 				} else {
    1252. 

  1252. 					$t = false; // space
    1253. 

  1253. 				}
    1254. 

  1254. 				$bararray['bcode'][$k] = array('t' => $t, 'w' => $w, 'h' => 1, 'p' => 0);
    1255. 

  1255. 				$bararray['maxw'] += $w;
    1256. 

  1256. 				++$k;
    1257. 

  1257. 				$w = 0;
    1258. 

  1258. 			}
    1259. 

  1259. 		}
    1260. 

  1260. 		$bararray['checkdigit'] = $checkdigit;
    1261. 

  1261. 		return $bararray;
    1262. 

  1262. 	}
    1263. 

  1263. 	
    1264. 

  1264. 	/**
    1265. 

  1265. 	 * UPC-Based Extentions
    1266. 

  1266. 	 * 2-Digit Ext.: Used to indicate magazines and newspaper issue numbers
    1267. 

  1267. 	 * 5-Digit Ext.: Used to mark suggested retail price of books
    1268. 

  1268. 	 */
    1269. 

  1269. 	protected function barcode_eanext($code, $len=5) {
    1270. 

  1270. 		//Padding
    1271. 

  1271. 		$code = str_pad($code, $len, '0', STR_PAD_LEFT);
    1272. 

  1272. 		// calculate check digit
    1273. 

  1273. 		if ($len == 2) {
    1274. 

  1274. 			$r = $code % 4;
    1275. 

  1275. 		} elseif ($len == 5) {
    1276. 

  1276. 			$r = (3 * ($code{0} + $code{2} + $code{4})) + (9 * ($code{1} + $code{3}));
    1277. 

  1277. 			$r %= 10;
    1278. 

  1278. 		} else {
    1279. 

  1279. 			return false;
    1280. 

  1280. 		}
    1281. 

  1281. 		//Convert digits to bars
    1282. 

  1282. 		$codes = array(
    1283. 

  1283. 			'A'=>array( // left odd parity
    1284. 

  1284. 				'0'=>'0001101',
    1285. 

  1285. 				'1'=>'0011001',
    1286. 

  1286. 				'2'=>'0010011',
    1287. 

  1287. 				'3'=>'0111101',
    1288. 

  1288. 				'4'=>'0100011',
    1289. 

  1289. 				'5'=>'0110001',
    1290. 

  1290. 				'6'=>'0101111',
    1291. 

  1291. 				'7'=>'0111011',
    1292. 

  1292. 				'8'=>'0110111',
    1293. 

  1293. 				'9'=>'0001011'),
    1294. 

  1294. 			'B'=>array( // left even parity
    1295. 

  1295. 				'0'=>'0100111',
    1296. 

  1296. 				'1'=>'0110011',
    1297. 

  1297. 				'2'=>'0011011',
    1298. 

  1298. 				'3'=>'0100001',
    1299. 

  1299. 				'4'=>'0011101',
    1300. 

  1300. 				'5'=>'0111001',
    1301. 

  1301. 				'6'=>'0000101',
    1302. 

  1302. 				'7'=>'0010001',
    1303. 

  1303. 				'8'=>'0001001',
    1304. 

  1304. 				'9'=>'0010111')
    1305. 

  1305. 		);
    1306. 

  1306. 		$parities = array();
    1307. 

  1307. 		$parities[2] = array(
    1308. 

  1308. 			'0'=>array('A','A'),
    1309. 

  1309. 			'1'=>array('A','B'),
    1310. 

  1310. 			'2'=>array('B','A'),
    1311. 

  1311. 			'3'=>array('B','B')
    1312. 

  1312. 		);
    1313. 

  1313. 		$parities[5] = array(
    1314. 

  1314. 			'0'=>array('B','B','A','A','A'),
    1315. 

  1315. 			'1'=>array('B','A','B','A','A'),
    1316. 

  1316. 			'2'=>array('B','A','A','B','A'),
    1317. 

  1317. 			'3'=>array('B','A','A','A','B'),
    1318. 

  1318. 			'4'=>array('A','B','B','A','A'),
    1319. 

  1319. 			'5'=>array('A','A','B','B','A'),
    1320. 

  1320. 			'6'=>array('A','A','A','B','B'),
    1321. 

  1321. 			'7'=>array('A','B','A','B','A'),
    1322. 

  1322. 			'8'=>array('A','B','A','A','B'),
    1323. 

  1323. 			'9'=>array('A','A','B','A','B')
    1324. 

  1324. 		);	
    1325. 

  1325. 		$p = $parities[$len][$r];
    1326. 

  1326. 		$seq = '1011'; // left guard bar
    1327. 

  1327. 		$seq .= $codes[$p[0]][$code{0}];
    1328. 

  1328. 		for ($i = 1; $i < $len; ++$i) {
    1329. 

  1329. 			$seq .= '01'; // separator
    1330. 

  1330. 			$seq .= $codes[$p[$i]][$code[$i]];
    1331. 

  1331. 		}
    1332. 

  1332. 		$bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
    1333. 

  1333. 		return $this->binseq_to_array($seq, $bararray);
    1334. 

  1334. 	}
    1335. 

  1335. 	
    1336. 

  1336. 	/**
    1337. 

  1337. 	 * POSTNET and PLANET barcodes.
    1338. 

  1338. 	 * Used by U.S. Postal Service for automated mail sorting
    1339. 

  1339. 	 */
    1340. 

  1340. 	protected function barcode_postnet($code, $planet=false) {
    1341. 

  1341. 		// bar lenght
    1342. 

  1342. 		if ($planet) {
    1343. 

  1343. 			$barlen = Array(
    1344. 

  1344. 				0 => Array(1,1,2,2,2),
    1345. 

  1345. 				1 => Array(2,2,2,1,1),
    1346. 

  1346. 				2 => Array(2,2,1,2,1),
    1347. 

  1347. 				3 => Array(2,2,1,1,2),
    1348. 

  1348. 				4 => Array(2,1,2,2,1),
    1349. 

  1349. 				5 => Array(2,1,2,1,2),
    1350. 

  1350. 				6 => Array(2,1,1,2,2),
    1351. 

  1351. 				7 => Array(1,2,2,2,1),
    1352. 

  1352. 				8 => Array(1,2,2,1,2),
    1353. 

  1353. 				9 => Array(1,2,1,2,2)
    1354. 

  1354. 			);
    1355. 

  1355. 		} else {
    1356. 

  1356. 			$barlen = Array(
    1357. 

  1357. 				0 => Array(2,2,1,1,1),
    1358. 

  1358. 				1 => Array(1,1,1,2,2),
    1359. 

  1359. 				2 => Array(1,1,2,1,2),
    1360. 

  1360. 				3 => Array(1,1,2,2,1),
    1361. 

  1361. 				4 => Array(1,2,1,1,2),
    1362. 

  1362. 				5 => Array(1,2,1,2,1),
    1363. 

  1363. 				6 => Array(1,2,2,1,1),
    1364. 

  1364. 				7 => Array(2,1,1,1,2),
    1365. 

  1365. 				8 => Array(2,1,1,2,1),
    1366. 

  1366. 				9 => Array(2,1,2,1,1)
    1367. 

  1367. 			);
    1368. 

  1368. 		}
    1369. 

  1369. 		$bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 5, 'bcode' => array());
    1370. 

  1370. 		$k = 0;
    1371. 

  1371. 		$code = str_replace('-', '', $code);
    1372. 

  1372. 		$code = str_replace(' ', '', $code);
    1373. 

  1373. 		$len = strlen($code);
    1374. 

  1374. 		// calculate checksum
    1375. 

  1375. 		$sum = 0;
    1376. 

  1376. 		for ($i = 0; $i < $len; ++$i) {
    1377. 

  1377. 			$sum += intval($code[$i]);
    1378. 

  1378. 		}
    1379. 

  1379. 		$chkd = ($sum % 10);
    1380. 

  1380. 		if($chkd > 0) {
    1381. 

  1381. 			$chkd = (10 - $chkd);
    1382. 

  1382. 		}
    1383. 

  1383. 		$code .= $chkd;
    1384. 

  1384. 		$checkdigit = $chkd;
    1385. 

  1385. 		$len = strlen($code);
    1386. 

  1386. 		// start bar
    1387. 

  1387. 		$bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => 5, 'p' => 0);
    1388. 

  1388. 		$bararray['bcode'][$k++] = array('t' => 0, 'w' => $this->gapwidth , 'h' => 5, 'p' => 0);
    1389. 

  1389. 		$bararray['maxw'] += (1 + $this->gapwidth );
    1390. 

  1390. 		for ($i = 0; $i < $len; ++$i) {
    1391. 

  1391. 			for ($j = 0; $j < 5; ++$j) {
    1392. 

  1392. 				$bh = $barlen[$code[$i]][$j];
    1393. 

  1393. 				if ($bh == 2) {
    1394. 

  1394. 					$h = 5; 
    1395. 

  1395. 					$p = 0;
    1396. 

  1396. 				}
    1397. 

  1397. 				else {
    1398. 

  1398. 					$h = 2; 
    1399. 

  1399. 					$p = 3;
    1400. 

  1400. 				}
    1401. 

  1401. 				$bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => $h, 'p' => $p);
    1402. 

  1402. 				$bararray['bcode'][$k++] = array('t' => 0, 'w' => $this->gapwidth , 'h' => 2, 'p' => 0);
    1403. 

  1403. 				$bararray['maxw'] += (1 + $this->gapwidth );
    1404. 

  1404. 			}
    1405. 

  1405. 		}
    1406. 

  1406. 		// end bar
    1407. 

  1407. 		$bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => 5, 'p' => 0);
    1408. 

  1408. 		$bararray['maxw'] += 1;
    1409. 

  1409. 		$bararray['checkdigit'] = $checkdigit;
    1410. 

  1410. 		return $bararray;
    1411. 

  1411. 	}
    1412. 

  1412. 	
    1413. 

  1413. 	/**
    1414. 

  1414. 	 * RM4SCC - CBC - KIX
    1415. 

  1415. 	 * RM4SCC (Royal Mail 4-state Customer Code) - CBC (Customer Bar Code) - KIX (Klant index - Customer index)
    1416. 

  1416. 	 * RM4SCC is the name of the barcode symbology used by the Royal Mail for its Cleanmail service.
    1417. 

  1417. 	 */
    1418. 

  1418. 	protected function barcode_rm4scc($code, $kix=false) {
    1419. 

  1419. 		$notkix = !$kix;
    1420. 

  1420. 		// bar mode
    1421. 

  1421. 		// 1 = pos 1, length 2
    1422. 

  1422. 		// 2 = pos 1, length 3
    1423. 

  1423. 		// 3 = pos 2, length 1
    1424. 

  1424. 		// 4 = pos 2, length 2
    1425. 

  1425. 		$barmode = array(
    1426. 

  1426. 			'0' => array(3,3,2,2),
    1427. 

  1427. 			'1' => array(3,4,1,2),
    1428. 

  1428. 			'2' => array(3,4,2,1),
    1429. 

  1429. 			'3' => array(4,3,1,2),
    1430. 

  1430. 			'4' => array(4,3,2,1),
    1431. 

  1431. 			'5' => array(4,4,1,1),
    1432. 

  1432. 			'6' => array(3,1,4,2),
    1433. 

  1433. 			'7' => array(3,2,3,2),
    1434. 

  1434. 			'8' => array(3,2,4,1),
    1435. 

  1435. 			'9' => array(4,1,3,2),
    1436. 

  1436. 			'A' => array(4,1,4,1),
    1437. 

  1437. 			'B' => array(4,2,3,1),
    1438. 

  1438. 			'C' => array(3,1,2,4),
    1439. 

  1439. 			'D' => array(3,2,1,4),
    1440. 

  1440. 			'E' => array(3,2,2,3),
    1441. 

  1441. 			'F' => array(4,1,1,4),
    1442. 

  1442. 			'G' => array(4,1,2,3),
    1443. 

  1443. 			'H' => array(4,2,1,3),
    1444. 

  1444. 			'I' => array(1,3,4,2),
    1445. 

  1445. 			'J' => array(1,4,3,2),
    1446. 

  1446. 			'K' => array(1,4,4,1),
    1447. 

  1447. 			'L' => array(2,3,3,2),
    1448. 

  1448. 			'M' => array(2,3,4,1),
    1449. 

  1449. 			'N' => array(2,4,3,1),
    1450. 

  1450. 			'O' => array(1,3,2,4),
    1451. 

  1451. 			'P' => array(1,4,1,4),
    1452. 

  1452. 			'Q' => array(1,4,2,3),
    1453. 

  1453. 			'R' => array(2,3,1,4),
    1454. 

  1454. 			'S' => array(2,3,2,3),
    1455. 

  1455. 			'T' => array(2,4,1,3),
    1456. 

  1456. 			'U' => array(1,1,4,4),
    1457. 

  1457. 			'V' => array(1,2,3,4),
    1458. 

  1458. 			'W' => array(1,2,4,3),
    1459. 

  1459. 			'X' => array(2,1,3,4),
    1460. 

  1460. 			'Y' =…
    1461.

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