PageRenderTime 316ms CodeModel.GetById 15ms RepoModel.GetById 0ms app.codeStats 1ms

/lib/tcpdf/tcpdf_barcodes_1d.php

https://bitbucket.org/moodle/moodle
PHP | 2357 lines | 1884 code | 40 blank | 433 comment | 247 complexity | 1d0bf7d7fb094be1e0804dfc130abea0 MD5 | raw file
Possible License(s): Apache-2.0, LGPL-2.1, BSD-3-Clause, MIT, GPL-3.0

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

    

  1. <?php
    2. 

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

  3. // File name   : tcpdf_barcodes_1d.php
    4. 

  4. // Version     : 1.0.027
    5. 

  5. // Begin       : 2008-06-09
    6. 

  6. // Last Update : 2014-10-20
    7. 

  7. // Author      : Nicola Asuni - Tecnick.com LTD - www.tecnick.com - info@tecnick.com
    8. 

  8. // License     : GNU-LGPL v3 (http://www.gnu.org/copyleft/lesser.html)
    9. 

  9. // -------------------------------------------------------------------
    10. 

  10. // Copyright (C) 2008-2014 Nicola Asuni - Tecnick.com LTD
    11. 

  11. //
    12. 

  12. // This file is part of TCPDF software library.
    13. 

  13. //
    14. 

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

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

  16. // published by the Free Software Foundation, either version 3 of the
    17. 

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

  18. //
    19. 

  19. // TCPDF is distributed in the hope that it will be useful, but
    20. 

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

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

  22. // See the 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 TCPDF.  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. //============================================================+
    34. 

  34. 

  35. /**
    36. 

  36.  * @file
    37. 

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

  38.  * @package com.tecnick.tcpdf
    39. 

  39.  * @author Nicola Asuni
    40. 

  40.  * @version 1.0.027
    41. 

  41.  */
    42. 

  42. 

  43. /**
    44. 

  44.  * @class TCPDFBarcode
    45. 

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

  46.  * @package com.tecnick.tcpdf
    47. 

  47.  * @version 1.0.027
    48. 

  48.  * @author Nicola Asuni
    49. 

  49.  */
    50. 

  50. class TCPDFBarcode {
    51. 

  51. 

  52. 	/**
    53. 

  53. 	 * Array representation of barcode.
    54. 

  54. 	 * @protected
    55. 

  55. 	 */
    56. 

  56. 	protected $barcode_array;
    57. 

  57. 

  58. 	/**
    59. 

  59. 	 * This is the class constructor.
    60. 

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

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

  62. 	 * <li>$arrcode['maxh'] max barcode height</li>
    63. 

  63. 	 * <li>$arrcode['maxw'] max barcode width</li>
    64. 

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

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

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

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

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

  69. 	 * @param $code (string) code to print
    70. 

  70.  	 * @param $type (string) 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>C128 : CODE 128</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 Extension</li><li>EAN5 : 5-Digits UPC-Based Extension</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>IMB: Intelligent Mail Barcode - Onecode - USPS-B-3200</li><li>CODABAR : CODABAR</li><li>CODE11 : CODE 11</li><li>PHARMA : PHARMACODE</li><li>PHARMA2T : PHARMACODE TWO-TRACKS</li></ul>
    71. 

  71.  	 * @public
    72. 

  72. 	 */
    73. 

  73. 	public function __construct($code, $type) {
    74. 

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

  75. 	}
    76. 

  76. 

  77. 	/**
    78. 

  78. 	 * Return an array representations of barcode.
    79. 

  79.  	 * @return array
    80. 

  80.  	 * @public
    81. 

  81. 	 */
    82. 

  82. 	public function getBarcodeArray() {
    83. 

  83. 		return $this->barcode_array;
    84. 

  84. 	}
    85. 

  85. 

  86. 	/**
    87. 

  87. 	 * Send barcode as SVG image object to the standard output.
    88. 

  88. 	 * @param $w (int) Minimum width of a single bar in user units.
    89. 

  89. 	 * @param $h (int) Height of barcode in user units.
    90. 

  90. 	 * @param $color (string) Foreground color (in SVG format) for bar elements (background is transparent).
    91. 

  91.  	 * @public
    92. 

  92. 	 */
    93. 

  93. 	public function getBarcodeSVG($w=2, $h=30, $color='black') {
    94. 

  94. 		// send headers
    95. 

  95. 		$code = $this->getBarcodeSVGcode($w, $h, $color);
    96. 

  96. 		header('Content-Type: application/svg+xml');
    97. 

  97. 		header('Cache-Control: public, must-revalidate, max-age=0'); // HTTP/1.1
    98. 

  98. 		header('Pragma: public');
    99. 

  99. 		header('Expires: Sat, 26 Jul 1997 05:00:00 GMT'); // Date in the past
    100. 

  100. 		header('Last-Modified: '.gmdate('D, d M Y H:i:s').' GMT');
    101. 

  101. 		header('Content-Disposition: inline; filename="'.md5($code).'.svg";');
    102. 

  102. 		//header('Content-Length: '.strlen($code));
    103. 

  103. 		echo $code;
    104. 

  104. 	}
    105. 

  105. 

  106. 	/**
    107. 

  107. 	 * Return a SVG string representation of barcode.
    108. 

  108. 	 * @param $w (int) Minimum width of a single bar in user units.
    109. 

  109. 	 * @param $h (int) Height of barcode in user units.
    110. 

  110. 	 * @param $color (string) Foreground color (in SVG format) for bar elements (background is transparent).
    111. 

  111.  	 * @return string SVG code.
    112. 

  112.  	 * @public
    113. 

  113. 	 */
    114. 

  114. 	public function getBarcodeSVGcode($w=2, $h=30, $color='black') {
    115. 

  115. 		// replace table for special characters
    116. 

  116. 		$repstr = array("\0" => '', '&' => '&amp;', '<' => '&lt;', '>' => '&gt;');
    117. 

  117. 		$svg = '<'.'?'.'xml version="1.0" standalone="no"'.'?'.'>'."\n";
    118. 

  118. 		$svg .= '<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN" "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">'."\n";
    119. 

  119. 		$svg .= '<svg width="'.round(($this->barcode_array['maxw'] * $w), 3).'" height="'.$h.'" version="1.1" xmlns="http://www.w3.org/2000/svg">'."\n";
    120. 

  120. 		$svg .= "\t".'<desc>'.strtr($this->barcode_array['code'], $repstr).'</desc>'."\n";
    121. 

  121. 		$svg .= "\t".'<g id="bars" fill="'.$color.'" stroke="none">'."\n";
    122. 

  122. 		// print bars
    123. 

  123. 		$x = 0;
    124. 

  124. 		foreach ($this->barcode_array['bcode'] as $k => $v) {
    125. 

  125. 			$bw = round(($v['w'] * $w), 3);
    126. 

  126. 			$bh = round(($v['h'] * $h / $this->barcode_array['maxh']), 3);
    127. 

  127. 			if ($v['t']) {
    128. 

  128. 				$y = round(($v['p'] * $h / $this->barcode_array['maxh']), 3);
    129. 

  129. 				// draw a vertical bar
    130. 

  130. 				$svg .= "\t\t".'<rect x="'.$x.'" y="'.$y.'" width="'.$bw.'" height="'.$bh.'" />'."\n";
    131. 

  131. 			}
    132. 

  132. 			$x += $bw;
    133. 

  133. 		}
    134. 

  134. 		$svg .= "\t".'</g>'."\n";
    135. 

  135. 		$svg .= '</svg>'."\n";
    136. 

  136. 		return $svg;
    137. 

  137. 	}
    138. 

  138. 

  139. 	/**
    140. 

  140. 	 * Return an HTML representation of barcode.
    141. 

  141. 	 * @param $w (int) Width of a single bar element in pixels.
    142. 

  142. 	 * @param $h (int) Height of a single bar element in pixels.
    143. 

  143. 	 * @param $color (string) Foreground color for bar elements (background is transparent).
    144. 

  144.  	 * @return string HTML code.
    145. 

  145.  	 * @public
    146. 

  146. 	 */
    147. 

  147. 	public function getBarcodeHTML($w=2, $h=30, $color='black') {
    148. 

  148. 		$html = '<div style="font-size:0;position:relative;width:'.($this->barcode_array['maxw'] * $w).'px;height:'.($h).'px;">'."\n";
    149. 

  149. 		// print bars
    150. 

  150. 		$x = 0;
    151. 

  151. 		foreach ($this->barcode_array['bcode'] as $k => $v) {
    152. 

  152. 			$bw = round(($v['w'] * $w), 3);
    153. 

  153. 			$bh = round(($v['h'] * $h / $this->barcode_array['maxh']), 3);
    154. 

  154. 			if ($v['t']) {
    155. 

  155. 				$y = round(($v['p'] * $h / $this->barcode_array['maxh']), 3);
    156. 

  156. 				// draw a vertical bar
    157. 

  157. 				$html .= '<div style="background-color:'.$color.';width:'.$bw.'px;height:'.$bh.'px;position:absolute;left:'.$x.'px;top:'.$y.'px;">&nbsp;</div>'."\n";
    158. 

  158. 			}
    159. 

  159. 			$x += $bw;
    160. 

  160. 		}
    161. 

  161. 		$html .= '</div>'."\n";
    162. 

  162. 		return $html;
    163. 

  163. 	}
    164. 

  164. 

  165. 	/**
    166. 

  166. 	 * Send a PNG image representation of barcode (requires GD or Imagick library).
    167. 

  167. 	 * @param $w (int) Width of a single bar element in pixels.
    168. 

  168. 	 * @param $h (int) Height of a single bar element in pixels.
    169. 

  169. 	 * @param $color (array) RGB (0-255) foreground color for bar elements (background is transparent).
    170. 

  170.  	 * @public
    171. 

  171. 	 */
    172. 

  172. 	public function getBarcodePNG($w=2, $h=30, $color=array(0,0,0)) {
    173. 

  173. 		$data = $this->getBarcodePngData($w, $h, $color);
    174. 

  174. 		// send headers
    175. 

  175. 		header('Content-Type: image/png');
    176. 

  176. 		header('Cache-Control: public, must-revalidate, max-age=0'); // HTTP/1.1
    177. 

  177. 		header('Pragma: public');
    178. 

  178. 		header('Expires: Sat, 26 Jul 1997 05:00:00 GMT'); // Date in the past
    179. 

  179. 		header('Last-Modified: '.gmdate('D, d M Y H:i:s').' GMT');
    180. 

  180. 		//header('Content-Length: '.strlen($data));
    181. 

  181. 		echo $data;
    182. 

  182. 	}
    183. 

  183. 

  184. 	/**
    185. 

  185. 	 * Return a PNG image representation of barcode (requires GD or Imagick library).
    186. 

  186. 	 * @param $w (int) Width of a single bar element in pixels.
    187. 

  187. 	 * @param $h (int) Height of a single bar element in pixels.
    188. 

  188. 	 * @param $color (array) RGB (0-255) foreground color for bar elements (background is transparent).
    189. 

  189.  	 * @return image or false in case of error.
    190. 

  190.  	 * @public
    191. 

  191. 	 */
    192. 

  192. 	public function getBarcodePngData($w=2, $h=30, $color=array(0,0,0)) {
    193. 

  193. 		// calculate image size
    194. 

  194. 		$width = ($this->barcode_array['maxw'] * $w);
    195. 

  195. 		$height = $h;
    196. 

  196. 		if (function_exists('imagecreate')) {
    197. 

  197. 			// GD library
    198. 

  198. 			$imagick = false;
    199. 

  199. 			$png = imagecreate($width, $height);
    200. 

  200. 			$bgcol = imagecolorallocate($png, 255, 255, 255);
    201. 

  201. 			imagecolortransparent($png, $bgcol);
    202. 

  202. 			$fgcol = imagecolorallocate($png, $color[0], $color[1], $color[2]);
    203. 

  203. 		} elseif (extension_loaded('imagick')) {
    204. 

  204. 			$imagick = true;
    205. 

  205. 			$bgcol = new imagickpixel('rgb(255,255,255');
    206. 

  206. 			$fgcol = new imagickpixel('rgb('.$color[0].','.$color[1].','.$color[2].')');
    207. 

  207. 			$png = new Imagick();
    208. 

  208. 			$png->newImage($width, $height, 'none', 'png');
    209. 

  209. 			$bar = new imagickdraw();
    210. 

  210. 			$bar->setfillcolor($fgcol);
    211. 

  211. 		} else {
    212. 

  212. 			return false;
    213. 

  213. 		}
    214. 

  214. 		// print bars
    215. 

  215. 		$x = 0;
    216. 

  216. 		foreach ($this->barcode_array['bcode'] as $k => $v) {
    217. 

  217. 			$bw = round(($v['w'] * $w), 3);
    218. 

  218. 			$bh = round(($v['h'] * $h / $this->barcode_array['maxh']), 3);
    219. 

  219. 			if ($v['t']) {
    220. 

  220. 				$y = round(($v['p'] * $h / $this->barcode_array['maxh']), 3);
    221. 

  221. 				// draw a vertical bar
    222. 

  222. 				if ($imagick) {
    223. 

  223. 					$bar->rectangle($x, $y, ($x + $bw - 1), ($y + $bh - 1));
    224. 

  224. 				} else {
    225. 

  225. 					imagefilledrectangle($png, $x, $y, ($x + $bw - 1), ($y + $bh - 1), $fgcol);
    226. 

  226. 				}
    227. 

  227. 			}
    228. 

  228. 			$x += $bw;
    229. 

  229. 		}
    230. 

  230. 		if ($imagick) {
    231. 

  231. 			$png->drawimage($bar);
    232. 

  232. 			return $png;
    233. 

  233. 		} else {
    234. 

  234. 			ob_start();
    235. 

  235. 			imagepng($png);
    236. 

  236. 			$imagedata = ob_get_clean();
    237. 

  237. 			imagedestroy($png);
    238. 

  238. 			return $imagedata;
    239. 

  239. 		}
    240. 

  240. 	}
    241. 

  241. 

  242. 	/**
    243. 

  243. 	 * Set the barcode.
    244. 

  244. 	 * @param $code (string) code to print
    245. 

  245.  	 * @param $type (string) 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>C128 : CODE 128</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 Extension</li><li>EAN5 : 5-Digits UPC-Based Extension</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>IMB: Intelligent Mail Barcode - Onecode - USPS-B-3200</li><li>IMBPRE: Pre-processed Intelligent Mail Barcode - Onecode - USPS-B-3200, using only F,A,D,T letters</li><li>CODABAR : CODABAR</li><li>CODE11 : CODE 11</li><li>PHARMA : PHARMACODE</li><li>PHARMA2T : PHARMACODE TWO-TRACKS</li></ul>
    246. 

  246.  	 * @return array barcode array
    247. 

  247.  	 * @public
    248. 

  248. 	 */
    249. 

  249. 	public function setBarcode($code, $type) {
    250. 

  250. 		switch (strtoupper($type)) {
    251. 

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

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

  253. 				break;
    254. 

  254. 			}
    255. 

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

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

  257. 				break;
    258. 

  258. 			}
    259. 

  259. 			case 'C39E': { // CODE 39 EXTENDED
    260. 

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

  261. 				break;
    262. 

  262. 			}
    263. 

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

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

  265. 				break;
    266. 

  266. 			}
    267. 

  267. 			case 'C93': { // CODE 93 - USS-93
    268. 

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

  269. 				break;
    270. 

  270. 			}
    271. 

  271. 			case 'S25': { // Standard 2 of 5
    272. 

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

  273. 				break;
    274. 

  274. 			}
    275. 

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

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

  277. 				break;
    278. 

  278. 			}
    279. 

  279. 			case 'I25': { // Interleaved 2 of 5
    280. 

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

  281. 				break;
    282. 

  282. 			}
    283. 

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

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

  285. 				break;
    286. 

  286. 			}
    287. 

  287. 			case 'C128': { // CODE 128
    288. 

  288. 				$arrcode = $this->barcode_c128($code, '');
    289. 

  289. 				break;
    290. 

  290. 			}
    291. 

  291. 			case 'C128A': { // CODE 128 A
    292. 

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

  293. 				break;
    294. 

  294. 			}
    295. 

  295. 			case 'C128B': { // CODE 128 B
    296. 

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

  297. 				break;
    298. 

  298. 			}
    299. 

  299. 			case 'C128C': { // CODE 128 C
    300. 

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

  301. 				break;
    302. 

  302. 			}
    303. 

  303. 			case 'EAN2': { // 2-Digits UPC-Based Extension
    304. 

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

  305. 				break;
    306. 

  306. 			}
    307. 

  307. 			case 'EAN5': { // 5-Digits UPC-Based Extension
    308. 

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

  309. 				break;
    310. 

  310. 			}
    311. 

  311. 			case 'EAN8': { // EAN 8
    312. 

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

  313. 				break;
    314. 

  314. 			}
    315. 

  315. 			case 'EAN13': { // EAN 13
    316. 

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

  317. 				break;
    318. 

  318. 			}
    319. 

  319. 			case 'UPCA': { // UPC-A
    320. 

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

  321. 				break;
    322. 

  322. 			}
    323. 

  323. 			case 'UPCE': { // UPC-E
    324. 

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

  325. 				break;
    326. 

  326. 			}
    327. 

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

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

  329. 				break;
    330. 

  330. 			}
    331. 

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

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

  333. 				break;
    334. 

  334. 			}
    335. 

  335. 			case 'POSTNET': { // POSTNET
    336. 

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

  337. 				break;
    338. 

  338. 			}
    339. 

  339. 			case 'PLANET': { // PLANET
    340. 

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

  341. 				break;
    342. 

  342. 			}
    343. 

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

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

  345. 				break;
    346. 

  346. 			}
    347. 

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

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

  349. 				break;
    350. 

  350. 			}
    351. 

  351. 			case 'IMB': { // IMB - Intelligent Mail Barcode - Onecode - USPS-B-3200
    352. 

  352. 				$arrcode = $this->barcode_imb($code);
    353. 

  353. 				break;
    354. 

  354. 			}
    355. 

  355. 			case 'IMBPRE': { // IMB - Intelligent Mail Barcode - Onecode - USPS-B-3200- pre-processed
    356. 

  356. 				$arrcode = $this->barcode_imb_pre($code);
    357. 

  357. 				break;
    358. 

  358. 			}
    359. 

  359. 			case 'CODABAR': { // CODABAR
    360. 

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

  361. 				break;
    362. 

  362. 			}
    363. 

  363. 			case 'CODE11': { // CODE 11
    364. 

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

  365. 				break;
    366. 

  366. 			}
    367. 

  367. 			case 'PHARMA': { // PHARMACODE
    368. 

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

  369. 				break;
    370. 

  370. 			}
    371. 

  371. 			case 'PHARMA2T': { // PHARMACODE TWO-TRACKS
    372. 

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

  373. 				break;
    374. 

  374. 			}
    375. 

  375. 			default: {
    376. 

  376. 				$this->barcode_array = false;
    377. 

  377. 				$arrcode = false;
    378. 

  378. 				break;
    379. 

  379. 			}
    380. 

  380. 		}
    381. 

  381. 		$this->barcode_array = $arrcode;
    382. 

  382. 	}
    383. 

  383. 

  384. 	/**
    385. 

  385. 	 * CODE 39 - ANSI MH10.8M-1983 - USD-3 - 3 of 9.
    386. 

  386. 	 * General-purpose code in very wide use world-wide
    387. 

  387. 	 * @param $code (string) code to represent.
    388. 

  388. 	 * @param $extended (boolean) if true uses the extended mode.
    389. 

  389. 	 * @param $checksum (boolean) if true add a checksum to the code.
    390. 

  390. 	 * @return array barcode representation.
    391. 

  391. 	 * @protected
    392. 

  392. 	 */
    393. 

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

  394. 		$chr['0'] = '111331311';
    395. 

  395. 		$chr['1'] = '311311113';
    396. 

  396. 		$chr['2'] = '113311113';
    397. 

  397. 		$chr['3'] = '313311111';
    398. 

  398. 		$chr['4'] = '111331113';
    399. 

  399. 		$chr['5'] = '311331111';
    400. 

  400. 		$chr['6'] = '113331111';
    401. 

  401. 		$chr['7'] = '111311313';
    402. 

  402. 		$chr['8'] = '311311311';
    403. 

  403. 		$chr['9'] = '113311311';
    404. 

  404. 		$chr['A'] = '311113113';
    405. 

  405. 		$chr['B'] = '113113113';
    406. 

  406. 		$chr['C'] = '313113111';
    407. 

  407. 		$chr['D'] = '111133113';
    408. 

  408. 		$chr['E'] = '311133111';
    409. 

  409. 		$chr['F'] = '113133111';
    410. 

  410. 		$chr['G'] = '111113313';
    411. 

  411. 		$chr['H'] = '311113311';
    412. 

  412. 		$chr['I'] = '113113311';
    413. 

  413. 		$chr['J'] = '111133311';
    414. 

  414. 		$chr['K'] = '311111133';
    415. 

  415. 		$chr['L'] = '113111133';
    416. 

  416. 		$chr['M'] = '313111131';
    417. 

  417. 		$chr['N'] = '111131133';
    418. 

  418. 		$chr['O'] = '311131131';
    419. 

  419. 		$chr['P'] = '113131131';
    420. 

  420. 		$chr['Q'] = '111111333';
    421. 

  421. 		$chr['R'] = '311111331';
    422. 

  422. 		$chr['S'] = '113111331';
    423. 

  423. 		$chr['T'] = '111131331';
    424. 

  424. 		$chr['U'] = '331111113';
    425. 

  425. 		$chr['V'] = '133111113';
    426. 

  426. 		$chr['W'] = '333111111';
    427. 

  427. 		$chr['X'] = '131131113';
    428. 

  428. 		$chr['Y'] = '331131111';
    429. 

  429. 		$chr['Z'] = '133131111';
    430. 

  430. 		$chr['-'] = '131111313';
    431. 

  431. 		$chr['.'] = '331111311';
    432. 

  432. 		$chr[' '] = '133111311';
    433. 

  433. 		$chr['$'] = '131313111';
    434. 

  434. 		$chr['/'] = '131311131';
    435. 

  435. 		$chr['+'] = '131113131';
    436. 

  436. 		$chr['%'] = '111313131';
    437. 

  437. 		$chr['*'] = '131131311';
    438. 

  438. 		$code = strtoupper($code);
    439. 

  439. 		if ($extended) {
    440. 

  440. 			// extended mode
    441. 

  441. 			$code = $this->encode_code39_ext($code);
    442. 

  442. 		}
    443. 

  443. 		if ($code === false) {
    444. 

  444. 			return false;
    445. 

  445. 		}
    446. 

  446. 		if ($checksum) {
    447. 

  447. 			// checksum
    448. 

  448. 			$code .= $this->checksum_code39($code);
    449. 

  449. 		}
    450. 

  450. 		// add start and stop codes
    451. 

  451. 		$code = '*'.$code.'*';
    452. 

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

  453. 		$k = 0;
    454. 

  454. 		$clen = strlen($code);
    455. 

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

  456. 			$char = $code[$i];
    457. 

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

  458. 				// invalid character
    459. 

  459. 				return false;
    460. 

  460. 			}
    461. 

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

  462. 				if (($j % 2) == 0) {
    463. 

  463. 					$t = true; // bar
    464. 

  464. 				} else {
    465. 

  465. 					$t = false; // space
    466. 

  466. 				}
    467. 

  467. 				$w = $chr[$char][$j];
    468. 

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

  469. 				$bararray['maxw'] += $w;
    470. 

  470. 				++$k;
    471. 

  471. 			}
    472. 

  472. 			// intercharacter gap
    473. 

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

  474. 			$bararray['maxw'] += 1;
    475. 

  475. 			++$k;
    476. 

  476. 		}
    477. 

  477. 		return $bararray;
    478. 

  478. 	}
    479. 

  479. 

  480. 	/**
    481. 

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

  482. 	 * @param $code (string) code to represent.
    483. 

  483. 	 * @return encoded string.
    484. 

  484. 	 * @protected
    485. 

  485. 	 */
    486. 

  486. 	protected function encode_code39_ext($code) {
    487. 

  487. 		$encode = array(
    488. 

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

  520. 		$code_ext = '';
    521. 

  521. 		$clen = strlen($code);
    522. 

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

  523. 			if (ord($code[$i]) > 127) {
    524. 

  524. 				return false;
    525. 

  525. 			}
    526. 

  526. 			$code_ext .= $encode[$code[$i]];
    527. 

  527. 		}
    528. 

  528. 		return $code_ext;
    529. 

  529. 	}
    530. 

  530. 

  531. 	/**
    532. 

  532. 	 * Calculate CODE 39 checksum (modulo 43).
    533. 

  533. 	 * @param $code (string) code to represent.
    534. 

  534. 	 * @return char checksum.
    535. 

  535. 	 * @protected
    536. 

  536. 	 */
    537. 

  537. 	protected function checksum_code39($code) {
    538. 

  538. 		$chars = array(
    539. 

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

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

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

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

  543. 		$sum = 0;
    544. 

  544. 		$clen = strlen($code);
    545. 

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

  546. 			$k = array_keys($chars, $code[$i]);
    547. 

  547. 			$sum += $k[0];
    548. 

  548. 		}
    549. 

  549. 		$j = ($sum % 43);
    550. 

  550. 		return $chars[$j];
    551. 

  551. 	}
    552. 

  552. 

  553. 	/**
    554. 

  554. 	 * CODE 93 - USS-93
    555. 

  555. 	 * Compact code similar to Code 39
    556. 

  556. 	 * @param $code (string) code to represent.
    557. 

  557. 	 * @return array barcode representation.
    558. 

  558. 	 * @protected
    559. 

  559. 	 */
    560. 

  560. 	protected function barcode_code93($code) {
    561. 

  561. 		$chr[48] = '131112'; // 0
    562. 

  562. 		$chr[49] = '111213'; // 1
    563. 

  563. 		$chr[50] = '111312'; // 2
    564. 

  564. 		$chr[51] = '111411'; // 3
    565. 

  565. 		$chr[52] = '121113'; // 4
    566. 

  566. 		$chr[53] = '121212'; // 5
    567. 

  567. 		$chr[54] = '121311'; // 6
    568. 

  568. 		$chr[55] = '111114'; // 7
    569. 

  569. 		$chr[56] = '131211'; // 8
    570. 

  570. 		$chr[57] = '141111'; // 9
    571. 

  571. 		$chr[65] = '211113'; // A
    572. 

  572. 		$chr[66] = '211212'; // B
    573. 

  573. 		$chr[67] = '211311'; // C
    574. 

  574. 		$chr[68] = '221112'; // D
    575. 

  575. 		$chr[69] = '221211'; // E
    576. 

  576. 		$chr[70] = '231111'; // F
    577. 

  577. 		$chr[71] = '112113'; // G
    578. 

  578. 		$chr[72] = '112212'; // H
    579. 

  579. 		$chr[73] = '112311'; // I
    580. 

  580. 		$chr[74] = '122112'; // J
    581. 

  581. 		$chr[75] = '132111'; // K
    582. 

  582. 		$chr[76] = '111123'; // L
    583. 

  583. 		$chr[77] = '111222'; // M
    584. 

  584. 		$chr[78] = '111321'; // N
    585. 

  585. 		$chr[79] = '121122'; // O
    586. 

  586. 		$chr[80] = '131121'; // P
    587. 

  587. 		$chr[81] = '212112'; // Q
    588. 

  588. 		$chr[82] = '212211'; // R
    589. 

  589. 		$chr[83] = '211122'; // S
    590. 

  590. 		$chr[84] = '211221'; // T
    591. 

  591. 		$chr[85] = '221121'; // U
    592. 

  592. 		$chr[86] = '222111'; // V
    593. 

  593. 		$chr[87] = '112122'; // W
    594. 

  594. 		$chr[88] = '112221'; // X
    595. 

  595. 		$chr[89] = '122121'; // Y
    596. 

  596. 		$chr[90] = '123111'; // Z
    597. 

  597. 		$chr[45] = '121131'; // -
    598. 

  598. 		$chr[46] = '311112'; // .
    599. 

  599. 		$chr[32] = '311211'; //
    600. 

  600. 		$chr[36] = '321111'; // $
    601. 

  601. 		$chr[47] = '112131'; // /
    602. 

  602. 		$chr[43] = '113121'; // +
    603. 

  603. 		$chr[37] = '211131'; // %
    604. 

  604. 		$chr[128] = '121221'; // ($)
    605. 

  605. 		$chr[129] = '311121'; // (/)
    606. 

  606. 		$chr[130] = '122211'; // (+)
    607. 

  607. 		$chr[131] = '312111'; // (%)
    608. 

  608. 		$chr[42] = '111141'; // start-stop
    609. 

  609. 		$code = strtoupper($code);
    610. 

  610. 		$encode = array(
    611. 

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

  643. 		$code_ext = '';
    644. 

  644. 		$clen = strlen($code);
    645. 

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

  646. 			if (ord($code[$i]) > 127) {
    647. 

  647. 				return false;
    648. 

  648. 			}
    649. 

  649. 			$code_ext .= $encode[$code[$i]];
    650. 

  650. 		}
    651. 

  651. 		// checksum
    652. 

  652. 		$code_ext .= $this->checksum_code93($code_ext);
    653. 

  653. 		// add start and stop codes
    654. 

  654. 		$code = '*'.$code_ext.'*';
    655. 

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

  656. 		$k = 0;
    657. 

  657. 		$clen = strlen($code);
    658. 

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

  659. 			$char = ord($code[$i]);
    660. 

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

  661. 				// invalid character
    662. 

  662. 				return false;
    663. 

  663. 			}
    664. 

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

  665. 				if (($j % 2) == 0) {
    666. 

  666. 					$t = true; // bar
    667. 

  667. 				} else {
    668. 

  668. 					$t = false; // space
    669. 

  669. 				}
    670. 

  670. 				$w = $chr[$char][$j];
    671. 

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

  672. 				$bararray['maxw'] += $w;
    673. 

  673. 				++$k;
    674. 

  674. 			}
    675. 

  675. 		}
    676. 

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

  677. 		$bararray['maxw'] += 1;
    678. 

  678. 		++$k;
    679. 

  679. 		return $bararray;
    680. 

  680. 	}
    681. 

  681. 

  682. 	/**
    683. 

  683. 	 * Calculate CODE 93 checksum (modulo 47).
    684. 

  684. 	 * @param $code (string) code to represent.
    685. 

  685. 	 * @return string checksum code.
    686. 

  686. 	 * @protected
    687. 

  687. 	 */
    688. 

  688. 	protected function checksum_code93($code) {
    689. 

  689. 		$chars = array(
    690. 

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

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

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

  693. 			'W', 'X', 'Y', 'Z', '-', '.', ' ', '$', '/', '+', '%',
    694. 

  694. 			'<', '=', '>', '?');
    695. 

  695. 		// translate special characters
    696. 

  696. 		$code = strtr($code, chr(128).chr(131).chr(129).chr(130), '<=>?');
    697. 

  697. 		$len = strlen($code);
    698. 

  698. 		// calculate check digit C
    699. 

  699. 		$p = 1;
    700. 

  700. 		$check = 0;
    701. 

  701. 		for ($i = ($len - 1); $i >= 0; --$i) {
    702. 

  702. 			$k = array_keys($chars, $code[$i]);
    703. 

  703. 			$check += ($k[0] * $p);
    704. 

  704. 			++$p;
    705. 

  705. 			if ($p > 20) {
    706. 

  706. 				$p = 1;
    707. 

  707. 			}
    708. 

  708. 		}
    709. 

  709. 		$check %= 47;
    710. 

  710. 		$c = $chars[$check];
    711. 

  711. 		$code .= $c;
    712. 

  712. 		// calculate check digit K
    713. 

  713. 		$p = 1;
    714. 

  714. 		$check = 0;
    715. 

  715. 		for ($i = $len; $i >= 0; --$i) {
    716. 

  716. 			$k = array_keys($chars, $code[$i]);
    717. 

  717. 			$check += ($k[0] * $p);
    718. 

  718. 			++$p;
    719. 

  719. 			if ($p > 15) {
    720. 

  720. 				$p = 1;
    721. 

  721. 			}
    722. 

  722. 		}
    723. 

  723. 		$check %= 47;
    724. 

  724. 		$k = $chars[$check];
    725. 

  725. 		$checksum = $c.$k;
    726. 

  726. 		// resto respecial characters
    727. 

  727. 		$checksum = strtr($checksum, '<=>?', chr(128).chr(131).chr(129).chr(130));
    728. 

  728. 		return $checksum;
    729. 

  729. 	}
    730. 

  730. 

  731. 	/**
    732. 

  732. 	 * Checksum for standard 2 of 5 barcodes.
    733. 

  733. 	 * @param $code (string) code to process.
    734. 

  734. 	 * @return int checksum.
    735. 

  735. 	 * @protected
    736. 

  736. 	 */
    737. 

  737. 	protected function checksum_s25($code) {
    738. 

  738. 		$len = strlen($code);
    739. 

  739. 		$sum = 0;
    740. 

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

  741. 			$sum += $code[$i];
    742. 

  742. 		}
    743. 

  743. 		$sum *= 3;
    744. 

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

  745. 			$sum += ($code[$i]);
    746. 

  746. 		}
    747. 

  747. 		$r = $sum % 10;
    748. 

  748. 		if($r > 0) {
    749. 

  749. 			$r = (10 - $r);
    750. 

  750. 		}
    751. 

  751. 		return $r;
    752. 

  752. 	}
    753. 

  753. 

  754. 	/**
    755. 

  755. 	 * MSI.
    756. 

  756. 	 * Variation of Plessey code, with similar applications
    757. 

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

  758. 	 * @param $code (string) code to represent.
    759. 

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

  760. 	 * @return array barcode representation.
    761. 

  761. 	 * @protected
    762. 

  762. 	 */
    763. 

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

  764. 		$chr['0'] = '100100100100';
    765. 

  765. 		$chr['1'] = '100100100110';
    766. 

  766. 		$chr['2'] = '100100110100';
    767. 

  767. 		$chr['3'] = '100100110110';
    768. 

  768. 		$chr['4'] = '100110100100';
    769. 

  769. 		$chr['5'] = '100110100110';
    770. 

  770. 		$chr['6'] = '100110110100';
    771. 

  771. 		$chr['7'] = '100110110110';
    772. 

  772. 		$chr['8'] = '110100100100';
    773. 

  773. 		$chr['9'] = '110100100110';
    774. 

  774. 		$chr['A'] = '110100110100';
    775. 

  775. 		$chr['B'] = '110100110110';
    776. 

  776. 		$chr['C'] = '110110100100';
    777. 

  777. 		$chr['D'] = '110110100110';
    778. 

  778. 		$chr['E'] = '110110110100';
    779. 

  779. 		$chr['F'] = '110110110110';
    780. 

  780. 		if ($checksum) {
    781. 

  781. 			// add checksum
    782. 

  782. 			$clen = strlen($code);
    783. 

  783. 			$p = 2;
    784. 

  784. 			$check = 0;
    785. 

  785. 			for ($i = ($clen - 1); $i >= 0; --$i) {
    786. 

  786. 				$check += (hexdec($code[$i]) * $p);
    787. 

  787. 				++$p;
    788. 

  788. 				if ($p > 7) {
    789. 

  789. 					$p = 2;
    790. 

  790. 				}
    791. 

  791. 			}
    792. 

  792. 			$check %= 11;
    793. 

  793. 			if ($check > 0) {
    794. 

  794. 				$check = 11 - $check;
    795. 

  795. 			}
    796. 

  796. 			$code .= $check;
    797. 

  797. 		}
    798. 

  798. 		$seq = '110'; // left guard
    799. 

  799. 		$clen = strlen($code);
    800. 

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

  801. 			$digit = $code[$i];
    802. 

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

  803. 				// invalid character
    804. 

  804. 				return false;
    805. 

  805. 			}
    806. 

  806. 			$seq .= $chr[$digit];
    807. 

  807. 		}
    808. 

  808. 		$seq .= '1001'; // right guard
    809. 

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

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

  811. 	}
    812. 

  812. 

  813. 	/**
    814. 

  814. 	 * Standard 2 of 5 barcodes.
    815. 

  815. 	 * Used in airline ticket marking, photofinishing
    816. 

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

  817. 	 * @param $code (string) code to represent.
    818. 

  818. 	 * @param $checksum (boolean) if true add a checksum to the code
    819. 

  819. 	 * @return array barcode representation.
    820. 

  820. 	 * @protected
    821. 

  821. 	 */
    822. 

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

  823. 		$chr['0'] = '10101110111010';
    824. 

  824. 		$chr['1'] = '11101010101110';
    825. 

  825. 		$chr['2'] = '10111010101110';
    826. 

  826. 		$chr['3'] = '11101110101010';
    827. 

  827. 		$chr['4'] = '10101110101110';
    828. 

  828. 		$chr['5'] = '11101011101010';
    829. 

  829. 		$chr['6'] = '10111011101010';
    830. 

  830. 		$chr['7'] = '10101011101110';
    831. 

  831. 		$chr['8'] = '10101110111010';
    832. 

  832. 		$chr['9'] = '10111010111010';
    833. 

  833. 		if ($checksum) {
    834. 

  834. 			// add checksum
    835. 

  835. 			$code .= $this->checksum_s25($code);
    836. 

  836. 		}
    837. 

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

  838. 			// add leading zero if code-length is odd
    839. 

  839. 			$code = '0'.$code;
    840. 

  840. 		}
    841. 

  841. 		$seq = '11011010';
    842. 

  842. 		$clen = strlen($code);
    843. 

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

  844. 			$digit = $code[$i];
    845. 

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

  846. 				// invalid character
    847. 

  847. 				return false;
    848. 

  848. 			}
    849. 

  849. 			$seq .= $chr[$digit];
    850. 

  850. 		}
    851. 

  851. 		$seq .= '1101011';
    852. 

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

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

  854. 	}
    855. 

  855. 

  856. 	/**
    857. 

  857. 	 * Convert binary barcode sequence to TCPDF barcode array.
    858. 

  858. 	 * @param $seq (string) barcode as binary sequence.
    859. 

  859. 	 * @param $bararray (array) barcode array.
    860. 

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

  861. 	 * @return array barcode representation.
    862. 

  862. 	 * @protected
    863. 

  863. 	 */
    864. 

  864. 	protected function binseq_to_array($seq, $bararray) {
    865. 

  865. 		$len = strlen($seq);
    866. 

  866. 		$w = 0;
    867. 

  867. 		$k = 0;
    868. 

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

  869. 			$w += 1;
    870. 

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

  871. 				if ($seq[$i] == '1') {
    872. 

  872. 					$t = true; // bar
    873. 

  873. 				} else {
    874. 

  874. 					$t = false; // space
    875. 

  875. 				}
    876. 

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

  877. 				$bararray['maxw'] += $w;
    878. 

  878. 				++$k;
    879. 

  879. 				$w = 0;
    880. 

  880. 			}
    881. 

  881. 		}
    882. 

  882. 		return $bararray;
    883. 

  883. 	}
    884. 

  884. 

  885. 	/**
    886. 

  886. 	 * Interleaved 2 of 5 barcodes.
    887. 

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

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

  889. 	 * @param $code (string) code to represent.
    890. 

  890. 	 * @param $checksum (boolean) if true add a checksum to the code
    891. 

  891. 	 * @return array barcode representation.
    892. 

  892. 	 * @protected
    893. 

  893. 	 */
    894. 

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

  895. 		$chr['0'] = '11221';
    896. 

  896. 		$chr['1'] = '21112';
    897. 

  897. 		$chr['2'] = '12112';
    898. 

  898. 		$chr['3'] = '22111';
    899. 

  899. 		$chr['4'] = '11212';
    900. 

  900. 		$chr['5'] = '21211';
    901. 

  901. 		$chr['6'] = '12211';
    902. 

  902. 		$chr['7'] = '11122';
    903. 

  903. 		$chr['8'] = '21121';
    904. 

  904. 		$chr['9'] = '12121';
    905. 

  905. 		$chr['A'] = '11';
    906. 

  906. 		$chr['Z'] = '21';
    907. 

  907. 		if ($checksum) {
    908. 

  908. 			// add checksum
    909. 

  909. 			$code .= $this->checksum_s25($code);
    910. 

  910. 		}
    911. 

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

  912. 			// add leading zero if code-length is odd
    913. 

  913. 			$code = '0'.$code;
    914. 

  914. 		}
    915. 

  915. 		// add start and stop codes
    916. 

  916. 		$code = 'AA'.strtolower($code).'ZA';
    917. 

  917. 

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

  919. 		$k = 0;
    920. 

  920. 		$clen = strlen($code);
    921. 

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

  922. 			$char_bar = $code[$i];
    923. 

  923. 			$char_space = $code[$i+1];
    924. 

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

  925. 				// invalid character
    926. 

  926. 				return false;
    927. 

  927. 			}
    928. 

  928. 			// create a bar-space sequence
    929. 

  929. 			$seq = '';
    930. 

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

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

  932. 				$seq .= $chr[$char_bar][$s] . $chr[$char_space][$s];
    933. 

  933. 			}
    934. 

  934. 			$seqlen = strlen($seq);
    935. 

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

  936. 				if (($j % 2) == 0) {
    937. 

  937. 					$t = true; // bar
    938. 

  938. 				} else {
    939. 

  939. 					$t = false; // space
    940. 

  940. 				}
    941. 

  941. 				$w = (float)$seq[$j];
    942. 

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

  943. 				$bararray['maxw'] += $w;
    944. 

  944. 				++$k;
    945. 

  945. 			}
    946. 

  946. 		}
    947. 

  947. 		return $bararray;
    948. 

  948. 	}
    949. 

  949. 

  950. 	/**
    951. 

  951. 	 * C128 barcodes.
    952. 

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

  953. 	 * @param $code (string) code to represent.
    954. 

  954. 	 * @param $type (string) barcode type: A, B, C or empty for automatic switch (AUTO mode)
    955. 

  955. 	 * @return array barcode representation.
    956. 

  956. 	 * @protected
    957. 

  957. 	 */
    958. 

  958. 	protected function barcode_c128($code, $type='') {
    959. 

  959. 		$chr = array(
    960. 

  960. 			'212222', /* 00 */
    961. 

  961. 			'222122', /* 01 */
    962. 

  962. 			'222221', /* 02 */
    963. 

  963. 			'121223', /* 03 */
    964. 

  964. 			'121322', /* 04 */
    965. 

  965. 			'131222', /* 05 */
    966. 

  966. 			'122213', /* 06 */
    967. 

  967. 			'122312', /* 07 */
    968. 

  968. 			'132212', /* 08 */
    969. 

  969. 			'221213', /* 09 */
    970. 

  970. 			'221312', /* 10 */
    971. 

  971. 			'231212', /* 11 */
    972. 

  972. 			'112232', /* 12 */
    973. 

  973. 			'122132', /* 13 */
    974. 

  974. 			'122231', /* 14 */
    975. 

  975. 			'113222', /* 15 */
    976. 

  976. 			'123122', /* 16 */
    977. 

  977. 			'123221', /* 17 */
    978. 

  978. 			'223211', /* 18 */
    979. 

  979. 			'221132', /* 19 */
    980. 

  980. 			'221231', /* 20 */
    981. 

  981. 			'213212', /* 21 */
    982. 

  982. 			'223112', /* 22 */
    983. 

  983. 			'312131', /* 23 */
    984. 

  984. 			'311222', /* 24 */
    985. 

  985. 			'321122', /* 25 */
    986. 

  986. 			'321221', /* 26 */
    987. 

  987. 			'312212', /* 27 */
    988. 

  988. 			'322112', /* 28 */
    989. 

  989. 			'322211', /* 29 */
    990. 

  990. 			'212123', /* 30 */
    991. 

  991. 			'212321', /* 31 */
    992. 

  992. 			'232121', /* 32 */
    993. 

  993. 			'111323', /* 33 */
    994. 

  994. 			'131123', /* 34 */
    995. 

  995. 			'131321', /* 35 */
    996. 

  996. 			'112313', /* 36 */
    997. 

  997. 			'132113', /* 37 */
    998. 

  998. 			'132311', /* 38 */
    999. 

  999. 			'211313', /* 39 */
    1000. 

  1000. 			'231113', /* 40 */
    1001. 

  1001. 			'231311', /* 41 */
    1002. 

  1002. 			'112133', /* 42 */
    1003. 

  1003. 			'112331', /* 43 */
    1004. 

  1004. 			'132131', /* 44 */
    1005. 

  1005. 			'113123', /* 45 */
    1006. 

  1006. 			'113321', /* 46 */
    1007. 

  1007. 			'133121', /* 47 */
    1008. 

  1008. 			'313121', /* 48 */
    1009. 

  1009. 			'211331', /* 49 */
    1010. 

  1010. 			'231131', /* 50 */
    1011. 

  1011. 			'213113', /* 51 */
    1012. 

  1012. 			'213311', /* 52 */
    1013. 

  1013. 			'213131', /* 53 */
    1014. 

  1014. 			'311123', /* 54 */
    1015. 

  1015. 			'311321', /* 55 */
    1016. 

  1016. 			'331121', /* 56 */
    1017. 

  1017. 			'312113', /* 57 */
    1018. 

  1018. 			'312311', /* 58 */
    1019. 

  1019. 			'332111', /* 59 */
    1020. 

  1020. 			'314111', /* 60 */
    1021. 

  1021. 			'221411', /* 61 */
    1022. 

  1022. 			'431111', /* 62 */
    1023. 

  1023. 			'111224', /* 63 */
    1024. 

  1024. 			'111422', /* 64 */
    1025. 

  1025. 			'121124', /* 65 */
    1026. 

  1026. 			'121421', /* 66 */
    1027. 

  1027. 			'141122', /* 67 */
    1028. 

  1028. 			'141221', /* 68 */
    1029. 

  1029. 			'112214', /* 69 */
    1030. 

  1030. 			'112412', /* 70 */
    1031. 

  1031. 			'122114', /* 71 */
    1032. 

  1032. 			'122411', /* 72 */
    1033. 

  1033. 			'142112', /* 73 */
    1034. 

  1034. 			'142211', /* 74 */
    1035. 

  1035. 			'241211', /* 75 */
    1036. 

  1036. 			'221114', /* 76 */
    1037. 

  1037. 			'413111', /* 77 */
    1038. 

  1038. 			'241112', /* 78 */
    1039. 

  1039. 			'134111', /* 79 */
    1040. 

  1040. 			'111242', /* 80 */
    1041. 

  1041. 			'121142', /* 81 */
    1042. 

  1042. 			'121241', /* 82 */
    1043. 

  1043. 			'114212', /* 83 */
    1044. 

  1044. 			'124112', /* 84 */
    1045. 

  1045. 			'124211', /* 85 */
    1046. 

  1046. 			'411212', /* 86 */
    1047. 

  1047. 			'421112', /* 87 */
    1048. 

  1048. 			'421211', /* 88 */
    1049. 

  1049. 			'212141', /* 89 */
    1050. 

  1050. 			'214121', /* 90 */
    1051. 

  1051. 			'412121', /* 91 */
    1052. 

  1052. 			'111143', /* 92 */
    1053. 

  1053. 			'111341', /* 93 */
    1054. 

  1054. 			'131141', /* 94 */
    1055. 

  1055. 			'114113', /* 95 */
    1056. 

  1056. 			'114311', /* 96 */
    1057. 

  1057. 			'411113', /* 97 */
    1058. 

  1058. 			'411311', /* 98 */
    1059. 

  1059. 			'113141', /* 99 */
    1060. 

  1060. 			'114131', /* 100 */
    1061. 

  1061. 			'311141', /* 101 */
    1062. 

  1062. 			'411131', /* 102 */
    1063. 

  1063. 			'211412', /* 103 START A */
    1064. 

  1064. 			'211214', /* 104 START B */
    1065. 

  1065. 			'211232', /* 105 START C */
    1066. 

  1066. 			'233111', /* STOP */
    1067. 

  1067. 			'200000'  /* END */
    1068. 

  1068. 		);
    1069. 

  1069. 		// ASCII characters for code A (ASCII 00 - 95)
    1070. 

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

  1071. 		$keys_a .= chr(0).chr(1).chr(2).chr(3).chr(4).chr(5).chr(6).chr(7).chr(8).chr(9);
    1072. 

  1072. 		$keys_a .= chr(10).chr(11).chr(12).chr(13).chr(14).chr(15).chr(16).chr(17).chr(18).chr(19);
    1073. 

  1073. 		$keys_a .= chr(20).chr(21).chr(22).chr(23).chr(24).chr(25).chr(26).chr(27).chr(28).chr(29);
    1074. 

  1074. 		$keys_a .= chr(30).chr(31);
    1075. 

  1075. 		// ASCII characters for code B (ASCII 32 - 127)
    1076. 

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

  1077. 		// special codes
    1078. 

  1078. 		$fnc_a = array(241 => 102, 242 => 97, 243 => 96, 244 => 101);
    1079. 

  1079. 		$fnc_b = array(241 => 102, 242 => 97, 243 => 96, 244 => 100);
    1080. 

  1080. 		// array of symbols
    1081. 

  1081. 		$code_data = array();
    1082. 

  1082. 		// length of the code
    1083. 

  1083. 		$len = strlen($code);
    1084. 

  1084. 		switch(strtoupper($type)) {
    1085. 

  1085. 			case 'A': { // MODE A
    1086. 

  1086. 				$startid = 103;
    1087. 

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

  1088. 					$char = $code[$i];
    1089. 

  1089. 					$char_id = ord($char);
    1090. 

  1090. 					if (($char_id >= 241) AND ($char_id <= 244)) {
    1091. 

  1091. 						$code_data[] = $fnc_a[$char_id];
    1092. 

  1092. 					} elseif (($char_id >= 0) AND ($char_id <= 95)) {
    1093. 

  1093. 						$code_data[] = strpos($keys_a, $char);
    1094. 

  1094. 					} else {
    1095. 

  1095. 						return false;
    1096. 

  1096. 					}
    1097. 

  1097. 				}
    1098. 

  1098. 				break;
    1099. 

  1099. 			}
    1100. 

  1100. 			case 'B': { // MODE B
    1101. 

  1101. 				$startid = 104;
    1102. 

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

  1103. 					$char = $code[$i];
    1104. 

  1104. 					$char_id = ord($char);
    1105. 

  1105. 					if (($char_id >= 241) AND ($char_id <= 244)) {
    1106. 

  1106. 						$code_data[] = $fnc_b[$char_id];
    1107. 

  1107. 					} elseif (($char_id >= 32) AND ($char_id <= 127)) {
    1108. 

  1108. 						$code_data[] = strpos($keys_b, $char);
    1109. 

  1109. 					} else {
    1110. 

  1110. 						return false;
    1111. 

  1111. 					}
    1112. 

  1112. 				}
    1113. 

  1113. 				break;
    1114. 

  1114. 			}
    1115. 

  1115. 			case 'C': { // MODE C
    1116. 

  1116. 				$startid = 105;
    1117. 

  1117. 				if (ord($code[0]) == 241) {
    1118. 

  1118. 					$code_data[] = 102;
    1119. 

  1119. 					$code = substr($code, 1);
    1120. 

  1120. 					--$len;
    1121. 

  1121. 				}
    1122. 

  1122. 				if (($len % 2) != 0) {
    1123. 

  1123. 					// the length must be even
    1124. 

  1124. 					return false;
    1125. 

  1125. 				}
    1126. 

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

  1127. 					$chrnum = $code[$i].$code[$i+1];
    1128. 

  1128. 					if (preg_match('/([0-9]{2})/', $chrnum) > 0) {
    1129. 

  1129. 						$code_data[] = intval($chrnum);
    1130. 

  1130. 					} else {
    1131. 

  1131. 						return false;
    1132. 

  1132. 					}
    1133. 

  1133. 				}
    1134. 

  1134. 				break;
    1135. 

  1135. 			}
    1136. 

  1136. 			default: { // MODE AUTO
    1137. 

  1137. 				// split code into sequences
    1138. 

  1138. 				$sequence = array();
    1139. 

  1139. 				// get numeric sequences (if any)
    1140. 

  1140. 				$numseq = array();
    1141. 

  1141. 				preg_match_all('/([0-9]{4,})/', $code, $numseq, PREG_OFFSET_CAPTURE);
    1142. 

  1142. 				if (isset($numseq[1]) AND !empty($numseq[1])) {
    1143. 

  1143. 					$end_offset = 0;
    1144. 

  1144. 					foreach ($numseq[1] as $val) {
    1145. 

  1145. 						$offset = $val[1];
    1146. 

  1146. 						if ($offset > $end_offset) {
    1147. 

  1147. 							// non numeric sequence
    1148. 

  1148. 							$sequence = array_merge($sequence, $this->get128ABsequence(substr($code, $end_offset, ($offset - $end_offset))));
    1149. 

  1149. 						}
    1150. 

  1150. 						// numeric sequence
    1151. 

  1151. 						$slen = strlen($val[0]);
    1152. 

  1152. 						if (($slen % 2) != 0) {
    1153. 

  1153. 							// the length must be even
    1154. 

  1154. 							--$slen;
    1155. 

  1155. 						}
    1156. 

  1156. 						$sequence[] = array('C', substr($code, $offset, $slen), $slen);
    1157. 

  1157. 						$end_offset = $offset + $slen;
    1158. 

  1158. 					}
    1159. 

  1159. 					if ($end_offset < $len) {
    1160. 

  1160. 						$sequence = array_merge($sequence, $this->get128ABsequence(substr($code, $end_offset)));
    1161. 

  1161. 					}
    1162. 

  1162. 				} else {
    1163. 

  1163. 					// text code (non C mode)
    1164. 

  1164. 					$sequence = array_merge($sequence, $this->get128ABsequence($code));
    1165. 

  1165. 				}
    1166. 

  1166. 				// process the sequence
    1167. 

  1167. 				foreach ($sequence as $key => $seq) {
    1168. 

  1168. 					switch($seq[0]) {
    1169. 

  1169. 						case 'A': {
    1170. 

  1170. 							if ($key == 0) {
    1171. 

  1171. 								$startid = 103;
    1172. 

  1172. 							} elseif ($sequence[($key - 1)][0] != 'A') {
    1173. 

  1173. 								if (($seq[2] == 1) AND ($key > 0) AND ($sequence[($key - 1)][0] == 'B') AND (!isset($sequence[($key - 1)][3]))) {
    1174. 

  1174. 									// single character shift
    1175. 

  1175. 									$code_data[] = 98;
    1176. 

  1176. 									// mark shift
    1177. 

  1177. 									$sequence[$key][3] = true;
    1178. 

  1178. 								} elseif (!isset($sequence[($key - 1)][3])) {
    1179. 

  1179. 									$code_data[] = 101;
    1180. 

  1180. 								}
    1181. 

  1181. 							}
    1182. 

  1182. 							for ($i = 0; $i < $seq[2]; ++$i) {
    1183. 

  1183. 								$char = $seq[1][$i];
    1184. 

  1184. 								$char_id = ord($char);
    1185. 

  1185. 								if (($char_id >= 241) AND ($char_id <= 244)) {
    1186. 

  1186. 									$code_data[] = $fnc_a[$char_id];
    1187. 

  1187. 								} else {
    1188. 

  1188. 									$code_data[] = strpos($keys_a, $char);
    1189. 

  1189. 								}
    1190. 

  1190. 							}
    1191. 

  1191. 							break;
    1192. 

  1192. 						}
    1193. 

  1193. 						case 'B': {
    1194. 

  1194. 							if ($key == 0) {
    1195. 

  1195. 								$tmpchr = ord($seq[1][0]);
    1196. 

  1196. 								if (($seq[2] == 1) AND ($tmpchr >= 241) AND ($tmpchr <= 244) AND isset($sequence[($key + 1)]) AND ($sequence[($key + 1)][0] != 'B')) {
    1197. 

  1197. 									switch ($sequence[($key + 1)][0]) {
    1198. 

  1198. 										case 'A': {
    1199. 

  1199. 											$startid = 103;
    1200. 

  1200. 											$sequence[$key][0] = 'A';
    1201. 

  1201. 											$code_data[] = $fnc_a[$tmpchr];
    1202. 

  1202. 											break;
    1203. 

  1203. 										}
    1204. 

  1204. 										case 'C': {
    1205. 

  1205. 											$startid = 105;
    1206. 

  1206. 											$sequence[$key][0] = 'C';
    1207. 

  1207. 											$code_data[] = $fnc_a[$tmpchr];
    1208. 

  1208. 											break;
    1209. 

  1209. 										}
    1210. 

  1210. 									}
    1211. 

  1211. 									break;
    1212. 

  1212. 								} else {
    1213. 

  1213. 									$startid = 104;
    1214. 

  1214. 								}
    1215. 

  1215. 							} elseif ($sequence[($key - 1)][0] != 'B') {
    1216. 

  1216. 								if (($seq[2] == 1) AND ($key > 0) AND ($sequence[($key - 1)][0] == 'A') AND (!isset($sequence[($key - 1)][3]))) {
    1217. 

  1217. 									// single character shift
    1218. 

  1218. 									$code_data[] = 98;
    1219. 

  1219. 									// mark shift
    1220. 

  1220. 									$sequence[$key][3] = true;
    1221. 

  1221. 								} elseif (!isset($sequence[($key - 1)][3])) {
    1222. 

  1222. 									$code_data[] = 100;
    1223. 

  1223. 								}
    1224. 

  1224. 							}
    1225. 

  1225. 							for ($i = 0; $i < $seq[2]; ++$i) {
    1226. 

  1226. 								$char = $seq[1][$i];
    1227. 

  1227. 								$char_id = ord($char);
    1228. 

  1228. 								if (($char_id >= 241) AND ($char_id <= 244)) {
    1229. 

  1229. 									$code_data[] = $fnc_b[$char_id];
    1230. 

  1230. 								} else {
    1231. 

  1231. 									$code_data[] = strpos($keys_b, $char);
    1232. 

  1232. 								}
    1233. 

  1233. 							}
    1234. 

  1234. 							break;
    1235. 

  1235. 						}
    1236. 

  1236. 						case 'C': {
    1237. 

  1237. 							if ($key == 0) {
    1238. 

  1238. 								$startid = 105;
    1239. 

  1239. 							} elseif ($sequence[($key - 1)][0] != 'C') {
    1240. 

  1240. 								$code_data[] = 99;
    1241. 

  1241. 							}
    1242. 

  1242. 							for ($i = 0; $i < $seq[2]; $i+=2) {
    1243. 

  1243. 								$chrnum = $seq[1][$i].$seq[1][$i+1];
    1244. 

  1244. 								$code_data[] = intval($chrnum);
    1245. 

  1245. 							}
    1246. 

  1246. 							break;
    1247. 

  1247. 						}
    1248. 

  1248. 					}
    1249. 

  1249. 				}
    1250. 

  1250. 			}
    1251. 

  1251. 		}
    1252. 

  1252. 		// calculate check character
    1253. 

  1253. 		$sum = $startid;
    1254. 

  1254. 		foreach ($code_data as $key => $val) {
    1255. 

  1255. 			$sum += ($val * ($key + 1));
    1256. 

  1256. 		}
    1257. 

  1257. 		// add check character
    1258. 

  1258. 		$code_data[] = ($sum % 103);
    1259. 

  1259. 		// add stop sequence
    1260. 

  1260. 		$code_data[] = 106;
    1261. 

  1261. 		$code_data[] = 107;
    1262. 

  1262. 		// add start code at the beginning
    1263. 

  1263. 		array_unshift($code_data, $startid);
    1264. 

  1264. 		// build barcode array
    1265. 

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

  1266. 		foreach ($code_data as $val) {
    1267. 

  1267. 			$seq = $chr[$val];
    1268. 

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

  1269. 				if (($j % 2) == 0) {
    1270. 

  1270. 					$t = true; // bar
    1271. 

  1271. 				} else {
    1272. 

  1272. 					$t = false; // space
    1273. 

  1273. 				}
    1274. 

  1274. 				$w = (float)$seq[$j];
    1275. 

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

  1276. 				$bararray['maxw'] += $w;
    1277. 

  1277. 			}
    1278. 

  1278. 		}
    1279. 

  1279. 		return $bararray;
    1280. 

  1280. 	}
    1281. 

  1281. 

  1282. 	/**
    1283. 

  1283. 	 * Split text code in A/B sequence for 128 code
    1284. 

  1284. 	 * @param $code (string) code to split.
    1285. 

  1285. 	 * @return array sequence
    1286. 

  1286. 	 * @protected
    1287. 

  1287. 	 */
    1288. 

  1288. 	protected function get128ABsequence($code) {
    1289. 

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

  1290. 		$sequence = array();
    1291. 

  1291. 		// get A sequences (if any)
    1292. 

  1292. 		$numseq = array();
    1293. 

  1293. 		preg_match_all('/([\0-\31])/', $code, $numseq, PREG_OFFSET_CAPTURE);
    1294. 

  1294. 		if (isset($numseq[1]) AND !empty($numseq[1])) {
    1295. 

  1295. 			$end_offset = 0;
    1296. 

  1296. 			foreach ($numseq[1] as $val) {
    1297. 

  1297. 				$offset = $val[1];
    1298. 

  1298. 				if ($offset > $end_offset) {
    1299. 

  1299. 					// B sequence
    1300. 

  1300. 					$sequence[] = array('B', substr($code, $end_offset, ($offset - $end_offset)), ($offset - $end_offset));
    1301. 

  1301. 				}
    1302. 

  1302. 				// A sequence
    1303. 

  1303. 				$slen = strlen($val[0]);
    1304. 

  1304. 				$sequence[] = array('A', substr($code, $offset, $slen), $slen);
    1305. 

  1305. 				$end_offset = $offset + $slen;
    1306. 

  1306. 			}
    1307. 

  1307. 			if ($end_offset < $len) {
    1308. 

  1308. 				$sequence[] = array('B', substr($code, $end_offset), ($len - $end_offset));
    1309. 

  1309. 			}
    1310. 

  1310. 		} else {
    1311. 

  1311. 			// only B sequence
    1312. 

  1312. 			$sequence[] = array('B', $code, $len);
    1313. 

  1313. 		}
    1314. 

  1314. 		return $sequence;
    1315. 

  1315. 	}
    1316. 

  1316. 

  1317. 	/**
    1318. 

  1318. 	 * EAN13 and UPC-A barcodes.
    1319. 

  1319. 	 * EAN13: European Article Numbering international retail product code
    1320. 

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

  1321. 	 * UPC-E: Short version of UPC symbol
    1322. 

  1322. 	 * @param $code (string) code to represent.
    1323. 

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

  1324. 	 * @return array barcode representation.
    1325. 

  1325. 	 * @protected
    1326. 

  1326. 	 */
    1327. 

  1327. 	protected function barcode_eanupc($code, $len=13) {
    1328. 

  1328. 		$upce = false;
    1329. 

  1329. 		if ($len == 6) {
    1330. 

  1330. 			$len = 12; // UPC-A
    1331. 

  1331. 			$upce = true; // UPC-E mode
    1332. 

  1332. 		}
    1333. 

  1333. 		$data_len = $len - 1;
    1334. 

  1334. 		//Padding
    1335. 

  1335. 		$code = str_pad($code, $data_len, '0', STR_PAD_LEFT);
    1336. 

  1336. 		$code_len = strlen($code);
    1337. 

  1337. 		// calculate check digit
    1338. 

  1338. 		$sum_a = 0;
    1339. 

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

  1340. 			$sum_a += $code[$i];
    1341. 

  1341. 		}
    1342. 

  1342. 		if ($len > 12) {
    1343. 

  1343. 			$sum_a *= 3;
    1344. 

  1344. 		}
    1345. 

  1345. 		$sum_b = 0;
    1346. 

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

  1347. 			$sum_b += ($code[$i]);
    1348. 

  1348. 		}
    1349. 

  1349. 		if ($len < 13) {
    1350. 

  1350. 			$sum_b *= 3;
    1351. 

  1351. 		}
    1352. 

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

  1353. 		if($r > 0) {
    1354. 

  1354. 			$r = (10 - $r);
    1355. 

  1355. 		}
    1356. 

  1356. 		if ($code_len == $data_len) {
    1357. 

  1357. 			// add check digit
    1358. 

  1358. 			$code .= $r;
    1359. 

  1359. 		} elseif ($r !== intval($code[$data_len])) {
    1360. 

  1360. 			// wrong checkdigit
    1361. 

  1361. 			return false;
    1362. 

  1362. 		}
    1363. 

  1363. 		if ($len == 12) {
    1364. 

  1364. 			// UPC-A
    1365. 

  1365. 			$code = '0'.$code;
    1366. 

  1366. 			++$len;
    1367. 

  1367. 		}
    1368. 

  1368. 		if ($upce) {
    1369. 

  1369. 			// convert UPC-A to UPC-E
    1370. 

  1370. 			$tmp = substr($code, 4, 3);
    1371. 

  1371. 			if (($tmp == '000') OR ($tmp == '100') OR ($tmp == '200')) {
    1372. 

  1372. 				// manufacturer code ends in 000, 100, or 200
    1373. 

  1373. 				$upce_code = substr($code, 2, 2).substr($code, 9, 3).substr($code, 4, 1);
    1374. 

  1374. 			} else {
    1375. 

  1375. 				$tmp = substr($code, 5, 2);
    1376. 

  1376. 				if ($tmp == '00') {
    1377. 

  1377. 					// manufacturer code ends in 00
    1378. 

  1378. 					$upce_code = substr($code, 2, 3).substr($code, 10, 2).'3';
    1379. 

  1379. 				} else {
    1380. 

  1380. 					$tmp = substr($code, 6, 1);
    1381. 

  1381. 					if ($tmp == '0') {
    1382. 

  1382. 						// manufacturer code ends in 0
    1383. 

  1383. 						$upce_code = substr($code, 2, 4).substr($code, 11, 1).'4';
    1384. 

  1384. 					} else {
    1385. 

  1385. 						// manufacturer code does not end in zero
    1386. 

  1386. 						$upce_code = substr($code, 2, 5).substr($code, 11, 1);
    1387. 

  1387. 					}
    1388. 

  1388. 				}
    1389. 

  1389. 			}
    1390. 

  1390. 		}
    1391. 

  1391. 		//Convert digits to bars
    1392. 

  1392. 		$codes = array(
    1393. 

  1393. 			'A'=>array( // left odd parity
    1394. 

  1394. 				'0'=>'0001101',
    1395. 

  1395. 				'1'=>'0011001',
    1396. 

  1396. 				'2'=>'0010011',
    1397. 

  1397. 				'3'=>'0111101',
    1398. 

  1398. 				'4'=>'0100011',
    1399. 

  1399. 				'5'=>'0110001',
    1400. 

  1400. 				'6'=>'0101111',
    1401. 

  1401. 				'7'=>'0111011',
    1402. 

  1402. 				'8'=>'0110111',
    1403. 

  1403. 				'9'=>'0001011'),
    1404. 

  1404. 			'B'=>array( // left even parity
    1405. 

  1405. 				'0'=>'0100111',
    1406. 

  1406. 				'1'=>'0110011',
    1407. 

  1407. 				'2'=>'0011011',
    1408. 

  1408. 				'3'=>'0100001',
    1409. 

  1409. 				'4'=>'0011101',
    1410. 

  1410. 				'5'=>'0111001',
    1411. 

  1411. 				'6'=>'0000101',
    1412. 

  1412. 				'7'=>'0010001',
    1413. 

  1413. 				'8'=>'0001001',
    1414. 

  1414. 				'9'=>'0010111'),
    1415. 

  1415. 			'C'=>array( // right
    1416. 

  1416. 				'0'=>'1110010',
    1417. 

  1417. 				'1'=>'1100110',
    1418. 

  1418. 				'2'=>'1101100',
    1419. 

  1419. 				'3'=>'1000010',
    1420. 

  1420. 				'4'=>'1011100',
    1421. 

  1421. 				'5'=>'1001110',
    1422. 

  1422. 				'6'=>'1010000',
    1423. 

  1423. 				'7'=>'1000100',
    1424. 

  1424. 				'8'=>'1001000',
    1425. 

  1425. 				'9'=>'1110100')
    1426. 

  1426. 		);
    1427. 

  1427. 		$parities = array(
    1428. 

  1428. 			'0'=>array('A','A','A','A','A','A'),
    1429. 

  1429. 			'1'=>array('A','A','B','A','B','B'),
    1430. 

  1430. 			'2'=>array('A','A','B','B','A','B'),
    1431. 

  1431. 			'3'=>array('A','A','B','B','B','A'),
    1432. 

  1432. 			'4'=>array('A','B','A','A','B','B'),
    1433. 

  1433. 			'5'=>array('A','B','B','A','A','B'),
    1434. 

  1434. 			'6'=>array('A','B','B','B','A','A'),
    1435. 

  1435. 			'7'=>array('A','B','A','B','A','B'),
    1436. 

  1436. 			'8'=>array('A','B','A','B','B','A'),
    1437. 

  1437. 			'9'=>array('A','B','B','A','B','A')
    1438. 

  1438. 		);
    1439. 

  1439. 		$upce_parities = array();
    1440. 

  1440. 		$upce_parities[0] = array(
    1441. 

  1441. 			'0'=>array('B','B','B','A','A','A'),
    1442. 

  1442. 			'1'=>array('B','B','A','B','A','A'),
    1443. 

  1443. 			'2'=>array('B','B','A','A','B','A'),
    1444. 

  1444. 			'3'=>array('B','B','A','A','A','B'),
    1445. 

  1445. 			'4'=>array('B','A','B','B','A','A'),
    1446. 

  1446. 			'5'=>array('B','A','A','B','B','A'),
    1447. 

  1447. 			'6'=>array('B','A','A','A','B','B'),
    1448. 

  1448. 			'7'=>array('B','A','B','A','B','A'),
    1449. 

  1449. 			'8'=>array('B','A','B','A','A','B'),
    1450. 

  1450. 			'9'=>array('B','A','A','B','A','B')
    1451. 

  1451. 		);
    1452. 

  1452. 		$upce_parities[1] = array(
    1453. 

  1453. 			'0'=>array('A','A','A','B','B','B'),
    1454. 

  1454. 			'1'=>array('A','A','B','A','B','B'),
    1455. 

  1455. 			'2'=>array('A','A','B','B','A','B'),
    1456. 

  1456. 			'3'=>array('A','A','B','B','B','A'),
    1457. 

  1457. 			'4'=>array('A','B','A','A','B','B'),
    1458. 

  1458. 			'5'=>array('A','B','B','A','A','B'),
    1459. 

  1459. 			'6'=>array('A','B','B','B','A','A'),
    1460. 

  1460. 			'7'=>array('A','B','A','B','A','B'),
    1461. 

  1461. 			'8'=>array('A','B','A','B','B','A'),
    1462. 

  1462. 			'9'=>array('A','B','B','A','B','A')
    1463. 

  1463. 		);
    1464. 

  1464. 		$k = 0;
    1465. 

  1465. 		$seq = '101'; // left guard bar
    1466. 

  1466. 		if ($upce) {
    1467. 

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

  1468. 			$p = $upce_parities[$code[1]][$r];
    1469. 

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

  1470. 				$seq .= $codes[$p[$i]][$upce_code[$i]];
    1471. 

  1471. 			}
    1472. 

  1472. 			$seq .= '010101'; // right guard bar
    1473. 

  1473. 		} else {
    1474. 

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

  1475. 			$half_len = intval(ceil($len / 2));
    1476. 

  1476. 			if ($len == 8) {
    1477. 

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

  1478. 					$seq .= $codes['A'][$code[$i]];
    1479. 

  1479. 				}
    1480. 

  1480. 			} else {
    1481. 

  1481. 				$p = $parities[$code[0]];
    1482. 

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

  1483. 					$seq .= $codes[$p[$i-1]][$code[$i]];
    1484. 

  1484. 				}
    1485. 

  1485. 			}
    1486. 

  1486. 			$seq .= '01010'; // center guard bar
    1487. 

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

  1488. 				$seq .= $codes['C'][$code[$i]];
    1489. 

  1489. 			}
    1490. 

  1490. 			$seq .= '101'; // right guard bar
    1491. 

  1491. 		}
    1492. 

  1492. 		$clen = strlen($seq);
    1493. 

  1493. 		$w = 0;
    1494. 

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

  1495. 			$w += 1;
    1496. 

  1496. 			if (($i == ($clen - 1)) OR (($i < ($clen - 1)) AND ($seq[$i] != $seq[$i+1]))) {
    1497. 

  1497. 				if ($seq[$i] == '1') {
    1498. 

  1498. 					$t = true; // bar
    1499. 

  1499. 				} else {
    1500. 

  1500. 					$t = false; // space
    1501. 

  1501. 				}
    1502. 

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

  1503. 				$bararray['maxw'] += $w;
    1504. 

  1504. 				++$k;
    1505. 

  1505. 				$w = 0;
    1506. 

  1506. 			}
    1507. 

  1507. 		}
    1508. 

  1508. 		return $bararray;
    1509. 

  1509. 	}
    1510. 

  1510. 

  1511. 	/**
    1512. 

  1512. 	 * UPC-Based Extensions
    1513. 

  1513. 	 * 2-Digit Ext.: Used to indicate magazines and newspaper issue numbers
    1514. 

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

  1515. 	 * @param $code (string) code to represent.
    1516. 

  1516. 	 * @param $len (string) barcode type: 2 = 2-Digit, 5 = 5-Digit
    1517. 

  1517. 	 * @return array barcode representation.
    1518. 

  1518. 	 * @protected
    1519. 

  1519. 	 */
    1520. 

  1520. 	protected function barcode_eanext($code, $len=5) {
    1521. 

  1521. 		//Padding
    1522. 

  1522. 		$code = str_pad($code, $len, '0', STR_PAD_LEFT);
    1523. 

  1523. 		// calculate check digit
    1524. 

  1524. 		if ($len == 2) {
    1525. 

  1525. 			$r = $code % 4;
    1526. 

  1526. 		} elseif ($len == 5) {
    1527. 

  1527. 			$r = (3 * ($code[0] + $code[2] + $code[4])) + (9 * ($code[1] + $code[3]));
    1528. 

  1528. 			$r %= 10;
    1529. 

  1529. 		} else {
    1530. 

  1530. 			return false;
    1531. 

  1531. 		}
    1532. 

  1532. 		//Convert digits to bars
    1533. 

  1533. 		$codes = array(
    1534. 

  1534. 			'A'=>array( //…
    1535.

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