ILIAS  release_5-1 Revision 5.0.0-5477-g43f3e3fab5f
Public Member Functions | Protected Member Functions | Protected Attributes
TCPDFBarcode Class Reference

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

+ Collaboration diagram for TCPDFBarcode:

Public Member Functions

 __construct ($code, $type)
 This is the class constructor. More...
 
 getBarcodeArray ()
 Return an array representations of barcode. More...
 
 getBarcodeSVG ($w=2, $h=30, $color='black')
 Send barcode as SVG image object to the standard output. More...
 
 getBarcodeSVGcode ($w=2, $h=30, $color='black')
 Return a SVG string representation of barcode. More...
 
 getBarcodeHTML ($w=2, $h=30, $color='black')
 Return an HTML representation of barcode. More...
 
 getBarcodePNG ($w=2, $h=30, $color=array(0, 0, 0))
 Send a PNG image representation of barcode (requires GD or Imagick library). More...
 
 getBarcodePngData ($w=2, $h=30, $color=array(0, 0, 0))
 Return a PNG image representation of barcode (requires GD or Imagick library). More...
 
 setBarcode ($code, $type)
 Set the barcode. More...
 
 dec_to_hex ($number)
 Convert large integer number to hexadecimal representation. More...
 
 hex_to_dec ($hex)
 Convert large hexadecimal number to decimal representation (string). More...
 

Protected Member Functions

 barcode_code39 ($code, $extended=false, $checksum=false)
 CODE 39 - ANSI MH10.8M-1983 - USD-3 - 3 of 9. More...
 
 encode_code39_ext ($code)
 Encode a string to be used for CODE 39 Extended mode. More...
 
 checksum_code39 ($code)
 Calculate CODE 39 checksum (modulo 43). More...
 
 barcode_code93 ($code)
 CODE 93 - USS-93 Compact code similar to Code 39. More...
 
 checksum_code93 ($code)
 Calculate CODE 93 checksum (modulo 47). More...
 
 checksum_s25 ($code)
 Checksum for standard 2 of 5 barcodes. More...
 
 barcode_msi ($code, $checksum=false)
 MSI. More...
 
 barcode_s25 ($code, $checksum=false)
 Standard 2 of 5 barcodes. More...
 
 binseq_to_array ($seq, $bararray)
 Convert binary barcode sequence to TCPDF barcode array. More...
 
 barcode_i25 ($code, $checksum=false)
 Interleaved 2 of 5 barcodes. More...
 
 barcode_c128 ($code, $type='')
 C128 barcodes. More...
 
 get128ABsequence ($code)
 Split text code in A/B sequence for 128 code. More...
 
 barcode_eanupc ($code, $len=13)
 EAN13 and UPC-A barcodes. More...
 
 barcode_eanext ($code, $len=5)
 UPC-Based Extensions 2-Digit Ext. More...
 
 barcode_postnet ($code, $planet=false)
 POSTNET and PLANET barcodes. More...
 
 barcode_rms4cc ($code, $kix=false)
 RMS4CC - CBC - KIX RMS4CC (Royal Mail 4-state Customer Code) - CBC (Customer Bar Code) - KIX (Klant index - Customer index) RM4SCC is the name of the barcode symbology used by the Royal Mail for its Cleanmail service. More...
 
 barcode_codabar ($code)
 CODABAR barcodes. More...
 
 barcode_code11 ($code)
 CODE11 barcodes. More...
 
 barcode_pharmacode ($code)
 Pharmacode Contains digits (0 to 9) More...
 
 barcode_pharmacode2t ($code)
 Pharmacode two-track Contains digits (0 to 9) More...
 
 barcode_imb ($code)
 IMB - Intelligent Mail Barcode - Onecode - USPS-B-3200 (requires PHP bcmath extension) Intelligent Mail barcode is a 65-bar code for use on mail in the United States. More...
 
 barcode_imb_pre ($code)
 IMB - Intelligent Mail Barcode - Onecode - USPS-B-3200. More...
 
 imb_crc11fcs ($code_arr)
 Intelligent Mail Barcode calculation of Frame Check Sequence. More...
 
 imb_reverse_us ($num)
 Reverse unsigned short value. More...
 
 imb_tables ($n, $size)
 generate Nof13 tables used for Intelligent Mail Barcode More...
 

Protected Attributes

 $barcode_array
 Array representation of barcode. More...
 

Detailed Description

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


Definition at line 50 of file tcpdf_barcodes_1d.php.

Constructor & Destructor Documentation

◆ __construct()

TCPDFBarcode::__construct (   $code,
  $type 
)

This is the class constructor.

Return an array representations for common 1D barcodes:

  • $arrcode['code'] code to be printed on text label
  • $arrcode['maxh'] max barcode height
  • $arrcode['maxw'] max barcode width
  • $arrcode['bcode'][$k] single bar or space in $k position
  • $arrcode['bcode'][$k]['t'] bar type: true = bar, false = space.
  • $arrcode['bcode'][$k]['w'] bar width in units.
  • $arrcode['bcode'][$k]['h'] bar height in units.
  • $arrcode['bcode'][$k]['p'] bar top position (0 = top, 1 = middle)
Parameters
$code(string) code to print
$type(string) type of barcode:
  • C39 : CODE 39 - ANSI MH10.8M-1983 - USD-3 - 3 of 9.
  • C39+ : CODE 39 with checksum
  • C39E : CODE 39 EXTENDED
  • C39E+ : CODE 39 EXTENDED + CHECKSUM
  • C93 : CODE 93 - USS-93
  • S25 : Standard 2 of 5
  • S25+ : Standard 2 of 5 + CHECKSUM
  • I25 : Interleaved 2 of 5
  • I25+ : Interleaved 2 of 5 + CHECKSUM
  • C128 : CODE 128
  • C128A : CODE 128 A
  • C128B : CODE 128 B
  • C128C : CODE 128 C
  • EAN2 : 2-Digits UPC-Based Extension
  • EAN5 : 5-Digits UPC-Based Extension
  • EAN8 : EAN 8
  • EAN13 : EAN 13
  • UPCA : UPC-A
  • UPCE : UPC-E
  • MSI : MSI (Variation of Plessey code)
  • MSI+ : MSI + CHECKSUM (modulo 11)
  • POSTNET : POSTNET
  • PLANET : PLANET
  • RMS4CC : RMS4CC (Royal Mail 4-state Customer Code) - CBC (Customer Bar Code)
  • KIX : KIX (Klant index - Customer index)
  • IMB: Intelligent Mail Barcode - Onecode - USPS-B-3200
  • CODABAR : CODABAR
  • CODE11 : CODE 11
  • PHARMA : PHARMACODE
  • PHARMA2T : PHARMACODE TWO-TRACKS

Definition at line 73 of file tcpdf_barcodes_1d.php.

73 {
74 $this->setBarcode($code, $type);
75 }
TCPDFBarcode\setBarcode
setBarcode($code, $type)
Set the barcode.
Definition: tcpdf_barcodes_1d.php:249
$code
$code
Definition: example_050.php:99

References $code, and setBarcode().

+ Here is the call graph for this function:

Member Function Documentation

◆ barcode_c128()

TCPDFBarcode::barcode_c128 (   $code,
  $type = '' 
)
protected

C128 barcodes.

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

Parameters
$code(string) code to represent.
$type(string) barcode type: A, B, C or empty for automatic switch (AUTO mode)
Returns
array barcode representation.

Definition at line 958 of file tcpdf_barcodes_1d.php.

958 {
959 $chr = array(
960 '212222', /* 00 */
961 '222122', /* 01 */
962 '222221', /* 02 */
963 '121223', /* 03 */
964 '121322', /* 04 */
965 '131222', /* 05 */
966 '122213', /* 06 */
967 '122312', /* 07 */
968 '132212', /* 08 */
969 '221213', /* 09 */
970 '221312', /* 10 */
971 '231212', /* 11 */
972 '112232', /* 12 */
973 '122132', /* 13 */
974 '122231', /* 14 */
975 '113222', /* 15 */
976 '123122', /* 16 */
977 '123221', /* 17 */
978 '223211', /* 18 */
979 '221132', /* 19 */
980 '221231', /* 20 */
981 '213212', /* 21 */
982 '223112', /* 22 */
983 '312131', /* 23 */
984 '311222', /* 24 */
985 '321122', /* 25 */
986 '321221', /* 26 */
987 '312212', /* 27 */
988 '322112', /* 28 */
989 '322211', /* 29 */
990 '212123', /* 30 */
991 '212321', /* 31 */
992 '232121', /* 32 */
993 '111323', /* 33 */
994 '131123', /* 34 */
995 '131321', /* 35 */
996 '112313', /* 36 */
997 '132113', /* 37 */
998 '132311', /* 38 */
999 '211313', /* 39 */
1000 '231113', /* 40 */
1001 '231311', /* 41 */
1002 '112133', /* 42 */
1003 '112331', /* 43 */
1004 '132131', /* 44 */
1005 '113123', /* 45 */
1006 '113321', /* 46 */
1007 '133121', /* 47 */
1008 '313121', /* 48 */
1009 '211331', /* 49 */
1010 '231131', /* 50 */
1011 '213113', /* 51 */
1012 '213311', /* 52 */
1013 '213131', /* 53 */
1014 '311123', /* 54 */
1015 '311321', /* 55 */
1016 '331121', /* 56 */
1017 '312113', /* 57 */
1018 '312311', /* 58 */
1019 '332111', /* 59 */
1020 '314111', /* 60 */
1021 '221411', /* 61 */
1022 '431111', /* 62 */
1023 '111224', /* 63 */
1024 '111422', /* 64 */
1025 '121124', /* 65 */
1026 '121421', /* 66 */
1027 '141122', /* 67 */
1028 '141221', /* 68 */
1029 '112214', /* 69 */
1030 '112412', /* 70 */
1031 '122114', /* 71 */
1032 '122411', /* 72 */
1033 '142112', /* 73 */
1034 '142211', /* 74 */
1035 '241211', /* 75 */
1036 '221114', /* 76 */
1037 '413111', /* 77 */
1038 '241112', /* 78 */
1039 '134111', /* 79 */
1040 '111242', /* 80 */
1041 '121142', /* 81 */
1042 '121241', /* 82 */
1043 '114212', /* 83 */
1044 '124112', /* 84 */
1045 '124211', /* 85 */
1046 '411212', /* 86 */
1047 '421112', /* 87 */
1048 '421211', /* 88 */
1049 '212141', /* 89 */
1050 '214121', /* 90 */
1051 '412121', /* 91 */
1052 '111143', /* 92 */
1053 '111341', /* 93 */
1054 '131141', /* 94 */
1055 '114113', /* 95 */
1056 '114311', /* 96 */
1057 '411113', /* 97 */
1058 '411311', /* 98 */
1059 '113141', /* 99 */
1060 '114131', /* 100 */
1061 '311141', /* 101 */
1062 '411131', /* 102 */
1063 '211412', /* 103 START A */
1064 '211214', /* 104 START B */
1065 '211232', /* 105 START C */
1066 '233111', /* STOP */
1067 '200000' /* END */
1068 );
1069 // ASCII characters for code A (ASCII 00 - 95)
1070 $keys_a = ' !"#$%&\'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\]^_';
1071 $keys_a .= chr(0).chr(1).chr(2).chr(3).chr(4).chr(5).chr(6).chr(7).chr(8).chr(9);
1072 $keys_a .= chr(10).chr(11).chr(12).chr(13).chr(14).chr(15).chr(16).chr(17).chr(18).chr(19);
1073 $keys_a .= chr(20).chr(21).chr(22).chr(23).chr(24).chr(25).chr(26).chr(27).chr(28).chr(29);
1074 $keys_a .= chr(30).chr(31);
1075 // ASCII characters for code B (ASCII 32 - 127)
1076 $keys_b = ' !"#$%&\'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\]^_`abcdefghijklmnopqrstuvwxyz{|}~'.chr(127);
1077 // special codes
1078 $fnc_a = array(241 => 102, 242 => 97, 243 => 96, 244 => 101);
1079 $fnc_b = array(241 => 102, 242 => 97, 243 => 96, 244 => 100);
1080 // array of symbols
1081 $code_data = array();
1082 // length of the code
1083 $len = strlen($code);
1084 switch(strtoupper($type)) {
1085 case 'A': { // MODE A
1086 $startid = 103;
1087 for ($i = 0; $i < $len; ++$i) {
1088 $char = $code{$i};
1089 $char_id = ord($char);
1090 if (($char_id >= 241) AND ($char_id <= 244)) {
1091 $code_data[] = $fnc_a[$char_id];
1092 } elseif (($char_id >= 0) AND ($char_id <= 95)) {
1093 $code_data[] = strpos($keys_a, $char);
1094 } else {
1095 return false;
1096 }
1097 }
1098 break;
1099 }
1100 case 'B': { // MODE B
1101 $startid = 104;
1102 for ($i = 0; $i < $len; ++$i) {
1103 $char = $code{$i};
1104 $char_id = ord($char);
1105 if (($char_id >= 241) AND ($char_id <= 244)) {
1106 $code_data[] = $fnc_b[$char_id];
1107 } elseif (($char_id >= 32) AND ($char_id <= 127)) {
1108 $code_data[] = strpos($keys_b, $char);
1109 } else {
1110 return false;
1111 }
1112 }
1113 break;
1114 }
1115 case 'C': { // MODE C
1116 $startid = 105;
1117 if (ord($code[0]) == 241) {
1118 $code_data[] = 102;
1119 $code = substr($code, 1);
1120 --$len;
1121 }
1122 if (($len % 2) != 0) {
1123 // the length must be even
1124 return false;
1125 }
1126 for ($i = 0; $i < $len; $i+=2) {
1127 $chrnum = $code{$i}.$code{$i+1};
1128 if (preg_match('/([0-9]{2})/', $chrnum) > 0) {
1129 $code_data[] = intval($chrnum);
1130 } else {
1131 return false;
1132 }
1133 }
1134 break;
1135 }
1136 default: { // MODE AUTO
1137 // split code into sequences
1138 $sequence = array();
1139 // get numeric sequences (if any)
1140 $numseq = array();
1141 preg_match_all('/([0-9]{4,})/', $code, $numseq, PREG_OFFSET_CAPTURE);
1142 if (isset($numseq[1]) AND !empty($numseq[1])) {
1143 $end_offset = 0;
1144 foreach ($numseq[1] as $val) {
1145 $offset = $val[1];
1146 if ($offset > $end_offset) {
1147 // non numeric sequence
1148 $sequence = array_merge($sequence, $this->get128ABsequence(substr($code, $end_offset, ($offset - $end_offset))));
1149 }
1150 // numeric sequence
1151 $slen = strlen($val[0]);
1152 if (($slen % 2) != 0) {
1153 // the length must be even
1154 --$slen;
1155 }
1156 $sequence[] = array('C', substr($code, $offset, $slen), $slen);
1157 $end_offset = $offset + $slen;
1158 }
1159 if ($end_offset < $len) {
1160 $sequence = array_merge($sequence, $this->get128ABsequence(substr($code, $end_offset)));
1161 }
1162 } else {
1163 // text code (non C mode)
1164 $sequence = array_merge($sequence, $this->get128ABsequence($code));
1165 }
1166 // process the sequence
1167 foreach ($sequence as $key => $seq) {
1168 switch($seq[0]) {
1169 case 'A': {
1170 if ($key == 0) {
1171 $startid = 103;
1172 } elseif ($sequence[($key - 1)][0] != 'A') {
1173 if (($seq[2] == 1) AND ($key > 0) AND ($sequence[($key - 1)][0] == 'B') AND (!isset($sequence[($key - 1)][3]))) {
1174 // single character shift
1175 $code_data[] = 98;
1176 // mark shift
1177 $sequence[$key][3] = true;
1178 } elseif (!isset($sequence[($key - 1)][3])) {
1179 $code_data[] = 101;
1180 }
1181 }
1182 for ($i = 0; $i < $seq[2]; ++$i) {
1183 $char = $seq[1]{$i};
1184 $char_id = ord($char);
1185 if (($char_id >= 241) AND ($char_id <= 244)) {
1186 $code_data[] = $fnc_a[$char_id];
1187 } else {
1188 $code_data[] = strpos($keys_a, $char);
1189 }
1190 }
1191 break;
1192 }
1193 case 'B': {
1194 if ($key == 0) {
1195 $tmpchr = ord($seq[1][0]);
1196 if (($seq[2] == 1) AND ($tmpchr >= 241) AND ($tmpchr <= 244) AND isset($sequence[($key + 1)]) AND ($sequence[($key + 1)][0] != 'B')) {
1197 switch ($sequence[($key + 1)][0]) {
1198 case 'A': {
1199 $startid = 103;
1200 $sequence[$key][0] = 'A';
1201 $code_data[] = $fnc_a[$tmpchr];
1202 break;
1203 }
1204 case 'C': {
1205 $startid = 105;
1206 $sequence[$key][0] = 'C';
1207 $code_data[] = $fnc_a[$tmpchr];
1208 break;
1209 }
1210 }
1211 break;
1212 } else {
1213 $startid = 104;
1214 }
1215 } elseif ($sequence[($key - 1)][0] != 'B') {
1216 if (($seq[2] == 1) AND ($key > 0) AND ($sequence[($key - 1)][0] == 'A') AND (!isset($sequence[($key - 1)][3]))) {
1217 // single character shift
1218 $code_data[] = 98;
1219 // mark shift
1220 $sequence[$key][3] = true;
1221 } elseif (!isset($sequence[($key - 1)][3])) {
1222 $code_data[] = 100;
1223 }
1224 }
1225 for ($i = 0; $i < $seq[2]; ++$i) {
1226 $char = $seq[1]{$i};
1227 $char_id = ord($char);
1228 if (($char_id >= 241) AND ($char_id <= 244)) {
1229 $code_data[] = $fnc_b[$char_id];
1230 } else {
1231 $code_data[] = strpos($keys_b, $char);
1232 }
1233 }
1234 break;
1235 }
1236 case 'C': {
1237 if ($key == 0) {
1238 $startid = 105;
1239 } elseif ($sequence[($key - 1)][0] != 'C') {
1240 $code_data[] = 99;
1241 }
1242 for ($i = 0; $i < $seq[2]; $i+=2) {
1243 $chrnum = $seq[1]{$i}.$seq[1]{$i+1};
1244 $code_data[] = intval($chrnum);
1245 }
1246 break;
1247 }
1248 }
1249 }
1250 }
1251 }
1252 // calculate check character
1253 $sum = $startid;
1254 foreach ($code_data as $key => $val) {
1255 $sum += ($val * ($key + 1));
1256 }
1257 // add check character
1258 $code_data[] = ($sum % 103);
1259 // add stop sequence
1260 $code_data[] = 106;
1261 $code_data[] = 107;
1262 // add start code at the beginning
1263 array_unshift($code_data, $startid);
1264 // build barcode array
1265 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
1266 foreach ($code_data as $val) {
1267 $seq = $chr[$val];
1268 for ($j = 0; $j < 6; ++$j) {
1269 if (($j % 2) == 0) {
1270 $t = true; // bar
1271 } else {
1272 $t = false; // space
1273 }
1274 $w = $seq{$j};
1275 $bararray['bcode'][] = array('t' => $t, 'w' => $w, 'h' => 1, 'p' => 0);
1276 $bararray['maxw'] += $w;
1277 }
1278 }
1279 return $bararray;
1280 }
TCPDFBarcode\get128ABsequence
get128ABsequence($code)
Split text code in A/B sequence for 128 code.
Definition: tcpdf_barcodes_1d.php:1288
$t
$t
Definition: class.ilBMFType_duration.php:154
$w
$w
Definition: example_009.php:100

References $code, $t, $w, and get128ABsequence().

Referenced by setBarcode().

+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ barcode_codabar()

TCPDFBarcode::barcode_codabar (   $code)
protected

CODABAR barcodes.

Older code often used in library systems, sometimes in blood banks

Parameters
$code(string) code to represent.
Returns
array barcode representation.

Definition at line 1819 of file tcpdf_barcodes_1d.php.

1819 {
1820 $chr = array(
1821 '0' => '11111221',
1822 '1' => '11112211',
1823 '2' => '11121121',
1824 '3' => '22111111',
1825 '4' => '11211211',
1826 '5' => '21111211',
1827 '6' => '12111121',
1828 '7' => '12112111',
1829 '8' => '12211111',
1830 '9' => '21121111',
1831 '-' => '11122111',
1832 '$' => '11221111',
1833 ':' => '21112121',
1834 '/' => '21211121',
1835 '.' => '21212111',
1836 '+' => '11222221',
1837 'A' => '11221211',
1838 'B' => '12121121',
1839 'C' => '11121221',
1840 'D' => '11122211'
1841 );
1842 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
1843 $k = 0;
1844 $w = 0;
1845 $seq = '';
1846 $code = 'A'.strtoupper($code).'A';
1847 $len = strlen($code);
1848 for ($i = 0; $i < $len; ++$i) {
1849 if (!isset($chr[$code{$i}])) {
1850 return false;
1851 }
1852 $seq = $chr[$code{$i}];
1853 for ($j = 0; $j < 8; ++$j) {
1854 if (($j % 2) == 0) {
1855 $t = true; // bar
1856 } else {
1857 $t = false; // space
1858 }
1859 $w = $seq{$j};
1860 $bararray['bcode'][$k] = array('t' => $t, 'w' => $w, 'h' => 1, 'p' => 0);
1861 $bararray['maxw'] += $w;
1862 ++$k;
1863 }
1864 }
1865 return $bararray;
1866 }

References $code, $t, and $w.

Referenced by setBarcode().

+ Here is the caller graph for this function:

◆ barcode_code11()

TCPDFBarcode::barcode_code11 (   $code)
protected

CODE11 barcodes.

Used primarily for labeling telecommunications equipment

Parameters
$code(string) code to represent.
Returns
array barcode representation.

Definition at line 1875 of file tcpdf_barcodes_1d.php.

1875 {
1876 $chr = array(
1877 '0' => '111121',
1878 '1' => '211121',
1879 '2' => '121121',
1880 '3' => '221111',
1881 '4' => '112121',
1882 '5' => '212111',
1883 '6' => '122111',
1884 '7' => '111221',
1885 '8' => '211211',
1886 '9' => '211111',
1887 '-' => '112111',
1888 'S' => '112211'
1889 );
1890 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
1891 $k = 0;
1892 $w = 0;
1893 $seq = '';
1894 $len = strlen($code);
1895 // calculate check digit C
1896 $p = 1;
1897 $check = 0;
1898 for ($i = ($len - 1); $i >= 0; --$i) {
1899 $digit = $code{$i};
1900 if ($digit == '-') {
1901 $dval = 10;
1902 } else {
1903 $dval = intval($digit);
1904 }
1905 $check += ($dval * $p);
1906 ++$p;
1907 if ($p > 10) {
1908 $p = 1;
1909 }
1910 }
1911 $check %= 11;
1912 if ($check == 10) {
1913 $check = '-';
1914 }
1915 $code .= $check;
1916 if ($len > 10) {
1917 // calculate check digit K
1918 $p = 1;
1919 $check = 0;
1920 for ($i = $len; $i >= 0; --$i) {
1921 $digit = $code{$i};
1922 if ($digit == '-') {
1923 $dval = 10;
1924 } else {
1925 $dval = intval($digit);
1926 }
1927 $check += ($dval * $p);
1928 ++$p;
1929 if ($p > 9) {
1930 $p = 1;
1931 }
1932 }
1933 $check %= 11;
1934 $code .= $check;
1935 ++$len;
1936 }
1937 $code = 'S'.$code.'S';
1938 $len += 3;
1939 for ($i = 0; $i < $len; ++$i) {
1940 if (!isset($chr[$code{$i}])) {
1941 return false;
1942 }
1943 $seq = $chr[$code{$i}];
1944 for ($j = 0; $j < 6; ++$j) {
1945 if (($j % 2) == 0) {
1946 $t = true; // bar
1947 } else {
1948 $t = false; // space
1949 }
1950 $w = $seq{$j};
1951 $bararray['bcode'][$k] = array('t' => $t, 'w' => $w, 'h' => 1, 'p' => 0);
1952 $bararray['maxw'] += $w;
1953 ++$k;
1954 }
1955 }
1956 return $bararray;
1957 }

References $code, $t, and $w.

Referenced by setBarcode().

+ Here is the caller graph for this function:

◆ barcode_code39()

TCPDFBarcode::barcode_code39 (   $code,
  $extended = false,
  $checksum = false 
)
protected

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

General-purpose code in very wide use world-wide

Parameters
$code(string) code to represent.
$extended(boolean) if true uses the extended mode.
$checksum(boolean) if true add a checksum to the code.
Returns
array barcode representation.

Definition at line 393 of file tcpdf_barcodes_1d.php.

393 {
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 }
TCPDFBarcode\encode_code39_ext
encode_code39_ext($code)
Encode a string to be used for CODE 39 Extended mode.
Definition: tcpdf_barcodes_1d.php:486
TCPDFBarcode\checksum_code39
checksum_code39($code)
Calculate CODE 39 checksum (modulo 43).
Definition: tcpdf_barcodes_1d.php:537

References $code, $t, $w, checksum_code39(), and encode_code39_ext().

Referenced by setBarcode().

+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ barcode_code93()

TCPDFBarcode::barcode_code93 (   $code)
protected

CODE 93 - USS-93 Compact code similar to Code 39.

Parameters
$code(string) code to represent.
Returns
array barcode representation.

Definition at line 560 of file tcpdf_barcodes_1d.php.

560 {
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 }
TCPDFBarcode\checksum_code93
checksum_code93($code)
Calculate CODE 93 checksum (modulo 47).
Definition: tcpdf_barcodes_1d.php:688

References $code, $t, $w, and checksum_code93().

Referenced by setBarcode().

+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ barcode_eanext()

TCPDFBarcode::barcode_eanext (   $code,
  $len = 5 
)
protected

UPC-Based Extensions 2-Digit Ext.

: Used to indicate magazines and newspaper issue numbers 5-Digit Ext.: Used to mark suggested retail price of books

Parameters
$code(string) code to represent.
$len(string) barcode type: 2 = 2-Digit, 5 = 5-Digit
Returns
array barcode representation.

Definition at line 1520 of file tcpdf_barcodes_1d.php.

1520 {
1521 //Padding
1522 $code = str_pad($code, $len, '0', STR_PAD_LEFT);
1523 // calculate check digit
1524 if ($len == 2) {
1525 $r = $code % 4;
1526 } elseif ($len == 5) {
1527 $r = (3 * ($code[0] + $code[2] + $code[4])) + (9 * ($code[1] + $code[3]));
1528 $r %= 10;
1529 } else {
1530 return false;
1531 }
1532 //Convert digits to bars
1533 $codes = array(
1534 'A'=>array( // left odd parity
1535 '0'=>'0001101',
1536 '1'=>'0011001',
1537 '2'=>'0010011',
1538 '3'=>'0111101',
1539 '4'=>'0100011',
1540 '5'=>'0110001',
1541 '6'=>'0101111',
1542 '7'=>'0111011',
1543 '8'=>'0110111',
1544 '9'=>'0001011'),
1545 'B'=>array( // left even parity
1546 '0'=>'0100111',
1547 '1'=>'0110011',
1548 '2'=>'0011011',
1549 '3'=>'0100001',
1550 '4'=>'0011101',
1551 '5'=>'0111001',
1552 '6'=>'0000101',
1553 '7'=>'0010001',
1554 '8'=>'0001001',
1555 '9'=>'0010111')
1556 );
1557 $parities = array();
1558 $parities[2] = array(
1559 '0'=>array('A','A'),
1560 '1'=>array('A','B'),
1561 '2'=>array('B','A'),
1562 '3'=>array('B','B')
1563 );
1564 $parities[5] = array(
1565 '0'=>array('B','B','A','A','A'),
1566 '1'=>array('B','A','B','A','A'),
1567 '2'=>array('B','A','A','B','A'),
1568 '3'=>array('B','A','A','A','B'),
1569 '4'=>array('A','B','B','A','A'),
1570 '5'=>array('A','A','B','B','A'),
1571 '6'=>array('A','A','A','B','B'),
1572 '7'=>array('A','B','A','B','A'),
1573 '8'=>array('A','B','A','A','B'),
1574 '9'=>array('A','A','B','A','B')
1575 );
1576 $p = $parities[$len][$r];
1577 $seq = '1011'; // left guard bar
1578 $seq .= $codes[$p[0]][$code[0]];
1579 for ($i = 1; $i < $len; ++$i) {
1580 $seq .= '01'; // separator
1581 $seq .= $codes[$p[$i]][$code{$i}];
1582 }
1583 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
1584 return $this->binseq_to_array($seq, $bararray);
1585 }
TCPDFBarcode\binseq_to_array
binseq_to_array($seq, $bararray)
Convert binary barcode sequence to TCPDF barcode array.
Definition: tcpdf_barcodes_1d.php:864
$r
$r
Definition: example_031.php:79

References $code, $r, and binseq_to_array().

Referenced by setBarcode().

+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ barcode_eanupc()

TCPDFBarcode::barcode_eanupc (   $code,
  $len = 13 
)
protected

EAN13 and UPC-A barcodes.

EAN13: European Article Numbering international retail product code UPC-A: Universal product code seen on almost all retail products in the USA and Canada UPC-E: Short version of UPC symbol

Parameters
$code(string) code to represent.
$len(string) barcode type: 6 = UPC-E, 8 = EAN8, 13 = EAN13, 12 = UPC-A
Returns
array barcode representation.

Definition at line 1327 of file tcpdf_barcodes_1d.php.

1327 {
1328 $upce = false;
1329 if ($len == 6) {
1330 $len = 12; // UPC-A
1331 $upce = true; // UPC-E mode
1332 }
1333 $data_len = $len - 1;
1334 //Padding
1335 $code = str_pad($code, $data_len, '0', STR_PAD_LEFT);
1336 $code_len = strlen($code);
1337 // calculate check digit
1338 $sum_a = 0;
1339 for ($i = 1; $i < $data_len; $i+=2) {
1340 $sum_a += $code{$i};
1341 }
1342 if ($len > 12) {
1343 $sum_a *= 3;
1344 }
1345 $sum_b = 0;
1346 for ($i = 0; $i < $data_len; $i+=2) {
1347 $sum_b += ($code{$i});
1348 }
1349 if ($len < 13) {
1350 $sum_b *= 3;
1351 }
1352 $r = ($sum_a + $sum_b) % 10;
1353 if($r > 0) {
1354 $r = (10 - $r);
1355 }
1356 if ($code_len == $data_len) {
1357 // add check digit
1358 $code .= $r;
1359 } elseif ($r !== intval($code{$data_len})) {
1360 // wrong checkdigit
1361 return false;
1362 }
1363 if ($len == 12) {
1364 // UPC-A
1365 $code = '0'.$code;
1366 ++$len;
1367 }
1368 if ($upce) {
1369 // convert UPC-A to UPC-E
1370 $tmp = substr($code, 4, 3);
1371 if (($tmp == '000') OR ($tmp == '100') OR ($tmp == '200')) {
1372 // manufacturer code ends in 000, 100, or 200
1373 $upce_code = substr($code, 2, 2).substr($code, 9, 3).substr($code, 4, 1);
1374 } else {
1375 $tmp = substr($code, 5, 2);
1376 if ($tmp == '00') {
1377 // manufacturer code ends in 00
1378 $upce_code = substr($code, 2, 3).substr($code, 10, 2).'3';
1379 } else {
1380 $tmp = substr($code, 6, 1);
1381 if ($tmp == '0') {
1382 // manufacturer code ends in 0
1383 $upce_code = substr($code, 2, 4).substr($code, 11, 1).'4';
1384 } else {
1385 // manufacturer code does not end in zero
1386 $upce_code = substr($code, 2, 5).substr($code, 11, 1);
1387 }
1388 }
1389 }
1390 }
1391 //Convert digits to bars
1392 $codes = array(
1393 'A'=>array( // left odd parity
1394 '0'=>'0001101',
1395 '1'=>'0011001',
1396 '2'=>'0010011',
1397 '3'=>'0111101',
1398 '4'=>'0100011',
1399 '5'=>'0110001',
1400 '6'=>'0101111',
1401 '7'=>'0111011',
1402 '8'=>'0110111',
1403 '9'=>'0001011'),
1404 'B'=>array( // left even parity
1405 '0'=>'0100111',
1406 '1'=>'0110011',
1407 '2'=>'0011011',
1408 '3'=>'0100001',
1409 '4'=>'0011101',
1410 '5'=>'0111001',
1411 '6'=>'0000101',
1412 '7'=>'0010001',
1413 '8'=>'0001001',
1414 '9'=>'0010111'),
1415 'C'=>array( // right
1416 '0'=>'1110010',
1417 '1'=>'1100110',
1418 '2'=>'1101100',
1419 '3'=>'1000010',
1420 '4'=>'1011100',
1421 '5'=>'1001110',
1422 '6'=>'1010000',
1423 '7'=>'1000100',
1424 '8'=>'1001000',
1425 '9'=>'1110100')
1426 );
1427 $parities = array(
1428 '0'=>array('A','A','A','A','A','A'),
1429 '1'=>array('A','A','B','A','B','B'),
1430 '2'=>array('A','A','B','B','A','B'),
1431 '3'=>array('A','A','B','B','B','A'),
1432 '4'=>array('A','B','A','A','B','B'),
1433 '5'=>array('A','B','B','A','A','B'),
1434 '6'=>array('A','B','B','B','A','A'),
1435 '7'=>array('A','B','A','B','A','B'),
1436 '8'=>array('A','B','A','B','B','A'),
1437 '9'=>array('A','B','B','A','B','A')
1438 );
1439 $upce_parities = array();
1440 $upce_parities[0] = array(
1441 '0'=>array('B','B','B','A','A','A'),
1442 '1'=>array('B','B','A','B','A','A'),
1443 '2'=>array('B','B','A','A','B','A'),
1444 '3'=>array('B','B','A','A','A','B'),
1445 '4'=>array('B','A','B','B','A','A'),
1446 '5'=>array('B','A','A','B','B','A'),
1447 '6'=>array('B','A','A','A','B','B'),
1448 '7'=>array('B','A','B','A','B','A'),
1449 '8'=>array('B','A','B','A','A','B'),
1450 '9'=>array('B','A','A','B','A','B')
1451 );
1452 $upce_parities[1] = array(
1453 '0'=>array('A','A','A','B','B','B'),
1454 '1'=>array('A','A','B','A','B','B'),
1455 '2'=>array('A','A','B','B','A','B'),
1456 '3'=>array('A','A','B','B','B','A'),
1457 '4'=>array('A','B','A','A','B','B'),
1458 '5'=>array('A','B','B','A','A','B'),
1459 '6'=>array('A','B','B','B','A','A'),
1460 '7'=>array('A','B','A','B','A','B'),
1461 '8'=>array('A','B','A','B','B','A'),
1462 '9'=>array('A','B','B','A','B','A')
1463 );
1464 $k = 0;
1465 $seq = '101'; // left guard bar
1466 if ($upce) {
1467 $bararray = array('code' => $upce_code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
1468 $p = $upce_parities[$code[1]][$r];
1469 for ($i = 0; $i < 6; ++$i) {
1470 $seq .= $codes[$p[$i]][$upce_code{$i}];
1471 }
1472 $seq .= '010101'; // right guard bar
1473 } else {
1474 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
1475 $half_len = intval(ceil($len / 2));
1476 if ($len == 8) {
1477 for ($i = 0; $i < $half_len; ++$i) {
1478 $seq .= $codes['A'][$code{$i}];
1479 }
1480 } else {
1481 $p = $parities[$code[0]];
1482 for ($i = 1; $i < $half_len; ++$i) {
1483 $seq .= $codes[$p[$i-1]][$code{$i}];
1484 }
1485 }
1486 $seq .= '01010'; // center guard bar
1487 for ($i = $half_len; $i < $len; ++$i) {
1488 $seq .= $codes['C'][$code{$i}];
1489 }
1490 $seq .= '101'; // right guard bar
1491 }
1492 $clen = strlen($seq);
1493 $w = 0;
1494 for ($i = 0; $i < $clen; ++$i) {
1495 $w += 1;
1496 if (($i == ($clen - 1)) OR (($i < ($clen - 1)) AND ($seq{$i} != $seq{($i+1)}))) {
1497 if ($seq{$i} == '1') {
1498 $t = true; // bar
1499 } else {
1500 $t = false; // space
1501 }
1502 $bararray['bcode'][$k] = array('t' => $t, 'w' => $w, 'h' => 1, 'p' => 0);
1503 $bararray['maxw'] += $w;
1504 ++$k;
1505 $w = 0;
1506 }
1507 }
1508 return $bararray;
1509 }

References $code, $r, $t, and $w.

Referenced by setBarcode().

+ Here is the caller graph for this function:

◆ barcode_i25()

TCPDFBarcode::barcode_i25 (   $code,
  $checksum = false 
)
protected

Interleaved 2 of 5 barcodes.

Compact numeric code, widely used in industry, air cargo Contains digits (0 to 9) and encodes the data in the width of both bars and spaces.

Parameters
$code(string) code to represent.
$checksum(boolean) if true add a checksum to the code
Returns
array barcode representation.

Definition at line 894 of file tcpdf_barcodes_1d.php.

894 {
895 $chr['0'] = '11221';
896 $chr['1'] = '21112';
897 $chr['2'] = '12112';
898 $chr['3'] = '22111';
899 $chr['4'] = '11212';
900 $chr['5'] = '21211';
901 $chr['6'] = '12211';
902 $chr['7'] = '11122';
903 $chr['8'] = '21121';
904 $chr['9'] = '12121';
905 $chr['A'] = '11';
906 $chr['Z'] = '21';
907 if ($checksum) {
908 // add checksum
909 $code .= $this->checksum_s25($code);
910 }
911 if((strlen($code) % 2) != 0) {
912 // add leading zero if code-length is odd
913 $code = '0'.$code;
914 }
915 // add start and stop codes
916 $code = 'AA'.strtolower($code).'ZA';
917
918 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
919 $k = 0;
920 $clen = strlen($code);
921 for ($i = 0; $i < $clen; $i = ($i + 2)) {
922 $char_bar = $code{$i};
923 $char_space = $code{$i+1};
924 if((!isset($chr[$char_bar])) OR (!isset($chr[$char_space]))) {
925 // invalid character
926 return false;
927 }
928 // create a bar-space sequence
929 $seq = '';
930 $chrlen = strlen($chr[$char_bar]);
931 for ($s = 0; $s < $chrlen; $s++){
932 $seq .= $chr[$char_bar]{$s} . $chr[$char_space]{$s};
933 }
934 $seqlen = strlen($seq);
935 for ($j = 0; $j < $seqlen; ++$j) {
936 if (($j % 2) == 0) {
937 $t = true; // bar
938 } else {
939 $t = false; // space
940 }
941 $w = $seq{$j};
942 $bararray['bcode'][$k] = array('t' => $t, 'w' => $w, 'h' => 1, 'p' => 0);
943 $bararray['maxw'] += $w;
944 ++$k;
945 }
946 }
947 return $bararray;
948 }
TCPDFBarcode\checksum_s25
checksum_s25($code)
Checksum for standard 2 of 5 barcodes.
Definition: tcpdf_barcodes_1d.php:737

References $code, $t, $w, and checksum_s25().

Referenced by setBarcode().

+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ barcode_imb()

TCPDFBarcode::barcode_imb (   $code)
protected

IMB - Intelligent Mail Barcode - Onecode - USPS-B-3200 (requires PHP bcmath extension) Intelligent Mail barcode is a 65-bar code for use on mail in the United States.

The fields are described as follows:

  • 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.
  • 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.
  • 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.
  • 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.
Parameters
$code(string) code to print, separate the ZIP (routing code) from the rest using a minus char '-' (BarcodeID_ServiceTypeID_MailerID_SerialNumber-RoutingCode)
Returns
array barcode representation.

Definition at line 2054 of file tcpdf_barcodes_1d.php.

2054 {
2055 $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);
2056 $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);
2057 $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);
2058 $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);
2059 $code_arr = explode('-', $code);
2060 $tracking_number = $code_arr[0];
2061 if (isset($code_arr[1])) {
2062 $routing_code = $code_arr[1];
2063 } else {
2064 $routing_code = '';
2065 }
2066 // Conversion of Routing Code
2067 switch (strlen($routing_code)) {
2068 case 0: {
2069 $binary_code = 0;
2070 break;
2071 }
2072 case 5: {
2073 $binary_code = bcadd($routing_code, '1');
2074 break;
2075 }
2076 case 9: {
2077 $binary_code = bcadd($routing_code, '100001');
2078 break;
2079 }
2080 case 11: {
2081 $binary_code = bcadd($routing_code, '1000100001');
2082 break;
2083 }
2084 default: {
2085 return false;
2086 break;
2087 }
2088 }
2089 $binary_code = bcmul($binary_code, 10);
2090 $binary_code = bcadd($binary_code, $tracking_number[0]);
2091 $binary_code = bcmul($binary_code, 5);
2092 $binary_code = bcadd($binary_code, $tracking_number[1]);
2093 $binary_code .= substr($tracking_number, 2, 18);
2094 // convert to hexadecimal
2095 $binary_code = $this->dec_to_hex($binary_code);
2096 // pad to get 13 bytes
2097 $binary_code = str_pad($binary_code, 26, '0', STR_PAD_LEFT);
2098 // convert string to array of bytes
2099 $binary_code_arr = chunk_split($binary_code, 2, "\r");
2100 $binary_code_arr = substr($binary_code_arr, 0, -1);
2101 $binary_code_arr = explode("\r", $binary_code_arr);
2102 // calculate frame check sequence
2103 $fcs = $this->imb_crc11fcs($binary_code_arr);
2104 // exclude first 2 bits from first byte
2105 $first_byte = sprintf('%2s', dechex((hexdec($binary_code_arr[0]) << 2) >> 2));
2106 $binary_code_102bit = $first_byte.substr($binary_code, 2);
2107 // convert binary data to codewords
2108 $codewords = array();
2109 $data = $this->hex_to_dec($binary_code_102bit);
2110 $codewords[0] = bcmod($data, 636) * 2;
2111 $data = bcdiv($data, 636);
2112 for ($i = 1; $i < 9; ++$i) {
2113 $codewords[$i] = bcmod($data, 1365);
2114 $data = bcdiv($data, 1365);
2115 }
2116 $codewords[9] = $data;
2117 if (($fcs >> 10) == 1) {
2118 $codewords[9] += 659;
2119 }
2120 // generate lookup tables
2121 $table2of13 = $this->imb_tables(2, 78);
2122 $table5of13 = $this->imb_tables(5, 1287);
2123 // convert codewords to characters
2124 $characters = array();
2125 $bitmask = 512;
2126 foreach($codewords as $k => $val) {
2127 if ($val <= 1286) {
2128 $chrcode = $table5of13[$val];
2129 } else {
2130 $chrcode = $table2of13[($val - 1287)];
2131 }
2132 if (($fcs & $bitmask) > 0) {
2133 // bitwise invert
2134 $chrcode = ((~$chrcode) & 8191);
2135 }
2136 $characters[] = $chrcode;
2137 $bitmask /= 2;
2138 }
2139 $characters = array_reverse($characters);
2140 // build bars
2141 $k = 0;
2142 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 3, 'bcode' => array());
2143 for ($i = 0; $i < 65; ++$i) {
2144 $asc = (($characters[$asc_chr[$i]] & pow(2, $asc_pos[$i])) > 0);
2145 $dsc = (($characters[$dsc_chr[$i]] & pow(2, $dsc_pos[$i])) > 0);
2146 if ($asc AND $dsc) {
2147 // full bar (F)
2148 $p = 0;
2149 $h = 3;
2150 } elseif ($asc) {
2151 // ascender (A)
2152 $p = 0;
2153 $h = 2;
2154 } elseif ($dsc) {
2155 // descender (D)
2156 $p = 1;
2157 $h = 2;
2158 } else {
2159 // tracker (T)
2160 $p = 1;
2161 $h = 1;
2162 }
2163 $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => $h, 'p' => $p);
2164 $bararray['bcode'][$k++] = array('t' => 0, 'w' => 1, 'h' => 2, 'p' => 0);
2165 $bararray['maxw'] += 2;
2166 }
2167 unset($bararray['bcode'][($k - 1)]);
2168 --$bararray['maxw'];
2169 return $bararray;
2170 }
TCPDFBarcode\imb_crc11fcs
imb_crc11fcs($code_arr)
Intelligent Mail Barcode calculation of Frame Check Sequence.
Definition: tcpdf_barcodes_1d.php:2270
TCPDFBarcode\dec_to_hex
dec_to_hex($number)
Convert large integer number to hexadecimal representation.
Definition: tcpdf_barcodes_1d.php:2229
TCPDFBarcode\imb_tables
imb_tables($n, $size)
generate Nof13 tables used for Intelligent Mail Barcode
Definition: tcpdf_barcodes_1d.php:2323
TCPDFBarcode\hex_to_dec
hex_to_dec($hex)
Convert large hexadecimal number to decimal representation (string).
Definition: tcpdf_barcodes_1d.php:2253
$h
$h
Definition: example_009.php:101
$data
$data
Definition: example_011.php:126

References $code, $data, $h, dec_to_hex(), hex_to_dec(), imb_crc11fcs(), and imb_tables().

Referenced by setBarcode().

+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ barcode_imb_pre()

TCPDFBarcode::barcode_imb_pre (   $code)
protected

IMB - Intelligent Mail Barcode - Onecode - USPS-B-3200.

Parameters
$code(string) pre-formatted IMB barcode (65 chars "FADT")
Returns
array barcode representation.

Definition at line 2179 of file tcpdf_barcodes_1d.php.

2179 {
2180 if (!preg_match('/^[fadtFADT]{65}$/', $code) == 1) {
2181 return false;
2182 }
2183 $characters = str_split(strtolower($code), 1);
2184 // build bars
2185 $k = 0;
2186 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 3, 'bcode' => array());
2187 for ($i = 0; $i < 65; ++$i) {
2188 switch($characters[$i]) {
2189 case 'f': {
2190 // full bar
2191 $p = 0;
2192 $h = 3;
2193 break;
2194 }
2195 case 'a': {
2196 // ascender
2197 $p = 0;
2198 $h = 2;
2199 break;
2200 }
2201 case 'd': {
2202 // descender
2203 $p = 1;
2204 $h = 2;
2205 break;
2206 }
2207 case 't': {
2208 // tracker (short)
2209 $p = 1;
2210 $h = 1;
2211 break;
2212 }
2213 }
2214 $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => $h, 'p' => $p);
2215 $bararray['bcode'][$k++] = array('t' => 0, 'w' => 1, 'h' => 2, 'p' => 0);
2216 $bararray['maxw'] += 2;
2217 }
2218 unset($bararray['bcode'][($k - 1)]);
2219 --$bararray['maxw'];
2220 return $bararray;
2221 }

References $code, and $h.

Referenced by setBarcode().

+ Here is the caller graph for this function:

◆ barcode_msi()

TCPDFBarcode::barcode_msi (   $code,
  $checksum = false 
)
protected

MSI.

Variation of Plessey code, with similar applications Contains digits (0 to 9) and encodes the data only in the width of bars.

Parameters
$code(string) code to represent.
$checksum(boolean) if true add a checksum to the code (modulo 11)
Returns
array barcode representation.

Definition at line 763 of file tcpdf_barcodes_1d.php.

763 {
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 }

References $code, and binseq_to_array().

Referenced by setBarcode().

+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ barcode_pharmacode()

TCPDFBarcode::barcode_pharmacode (   $code)
protected

Pharmacode Contains digits (0 to 9)

Parameters
$code(string) code to represent.
Returns
array barcode representation.

Definition at line 1966 of file tcpdf_barcodes_1d.php.

1966 {
1967 $seq = '';
1968 $code = intval($code);
1969 while ($code > 0) {
1970 if (($code % 2) == 0) {
1971 $seq .= '11100';
1972 $code -= 2;
1973 } else {
1974 $seq .= '100';
1975 $code -= 1;
1976 }
1977 $code /= 2;
1978 }
1979 $seq = substr($seq, 0, -2);
1980 $seq = strrev($seq);
1981 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 1, 'bcode' => array());
1982 return $this->binseq_to_array($seq, $bararray);
1983 }

References $code, and binseq_to_array().

Referenced by setBarcode().

+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ barcode_pharmacode2t()

TCPDFBarcode::barcode_pharmacode2t (   $code)
protected

Pharmacode two-track Contains digits (0 to 9)

Parameters
$code(string) code to represent.
Returns
array barcode representation.

Definition at line 1992 of file tcpdf_barcodes_1d.php.

1992 {
1993 $seq = '';
1994 $code = intval($code);
1995 do {
1996 switch ($code % 3) {
1997 case 0: {
1998 $seq .= '3';
1999 $code = ($code - 3) / 3;
2000 break;
2001 }
2002 case 1: {
2003 $seq .= '1';
2004 $code = ($code - 1) / 3;
2005 break;
2006 }
2007 case 2: {
2008 $seq .= '2';
2009 $code = ($code - 2) / 3;
2010 break;
2011 }
2012 }
2013 } while($code != 0);
2014 $seq = strrev($seq);
2015 $k = 0;
2016 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 2, 'bcode' => array());
2017 $len = strlen($seq);
2018 for ($i = 0; $i < $len; ++$i) {
2019 switch ($seq{$i}) {
2020 case '1': {
2021 $p = 1;
2022 $h = 1;
2023 break;
2024 }
2025 case '2': {
2026 $p = 0;
2027 $h = 1;
2028 break;
2029 }
2030 case '3': {
2031 $p = 0;
2032 $h = 2;
2033 break;
2034 }
2035 }
2036 $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => $h, 'p' => $p);
2037 $bararray['bcode'][$k++] = array('t' => 0, 'w' => 1, 'h' => 2, 'p' => 0);
2038 $bararray['maxw'] += 2;
2039 }
2040 unset($bararray['bcode'][($k - 1)]);
2041 --$bararray['maxw'];
2042 return $bararray;
2043 }

References $code, and $h.

Referenced by setBarcode().

+ Here is the caller graph for this function:

◆ barcode_postnet()

TCPDFBarcode::barcode_postnet (   $code,
  $planet = false 
)
protected

POSTNET and PLANET barcodes.

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

Parameters
$code(string) zip code to represent. Must be a string containing a zip code of the form DDDDD or DDDDD-DDDD.
$planet(boolean) if true print the PLANET barcode, otherwise print POSTNET
Returns
array barcode representation.

Definition at line 1595 of file tcpdf_barcodes_1d.php.

1595 {
1596 // bar length
1597 if ($planet) {
1598 $barlen = Array(
1599 0 => Array(1,1,2,2,2),
1600 1 => Array(2,2,2,1,1),
1601 2 => Array(2,2,1,2,1),
1602 3 => Array(2,2,1,1,2),
1603 4 => Array(2,1,2,2,1),
1604 5 => Array(2,1,2,1,2),
1605 6 => Array(2,1,1,2,2),
1606 7 => Array(1,2,2,2,1),
1607 8 => Array(1,2,2,1,2),
1608 9 => Array(1,2,1,2,2)
1609 );
1610 } else {
1611 $barlen = Array(
1612 0 => Array(2,2,1,1,1),
1613 1 => Array(1,1,1,2,2),
1614 2 => Array(1,1,2,1,2),
1615 3 => Array(1,1,2,2,1),
1616 4 => Array(1,2,1,1,2),
1617 5 => Array(1,2,1,2,1),
1618 6 => Array(1,2,2,1,1),
1619 7 => Array(2,1,1,1,2),
1620 8 => Array(2,1,1,2,1),
1621 9 => Array(2,1,2,1,1)
1622 );
1623 }
1624 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 2, 'bcode' => array());
1625 $k = 0;
1626 $code = str_replace('-', '', $code);
1627 $code = str_replace(' ', '', $code);
1628 $len = strlen($code);
1629 // calculate checksum
1630 $sum = 0;
1631 for ($i = 0; $i < $len; ++$i) {
1632 $sum += intval($code{$i});
1633 }
1634 $chkd = ($sum % 10);
1635 if($chkd > 0) {
1636 $chkd = (10 - $chkd);
1637 }
1638 $code .= $chkd;
1639 $len = strlen($code);
1640 // start bar
1641 $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => 2, 'p' => 0);
1642 $bararray['bcode'][$k++] = array('t' => 0, 'w' => 1, 'h' => 2, 'p' => 0);
1643 $bararray['maxw'] += 2;
1644 for ($i = 0; $i < $len; ++$i) {
1645 for ($j = 0; $j < 5; ++$j) {
1646 $h = $barlen[$code{$i}][$j];
1647 $p = floor(1 / $h);
1648 $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => $h, 'p' => $p);
1649 $bararray['bcode'][$k++] = array('t' => 0, 'w' => 1, 'h' => 2, 'p' => 0);
1650 $bararray['maxw'] += 2;
1651 }
1652 }
1653 // end bar
1654 $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => 2, 'p' => 0);
1655 $bararray['maxw'] += 1;
1656 return $bararray;
1657 }

References $code, and $h.

Referenced by setBarcode().

+ Here is the caller graph for this function:

◆ barcode_rms4cc()

TCPDFBarcode::barcode_rms4cc (   $code,
  $kix = false 
)
protected

RMS4CC - CBC - KIX RMS4CC (Royal Mail 4-state Customer Code) - CBC (Customer Bar Code) - KIX (Klant index - Customer index) RM4SCC is the name of the barcode symbology used by the Royal Mail for its Cleanmail service.

Parameters
$code(string) code to print
$kix(boolean) 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.
Returns
array barcode representation.

Definition at line 1668 of file tcpdf_barcodes_1d.php.

1668 {
1669 $notkix = !$kix;
1670 // bar mode
1671 // 1 = pos 1, length 2
1672 // 2 = pos 1, length 3
1673 // 3 = pos 2, length 1
1674 // 4 = pos 2, length 2
1675 $barmode = array(
1676 '0' => array(3,3,2,2),
1677 '1' => array(3,4,1,2),
1678 '2' => array(3,4,2,1),
1679 '3' => array(4,3,1,2),
1680 '4' => array(4,3,2,1),
1681 '5' => array(4,4,1,1),
1682 '6' => array(3,1,4,2),
1683 '7' => array(3,2,3,2),
1684 '8' => array(3,2,4,1),
1685 '9' => array(4,1,3,2),
1686 'A' => array(4,1,4,1),
1687 'B' => array(4,2,3,1),
1688 'C' => array(3,1,2,4),
1689 'D' => array(3,2,1,4),
1690 'E' => array(3,2,2,3),
1691 'F' => array(4,1,1,4),
1692 'G' => array(4,1,2,3),
1693 'H' => array(4,2,1,3),
1694 'I' => array(1,3,4,2),
1695 'J' => array(1,4,3,2),
1696 'K' => array(1,4,4,1),
1697 'L' => array(2,3,3,2),
1698 'M' => array(2,3,4,1),
1699 'N' => array(2,4,3,1),
1700 'O' => array(1,3,2,4),
1701 'P' => array(1,4,1,4),
1702 'Q' => array(1,4,2,3),
1703 'R' => array(2,3,1,4),
1704 'S' => array(2,3,2,3),
1705 'T' => array(2,4,1,3),
1706 'U' => array(1,1,4,4),
1707 'V' => array(1,2,3,4),
1708 'W' => array(1,2,4,3),
1709 'X' => array(2,1,3,4),
1710 'Y' => array(2,1,4,3),
1711 'Z' => array(2,2,3,3)
1712 );
1713 $code = strtoupper($code);
1714 $len = strlen($code);
1715 $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 3, 'bcode' => array());
1716 if ($notkix) {
1717 // table for checksum calculation (row,col)
1718 $checktable = array(
1719 '0' => array(1,1),
1720 '1' => array(1,2),
1721 '2' => array(1,3),
1722 '3' => array(1,4),
1723 '4' => array(1,5),
1724 '5' => array(1,0),
1725 '6' => array(2,1),
1726 '7' => array(2,2),
1727 '8' => array(2,3),
1728 '9' => array(2,4),
1729 'A' => array(2,5),
1730 'B' => array(2,0),
1731 'C' => array(3,1),
1732 'D' => array(3,2),
1733 'E' => array(3,3),
1734 'F' => array(3,4),
1735 'G' => array(3,5),
1736 'H' => array(3,0),
1737 'I' => array(4,1),
1738 'J' => array(4,2),
1739 'K' => array(4,3),
1740 'L' => array(4,4),
1741 'M' => array(4,5),
1742 'N' => array(4,0),
1743 'O' => array(5,1),
1744 'P' => array(5,2),
1745 'Q' => array(5,3),
1746 'R' => array(5,4),
1747 'S' => array(5,5),
1748 'T' => array(5,0),
1749 'U' => array(0,1),
1750 'V' => array(0,2),
1751 'W' => array(0,3),
1752 'X' => array(0,4),
1753 'Y' => array(0,5),
1754 'Z' => array(0,0)
1755 );
1756 $row = 0;
1757 $col = 0;
1758 for ($i = 0; $i < $len; ++$i) {
1759 $row += $checktable[$code{$i}][0];
1760 $col += $checktable[$code{$i}][1];
1761 }
1762 $row %= 6;
1763 $col %= 6;
1764 $chk = array_keys($checktable, array($row,$col));
1765 $code .= $chk[0];
1766 ++$len;
1767 }
1768 $k = 0;
1769 if ($notkix) {
1770 // start bar
1771 $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => 2, 'p' => 0);
1772 $bararray['bcode'][$k++] = array('t' => 0, 'w' => 1, 'h' => 2, 'p' => 0);
1773 $bararray['maxw'] += 2;
1774 }
1775 for ($i = 0; $i < $len; ++$i) {
1776 for ($j = 0; $j < 4; ++$j) {
1777 switch ($barmode[$code{$i}][$j]) {
1778 case 1: {
1779 $p = 0;
1780 $h = 2;
1781 break;
1782 }
1783 case 2: {
1784 $p = 0;
1785 $h = 3;
1786 break;
1787 }
1788 case 3: {
1789 $p = 1;
1790 $h = 1;
1791 break;
1792 }
1793 case 4: {
1794 $p = 1;
1795 $h = 2;
1796 break;
1797 }
1798 }
1799 $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => $h, 'p' => $p);
1800 $bararray['bcode'][$k++] = array('t' => 0, 'w' => 1, 'h' => 2, 'p' => 0);
1801 $bararray['maxw'] += 2;
1802 }
1803 }
1804 if ($notkix) {
1805 // stop bar
1806 $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => 3, 'p' => 0);
1807 $bararray['maxw'] += 1;
1808 }
1809 return $bararray;
1810 }

References $code, $h, and $row.

Referenced by setBarcode().

+ Here is the caller graph for this function:

◆ barcode_s25()

TCPDFBarcode::barcode_s25 (   $code,
  $checksum = false 
)
protected

Standard 2 of 5 barcodes.

Used in airline ticket marking, photofinishing Contains digits (0 to 9) and encodes the data only in the width of bars.

Parameters
$code(string) code to represent.
$checksum(boolean) if true add a checksum to the code
Returns
array barcode representation.

Definition at line 822 of file tcpdf_barcodes_1d.php.

822 {
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 }

References $code, binseq_to_array(), and checksum_s25().

Referenced by setBarcode().

+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ binseq_to_array()

TCPDFBarcode::binseq_to_array (   $seq,
  $bararray 
)
protected

Convert binary barcode sequence to TCPDF barcode array.

Parameters
$seq(string) barcode as binary sequence.
$bararray(array) barcode array. òparam array $bararray TCPDF barcode array to fill up
Returns
array barcode representation.

Definition at line 864 of file tcpdf_barcodes_1d.php.

864 {
865 $len = strlen($seq);
866 $w = 0;
867 $k = 0;
868 for ($i = 0; $i < $len; ++$i) {
869 $w += 1;
870 if (($i == ($len - 1)) OR (($i < ($len - 1)) AND ($seq{$i} != $seq{($i+1)}))) {
871 if ($seq{$i} == '1') {
872 $t = true; // bar
873 } else {
874 $t = false; // space
875 }
876 $bararray['bcode'][$k] = array('t' => $t, 'w' => $w, 'h' => 1, 'p' => 0);
877 $bararray['maxw'] += $w;
878 ++$k;
879 $w = 0;
880 }
881 }
882 return $bararray;
883 }

References $t, and $w.

Referenced by barcode_eanext(), barcode_msi(), barcode_pharmacode(), and barcode_s25().

+ Here is the caller graph for this function:

◆ checksum_code39()

TCPDFBarcode::checksum_code39 (   $code)
protected

Calculate CODE 39 checksum (modulo 43).

Parameters
$code(string) code to represent.
Returns
char checksum.

Definition at line 537 of file tcpdf_barcodes_1d.php.

537 {
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 }

References $code.

Referenced by barcode_code39().

+ Here is the caller graph for this function:

◆ checksum_code93()

TCPDFBarcode::checksum_code93 (   $code)
protected

Calculate CODE 93 checksum (modulo 47).

Parameters
$code(string) code to represent.
Returns
string checksum code.

Definition at line 688 of file tcpdf_barcodes_1d.php.

688 {
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 }

References $code.

Referenced by barcode_code93().

+ Here is the caller graph for this function:

◆ checksum_s25()

TCPDFBarcode::checksum_s25 (   $code)
protected

Checksum for standard 2 of 5 barcodes.

Parameters
$code(string) code to process.
Returns
int checksum.

Definition at line 737 of file tcpdf_barcodes_1d.php.

737 {
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 }

References $code, and $r.

Referenced by barcode_i25(), and barcode_s25().

+ Here is the caller graph for this function:

◆ dec_to_hex()

TCPDFBarcode::dec_to_hex (   $number)

Convert large integer number to hexadecimal representation.

(requires PHP bcmath extension)

Parameters
$number(string) number to convert specified as a string
Returns
string hexadecimal representation

Definition at line 2229 of file tcpdf_barcodes_1d.php.

2229 {
2230 $i = 0;
2231 $hex = array();
2232 if($number == 0) {
2233 return '00';
2234 }
2235 while($number > 0) {
2236 if($number == 0) {
2237 array_push($hex, '0');
2238 } else {
2239 array_push($hex, strtoupper(dechex(bcmod($number, '16'))));
2240 $number = bcdiv($number, '16', 0);
2241 }
2242 }
2243 $hex = array_reverse($hex);
2244 return implode($hex);
2245 }

Referenced by barcode_imb().

+ Here is the caller graph for this function:

◆ encode_code39_ext()

TCPDFBarcode::encode_code39_ext (   $code)
protected

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

Parameters
$code(string) code to represent.
Returns
encoded string.

Definition at line 486 of file tcpdf_barcodes_1d.php.

486 {
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 }

References $code.

Referenced by barcode_code39().

+ Here is the caller graph for this function:

◆ get128ABsequence()

TCPDFBarcode::get128ABsequence (   $code)
protected

Split text code in A/B sequence for 128 code.

Parameters
$code(string) code to split.
Returns
array sequence

Definition at line 1288 of file tcpdf_barcodes_1d.php.

1288 {
1289 $len = strlen($code);
1290 $sequence = array();
1291 // get A sequences (if any)
1292 $numseq = array();
1293 preg_match_all('/([\0-\31])/', $code, $numseq, PREG_OFFSET_CAPTURE);
1294 if (isset($numseq[1]) AND !empty($numseq[1])) {
1295 $end_offset = 0;
1296 foreach ($numseq[1] as $val) {
1297 $offset = $val[1];
1298 if ($offset > $end_offset) {
1299 // B sequence
1300 $sequence[] = array('B', substr($code, $end_offset, ($offset - $end_offset)), ($offset - $end_offset));
1301 }
1302 // A sequence
1303 $slen = strlen($val[0]);
1304 $sequence[] = array('A', substr($code, $offset, $slen), $slen);
1305 $end_offset = $offset + $slen;
1306 }
1307 if ($end_offset < $len) {
1308 $sequence[] = array('B', substr($code, $end_offset), ($len - $end_offset));
1309 }
1310 } else {
1311 // only B sequence
1312 $sequence[] = array('B', $code, $len);
1313 }
1314 return $sequence;
1315 }

References $code.

Referenced by barcode_c128().

+ Here is the caller graph for this function:

◆ getBarcodeArray()

TCPDFBarcode::getBarcodeArray ( )

Return an array representations of barcode.

Returns
array

Definition at line 82 of file tcpdf_barcodes_1d.php.

82 {
83 return $this->barcode_array;
84 }
TCPDFBarcode\$barcode_array
$barcode_array
Array representation of barcode.
Definition: tcpdf_barcodes_1d.php:56

References $barcode_array.

◆ getBarcodeHTML()

TCPDFBarcode::getBarcodeHTML (   $w = 2,
  $h = 30,
  $color = 'black' 
)

Return an HTML representation of barcode.

Parameters
$w(int) Width of a single bar element in pixels.
$h(int) Height of a single bar element in pixels.
$color(string) Foreground color for bar elements (background is transparent).
Returns
string HTML code.

Definition at line 147 of file tcpdf_barcodes_1d.php.

147 {
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 }
$html
$html
Definition: example_001.php:87
$y
$y
Definition: example_007.php:83
$x
$x
Definition: example_009.php:98

References $h, $html, $w, $x, and $y.

◆ getBarcodePNG()

TCPDFBarcode::getBarcodePNG (   $w = 2,
  $h = 30,
  $color = array(0,0,0) 
)

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

Parameters
$w(int) Width of a single bar element in pixels.
$h(int) Height of a single bar element in pixels.
$color(array) RGB (0-255) foreground color for bar elements (background is transparent).

Definition at line 172 of file tcpdf_barcodes_1d.php.

172 {
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 }
TCPDFBarcode\getBarcodePngData
getBarcodePngData($w=2, $h=30, $color=array(0, 0, 0))
Return a PNG image representation of barcode (requires GD or Imagick library).
Definition: tcpdf_barcodes_1d.php:192

References $data, $h, $w, and getBarcodePngData().

+ Here is the call graph for this function:

◆ getBarcodePngData()

TCPDFBarcode::getBarcodePngData (   $w = 2,
  $h = 30,
  $color = array(0,0,0) 
)

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

Parameters
$w(int) Width of a single bar element in pixels.
$h(int) Height of a single bar element in pixels.
$color(array) RGB (0-255) foreground color for bar elements (background is transparent).
Returns
image or false in case of error.

Definition at line 192 of file tcpdf_barcodes_1d.php.

192 {
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 }

References $h, $w, $x, and $y.

Referenced by getBarcodePNG().

+ Here is the caller graph for this function:

◆ getBarcodeSVG()

TCPDFBarcode::getBarcodeSVG (   $w = 2,
  $h = 30,
  $color = 'black' 
)

Send barcode as SVG image object to the standard output.

Parameters
$w(int) Minimum width of a single bar in user units.
$h(int) Height of barcode in user units.
$color(string) Foreground color (in SVG format) for bar elements (background is transparent).

Definition at line 93 of file tcpdf_barcodes_1d.php.

93 {
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 }
TCPDFBarcode\getBarcodeSVGcode
getBarcodeSVGcode($w=2, $h=30, $color='black')
Return a SVG string representation of barcode.
Definition: tcpdf_barcodes_1d.php:114

References $code, $h, $w, and getBarcodeSVGcode().

+ Here is the call graph for this function:

◆ getBarcodeSVGcode()

TCPDFBarcode::getBarcodeSVGcode (   $w = 2,
  $h = 30,
  $color = 'black' 
)

Return a SVG string representation of barcode.

Parameters
$w(int) Minimum width of a single bar in user units.
$h(int) Height of barcode in user units.
$color(string) Foreground color (in SVG format) for bar elements (background is transparent).
Returns
string SVG code.

Definition at line 114 of file tcpdf_barcodes_1d.php.

114 {
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 }

References $h, $w, $x, and $y.

Referenced by getBarcodeSVG().

+ Here is the caller graph for this function:

◆ hex_to_dec()

TCPDFBarcode::hex_to_dec (   $hex)

Convert large hexadecimal number to decimal representation (string).

(requires PHP bcmath extension)

Parameters
$hex(string) hexadecimal number to convert specified as a string
Returns
string hexadecimal representation

Definition at line 2253 of file tcpdf_barcodes_1d.php.

2253 {
2254 $dec = 0;
2255 $bitval = 1;
2256 $len = strlen($hex);
2257 for($pos = ($len - 1); $pos >= 0; --$pos) {
2258 $dec = bcadd($dec, bcmul(hexdec($hex{$pos}), $bitval));
2259 $bitval = bcmul($bitval, 16);
2260 }
2261 return $dec;
2262 }

Referenced by barcode_imb().

+ Here is the caller graph for this function:

◆ imb_crc11fcs()

TCPDFBarcode::imb_crc11fcs (   $code_arr)
protected

Intelligent Mail Barcode calculation of Frame Check Sequence.

Parameters
$code_arr(string) array of hexadecimal values (13 bytes holding 102 bits right justified).
Returns
int 11 bit Frame Check Sequence as integer (decimal base)

Definition at line 2270 of file tcpdf_barcodes_1d.php.

2270 {
2271 $genpoly = 0x0F35; // generator polynomial
2272 $fcs = 0x07FF; // Frame Check Sequence
2273 // do most significant byte skipping the 2 most significant bits
2274 $data = hexdec($code_arr[0]) << 5;
2275 for ($bit = 2; $bit < 8; ++$bit) {
2276 if (($fcs ^ $data) & 0x400) {
2277 $fcs = ($fcs << 1) ^ $genpoly;
2278 } else {
2279 $fcs = ($fcs << 1);
2280 }
2281 $fcs &= 0x7FF;
2282 $data <<= 1;
2283 }
2284 // do rest of bytes
2285 for ($byte = 1; $byte < 13; ++$byte) {
2286 $data = hexdec($code_arr[$byte]) << 3;
2287 for ($bit = 0; $bit < 8; ++$bit) {
2288 if (($fcs ^ $data) & 0x400) {
2289 $fcs = ($fcs << 1) ^ $genpoly;
2290 } else {
2291 $fcs = ($fcs << 1);
2292 }
2293 $fcs &= 0x7FF;
2294 $data <<= 1;
2295 }
2296 }
2297 return $fcs;
2298 }

References $data.

Referenced by barcode_imb().

+ Here is the caller graph for this function:

◆ imb_reverse_us()

TCPDFBarcode::imb_reverse_us (   $num)
protected

Reverse unsigned short value.

Parameters
$num(int) value to reversr
Returns
int reversed value

Definition at line 2306 of file tcpdf_barcodes_1d.php.

2306 {
2307 $rev = 0;
2308 for ($i = 0; $i < 16; ++$i) {
2309 $rev <<= 1;
2310 $rev |= ($num & 1);
2311 $num >>= 1;
2312 }
2313 return $rev;
2314 }

Referenced by imb_tables().

+ Here is the caller graph for this function:

◆ imb_tables()

TCPDFBarcode::imb_tables (   $n,
  $size 
)
protected

generate Nof13 tables used for Intelligent Mail Barcode

Parameters
$n(int) is the type of table: 2 for 2of13 table, 5 for 5of13table
$size(int) size of table (78 for n=2 and 1287 for n=5)
Returns
array requested table

Definition at line 2323 of file tcpdf_barcodes_1d.php.

2323 {
2324 $table = array();
2325 $lli = 0; // LUT lower index
2326 $lui = $size - 1; // LUT upper index
2327 for ($count = 0; $count < 8192; ++$count) {
2328 $bit_count = 0;
2329 for ($bit_index = 0; $bit_index < 13; ++$bit_index) {
2330 $bit_count += intval(($count & (1 << $bit_index)) != 0);
2331 }
2332 // if we don't have the right number of bits on, go on to the next value
2333 if ($bit_count == $n) {
2334 $reverse = ($this->imb_reverse_us($count) >> 3);
2335 // if the reverse is less than count, we have already visited this pair before
2336 if ($reverse >= $count) {
2337 // If count is symmetric, place it at the first free slot from the end of the list.
2338 // 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
2339 if ($reverse == $count) {
2340 $table[$lui] = $count;
2341 --$lui;
2342 } else {
2343 $table[$lli] = $count;
2344 ++$lli;
2345 $table[$lli] = $reverse;
2346 ++$lli;
2347 }
2348 }
2349 }
2350 }
2351 return $table;
2352 }
$n
$n
Definition: RandomTest.php:80
$size
$size
Definition: RandomTest.php:79
TCPDFBarcode\imb_reverse_us
imb_reverse_us($num)
Reverse unsigned short value.
Definition: tcpdf_barcodes_1d.php:2306

References $n, $size, and imb_reverse_us().

Referenced by barcode_imb().

+ Here is the call graph for this function:
+ Here is the caller graph for this function:

◆ setBarcode()

TCPDFBarcode::setBarcode (   $code,
  $type 
)

Set the barcode.

Parameters
$code(string) code to print
$type(string) type of barcode:
  • C39 : CODE 39 - ANSI MH10.8M-1983 - USD-3 - 3 of 9.
  • C39+ : CODE 39 with checksum
  • C39E : CODE 39 EXTENDED
  • C39E+ : CODE 39 EXTENDED + CHECKSUM
  • C93 : CODE 93 - USS-93
  • S25 : Standard 2 of 5
  • S25+ : Standard 2 of 5 + CHECKSUM
  • I25 : Interleaved 2 of 5
  • I25+ : Interleaved 2 of 5 + CHECKSUM
  • C128 : CODE 128
  • C128A : CODE 128 A
  • C128B : CODE 128 B
  • C128C : CODE 128 C
  • EAN2 : 2-Digits UPC-Based Extension
  • EAN5 : 5-Digits UPC-Based Extension
  • EAN8 : EAN 8
  • EAN13 : EAN 13
  • UPCA : UPC-A
  • UPCE : UPC-E
  • MSI : MSI (Variation of Plessey code)
  • MSI+ : MSI + CHECKSUM (modulo 11)
  • POSTNET : POSTNET
  • PLANET : PLANET
  • RMS4CC : RMS4CC (Royal Mail 4-state Customer Code) - CBC (Customer Bar Code)
  • KIX : KIX (Klant index - Customer index)
  • IMB: Intelligent Mail Barcode - Onecode - USPS-B-3200
  • IMBPRE: Pre-processed Intelligent Mail Barcode - Onecode - USPS-B-3200, using only F,A,D,T letters
  • CODABAR : CODABAR
  • CODE11 : CODE 11
  • PHARMA : PHARMACODE
  • PHARMA2T : PHARMACODE TWO-TRACKS
Returns
array barcode array

Definition at line 249 of file tcpdf_barcodes_1d.php.

249 {
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 = false;
377 $arrcode = false;
378 break;
379 }
380 }
381 $this->barcode_array = $arrcode;
382 }
TCPDFBarcode\barcode_i25
barcode_i25($code, $checksum=false)
Interleaved 2 of 5 barcodes.
Definition: tcpdf_barcodes_1d.php:894
TCPDFBarcode\barcode_eanext
barcode_eanext($code, $len=5)
UPC-Based Extensions 2-Digit Ext.
Definition: tcpdf_barcodes_1d.php:1520
TCPDFBarcode\barcode_pharmacode
barcode_pharmacode($code)
Pharmacode Contains digits (0 to 9)
Definition: tcpdf_barcodes_1d.php:1966
TCPDFBarcode\barcode_s25
barcode_s25($code, $checksum=false)
Standard 2 of 5 barcodes.
Definition: tcpdf_barcodes_1d.php:822
TCPDFBarcode\barcode_rms4cc
barcode_rms4cc($code, $kix=false)
RMS4CC - CBC - KIX RMS4CC (Royal Mail 4-state Customer Code) - CBC (Customer Bar Code) - KIX (Klant i...
Definition: tcpdf_barcodes_1d.php:1668
TCPDFBarcode\barcode_postnet
barcode_postnet($code, $planet=false)
POSTNET and PLANET barcodes.
Definition: tcpdf_barcodes_1d.php:1595
TCPDFBarcode\barcode_msi
barcode_msi($code, $checksum=false)
MSI.
Definition: tcpdf_barcodes_1d.php:763
TCPDFBarcode\barcode_imb_pre
barcode_imb_pre($code)
IMB - Intelligent Mail Barcode - Onecode - USPS-B-3200.
Definition: tcpdf_barcodes_1d.php:2179
TCPDFBarcode\barcode_code39
barcode_code39($code, $extended=false, $checksum=false)
CODE 39 - ANSI MH10.8M-1983 - USD-3 - 3 of 9.
Definition: tcpdf_barcodes_1d.php:393
TCPDFBarcode\barcode_imb
barcode_imb($code)
IMB - Intelligent Mail Barcode - Onecode - USPS-B-3200 (requires PHP bcmath extension) Intelligent Ma...
Definition: tcpdf_barcodes_1d.php:2054
TCPDFBarcode\barcode_code11
barcode_code11($code)
CODE11 barcodes.
Definition: tcpdf_barcodes_1d.php:1875
TCPDFBarcode\barcode_eanupc
barcode_eanupc($code, $len=13)
EAN13 and UPC-A barcodes.
Definition: tcpdf_barcodes_1d.php:1327
TCPDFBarcode\barcode_codabar
barcode_codabar($code)
CODABAR barcodes.
Definition: tcpdf_barcodes_1d.php:1819
TCPDFBarcode\barcode_pharmacode2t
barcode_pharmacode2t($code)
Pharmacode two-track Contains digits (0 to 9)
Definition: tcpdf_barcodes_1d.php:1992
TCPDFBarcode\barcode_c128
barcode_c128($code, $type='')
C128 barcodes.
Definition: tcpdf_barcodes_1d.php:958
TCPDFBarcode\barcode_code93
barcode_code93($code)
CODE 93 - USS-93 Compact code similar to Code 39.
Definition: tcpdf_barcodes_1d.php:560

References $code, barcode_c128(), barcode_codabar(), barcode_code11(), barcode_code39(), barcode_code93(), barcode_eanext(), barcode_eanupc(), barcode_i25(), barcode_imb(), barcode_imb_pre(), barcode_msi(), barcode_pharmacode(), barcode_pharmacode2t(), barcode_postnet(), barcode_rms4cc(), and barcode_s25().

Referenced by __construct().

+ Here is the call graph for this function:
+ Here is the caller graph for this function:

Field Documentation

◆ $barcode_array

TCPDFBarcode::$barcode_array
protected

Array representation of barcode.

Definition at line 56 of file tcpdf_barcodes_1d.php.

Referenced by getBarcodeArray().

The documentation for this class was generated from the following file: