PageRenderTime 57ms CodeModel.GetById 20ms RepoModel.GetById 1ms app.codeStats 0ms

/include/tcpdf/barcodes.php

https://github.com/vlad88sv/MupiAir
PHP | 1712 lines | 1395 code | 30 blank | 287 comment | 160 complexity | 206b913fa672ec9155ffc813601d3cfc MD5 | raw file

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

    

  1. <?php

    2. 

  2. //============================================================+

    3. 

  3. // File name   : barcodes.php

    4. 

  4. // Begin       : 2008-06-09

    5. 

  5. // Last Update : 2009-04-11

    6. 

  6. // Version     : 1.0.006

    7. 

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

    8. 

  8. // 	----------------------------------------------------------------------------

    9. 

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

    10. 

  10. // 	

    11. 

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

    12. 

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

    13. 

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

    14. 

  14. // 	(at your option) any later version.

    15. 

  15. // 	

    16. 

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

    17. 

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

    18. 

  18. // 	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

    19. 

  19. // 	GNU Lesser General Public License for more details.

    20. 

  20. // 	

    21. 

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

    22. 

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

    23. 

  23. // 	

    24. 

  24. // 	See LICENSE.TXT file for more information.

    25. 

  25. //  ----------------------------------------------------------------------------

    26. 

  26. //

    27. 

  27. // Description : PHP class to creates array representations for 

    28. 

  28. //               common 1D barcodes to be used with TCPDF.

    29. 

  29. //

    30. 

  30. // Author: Nicola Asuni

    31. 

  31. //

    32. 

  32. // (c) Copyright:

    33. 

  33. //               Nicola Asuni

    34. 

  34. //               Tecnick.com S.r.l.

    35. 

  35. //               Via della Pace, 11

    36. 

  36. //               09044 Quartucciu (CA)

    37. 

  37. //               ITALY

    38. 

  38. //               www.tecnick.com

    39. 

  39. //               info@tecnick.com

    40. 

  40. //============================================================+

    41. 

  41. 

    42. 

  42. /**

    43. 

  43.  * PHP class to creates array representations for common 1D barcodes to be used with TCPDF.

    44. 

  44.  * @package com.tecnick.tcpdf

    45. 

  45.  * @abstract Functions for generating string representation of common 1D barcodes.

    46. 

  46.  * @author Nicola Asuni

    47. 

  47.  * @copyright 2008-2009 Nicola Asuni - Tecnick.com S.r.l (www.tecnick.com) Via Della Pace, 11 - 09044 - Quartucciu (CA) - ITALY - www.tecnick.com - info@tecnick.com

    48. 

  48.  * @link http://www.tcpdf.org

    49. 

  49.  * @license http://www.gnu.org/copyleft/lesser.html LGPL

    50. 

  50.  * @version 1.0.006

    51. 

  51.  */

    52. 

  52. 

    53. 

  53. 	/**

    54. 

  54. 	* PHP class to creates array representations for common 1D barcodes to be used with TCPDF (http://www.tcpdf.org).<br>

    55. 

  55. 	* @name TCPDFBarcode

    56. 

  56. 	* @package com.tecnick.tcpdf

    57. 

  57. 	* @version 1.0.006

    58. 

  58. 	* @author Nicola Asuni

    59. 

  59. 	* @link http://www.tcpdf.org

    60. 

  60. 	* @license http://www.gnu.org/copyleft/lesser.html LGPL

    61. 

  61. 	*/

    62. 

  62. class TCPDFBarcode {

    63. 

  63. 	

    64. 

  64. 	/**

    65. 

  65. 	 * @var array representation of barcode.

    66. 

  66. 	 * @access protected

    67. 

  67. 	 */

    68. 

  68. 	protected $barcode_array;

    69. 

  69. 		

    70. 

  70. 	/**

    71. 

  71. 	 * This is the class constructor. 

    72. 

  72. 	 * Return an array representations for common 1D barcodes:<ul>

    73. 

  73. 	 * <li>$arrcode['code'] code to be printed on text label</li>

    74. 

  74. 	 * <li>$arrcode['maxh'] max bar height</li>

    75. 

  75. 	 * <li>$arrcode['maxw'] max bar width</li>

    76. 

  76. 	 * <li>$arrcode['bcode'][$k] single bar or space in $k position</li>

    77. 

  77. 	 * <li>$arrcode['bcode'][$k]['t'] bar type: true = bar, false = space.</li>

    78. 

  78. 	 * <li>$arrcode['bcode'][$k]['w'] bar width in units.</li>

    79. 

  79. 	 * <li>$arrcode['bcode'][$k]['h'] bar height in units.</li>

    80. 

  80. 	 * <li>$arrcode['bcode'][$k]['p'] bar top position (0 = top, 1 = middle)</li></ul>

    81. 

  81. 	 * @param string $code code to print

    82. 

  82.  	 * @param string $type type of barcode: <ul><li>C39 : CODE 39 - ANSI MH10.8M-1983 - USD-3 - 3 of 9.</li><li>C39+ : CODE 39 with checksum</li><li>C39E : CODE 39 EXTENDED</li><li>C39E+ : CODE 39 EXTENDED + CHECKSUM</li><li>C93 : CODE 93 - USS-93</li><li>S25 : Standard 2 of 5</li><li>S25+ : Standard 2 of 5 + CHECKSUM</li><li>I25 : Interleaved 2 of 5</li><li>I25+ : Interleaved 2 of 5 + CHECKSUM</li><li>C128A : CODE 128 A</li><li>C128B : CODE 128 B</li><li>C128C : CODE 128 C</li><li>EAN2 : 2-Digits UPC-Based Extention</li><li>EAN5 : 5-Digits UPC-Based Extention</li><li>EAN8 : EAN 8</li><li>EAN13 : EAN 13</li><li>UPCA : UPC-A</li><li>UPCE : UPC-E</li><li>MSI : MSI (Variation of Plessey code)</li><li>MSI+ : MSI + CHECKSUM (modulo 11)</li><li>POSTNET : POSTNET</li><li>PLANET : PLANET</li><li>RMS4CC : RMS4CC (Royal Mail 4-state Customer Code) - CBC (Customer Bar Code)</li><li>KIX : KIX (Klant index - Customer index)</li><li>CODABAR : CODABAR</li><li>CODE11 : CODE 11</li><li>PHARMA : PHARMACODE</li><li>PHARMA2T : PHARMACODE TWO-TRACKS</li></ul>

    83. 

  83. 	 */

    84. 

  84. 	public function __construct($code, $type) {

    85. 

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

    86. 

  86. 	}

    87. 

  87. 	

    88. 

  88. 	/** 

    89. 

  89. 	 * Return an array representations of barcode.

    90. 

  90.  	 * @return array

    91. 

  91. 	 */

    92. 

  92. 	public function getBarcodeArray() {

    93. 

  93. 		return $this->barcode_array;

    94. 

  94. 	}

    95. 

  95. 	

    96. 

  96. 	/** 

    97. 

  97. 	 * Set the barcode.

    98. 

  98. 	 * @param string $code code to print

    99. 

  99.  	 * @param string $type type of barcode: <ul><li>C39 : CODE 39 - ANSI MH10.8M-1983 - USD-3 - 3 of 9.</li><li>C39+ : CODE 39 with checksum</li><li>C39E : CODE 39 EXTENDED</li><li>C39E+ : CODE 39 EXTENDED + CHECKSUM</li><li>C93 : CODE 93 - USS-93</li><li>S25 : Standard 2 of 5</li><li>S25+ : Standard 2 of 5 + CHECKSUM</li><li>I25 : Interleaved 2 of 5</li><li>I25+ : Interleaved 2 of 5 + CHECKSUM</li><li>C128A : CODE 128 A</li><li>C128B : CODE 128 B</li><li>C128C : CODE 128 C</li><li>EAN2 : 2-Digits UPC-Based Extention</li><li>EAN5 : 5-Digits UPC-Based Extention</li><li>EAN8 : EAN 8</li><li>EAN13 : EAN 13</li><li>UPCA : UPC-A</li><li>UPCE : UPC-E</li><li>MSI : MSI (Variation of Plessey code)</li><li>MSI+ : MSI + CHECKSUM (modulo 11)</li><li>POSTNET : POSTNET</li><li>PLANET : PLANET</li><li>RMS4CC : RMS4CC (Royal Mail 4-state Customer Code) - CBC (Customer Bar Code)</li><li>KIX : KIX (Klant index - Customer index)</li><li>CODABAR : CODABAR</li><li>CODE11 : CODE 11</li><li>PHARMA : PHARMACODE</li><li>PHARMA2T : PHARMACODE TWO-TRACKS</li></ul>

    100. 

  100.  	 * @return array

    101. 

  101. 	 */

    102. 

  102. 	public function setBarcode($code, $type) {

    103. 

  103. 		switch (strtoupper($type)) {

    104. 

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

    105. 

  105. 				$arrcode = $this->barcode_code39($code, false, false);

    106. 

  106. 				break;

    107. 

  107. 			}

    108. 

  108. 			case 'C39+': { // CODE 39 with checksum

    109. 

  109. 				$arrcode = $this->barcode_code39($code, false, true);

    110. 

  110. 				break;

    111. 

  111. 			}

    112. 

  112. 			case 'C39E': { // CODE 39 EXTENDED

    113. 

  113. 				$arrcode = $this->barcode_code39($code, true, false);

    114. 

  114. 				break;

    115. 

  115. 			}

    116. 

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

    117. 

  117. 				$arrcode = $this->barcode_code39($code, true, true);

    118. 

  118. 				break;

    119. 

  119. 			}
    120. 

  120. 			case 'C93': { // CODE 93 - USS-93

    121. 

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

    122. 

  122. 				break;

    123. 

  123. 			}

    124. 

  124. 			case 'S25': { // Standard 2 of 5

    125. 

  125. 				$arrcode = $this->barcode_s25($code, false);

    126. 

  126. 				break;

    127. 

  127. 			}

    128. 

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

    129. 

  129. 				$arrcode = $this->barcode_s25($code, true);

    130. 

  130. 				break;

    131. 

  131. 			}

    132. 

  132. 			case 'I25': { // Interleaved 2 of 5

    133. 

  133. 				$arrcode = $this->barcode_i25($code, false);

    134. 

  134. 				break;

    135. 

  135. 			}

    136. 

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

    137. 

  137. 				$arrcode = $this->barcode_i25($code, true);

    138. 

  138. 				break;

    139. 

  139. 			}

    140. 

  140. 			case 'C128A': { // CODE 128 A

    141. 

  141. 				$arrcode = $this->barcode_c128($code, 'A');

    142. 

  142. 				break;

    143. 

  143. 			}

    144. 

  144. 			case 'C128B': { // CODE 128 B

    145. 

  145. 				$arrcode = $this->barcode_c128($code, 'B');

    146. 

  146. 				break;

    147. 

  147. 			}

    148. 

  148. 			case 'C128C': { // CODE 128 C

    149. 

  149. 				$arrcode = $this->barcode_c128($code, 'C');

    150. 

  150. 				break;

    151. 

  151. 			}
    152. 

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

    153. 

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

    154. 

  154. 				break;

    155. 

  155. 			}
    156. 

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

    157. 

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

    158. 

  158. 				break;

    159. 

  159. 			}
    160. 

  160. 			case 'EAN8': { // EAN 8

    161. 

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

    162. 

  162. 				break;

    163. 

  163. 			}

    164. 

  164. 			case 'EAN13': { // EAN 13

    165. 

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

    166. 

  166. 				break;

    167. 

  167. 			}

    168. 

  168. 			case 'UPCA': { // UPC-A

    169. 

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

    170. 

  170. 				break;

    171. 

  171. 			}

    172. 

  172. 			case 'UPCE': { // UPC-E

    173. 

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

    174. 

  174. 				break;

    175. 

  175. 			}
    176. 

  176. 			case 'MSI': { // MSI (Variation of Plessey code)

    177. 

  177. 				$arrcode = $this->barcode_msi($code, false);

    178. 

  178. 				break;

    179. 

  179. 			}
    180. 

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

    181. 

  181. 				$arrcode = $this->barcode_msi($code, true);

    182. 

  182. 				break;

    183. 

  183. 			}

    184. 

  184. 			case 'POSTNET': { // POSTNET

    185. 

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

    186. 

  186. 				break;

    187. 

  187. 			}
    188. 

  188. 			case 'PLANET': { // PLANET

    189. 

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

    190. 

  190. 				break;

    191. 

  191. 			}
    192. 

  192. 			case 'RMS4CC': { // RMS4CC (Royal Mail 4-state Customer Code) - CBC (Customer Bar Code)

    193. 

  193. 				$arrcode = $this->barcode_rms4cc($code, false);

    194. 

  194. 				break;

    195. 

  195. 			}
    196. 

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

    197. 

  197. 				$arrcode = $this->barcode_rms4cc($code, true);

    198. 

  198. 				break;

    199. 

  199. 			}			

    200. 

  200. 			case 'CODABAR': { // CODABAR

    201. 

  201. 				$arrcode = $this->barcode_codabar($code);

    202. 

  202. 				break;

    203. 

  203. 			}
    204. 

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

    205. 

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

    206. 

  206. 				break;

    207. 

  207. 			}
    208. 

  208. 			case 'PHARMA': { // PHARMACODE

    209. 

  209. 				$arrcode = $this->barcode_pharmacode($code);

    210. 

  210. 				break;

    211. 

  211. 			}
    212. 

  212. 			case 'PHARMA2T': { // PHARMACODE TWO-TRACKS

    213. 

  213. 				$arrcode = $this->barcode_pharmacode2t($code);

    214. 

  214. 				break;

    215. 

  215. 			}

    216. 

  216. 			default: {

    217. 

  217. 				$this->barcode_array = false;

    218. 

  218. 			}

    219. 

  219. 		}

    220. 

  220. 		$this->barcode_array = $arrcode;

    221. 

  221. 	}

    222. 

  222. 	

    223. 

  223. 	/**

    224. 

  224. 	 * CODE 39 - ANSI MH10.8M-1983 - USD-3 - 3 of 9.
    225. 

  225. 	 * General-purpose code in very wide use world-wide

    226. 

  226. 	 * @param string $code code to represent.

    227. 

  227. 	 * @param boolean $checksum if true add a checksum to the code

    228. 

  228. 	 * @return array barcode representation.

    229. 

  229. 	 * @access protected

    230. 

  230. 	 */

    231. 

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

    232. 

  232. 		$chr['0'] = '111221211';

    233. 

  233. 		$chr['1'] = '211211112';

    234. 

  234. 		$chr['2'] = '112211112';

    235. 

  235. 		$chr['3'] = '212211111';

    236. 

  236. 		$chr['4'] = '111221112';

    237. 

  237. 		$chr['5'] = '211221111';

    238. 

  238. 		$chr['6'] = '112221111';

    239. 

  239. 		$chr['7'] = '111211212';

    240. 

  240. 		$chr['8'] = '211211211';

    241. 

  241. 		$chr['9'] = '112211211';

    242. 

  242. 		$chr['A'] = '211112112';

    243. 

  243. 		$chr['B'] = '112112112';

    244. 

  244. 		$chr['C'] = '212112111';

    245. 

  245. 		$chr['D'] = '111122112';

    246. 

  246. 		$chr['E'] = '211122111';

    247. 

  247. 		$chr['F'] = '112122111';

    248. 

  248. 		$chr['G'] = '111112212';

    249. 

  249. 		$chr['H'] = '211112211';

    250. 

  250. 		$chr['I'] = '112112211';

    251. 

  251. 		$chr['J'] = '111122211';

    252. 

  252. 		$chr['K'] = '211111122';

    253. 

  253. 		$chr['L'] = '112111122';

    254. 

  254. 		$chr['M'] = '212111121';

    255. 

  255. 		$chr['N'] = '111121122';

    256. 

  256. 		$chr['O'] = '211121121';

    257. 

  257. 		$chr['P'] = '112121121';

    258. 

  258. 		$chr['Q'] = '111111222';

    259. 

  259. 		$chr['R'] = '211111221';

    260. 

  260. 		$chr['S'] = '112111221';

    261. 

  261. 		$chr['T'] = '111121221';

    262. 

  262. 		$chr['U'] = '221111112';

    263. 

  263. 		$chr['V'] = '122111112';

    264. 

  264. 		$chr['W'] = '222111111';

    265. 

  265. 		$chr['X'] = '121121112';

    266. 

  266. 		$chr['Y'] = '221121111';

    267. 

  267. 		$chr['Z'] = '122121111';

    268. 

  268. 		$chr['-'] = '121111212';

    269. 

  269. 		$chr['.'] = '221111211';

    270. 

  270. 		$chr[' '] = '122111211';

    271. 

  271. 		$chr['$'] = '121212111';

    272. 

  272. 		$chr['/'] = '121211121';

    273. 

  273. 		$chr['+'] = '121112121';

    274. 

  274. 		$chr['%'] = '111212121';
    275. 

  275. 		$chr['*'] = '121121211';

    276. 

  276. 		

    277. 

  277. 		$code = strtoupper($code);

    278. 

  278. 		if ($extended) {

    279. 

  279. 			// extended mode

    280. 

  280. 			$code = $this->encode_code39_ext($code);

    281. 

  281. 		}

    282. 

  282. 		if ($code === false) {

    283. 

  283. 			return false;

    284. 

  284. 		}

    285. 

  285. 		if ($checksum) {

    286. 

  286. 			// checksum

    287. 

  287. 			$code .= $this->checksum_code39($code);

    288. 

  288. 		}

    289. 

  289. 		// add start and stop codes

    290. 

  290. 		$code = '*'.$code.'*';

    291. 

  291. 		

    292. 

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

    293. 

  293. 		$k = 0;
    294. 

  294. 		$clen = strlen($code);

    295. 

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

    296. 

  296. 			$char = $code{$i};

    297. 

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

    298. 

  298. 				// invalid character

    299. 

  299. 				return false;

    300. 

  300. 			}

    301. 

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

    302. 

  302. 				if (($j % 2) == 0) {

    303. 

  303. 					$t = true; // bar

    304. 

  304. 				} else {

    305. 

  305. 					$t = false; // space

    306. 

  306. 				}

    307. 

  307. 				$w = $chr[$char]{$j};

    308. 

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

    309. 

  309. 				$bararray['maxw'] += $w;

    310. 

  310. 				++$k;

    311. 

  311. 			}

    312. 

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

    313. 

  313. 			$bararray['maxw'] += 1;

    314. 

  314. 			++$k;

    315. 

  315. 		}

    316. 

  316. 		return $bararray;

    317. 

  317. 	}

    318. 

  318. 	

    319. 

  319. 	/**

    320. 

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

    321. 

  321. 	 * @param string $code code to represent.

    322. 

  322. 	 * @return encoded string.

    323. 

  323. 	 * @access protected

    324. 

  324. 	 */

    325. 

  325. 	protected function encode_code39_ext($code) {

    326. 

  326. 		$encode = array(

    327. 

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

    328. 

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

    329. 

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

    330. 

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

    331. 

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

    332. 

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

    333. 

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

    334. 

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

    335. 

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

    336. 

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

    337. 

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

    338. 

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

    339. 

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

    340. 

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

    341. 

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

    342. 

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

    343. 

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

    344. 

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

    345. 

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

    346. 

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

    347. 

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

    348. 

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

    349. 

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

    350. 

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

    351. 

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

    352. 

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

    353. 

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

    354. 

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

    355. 

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

    356. 

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

    357. 

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

    358. 

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

    359. 

  359. 		$code_ext = '';
    360. 

  360. 		$clen = strlen($code);

    361. 

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

    362. 

  362. 			if (ord($code{$i}) > 127) {

    363. 

  363. 				return false;

    364. 

  364. 			}

    365. 

  365. 			$code_ext .= $encode[$code{$i}];

    366. 

  366. 		}

    367. 

  367. 		return $code_ext;

    368. 

  368. 	}

    369. 

  369. 	

    370. 

  370. 	/**

    371. 

  371. 	 * Calculate CODE 39 checksum (modulo 43).

    372. 

  372. 	 * @param string $code code to represent.

    373. 

  373. 	 * @return char checksum.

    374. 

  374. 	 * @access protected

    375. 

  375. 	 */

    376. 

  376. 	protected function checksum_code39($code) {

    377. 

  377. 		$chars = array(

    378. 

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

    379. 

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

    380. 

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

    381. 

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

    382. 

  382. 		$sum = 0;
    383. 

  383. 		$clen = strlen($code);

    384. 

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

    385. 

  385. 			$k = array_keys($chars, $code{$i});

    386. 

  386. 			$sum += $k[0];

    387. 

  387. 		}

    388. 

  388. 		$j = ($sum % 43);

    389. 

  389. 		return $chars[$j];

    390. 

  390. 	}

    391. 

  391. 	

    392. 

  392. 	/**

    393. 

  393. 	 * CODE 93 - USS-93
    394. 

  394. 	 * Compact code similar to Code 39

    395. 

  395. 	 * @param string $code code to represent.

    396. 

  396. 	 * @param boolean $checksum if true add a checksum to the code
    397. 

  397. 	 * @return array barcode representation.

    398. 

  398. 	 * @access protected

    399. 

  399. 	 */

    400. 

  400. 	protected function barcode_code93($code) {
    401. 

  401. 		$chr['0'] = '131112';
    402. 

  402. 		$chr['1'] = '111213';
    403. 

  403. 		$chr['2'] = '111312';
    404. 

  404. 		$chr['3'] = '111411';
    405. 

  405. 		$chr['4'] = '121113';
    406. 

  406. 		$chr['5'] = '121212';
    407. 

  407. 		$chr['6'] = '121311';
    408. 

  408. 		$chr['7'] = '111114';
    409. 

  409. 		$chr['8'] = '131211';
    410. 

  410. 		$chr['9'] = '141111';
    411. 

  411. 		$chr['A'] = '211113';
    412. 

  412. 		$chr['B'] = '211212';
    413. 

  413. 		$chr['C'] = '211311';
    414. 

  414. 		$chr['D'] = '221112';
    415. 

  415. 		$chr['E'] = '221211';
    416. 

  416. 		$chr['F'] = '231111';
    417. 

  417. 		$chr['G'] = '112113';
    418. 

  418. 		$chr['H'] = '112212';
    419. 

  419. 		$chr['I'] = '112311';
    420. 

  420. 		$chr['J'] = '122112';
    421. 

  421. 		$chr['K'] = '132111';
    422. 

  422. 		$chr['L'] = '111123';
    423. 

  423. 		$chr['M'] = '111222';
    424. 

  424. 		$chr['N'] = '111321';
    425. 

  425. 		$chr['O'] = '121122';
    426. 

  426. 		$chr['P'] = '131121';
    427. 

  427. 		$chr['Q'] = '212112';
    428. 

  428. 		$chr['R'] = '212211';
    429. 

  429. 		$chr['S'] = '211122';
    430. 

  430. 		$chr['T'] = '211221';
    431. 

  431. 		$chr['U'] = '221121';
    432. 

  432. 		$chr['V'] = '222111';
    433. 

  433. 		$chr['W'] = '112122';
    434. 

  434. 		$chr['X'] = '112221';
    435. 

  435. 		$chr['Y'] = '122121';
    436. 

  436. 		$chr['Z'] = '123111';
    437. 

  437. 		$chr['-'] = '121131';
    438. 

  438. 		$chr['.'] = '311112';
    439. 

  439. 		$chr[' '] = '311211';
    440. 

  440. 		$chr['$'] = '321111';
    441. 

  441. 		$chr['/'] = '112131';
    442. 

  442. 		$chr['+'] = '113121';
    443. 

  443. 		$chr['%'] = '211131';
    444. 

  444. 		$chr[128] = '121221'; // ($)
    445. 

  445. 		$chr[129] = '311121'; // (/)
    446. 

  446. 		$chr[130] = '122211'; // (+)
    447. 

  447. 		$chr[131] = '312111'; // (%)
    448. 

  448. 		$chr['*'] = '111141';

    449. 

  449. 		$code = strtoupper($code);
    450. 

  450. 		$encode = array(

    451. 

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

    452. 

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

    453. 

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

    454. 

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

    455. 

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

    456. 

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

    457. 

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

    458. 

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

    459. 

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

    460. 

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

    461. 

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

    462. 

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

    463. 

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

    464. 

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

    465. 

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

    466. 

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

    467. 

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

    468. 

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

    469. 

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

    470. 

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

    471. 

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

    472. 

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

    473. 

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

    474. 

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

    475. 

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

    476. 

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

    477. 

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

    478. 

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

    479. 

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

    480. 

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

    481. 

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

    482. 

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

  483. 		$code_ext = '';
    484. 

  484. 		$clen = strlen($code);
    485. 

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

    486. 

  486. 			if (ord($code{$i}) > 127) {

    487. 

  487. 				return false;

    488. 

  488. 			}

    489. 

  489. 			$code_ext .= $encode[$code{$i}];

    490. 

  490. 		}

    491. 

  491. 		// checksum

    492. 

  492. 		$code .= $this->checksum_code93($code);

    493. 

  493. 		// add start and stop codes

    494. 

  494. 		$code = '*'.$code.'*';

    495. 

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

    496. 

  496. 		$k = 0;
    497. 

  497. 		$clen = strlen($code);

    498. 

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

    499. 

  499. 			$char = $code{$i};

    500. 

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

    501. 

  501. 				// invalid character

    502. 

  502. 				return false;

    503. 

  503. 			}

    504. 

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

    505. 

  505. 				if (($j % 2) == 0) {

    506. 

  506. 					$t = true; // bar

    507. 

  507. 				} else {

    508. 

  508. 					$t = false; // space

    509. 

  509. 				}

    510. 

  510. 				$w = $chr[$char]{$j};

    511. 

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

    512. 

  512. 				$bararray['maxw'] += $w;

    513. 

  513. 				++$k;

    514. 

  514. 			}

    515. 

  515. 		}
    516. 

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

    517. 

  517. 		$bararray['maxw'] += 1;

    518. 

  518. 		++$k;		

    519. 

  519. 		return $bararray;

    520. 

  520. 	}
    521. 

  521. 	

    522. 

  522. 	/**

    523. 

  523. 	 * Calculate CODE 93 checksum (modulo 47).

    524. 

  524. 	 * @param string $code code to represent.

    525. 

  525. 	 * @return string checksum code.

    526. 

  526. 	 * @access protected

    527. 

  527. 	 */

    528. 

  528. 	protected function checksum_code93($code) {

    529. 

  529. 		$chars = array(

    530. 

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

    531. 

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

    532. 

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

    533. 

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

    534. 

  534. 		// translate special characters
    535. 

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

  536. 		$len = strlen($code);
    537. 

  537. 		// calculate check digit C
    538. 

  538. 		$p = 1;
    539. 

  539. 		$check = 0;
    540. 

  540. 		for ($i = ($len - 1); $i >= 0; --$i) {
    541. 

  541. 			$k = array_keys($chars, $code{$i});
    542. 

  542. 			$check += ($k[0] * $p);
    543. 

  543. 			++$p;
    544. 

  544. 			if ($p > 20) {
    545. 

  545. 				$p = 1;
    546. 

  546. 			}
    547. 

  547. 		}
    548. 

  548. 		$check %= 47;
    549. 

  549. 		$c = $chars[$check];
    550. 

  550. 		$code .= $c;
    551. 

  551. 		// calculate check digit K
    552. 

  552. 		$p = 1;
    553. 

  553. 		$check = 0;
    554. 

  554. 		for ($i = $len; $i >= 0; --$i) {
    555. 

  555. 			$k = array_keys($chars, $code{$i});
    556. 

  556. 			$check += ($k[0] * $p);
    557. 

  557. 			++$p;
    558. 

  558. 			if ($p > 15) {
    559. 

  559. 				$p = 1;
    560. 

  560. 			}
    561. 

  561. 		}
    562. 

  562. 		$check %= 47;
    563. 

  563. 		$k = $chars[$check];

    564. 

  564. 		return $c.$k;

    565. 

  565. 	}

    566. 

  566. 	

    567. 

  567. 	/**

    568. 

  568. 	 * Checksum for standard 2 of 5 barcodes.

    569. 

  569. 	 * @param string $code code to process.

    570. 

  570. 	 * @return int checksum.

    571. 

  571. 	 * @access protected

    572. 

  572. 	 */

    573. 

  573. 	protected function checksum_s25($code) {
    574. 

  574. 		$len = strlen($code);
    575. 

  575. 		$sum = 0;

    576. 

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

    577. 

  577. 			$sum += $code{$i};

    578. 

  578. 		}
    579. 

  579. 		$sum *= 3;

    580. 

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

    581. 

  581. 			$sum += ($code{$i});

    582. 

  582. 		}

    583. 

  583. 		$r = $sum % 10;

    584. 

  584. 		if($r > 0) {

    585. 

  585. 			$r = (10 - $r);

    586. 

  586. 		}
    587. 

  587. 		return $r;
    588. 

  588. 	}
    589. 

  589. 	
    590. 

  590. 	/**

    591. 

  591. 	 * MSI.
    592. 

  592. 	 * Variation of Plessey code, with similar applications 

    593. 

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

    594. 

  594. 	 * @param string $code code to represent.
    595. 

  595. 	 * @param boolean $checksum if true add a checksum to the code (modulo 11)

    596. 

  596. 	 * @return array barcode representation.

    597. 

  597. 	 * @access protected

    598. 

  598. 	 */

    599. 

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

    600. 

  600. 		$chr['0'] = '100100100100';

    601. 

  601. 		$chr['1'] = '100100100110';

    602. 

  602. 		$chr['2'] = '100100110100';

    603. 

  603. 		$chr['3'] = '100100110110';

    604. 

  604. 		$chr['4'] = '100110100100';

    605. 

  605. 		$chr['5'] = '100110100110';

    606. 

  606. 		$chr['6'] = '100110110100';

    607. 

  607. 		$chr['7'] = '100110110110';

    608. 

  608. 		$chr['8'] = '110100100100';
    609. 

  609. 		$chr['9'] = '110100100110';
    610. 

  610. 		$chr['A'] = '110100110100';
    611. 

  611. 		$chr['B'] = '110100110110';
    612. 

  612. 		$chr['C'] = '110110100100';
    613. 

  613. 		$chr['D'] = '110110100110';
    614. 

  614. 		$chr['E'] = '110110110100';
    615. 

  615. 		$chr['F'] = '110110110110';
    616. 

  616. 		if ($checksum) {
    617. 

  617. 			// add checksum
    618. 

  618. 			$clen = strlen($code);
    619. 

  619. 			$p = 2;
    620. 

  620. 			$check = 0;
    621. 

  621. 			for ($i = ($clen - 1); $i >= 0; --$i) {
    622. 

  622. 				$check += (hexdec($code{$i}) * $p);
    623. 

  623. 				++$p;
    624. 

  624. 				if ($p > 7) {
    625. 

  625. 					$p = 2;
    626. 

  626. 				}
    627. 

  627. 			}
    628. 

  628. 			$check %= 11;
    629. 

  629. 			if ($check > 0) {
    630. 

  630. 				$check = 11 - $check;
    631. 

  631. 			}
    632. 

  632. 			$code .= $check;
    633. 

  633. 		}
    634. 

  634. 		$seq = '110'; // left guard
    635. 

  635. 		$clen = strlen($code);

    636. 

  636. 		for ($i = 0; $i < $clen; ++$i) {
    637. 

  637. 			$digit = $code{$i};

    638. 

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

    639. 

  639. 				// invalid character

    640. 

  640. 				return false;

    641. 

  641. 			}
    642. 

  642. 			$seq .= $chr[$digit];
    643. 

  643. 		}		
    644. 

  644. 		$seq .= '1001'; // right guard
    645. 

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

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

    647. 

  647. 	}
    648. 

  648. 	

    649. 

  649. 	/**

    650. 

  650. 	 * Standard 2 of 5 barcodes.
    651. 

  651. 	 * Used in airline ticket marking, photofinishing

    652. 

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

    653. 

  653. 	 * @param string $code code to represent.
    654. 

  654. 	 * @param boolean $checksum if true add a checksum to the code

    655. 

  655. 	 * @return array barcode representation.

    656. 

  656. 	 * @access protected

    657. 

  657. 	 */

    658. 

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

    659. 

  659. 		$chr['0'] = '10101110111010';

    660. 

  660. 		$chr['1'] = '11101010101110';

    661. 

  661. 		$chr['2'] = '10111010101110';

    662. 

  662. 		$chr['3'] = '11101110101010';

    663. 

  663. 		$chr['4'] = '10101110101110';

    664. 

  664. 		$chr['5'] = '11101011101010';

    665. 

  665. 		$chr['6'] = '10111011101010';

    666. 

  666. 		$chr['7'] = '10101011101110';

    667. 

  667. 		$chr['8'] = '10101110111010';
    668. 

  668. 		$chr['9'] = '10111010111010';

    669. 

  669. 		if ($checksum) {
    670. 

  670. 			// add checksum
    671. 

  671. 			$code .= $this->checksum_s25($code);
    672. 

  672. 		}
    673. 

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

    674. 

  674. 			// add leading zero if code-length is odd

    675. 

  675. 			$code = '0'.$code;

    676. 

  676. 		}
    677. 

  677. 		$seq = '11011010';
    678. 

  678. 		$clen = strlen($code);

    679. 

  679. 		for ($i = 0; $i < $clen; ++$i) {
    680. 

  680. 			$digit = $code{$i};

    681. 

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

    682. 

  682. 				// invalid character

    683. 

  683. 				return false;

    684. 

  684. 			}
    685. 

  685. 			$seq .= $chr[$digit];
    686. 

  686. 		}		
    687. 

  687. 		$seq .= '1101011';
    688. 

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

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

    690. 

  690. 	}
    691. 

  691. 	

    692. 

  692. 	/**

    693. 

  693. 	 * Convert binary barcode sequence to TCPDF barcode array

    694. 

  694. 	 * @param string $seq barcode as binary sequence
    695. 

  695. 	 * òparam array $bararray TCPDF barcode array to fill up

    696. 

  696. 	 * @return array barcode representation.

    697. 

  697. 	 * @access protected

    698. 

  698. 	 */

    699. 

  699. 	protected function binseq_to_array($seq, $bararray) {
    700. 

  700. 		$len = strlen($seq);

    701. 

  701. 		$w = 0;
    702. 

  702. 		$k = 0;

    703. 

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

    704. 

  704. 			$w += 1;

    705. 

  705. 			if (($i == ($len - 1)) OR (($i < ($len - 1)) AND ($seq{$i} != $seq{($i+1)}))) {

    706. 

  706. 				if ($seq{$i} == '1') {

    707. 

  707. 					$t = true; // bar

    708. 

  708. 				} else {

    709. 

  709. 					$t = false; // space

    710. 

  710. 				}

    711. 

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

    712. 

  712. 				$bararray['maxw'] += $w;

    713. 

  713. 				++$k;

    714. 

  714. 				$w = 0;

    715. 

  715. 			}

    716. 

  716. 		}
    717. 

  717. 		return $bararray;
    718. 

  718. 	}
    719. 

  719. 	

    720. 

  720. 	/**

    721. 

  721. 	 * Interleaved 2 of 5 barcodes.
    722. 

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

    723. 

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

    724. 

  724. 	 * @param string $code code to represent.

    725. 

  725. 	 * @param boolean $checksum if true add a checksum to the code

    726. 

  726. 	 * @return array barcode representation.

    727. 

  727. 	 * @access protected

    728. 

  728. 	 */

    729. 

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

    730. 

  730. 		$chr['0'] = '11221';

    731. 

  731. 		$chr['1'] = '21112';

    732. 

  732. 		$chr['2'] = '12112';

    733. 

  733. 		$chr['3'] = '22111';

    734. 

  734. 		$chr['4'] = '11212';

    735. 

  735. 		$chr['5'] = '21211';

    736. 

  736. 		$chr['6'] = '12211';

    737. 

  737. 		$chr['7'] = '11122';

    738. 

  738. 		$chr['8'] = '21121';

    739. 

  739. 		$chr['9'] = '12121';

    740. 

  740. 		$chr['A'] = '11';

    741. 

  741. 		$chr['Z'] = '21';
    742. 

  742. 		if ($checksum) {
    743. 

  743. 			// add checksum
    744. 

  744. 			$code .= $this->checksum_s25($code);
    745. 

  745. 		}
    746. 

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

    747. 

  747. 			// add leading zero if code-length is odd

    748. 

  748. 			$code = '0'.$code;

    749. 

  749. 		}

    750. 

  750. 		// add start and stop codes

    751. 

  751. 		$code = 'AA'.strtolower($code).'ZA';

    752. 

  752. 			

    753. 

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

    754. 

  754. 		$k = 0;
    755. 

  755. 		$clen = strlen($code);

    756. 

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

    757. 

  757. 			$char_bar = $code{$i};

    758. 

  758. 			$char_space = $code{$i+1};

    759. 

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

    760. 

  760. 				// invalid character

    761. 

  761. 				return false;

    762. 

  762. 			}

    763. 

  763. 			// create a bar-space sequence

    764. 

  764. 			$seq = '';
    765. 

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

    766. 

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

    767. 

  767. 				$seq .= $chr[$char_bar]{$s} . $chr[$char_space]{$s};

    768. 

  768. 			}
    769. 

  769. 			$seqlen = strlen($seq);

    770. 

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

    771. 

  771. 				if (($j % 2) == 0) {

    772. 

  772. 					$t = true; // bar

    773. 

  773. 				} else {

    774. 

  774. 					$t = false; // space

    775. 

  775. 				}

    776. 

  776. 				$w = $seq{$j};

    777. 

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

    778. 

  778. 				$bararray['maxw'] += $w;

    779. 

  779. 				++$k;

    780. 

  780. 			}

    781. 

  781. 		}

    782. 

  782. 		return $bararray;

    783. 

  783. 	}

    784. 

  784. 	

    785. 

  785. 	/**

    786. 

  786. 	 * C128 barcodes. 

    787. 

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

    788. 

  788. 	 * @param string $code code to represent.

    789. 

  789. 	 * @param string $type barcode type: A, B or C

    790. 

  790. 	 * @return array barcode representation.

    791. 

  791. 	 * @access protected

    792. 

  792. 	 */

    793. 

  793. 	protected function barcode_c128($code, $type='B') {

    794. 

  794. 		$chr = array(

    795. 

  795. 			'212222', /* 00 */

    796. 

  796. 			'222122', /* 01 */

    797. 

  797. 			'222221', /* 02 */

    798. 

  798. 			'121223', /* 03 */

    799. 

  799. 			'121322', /* 04 */

    800. 

  800. 			'131222', /* 05 */

    801. 

  801. 			'122213', /* 06 */

    802. 

  802. 			'122312', /* 07 */

    803. 

  803. 			'132212', /* 08 */

    804. 

  804. 			'221213', /* 09 */

    805. 

  805. 			'221312', /* 10 */

    806. 

  806. 			'231212', /* 11 */

    807. 

  807. 			'112232', /* 12 */

    808. 

  808. 			'122132', /* 13 */

    809. 

  809. 			'122231', /* 14 */

    810. 

  810. 			'113222', /* 15 */

    811. 

  811. 			'123122', /* 16 */

    812. 

  812. 			'123221', /* 17 */

    813. 

  813. 			'223211', /* 18 */

    814. 

  814. 			'221132', /* 19 */

    815. 

  815. 			'221231', /* 20 */

    816. 

  816. 			'213212', /* 21 */

    817. 

  817. 			'223112', /* 22 */

    818. 

  818. 			'312131', /* 23 */

    819. 

  819. 			'311222', /* 24 */

    820. 

  820. 			'321122', /* 25 */

    821. 

  821. 			'321221', /* 26 */

    822. 

  822. 			'312212', /* 27 */

    823. 

  823. 			'322112', /* 28 */

    824. 

  824. 			'322211', /* 29 */

    825. 

  825. 			'212123', /* 30 */

    826. 

  826. 			'212321', /* 31 */

    827. 

  827. 			'232121', /* 32 */

    828. 

  828. 			'111323', /* 33 */

    829. 

  829. 			'131123', /* 34 */

    830. 

  830. 			'131321', /* 35 */

    831. 

  831. 			'112313', /* 36 */

    832. 

  832. 			'132113', /* 37 */

    833. 

  833. 			'132311', /* 38 */

    834. 

  834. 			'211313', /* 39 */

    835. 

  835. 			'231113', /* 40 */

    836. 

  836. 			'231311', /* 41 */

    837. 

  837. 			'112133', /* 42 */

    838. 

  838. 			'112331', /* 43 */

    839. 

  839. 			'132131', /* 44 */

    840. 

  840. 			'113123', /* 45 */

    841. 

  841. 			'113321', /* 46 */

    842. 

  842. 			'133121', /* 47 */

    843. 

  843. 			'313121', /* 48 */

    844. 

  844. 			'211331', /* 49 */

    845. 

  845. 			'231131', /* 50 */

    846. 

  846. 			'213113', /* 51 */

    847. 

  847. 			'213311', /* 52 */

    848. 

  848. 			'213131', /* 53 */

    849. 

  849. 			'311123', /* 54 */

    850. 

  850. 			'311321', /* 55 */

    851. 

  851. 			'331121', /* 56 */

    852. 

  852. 			'312113', /* 57 */

    853. 

  853. 			'312311', /* 58 */

    854. 

  854. 			'332111', /* 59 */

    855. 

  855. 			'314111', /* 60 */

    856. 

  856. 			'221411', /* 61 */

    857. 

  857. 			'431111', /* 62 */

    858. 

  858. 			'111224', /* 63 */

    859. 

  859. 			'111422', /* 64 */

    860. 

  860. 			'121124', /* 65 */

    861. 

  861. 			'121421', /* 66 */

    862. 

  862. 			'141122', /* 67 */

    863. 

  863. 			'141221', /* 68 */

    864. 

  864. 			'112214', /* 69 */

    865. 

  865. 			'112412', /* 70 */

    866. 

  866. 			'122114', /* 71 */

    867. 

  867. 			'122411', /* 72 */

    868. 

  868. 			'142112', /* 73 */

    869. 

  869. 			'142211', /* 74 */

    870. 

  870. 			'241211', /* 75 */

    871. 

  871. 			'221114', /* 76 */

    872. 

  872. 			'413111', /* 77 */

    873. 

  873. 			'241112', /* 78 */

    874. 

  874. 			'134111', /* 79 */

    875. 

  875. 			'111242', /* 80 */

    876. 

  876. 			'121142', /* 81 */

    877. 

  877. 			'121241', /* 82 */

    878. 

  878. 			'114212', /* 83 */

    879. 

  879. 			'124112', /* 84 */

    880. 

  880. 			'124211', /* 85 */

    881. 

  881. 			'411212', /* 86 */

    882. 

  882. 			'421112', /* 87 */

    883. 

  883. 			'421211', /* 88 */

    884. 

  884. 			'212141', /* 89 */

    885. 

  885. 			'214121', /* 90 */

    886. 

  886. 			'412121', /* 91 */

    887. 

  887. 			'111143', /* 92 */

    888. 

  888. 			'111341', /* 93 */

    889. 

  889. 			'131141', /* 94 */

    890. 

  890. 			'114113', /* 95 */

    891. 

  891. 			'114311', /* 96 */

    892. 

  892. 			'411113', /* 97 */

    893. 

  893. 			'411311', /* 98 */

    894. 

  894. 			'113141', /* 99 */

    895. 

  895. 			'114131', /* 100 */

    896. 

  896. 			'311141', /* 101 */

    897. 

  897. 			'411131', /* 102 */

    898. 

  898. 			'211412', /* 103 START A */

    899. 

  899. 			'211214', /* 104 START B  */

    900. 

  900. 			'211232', /* 105 START C  */

    901. 

  901. 			'233111', /* STOP */

    902. 

  902. 			'200000'  /* END */

    903. 

  903. 		);

    904. 

  904. 		$keys = '';

    905. 

  905. 		switch(strtoupper($type)) {

    906. 

  906. 			case 'A': {

    907. 

  907. 				$startid = 103;

    908. 

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

    909. 

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

    910. 

  910. 					$keys .= chr($i);

    911. 

  911. 				}

    912. 

  912. 				break;

    913. 

  913. 			}

    914. 

  914. 			case 'B': {

    915. 

  915. 				$startid = 104;

    916. 

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

    917. 

  917. 				break;

    918. 

  918. 			}

    919. 

  919. 			case 'C': {

    920. 

  920. 				$startid = 105;

    921. 

  921. 				$keys = '';

    922. 

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

    923. 

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

    924. 

  924. 					return false;

    925. 

  925. 				}

    926. 

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

    927. 

  927. 					$keys .= chr($i);

    928. 

  928. 				}

    929. 

  929. 				$new_code = '';
    930. 

  930. 				$hclen = (strlen($code) / 2);

    931. 

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

    932. 

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

    933. 

  933. 				}

    934. 

  934. 				$code = $new_code;

    935. 

  935. 				break;

    936. 

  936. 			}

    937. 

  937. 			default: {

    938. 

  938. 				return false;

    939. 

  939. 			}

    940. 

  940. 		}

    941. 

  941. 		// calculate check character

    942. 

  942. 		$sum = $startid;
    943. 

  943. 		$clen = strlen($code);

    944. 

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

    945. 

  945. 			$sum +=  (strpos($keys, $code{$i}) * ($i+1));

    946. 

  946. 		}

    947. 

  947. 		$check = ($sum % 103);

    948. 

  948. 		// add start, check and stop codes

    949. 

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

    950. 

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

    951. 

  951. 		$k = 0;

    952. 

  952. 		$len = strlen($code);

    953. 

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

    954. 

  954. 			$ck = strpos($keys, $code{$i});

    955. 

  955. 			if (($i == 0) OR ($i > ($len-4))) {

    956. 

  956. 				$char_num = ord($code{$i});
    957. 

  957. 				$seq = $chr[$char_num];

    958. 

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

    959. 

  959. 					$seq = $chr[$ck];

    960. 

  960. 			} else {

    961. 

  961. 				// invalid character

    962. 

  962. 				return false;

    963. 

  963. 			}

    964. 

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

    965. 

  965. 				if (($j % 2) == 0) {

    966. 

  966. 					$t = true; // bar

    967. 

  967. 				} else {

    968. 

  968. 					$t = false; // space

    969. 

  969. 				}

    970. 

  970. 				$w = $seq{$j};

    971. 

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

    972. 

  972. 				$bararray['maxw'] += $w;

    973. 

  973. 				++$k;

    974. 

  974. 			}

    975. 

  975. 		}

    976. 

  976. 		return $bararray;		

    977. 

  977. 	}

    978. 

  978. 	

    979. 

  979. 	/**

    980. 

  980. 	 * EAN13 and UPC-A barcodes.
    981. 

  981. 	 * EAN13: European Article Numbering international retail product code
    982. 

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

  983. 	 * UPC-E: Short version of UPC symbol

    984. 

  984. 	 * @param string $code code to represent.

    985. 

  985. 	 * @param string $len barcode type: 6 = UPC-E, 8 = EAN8, 13 = EAN13, 12 = UPC-A

    986. 

  986. 	 * @return array barcode representation.

    987. 

  987. 	 * @access protected

    988. 

  988. 	 */

    989. 

  989. 	protected function barcode_eanupc($code, $len=13) {
    990. 

  990. 		$upce = false;
    991. 

  991. 		if ($len == 6) {
    992. 

  992. 			$len = 12; // UPC-A
    993. 

  993. 			$upce = true; // UPC-E mode
    994. 

  994. 		}
    995. 

  995. 		$data_len = $len - 1;
    996. 

  996. 		//Padding

    997. 

  997. 		$code = str_pad($code, $data_len, '0', STR_PAD_LEFT);
    998. 

  998. 		$code_len = strlen($code);
    999. 

  999. 		// calculate check digit
    1000. 

  1000. 		$sum_a = 0;

    1001. 

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

    1002. 

  1002. 			$sum_a += $code{$i};

    1003. 

  1003. 		}
    1004. 

  1004. 		if ($len > 12) {
    1005. 

  1005. 			$sum_a *= 3;
    1006. 

  1006. 		}
    1007. 

  1007. 		$sum_b = 0;

    1008. 

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

    1009. 

  1009. 			$sum_b += ($code{$i});

    1010. 

  1010. 		}
    1011. 

  1011. 		if ($len < 13) {
    1012. 

  1012. 			$sum_b *= 3;
    1013. 

  1013. 		}

    1014. 

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

    1015. 

  1015. 		if($r > 0) {

    1016. 

  1016. 			$r = (10 - $r);

    1017. 

  1017. 		}

    1018. 

  1018. 		if ($code_len == $data_len) {
    1019. 

  1019. 			// add check digit

    1020. 

  1020. 			$code .= $r;

    1021. 

  1021. 		} elseif ($r !== intval($code{$data_len})) {
    1022. 

  1022. 			// wrong checkdigit

    1023. 

  1023. 			return false;

    1024. 

  1024. 		}
    1025. 

  1025. 		if ($len == 12) {
    1026. 

  1026. 			// UPC-A
    1027. 

  1027. 			$code = '0'.$code;
    1028. 

  1028. 			++$len;
    1029. 

  1029. 		}
    1030. 

  1030. 		if ($upce) {
    1031. 

  1031. 			// convert UPC-A to UPC-E
    1032. 

  1032. 			$tmp = substr($code, 4, 3);
    1033. 

  1033. 			if (($tmp == '000') OR ($tmp == '100') OR ($tmp == '200')) {
    1034. 

  1034. 				// manufacturer code ends in 000, 100, or 200
    1035. 

  1035. 				$upce_code = substr($code, 2, 2).substr($code, 9, 3).substr($code, 4, 1);
    1036. 

  1036. 			} else {
    1037. 

  1037. 				$tmp = substr($code, 5, 2);
    1038. 

  1038. 				if ($tmp == '00') {
    1039. 

  1039. 					// manufacturer code ends in 00
    1040. 

  1040. 					$upce_code = substr($code, 2, 3).substr($code, 10, 2).'3';
    1041. 

  1041. 				} else {
    1042. 

  1042. 					$tmp = substr($code, 6, 1);
    1043. 

  1043. 					if ($tmp == '0') {
    1044. 

  1044. 						// manufacturer code ends in 0
    1045. 

  1045. 						$upce_code = substr($code, 2, 4).substr($code, 11, 1).'4';
    1046. 

  1046. 					} else {
    1047. 

  1047. 						// manufacturer code does not end in zero
    1048. 

  1048. 						$upce_code = substr($code, 2, 5).substr($code, 11, 1);
    1049. 

  1049. 					}
    1050. 

  1050. 				}
    1051. 

  1051. 			}
    1052. 

  1052. 		}

    1053. 

  1053. 		//Convert digits to bars

    1054. 

  1054. 		$codes = array(

    1055. 

  1055. 			'A'=>array( // left odd parity

    1056. 

  1056. 				'0'=>'0001101',

    1057. 

  1057. 				'1'=>'0011001',

    1058. 

  1058. 				'2'=>'0010011',

    1059. 

  1059. 				'3'=>'0111101',

    1060. 

  1060. 				'4'=>'0100011',

    1061. 

  1061. 				'5'=>'0110001',

    1062. 

  1062. 				'6'=>'0101111',

    1063. 

  1063. 				'7'=>'0111011',

    1064. 

  1064. 				'8'=>'0110111',

    1065. 

  1065. 				'9'=>'0001011'),

    1066. 

  1066. 			'B'=>array( // left even parity

    1067. 

  1067. 				'0'=>'0100111',

    1068. 

  1068. 				'1'=>'0110011',

    1069. 

  1069. 				'2'=>'0011011',

    1070. 

  1070. 				'3'=>'0100001',

    1071. 

  1071. 				'4'=>'0011101',

    1072. 

  1072. 				'5'=>'0111001',

    1073. 

  1073. 				'6'=>'0000101',

    1074. 

  1074. 				'7'=>'0010001',

    1075. 

  1075. 				'8'=>'0001001',

    1076. 

  1076. 				'9'=>'0010111'),

    1077. 

  1077. 			'C'=>array( // right

    1078. 

  1078. 				'0'=>'1110010',

    1079. 

  1079. 				'1'=>'1100110',

    1080. 

  1080. 				'2'=>'1101100',

    1081. 

  1081. 				'3'=>'1000010',

    1082. 

  1082. 				'4'=>'1011100',

    1083. 

  1083. 				'5'=>'1001110',

    1084. 

  1084. 				'6'=>'1010000',

    1085. 

  1085. 				'7'=>'1000100',

    1086. 

  1086. 				'8'=>'1001000',

    1087. 

  1087. 				'9'=>'1110100')

    1088. 

  1088. 		);

    1089. 

  1089. 		$parities = array(

    1090. 

  1090. 			'0'=>array('A','A','A','A','A','A'),

    1091. 

  1091. 			'1'=>array('A','A','B','A','B','B'),

    1092. 

  1092. 			'2'=>array('A','A','B','B','A','B'),

    1093. 

  1093. 			'3'=>array('A','A','B','B','B','A'),

    1094. 

  1094. 			'4'=>array('A','B','A','A','B','B'),

    1095. 

  1095. 			'5'=>array('A','B','B','A','A','B'),

    1096. 

  1096. 			'6'=>array('A','B','B','B','A','A'),

    1097. 

  1097. 			'7'=>array('A','B','A','B','A','B'),

    1098. 

  1098. 			'8'=>array('A','B','A','B','B','A'),

    1099. 

  1099. 			'9'=>array('A','B','B','A','B','A')

    1100. 

  1100. 		);
    1101. 

  1101. 		$upce_parities = array();
    1102. 

  1102. 		$upce_parities[0] = array(

    1103. 

  1103. 			'0'=>array('B','B','B','A','A','A'),

    1104. 

  1104. 			'1'=>array('B','B','A','B','A','A'),

    1105. 

  1105. 			'2'=>array('B','B','A','A','B','A'),

    1106. 

  1106. 			'3'=>array('B','B','A','A','A','B'),

    1107. 

  1107. 			'4'=>array('B','A','B','B','A','A'),

    1108. 

  1108. 			'5'=>array('B','A','A','B','B','A'),

    1109. 

  1109. 			'6'=>array('B','A','A','A','B','B'),

    1110. 

  1110. 			'7'=>array('B','A','B','A','B','A'),

    1111. 

  1111. 			'8'=>array('B','A','B','A','A','B'),

    1112. 

  1112. 			'9'=>array('B','A','A','B','A','B')

    1113. 

  1113. 		);
    1114. 

  1114. 		$upce_parities[1] = array(

    1115. 

  1115. 			'0'=>array('A','A','A','B','B','B'),

    1116. 

  1116. 			'1'=>array('A','A','B','A','B','B'),

    1117. 

  1117. 			'2'=>array('A','A','B','B','A','B'),

    1118. 

  1118. 			'3'=>array('A','A','B','B','B','A'),

    1119. 

  1119. 			'4'=>array('A','B','A','A','B','B'),

    1120. 

  1120. 			'5'=>array('A','B','B','A','A','B'),

    1121. 

  1121. 			'6'=>array('A','B','B','B','A','A'),

    1122. 

  1122. 			'7'=>array('A','B','A','B','A','B'),

    1123. 

  1123. 			'8'=>array('A','B','A','B','B','A'),

    1124. 

  1124. 			'9'=>array('A','B','B','A','B','A')

    1125. 

  1125. 		);

    1126. 

  1126. 		$k = 0;

    1127. 

  1127. 		$seq = '101'; // left guard bar
    1128. 

  1128. 		if ($upce) {
    1129. 

  1129. 			$bararray = array('code' => $upce_code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
    1130. 

  1130. 			$p = $upce_parities[$code{1}][$r];
    1131. 

  1131. 			for ($i = 0; $i < 6; ++$i) {

    1132. 

  1132. 				$seq .= $codes[$p[$i]][$upce_code{$i}];

    1133. 

  1133. 			}
    1134. 

  1134. 			$seq .= '010101'; // right guard bar
    1135. 

  1135. 		} else {
    1136. 

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

  1137. 			$half_len = ceil($len / 2);
    1138. 

  1138. 			if ($len == 8) {

    1139. 

  1139. 				for ($i = 0; $i < $half_len; ++$i) {

    1140. 

  1140. 					$seq .= $codes['A'][$code{$i}];

    1141. 

  1141. 				}
    1142. 

  1142. 			} else {
    1143. 

  1143. 				$p = $parities[$code{0}];
    1144. 

  1144. 				for ($i = 1; $i < $half_len; ++$i) {

    1145. 

  1145. 					$seq .= $codes[$p[$i-1]][$code{$i}];

    1146. 

  1146. 				}
    1147. 

  1147. 			}

    1148. 

  1148. 			$seq .= '01010'; // center guard bar

    1149. 

  1149. 			for ($i = $half_len; $i < $len; ++$i) {

    1150. 

  1150. 				$seq .= $codes['C'][$code{$i}];

    1151. 

  1151. 			}

    1152. 

  1152. 			$seq .= '101'; // right guard bar
    1153. 

  1153. 		}

    1154. 

  1154. 		$clen = strlen($seq);

    1155. 

  1155. 		$w = 0;

    1156. 

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

    1157. 

  1157. 			$w += 1;

    1158. 

  1158. 			if (($i == ($clen - 1)) OR (($i < ($clen - 1)) AND ($seq{$i} != $seq{($i+1)}))) {

    1159. 

  1159. 				if ($seq{$i} == '1') {

    1160. 

  1160. 					$t = true; // bar

    1161. 

  1161. 				} else {

    1162. 

  1162. 					$t = false; // space

    1163. 

  1163. 				}

    1164. 

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

    1165. 

  1165. 				$bararray['maxw'] += $w;

    1166. 

  1166. 				++$k;

    1167. 

  1167. 				$w = 0;

    1168. 

  1168. 			}

    1169. 

  1169. 		}

    1170. 

  1170. 		return $bararray;

    1171. 

  1171. 	}

    1172. 

  1172. 	

    1173. 

  1173. 	/**

    1174. 

  1174. 	 * UPC-Based Extentions
    1175. 

  1175. 	 * 2-Digit Ext.: Used to indicate magazines and newspaper issue numbers
    1176. 

  1176. 	 * 5-Digit Ext.: Used to mark suggested retail price of books

    1177. 

  1177. 	 * @param string $code code to represent.

    1178. 

  1178. 	 * @param string $len barcode type: 2 = 2-Digit, 5 = 5-Digit

    1179. 

  1179. 	 * @return array barcode representation.

    1180. 

  1180. 	 * @access protected

    1181. 

  1181. 	 */

    1182. 

  1182. 	protected function barcode_eanext($code, $len=5) {
    1183. 

  1183. 		//Padding

    1184. 

  1184. 		$code = str_pad($code, $len, '0', STR_PAD_LEFT);
    1185. 

  1185. 		// calculate check digit
    1186. 

  1186. 		if ($len == 2) {
    1187. 

  1187. 			$r = $code % 4;
    1188. 

  1188. 		} elseif ($len == 5) {
    1189. 

  1189. 			$r = (3 * ($code{0} + $code{2} + $code{4})) + (9 * ($code{1} + $code{3}));
    1190. 

  1190. 			$r %= 10;
    1191. 

  1191. 		} else {
    1192. 

  1192. 			return false;
    1193. 

  1193. 		}
    1194. 

  1194. 		//Convert digits to bars

    1195. 

  1195. 		$codes = array(

    1196. 

  1196. 			'A'=>array( // left odd parity

    1197. 

  1197. 				'0'=>'0001101',

    1198. 

  1198. 				'1'=>'0011001',

    1199. 

  1199. 				'2'=>'0010011',

    1200. 

  1200. 				'3'=>'0111101',

    1201. 

  1201. 				'4'=>'0100011',

    1202. 

  1202. 				'5'=>'0110001',

    1203. 

  1203. 				'6'=>'0101111',

    1204. 

  1204. 				'7'=>'0111011',

    1205. 

  1205. 				'8'=>'0110111',

    1206. 

  1206. 				'9'=>'0001011'),

    1207. 

  1207. 			'B'=>array( // left even parity

    1208. 

  1208. 				'0'=>'0100111',

    1209. 

  1209. 				'1'=>'0110011',

    1210. 

  1210. 				'2'=>'0011011',

    1211. 

  1211. 				'3'=>'0100001',

    1212. 

  1212. 				'4'=>'0011101',

    1213. 

  1213. 				'5'=>'0111001',

    1214. 

  1214. 				'6'=>'0000101',

    1215. 

  1215. 				'7'=>'0010001',

    1216. 

  1216. 				'8'=>'0001001',

    1217. 

  1217. 				'9'=>'0010111')

    1218. 

  1218. 		);
    1219. 

  1219. 		$parities = array();
    1220. 

  1220. 		$parities[2] = array(

    1221. 

  1221. 			'0'=>array('A','A'),

    1222. 

  1222. 			'1'=>array('A','B'),

    1223. 

  1223. 			'2'=>array('B','A'),

    1224. 

  1224. 			'3'=>array('B','B')

    1225. 

  1225. 		);
    1226. 

  1226. 		$parities[5] = array(

    1227. 

  1227. 			'0'=>array('B','B','A','A','A'),

    1228. 

  1228. 			'1'=>array('B','A','B','A','A'),

    1229. 

  1229. 			'2'=>array('B','A','A','B','A'),

    1230. 

  1230. 			'3'=>array('B','A','A','A','B'),

    1231. 

  1231. 			'4'=>array('A','B','B','A','A'),

    1232. 

  1232. 			'5'=>array('A','A','B','B','A'),

    1233. 

  1233. 			'6'=>array('A','A','A','B','B'),

    1234. 

  1234. 			'7'=>array('A','B','A','B','A'),

    1235. 

  1235. 			'8'=>array('A','B','A','A','B'),

    1236. 

  1236. 			'9'=>array('A','A','B','A','B')

    1237. 

  1237. 		);	
    1238. 

  1238. 		$p = $parities[$len][$r];
    1239. 

  1239. 		$seq = '1011'; // left guard bar
    1240. 

  1240. 		$seq .= $codes[$p[0]][$code{0}];
    1241. 

  1241. 		for ($i = 1; $i < $len; ++$i) {
    1242. 

  1242. 			$seq .= '01'; // separator

    1243. 

  1243. 			$seq .= $codes[$p[$i]][$code{$i}];

    1244. 

  1244. 		}
    1245. 

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

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

    1247. 

  1247. 	}
    1248. 

  1248. 	

    1249. 

  1249. 	/**

    1250. 

  1250. 	 * POSTNET and PLANET barcodes.
    1251. 

  1251. 	 * Used by U.S. Postal Service for automated mail sorting

    1252. 

  1252. 	 * @param string $code zip code to represent. Must be a string containing a zip code of the form DDDDD or DDDDD-DDDD.

    1253. 

  1253. 	 * @param boolean $planet if true print the PLANET barcode, otherwise print POSTNET
    1254. 

  1254. 	 * @return array barcode representation.

    1255. 

  1255. 	 * @access protected

    1256. 

  1256. 	 */

    1257. 

  1257. 	protected function barcode_postnet($code, $planet=false) {

    1258. 

  1258. 		// bar lenght
    1259. 

  1259. 		if ($planet) {
    1260. 

  1260. 			$barlen = Array(

    1261. 

  1261. 				0 => Array(1,1,2,2,2),

    1262. 

  1262. 				1 => Array(2,2,2,1,1),

    1263. 

  1263. 				2 => Array(2,2,1,2,1),

    1264. 

  1264. 				3 => Array(2,2,1,1,2),

    1265. 

  1265. 				4 => Array(2,1,2,2,1),

    1266. 

  1266. 				5 => Array(2,1,2,1,2),

    1267. 

  1267. 				6 => Array(2,1,1,2,2),

    1268. 

  1268. 				7 => Array(1,2,2,2,1),

    1269. 

  1269. 				8 => Array(1,2,2,1,2),

    1270. 

  1270. 				9 => Array(1,2,1,2,2)

    1271. 

  1271. 			);
    1272. 

  1272. 		} else {
    1273. 

  1273. 			$barlen = Array(

    1274. 

  1274. 				0 => Array(2,2,1,1,1),

    1275. 

  1275. 				1 => Array(1,1,1,2,2),

    1276. 

  1276. 				2 => Array(1,1,2,1,2),

    1277. 

  1277. 				3 => Array(1,1,2,2,1),

    1278. 

  1278. 				4 => Array(1,2,1,1,2),

    1279. 

  1279. 				5 => Array(1,2,1,2,1),

    1280. 

  1280. 				6 => Array(1,2,2,1,1),

    1281. 

  1281. 				7 => Array(2,1,1,1,2),

    1282. 

  1282. 				8 => Array(2,1,1,2,1),

    1283. 

  1283. 				9 => Array(2,1,2,1,1)

    1284. 

  1284. 			);
    1285. 

  1285. 		}

    1286. 

  1286. 		$bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 2, 'bcode' => array());

    1287. 

  1287. 		$k = 0;

    1288. 

  1288. 		$code = str_replace('-', '', $code);

    1289. 

  1289. 		$code = str_replace(' ', '', $code);

    1290. 

  1290. 		$len = strlen($code);
    1291. 

  1291. 		// calculate checksum

    1292. 

  1292. 		$sum = 0;

    1293. 

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

    1294. 

  1294. 			$sum += intval($code{$i});

    1295. 

  1295. 		}
    1296. 

  1296. 		$chkd = ($sum % 10);
    1297. 

  1297. 		if($chkd > 0) {
    1298. 

  1298. 			$chkd = (10 - $chkd);
    1299. 

  1299. 		}
    1300. 

  1300. 		$code .= $chkd;

    1301. 

  1301. 		$len = strlen($code);

    1302. 

  1302. 		// start bar

    1303. 

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

    1304. 

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

    1305. 

  1305. 		$bararray['maxw'] += 2;

    1306. 

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

    1307. 

  1307. 			for ($j = 0; $j < 5; ++$j) {

    1308. 

  1308. 				$h = $barlen[$code{$i}][$j];

    1309. 

  1309. 				$p = floor(1 / $h);

    1310. 

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

    1311. 

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

    1312. 

  1312. 				$bararray['maxw'] += 2;

    1313. 

  1313. 			}

    1314. 

  1314. 		}

    1315. 

  1315. 		// end bar

    1316. 

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

    1317. 

  1317. 		$bararray['maxw'] += 1;

    1318. 

  1318. 		return $bararray;

    1319. 

  1319. 	}

    1320. 

  1320. 	

    1321. 

  1321. 	/**

    1322. 

  1322. 	 * RMS4CC - CBC - KIX
    1323. 

  1323. 	 * RMS4CC (Royal Mail 4-state Customer Code) - CBC (Customer Bar Code) - KIX (Klant index - Customer index)
    1324. 

  1324. 	 * RM4SCC is the name of the barcode symbology used by the Royal Mail for its Cleanmail service.

    1325. 

  1325. 	 * @param string $code code to print
    1326. 

  1326. 	 * @param boolean $kix if true prints the KIX variation (doesn't use the start and end symbols, and the checksum) - in this case the house number must be sufficed with an X and placed at the end of the code.
    1327. 

  1327. 	 * @return array barcode representation.

    1328. 

  1328. 	 * @access protected

    1329. 

  1329. 	 */

    1330. 

  1330. 	protected function barcode_rms4cc($code, $kix=false) {

    1331. 

  1331. 		$notkix = !$kix;
    1332. 

  1332. 		// bar mode
    1333. 

  1333. 		// 1 = pos 1, length 2
    1334. 

  1334. 		// 2 = pos 1, length 3
    1335. 

  1335. 		// 3 = pos 2, length 1
    1336. 

  1336. 		// 4 = pos 2, length 2
    1337. 

  1337. 		$barmode = array(

    1338. 

  1338. 			'0' => array(3,3,2,2),
    1339. 

  1339. 			'1' => array(3,4,1,2),
    1340. 

  1340. 			'2' => array(3,4,2,1),
    1341. 

  1341. 			'3' => array(4,3,1,2),
    1342. 

  1342. 			'4' => array(4,3,2,1),
    1343. 

  1343. 			'5' => array(4,4,1,1),
    1344. 

  1344. 			'6' => array(3,1,4,2),
    1345. 

  1345. 			'7' => array(3,2,3,2),
    1346. 

  1346. 			'8' => array(3,2,4,1),
    1347. 

  1347. 			'9' => array(4,1,3,2),
    1348. 

  1348. 			'A' => array(4,1,4,1),
    1349. 

  1349. 			'B' => array(4,2,3,1),
    1350. 

  1350. 			'C' => array(3,1,2,4),
    1351. 

  1351. 			'D' => array(3,2,1,4),
    1352. 

  1352. 			'E' => array(3,2,2,3),
    1353. 

  1353. 			'F' => array(4,1,1,4),
    1354. 

  1354. 			'G' => array(4,1,2,3),
    1355. 

  1355. 			'H' => array(4,2,1,3),
    1356. 

  1356. 			'I' => array(1,3,4,2),
    1357. 

  1357. 			'J' => array(1,4,3,2),
    1358. 

  1358. 			'K' => array(1,4,4,1),
    1359. 

  1359. 			'L' => array(2,3,3,2),
    1360. 

  1360. 			'M' => array(2,3,4,1),
    1361. 

  1361. 			'N' => array(2,4,3,1),
    1362. 

  1362. 			'O' => array(1,3,2,4),
    1363. 

  1363. 			'P' => array(1,4,1,4),
    1364. 

  1364. 			'Q' => array(1,4,2,3),
    1365. 

  1365. 			'R' => array(2,3,1,4),
    1366. 

  1366. 			'S' => array(2,3,2,3),
    1367. 

  1367. 			'T' => array(2,4,1,3),
    1368. 

  1368. 			'U' => array(1,1,4,4),
    1369. 

  1369. 			'V' => array(1,2,3,4),
    1370. 

  1370. 			'W' => array(1,2,4,3),
    1371. 

  1371. 			'X' => array(2,1,3,4),
    1372. 

  1372. 			'Y' => array(2,1,4,3),
    1373. 

  1373. 			'Z' => array(2,2,3,3)		

    1374. 

  1374. 		);
    1375. 

  1375. 		$code = strtoupper($code);
    1376. 

  1376. 		$len = strlen($code);

    1377. 

  1377. 		$bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 3, 'bcode' => array());
    1378. 

  1378. 		if ($notkix) {
    1379. 

  1379. 			// table for checksum calculation (row,col)
    1380. 

  1380. 			$checktable = array(

    1381. 

  1381. 				'0' => array(1,1),
    1382. 

  1382. 				'1' => array(1,2),
    1383. 

  1383. 				'2' => array(1,3),
    1384. 

  1384. 				'3' => array(1,4),
    1385. 

  1385. 				'4' => array(1,5),
    1386. 

  1386. 				'5' => array(1,0),
    1387. 

  1387. 				'6' => array(2,1),
    1388. 

  1388. 				'7' => array(2,2),
    1389. 

  1389. 				'8' => array(2,3),
    1390. 

  1390. 				'9' => array(2,4),
    1391. 

  1391. 				'A' => array(2,5),
    1392. 

  1392. 				'B' => array(2,0),
    1393. 

  1393. 				'C' => array(3,1),
    1394. 

  1394. 				'D' => array(3,2),
    1395. 

  1395. 				'E' => array(3,3),
    1396. 

  1396. 				'F' => array(3,4),
    1397. 

  1397. 				'G' => array(3,5),
    1398. 

  1398. 				'H' => array(3,0),
    1399. 

  1399. 				'I' => array(4,1),
    1400. 

  1400. 				'J' => array(4,2),
    1401. 

  1401. 				'K' => array(4,3),
    1402. 

  1402. 				'L' => array(4,4),
    1403. 

  1403. 				'M' => array(4,5),
    1404. 

  1404. 				'N' => array(4,0),
    1405. 

  1405. 				'O' => array(5,1),
    1406. 

  1406. 				'P' => array(5,2),
    1407. 

  1407. 				'Q' => array(5,3),
    1408. 

  1408. 				'R' => array(5,4),
    1409. 

  1409. 				'S' => array(5,5),
    1410. 

  1410. 				'T' => array(5,0),
    1411. 

  1411. 				'U' => array(0,1),
    1412. 

  1412. 				'V' => array(0,2),
    1413. 

  1413. 				'W' => array(0,3),
    1414. 

  1414. 				'X' => array(0,4),
    1415. 

  1415. 				'Y' => array(0,5),
    1416. 

  1416. 				'Z' => array(0,0)

    1417. 

  1417. 			);
    1418. 

  1418. 			$row = 0;
    1419. 

  1419. 			$col = 0;
    1420. 

  1420. 			for ($i = 0; $i < $len; ++$i) {
    1421. 

  1421. 				$row += $checktable[$code{$i}][0];
    1422. 

  1422. 				$col += $checktable[$code{$i}][1];
    1423. 

  1423. 			}
    1424. 

  1424. 			$row %= 6;
    1425. 

  1425. 			$col %= 6;
    1426. 

  1426. 			$chk = array_keys($checktable, array($row,$col));
    1427. 

  1427. 			$code .= $chk[0];
    1428. 

  1428. 			++$len;
    1429. 

  1429. 		}
    1430. 

  1430. 		$k = 0;
    1431. 

  1431. 		if ($notkix) {

    1432. 

  1432. 			// start bar

    1433. 

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

    1434. 

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

    1435. 

  1435. 			$bararray['maxw'] += 2;
    1436. 

  1436. 		}

    1437. 

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

    1438. 

  1438. 			for ($j = 0; $j < 4; ++$j) {
    1439. 

  1439. 				switch ($barmode[$code{$i}][$j]) {
    1440. 

  1440. 					case 1: {
    1441. 

  1441. 						$p = 0;
    1442. 

  1442. 						$h = 2;
    1443. 

  1443. 						break;
    1444. 

  1444. 					}
    1445. 

  1445. 					case 2: {
    1446. 

  1446. 						$p = 0;
    1447. 

  1447. 						$h = 3;
    1448. 

  1448. 						break;
    1449. 

  1449. 					}
    1450. 

  1450. 					case 3: {
    1451. 

  1451. 						$p = 1;
    1452. 

  1452. 						$h = 1;
    1453. 

  1453. 						break;
    1454. 

  1454. 					}
    1455. 

  1455. 					case 4: {
    1456. 

  1456. 						$p = 1;
    1457. 

  1457. 						$h = 2;
    1458. 

  1458. 						break;
    1459. 

  1459. 					}
    1460. 

  1460. 				}

    1461. 

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

    1462. 

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

    1463. 

  1463. 				$bararray['maxw'] += 2;

    1464. 

  1464. 			}

    1465. 

  1465. 		}
    1466. 

  1466. 		if ($notkix) {

    1467. 

  1467. 			// stop bar

    1468. 

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

    1469. 

  1469. 			$bararray['maxw'] += 1;
    1470. 

  1470. 		}

    1471. 

  1471. 		return $bararray;

    1472. 

  1472. 	}
    1473. 

  1473. 	

    1474. 

  1474. 	/**

    1475. 

  1475. 	 * CODABAR barcodes.
    1476. 

  1476. 	 * Older code often used in library systems, sometimes in blood banks

    1477. 

  1477. 	 * @param string $code code to represent.

    1478. 

  1478. 	 * @return array barcode representation.

    1479. 

  1479. 	 * @access protected

    1480. 

  1480. 	 */

    1481. 

  1481. 	protected function barcode_codabar($code) {

    1482. 

  1482. 		$chr = array(

    1483. 

  1483. 			'0' => '11111221',

    1484. 

  1484. 			'1' => '11112211',

    1485. 

  1485. 			'2' => '11121121',

    1486. 

  1486. 			'3' => '22111111',

    1487. 

  1487. 			'4' => '11211211',

    1488. 

  1488. 			'5' => '21111211',

    1489. 

  1489. 			'6' => '12111121',

    1490. 

  1490. 			'7' => '12112111',

    1491. 

  1491. 			'8' => '12211111',

    1492. 

  1492. 			'9' => '21121111',

    1493. 

  1493. 			'-' => '11122111',

    1494. 

  1494. 			'$' => '11221111',

    1495. 

  1495. 			':' => '21112121',

    1496. 

  1496. 			'/' => '21211121',

    1497. 

  1497. 			'.' => '21212111',

    1498. 

  1498. 			'+' => '11222221',

    1499. 

  1499. 			'A' => '11221211',

    1500. 

  1500. 			'B' => '12121121',

    1501. 

  1501. 			'C' => '11121221',

    1502. 

  1502. 			'D' => '11122211'

    1503. 

  1503. 		);

    1504. 

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

    1505. 

  1505. 		$k = 0;

    1506. 

  1506. 		$w = 0;

    1507. 

  1507. 		$seq = '';

    1508. 

  1508. 		$code = 'A'.strtoupper($code).'A';

    1509. 

  1509. 		$len = strlen($code);

    1510. 

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

    1511. 

  1511. 			if (!isset($chr[$code{$i}])) {

    1512. 

  1512. 				return false;

    1513. 

  1513. 			}

    1514. 

  1514. 			$seq = $chr[$code{$i}];

    1515. 

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

    1516. 

  1516. 				if (($j % 2) == 0) {

    1517. 

  1517. 					$t = true; // bar

    1518. 

  1518. 				} else {

    1519. 

  1519. 					$t = false; // space

    1520. 

  1520. 				}

    1521. 

  1521. 				$w = $seq{$j};

    1522. 

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

    1523. 

  1523. 				$bararray['maxw'] += $w;

    1524. 

  1524. 				++$k;

    1525. 

  1525. 			}

    1526. 

  1526. 		}

    1527. 

  1527. 		return $bararray;

    1528. 

  1528. 	}

    1529. 

  1529. 	

    1530. 

  1530. 	/**

    1531. 

  1531. 	 * CODE11 barcodes.
    1532. 

  1532. 	 * Used primarily for labeling telecommunications equipment

    1533. 

  1533. 	 * @param string $code code to represent.

    1534. 

  1534. 	 * @return array barcode representation.

    1535. 

  1535. 	 * @access protected

    1536. 

  1536. 	 */

    1537. 

  1537. 	protected function barcode_code11($code) {

    1538. 

  1538. 		$chr = array(

    1539. 

  1539. 			'0' => '111121',
    1540. 

  1540. 			'1' => '211121',
    1541. 

  1541. 			'2' => '121121',
    1542. 

  1542. 			'3' => '221111',
    1543. 

  1543. 			'4' => '112121',
    1544. 

  1544. 			'5' => '212111',
    1545. 

  1545. 			'6' => '122111',
    1546. 

  1546. 			'7' => '111221',
    1547. 

  1547. 			'8' => '211211',
    1548. 

  1548. 			'9' => '211111',
    1549. 

  1549. 			'-' => '112111',
    1550. 

  1550. 			'S' => '112211'

    1551. 

  1551. 		);

    1552. 

  1552. 		

    1553. 

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

    1554. 

  1554. 		$k = 0;

    1555. 

  1555. 		$w = 0;

    1556. 

  1556. 		$seq = '';
    1557. 

  1557. 		$len = strlen($code);
    1558. 

  1558. 		// calculate check digit C
    1559. 

  1559. 		$p = 1;
    1560. 

  1560. 		$check = 0;
    1561. 

  1561. 		for ($i = ($len - 1); $i >= 0; --$i) {
    1562. 

  1562. 			$digit = $code{$i};
    1563. 

  1563. 			if ($digit == '-') {
    1564. 

  1564. 				$dval = 10;
    1565. 

  1565. 			} else {
    1566. 

  1566. 				$dval = intval($digit);
    1567. 

  1567. 			}
    1568. 

  1568. 			$check += ($dval * $p);
    1569. 

  1569. 			++$p;
    1570. 

  1570. 			if ($p > 10) {
    1571. 

  1571. 				$p = 1;
    1572. 

  1572. 			}
    1573. 

  1573. 		}
    1574. 

  1574. 		$check %= 11;
    1575. 

  1575. 		if ($check == 10) {
    1576. 

  1576. 			$check = '-';
    1577. 

  1577. 		} 
    1578. 

  1578. 		$code .= $check;
    1579. 

  1579. 		if ($len > 10) {
    1580. 

  1580. 			// calculate check digit K
    1581. 

  1581. 			$p = 1;
    1582. 

  1582. 			$check = 0;
    1583. 

  1583. 			for ($i = $len; $i >= 0; --$i) {
    1584. 

  1584. 				$digit = $code{$i};
    1585. 

  1585. 				if ($digit == '-') {
    1586. 

  1586. 					$dval = 10;
    1587. 

  1587. 				} else {
    1588. 

  1588. 					$dval = intval($digit);
    1589. 

  1589. 				}
    1590. 

  1590. 				$check += ($dval * $p);
    1591. 

  1591. 				++$p;
    1592. 

  1592. 				if ($p > 9) {
    1593. 

  1593. 					$p = 1;
    1594. 

  1594. 				}
    1595. 

  1595. 			}
    1596. 

  1596. 			$check %= 11;
    1597. 

  1597. 			$code .= $check;
    1598. 

  1598. 			++$len;
    1599. 

  1599. 		}

    1600. 

  1600. 		$code = 'S'.$code.'S';

    1601. 

  1601. 		$len += 3;

    1602. 

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

    1603. 

  1603. 			if (!isset($chr[$code{$i}])) {

    1604. 

  1604. 				return false;

    1605. 

  1605. 			}

    1606. 

  1606. 			$seq = $chr[$code{$i}];

    1607. 

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

    1608. 

  1608. 				if (($j % 2) == 0) {

    1609. 

  1609. 					$t = true; // bar

    1610. 

  1610. 				} else {

    1611. 

  1611. 					$t = false; // space

    1612. 

  1612. 				}

    1613. 

  1613. 				$w = $seq{$j};

    1614. 

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

    1615. 

  1615. 				$bararray['maxw'] += $w;

    1616. 

  1616. 				++$k;

    1617. 

  1617. 			}

    1618. 

  1618. 		}

    1619. 

  1619. 		return $bararray;

    1620. 

  1620. 	}
    1621. 

  1621. 	
    1622. 

  1622. 	/**

    1623. 

  1623. 	 * Pharmacode

    1624. 

  1624. 	 * Contains digits (0 to 9)

    1625. 

  1625. 	 * @param string $code code to represent.

    1626. 

  1626. 	 * @return array barcode representation.

    1627. 

  1627. 	 * @access protected

    1628. 

  1628. 	 */

    1629. 

  1629. 	protected function barcode_pharmacode($code) {
    1630. 

  1630. 		$seq = '';
    1631. 

  1631. 		$code = intval($code);

    1632. 

  1632. 		while ($code > 0) {
    1633. 

  1633. 			if (($code % 2) == 0) {
    1634. 

  1634. 				$seq .= '11100';
    1635. 

  1635. 				$code -= 2;
    1636. 

  1636. 			} else {
    1637. 

  1637. 				$seq .= '100';
    1638. 

  1638. 				$code -= 1;
    1639. 

  1639. 			}
    1640. 

  1640. 			$code /= 2;
    1641. 

  1641. 		}
    1642. 

  1642. 		$seq = substr($seq, 0, -2);
    1643. 

  1643. 		$seq = strrev($seq);
    1644. 

  1644. 		…
    1645.

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