Search moodle.org's
Developer Documentation

See Release Notes

  • Bug fixes for general core bugs in 4.3.x will end 7 October 2024 (12 months).
  • Bug fixes for security issues in 4.3.x will end 21 April 2025 (18 months).
  • PHP version: minimum PHP 8.0.0 Note: minimum PHP version has increased since Moodle 4.1. PHP 8.2.x is supported too.

Differences Between: [Versions 310 and 403] [Versions 311 and 403] [Versions 39 and 403] [Versions 400 and 403]

   1  <?php
   2  //============================================================+
   3  // File name   : tcpdf_barcodes_1d.php
   4  // Version     : 1.0.027
   5  // Begin       : 2008-06-09
   6  // Last Update : 2014-10-20
   7  // Author      : Nicola Asuni - Tecnick.com LTD - www.tecnick.com - info@tecnick.com
   8  // License     : GNU-LGPL v3 (http://www.gnu.org/copyleft/lesser.html)
   9  // -------------------------------------------------------------------
  10  // Copyright (C) 2008-2014 Nicola Asuni - Tecnick.com LTD
  11  //
  12  // This file is part of TCPDF software library.
  13  //
  14  // TCPDF is free software: you can redistribute it and/or modify it
  15  // under the terms of the GNU Lesser General Public License as
  16  // published by the Free Software Foundation, either version 3 of the
  17  // License, or (at your option) any later version.
  18  //
  19  // TCPDF is distributed in the hope that it will be useful, but
  20  // WITHOUT ANY WARRANTY; without even the implied warranty of
  21  // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  22  // See the GNU Lesser General Public License for more details.
  23  //
  24  // You should have received a copy of the GNU Lesser General Public License
  25  // along with TCPDF.  If not, see <http://www.gnu.org/licenses/>.
  26  //
  27  // See LICENSE.TXT file for more information.
  28  // -------------------------------------------------------------------
  29  //
  30  // Description : PHP class to creates array representations for
  31  //               common 1D barcodes to be used with TCPDF.
  32  //
  33  //============================================================+
  34  
  35  /**
  36   * @file
  37   * PHP class to creates array representations for common 1D barcodes to be used with TCPDF.
  38   * @package com.tecnick.tcpdf
  39   * @author Nicola Asuni
  40   * @version 1.0.027
  41   */
  42  
  43  /**
  44   * @class TCPDFBarcode
  45   * PHP class to creates array representations for common 1D barcodes to be used with TCPDF (http://www.tcpdf.org).<br>
  46   * @package com.tecnick.tcpdf
  47   * @version 1.0.027
  48   * @author Nicola Asuni
  49   */
  50  class TCPDFBarcode {
  51  
  52  	 /**
  53  	  * Array representation of barcode.
  54  	  * @protected
  55  	  */
  56  	 protected $barcode_array = array();
  57  
  58  	 /**
  59  	  * This is the class constructor.
  60  	  * Return an array representations for common 1D barcodes:<ul>
  61  	  * <li>$arrcode['code'] code to be printed on text label</li>
  62  	  * <li>$arrcode['maxh'] max barcode height</li>
  63  	  * <li>$arrcode['maxw'] max barcode width</li>
  64  	  * <li>$arrcode['bcode'][$k] single bar or space in $k position</li>
  65  	  * <li>$arrcode['bcode'][$k]['t'] bar type: true = bar, false = space.</li>
  66  	  * <li>$arrcode['bcode'][$k]['w'] bar width in units.</li>
  67  	  * <li>$arrcode['bcode'][$k]['h'] bar height in units.</li>
  68  	  * <li>$arrcode['bcode'][$k]['p'] bar top position (0 = top, 1 = middle)</li></ul>
  69  	  * @param string $code code to print
  70   	  * @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>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   	  * @public
  72  	  */
  73  	public function __construct($code, $type) {
  74  	 	 $this->setBarcode($code, $type);
  75  	 }
  76  
  77  	 /**
  78  	  * Return an array representations of barcode.
  79   	  * @return array
  80   	  * @public
  81  	  */
  82  	public function getBarcodeArray() {
  83  	 	 return $this->barcode_array;
  84  	 }
  85  
  86  	 /**
  87  	  * Send barcode as SVG image object to the standard output.
  88  	  * @param int $w Minimum width of a single bar in user units.
  89  	  * @param int $h Height of barcode in user units.
  90  	  * @param string $color Foreground color (in SVG format) for bar elements (background is transparent).
  91   	  * @public
  92  	  */
  93  	public function getBarcodeSVG($w=2, $h=30, $color='black') {
  94  	 	 // send headers
  95  	 	 $code = $this->getBarcodeSVGcode($w, $h, $color);
  96  	 	 header('Content-Type: application/svg+xml');
  97  	 	 header('Cache-Control: public, must-revalidate, max-age=0'); // HTTP/1.1
  98  	 	 header('Pragma: public');
  99  	 	 header('Expires: Sat, 26 Jul 1997 05:00:00 GMT'); // Date in the past
 100  	 	 header('Last-Modified: '.gmdate('D, d M Y H:i:s').' GMT');
 101  	 	 header('Content-Disposition: inline; filename="'.md5($code).'.svg";');
 102  	 	 //header('Content-Length: '.strlen($code));
 103  	 	 echo $code;
 104  	 }
 105  
 106  	 /**
 107  	  * Return a SVG string representation of barcode.
 108  	  * @param int $w Minimum width of a single bar in user units.
 109  	  * @param int $h Height of barcode in user units.
 110  	  * @param string $color Foreground color (in SVG format) for bar elements (background is transparent).
 111   	  * @return string SVG code.
 112   	  * @public
 113  	  */
 114  	public function getBarcodeSVGcode($w=2, $h=30, $color='black') {
 115  	 	 // replace table for special characters
 116  	 	 $repstr = array("\0" => '', '&' => '&amp;', '<' => '&lt;', '>' => '&gt;');
 117  	 	 $svg = '<'.'?'.'xml version="1.0" standalone="no"'.'?'.'>'."\n";
 118  	 	 $svg .= '<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN" "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">'."\n";
 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  	 	 $svg .= "\t".'<desc>'.strtr($this->barcode_array['code'], $repstr).'</desc>'."\n";
 121  	 	 $svg .= "\t".'<g id="bars" fill="'.$color.'" stroke="none">'."\n";
 122  	 	 // print bars
 123  	 	 $x = 0;
 124  	 	 foreach ($this->barcode_array['bcode'] as $k => $v) {
 125  	 	 	 $bw = round(($v['w'] * $w), 3);
 126  	 	 	 $bh = round(($v['h'] * $h / $this->barcode_array['maxh']), 3);
 127  	 	 	 if ($v['t']) {
 128  	 	 	 	 $y = round(($v['p'] * $h / $this->barcode_array['maxh']), 3);
 129  	 	 	 	 // draw a vertical bar
 130  	 	 	 	 $svg .= "\t\t".'<rect x="'.$x.'" y="'.$y.'" width="'.$bw.'" height="'.$bh.'" />'."\n";
 131  	 	 	 }
 132  	 	 	 $x += $bw;
 133  	 	 }
 134  	 	 $svg .= "\t".'</g>'."\n";
 135  	 	 $svg .= '</svg>'."\n";
 136  	 	 return $svg;
 137  	 }
 138  
 139  	 /**
 140  	  * Return an HTML representation of barcode.
 141  	  * @param int $w Width of a single bar element in pixels.
 142  	  * @param int $h Height of a single bar element in pixels.
 143  	  * @param string $color Foreground color for bar elements (background is transparent).
 144   	  * @return string HTML code.
 145   	  * @public
 146  	  */
 147  	public function getBarcodeHTML($w=2, $h=30, $color='black') {
 148  	 	 $html = '<div style="font-size:0;position:relative;width:'.($this->barcode_array['maxw'] * $w).'px;height:'.($h).'px;">'."\n";
 149  	 	 // print bars
 150  	 	 $x = 0;
 151  	 	 foreach ($this->barcode_array['bcode'] as $k => $v) {
 152  	 	 	 $bw = round(($v['w'] * $w), 3);
 153  	 	 	 $bh = round(($v['h'] * $h / $this->barcode_array['maxh']), 3);
 154  	 	 	 if ($v['t']) {
 155  	 	 	 	 $y = round(($v['p'] * $h / $this->barcode_array['maxh']), 3);
 156  	 	 	 	 // draw a vertical bar
 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  	 	 	 }
 159  	 	 	 $x += $bw;
 160  	 	 }
 161  	 	 $html .= '</div>'."\n";
 162  	 	 return $html;
 163  	 }
 164  
 165  	 /**
 166  	  * Send a PNG image representation of barcode (requires GD or Imagick library).
 167  	  * @param int $w Width of a single bar element in pixels.
 168  	  * @param int $h Height of a single bar element in pixels.
 169  	  * @param array $color RGB (0-255) foreground color for bar elements (background is transparent).
 170   	  * @public
 171  	  */
 172  	public function getBarcodePNG($w=2, $h=30, $color=array(0,0,0)) {
 173  	 	 $data = $this->getBarcodePngData($w, $h, $color);
 174  	 	 // send headers
 175  	 	 header('Content-Type: image/png');
 176  	 	 header('Cache-Control: public, must-revalidate, max-age=0'); // HTTP/1.1
 177  	 	 header('Pragma: public');
 178  	 	 header('Expires: Sat, 26 Jul 1997 05:00:00 GMT'); // Date in the past
 179  	 	 header('Last-Modified: '.gmdate('D, d M Y H:i:s').' GMT');
 180  	 	 //header('Content-Length: '.strlen($data));
 181  	 	 echo $data;
 182  	 }
 183  
 184  	 /**
 185  	  * Return a PNG image representation of barcode (requires GD or Imagick library).
 186  	  * @param int $w Width of a single bar element in pixels.
 187  	  * @param int $h Height of a single bar element in pixels.
 188  	  * @param array $color RGB (0-255) foreground color for bar elements (background is transparent).
 189   	  * @return string|Imagick|false image or false in case of error.
 190   	  * @public
 191  	  */
 192  	public function getBarcodePngData($w=2, $h=30, $color=array(0,0,0)) {
 193  	 	 // calculate image size
 194  	 	 $width = ($this->barcode_array['maxw'] * $w);
 195  	 	 $height = $h;
 196  	 	 if (function_exists('imagecreate')) {
 197  	 	 	 // GD library
 198  	 	 	 $imagick = false;
 199  	 	 	 $png = imagecreate($width, $height);
 200  	 	 	 $bgcol = imagecolorallocate($png, 255, 255, 255);
 201  	 	 	 imagecolortransparent($png, $bgcol);
 202  	 	 	 $fgcol = imagecolorallocate($png, $color[0], $color[1], $color[2]);
 203  	 	 } elseif (extension_loaded('imagick')) {
 204  	 	 	 $imagick = true;
 205  	 	 	 $bgcol = new imagickpixel('rgb(255,255,255');
 206  	 	 	 $fgcol = new imagickpixel('rgb('.$color[0].','.$color[1].','.$color[2].')');
 207  	 	 	 $png = new Imagick();
 208  	 	 	 $png->newImage($width, $height, 'none', 'png');
 209  	 	 	 $bar = new imagickdraw();
 210  	 	 	 $bar->setfillcolor($fgcol);
 211  	 	 } else {
 212  	 	 	 return false;
 213  	 	 }
 214  	 	 // print bars
 215  	 	 $x = 0;
 216  	 	 foreach ($this->barcode_array['bcode'] as $k => $v) {
 217  	 	 	 $bw = round(($v['w'] * $w), 3);
 218  	 	 	 $bh = round(($v['h'] * $h / $this->barcode_array['maxh']), 3);
 219  	 	 	 if ($v['t']) {
 220  	 	 	 	 $y = round(($v['p'] * $h / $this->barcode_array['maxh']), 3);
 221  	 	 	 	 // draw a vertical bar
 222  	 	 	 	 if ($imagick) {
 223  	 	 	 	 	 $bar->rectangle($x, $y, ($x + $bw - 1), ($y + $bh - 1));
 224  	 	 	 	 } else {
 225  	 	 	 	 	 imagefilledrectangle($png, $x, $y, ($x + $bw - 1), ($y + $bh - 1), $fgcol);
 226  	 	 	 	 }
 227  	 	 	 }
 228  	 	 	 $x += $bw;
 229  	 	 }
 230  	 	 if ($imagick) {
 231  	 	 	 $png->drawimage($bar);
 232  	 	 	 return $png;
 233  	 	 } else {
 234  	 	 	 ob_start();
 235  	 	 	 imagepng($png);
 236  	 	 	 $imagedata = ob_get_clean();
 237  	 	 	 imagedestroy($png);
 238  	 	 	 return $imagedata;
 239  	 	 }
 240  	 }
 241  
 242  	 /**
 243  	  * Set the barcode.
 244  	  * @param string $code code to print
 245   	  * @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>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   	  * @return void
 247   	  * @public
 248  	  */
 249  	public function setBarcode($code, $type) {
 250  	 	 switch (strtoupper($type)) {
 251  	 	 	 case 'C39': { // CODE 39 - ANSI MH10.8M-1983 - USD-3 - 3 of 9.
 252  	 	 	 	 $arrcode = $this->barcode_code39($code, false, false);
 253  	 	 	 	 break;
 254  	 	 	 }
 255  	 	 	 case 'C39+': { // CODE 39 with checksum
 256  	 	 	 	 $arrcode = $this->barcode_code39($code, false, true);
 257  	 	 	 	 break;
 258  	 	 	 }
 259  	 	 	 case 'C39E': { // CODE 39 EXTENDED
 260  	 	 	 	 $arrcode = $this->barcode_code39($code, true, false);
 261  	 	 	 	 break;
 262  	 	 	 }
 263  	 	 	 case 'C39E+': { // CODE 39 EXTENDED + CHECKSUM
 264  	 	 	 	 $arrcode = $this->barcode_code39($code, true, true);
 265  	 	 	 	 break;
 266  	 	 	 }
 267  	 	 	 case 'C93': { // CODE 93 - USS-93
 268  	 	 	 	 $arrcode = $this->barcode_code93($code);
 269  	 	 	 	 break;
 270  	 	 	 }
 271  	 	 	 case 'S25': { // Standard 2 of 5
 272  	 	 	 	 $arrcode = $this->barcode_s25($code, false);
 273  	 	 	 	 break;
 274  	 	 	 }
 275  	 	 	 case 'S25+': { // Standard 2 of 5 + CHECKSUM
 276  	 	 	 	 $arrcode = $this->barcode_s25($code, true);
 277  	 	 	 	 break;
 278  	 	 	 }
 279  	 	 	 case 'I25': { // Interleaved 2 of 5
 280  	 	 	 	 $arrcode = $this->barcode_i25($code, false);
 281  	 	 	 	 break;
 282  	 	 	 }
 283  	 	 	 case 'I25+': { // Interleaved 2 of 5 + CHECKSUM
 284  	 	 	 	 $arrcode = $this->barcode_i25($code, true);
 285  	 	 	 	 break;
 286  	 	 	 }
 287  	 	 	 case 'C128': { // CODE 128
 288  	 	 	 	 $arrcode = $this->barcode_c128($code, '');
 289  	 	 	 	 break;
 290  	 	 	 }
 291  	 	 	 case 'C128A': { // CODE 128 A
 292  	 	 	 	 $arrcode = $this->barcode_c128($code, 'A');
 293  	 	 	 	 break;
 294  	 	 	 }
 295  	 	 	 case 'C128B': { // CODE 128 B
 296  	 	 	 	 $arrcode = $this->barcode_c128($code, 'B');
 297  	 	 	 	 break;
 298  	 	 	 }
 299  	 	 	 case 'C128C': { // CODE 128 C
 300  	 	 	 	 $arrcode = $this->barcode_c128($code, 'C');
 301  	 	 	 	 break;
 302  	 	 	 }
 303  	 	 	 case 'EAN2': { // 2-Digits UPC-Based Extension
 304  	 	 	 	 $arrcode = $this->barcode_eanext($code, 2);
 305  	 	 	 	 break;
 306  	 	 	 }
 307  	 	 	 case 'EAN5': { // 5-Digits UPC-Based Extension
 308  	 	 	 	 $arrcode = $this->barcode_eanext($code, 5);
 309  	 	 	 	 break;
 310  	 	 	 }
 311  	 	 	 case 'EAN8': { // EAN 8
 312  	 	 	 	 $arrcode = $this->barcode_eanupc($code, 8);
 313  	 	 	 	 break;
 314  	 	 	 }
 315  	 	 	 case 'EAN13': { // EAN 13
 316  	 	 	 	 $arrcode = $this->barcode_eanupc($code, 13);
 317  	 	 	 	 break;
 318  	 	 	 }
 319  	 	 	 case 'UPCA': { // UPC-A
 320  	 	 	 	 $arrcode = $this->barcode_eanupc($code, 12);
 321  	 	 	 	 break;
 322  	 	 	 }
 323  	 	 	 case 'UPCE': { // UPC-E
 324  	 	 	 	 $arrcode = $this->barcode_eanupc($code, 6);
 325  	 	 	 	 break;
 326  	 	 	 }
 327  	 	 	 case 'MSI': { // MSI (Variation of Plessey code)
 328  	 	 	 	 $arrcode = $this->barcode_msi($code, false);
 329  	 	 	 	 break;
 330  	 	 	 }
 331  	 	 	 case 'MSI+': { // MSI + CHECKSUM (modulo 11)
 332  	 	 	 	 $arrcode = $this->barcode_msi($code, true);
 333  	 	 	 	 break;
 334  	 	 	 }
 335  	 	 	 case 'POSTNET': { // POSTNET
 336  	 	 	 	 $arrcode = $this->barcode_postnet($code, false);
 337  	 	 	 	 break;
 338  	 	 	 }
 339  	 	 	 case 'PLANET': { // PLANET
 340  	 	 	 	 $arrcode = $this->barcode_postnet($code, true);
 341  	 	 	 	 break;
 342  	 	 	 }
 343  	 	 	 case 'RMS4CC': { // RMS4CC (Royal Mail 4-state Customer Code) - CBC (Customer Bar Code)
 344  	 	 	 	 $arrcode = $this->barcode_rms4cc($code, false);
 345  	 	 	 	 break;
 346  	 	 	 }
 347  	 	 	 case 'KIX': { // KIX (Klant index - Customer index)
 348  	 	 	 	 $arrcode = $this->barcode_rms4cc($code, true);
 349  	 	 	 	 break;
 350  	 	 	 }
 351  	 	 	 case 'IMB': { // IMB - Intelligent Mail Barcode - Onecode - USPS-B-3200
 352  	 	 	 	 $arrcode = $this->barcode_imb($code);
 353  	 	 	 	 break;
 354  	 	 	 }
 355  	 	 	 case 'IMBPRE': { // IMB - Intelligent Mail Barcode - Onecode - USPS-B-3200- pre-processed
 356  	 	 	 	 $arrcode = $this->barcode_imb_pre($code);
 357  	 	 	 	 break;
 358  	 	 	 }
 359  	 	 	 case 'CODABAR': { // CODABAR
 360  	 	 	 	 $arrcode = $this->barcode_codabar($code);
 361  	 	 	 	 break;
 362  	 	 	 }
 363  	 	 	 case 'CODE11': { // CODE 11
 364  	 	 	 	 $arrcode = $this->barcode_code11($code);
 365  	 	 	 	 break;
 366  	 	 	 }
 367  	 	 	 case 'PHARMA': { // PHARMACODE
 368  	 	 	 	 $arrcode = $this->barcode_pharmacode($code);
 369  	 	 	 	 break;
 370  	 	 	 }
 371  	 	 	 case 'PHARMA2T': { // PHARMACODE TWO-TRACKS
 372  	 	 	 	 $arrcode = $this->barcode_pharmacode2t($code);
 373  	 	 	 	 break;
 374  	 	 	 }
 375  	 	 	 default: {
 376  	 	 	 	 $this->barcode_array = array();
 377  	 	 	 	 $arrcode = false;
 378  	 	 	 	 break;
 379  	 	 	 }
 380  	 	 }
 381  	 	 $this->barcode_array = $arrcode;
 382  	 }
 383  
 384  	 /**
 385  	  * CODE 39 - ANSI MH10.8M-1983 - USD-3 - 3 of 9.
 386  	  * General-purpose code in very wide use world-wide
 387  	  * @param string $code code to represent.
 388  	  * @param boolean $extended if true uses the extended mode.
 389  	  * @param boolean $checksum if true add a checksum to the code.
 390  	  * @return array barcode representation.
 391  	  * @protected
 392  	  */
 393  	protected function barcode_code39($code, $extended=false, $checksum=false) {
 394  	 	 $chr['0'] = '111331311';
 395  	 	 $chr['1'] = '311311113';
 396  	 	 $chr['2'] = '113311113';
 397  	 	 $chr['3'] = '313311111';
 398  	 	 $chr['4'] = '111331113';
 399  	 	 $chr['5'] = '311331111';
 400  	 	 $chr['6'] = '113331111';
 401  	 	 $chr['7'] = '111311313';
 402  	 	 $chr['8'] = '311311311';
 403  	 	 $chr['9'] = '113311311';
 404  	 	 $chr['A'] = '311113113';
 405  	 	 $chr['B'] = '113113113';
 406  	 	 $chr['C'] = '313113111';
 407  	 	 $chr['D'] = '111133113';
 408  	 	 $chr['E'] = '311133111';
 409  	 	 $chr['F'] = '113133111';
 410  	 	 $chr['G'] = '111113313';
 411  	 	 $chr['H'] = '311113311';
 412  	 	 $chr['I'] = '113113311';
 413  	 	 $chr['J'] = '111133311';
 414  	 	 $chr['K'] = '311111133';
 415  	 	 $chr['L'] = '113111133';
 416  	 	 $chr['M'] = '313111131';
 417  	 	 $chr['N'] = '111131133';
 418  	 	 $chr['O'] = '311131131';
 419  	 	 $chr['P'] = '113131131';
 420  	 	 $chr['Q'] = '111111333';
 421  	 	 $chr['R'] = '311111331';
 422  	 	 $chr['S'] = '113111331';
 423  	 	 $chr['T'] = '111131331';
 424  	 	 $chr['U'] = '331111113';
 425  	 	 $chr['V'] = '133111113';
 426  	 	 $chr['W'] = '333111111';
 427  	 	 $chr['X'] = '131131113';
 428  	 	 $chr['Y'] = '331131111';
 429  	 	 $chr['Z'] = '133131111';
 430  	 	 $chr['-'] = '131111313';
 431  	 	 $chr['.'] = '331111311';
 432  	 	 $chr[' '] = '133111311';
 433  	 	 $chr['$'] = '131313111';
 434  	 	 $chr['/'] = '131311131';
 435  	 	 $chr['+'] = '131113131';
 436  	 	 $chr['%'] = '111313131';
 437  	 	 $chr['*'] = '131131311';
 438  	 	 $code = strtoupper($code);
 439  	 	 if ($extended) {
 440  	 	 	 // extended mode
 441  	 	 	 $code = $this->encode_code39_ext($code);
 442  	 	 }
 443  	 	 if ($code === false) {
 444  	 	 	 return false;
 445  	 	 }
 446  	 	 if ($checksum) {
 447  	 	 	 // checksum
 448  	 	 	 $code .= $this->checksum_code39($code);
 449  	 	 }
 450  	 	 // add start and stop codes
 451  	 	 $code = '*'.$code.'*';
 452  	 	 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
 453  	 	 $k = 0;
 454  	 	 $clen = strlen($code);
 455  	 	 for ($i = 0; $i < $clen; ++$i) {
 456  	 	 	 $char = $code[$i];
 457  	 	 	 if(!isset($chr[$char])) {
 458  	 	 	 	 // invalid character
 459  	 	 	 	 return false;
 460  	 	 	 }
 461  	 	 	 for ($j = 0; $j < 9; ++$j) {
 462  	 	 	 	 if (($j % 2) == 0) {
 463  	 	 	 	 	 $t = true; // bar
 464  	 	 	 	 } else {
 465  	 	 	 	 	 $t = false; // space
 466  	 	 	 	 }
 467  	 	 	 	 $w = $chr[$char][$j];
 468  	 	 	 	 $bararray['bcode'][$k] = array('t' => $t, 'w' => $w, 'h' => 1, 'p' => 0);
 469  	 	 	 	 $bararray['maxw'] += $w;
 470  	 	 	 	 ++$k;
 471  	 	 	 }
 472  	 	 	 // intercharacter gap
 473  	 	 	 $bararray['bcode'][$k] = array('t' => false, 'w' => 1, 'h' => 1, 'p' => 0);
 474  	 	 	 $bararray['maxw'] += 1;
 475  	 	 	 ++$k;
 476  	 	 }
 477  	 	 return $bararray;
 478  	 }
 479  
 480  	 /**
 481  	  * Encode a string to be used for CODE 39 Extended mode.
 482  	  * @param string $code code to represent.
 483  	  * @return string encoded string.
 484  	  * @protected
 485  	  */
 486  	protected function encode_code39_ext($code) {
 487  	 	 $encode = array(
 488  	 	 	 chr(0) => '%U', chr(1) => '$A', chr(2) => '$B', chr(3) => '$C',
 489  	 	 	 chr(4) => '$D', chr(5) => '$E', chr(6) => '$F', chr(7) => '$G',
 490  	 	 	 chr(8) => '$H', chr(9) => '$I', chr(10) => '$J', chr(11) => '£K',
 491  	 	 	 chr(12) => '$L', chr(13) => '$M', chr(14) => '$N', chr(15) => '$O',
 492  	 	 	 chr(16) => '$P', chr(17) => '$Q', chr(18) => '$R', chr(19) => '$S',
 493  	 	 	 chr(20) => '$T', chr(21) => '$U', chr(22) => '$V', chr(23) => '$W',
 494  	 	 	 chr(24) => '$X', chr(25) => '$Y', chr(26) => '$Z', chr(27) => '%A',
 495  	 	 	 chr(28) => '%B', chr(29) => '%C', chr(30) => '%D', chr(31) => '%E',
 496  	 	 	 chr(32) => ' ', chr(33) => '/A', chr(34) => '/B', chr(35) => '/C',
 497  	 	 	 chr(36) => '/D', chr(37) => '/E', chr(38) => '/F', chr(39) => '/G',
 498  	 	 	 chr(40) => '/H', chr(41) => '/I', chr(42) => '/J', chr(43) => '/K',
 499  	 	 	 chr(44) => '/L', chr(45) => '-', chr(46) => '.', chr(47) => '/O',
 500  	 	 	 chr(48) => '0', chr(49) => '1', chr(50) => '2', chr(51) => '3',
 501  	 	 	 chr(52) => '4', chr(53) => '5', chr(54) => '6', chr(55) => '7',
 502  	 	 	 chr(56) => '8', chr(57) => '9', chr(58) => '/Z', chr(59) => '%F',
 503  	 	 	 chr(60) => '%G', chr(61) => '%H', chr(62) => '%I', chr(63) => '%J',
 504  	 	 	 chr(64) => '%V', chr(65) => 'A', chr(66) => 'B', chr(67) => 'C',
 505  	 	 	 chr(68) => 'D', chr(69) => 'E', chr(70) => 'F', chr(71) => 'G',
 506  	 	 	 chr(72) => 'H', chr(73) => 'I', chr(74) => 'J', chr(75) => 'K',
 507  	 	 	 chr(76) => 'L', chr(77) => 'M', chr(78) => 'N', chr(79) => 'O',
 508  	 	 	 chr(80) => 'P', chr(81) => 'Q', chr(82) => 'R', chr(83) => 'S',
 509  	 	 	 chr(84) => 'T', chr(85) => 'U', chr(86) => 'V', chr(87) => 'W',
 510  	 	 	 chr(88) => 'X', chr(89) => 'Y', chr(90) => 'Z', chr(91) => '%K',
 511  	 	 	 chr(92) => '%L', chr(93) => '%M', chr(94) => '%N', chr(95) => '%O',
 512  	 	 	 chr(96) => '%W', chr(97) => '+A', chr(98) => '+B', chr(99) => '+C',
 513  	 	 	 chr(100) => '+D', chr(101) => '+E', chr(102) => '+F', chr(103) => '+G',
 514  	 	 	 chr(104) => '+H', chr(105) => '+I', chr(106) => '+J', chr(107) => '+K',
 515  	 	 	 chr(108) => '+L', chr(109) => '+M', chr(110) => '+N', chr(111) => '+O',
 516  	 	 	 chr(112) => '+P', chr(113) => '+Q', chr(114) => '+R', chr(115) => '+S',
 517  	 	 	 chr(116) => '+T', chr(117) => '+U', chr(118) => '+V', chr(119) => '+W',
 518  	 	 	 chr(120) => '+X', chr(121) => '+Y', chr(122) => '+Z', chr(123) => '%P',
 519  	 	 	 chr(124) => '%Q', chr(125) => '%R', chr(126) => '%S', chr(127) => '%T');
 520  	 	 $code_ext = '';
 521  	 	 $clen = strlen($code);
 522  	 	 for ($i = 0 ; $i < $clen; ++$i) {
 523  	 	 	 if (ord($code[$i]) > 127) {
 524  	 	 	 	 return false;
 525  	 	 	 }
 526  	 	 	 $code_ext .= $encode[$code[$i]];
 527  	 	 }
 528  	 	 return $code_ext;
 529  	 }
 530  
 531  	 /**
 532  	  * Calculate CODE 39 checksum (modulo 43).
 533  	  * @param string $code code to represent.
 534  	  * @return string char checksum.
 535  	  * @protected
 536  	  */
 537  	protected function checksum_code39($code) {
 538  	 	 $chars = array(
 539  	 	 	 '0', '1', '2', '3', '4', '5', '6', '7', '8', '9',
 540  	 	 	 'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K',
 541  	 	 	 'L', 'M', 'N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U', 'V',
 542  	 	 	 'W', 'X', 'Y', 'Z', '-', '.', ' ', '$', '/', '+', '%');
 543  	 	 $sum = 0;
 544  	 	 $clen = strlen($code);
 545  	 	 for ($i = 0 ; $i < $clen; ++$i) {
 546  	 	 	 $k = array_keys($chars, $code[$i]);
 547  	 	 	 $sum += $k[0];
 548  	 	 }
 549  	 	 $j = ($sum % 43);
 550  	 	 return $chars[$j];
 551  	 }
 552  
 553  	 /**
 554  	  * CODE 93 - USS-93
 555  	  * Compact code similar to Code 39
 556  	  * @param string $code code to represent.
 557  	  * @return array barcode representation.
 558  	  * @protected
 559  	  */
 560  	protected function barcode_code93($code) {
 561  	 	 $chr[48] = '131112'; // 0
 562  	 	 $chr[49] = '111213'; // 1
 563  	 	 $chr[50] = '111312'; // 2
 564  	 	 $chr[51] = '111411'; // 3
 565  	 	 $chr[52] = '121113'; // 4
 566  	 	 $chr[53] = '121212'; // 5
 567  	 	 $chr[54] = '121311'; // 6
 568  	 	 $chr[55] = '111114'; // 7
 569  	 	 $chr[56] = '131211'; // 8
 570  	 	 $chr[57] = '141111'; // 9
 571  	 	 $chr[65] = '211113'; // A
 572  	 	 $chr[66] = '211212'; // B
 573  	 	 $chr[67] = '211311'; // C
 574  	 	 $chr[68] = '221112'; // D
 575  	 	 $chr[69] = '221211'; // E
 576  	 	 $chr[70] = '231111'; // F
 577  	 	 $chr[71] = '112113'; // G
 578  	 	 $chr[72] = '112212'; // H
 579  	 	 $chr[73] = '112311'; // I
 580  	 	 $chr[74] = '122112'; // J
 581  	 	 $chr[75] = '132111'; // K
 582  	 	 $chr[76] = '111123'; // L
 583  	 	 $chr[77] = '111222'; // M
 584  	 	 $chr[78] = '111321'; // N
 585  	 	 $chr[79] = '121122'; // O
 586  	 	 $chr[80] = '131121'; // P
 587  	 	 $chr[81] = '212112'; // Q
 588  	 	 $chr[82] = '212211'; // R
 589  	 	 $chr[83] = '211122'; // S
 590  	 	 $chr[84] = '211221'; // T
 591  	 	 $chr[85] = '221121'; // U
 592  	 	 $chr[86] = '222111'; // V
 593  	 	 $chr[87] = '112122'; // W
 594  	 	 $chr[88] = '112221'; // X
 595  	 	 $chr[89] = '122121'; // Y
 596  	 	 $chr[90] = '123111'; // Z
 597  	 	 $chr[45] = '121131'; // -
 598  	 	 $chr[46] = '311112'; // .
 599  	 	 $chr[32] = '311211'; //
 600  	 	 $chr[36] = '321111'; // $
 601  	 	 $chr[47] = '112131'; // /
 602  	 	 $chr[43] = '113121'; // +
 603  	 	 $chr[37] = '211131'; // %
 604  	 	 $chr[128] = '121221'; // ($)
 605  	 	 $chr[129] = '311121'; // (/)
 606  	 	 $chr[130] = '122211'; // (+)
 607  	 	 $chr[131] = '312111'; // (%)
 608  	 	 $chr[42] = '111141'; // start-stop
 609  	 	 $code = strtoupper($code);
 610  	 	 $encode = array(
 611  	 	 	 chr(0) => chr(131).'U', chr(1) => chr(128).'A', chr(2) => chr(128).'B', chr(3) => chr(128).'C',
 612  	 	 	 chr(4) => chr(128).'D', chr(5) => chr(128).'E', chr(6) => chr(128).'F', chr(7) => chr(128).'G',
 613  	 	 	 chr(8) => chr(128).'H', chr(9) => chr(128).'I', chr(10) => chr(128).'J', chr(11) => '£K',
 614  	 	 	 chr(12) => chr(128).'L', chr(13) => chr(128).'M', chr(14) => chr(128).'N', chr(15) => chr(128).'O',
 615  	 	 	 chr(16) => chr(128).'P', chr(17) => chr(128).'Q', chr(18) => chr(128).'R', chr(19) => chr(128).'S',
 616  	 	 	 chr(20) => chr(128).'T', chr(21) => chr(128).'U', chr(22) => chr(128).'V', chr(23) => chr(128).'W',
 617  	 	 	 chr(24) => chr(128).'X', chr(25) => chr(128).'Y', chr(26) => chr(128).'Z', chr(27) => chr(131).'A',
 618  	 	 	 chr(28) => chr(131).'B', chr(29) => chr(131).'C', chr(30) => chr(131).'D', chr(31) => chr(131).'E',
 619  	 	 	 chr(32) => ' ', chr(33) => chr(129).'A', chr(34) => chr(129).'B', chr(35) => chr(129).'C',
 620  	 	 	 chr(36) => chr(129).'D', chr(37) => chr(129).'E', chr(38) => chr(129).'F', chr(39) => chr(129).'G',
 621  	 	 	 chr(40) => chr(129).'H', chr(41) => chr(129).'I', chr(42) => chr(129).'J', chr(43) => chr(129).'K',
 622  	 	 	 chr(44) => chr(129).'L', chr(45) => '-', chr(46) => '.', chr(47) => chr(129).'O',
 623  	 	 	 chr(48) => '0', chr(49) => '1', chr(50) => '2', chr(51) => '3',
 624  	 	 	 chr(52) => '4', chr(53) => '5', chr(54) => '6', chr(55) => '7',
 625  	 	 	 chr(56) => '8', chr(57) => '9', chr(58) => chr(129).'Z', chr(59) => chr(131).'F',
 626  	 	 	 chr(60) => chr(131).'G', chr(61) => chr(131).'H', chr(62) => chr(131).'I', chr(63) => chr(131).'J',
 627  	 	 	 chr(64) => chr(131).'V', chr(65) => 'A', chr(66) => 'B', chr(67) => 'C',
 628  	 	 	 chr(68) => 'D', chr(69) => 'E', chr(70) => 'F', chr(71) => 'G',
 629  	 	 	 chr(72) => 'H', chr(73) => 'I', chr(74) => 'J', chr(75) => 'K',
 630  	 	 	 chr(76) => 'L', chr(77) => 'M', chr(78) => 'N', chr(79) => 'O',
 631  	 	 	 chr(80) => 'P', chr(81) => 'Q', chr(82) => 'R', chr(83) => 'S',
 632  	 	 	 chr(84) => 'T', chr(85) => 'U', chr(86) => 'V', chr(87) => 'W',
 633  	 	 	 chr(88) => 'X', chr(89) => 'Y', chr(90) => 'Z', chr(91) => chr(131).'K',
 634  	 	 	 chr(92) => chr(131).'L', chr(93) => chr(131).'M', chr(94) => chr(131).'N', chr(95) => chr(131).'O',
 635  	 	 	 chr(96) => chr(131).'W', chr(97) => chr(130).'A', chr(98) => chr(130).'B', chr(99) => chr(130).'C',
 636  	 	 	 chr(100) => chr(130).'D', chr(101) => chr(130).'E', chr(102) => chr(130).'F', chr(103) => chr(130).'G',
 637  	 	 	 chr(104) => chr(130).'H', chr(105) => chr(130).'I', chr(106) => chr(130).'J', chr(107) => chr(130).'K',
 638  	 	 	 chr(108) => chr(130).'L', chr(109) => chr(130).'M', chr(110) => chr(130).'N', chr(111) => chr(130).'O',
 639  	 	 	 chr(112) => chr(130).'P', chr(113) => chr(130).'Q', chr(114) => chr(130).'R', chr(115) => chr(130).'S',
 640  	 	 	 chr(116) => chr(130).'T', chr(117) => chr(130).'U', chr(118) => chr(130).'V', chr(119) => chr(130).'W',
 641  	 	 	 chr(120) => chr(130).'X', chr(121) => chr(130).'Y', chr(122) => chr(130).'Z', chr(123) => chr(131).'P',
 642  	 	 	 chr(124) => chr(131).'Q', chr(125) => chr(131).'R', chr(126) => chr(131).'S', chr(127) => chr(131).'T');
 643  	 	 $code_ext = '';
 644  	 	 $clen = strlen($code);
 645  	 	 for ($i = 0 ; $i < $clen; ++$i) {
 646  	 	 	 if (ord($code[$i]) > 127) {
 647  	 	 	 	 return false;
 648  	 	 	 }
 649  	 	 	 $code_ext .= $encode[$code[$i]];
 650  	 	 }
 651  	 	 // checksum
 652  	 	 $code_ext .= $this->checksum_code93($code_ext);
 653  	 	 // add start and stop codes
 654  	 	 $code = '*'.$code_ext.'*';
 655  	 	 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
 656  	 	 $k = 0;
 657  	 	 $clen = strlen($code);
 658  	 	 for ($i = 0; $i < $clen; ++$i) {
 659  	 	 	 $char = ord($code[$i]);
 660  	 	 	 if(!isset($chr[$char])) {
 661  	 	 	 	 // invalid character
 662  	 	 	 	 return false;
 663  	 	 	 }
 664  	 	 	 for ($j = 0; $j < 6; ++$j) {
 665  	 	 	 	 if (($j % 2) == 0) {
 666  	 	 	 	 	 $t = true; // bar
 667  	 	 	 	 } else {
 668  	 	 	 	 	 $t = false; // space
 669  	 	 	 	 }
 670  	 	 	 	 $w = $chr[$char][$j];
 671  	 	 	 	 $bararray['bcode'][$k] = array('t' => $t, 'w' => $w, 'h' => 1, 'p' => 0);
 672  	 	 	 	 $bararray['maxw'] += $w;
 673  	 	 	 	 ++$k;
 674  	 	 	 }
 675  	 	 }
 676  	 	 $bararray['bcode'][$k] = array('t' => true, 'w' => 1, 'h' => 1, 'p' => 0);
 677  	 	 $bararray['maxw'] += 1;
 678  	 	 ++$k;
 679  	 	 return $bararray;
 680  	 }
 681  
 682  	 /**
 683  	  * Calculate CODE 93 checksum (modulo 47).
 684  	  * @param string $code code to represent.
 685  	  * @return string checksum code.
 686  	  * @protected
 687  	  */
 688  	protected function checksum_code93($code) {
 689  	 	 $chars = array(
 690  	 	 	 '0', '1', '2', '3', '4', '5', '6', '7', '8', '9',
 691  	 	 	 'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K',
 692  	 	 	 'L', 'M', 'N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U', 'V',
 693  	 	 	 'W', 'X', 'Y', 'Z', '-', '.', ' ', '$', '/', '+', '%',
 694  	 	 	 '<', '=', '>', '?');
 695  	 	 // translate special characters
 696  	 	 $code = strtr($code, chr(128).chr(131).chr(129).chr(130), '<=>?');
 697  	 	 $len = strlen($code);
 698  	 	 // calculate check digit C
 699  	 	 $p = 1;
 700  	 	 $check = 0;
 701  	 	 for ($i = ($len - 1); $i >= 0; --$i) {
 702  	 	 	 $k = array_keys($chars, $code[$i]);
 703  	 	 	 $check += ($k[0] * $p);
 704  	 	 	 ++$p;
 705  	 	 	 if ($p > 20) {
 706  	 	 	 	 $p = 1;
 707  	 	 	 }
 708  	 	 }
 709  	 	 $check %= 47;
 710  	 	 $c = $chars[$check];
 711  	 	 $code .= $c;
 712  	 	 // calculate check digit K
 713  	 	 $p = 1;
 714  	 	 $check = 0;
 715  	 	 for ($i = $len; $i >= 0; --$i) {
 716  	 	 	 $k = array_keys($chars, $code[$i]);
 717  	 	 	 $check += ($k[0] * $p);
 718  	 	 	 ++$p;
 719  	 	 	 if ($p > 15) {
 720  	 	 	 	 $p = 1;
 721  	 	 	 }
 722  	 	 }
 723  	 	 $check %= 47;
 724  	 	 $k = $chars[$check];
 725  	 	 $checksum = $c.$k;
 726  	 	 // resto respecial characters
 727  	 	 $checksum = strtr($checksum, '<=>?', chr(128).chr(131).chr(129).chr(130));
 728  	 	 return $checksum;
 729  	 }
 730  
 731  	 /**
 732  	  * Checksum for standard 2 of 5 barcodes.
 733  	  * @param string $code code to process.
 734  	  * @return int checksum.
 735  	  * @protected
 736  	  */
 737  	protected function checksum_s25($code) {
 738  	 	 $len = strlen($code);
 739  	 	 $sum = 0;
 740  	 	 for ($i = 0; $i < $len; $i+=2) {
 741  	 	 	 $sum += $code[$i];
 742  	 	 }
 743  	 	 $sum *= 3;
 744  	 	 for ($i = 1; $i < $len; $i+=2) {
 745  	 	 	 $sum += ($code[$i]);
 746  	 	 }
 747  	 	 $r = $sum % 10;
 748  	 	 if($r > 0) {
 749  	 	 	 $r = (10 - $r);
 750  	 	 }
 751  	 	 return $r;
 752  	 }
 753  
 754  	 /**
 755  	  * MSI.
 756  	  * Variation of Plessey code, with similar applications
 757  	  * Contains digits (0 to 9) and encodes the data only in the width of bars.
 758  	  * @param string $code code to represent.
 759  	  * @param boolean $checksum if true add a checksum to the code (modulo 11)
 760  	  * @return array barcode representation.
 761  	  * @protected
 762  	  */
 763  	protected function barcode_msi($code, $checksum=false) {
 764  	 	 $chr['0'] = '100100100100';
 765  	 	 $chr['1'] = '100100100110';
 766  	 	 $chr['2'] = '100100110100';
 767  	 	 $chr['3'] = '100100110110';
 768  	 	 $chr['4'] = '100110100100';
 769  	 	 $chr['5'] = '100110100110';
 770  	 	 $chr['6'] = '100110110100';
 771  	 	 $chr['7'] = '100110110110';
 772  	 	 $chr['8'] = '110100100100';
 773  	 	 $chr['9'] = '110100100110';
 774  	 	 $chr['A'] = '110100110100';
 775  	 	 $chr['B'] = '110100110110';
 776  	 	 $chr['C'] = '110110100100';
 777  	 	 $chr['D'] = '110110100110';
 778  	 	 $chr['E'] = '110110110100';
 779  	 	 $chr['F'] = '110110110110';
 780  	 	 if ($checksum) {
 781  	 	 	 // add checksum
 782  	 	 	 $clen = strlen($code);
 783  	 	 	 $p = 2;
 784  	 	 	 $check = 0;
 785  	 	 	 for ($i = ($clen - 1); $i >= 0; --$i) {
 786  	 	 	 	 $check += (hexdec($code[$i]) * $p);
 787  	 	 	 	 ++$p;
 788  	 	 	 	 if ($p > 7) {
 789  	 	 	 	 	 $p = 2;
 790  	 	 	 	 }
 791  	 	 	 }
 792  	 	 	 $check %= 11;
 793  	 	 	 if ($check > 0) {
 794  	 	 	 	 $check = 11 - $check;
 795  	 	 	 }
 796  	 	 	 $code .= $check;
 797  	 	 }
 798  	 	 $seq = '110'; // left guard
 799  	 	 $clen = strlen($code);
 800  	 	 for ($i = 0; $i < $clen; ++$i) {
 801  	 	 	 $digit = $code[$i];
 802  	 	 	 if (!isset($chr[$digit])) {
 803  	 	 	 	 // invalid character
 804  	 	 	 	 return false;
 805  	 	 	 }
 806  	 	 	 $seq .= $chr[$digit];
 807  	 	 }
 808  	 	 $seq .= '1001'; // right guard
 809  	 	 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
 810  	 	 return $this->binseq_to_array($seq, $bararray);
 811  	 }
 812  
 813  	 /**
 814  	  * Standard 2 of 5 barcodes.
 815  	  * Used in airline ticket marking, photofinishing
 816  	  * Contains digits (0 to 9) and encodes the data only in the width of bars.
 817  	  * @param string $code code to represent.
 818  	  * @param boolean $checksum if true add a checksum to the code
 819  	  * @return array barcode representation.
 820  	  * @protected
 821  	  */
 822  	protected function barcode_s25($code, $checksum=false) {
 823  	 	 $chr['0'] = '10101110111010';
 824  	 	 $chr['1'] = '11101010101110';
 825  	 	 $chr['2'] = '10111010101110';
 826  	 	 $chr['3'] = '11101110101010';
 827  	 	 $chr['4'] = '10101110101110';
 828  	 	 $chr['5'] = '11101011101010';
 829  	 	 $chr['6'] = '10111011101010';
 830  	 	 $chr['7'] = '10101011101110';
 831  	 	 $chr['8'] = '10101110111010';
 832  	 	 $chr['9'] = '10111010111010';
 833  	 	 if ($checksum) {
 834  	 	 	 // add checksum
 835  	 	 	 $code .= $this->checksum_s25($code);
 836  	 	 }
 837  	 	 if((strlen($code) % 2) != 0) {
 838  	 	 	 // add leading zero if code-length is odd
 839  	 	 	 $code = '0'.$code;
 840  	 	 }
 841  	 	 $seq = '11011010';
 842  	 	 $clen = strlen($code);
 843  	 	 for ($i = 0; $i < $clen; ++$i) {
 844  	 	 	 $digit = $code[$i];
 845  	 	 	 if (!isset($chr[$digit])) {
 846  	 	 	 	 // invalid character
 847  	 	 	 	 return false;
 848  	 	 	 }
 849  	 	 	 $seq .= $chr[$digit];
 850  	 	 }
 851  	 	 $seq .= '1101011';
 852  	 	 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
 853  	 	 return $this->binseq_to_array($seq, $bararray);
 854  	 }
 855  
 856  	 /**
 857  	  * Convert binary barcode sequence to WarnockPDF barcode array.
 858  	  * @param string $seq barcode as binary sequence.
 859  	  * @param array $bararray barcode array to fill up
 860  	  * @return array barcode representation.
 861  	  * @protected
 862  	  */
 863  	protected function binseq_to_array($seq, $bararray) {
 864  	 	 $len = strlen($seq);
 865  	 	 $w = 0;
 866  	 	 $k = 0;
 867  	 	 for ($i = 0; $i < $len; ++$i) {
 868  	 	 	 $w += 1;
 869  	 	 	 if (($i == ($len - 1)) OR (($i < ($len - 1)) AND ($seq[$i] != $seq[($i+1)]))) {
 870  	 	 	 	 if ($seq[$i] == '1') {
 871  	 	 	 	 	 $t = true; // bar
 872  	 	 	 	 } else {
 873  	 	 	 	 	 $t = false; // space
 874  	 	 	 	 }
 875  	 	 	 	 $bararray['bcode'][$k] = array('t' => $t, 'w' => $w, 'h' => 1, 'p' => 0);
 876  	 	 	 	 $bararray['maxw'] += $w;
 877  	 	 	 	 ++$k;
 878  	 	 	 	 $w = 0;
 879  	 	 	 }
 880  	 	 }
 881  	 	 return $bararray;
 882  	 }
 883  
 884  	 /**
 885  	  * Interleaved 2 of 5 barcodes.
 886  	  * Compact numeric code, widely used in industry, air cargo
 887  	  * Contains digits (0 to 9) and encodes the data in the width of both bars and spaces.
 888  	  * @param string $code code to represent.
 889  	  * @param boolean $checksum if true add a checksum to the code
 890  	  * @return array barcode representation.
 891  	  * @protected
 892  	  */
 893  	protected function barcode_i25($code, $checksum=false) {
 894  	 	 $chr['0'] = '11221';
 895  	 	 $chr['1'] = '21112';
 896  	 	 $chr['2'] = '12112';
 897  	 	 $chr['3'] = '22111';
 898  	 	 $chr['4'] = '11212';
 899  	 	 $chr['5'] = '21211';
 900  	 	 $chr['6'] = '12211';
 901  	 	 $chr['7'] = '11122';
 902  	 	 $chr['8'] = '21121';
 903  	 	 $chr['9'] = '12121';
 904  	 	 $chr['A'] = '11';
 905  	 	 $chr['Z'] = '21';
 906  	 	 if ($checksum) {
 907  	 	 	 // add checksum
 908  	 	 	 $code .= $this->checksum_s25($code);
 909  	 	 }
 910  	 	 if((strlen($code) % 2) != 0) {
 911  	 	 	 // add leading zero if code-length is odd
 912  	 	 	 $code = '0'.$code;
 913  	 	 }
 914  	 	 // add start and stop codes
 915  	 	 $code = 'AA'.strtolower($code).'ZA';
 916  
 917  	 	 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
 918  	 	 $k = 0;
 919  	 	 $clen = strlen($code);
 920  	 	 for ($i = 0; $i < $clen; $i = ($i + 2)) {
 921  	 	 	 $char_bar = $code[$i];
 922  	 	 	 $char_space = $code[$i+1];
 923  	 	 	 if((!isset($chr[$char_bar])) OR (!isset($chr[$char_space]))) {
 924  	 	 	 	 // invalid character
 925  	 	 	 	 return false;
 926  	 	 	 }
 927  	 	 	 // create a bar-space sequence
 928  	 	 	 $seq = '';
 929  	 	 	 $chrlen = strlen($chr[$char_bar]);
 930  	 	 	 for ($s = 0; $s < $chrlen; $s++){
 931  	 	 	 	 $seq .= $chr[$char_bar][$s] . $chr[$char_space][$s];
 932  	 	 	 }
 933  	 	 	 $seqlen = strlen($seq);
 934  	 	 	 for ($j = 0; $j < $seqlen; ++$j) {
 935  	 	 	 	 if (($j % 2) == 0) {
 936  	 	 	 	 	 $t = true; // bar
 937  	 	 	 	 } else {
 938  	 	 	 	 	 $t = false; // space
 939  	 	 	 	 }
 940  	 	 	 	 $w = (float)$seq[$j];
 941  	 	 	 	 $bararray['bcode'][$k] = array('t' => $t, 'w' => $w, 'h' => 1, 'p' => 0);
 942  	 	 	 	 $bararray['maxw'] += $w;
 943  	 	 	 	 ++$k;
 944  	 	 	 }
 945  	 	 }
 946  	 	 return $bararray;
 947  	 }
 948  
 949  	 /**
 950  	  * C128 barcodes.
 951  	  * Very capable code, excellent density, high reliability; in very wide use world-wide
 952  	  * @param string $code code to represent.
 953  	  * @param string $type barcode type: A, B, C or empty for automatic switch (AUTO mode)
 954  	  * @return array barcode representation.
 955  	  * @protected
 956  	  */
 957  	protected function barcode_c128($code, $type='') {
 958  	 	 $chr = array(
 959  	 	 	 '212222', /* 00 */
 960  	 	 	 '222122', /* 01 */
 961  	 	 	 '222221', /* 02 */
 962  	 	 	 '121223', /* 03 */
 963  	 	 	 '121322', /* 04 */
 964  	 	 	 '131222', /* 05 */
 965  	 	 	 '122213', /* 06 */
 966  	 	 	 '122312', /* 07 */
 967  	 	 	 '132212', /* 08 */
 968  	 	 	 '221213', /* 09 */
 969  	 	 	 '221312', /* 10 */
 970  	 	 	 '231212', /* 11 */
 971  	 	 	 '112232', /* 12 */
 972  	 	 	 '122132', /* 13 */
 973  	 	 	 '122231', /* 14 */
 974  	 	 	 '113222', /* 15 */
 975  	 	 	 '123122', /* 16 */
 976  	 	 	 '123221', /* 17 */
 977  	 	 	 '223211', /* 18 */
 978  	 	 	 '221132', /* 19 */
 979  	 	 	 '221231', /* 20 */
 980  	 	 	 '213212', /* 21 */
 981  	 	 	 '223112', /* 22 */
 982  	 	 	 '312131', /* 23 */
 983  	 	 	 '311222', /* 24 */
 984  	 	 	 '321122', /* 25 */
 985  	 	 	 '321221', /* 26 */
 986  	 	 	 '312212', /* 27 */
 987  	 	 	 '322112', /* 28 */
 988  	 	 	 '322211', /* 29 */
 989  	 	 	 '212123', /* 30 */
 990  	 	 	 '212321', /* 31 */
 991  	 	 	 '232121', /* 32 */
 992  	 	 	 '111323', /* 33 */
 993  	 	 	 '131123', /* 34 */
 994  	 	 	 '131321', /* 35 */
 995  	 	 	 '112313', /* 36 */
 996  	 	 	 '132113', /* 37 */
 997  	 	 	 '132311', /* 38 */
 998  	 	 	 '211313', /* 39 */
 999  	 	 	 '231113', /* 40 */
1000  	 	 	 '231311', /* 41 */
1001  	 	 	 '112133', /* 42 */
1002  	 	 	 '112331', /* 43 */
1003  	 	 	 '132131', /* 44 */
1004  	 	 	 '113123', /* 45 */
1005  	 	 	 '113321', /* 46 */
1006  	 	 	 '133121', /* 47 */
1007  	 	 	 '313121', /* 48 */
1008  	 	 	 '211331', /* 49 */
1009  	 	 	 '231131', /* 50 */
1010  	 	 	 '213113', /* 51 */
1011  	 	 	 '213311', /* 52 */
1012  	 	 	 '213131', /* 53 */
1013  	 	 	 '311123', /* 54 */
1014  	 	 	 '311321', /* 55 */
1015  	 	 	 '331121', /* 56 */
1016  	 	 	 '312113', /* 57 */
1017  	 	 	 '312311', /* 58 */
1018  	 	 	 '332111', /* 59 */
1019  	 	 	 '314111', /* 60 */
1020  	 	 	 '221411', /* 61 */
1021  	 	 	 '431111', /* 62 */
1022  	 	 	 '111224', /* 63 */
1023  	 	 	 '111422', /* 64 */
1024  	 	 	 '121124', /* 65 */
1025  	 	 	 '121421', /* 66 */
1026  	 	 	 '141122', /* 67 */
1027  	 	 	 '141221', /* 68 */
1028  	 	 	 '112214', /* 69 */
1029  	 	 	 '112412', /* 70 */
1030  	 	 	 '122114', /* 71 */
1031  	 	 	 '122411', /* 72 */
1032  	 	 	 '142112', /* 73 */
1033  	 	 	 '142211', /* 74 */
1034  	 	 	 '241211', /* 75 */
1035  	 	 	 '221114', /* 76 */
1036  	 	 	 '413111', /* 77 */
1037  	 	 	 '241112', /* 78 */
1038  	 	 	 '134111', /* 79 */
1039  	 	 	 '111242', /* 80 */
1040  	 	 	 '121142', /* 81 */
1041  	 	 	 '121241', /* 82 */
1042  	 	 	 '114212', /* 83 */
1043  	 	 	 '124112', /* 84 */
1044  	 	 	 '124211', /* 85 */
1045  	 	 	 '411212', /* 86 */
1046  	 	 	 '421112', /* 87 */
1047  	 	 	 '421211', /* 88 */
1048  	 	 	 '212141', /* 89 */
1049  	 	 	 '214121', /* 90 */
1050  	 	 	 '412121', /* 91 */
1051  	 	 	 '111143', /* 92 */
1052  	 	 	 '111341', /* 93 */
1053  	 	 	 '131141', /* 94 */
1054  	 	 	 '114113', /* 95 */
1055  	 	 	 '114311', /* 96 */
1056  	 	 	 '411113', /* 97 */
1057  	 	 	 '411311', /* 98 */
1058  	 	 	 '113141', /* 99 */
1059  	 	 	 '114131', /* 100 */
1060  	 	 	 '311141', /* 101 */
1061  	 	 	 '411131', /* 102 */
1062  	 	 	 '211412', /* 103 START A */
1063  	 	 	 '211214', /* 104 START B */
1064  	 	 	 '211232', /* 105 START C */
1065  	 	 	 '233111', /* STOP */
1066  	 	 	 '200000'  /* END */
1067  	 	 );
1068  	 	 // ASCII characters for code A (ASCII 00 - 95)
1069  	 	 $keys_a = ' !"#$%&\'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\]^_';
1070  	 	 $keys_a .= chr(0).chr(1).chr(2).chr(3).chr(4).chr(5).chr(6).chr(7).chr(8).chr(9);
1071  	 	 $keys_a .= chr(10).chr(11).chr(12).chr(13).chr(14).chr(15).chr(16).chr(17).chr(18).chr(19);
1072  	 	 $keys_a .= chr(20).chr(21).chr(22).chr(23).chr(24).chr(25).chr(26).chr(27).chr(28).chr(29);
1073  	 	 $keys_a .= chr(30).chr(31);
1074  	 	 // ASCII characters for code B (ASCII 32 - 127)
1075  	 	 $keys_b = ' !"#$%&\'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\]^_`abcdefghijklmnopqrstuvwxyz{|}~'.chr(127);
1076  	 	 // special codes
1077  	 	 $fnc_a = array(241 => 102, 242 => 97, 243 => 96, 244 => 101);
1078  	 	 $fnc_b = array(241 => 102, 242 => 97, 243 => 96, 244 => 100);
1079  	 	 // array of symbols
1080  	 	 $code_data = array();
1081  	 	 // length of the code
1082  	 	 $len = strlen($code);
1083  	 	 switch(strtoupper($type)) {
1084  	 	 	 case 'A': { // MODE A
1085  	 	 	 	 $startid = 103;
1086  	 	 	 	 for ($i = 0; $i < $len; ++$i) {
1087  	 	 	 	 	 $char = $code[$i];
1088  	 	 	 	 	 $char_id = ord($char);
1089  	 	 	 	 	 if (($char_id >= 241) AND ($char_id <= 244)) {
1090  	 	 	 	 	 	 $code_data[] = $fnc_a[$char_id];
1091  	 	 	 	 	 } elseif (($char_id >= 0) AND ($char_id <= 95)) {
1092  	 	 	 	 	 	 $code_data[] = strpos($keys_a, $char);
1093  	 	 	 	 	 } else {
1094  	 	 	 	 	 	 return false;
1095  	 	 	 	 	 }
1096  	 	 	 	 }
1097  	 	 	 	 break;
1098  	 	 	 }
1099  	 	 	 case 'B': { // MODE B
1100  	 	 	 	 $startid = 104;
1101  	 	 	 	 for ($i = 0; $i < $len; ++$i) {
1102  	 	 	 	 	 $char = $code[$i];
1103  	 	 	 	 	 $char_id = ord($char);
1104  	 	 	 	 	 if (($char_id >= 241) AND ($char_id <= 244)) {
1105  	 	 	 	 	 	 $code_data[] = $fnc_b[$char_id];
1106  	 	 	 	 	 } elseif (($char_id >= 32) AND ($char_id <= 127)) {
1107  	 	 	 	 	 	 $code_data[] = strpos($keys_b, $char);
1108  	 	 	 	 	 } else {
1109  	 	 	 	 	 	 return false;
1110  	 	 	 	 	 }
1111  	 	 	 	 }
1112  	 	 	 	 break;
1113  	 	 	 }
1114  	 	 	 case 'C': { // MODE C
1115  	 	 	 	 $startid = 105;
1116  	 	 	 	 if (ord($code[0]) == 241) {
1117  	 	 	 	 	 $code_data[] = 102;
1118  	 	 	 	 	 $code = substr($code, 1);
1119  	 	 	 	 	 --$len;
1120  	 	 	 	 }
1121  	 	 	 	 if (($len % 2) != 0) {
1122  	 	 	 	 	 // the length must be even
1123  	 	 	 	 	 return false;
1124  	 	 	 	 }
1125  	 	 	 	 for ($i = 0; $i < $len; $i+=2) {
1126  	 	 	 	 	 $chrnum = $code[$i].$code[$i+1];
1127  	 	 	 	 	 if (preg_match('/([0-9]{2})/', $chrnum) > 0) {
1128  	 	 	 	 	 	 $code_data[] = intval($chrnum);
1129  	 	 	 	 	 } else {
1130  	 	 	 	 	 	 return false;
1131  	 	 	 	 	 }
1132  	 	 	 	 }
1133  	 	 	 	 break;
1134  	 	 	 }
1135  	 	 	 default: { // MODE AUTO
1136  	 	 	 	 // split code into sequences
1137  	 	 	 	 $sequence = array();
1138  	 	 	 	 // get numeric sequences (if any)
1139  	 	 	 	 $numseq = array();
1140  	 	 	 	 preg_match_all('/([0-9]{4,})/', $code, $numseq, PREG_OFFSET_CAPTURE);
1141  	 	 	 	 if (isset($numseq[1]) AND !empty($numseq[1])) {
1142  	 	 	 	 	 $end_offset = 0;
1143  	 	 	 	 	 foreach ($numseq[1] as $val) {
1144  	 	 	 	 	 	 $offset = $val[1];
1145  	 	 	 	 	 	 if ($offset > $end_offset) {
1146  	 	 	 	 	 	 	 // non numeric sequence
1147  	 	 	 	 	 	 	 $sequence = array_merge($sequence, $this->get128ABsequence(substr($code, $end_offset, ($offset - $end_offset))));
1148  	 	 	 	 	 	 }
1149  	 	 	 	 	 	 // numeric sequence
1150  	 	 	 	 	 	 $slen = strlen($val[0]);
1151  	 	 	 	 	 	 if (($slen % 2) != 0) {
1152  	 	 	 	 	 	 	 // the length must be even
1153  	 	 	 	 	 	 	 --$slen;
1154  	 	 	 	 	 	 }
1155  	 	 	 	 	 	 $sequence[] = array('C', substr($code, $offset, $slen), $slen);
1156  	 	 	 	 	 	 $end_offset = $offset + $slen;
1157  	 	 	 	 	 }
1158  	 	 	 	 	 if ($end_offset < $len) {
1159  	 	 	 	 	 	 $sequence = array_merge($sequence, $this->get128ABsequence(substr($code, $end_offset)));
1160  	 	 	 	 	 }
1161  	 	 	 	 } else {
1162  	 	 	 	 	 // text code (non C mode)
1163  	 	 	 	 	 $sequence = array_merge($sequence, $this->get128ABsequence($code));
1164  	 	 	 	 }
1165  	 	 	 	 // process the sequence
1166  	 	 	 	 foreach ($sequence as $key => $seq) {
1167  	 	 	 	 	 switch($seq[0]) {
1168  	 	 	 	 	 	 case 'A': {
1169  	 	 	 	 	 	 	 if ($key == 0) {
1170  	 	 	 	 	 	 	 	 $startid = 103;
1171  	 	 	 	 	 	 	 } elseif ($sequence[($key - 1)][0] != 'A') {
1172  	 	 	 	 	 	 	 	 if (($seq[2] == 1) AND ($key > 0) AND ($sequence[($key - 1)][0] == 'B') AND (!isset($sequence[($key - 1)][3]))) {
1173  	 	 	 	 	 	 	 	 	 // single character shift
1174  	 	 	 	 	 	 	 	 	 $code_data[] = 98;
1175  	 	 	 	 	 	 	 	 	 // mark shift
1176  	 	 	 	 	 	 	 	 	 $sequence[$key][3] = true;
1177  	 	 	 	 	 	 	 	 } elseif (!isset($sequence[($key - 1)][3])) {
1178  	 	 	 	 	 	 	 	 	 $code_data[] = 101;
1179  	 	 	 	 	 	 	 	 }
1180  	 	 	 	 	 	 	 }
1181  	 	 	 	 	 	 	 for ($i = 0; $i < $seq[2]; ++$i) {
1182  	 	 	 	 	 	 	 	 $char = $seq[1][$i];
1183  	 	 	 	 	 	 	 	 $char_id = ord($char);
1184  	 	 	 	 	 	 	 	 if (($char_id >= 241) AND ($char_id <= 244)) {
1185  	 	 	 	 	 	 	 	 	 $code_data[] = $fnc_a[$char_id];
1186  	 	 	 	 	 	 	 	 } else {
1187  	 	 	 	 	 	 	 	 	 $code_data[] = strpos($keys_a, $char);
1188  	 	 	 	 	 	 	 	 }
1189  	 	 	 	 	 	 	 }
1190  	 	 	 	 	 	 	 break;
1191  	 	 	 	 	 	 }
1192  	 	 	 	 	 	 case 'B': {
1193  	 	 	 	 	 	 	 if ($key == 0) {
1194  	 	 	 	 	 	 	 	 $tmpchr = ord($seq[1][0]);
1195  	 	 	 	 	 	 	 	 if (($seq[2] == 1) AND ($tmpchr >= 241) AND ($tmpchr <= 244) AND isset($sequence[($key + 1)]) AND ($sequence[($key + 1)][0] != 'B')) {
1196  	 	 	 	 	 	 	 	 	 switch ($sequence[($key + 1)][0]) {
1197  	 	 	 	 	 	 	 	 	 	 case 'A': {
1198  	 	 	 	 	 	 	 	 	 	 	 $startid = 103;
1199  	 	 	 	 	 	 	 	 	 	 	 $sequence[$key][0] = 'A';
1200  	 	 	 	 	 	 	 	 	 	 	 $code_data[] = $fnc_a[$tmpchr];
1201  	 	 	 	 	 	 	 	 	 	 	 break;
1202  	 	 	 	 	 	 	 	 	 	 }
1203  	 	 	 	 	 	 	 	 	 	 case 'C': {
1204  	 	 	 	 	 	 	 	 	 	 	 $startid = 105;
1205  	 	 	 	 	 	 	 	 	 	 	 $sequence[$key][0] = 'C';
1206  	 	 	 	 	 	 	 	 	 	 	 $code_data[] = $fnc_a[$tmpchr];
1207  	 	 	 	 	 	 	 	 	 	 	 break;
1208  	 	 	 	 	 	 	 	 	 	 }
1209  	 	 	 	 	 	 	 	 	 }
1210  	 	 	 	 	 	 	 	 	 break;
1211  	 	 	 	 	 	 	 	 } else {
1212  	 	 	 	 	 	 	 	 	 $startid = 104;
1213  	 	 	 	 	 	 	 	 }
1214  	 	 	 	 	 	 	 } elseif ($sequence[($key - 1)][0] != 'B') {
1215  	 	 	 	 	 	 	 	 if (($seq[2] == 1) AND ($key > 0) AND ($sequence[($key - 1)][0] == 'A') AND (!isset($sequence[($key - 1)][3]))) {
1216  	 	 	 	 	 	 	 	 	 // single character shift
1217  	 	 	 	 	 	 	 	 	 $code_data[] = 98;
1218  	 	 	 	 	 	 	 	 	 // mark shift
1219  	 	 	 	 	 	 	 	 	 $sequence[$key][3] = true;
1220  	 	 	 	 	 	 	 	 } elseif (!isset($sequence[($key - 1)][3])) {
1221  	 	 	 	 	 	 	 	 	 $code_data[] = 100;
1222  	 	 	 	 	 	 	 	 }
1223  	 	 	 	 	 	 	 }
1224  	 	 	 	 	 	 	 for ($i = 0; $i < $seq[2]; ++$i) {
1225  	 	 	 	 	 	 	 	 $char = $seq[1][$i];
1226  	 	 	 	 	 	 	 	 $char_id = ord($char);
1227  	 	 	 	 	 	 	 	 if (($char_id >= 241) AND ($char_id <= 244)) {
1228  	 	 	 	 	 	 	 	 	 $code_data[] = $fnc_b[$char_id];
1229  	 	 	 	 	 	 	 	 } else {
1230  	 	 	 	 	 	 	 	 	 $code_data[] = strpos($keys_b, $char);
1231  	 	 	 	 	 	 	 	 }
1232  	 	 	 	 	 	 	 }
1233  	 	 	 	 	 	 	 break;
1234  	 	 	 	 	 	 }
1235  	 	 	 	 	 	 case 'C': {
1236  	 	 	 	 	 	 	 if ($key == 0) {
1237  	 	 	 	 	 	 	 	 $startid = 105;
1238  	 	 	 	 	 	 	 } elseif ($sequence[($key - 1)][0] != 'C') {
1239  	 	 	 	 	 	 	 	 $code_data[] = 99;
1240  	 	 	 	 	 	 	 }
1241  	 	 	 	 	 	 	 for ($i = 0; $i < $seq[2]; $i+=2) {
1242  	 	 	 	 	 	 	 	 $chrnum = $seq[1][$i].$seq[1][$i+1];
1243  	 	 	 	 	 	 	 	 $code_data[] = intval($chrnum);
1244  	 	 	 	 	 	 	 }
1245  	 	 	 	 	 	 	 break;
1246  	 	 	 	 	 	 }
1247  	 	 	 	 	 }
1248  	 	 	 	 }
1249  	 	 	 }
1250  	 	 }
1251  	 	 // calculate check character
1252  	 	 $sum = $startid;
1253  	 	 foreach ($code_data as $key => $val) {
1254  	 	 	 $sum += ($val * ($key + 1));
1255  	 	 }
1256  	 	 // add check character
1257  	 	 $code_data[] = ($sum % 103);
1258  	 	 // add stop sequence
1259  	 	 $code_data[] = 106;
1260  	 	 $code_data[] = 107;
1261  	 	 // add start code at the beginning
1262  	 	 array_unshift($code_data, $startid);
1263  	 	 // build barcode array
1264  	 	 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
1265  	 	 foreach ($code_data as $val) {
1266  	 	 	 $seq = $chr[$val];
1267  	 	 	 for ($j = 0; $j < 6; ++$j) {
1268  	 	 	 	 if (($j % 2) == 0) {
1269  	 	 	 	 	 $t = true; // bar
1270  	 	 	 	 } else {
1271  	 	 	 	 	 $t = false; // space
1272  	 	 	 	 }
1273  	 	 	 	 $w = (float)$seq[$j];
1274  	 	 	 	 $bararray['bcode'][] = array('t' => $t, 'w' => $w, 'h' => 1, 'p' => 0);
1275  	 	 	 	 $bararray['maxw'] += $w;
1276  	 	 	 }
1277  	 	 }
1278  	 	 return $bararray;
1279  	 }
1280  
1281  	 /**
1282  	  * Split text code in A/B sequence for 128 code
1283  	  * @param string $code code to split.
1284  	  * @return array sequence
1285  	  * @protected
1286  	  */
1287  	protected function get128ABsequence($code) {
1288  	 	 $len = strlen($code);
1289  	 	 $sequence = array();
1290  	 	 // get A sequences (if any)
1291  	 	 $numseq = array();
1292  	 	 preg_match_all('/([\0-\31])/', $code, $numseq, PREG_OFFSET_CAPTURE);
1293  	 	 if (isset($numseq[1]) AND !empty($numseq[1])) {
1294  	 	 	 $end_offset = 0;
1295  	 	 	 foreach ($numseq[1] as $val) {
1296  	 	 	 	 $offset = $val[1];
1297  	 	 	 	 if ($offset > $end_offset) {
1298  	 	 	 	 	 // B sequence
1299  	 	 	 	 	 $sequence[] = array('B', substr($code, $end_offset, ($offset - $end_offset)), ($offset - $end_offset));
1300  	 	 	 	 }
1301  	 	 	 	 // A sequence
1302  	 	 	 	 $slen = strlen($val[0]);
1303  	 	 	 	 $sequence[] = array('A', substr($code, $offset, $slen), $slen);
1304  	 	 	 	 $end_offset = $offset + $slen;
1305  	 	 	 }
1306  	 	 	 if ($end_offset < $len) {
1307  	 	 	 	 $sequence[] = array('B', substr($code, $end_offset), ($len - $end_offset));
1308  	 	 	 }
1309  	 	 } else {
1310  	 	 	 // only B sequence
1311  	 	 	 $sequence[] = array('B', $code, $len);
1312  	 	 }
1313  	 	 return $sequence;
1314  	 }
1315  
1316  	 /**
1317  	  * EAN13 and UPC-A barcodes.
1318  	  * EAN13: European Article Numbering international retail product code
1319  	  * UPC-A: Universal product code seen on almost all retail products in the USA and Canada
1320  	  * UPC-E: Short version of UPC symbol
1321  	  * @param string $code code to represent.
1322  	  * @param string $len barcode type: 6 = UPC-E, 8 = EAN8, 13 = EAN13, 12 = UPC-A
1323  	  * @return array barcode representation.
1324  	  * @protected
1325  	  */
1326  	protected function barcode_eanupc($code, $len=13) {
1327  	 	 $upce = false;
1328  	 	 if ($len == 6) {
1329  	 	 	 $len = 12; // UPC-A
1330  	 	 	 $upce = true; // UPC-E mode
1331  	 	 }
1332  	 	 $data_len = $len - 1;
1333  	 	 //Padding
1334  	 	 $code = str_pad($code, $data_len, '0', STR_PAD_LEFT);
1335  	 	 $code_len = strlen($code);
1336  	 	 // calculate check digit
1337  	 	 $sum_a = 0;
1338  	 	 for ($i = 1; $i < $data_len; $i+=2) {
1339  	 	 	 $sum_a += $code[$i];
1340  	 	 }
1341  	 	 if ($len > 12) {
1342  	 	 	 $sum_a *= 3;
1343  	 	 }
1344  	 	 $sum_b = 0;
1345  	 	 for ($i = 0; $i < $data_len; $i+=2) {
1346  	 	 	 $sum_b += ($code[$i]);
1347  	 	 }
1348  	 	 if ($len < 13) {
1349  	 	 	 $sum_b *= 3;
1350  	 	 }
1351  	 	 $r = ($sum_a + $sum_b) % 10;
1352  	 	 if($r > 0) {
1353  	 	 	 $r = (10 - $r);
1354  	 	 }
1355  	 	 if ($code_len == $data_len) {
1356  	 	 	 // add check digit
1357  	 	 	 $code .= $r;
1358  	 	 } elseif ($r !== intval($code[$data_len])) {
1359  	 	 	 // wrong checkdigit
1360  	 	 	 return false;
1361  	 	 }
1362  	 	 if ($len == 12) {
1363  	 	 	 // UPC-A
1364  	 	 	 $code = '0'.$code;
1365  	 	 	 ++$len;
1366  	 	 }
1367  	 	 if ($upce) {
1368  	 	 	 // convert UPC-A to UPC-E
1369  	 	 	 $tmp = substr($code, 4, 3);
1370  	 	 	 if (($tmp == '000') OR ($tmp == '100') OR ($tmp == '200')) {
1371  	 	 	 	 // manufacturer code ends in 000, 100, or 200
1372  	 	 	 	 $upce_code = substr($code, 2, 2).substr($code, 9, 3).substr($code, 4, 1);
1373  	 	 	 } else {
1374  	 	 	 	 $tmp = substr($code, 5, 2);
1375  	 	 	 	 if ($tmp == '00') {
1376  	 	 	 	 	 // manufacturer code ends in 00
1377  	 	 	 	 	 $upce_code = substr($code, 2, 3).substr($code, 10, 2).'3';
1378  	 	 	 	 } else {
1379  	 	 	 	 	 $tmp = substr($code, 6, 1);
1380  	 	 	 	 	 if ($tmp == '0') {
1381  	 	 	 	 	 	 // manufacturer code ends in 0
1382  	 	 	 	 	 	 $upce_code = substr($code, 2, 4).substr($code, 11, 1).'4';
1383  	 	 	 	 	 } else {
1384  	 	 	 	 	 	 // manufacturer code does not end in zero
1385  	 	 	 	 	 	 $upce_code = substr($code, 2, 5).substr($code, 11, 1);
1386  	 	 	 	 	 }
1387  	 	 	 	 }
1388  	 	 	 }
1389  	 	 }
1390  	 	 //Convert digits to bars
1391  	 	 $codes = array(
1392  	 	 	 'A'=>array( // left odd parity
1393  	 	 	 	 '0'=>'0001101',
1394  	 	 	 	 '1'=>'0011001',
1395  	 	 	 	 '2'=>'0010011',
1396  	 	 	 	 '3'=>'0111101',
1397  	 	 	 	 '4'=>'0100011',
1398  	 	 	 	 '5'=>'0110001',
1399  	 	 	 	 '6'=>'0101111',
1400  	 	 	 	 '7'=>'0111011',
1401  	 	 	 	 '8'=>'0110111',
1402  	 	 	 	 '9'=>'0001011'),
1403  	 	 	 'B'=>array( // left even parity
1404  	 	 	 	 '0'=>'0100111',
1405  	 	 	 	 '1'=>'0110011',
1406  	 	 	 	 '2'=>'0011011',
1407  	 	 	 	 '3'=>'0100001',
1408  	 	 	 	 '4'=>'0011101',
1409  	 	 	 	 '5'=>'0111001',
1410  	 	 	 	 '6'=>'0000101',
1411  	 	 	 	 '7'=>'0010001',
1412  	 	 	 	 '8'=>'0001001',
1413  	 	 	 	 '9'=>'0010111'),
1414  	 	 	 'C'=>array( // right
1415  	 	 	 	 '0'=>'1110010',
1416  	 	 	 	 '1'=>'1100110',
1417  	 	 	 	 '2'=>'1101100',
1418  	 	 	 	 '3'=>'1000010',
1419  	 	 	 	 '4'=>'1011100',
1420  	 	 	 	 '5'=>'1001110',
1421  	 	 	 	 '6'=>'1010000',
1422  	 	 	 	 '7'=>'1000100',
1423  	 	 	 	 '8'=>'1001000',
1424  	 	 	 	 '9'=>'1110100')
1425  	 	 );
1426  	 	 $parities = array(
1427  	 	 	 '0'=>array('A','A','A','A','A','A'),
1428  	 	 	 '1'=>array('A','A','B','A','B','B'),
1429  	 	 	 '2'=>array('A','A','B','B','A','B'),
1430  	 	 	 '3'=>array('A','A','B','B','B','A'),
1431  	 	 	 '4'=>array('A','B','A','A','B','B'),
1432  	 	 	 '5'=>array('A','B','B','A','A','B'),
1433  	 	 	 '6'=>array('A','B','B','B','A','A'),
1434  	 	 	 '7'=>array('A','B','A','B','A','B'),
1435  	 	 	 '8'=>array('A','B','A','B','B','A'),
1436  	 	 	 '9'=>array('A','B','B','A','B','A')
1437  	 	 );
1438  	 	 $upce_parities = array();
1439  	 	 $upce_parities[0] = array(
1440  	 	 	 '0'=>array('B','B','B','A','A','A'),
1441  	 	 	 '1'=>array('B','B','A','B','A','A'),
1442  	 	 	 '2'=>array('B','B','A','A','B','A'),
1443  	 	 	 '3'=>array('B','B','A','A','A','B'),
1444  	 	 	 '4'=>array('B','A','B','B','A','A'),
1445  	 	 	 '5'=>array('B','A','A','B','B','A'),
1446  	 	 	 '6'=>array('B','A','A','A','B','B'),
1447  	 	 	 '7'=>array('B','A','B','A','B','A'),
1448  	 	 	 '8'=>array('B','A','B','A','A','B'),
1449  	 	 	 '9'=>array('B','A','A','B','A','B')
1450  	 	 );
1451  	 	 $upce_parities[1] = array(
1452  	 	 	 '0'=>array('A','A','A','B','B','B'),
1453  	 	 	 '1'=>array('A','A','B','A','B','B'),
1454  	 	 	 '2'=>array('A','A','B','B','A','B'),
1455  	 	 	 '3'=>array('A','A','B','B','B','A'),
1456  	 	 	 '4'=>array('A','B','A','A','B','B'),
1457  	 	 	 '5'=>array('A','B','B','A','A','B'),
1458  	 	 	 '6'=>array('A','B','B','B','A','A'),
1459  	 	 	 '7'=>array('A','B','A','B','A','B'),
1460  	 	 	 '8'=>array('A','B','A','B','B','A'),
1461  	 	 	 '9'=>array('A','B','B','A','B','A')
1462  	 	 );
1463  	 	 $k = 0;
1464  	 	 $seq = '101'; // left guard bar
1465  	 	 if ($upce) {
1466  	 	 	 $bararray = array('code' => $upce_code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
1467  	 	 	 $p = $upce_parities[$code[1]][$r];
1468  	 	 	 for ($i = 0; $i < 6; ++$i) {
1469  	 	 	 	 $seq .= $codes[$p[$i]][$upce_code[$i]];
1470  	 	 	 }
1471  	 	 	 $seq .= '010101'; // right guard bar
1472  	 	 } else {
1473  	 	 	 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
1474  	 	 	 $half_len = intval(ceil($len / 2));
1475  	 	 	 if ($len == 8) {
1476  	 	 	 	 for ($i = 0; $i < $half_len; ++$i) {
1477  	 	 	 	 	 $seq .= $codes['A'][$code[$i]];
1478  	 	 	 	 }
1479  	 	 	 } else {
1480  	 	 	 	 $p = $parities[$code[0]];
1481  	 	 	 	 for ($i = 1; $i < $half_len; ++$i) {
1482  	 	 	 	 	 $seq .= $codes[$p[$i-1]][$code[$i]];
1483  	 	 	 	 }
1484  	 	 	 }
1485  	 	 	 $seq .= '01010'; // center guard bar
1486  	 	 	 for ($i = $half_len; $i < $len; ++$i) {
1487  	 	 	 	 $seq .= $codes['C'][$code[$i]];
1488  	 	 	 }
1489  	 	 	 $seq .= '101'; // right guard bar
1490  	 	 }
1491  	 	 $clen = strlen($seq);
1492  	 	 $w = 0;
1493  	 	 for ($i = 0; $i < $clen; ++$i) {
1494  	 	 	 $w += 1;
1495  	 	 	 if (($i == ($clen - 1)) OR (($i < ($clen - 1)) AND ($seq[$i] != $seq[$i+1]))) {
1496  	 	 	 	 if ($seq[$i] == '1') {
1497  	 	 	 	 	 $t = true; // bar
1498  	 	 	 	 } else {
1499  	 	 	 	 	 $t = false; // space
1500  	 	 	 	 }
1501  	 	 	 	 $bararray['bcode'][$k] = array('t' => $t, 'w' => $w, 'h' => 1, 'p' => 0);
1502  	 	 	 	 $bararray['maxw'] += $w;
1503  	 	 	 	 ++$k;
1504  	 	 	 	 $w = 0;
1505  	 	 	 }
1506  	 	 }
1507  	 	 return $bararray;
1508  	 }
1509  
1510  	 /**
1511  	  * UPC-Based Extensions
1512  	  * 2-Digit Ext.: Used to indicate magazines and newspaper issue numbers
1513  	  * 5-Digit Ext.: Used to mark suggested retail price of books
1514  	  * @param string $code code to represent.
1515  	  * @param string $len barcode type: 2 = 2-Digit, 5 = 5-Digit
1516  	  * @return array barcode representation.
1517  	  * @protected
1518  	  */
1519  	protected function barcode_eanext($code, $len=5) {
1520  	 	 //Padding
1521  	 	 $code = str_pad($code, $len, '0', STR_PAD_LEFT);
1522  	 	 // calculate check digit
1523  	 	 if ($len == 2) {
1524  	 	 	 $r = $code % 4;
1525  	 	 } elseif ($len == 5) {
1526  	 	 	 $r = (3 * ($code[0] + $code[2] + $code[4])) + (9 * ($code[1] + $code[3]));
1527  	 	 	 $r %= 10;
1528  	 	 } else {
1529  	 	 	 return false;
1530  	 	 }
1531  	 	 //Convert digits to bars
1532  	 	 $codes = array(
1533  	 	 	 'A'=>array( // left odd parity
1534  	 	 	 	 '0'=>'0001101',
1535  	 	 	 	 '1'=>'0011001',
1536  	 	 	 	 '2'=>'0010011',
1537  	 	 	 	 '3'=>'0111101',
1538  	 	 	 	 '4'=>'0100011',
1539  	 	 	 	 '5'=>'0110001',
1540  	 	 	 	 '6'=>'0101111',
1541  	 	 	 	 '7'=>'0111011',
1542  	 	 	 	 '8'=>'0110111',
1543  	 	 	 	 '9'=>'0001011'),
1544  	 	 	 'B'=>array( // left even parity
1545  	 	 	 	 '0'=>'0100111',
1546  	 	 	 	 '1'=>'0110011',
1547  	 	 	 	 '2'=>'0011011',
1548  	 	 	 	 '3'=>'0100001',
1549  	 	 	 	 '4'=>'0011101',
1550  	 	 	 	 '5'=>'0111001',
1551  	 	 	 	 '6'=>'0000101',
1552  	 	 	 	 '7'=>'0010001',
1553  	 	 	 	 '8'=>'0001001',
1554  	 	 	 	 '9'=>'0010111')
1555  	 	 );
1556  	 	 $parities = array();
1557  	 	 $parities[2] = array(
1558  	 	 	 '0'=>array('A','A'),
1559  	 	 	 '1'=>array('A','B'),
1560  	 	 	 '2'=>array('B','A'),
1561  	 	 	 '3'=>array('B','B')
1562  	 	 );
1563  	 	 $parities[5] = array(
1564  	 	 	 '0'=>array('B','B','A','A','A'),
1565  	 	 	 '1'=>array('B','A','B','A','A'),
1566  	 	 	 '2'=>array('B','A','A','B','A'),
1567  	 	 	 '3'=>array('B','A','A','A','B'),
1568  	 	 	 '4'=>array('A','B','B','A','A'),
1569  	 	 	 '5'=>array('A','A','B','B','A'),
1570  	 	 	 '6'=>array('A','A','A','B','B'),
1571  	 	 	 '7'=>array('A','B','A','B','A'),
1572  	 	 	 '8'=>array('A','B','A','A','B'),
1573  	 	 	 '9'=>array('A','A','B','A','B')
1574  	 	 );
1575  	 	 $p = $parities[$len][$r];
1576  	 	 $seq = '1011'; // left guard bar
1577  	 	 $seq .= $codes[$p[0]][$code[0]];
1578  	 	 for ($i = 1; $i < $len; ++$i) {
1579  	 	 	 $seq .= '01'; // separator
1580  	 	 	 $seq .= $codes[$p[$i]][$code[$i]];
1581  	 	 }
1582  	 	 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
1583  	 	 return $this->binseq_to_array($seq, $bararray);
1584  	 }
1585  
1586  	 /**
1587  	  * POSTNET and PLANET barcodes.
1588  	  * Used by U.S. Postal Service for automated mail sorting
1589  	  * @param string $code zip code to represent. Must be a string containing a zip code of the form DDDDD or DDDDD-DDDD.
1590  	  * @param boolean $planet if true print the PLANET barcode, otherwise print POSTNET
1591  	  * @return array barcode representation.
1592  	  * @protected
1593  	  */
1594  	protected function barcode_postnet($code, $planet=false) {
1595  	 	 // bar length
1596  	 	 if ($planet) {
1597  	 	 	 $barlen = Array(
1598  	 	 	 	 0 => Array(1,1,2,2,2),
1599  	 	 	 	 1 => Array(2,2,2,1,1),
1600  	 	 	 	 2 => Array(2,2,1,2,1),
1601  	 	 	 	 3 => Array(2,2,1,1,2),
1602  	 	 	 	 4 => Array(2,1,2,2,1),
1603  	 	 	 	 5 => Array(2,1,2,1,2),
1604  	 	 	 	 6 => Array(2,1,1,2,2),
1605  	 	 	 	 7 => Array(1,2,2,2,1),
1606  	 	 	 	 8 => Array(1,2,2,1,2),
1607  	 	 	 	 9 => Array(1,2,1,2,2)
1608  	 	 	 );
1609  	 	 } else {
1610  	 	 	 $barlen = Array(
1611  	 	 	 	 0 => Array(2,2,1,1,1),
1612  	 	 	 	 1 => Array(1,1,1,2,2),
1613  	 	 	 	 2 => Array(1,1,2,1,2),
1614  	 	 	 	 3 => Array(1,1,2,2,1),
1615  	 	 	 	 4 => Array(1,2,1,1,2),
1616  	 	 	 	 5 => Array(1,2,1,2,1),
1617  	 	 	 	 6 => Array(1,2,2,1,1),
1618  	 	 	 	 7 => Array(2,1,1,1,2),
1619  	 	 	 	 8 => Array(2,1,1,2,1),
1620  	 	 	 	 9 => Array(2,1,2,1,1)
1621  	 	 	 );
1622  	 	 }
1623  	 	 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 2, 'bcode' => array());
1624  	 	 $k = 0;
1625  	 	 $code = str_replace('-', '', $code);
1626  	 	 $code = str_replace(' ', '', $code);
1627  	 	 $len = strlen($code);
1628  	 	 // calculate checksum
1629  	 	 $sum = 0;
1630  	 	 for ($i = 0; $i < $len; ++$i) {
1631  	 	 	 $sum += intval($code[$i]);
1632  	 	 }
1633  	 	 $chkd = ($sum % 10);
1634  	 	 if($chkd > 0) {
1635  	 	 	 $chkd = (10 - $chkd);
1636  	 	 }
1637  	 	 $code .= $chkd;
1638  	 	 $len = strlen($code);
1639  	 	 // start bar
1640  	 	 $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => 2, 'p' => 0);
1641  	 	 $bararray['bcode'][$k++] = array('t' => 0, 'w' => 1, 'h' => 2, 'p' => 0);
1642  	 	 $bararray['maxw'] += 2;
1643  	 	 for ($i = 0; $i < $len; ++$i) {
1644  	 	 	 for ($j = 0; $j < 5; ++$j) {
1645  	 	 	 	 $h = $barlen[$code[$i]][$j];
1646  	 	 	 	 $p = floor(1 / $h);
1647  	 	 	 	 $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => $h, 'p' => $p);
1648  	 	 	 	 $bararray['bcode'][$k++] = array('t' => 0, 'w' => 1, 'h' => 2, 'p' => 0);
1649  	 	 	 	 $bararray['maxw'] += 2;
1650  	 	 	 }
1651  	 	 }
1652  	 	 // end bar
1653  	 	 $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => 2, 'p' => 0);
1654  	 	 $bararray['maxw'] += 1;
1655  	 	 return $bararray;
1656  	 }
1657  
1658  	 /**
1659  	  * RMS4CC - CBC - KIX
1660  	  * RMS4CC (Royal Mail 4-state Customer Code) - CBC (Customer Bar Code) - KIX (Klant index - Customer index)
1661  	  * RM4SCC is the name of the barcode symbology used by the Royal Mail for its Cleanmail service.
1662  	  * @param string $code code to print
1663  	  * @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.
1664  	  * @return array barcode representation.
1665  	  * @protected
1666  	  */
1667  	protected function barcode_rms4cc($code, $kix=false) {
1668  	 	 $notkix = !$kix;
1669  	 	 // bar mode
1670  	 	 // 1 = pos 1, length 2
1671  	 	 // 2 = pos 1, length 3
1672  	 	 // 3 = pos 2, length 1
1673  	 	 // 4 = pos 2, length 2
1674  	 	 $barmode = array(
1675  	 	 	 '0' => array(3,3,2,2),
1676  	 	 	 '1' => array(3,4,1,2),
1677  	 	 	 '2' => array(3,4,2,1),
1678  	 	 	 '3' => array(4,3,1,2),
1679  	 	 	 '4' => array(4,3,2,1),
1680  	 	 	 '5' => array(4,4,1,1),
1681  	 	 	 '6' => array(3,1,4,2),
1682  	 	 	 '7' => array(3,2,3,2),
1683  	 	 	 '8' => array(3,2,4,1),
1684  	 	 	 '9' => array(4,1,3,2),
1685  	 	 	 'A' => array(4,1,4,1),
1686  	 	 	 'B' => array(4,2,3,1),
1687  	 	 	 'C' => array(3,1,2,4),
1688  	 	 	 'D' => array(3,2,1,4),
1689  	 	 	 'E' => array(3,2,2,3),
1690  	 	 	 'F' => array(4,1,1,4),
1691  	 	 	 'G' => array(4,1,2,3),
1692  	 	 	 'H' => array(4,2,1,3),
1693  	 	 	 'I' => array(1,3,4,2),
1694  	 	 	 'J' => array(1,4,3,2),
1695  	 	 	 'K' => array(1,4,4,1),
1696  	 	 	 'L' => array(2,3,3,2),
1697  	 	 	 'M' => array(2,3,4,1),
1698  	 	 	 'N' => array(2,4,3,1),
1699  	 	 	 'O' => array(1,3,2,4),
1700  	 	 	 'P' => array(1,4,1,4),
1701  	 	 	 'Q' => array(1,4,2,3),
1702  	 	 	 'R' => array(2,3,1,4),
1703  	 	 	 'S' => array(2,3,2,3),
1704  	 	 	 'T' => array(2,4,1,3),
1705  	 	 	 'U' => array(1,1,4,4),
1706  	 	 	 'V' => array(1,2,3,4),
1707  	 	 	 'W' => array(1,2,4,3),
1708  	 	 	 'X' => array(2,1,3,4),
1709  	 	 	 'Y' => array(2,1,4,3),
1710  	 	 	 'Z' => array(2,2,3,3)
1711  	 	 );
1712  	 	 $code = strtoupper($code);
1713  	 	 $len = strlen($code);
1714  	 	 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 3, 'bcode' => array());
1715  	 	 if ($notkix) {
1716  	 	 	 // table for checksum calculation (row,col)
1717  	 	 	 $checktable = array(
1718  	 	 	 	 '0' => array(1,1),
1719  	 	 	 	 '1' => array(1,2),
1720  	 	 	 	 '2' => array(1,3),
1721  	 	 	 	 '3' => array(1,4),
1722  	 	 	 	 '4' => array(1,5),
1723  	 	 	 	 '5' => array(1,0),
1724  	 	 	 	 '6' => array(2,1),
1725  	 	 	 	 '7' => array(2,2),
1726  	 	 	 	 '8' => array(2,3),
1727  	 	 	 	 '9' => array(2,4),
1728  	 	 	 	 'A' => array(2,5),
1729  	 	 	 	 'B' => array(2,0),
1730  	 	 	 	 'C' => array(3,1),
1731  	 	 	 	 'D' => array(3,2),
1732  	 	 	 	 'E' => array(3,3),
1733  	 	 	 	 'F' => array(3,4),
1734  	 	 	 	 'G' => array(3,5),
1735  	 	 	 	 'H' => array(3,0),
1736  	 	 	 	 'I' => array(4,1),
1737  	 	 	 	 'J' => array(4,2),
1738  	 	 	 	 'K' => array(4,3),
1739  	 	 	 	 'L' => array(4,4),
1740  	 	 	 	 'M' => array(4,5),
1741  	 	 	 	 'N' => array(4,0),
1742  	 	 	 	 'O' => array(5,1),
1743  	 	 	 	 'P' => array(5,2),
1744  	 	 	 	 'Q' => array(5,3),
1745  	 	 	 	 'R' => array(5,4),
1746  	 	 	 	 'S' => array(5,5),
1747  	 	 	 	 'T' => array(5,0),
1748  	 	 	 	 'U' => array(0,1),
1749  	 	 	 	 'V' => array(0,2),
1750  	 	 	 	 'W' => array(0,3),
1751  	 	 	 	 'X' => array(0,4),
1752  	 	 	 	 'Y' => array(0,5),
1753  	 	 	 	 'Z' => array(0,0)
1754  	 	 	 );
1755  	 	 	 $row = 0;
1756  	 	 	 $col = 0;
1757  	 	 	 for ($i = 0; $i < $len; ++$i) {
1758  	 	 	 	 $row += $checktable[$code[$i]][0];
1759  	 	 	 	 $col += $checktable[$code[$i]][1];
1760  	 	 	 }
1761  	 	 	 $row %= 6;
1762  	 	 	 $col %= 6;
1763  	 	 	 $chk = array_keys($checktable, array($row,$col));
1764  	 	 	 $code .= $chk[0];
1765  	 	 	 ++$len;
1766  	 	 }
1767  	 	 $k = 0;
1768  	 	 if ($notkix) {
1769  	 	 	 // start bar
1770  	 	 	 $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => 2, 'p' => 0);
1771  	 	 	 $bararray['bcode'][$k++] = array('t' => 0, 'w' => 1, 'h' => 2, 'p' => 0);
1772  	 	 	 $bararray['maxw'] += 2;
1773  	 	 }
1774  	 	 for ($i = 0; $i < $len; ++$i) {
1775  	 	 	 for ($j = 0; $j < 4; ++$j) {
1776  	 	 	 	 switch ($barmode[$code[$i]][$j]) {
1777  	 	 	 	 	 case 1: {
1778  	 	 	 	 	 	 $p = 0;
1779  	 	 	 	 	 	 $h = 2;
1780  	 	 	 	 	 	 break;
1781  	 	 	 	 	 }
1782  	 	 	 	 	 case 2: {
1783  	 	 	 	 	 	 $p = 0;
1784  	 	 	 	 	 	 $h = 3;
1785  	 	 	 	 	 	 break;
1786  	 	 	 	 	 }
1787  	 	 	 	 	 case 3: {
1788  	 	 	 	 	 	 $p = 1;
1789  	 	 	 	 	 	 $h = 1;
1790  	 	 	 	 	 	 break;
1791  	 	 	 	 	 }
1792  	 	 	 	 	 case 4: {
1793  	 	 	 	 	 	 $p = 1;
1794  	 	 	 	 	 	 $h = 2;
1795  	 	 	 	 	 	 break;
1796  	 	 	 	 	 }
1797  	 	 	 	 }
1798  	 	 	 	 $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => $h, 'p' => $p);
1799  	 	 	 	 $bararray['bcode'][$k++] = array('t' => 0, 'w' => 1, 'h' => 2, 'p' => 0);
1800  	 	 	 	 $bararray['maxw'] += 2;
1801  	 	 	 }
1802  	 	 }
1803  	 	 if ($notkix) {
1804  	 	 	 // stop bar
1805  	 	 	 $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => 3, 'p' => 0);
1806  	 	 	 $bararray['maxw'] += 1;
1807  	 	 }
1808  	 	 return $bararray;
1809  	 }
1810  
1811  	 /**
1812  	  * CODABAR barcodes.
1813  	  * Older code often used in library systems, sometimes in blood banks
1814  	  * @param string $code code to represent.
1815  	  * @return array barcode representation.
1816  	  * @protected
1817  	  */
1818  	protected function barcode_codabar($code) {
1819  	 	 $chr = array(
1820  	 	 	 '0' => '11111221',
1821  	 	 	 '1' => '11112211',
1822  	 	 	 '2' => '11121121',
1823  	 	 	 '3' => '22111111',
1824  	 	 	 '4' => '11211211',
1825  	 	 	 '5' => '21111211',
1826  	 	 	 '6' => '12111121',
1827  	 	 	 '7' => '12112111',
1828  	 	 	 '8' => '12211111',
1829  	 	 	 '9' => '21121111',
1830  	 	 	 '-' => '11122111',
1831  	 	 	 '$' => '11221111',
1832  	 	 	 ':' => '21112121',
1833  	 	 	 '/' => '21211121',
1834  	 	 	 '.' => '21212111',
1835  	 	 	 '+' => '11222221',
1836  	 	 	 'A' => '11221211',
1837  	 	 	 'B' => '12121121',
1838  	 	 	 'C' => '11121221',
1839  	 	 	 'D' => '11122211'
1840  	 	 );
1841  	 	 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
1842  	 	 $k = 0;
1843  	 	 $w = 0;
1844  	 	 $seq = '';
1845  	 	 $code = 'A'.strtoupper($code).'A';
1846  	 	 $len = strlen($code);
1847  	 	 for ($i = 0; $i < $len; ++$i) {
1848  	 	 	 if (!isset($chr[$code[$i]])) {
1849  	 	 	 	 return false;
1850  	 	 	 }
1851  	 	 	 $seq = $chr[$code[$i]];
1852  	 	 	 for ($j = 0; $j < 8; ++$j) {
1853  	 	 	 	 if (($j % 2) == 0) {
1854  	 	 	 	 	 $t = true; // bar
1855  	 	 	 	 } else {
1856  	 	 	 	 	 $t = false; // space
1857  	 	 	 	 }
1858  	 	 	 	 $w = (float)$seq[$j];
1859  	 	 	 	 $bararray['bcode'][$k] = array('t' => $t, 'w' => $w, 'h' => 1, 'p' => 0);
1860  	 	 	 	 $bararray['maxw'] += $w;
1861  	 	 	 	 ++$k;
1862  	 	 	 }
1863  	 	 }
1864  	 	 return $bararray;
1865  	 }
1866  
1867  	 /**
1868  	  * CODE11 barcodes.
1869  	  * Used primarily for labeling telecommunications equipment
1870  	  * @param string $code code to represent.
1871  	  * @return array barcode representation.
1872  	  * @protected
1873  	  */
1874  	protected function barcode_code11($code) {
1875  	 	 $chr = array(
1876  	 	 	 '0' => '111121',
1877  	 	 	 '1' => '211121',
1878  	 	 	 '2' => '121121',
1879  	 	 	 '3' => '221111',
1880  	 	 	 '4' => '112121',
1881  	 	 	 '5' => '212111',
1882  	 	 	 '6' => '122111',
1883  	 	 	 '7' => '111221',
1884  	 	 	 '8' => '211211',
1885  	 	 	 '9' => '211111',
1886  	 	 	 '-' => '112111',
1887  	 	 	 'S' => '112211'
1888  	 	 );
1889  	 	 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
1890  	 	 $k = 0;
1891  	 	 $w = 0;
1892  	 	 $seq = '';
1893  	 	 $len = strlen($code);
1894  	 	 // calculate check digit C
1895  	 	 $p = 1;
1896  	 	 $check = 0;
1897  	 	 for ($i = ($len - 1); $i >= 0; --$i) {
1898  	 	 	 $digit = $code[$i];
1899  	 	 	 if ($digit == '-') {
1900  	 	 	 	 $dval = 10;
1901  	 	 	 } else {
1902  	 	 	 	 $dval = intval($digit);
1903  	 	 	 }
1904  	 	 	 $check += ($dval * $p);
1905  	 	 	 ++$p;
1906  	 	 	 if ($p > 10) {
1907  	 	 	 	 $p = 1;
1908  	 	 	 }
1909  	 	 }
1910  	 	 $check %= 11;
1911  	 	 if ($check == 10) {
1912  	 	 	 $check = '-';
1913  	 	 }
1914  	 	 $code .= $check;
1915  	 	 if ($len > 10) {
1916  	 	 	 // calculate check digit K
1917  	 	 	 $p = 1;
1918  	 	 	 $check = 0;
1919  	 	 	 for ($i = $len; $i >= 0; --$i) {
1920  	 	 	 	 $digit = $code[$i];
1921  	 	 	 	 if ($digit == '-') {
1922  	 	 	 	 	 $dval = 10;
1923  	 	 	 	 } else {
1924  	 	 	 	 	 $dval = intval($digit);
1925  	 	 	 	 }
1926  	 	 	 	 $check += ($dval * $p);
1927  	 	 	 	 ++$p;
1928  	 	 	 	 if ($p > 9) {
1929  	 	 	 	 	 $p = 1;
1930  	 	 	 	 }
1931  	 	 	 }
1932  	 	 	 $check %= 11;
1933  	 	 	 $code .= $check;
1934  	 	 	 ++$len;
1935  	 	 }
1936  	 	 $code = 'S'.$code.'S';
1937  	 	 $len += 3;
1938  	 	 for ($i = 0; $i < $len; ++$i) {
1939  	 	 	 if (!isset($chr[$code[$i]])) {
1940  	 	 	 	 return false;
1941  	 	 	 }
1942  	 	 	 $seq = $chr[$code[$i]];
1943  	 	 	 for ($j = 0; $j < 6; ++$j) {
1944  	 	 	 	 if (($j % 2) == 0) {
1945  	 	 	 	 	 $t = true; // bar
1946  	 	 	 	 } else {
1947  	 	 	 	 	 $t = false; // space
1948  	 	 	 	 }
1949  	 	 	 	 $w = (float)$seq[$j];
1950  	 	 	 	 $bararray['bcode'][$k] = array('t' => $t, 'w' => $w, 'h' => 1, 'p' => 0);
1951  	 	 	 	 $bararray['maxw'] += $w;
1952  	 	 	 	 ++$k;
1953  	 	 	 }
1954  	 	 }
1955  	 	 return $bararray;
1956  	 }
1957  
1958  	 /**
1959  	  * Pharmacode
1960  	  * Contains digits (0 to 9)
1961  	  * @param string $code code to represent.
1962  	  * @return array barcode representation.
1963  	  * @protected
1964  	  */
1965  	protected function barcode_pharmacode($code) {
1966  	 	 $seq = '';
1967  	 	 $code = intval($code);
1968  	 	 while ($code > 0) {
1969  	 	 	 if (($code % 2) == 0) {
1970  	 	 	 	 $seq .= '11100';
1971  	 	 	 	 $code -= 2;
1972  	 	 	 } else {
1973  	 	 	 	 $seq .= '100';
1974  	 	 	 	 $code -= 1;
1975  	 	 	 }
1976  	 	 	 $code /= 2;
1977  	 	 }
1978  	 	 $seq = substr($seq, 0, -2);
1979  	 	 $seq = strrev($seq);
1980  	 	 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
1981  	 	 return $this->binseq_to_array($seq, $bararray);
1982  	 }
1983  
1984  	 /**
1985  	  * Pharmacode two-track
1986  	  * Contains digits (0 to 9)
1987  	  * @param string $code code to represent.
1988  	  * @return array barcode representation.
1989  	  * @protected
1990  	  */
1991  	protected function barcode_pharmacode2t($code) {
1992  	 	 $seq = '';
1993  	 	 $code = intval($code);
1994  	 	 do {
1995  	 	 	 switch ($code % 3) {
1996  	 	 	 	 case 0: {
1997  	 	 	 	 	 $seq .= '3';
1998  	 	 	 	 	 $code = ($code - 3) / 3;
1999  	 	 	 	 	 break;
2000  	 	 	 	 }
2001  	 	 	 	 case 1: {
2002  	 	 	 	 	 $seq .= '1';
2003  	 	 	 	 	 $code = ($code - 1) / 3;
2004  	 	 	 	 	 break;
2005  	 	 	 	 }
2006  	 	 	 	 case 2: {
2007  	 	 	 	 	 $seq .= '2';
2008  	 	 	 	 	 $code = ($code - 2) / 3;
2009  	 	 	 	 	 break;
2010  	 	 	 	 }
2011  	 	 	 }
2012  	 	 } while($code != 0);
2013  	 	 $seq = strrev($seq);
2014  	 	 $k = 0;
2015  	 	 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 2, 'bcode' => array());
2016  	 	 $len = strlen($seq);
2017  	 	 for ($i = 0; $i < $len; ++$i) {
2018  	 	 	 switch ($seq[$i]) {
2019  	 	 	 	 case '1': {
2020  	 	 	 	 	 $p = 1;
2021  	 	 	 	 	 $h = 1;
2022  	 	 	 	 	 break;
2023  	 	 	 	 }
2024  	 	 	 	 case '2': {
2025  	 	 	 	 	 $p = 0;
2026  	 	 	 	 	 $h = 1;
2027  	 	 	 	 	 break;
2028  	 	 	 	 }
2029  	 	 	 	 case '3': {
2030  	 	 	 	 	 $p = 0;
2031  	 	 	 	 	 $h = 2;
2032  	 	 	 	 	 break;
2033  	 	 	 	 }
2034  	 	 	 }
2035  	 	 	 $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => $h, 'p' => $p);
2036  	 	 	 $bararray['bcode'][$k++] = array('t' => 0, 'w' => 1, 'h' => 2, 'p' => 0);
2037  	 	 	 $bararray['maxw'] += 2;
2038  	 	 }
2039  	 	 unset($bararray['bcode'][($k - 1)]);
2040  	 	 --$bararray['maxw'];
2041  	 	 return $bararray;
2042  	 }
2043  
2044  	 /**
2045  	  * IMB - Intelligent Mail Barcode - Onecode - USPS-B-3200
2046  	  * (requires PHP bcmath extension)
2047  	  * Intelligent Mail barcode is a 65-bar code for use on mail in the United States.
2048  	  * The fields are described as follows:<ul><li>The Barcode Identifier shall be assigned by USPS to encode the presort identification that is currently printed in human readable form on the optional endorsement line (OEL) as well as for future USPS use. This shall be two digits, with the second digit in the range of 0–4. The allowable encoding ranges shall be 00–04, 10–14, 20–24, 30–34, 40–44, 50–54, 60–64, 70–74, 80–84, and 90–94.</li><li>The Service Type Identifier shall be assigned by USPS for any combination of services requested on the mailpiece. The allowable encoding range shall be 000http://it2.php.net/manual/en/function.dechex.php–999. Each 3-digit value shall correspond to a particular mail class with a particular combination of service(s). Each service program, such as OneCode Confirm and OneCode ACS, shall provide the list of Service Type Identifier values.</li><li>The Mailer or Customer Identifier shall be assigned by USPS as a unique, 6 or 9 digit number that identifies a business entity. The allowable encoding range for the 6 digit Mailer ID shall be 000000- 899999, while the allowable encoding range for the 9 digit Mailer ID shall be 900000000-999999999.</li><li>The Serial or Sequence Number shall be assigned by the mailer for uniquely identifying and tracking mailpieces. The allowable encoding range shall be 000000000–999999999 when used with a 6 digit Mailer ID and 000000-999999 when used with a 9 digit Mailer ID. e. The Delivery Point ZIP Code shall be assigned by the mailer for routing the mailpiece. This shall replace POSTNET for routing the mailpiece to its final delivery point. The length may be 0, 5, 9, or 11 digits. The allowable encoding ranges shall be no ZIP Code, 00000–99999,  000000000–999999999, and 00000000000–99999999999.</li></ul>
2049  	  * @param string $code code to print, separate the ZIP (routing code) from the rest using a minus char '-' (BarcodeID_ServiceTypeID_MailerID_SerialNumber-RoutingCode)
2050  	  * @return array barcode representation.
2051  	  * @protected
2052  	  */
2053  	protected function barcode_imb($code) {
2054  	 	 $asc_chr = array(4,0,2,6,3,5,1,9,8,7,1,2,0,6,4,8,2,9,5,3,0,1,3,7,4,6,8,9,2,0,5,1,9,4,3,8,6,7,1,2,4,3,9,5,7,8,3,0,2,1,4,0,9,1,7,0,2,4,6,3,7,1,9,5,8);
2055  	 	 $dsc_chr = array(7,1,9,5,8,0,2,4,6,3,5,8,9,7,3,0,6,1,7,4,6,8,9,2,5,1,7,5,4,3,8,7,6,0,2,5,4,9,3,0,1,6,8,2,0,4,5,9,6,7,5,2,6,3,8,5,1,9,8,7,4,0,2,6,3);
2056  	 	 $asc_pos = array(3,0,8,11,1,12,8,11,10,6,4,12,2,7,9,6,7,9,2,8,4,0,12,7,10,9,0,7,10,5,7,9,6,8,2,12,1,4,2,0,1,5,4,6,12,1,0,9,4,7,5,10,2,6,9,11,2,12,6,7,5,11,0,3,2);
2057  	 	 $dsc_pos = array(2,10,12,5,9,1,5,4,3,9,11,5,10,1,6,3,4,1,10,0,2,11,8,6,1,12,3,8,6,4,4,11,0,6,1,9,11,5,3,7,3,10,7,11,8,2,10,3,5,8,0,3,12,11,8,4,5,1,3,0,7,12,9,8,10);
2058  	 	 $code_arr = explode('-', $code);
2059  	 	 $tracking_number = $code_arr[0];
2060  	 	 if (isset($code_arr[1])) {
2061  	 	 	 $routing_code = $code_arr[1];
2062  	 	 } else {
2063  	 	 	 $routing_code = '';
2064  	 	 }
2065  	 	 // Conversion of Routing Code
2066  	 	 switch (strlen($routing_code)) {
2067  	 	 	 case 0: {
2068  	 	 	 	 $binary_code = 0;
2069  	 	 	 	 break;
2070  	 	 	 }
2071  	 	 	 case 5: {
2072  	 	 	 	 $binary_code = bcadd($routing_code, '1');
2073  	 	 	 	 break;
2074  	 	 	 }
2075  	 	 	 case 9: {
2076  	 	 	 	 $binary_code = bcadd($routing_code, '100001');
2077  	 	 	 	 break;
2078  	 	 	 }
2079  	 	 	 case 11: {
2080  	 	 	 	 $binary_code = bcadd($routing_code, '1000100001');
2081  	 	 	 	 break;
2082  	 	 	 }
2083  	 	 	 default: {
2084  	 	 	 	 return false;
2085  	 	 	 	 break;
2086  	 	 	 }
2087  	 	 }
2088  	 	 $binary_code = bcmul($binary_code, 10);
2089  	 	 $binary_code = bcadd($binary_code, $tracking_number[0]);
2090  	 	 $binary_code = bcmul($binary_code, 5);
2091  	 	 $binary_code = bcadd($binary_code, $tracking_number[1]);
2092  	 	 $binary_code .= substr($tracking_number, 2, 18);
2093  	 	 // convert to hexadecimal
2094  	 	 $binary_code = $this->dec_to_hex($binary_code);
2095  	 	 // pad to get 13 bytes
2096  	 	 $binary_code = str_pad($binary_code, 26, '0', STR_PAD_LEFT);
2097  	 	 // convert string to array of bytes
2098  	 	 $binary_code_arr = chunk_split($binary_code, 2, "\r");
2099  	 	 $binary_code_arr = substr($binary_code_arr, 0, -1);
2100  	 	 $binary_code_arr = explode("\r", $binary_code_arr);
2101  	 	 // calculate frame check sequence
2102  	 	 $fcs = $this->imb_crc11fcs($binary_code_arr);
2103  	 	 // exclude first 2 bits from first byte
2104  	 	 $first_byte = sprintf('%2s', dechex((hexdec($binary_code_arr[0]) << 2) >> 2));
2105  	 	 $binary_code_102bit = $first_byte.substr($binary_code, 2);
2106  	 	 // convert binary data to codewords
2107  	 	 $codewords = array();
2108  	 	 $data = $this->hex_to_dec($binary_code_102bit);
2109  	 	 $codewords[0] = bcmod($data, 636) * 2;
2110  	 	 $data = bcdiv($data, 636);
2111  	 	 for ($i = 1; $i < 9; ++$i) {
2112  	 	 	 $codewords[$i] = bcmod($data, 1365);
2113  	 	 	 $data = bcdiv($data, 1365);
2114  	 	 }
2115  	 	 $codewords[9] = $data;
2116  	 	 if (($fcs >> 10) == 1) {
2117  	 	 	 $codewords[9] += 659;
2118  	 	 }
2119  	 	 // generate lookup tables
2120  	 	 $table2of13 = $this->imb_tables(2, 78);
2121  	 	 $table5of13 = $this->imb_tables(5, 1287);
2122  	 	 // convert codewords to characters
2123  	 	 $characters = array();
2124  	 	 $bitmask = 512;
2125  	 	 foreach($codewords as $k => $val) {
2126  	 	 	 if ($val <= 1286) {
2127  	 	 	 	 $chrcode = $table5of13[$val];
2128  	 	 	 } else {
2129  	 	 	 	 $chrcode = $table2of13[($val - 1287)];
2130  	 	 	 }
2131  	 	 	 if (($fcs & $bitmask) > 0) {
2132  	 	 	 	 // bitwise invert
2133  	 	 	 	 $chrcode = ((~$chrcode) & 8191);
2134  	 	 	 }
2135  	 	 	 $characters[] = $chrcode;
2136  	 	 	 $bitmask /= 2;
2137  	 	 }
2138  	 	 $characters = array_reverse($characters);
2139  	 	 // build bars
2140  	 	 $k = 0;
2141  	 	 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 3, 'bcode' => array());
2142  	 	 for ($i = 0; $i < 65; ++$i) {
2143  	 	 	 $asc = (($characters[$asc_chr[$i]] & pow(2, $asc_pos[$i])) > 0);
2144  	 	 	 $dsc = (($characters[$dsc_chr[$i]] & pow(2, $dsc_pos[$i])) > 0);
2145  	 	 	 if ($asc AND $dsc) {
2146  	 	 	 	 // full bar (F)
2147  	 	 	 	 $p = 0;
2148  	 	 	 	 $h = 3;
2149  	 	 	 } elseif ($asc) {
2150  	 	 	 	 // ascender (A)
2151  	 	 	 	 $p = 0;
2152  	 	 	 	 $h = 2;
2153  	 	 	 } elseif ($dsc) {
2154  	 	 	 	 // descender (D)
2155  	 	 	 	 $p = 1;
2156  	 	 	 	 $h = 2;
2157  	 	 	 } else {
2158  	 	 	 	 // tracker (T)
2159  	 	 	 	 $p = 1;
2160  	 	 	 	 $h = 1;
2161  	 	 	 }
2162  	 	 	 $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => $h, 'p' => $p);
2163  	 	 	 $bararray['bcode'][$k++] = array('t' => 0, 'w' => 1, 'h' => 2, 'p' => 0);
2164  	 	 	 $bararray['maxw'] += 2;
2165  	 	 }
2166  	 	 unset($bararray['bcode'][($k - 1)]);
2167  	 	 --$bararray['maxw'];
2168  	 	 return $bararray;
2169  	 }
2170  
2171  	 /**
2172  	  * IMB - Intelligent Mail Barcode - Onecode - USPS-B-3200
2173  	  *
2174  	  * @param string $code pre-formatted IMB barcode (65 chars "FADT")
2175  	  * @return array barcode representation.
2176  	  * @protected
2177  	  */
2178  	protected function barcode_imb_pre($code) {
2179  	 	 if (!preg_match('/^[fadtFADT]{65}$/', $code) == 1) {
2180  	 	 	 return false;
2181  	 	 }
2182  	 	 $characters = str_split(strtolower($code), 1);
2183  	 	 // build bars
2184  	 	 $k = 0;
2185  	 	 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 3, 'bcode' => array());
2186  	 	 for ($i = 0; $i < 65; ++$i) {
2187  	 	 	 switch($characters[$i]) {
2188  	 	 	 	 case 'f': {
2189  	 	 	 	 	 // full bar
2190  	 	 	 	 	 $p = 0;
2191  	 	 	 	 	 $h = 3;
2192  	 	 	 	 	 break;
2193  	 	 	 	 }
2194  	 	 	 	 case 'a': {
2195  	 	 	 	 	 // ascender
2196  	 	 	 	 	 $p = 0;
2197  	 	 	 	 	 $h = 2;
2198  	 	 	 	 	 break;
2199  	 	 	 	 }
2200  	 	 	 	 case 'd': {
2201  	 	 	 	 	 // descender
2202  	 	 	 	 	 $p = 1;
2203  	 	 	 	 	 $h = 2;
2204  	 	 	 	 	 break;
2205  	 	 	 	 }
2206  	 	 	 	 case 't': {
2207  	 	 	 	 	 // tracker (short)
2208  	 	 	 	 	 $p = 1;
2209  	 	 	 	 	 $h = 1;
2210  	 	 	 	 	 break;
2211  	 	 	 	 }
2212  	 	 	 }
2213  	 	 	 $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => $h, 'p' => $p);
2214  	 	 	 $bararray['bcode'][$k++] = array('t' => 0, 'w' => 1, 'h' => 2, 'p' => 0);
2215  	 	 	 $bararray['maxw'] += 2;
2216  	 	 }
2217  	 	 unset($bararray['bcode'][($k - 1)]);
2218  	 	 --$bararray['maxw'];
2219  	 	 return $bararray;
2220  	 }
2221  
2222  	 /**
2223  	  * Convert large integer number to hexadecimal representation.
2224  	  * (requires PHP bcmath extension)
2225  	  * @param string $number number to convert specified as a string
2226  	  * @return string hexadecimal representation
2227  	  */
2228  	public function dec_to_hex($number) {
2229  	 	 $i = 0;
2230  	 	 $hex = array();
2231  	 	 if($number == 0) {
2232  	 	 	 return '00';
2233  	 	 }
2234  	 	 while($number > 0) {
2235  	 	 	 if($number == 0) {
2236  	 	 	 	 array_push($hex, '0');
2237  	 	 	 } else {
2238  	 	 	 	 array_push($hex, strtoupper(dechex(bcmod($number, '16'))));
2239  	 	 	 	 $number = bcdiv($number, '16', 0);
2240  	 	 	 }
2241  	 	 }
2242  	 	 $hex = array_reverse($hex);
2243  	 	 return implode($hex);
2244  	 }
2245  
2246  	 /**
2247  	  * Convert large hexadecimal number to decimal representation (string).
2248  	  * (requires PHP bcmath extension)
2249  	  * @param string $hex hexadecimal number to convert specified as a string
2250  	  * @return string hexadecimal representation
2251  	  */
2252  	public function hex_to_dec($hex) {
2253  	 	 $dec = 0;
2254  	 	 $bitval = 1;
2255  	 	 $len = strlen($hex);
2256  	 	 for($pos = ($len - 1); $pos >= 0; --$pos) {
2257  	 	 	 $dec = bcadd($dec, bcmul(hexdec($hex[$pos]), $bitval));
2258  	 	 	 $bitval = bcmul($bitval, 16);
2259  	 	 }
2260  	 	 return $dec;
2261  	 }
2262  
2263  	 /**
2264  	  * Intelligent Mail Barcode calculation of Frame Check Sequence
2265  	  * @param string $code_arr array of hexadecimal values (13 bytes holding 102 bits right justified).
2266  	  * @return int 11 bit Frame Check Sequence as integer (decimal base)
2267  	  * @protected
2268  	  */
2269  	protected function imb_crc11fcs($code_arr) {
2270  	 	 $genpoly = 0x0F35; // generator polynomial
2271  	 	 $fcs = 0x07FF; // Frame Check Sequence
2272  	 	 // do most significant byte skipping the 2 most significant bits
2273  	 	 $data = hexdec($code_arr[0]) << 5;
2274  	 	 for ($bit = 2; $bit < 8; ++$bit) {
2275  	 	 	 if (($fcs ^ $data) & 0x400) {
2276  	 	 	 	 $fcs = ($fcs << 1) ^ $genpoly;
2277  	 	 	 } else {
2278  	 	 	 	 $fcs = ($fcs << 1);
2279  	 	 	 }
2280  	 	 	 $fcs &= 0x7FF;
2281  	 	 	 $data <<= 1;
2282  	 	 }
2283  	 	 // do rest of bytes
2284  	 	 for ($byte = 1; $byte < 13; ++$byte) {
2285  	 	 	 $data = hexdec($code_arr[$byte]) << 3;
2286  	 	 	 for ($bit = 0; $bit < 8; ++$bit) {
2287  	 	 	 	 if (($fcs ^ $data) & 0x400) {
2288  	 	 	 	 	 $fcs = ($fcs << 1) ^ $genpoly;
2289  	 	 	 	 } else {
2290  	 	 	 	 	 $fcs = ($fcs << 1);
2291  	 	 	 	 }
2292  	 	 	 	 $fcs &= 0x7FF;
2293  	 	 	 	 $data <<= 1;
2294  	 	 	 }
2295  	 	 }
2296  	 	 return $fcs;
2297  	 }
2298  
2299  	 /**
2300  	  * Reverse unsigned short value
2301  	  * @param int $num value to reversr
2302  	  * @return int reversed value
2303  	  * @protected
2304  	  */
2305  	protected function imb_reverse_us($num) {
2306  	 	 $rev = 0;
2307  	 	 for ($i = 0; $i < 16; ++$i) {
2308  	 	 	 $rev <<= 1;
2309  	 	 	 $rev |= ($num & 1);
2310  	 	 	 $num >>= 1;
2311  	 	 }
2312  	 	 return $rev;
2313  	 }
2314  
2315  	 /**
2316  	  * generate Nof13 tables used for Intelligent Mail Barcode
2317  	  * @param int $n is the type of table: 2 for 2of13 table, 5 for 5of13table
2318  	  * @param int $size size of table (78 for n=2 and 1287 for n=5)
2319  	  * @return array requested table
2320  	  * @protected
2321  	  */
2322  	protected function imb_tables($n, $size) {
2323  	 	 $table = array();
2324  	 	 $lli = 0; // LUT lower index
2325  	 	 $lui = $size - 1; // LUT upper index
2326  	 	 for ($count = 0; $count < 8192; ++$count) {
2327  	 	 	 $bit_count = 0;
2328  	 	 	 for ($bit_index = 0; $bit_index < 13; ++$bit_index) {
2329  	 	 	 	 $bit_count += intval(($count & (1 << $bit_index)) != 0);
2330  	 	 	 }
2331  	 	 	 // if we don't have the right number of bits on, go on to the next value
2332  	 	 	 if ($bit_count == $n) {
2333  	 	 	 	 $reverse = ($this->imb_reverse_us($count) >> 3);
2334  	 	 	 	 // if the reverse is less than count, we have already visited this pair before
2335  	 	 	 	 if ($reverse >= $count) {
2336  	 	 	 	 	 // If count is symmetric, place it at the first free slot from the end of the list.
2337  	 	 	 	 	 // Otherwise, place it at the first free slot from the beginning of the list AND place $reverse ath the next free slot from the beginning of the list
2338  	 	 	 	 	 if ($reverse == $count) {
2339  	 	 	 	 	 	 $table[$lui] = $count;
2340  	 	 	 	 	 	 --$lui;
2341  	 	 	 	 	 } else {
2342  	 	 	 	 	 	 $table[$lli] = $count;
2343  	 	 	 	 	 	 ++$lli;
2344  	 	 	 	 	 	 $table[$lli] = $reverse;
2345  	 	 	 	 	 	 ++$lli;
2346  	 	 	 	 	 }
2347  	 	 	 	 }
2348  	 	 	 }
2349  	 	 }
2350  	 	 return $table;
2351  	 }
2352  
2353  } // end of class
2354  //============================================================+
2355  // END OF FILE
2356  //============================================================+