PageRenderTime 39ms CodeModel.GetById 42ms RepoModel.GetById 1ms app.codeStats 1ms

/lib/tcpdf/include/tcpdf_fonts.php

https://bitbucket.org/moodle/moodle
PHP | 2656 lines | 1964 code | 104 blank | 588 comment | 554 complexity | c3c2d5f48c4a02a78013c071086a65d3 MD5 | raw file
Possible License(s): Apache-2.0, LGPL-2.1, BSD-3-Clause, MIT, GPL-3.0

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

    

  1. <?php
    2. 

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

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

  4. // Version     : 1.1.0
    5. 

  5. // Begin       : 2008-01-01
    6. 

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

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

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

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

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

  11. //
    12. 

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

  13. //
    14. 

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

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

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

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

  18. //
    19. 

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

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

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

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

  23. //
    24. 

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

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

  26. //
    27. 

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

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

  29. //
    30. 

  30. // Description :Font methods for TCPDF library.
    31. 

  31. //
    32. 

  32. //============================================================+
    33. 

  33. 

  34. /**
    35. 

  35.  * @file
    36. 

  36.  * Unicode data and font methods for TCPDF library.
    37. 

  37.  * @author Nicola Asuni
    38. 

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

  39.  */
    40. 

  40. 

  41. /**
    42. 

  42.  * @class TCPDF_FONTS
    43. 

  43.  * Font methods for TCPDF library.
    44. 

  44.  * @package com.tecnick.tcpdf
    45. 

  45.  * @version 1.1.0
    46. 

  46.  * @author Nicola Asuni - info@tecnick.com
    47. 

  47.  */
    48. 

  48. class TCPDF_FONTS {
    49. 

  49. 

  50. 	/**
    51. 

  51. 	 * Static cache used for speed up uniord performances
    52. 

  52. 	 * @protected
    53. 

  53. 	 */
    54. 

  54. 	protected static $cache_uniord = array();
    55. 

  55. 

  56. 	/**
    57. 

  57. 	 * Convert and add the selected TrueType or Type1 font to the fonts folder (that must be writeable).
    58. 

  58. 	 * @param $fontfile (string) Font file (full path).
    59. 

  59. 	 * @param $fonttype (string) Font type. Leave empty for autodetect mode. Valid values are: TrueTypeUnicode, TrueType, Type1, CID0JP = CID-0 Japanese, CID0KR = CID-0 Korean, CID0CS = CID-0 Chinese Simplified, CID0CT = CID-0 Chinese Traditional.
    60. 

  60. 	 * @param $enc (string) Name of the encoding table to use. Leave empty for default mode. Omit this parameter for TrueType Unicode and symbolic fonts like Symbol or ZapfDingBats.
    61. 

  61. 	 * @param $flags (int) Unsigned 32-bit integer containing flags specifying various characteristics of the font (PDF32000:2008 - 9.8.2 Font Descriptor Flags): +1 for fixed font; +4 for symbol or +32 for non-symbol; +64 for italic. Fixed and Italic mode are generally autodetected so you have to set it to 32 = non-symbolic font (default) or 4 = symbolic font.
    62. 

  62. 	 * @param $outpath (string) Output path for generated font files (must be writeable by the web server). Leave empty for default font folder.
    63. 

  63. 	 * @param $platid (int) Platform ID for CMAP table to extract (when building a Unicode font for Windows this value should be 3, for Macintosh should be 1).
    64. 

  64. 	 * @param $encid (int) Encoding ID for CMAP table to extract (when building a Unicode font for Windows this value should be 1, for Macintosh should be 0). When Platform ID is 3, legal values for Encoding ID are: 0=Symbol, 1=Unicode, 2=ShiftJIS, 3=PRC, 4=Big5, 5=Wansung, 6=Johab, 7=Reserved, 8=Reserved, 9=Reserved, 10=UCS-4.
    65. 

  65. 	 * @param $addcbbox (boolean) If true includes the character bounding box information on the php font file.
    66. 

  66. 	 * @param $link (boolean) If true link to system font instead of copying the font data (not transportable) - Note: do not work with Type1 fonts.
    67. 

  67. 	 * @return (string) TCPDF font name or boolean false in case of error.
    68. 

  68. 	 * @author Nicola Asuni
    69. 

  69. 	 * @since 5.9.123 (2010-09-30)
    70. 

  70. 	 * @public static
    71. 

  71. 	 */
    72. 

  72. 	public static function addTTFfont($fontfile, $fonttype='', $enc='', $flags=32, $outpath='', $platid=3, $encid=1, $addcbbox=false, $link=false) {
    73. 

  73. 		if (!TCPDF_STATIC::file_exists($fontfile)) {
    74. 

  74. 			// Could not find file
    75. 

  75. 			return false;
    76. 

  76. 		}
    77. 

  77. 		// font metrics
    78. 

  78. 		$fmetric = array();
    79. 

  79. 		// build new font name for TCPDF compatibility
    80. 

  80. 		$font_path_parts = pathinfo($fontfile);
    81. 

  81. 		if (!isset($font_path_parts['filename'])) {
    82. 

  82. 			$font_path_parts['filename'] = substr($font_path_parts['basename'], 0, -(strlen($font_path_parts['extension']) + 1));
    83. 

  83. 		}
    84. 

  84. 		$font_name = strtolower($font_path_parts['filename']);
    85. 

  85. 		$font_name = preg_replace('/[^a-z0-9_]/', '', $font_name);
    86. 

  86. 		$search  = array('bold', 'oblique', 'italic', 'regular');
    87. 

  87. 		$replace = array('b', 'i', 'i', '');
    88. 

  88. 		$font_name = str_replace($search, $replace, $font_name);
    89. 

  89. 		if (empty($font_name)) {
    90. 

  90. 			// set generic name
    91. 

  91. 			$font_name = 'tcpdffont';
    92. 

  92. 		}
    93. 

  93. 		// set output path
    94. 

  94. 		if (empty($outpath)) {
    95. 

  95. 			$outpath = self::_getfontpath();
    96. 

  96. 		}
    97. 

  97. 		// check if this font already exist
    98. 

  98. 		if (@TCPDF_STATIC::file_exists($outpath.$font_name.'.php')) {
    99. 

  99. 			// this font already exist (delete it from fonts folder to rebuild it)
    100. 

  100. 			return $font_name;
    101. 

  101. 		}
    102. 

  102. 		$fmetric['file'] = $font_name;
    103. 

  103. 		$fmetric['ctg'] = $font_name.'.ctg.z';
    104. 

  104. 		// get font data
    105. 

  105. 		$font = file_get_contents($fontfile);
    106. 

  106. 		$fmetric['originalsize'] = strlen($font);
    107. 

  107. 		// autodetect font type
    108. 

  108. 		if (empty($fonttype)) {
    109. 

  109. 			if (TCPDF_STATIC::_getULONG($font, 0) == 0x10000) {
    110. 

  110. 				// True Type (Unicode or not)
    111. 

  111. 				$fonttype = 'TrueTypeUnicode';
    112. 

  112. 			} elseif (substr($font, 0, 4) == 'OTTO') {
    113. 

  113. 				// Open Type (Unicode or not)
    114. 

  114. 				//Unsupported font format: OpenType with CFF data
    115. 

  115. 				return false;
    116. 

  116. 			} else {
    117. 

  117. 				// Type 1
    118. 

  118. 				$fonttype = 'Type1';
    119. 

  119. 			}
    120. 

  120. 		}
    121. 

  121. 		// set font type
    122. 

  122. 		switch ($fonttype) {
    123. 

  123. 			case 'CID0CT':
    124. 

  124. 			case 'CID0CS':
    125. 

  125. 			case 'CID0KR':
    126. 

  126. 			case 'CID0JP': {
    127. 

  127. 				$fmetric['type'] = 'cidfont0';
    128. 

  128. 				break;
    129. 

  129. 			}
    130. 

  130. 			case 'Type1': {
    131. 

  131. 				$fmetric['type'] = 'Type1';
    132. 

  132. 				if (empty($enc) AND (($flags & 4) == 0)) {
    133. 

  133. 					$enc = 'cp1252';
    134. 

  134. 				}
    135. 

  135. 				break;
    136. 

  136. 			}
    137. 

  137. 			case 'TrueType': {
    138. 

  138. 				$fmetric['type'] = 'TrueType';
    139. 

  139. 				break;
    140. 

  140. 			}
    141. 

  141. 			case 'TrueTypeUnicode':
    142. 

  142. 			default: {
    143. 

  143. 				$fmetric['type'] = 'TrueTypeUnicode';
    144. 

  144. 				break;
    145. 

  145. 			}
    146. 

  146. 		}
    147. 

  147. 		// set encoding maps (if any)
    148. 

  148. 		$fmetric['enc'] = preg_replace('/[^A-Za-z0-9_\-]/', '', $enc);
    149. 

  149. 		$fmetric['diff'] = '';
    150. 

  150. 		if (($fmetric['type'] == 'TrueType') OR ($fmetric['type'] == 'Type1')) {
    151. 

  151. 			if (!empty($enc) AND ($enc != 'cp1252') AND isset(TCPDF_FONT_DATA::$encmap[$enc])) {
    152. 

  152. 				// build differences from reference encoding
    153. 

  153. 				$enc_ref = TCPDF_FONT_DATA::$encmap['cp1252'];
    154. 

  154. 				$enc_target = TCPDF_FONT_DATA::$encmap[$enc];
    155. 

  155. 				$last = 0;
    156. 

  156. 				for ($i = 32; $i <= 255; ++$i) {
    157. 

  157. 					if ($enc_target[$i] != $enc_ref[$i]) {
    158. 

  158. 						if ($i != ($last + 1)) {
    159. 

  159. 							$fmetric['diff'] .= $i.' ';
    160. 

  160. 						}
    161. 

  161. 						$last = $i;
    162. 

  162. 						$fmetric['diff'] .= '/'.$enc_target[$i].' ';
    163. 

  163. 					}
    164. 

  164. 				}
    165. 

  165. 			}
    166. 

  166. 		}
    167. 

  167. 		// parse the font by type
    168. 

  168. 		if ($fmetric['type'] == 'Type1') {
    169. 

  169. 			// ---------- TYPE 1 ----------
    170. 

  170. 			// read first segment
    171. 

  171. 			$a = unpack('Cmarker/Ctype/Vsize', substr($font, 0, 6));
    172. 

  172. 			if ($a['marker'] != 128) {
    173. 

  173. 				// Font file is not a valid binary Type1
    174. 

  174. 				return false;
    175. 

  175. 			}
    176. 

  176. 			$fmetric['size1'] = $a['size'];
    177. 

  177. 			$data = substr($font, 6, $fmetric['size1']);
    178. 

  178. 			// read second segment
    179. 

  179. 			$a = unpack('Cmarker/Ctype/Vsize', substr($font, (6 + $fmetric['size1']), 6));
    180. 

  180. 			if ($a['marker'] != 128) {
    181. 

  181. 				// Font file is not a valid binary Type1
    182. 

  182. 				return false;
    183. 

  183. 			}
    184. 

  184. 			$fmetric['size2'] = $a['size'];
    185. 

  185. 			$encrypted = substr($font, (12 + $fmetric['size1']), $fmetric['size2']);
    186. 

  186. 			$data .= $encrypted;
    187. 

  187. 			// store compressed font
    188. 

  188. 			$fmetric['file'] .= '.z';
    189. 

  189. 			$fp = TCPDF_STATIC::fopenLocal($outpath.$fmetric['file'], 'wb');
    190. 

  190. 			fwrite($fp, gzcompress($data));
    191. 

  191. 			fclose($fp);
    192. 

  192. 			// get font info
    193. 

  193. 			$fmetric['Flags'] = $flags;
    194. 

  194. 			preg_match ('#/FullName[\s]*\(([^\)]*)#', $font, $matches);
    195. 

  195. 			$fmetric['name'] = preg_replace('/[^a-zA-Z0-9_\-]/', '', $matches[1]);
    196. 

  196. 			preg_match('#/FontBBox[\s]*{([^}]*)#', $font, $matches);
    197. 

  197. 			$fmetric['bbox'] = trim($matches[1]);
    198. 

  198. 			$bv = explode(' ', $fmetric['bbox']);
    199. 

  199. 			$fmetric['Ascent'] = intval($bv[3]);
    200. 

  200. 			$fmetric['Descent'] = intval($bv[1]);
    201. 

  201. 			preg_match('#/ItalicAngle[\s]*([0-9\+\-]*)#', $font, $matches);
    202. 

  202. 			$fmetric['italicAngle'] = intval($matches[1]);
    203. 

  203. 			if ($fmetric['italicAngle'] != 0) {
    204. 

  204. 				$fmetric['Flags'] |= 64;
    205. 

  205. 			}
    206. 

  206. 			preg_match('#/UnderlinePosition[\s]*([0-9\+\-]*)#', $font, $matches);
    207. 

  207. 			$fmetric['underlinePosition'] = intval($matches[1]);
    208. 

  208. 			preg_match('#/UnderlineThickness[\s]*([0-9\+\-]*)#', $font, $matches);
    209. 

  209. 			$fmetric['underlineThickness'] = intval($matches[1]);
    210. 

  210. 			preg_match('#/isFixedPitch[\s]*([^\s]*)#', $font, $matches);
    211. 

  211. 			if ($matches[1] == 'true') {
    212. 

  212. 				$fmetric['Flags'] |= 1;
    213. 

  213. 			}
    214. 

  214. 			// get internal map
    215. 

  215. 			$imap = array();
    216. 

  216. 			if (preg_match_all('#dup[\s]([0-9]+)[\s]*/([^\s]*)[\s]put#sU', $font, $fmap, PREG_SET_ORDER) > 0) {
    217. 

  217. 				foreach ($fmap as $v) {
    218. 

  218. 					$imap[$v[2]] = $v[1];
    219. 

  219. 				}
    220. 

  220. 			}
    221. 

  221. 			// decrypt eexec encrypted part
    222. 

  222. 			$r = 55665; // eexec encryption constant
    223. 

  223. 			$c1 = 52845;
    224. 

  224. 			$c2 = 22719;
    225. 

  225. 			$elen = strlen($encrypted);
    226. 

  226. 			$eplain = '';
    227. 

  227. 			for ($i = 0; $i < $elen; ++$i) {
    228. 

  228. 				$chr = ord($encrypted[$i]);
    229. 

  229. 				$eplain .= chr($chr ^ ($r >> 8));
    230. 

  230. 				$r = ((($chr + $r) * $c1 + $c2) % 65536);
    231. 

  231. 			}
    232. 

  232. 			if (preg_match('#/ForceBold[\s]*([^\s]*)#', $eplain, $matches) > 0) {
    233. 

  233. 				if ($matches[1] == 'true') {
    234. 

  234. 					$fmetric['Flags'] |= 0x40000;
    235. 

  235. 				}
    236. 

  236. 			}
    237. 

  237. 			if (preg_match('#/StdVW[\s]*\[([^\]]*)#', $eplain, $matches) > 0) {
    238. 

  238. 				$fmetric['StemV'] = intval($matches[1]);
    239. 

  239. 			} else {
    240. 

  240. 				$fmetric['StemV'] = 70;
    241. 

  241. 			}
    242. 

  242. 			if (preg_match('#/StdHW[\s]*\[([^\]]*)#', $eplain, $matches) > 0) {
    243. 

  243. 				$fmetric['StemH'] = intval($matches[1]);
    244. 

  244. 			} else {
    245. 

  245. 				$fmetric['StemH'] = 30;
    246. 

  246. 			}
    247. 

  247. 			if (preg_match('#/BlueValues[\s]*\[([^\]]*)#', $eplain, $matches) > 0) {
    248. 

  248. 				$bv = explode(' ', $matches[1]);
    249. 

  249. 				if (count($bv) >= 6) {
    250. 

  250. 					$v1 = intval($bv[2]);
    251. 

  251. 					$v2 = intval($bv[4]);
    252. 

  252. 					if ($v1 <= $v2) {
    253. 

  253. 						$fmetric['XHeight'] = $v1;
    254. 

  254. 						$fmetric['CapHeight'] = $v2;
    255. 

  255. 					} else {
    256. 

  256. 						$fmetric['XHeight'] = $v2;
    257. 

  257. 						$fmetric['CapHeight'] = $v1;
    258. 

  258. 					}
    259. 

  259. 				} else {
    260. 

  260. 					$fmetric['XHeight'] = 450;
    261. 

  261. 					$fmetric['CapHeight'] = 700;
    262. 

  262. 				}
    263. 

  263. 			} else {
    264. 

  264. 				$fmetric['XHeight'] = 450;
    265. 

  265. 				$fmetric['CapHeight'] = 700;
    266. 

  266. 			}
    267. 

  267. 			// get the number of random bytes at the beginning of charstrings
    268. 

  268. 			if (preg_match('#/lenIV[\s]*([0-9]*)#', $eplain, $matches) > 0) {
    269. 

  269. 				$lenIV = intval($matches[1]);
    270. 

  270. 			} else {
    271. 

  271. 				$lenIV = 4;
    272. 

  272. 			}
    273. 

  273. 			$fmetric['Leading'] = 0;
    274. 

  274. 			// get charstring data
    275. 

  275. 			$eplain = substr($eplain, (strpos($eplain, '/CharStrings') + 1));
    276. 

  276. 			preg_match_all('#/([A-Za-z0-9\.]*)[\s][0-9]+[\s]RD[\s](.*)[\s]ND#sU', $eplain, $matches, PREG_SET_ORDER);
    277. 

  277. 			if (!empty($enc) AND isset(TCPDF_FONT_DATA::$encmap[$enc])) {
    278. 

  278. 				$enc_map = TCPDF_FONT_DATA::$encmap[$enc];
    279. 

  279. 			} else {
    280. 

  280. 				$enc_map = false;
    281. 

  281. 			}
    282. 

  282. 			$fmetric['cw'] = '';
    283. 

  283. 			$fmetric['MaxWidth'] = 0;
    284. 

  284. 			$cwidths = array();
    285. 

  285. 			foreach ($matches as $k => $v) {
    286. 

  286. 				$cid = 0;
    287. 

  287. 				if (isset($imap[$v[1]])) {
    288. 

  288. 					$cid = $imap[$v[1]];
    289. 

  289. 				} elseif ($enc_map !== false) {
    290. 

  290. 					$cid = array_search($v[1], $enc_map);
    291. 

  291. 					if ($cid === false) {
    292. 

  292. 						$cid = 0;
    293. 

  293. 					} elseif ($cid > 1000) {
    294. 

  294. 						$cid -= 1000;
    295. 

  295. 					}
    296. 

  296. 				}
    297. 

  297. 				// decrypt charstring encrypted part
    298. 

  298. 				$r = 4330; // charstring encryption constant
    299. 

  299. 				$c1 = 52845;
    300. 

  300. 				$c2 = 22719;
    301. 

  301. 				$cd = $v[2];
    302. 

  302. 				$clen = strlen($cd);
    303. 

  303. 				$ccom = array();
    304. 

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

  305. 					$chr = ord($cd[$i]);
    306. 

  306. 					$ccom[] = ($chr ^ ($r >> 8));
    307. 

  307. 					$r = ((($chr + $r) * $c1 + $c2) % 65536);
    308. 

  308. 				}
    309. 

  309. 				// decode numbers
    310. 

  310. 				$cdec = array();
    311. 

  311. 				$ck = 0;
    312. 

  312. 				$i = $lenIV;
    313. 

  313. 				while ($i < $clen) {
    314. 

  314. 					if ($ccom[$i] < 32) {
    315. 

  315. 						$cdec[$ck] = $ccom[$i];
    316. 

  316. 						if (($ck > 0) AND ($cdec[$ck] == 13)) {
    317. 

  317. 							// hsbw command: update width
    318. 

  318. 							$cwidths[$cid] = $cdec[($ck - 1)];
    319. 

  319. 						}
    320. 

  320. 						++$i;
    321. 

  321. 					} elseif (($ccom[$i] >= 32) AND ($ccom[$i] <= 246)) {
    322. 

  322. 						$cdec[$ck] = ($ccom[$i] - 139);
    323. 

  323. 						++$i;
    324. 

  324. 					} elseif (($ccom[$i] >= 247) AND ($ccom[$i] <= 250)) {
    325. 

  325. 						$cdec[$ck] = ((($ccom[$i] - 247) * 256) + $ccom[($i + 1)] + 108);
    326. 

  326. 						$i += 2;
    327. 

  327. 					} elseif (($ccom[$i] >= 251) AND ($ccom[$i] <= 254)) {
    328. 

  328. 						$cdec[$ck] = ((-($ccom[$i] - 251) * 256) - $ccom[($i + 1)] - 108);
    329. 

  329. 						$i += 2;
    330. 

  330. 					} elseif ($ccom[$i] == 255) {
    331. 

  331. 						$sval = chr($ccom[($i + 1)]).chr($ccom[($i + 2)]).chr($ccom[($i + 3)]).chr($ccom[($i + 4)]);
    332. 

  332. 						$vsval = unpack('li', $sval);
    333. 

  333. 						$cdec[$ck] = $vsval['i'];
    334. 

  334. 						$i += 5;
    335. 

  335. 					}
    336. 

  336. 					++$ck;
    337. 

  337. 				}
    338. 

  338. 			} // end for each matches
    339. 

  339. 			$fmetric['MissingWidth'] = $cwidths[0];
    340. 

  340. 			$fmetric['MaxWidth'] = $fmetric['MissingWidth'];
    341. 

  341. 			$fmetric['AvgWidth'] = 0;
    342. 

  342. 			// set chars widths
    343. 

  343. 			for ($cid = 0; $cid <= 255; ++$cid) {
    344. 

  344. 				if (isset($cwidths[$cid])) {
    345. 

  345. 					if ($cwidths[$cid] > $fmetric['MaxWidth']) {
    346. 

  346. 						$fmetric['MaxWidth'] = $cwidths[$cid];
    347. 

  347. 					}
    348. 

  348. 					$fmetric['AvgWidth'] += $cwidths[$cid];
    349. 

  349. 					$fmetric['cw'] .= ','.$cid.'=>'.$cwidths[$cid];
    350. 

  350. 				} else {
    351. 

  351. 					$fmetric['cw'] .= ','.$cid.'=>'.$fmetric['MissingWidth'];
    352. 

  352. 				}
    353. 

  353. 			}
    354. 

  354. 			$fmetric['AvgWidth'] = round($fmetric['AvgWidth'] / count($cwidths));
    355. 

  355. 		} else {
    356. 

  356. 			// ---------- TRUE TYPE ----------
    357. 

  357. 			$offset = 0; // offset position of the font data
    358. 

  358. 			if (TCPDF_STATIC::_getULONG($font, $offset) != 0x10000) {
    359. 

  359. 				// sfnt version must be 0x00010000 for TrueType version 1.0.
    360. 

  360. 				return false;
    361. 

  361. 			}
    362. 

  362. 			if ($fmetric['type'] != 'cidfont0') {
    363. 

  363. 				if ($link) {
    364. 

  364. 					// creates a symbolic link to the existing font
    365. 

  365. 					symlink($fontfile, $outpath.$fmetric['file']);
    366. 

  366. 				} else {
    367. 

  367. 					// store compressed font
    368. 

  368. 					$fmetric['file'] .= '.z';
    369. 

  369. 					$fp = TCPDF_STATIC::fopenLocal($outpath.$fmetric['file'], 'wb');
    370. 

  370. 					fwrite($fp, gzcompress($font));
    371. 

  371. 					fclose($fp);
    372. 

  372. 				}
    373. 

  373. 			}
    374. 

  374. 			$offset += 4;
    375. 

  375. 			// get number of tables
    376. 

  376. 			$numTables = TCPDF_STATIC::_getUSHORT($font, $offset);
    377. 

  377. 			$offset += 2;
    378. 

  378. 			// skip searchRange, entrySelector and rangeShift
    379. 

  379. 			$offset += 6;
    380. 

  380. 			// tables array
    381. 

  381. 			$table = array();
    382. 

  382. 			// ---------- get tables ----------
    383. 

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

  384. 				// get table info
    385. 

  385. 				$tag = substr($font, $offset, 4);
    386. 

  386. 				$offset += 4;
    387. 

  387. 				$table[$tag] = array();
    388. 

  388. 				$table[$tag]['checkSum'] = TCPDF_STATIC::_getULONG($font, $offset);
    389. 

  389. 				$offset += 4;
    390. 

  390. 				$table[$tag]['offset'] = TCPDF_STATIC::_getULONG($font, $offset);
    391. 

  391. 				$offset += 4;
    392. 

  392. 				$table[$tag]['length'] = TCPDF_STATIC::_getULONG($font, $offset);
    393. 

  393. 				$offset += 4;
    394. 

  394. 			}
    395. 

  395. 			// check magicNumber
    396. 

  396. 			$offset = $table['head']['offset'] + 12;
    397. 

  397. 			if (TCPDF_STATIC::_getULONG($font, $offset) != 0x5F0F3CF5) {
    398. 

  398. 				// magicNumber must be 0x5F0F3CF5
    399. 

  399. 				return false;
    400. 

  400. 			}
    401. 

  401. 			$offset += 4;
    402. 

  402. 			$offset += 2; // skip flags
    403. 

  403. 			// get FUnits
    404. 

  404. 			$fmetric['unitsPerEm'] = TCPDF_STATIC::_getUSHORT($font, $offset);
    405. 

  405. 			$offset += 2;
    406. 

  406. 			// units ratio constant
    407. 

  407. 			$urk = (1000 / $fmetric['unitsPerEm']);
    408. 

  408. 			$offset += 16; // skip created, modified
    409. 

  409. 			$xMin = round(TCPDF_STATIC::_getFWORD($font, $offset) * $urk);
    410. 

  410. 			$offset += 2;
    411. 

  411. 			$yMin = round(TCPDF_STATIC::_getFWORD($font, $offset) * $urk);
    412. 

  412. 			$offset += 2;
    413. 

  413. 			$xMax = round(TCPDF_STATIC::_getFWORD($font, $offset) * $urk);
    414. 

  414. 			$offset += 2;
    415. 

  415. 			$yMax = round(TCPDF_STATIC::_getFWORD($font, $offset) * $urk);
    416. 

  416. 			$offset += 2;
    417. 

  417. 			$fmetric['bbox'] = ''.$xMin.' '.$yMin.' '.$xMax.' '.$yMax.'';
    418. 

  418. 			$macStyle = TCPDF_STATIC::_getUSHORT($font, $offset);
    419. 

  419. 			$offset += 2;
    420. 

  420. 			// PDF font flags
    421. 

  421. 			$fmetric['Flags'] = $flags;
    422. 

  422. 			if (($macStyle & 2) == 2) {
    423. 

  423. 				// italic flag
    424. 

  424. 				$fmetric['Flags'] |= 64;
    425. 

  425. 			}
    426. 

  426. 			// get offset mode (indexToLocFormat : 0 = short, 1 = long)
    427. 

  427. 			$offset = $table['head']['offset'] + 50;
    428. 

  428. 			$short_offset = (TCPDF_STATIC::_getSHORT($font, $offset) == 0);
    429. 

  429. 			$offset += 2;
    430. 

  430. 			// get the offsets to the locations of the glyphs in the font, relative to the beginning of the glyphData table
    431. 

  431. 			$indexToLoc = array();
    432. 

  432. 			$offset = $table['loca']['offset'];
    433. 

  433. 			if ($short_offset) {
    434. 

  434. 				// short version
    435. 

  435. 				$tot_num_glyphs = floor($table['loca']['length'] / 2); // numGlyphs + 1
    436. 

  436. 				for ($i = 0; $i < $tot_num_glyphs; ++$i) {
    437. 

  437. 					$indexToLoc[$i] = TCPDF_STATIC::_getUSHORT($font, $offset) * 2;
    438. 

  438. 					if (isset($indexToLoc[($i - 1)]) && ($indexToLoc[$i] == $indexToLoc[($i - 1)])) {
    439. 

  439. 						// the last glyph didn't have an outline
    440. 

  440. 						unset($indexToLoc[($i - 1)]);
    441. 

  441. 					}
    442. 

  442. 					$offset += 2;
    443. 

  443. 				}
    444. 

  444. 			} else {
    445. 

  445. 				// long version
    446. 

  446. 				$tot_num_glyphs = floor($table['loca']['length'] / 4); // numGlyphs + 1
    447. 

  447. 				for ($i = 0; $i < $tot_num_glyphs; ++$i) {
    448. 

  448. 					$indexToLoc[$i] = TCPDF_STATIC::_getULONG($font, $offset);
    449. 

  449. 					if (isset($indexToLoc[($i - 1)]) && ($indexToLoc[$i] == $indexToLoc[($i - 1)])) {
    450. 

  450. 						// the last glyph didn't have an outline
    451. 

  451. 						unset($indexToLoc[($i - 1)]);
    452. 

  452. 					}
    453. 

  453. 					$offset += 4;
    454. 

  454. 				}
    455. 

  455. 			}
    456. 

  456. 			// get glyphs indexes of chars from cmap table
    457. 

  457. 			$offset = $table['cmap']['offset'] + 2;
    458. 

  458. 			$numEncodingTables = TCPDF_STATIC::_getUSHORT($font, $offset);
    459. 

  459. 			$offset += 2;
    460. 

  460. 			$encodingTables = array();
    461. 

  461. 			for ($i = 0; $i < $numEncodingTables; ++$i) {
    462. 

  462. 				$encodingTables[$i]['platformID'] = TCPDF_STATIC::_getUSHORT($font, $offset);
    463. 

  463. 				$offset += 2;
    464. 

  464. 				$encodingTables[$i]['encodingID'] = TCPDF_STATIC::_getUSHORT($font, $offset);
    465. 

  465. 				$offset += 2;
    466. 

  466. 				$encodingTables[$i]['offset'] = TCPDF_STATIC::_getULONG($font, $offset);
    467. 

  467. 				$offset += 4;
    468. 

  468. 			}
    469. 

  469. 			// ---------- get os/2 metrics ----------
    470. 

  470. 			$offset = $table['OS/2']['offset'];
    471. 

  471. 			$offset += 2; // skip version
    472. 

  472. 			// xAvgCharWidth
    473. 

  473. 			$fmetric['AvgWidth'] = round(TCPDF_STATIC::_getFWORD($font, $offset) * $urk);
    474. 

  474. 			$offset += 2;
    475. 

  475. 			// usWeightClass
    476. 

  476. 			$usWeightClass = round(TCPDF_STATIC::_getUFWORD($font, $offset) * $urk);
    477. 

  477. 			// estimate StemV and StemH (400 = usWeightClass for Normal - Regular font)
    478. 

  478. 			$fmetric['StemV'] = round((70 * $usWeightClass) / 400);
    479. 

  479. 			$fmetric['StemH'] = round((30 * $usWeightClass) / 400);
    480. 

  480. 			$offset += 2;
    481. 

  481. 			$offset += 2; // usWidthClass
    482. 

  482. 			$fsType = TCPDF_STATIC::_getSHORT($font, $offset);
    483. 

  483. 			$offset += 2;
    484. 

  484. 			if ($fsType == 2) {
    485. 

  485. 				// This Font cannot be modified, embedded or exchanged in any manner without first obtaining permission of the legal owner.
    486. 

  486. 				return false;
    487. 

  487. 			}
    488. 

  488. 			// ---------- get font name ----------
    489. 

  489. 			$fmetric['name'] = '';
    490. 

  490. 			$offset = $table['name']['offset'];
    491. 

  491. 			$offset += 2; // skip Format selector (=0).
    492. 

  492. 			// Number of NameRecords that follow n.
    493. 

  493. 			$numNameRecords = TCPDF_STATIC::_getUSHORT($font, $offset);
    494. 

  494. 			$offset += 2;
    495. 

  495. 			// Offset to start of string storage (from start of table).
    496. 

  496. 			$stringStorageOffset = TCPDF_STATIC::_getUSHORT($font, $offset);
    497. 

  497. 			$offset += 2;
    498. 

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

  499. 				$offset += 6; // skip Platform ID, Platform-specific encoding ID, Language ID.
    500. 

  500. 				// Name ID.
    501. 

  501. 				$nameID = TCPDF_STATIC::_getUSHORT($font, $offset);
    502. 

  502. 				$offset += 2;
    503. 

  503. 				if ($nameID == 6) {
    504. 

  504. 					// String length (in bytes).
    505. 

  505. 					$stringLength = TCPDF_STATIC::_getUSHORT($font, $offset);
    506. 

  506. 					$offset += 2;
    507. 

  507. 					// String offset from start of storage area (in bytes).
    508. 

  508. 					$stringOffset = TCPDF_STATIC::_getUSHORT($font, $offset);
    509. 

  509. 					$offset += 2;
    510. 

  510. 					$offset = ($table['name']['offset'] + $stringStorageOffset + $stringOffset);
    511. 

  511. 					$fmetric['name'] = substr($font, $offset, $stringLength);
    512. 

  512. 					$fmetric['name'] = preg_replace('/[^a-zA-Z0-9_\-]/', '', $fmetric['name']);
    513. 

  513. 					break;
    514. 

  514. 				} else {
    515. 

  515. 					$offset += 4; // skip String length, String offset
    516. 

  516. 				}
    517. 

  517. 			}
    518. 

  518. 			if (empty($fmetric['name'])) {
    519. 

  519. 				$fmetric['name'] = $font_name;
    520. 

  520. 			}
    521. 

  521. 			// ---------- get post data ----------
    522. 

  522. 			$offset = $table['post']['offset'];
    523. 

  523. 			$offset += 4; // skip Format Type
    524. 

  524. 			$fmetric['italicAngle'] = TCPDF_STATIC::_getFIXED($font, $offset);
    525. 

  525. 			$offset += 4;
    526. 

  526. 			$fmetric['underlinePosition'] = round(TCPDF_STATIC::_getFWORD($font, $offset) * $urk);
    527. 

  527. 			$offset += 2;
    528. 

  528. 			$fmetric['underlineThickness'] = round(TCPDF_STATIC::_getFWORD($font, $offset) * $urk);
    529. 

  529. 			$offset += 2;
    530. 

  530. 			$isFixedPitch = (TCPDF_STATIC::_getULONG($font, $offset) == 0) ? false : true;
    531. 

  531. 			$offset += 2;
    532. 

  532. 			if ($isFixedPitch) {
    533. 

  533. 				$fmetric['Flags'] |= 1;
    534. 

  534. 			}
    535. 

  535. 			// ---------- get hhea data ----------
    536. 

  536. 			$offset = $table['hhea']['offset'];
    537. 

  537. 			$offset += 4; // skip Table version number
    538. 

  538. 			// Ascender
    539. 

  539. 			$fmetric['Ascent'] = round(TCPDF_STATIC::_getFWORD($font, $offset) * $urk);
    540. 

  540. 			$offset += 2;
    541. 

  541. 			// Descender
    542. 

  542. 			$fmetric['Descent'] = round(TCPDF_STATIC::_getFWORD($font, $offset) * $urk);
    543. 

  543. 			$offset += 2;
    544. 

  544. 			// LineGap
    545. 

  545. 			$fmetric['Leading'] = round(TCPDF_STATIC::_getFWORD($font, $offset) * $urk);
    546. 

  546. 			$offset += 2;
    547. 

  547. 			// advanceWidthMax
    548. 

  548. 			$fmetric['MaxWidth'] = round(TCPDF_STATIC::_getUFWORD($font, $offset) * $urk);
    549. 

  549. 			$offset += 2;
    550. 

  550. 			$offset += 22; // skip some values
    551. 

  551. 			// get the number of hMetric entries in hmtx table
    552. 

  552. 			$numberOfHMetrics = TCPDF_STATIC::_getUSHORT($font, $offset);
    553. 

  553. 			// ---------- get maxp data ----------
    554. 

  554. 			$offset = $table['maxp']['offset'];
    555. 

  555. 			$offset += 4; // skip Table version number
    556. 

  556. 			// get the the number of glyphs in the font.
    557. 

  557. 			$numGlyphs = TCPDF_STATIC::_getUSHORT($font, $offset);
    558. 

  558. 			// ---------- get CIDToGIDMap ----------
    559. 

  559. 			$ctg = array();
    560. 

  560. 			$c = 0;
    561. 

  561. 			foreach ($encodingTables as $enctable) {
    562. 

  562. 				// get only specified Platform ID and Encoding ID
    563. 

  563. 				if (($enctable['platformID'] == $platid) AND ($enctable['encodingID'] == $encid)) {
    564. 

  564. 					$offset = $table['cmap']['offset'] + $enctable['offset'];
    565. 

  565. 					$format = TCPDF_STATIC::_getUSHORT($font, $offset);
    566. 

  566. 					$offset += 2;
    567. 

  567. 					switch ($format) {
    568. 

  568. 						case 0: { // Format 0: Byte encoding table
    569. 

  569. 							$offset += 4; // skip length and version/language
    570. 

  570. 							for ($c = 0; $c < 256; ++$c) {
    571. 

  571. 								$g = TCPDF_STATIC::_getBYTE($font, $offset);
    572. 

  572. 								$ctg[$c] = $g;
    573. 

  573. 								++$offset;
    574. 

  574. 							}
    575. 

  575. 							break;
    576. 

  576. 						}
    577. 

  577. 						case 2: { // Format 2: High-byte mapping through table
    578. 

  578. 							$offset += 4; // skip length and version/language
    579. 

  579. 							$numSubHeaders = 0;
    580. 

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

  581. 								// Array that maps high bytes to subHeaders: value is subHeader index * 8.
    582. 

  582. 								$subHeaderKeys[$i] = (TCPDF_STATIC::_getUSHORT($font, $offset) / 8);
    583. 

  583. 								$offset += 2;
    584. 

  584. 								if ($numSubHeaders < $subHeaderKeys[$i]) {
    585. 

  585. 									$numSubHeaders = $subHeaderKeys[$i];
    586. 

  586. 								}
    587. 

  587. 							}
    588. 

  588. 							// the number of subHeaders is equal to the max of subHeaderKeys + 1
    589. 

  589. 							++$numSubHeaders;
    590. 

  590. 							// read subHeader structures
    591. 

  591. 							$subHeaders = array();
    592. 

  592. 							$numGlyphIndexArray = 0;
    593. 

  593. 							for ($k = 0; $k < $numSubHeaders; ++$k) {
    594. 

  594. 								$subHeaders[$k]['firstCode'] = TCPDF_STATIC::_getUSHORT($font, $offset);
    595. 

  595. 								$offset += 2;
    596. 

  596. 								$subHeaders[$k]['entryCount'] = TCPDF_STATIC::_getUSHORT($font, $offset);
    597. 

  597. 								$offset += 2;
    598. 

  598. 								$subHeaders[$k]['idDelta'] = TCPDF_STATIC::_getUSHORT($font, $offset);
    599. 

  599. 								$offset += 2;
    600. 

  600. 								$subHeaders[$k]['idRangeOffset'] = TCPDF_STATIC::_getUSHORT($font, $offset);
    601. 

  601. 								$offset += 2;
    602. 

  602. 								$subHeaders[$k]['idRangeOffset'] -= (2 + (($numSubHeaders - $k - 1) * 8));
    603. 

  603. 								$subHeaders[$k]['idRangeOffset'] /= 2;
    604. 

  604. 								$numGlyphIndexArray += $subHeaders[$k]['entryCount'];
    605. 

  605. 							}
    606. 

  606. 							for ($k = 0; $k < $numGlyphIndexArray; ++$k) {
    607. 

  607. 								$glyphIndexArray[$k] = TCPDF_STATIC::_getUSHORT($font, $offset);
    608. 

  608. 								$offset += 2;
    609. 

  609. 							}
    610. 

  610. 							for ($i = 0; $i < 256; ++$i) {
    611. 

  611. 								$k = $subHeaderKeys[$i];
    612. 

  612. 								if ($k == 0) {
    613. 

  613. 									// one byte code
    614. 

  614. 									$c = $i;
    615. 

  615. 									$g = $glyphIndexArray[0];
    616. 

  616. 									$ctg[$c] = $g;
    617. 

  617. 								} else {
    618. 

  618. 									// two bytes code
    619. 

  619. 									$start_byte = $subHeaders[$k]['firstCode'];
    620. 

  620. 									$end_byte = $start_byte + $subHeaders[$k]['entryCount'];
    621. 

  621. 									for ($j = $start_byte; $j < $end_byte; ++$j) {
    622. 

  622. 										// combine high and low bytes
    623. 

  623. 										$c = (($i << 8) + $j);
    624. 

  624. 										$idRangeOffset = ($subHeaders[$k]['idRangeOffset'] + $j - $subHeaders[$k]['firstCode']);
    625. 

  625. 										$g = ($glyphIndexArray[$idRangeOffset] + $subHeaders[$k]['idDelta']) % 65536;
    626. 

  626. 										if ($g < 0) {
    627. 

  627. 											$g = 0;
    628. 

  628. 										}
    629. 

  629. 										$ctg[$c] = $g;
    630. 

  630. 									}
    631. 

  631. 								}
    632. 

  632. 							}
    633. 

  633. 							break;
    634. 

  634. 						}
    635. 

  635. 						case 4: { // Format 4: Segment mapping to delta values
    636. 

  636. 							$length = TCPDF_STATIC::_getUSHORT($font, $offset);
    637. 

  637. 							$offset += 2;
    638. 

  638. 							$offset += 2; // skip version/language
    639. 

  639. 							$segCount = floor(TCPDF_STATIC::_getUSHORT($font, $offset) / 2);
    640. 

  640. 							$offset += 2;
    641. 

  641. 							$offset += 6; // skip searchRange, entrySelector, rangeShift
    642. 

  642. 							$endCount = array(); // array of end character codes for each segment
    643. 

  643. 							for ($k = 0; $k < $segCount; ++$k) {
    644. 

  644. 								$endCount[$k] = TCPDF_STATIC::_getUSHORT($font, $offset);
    645. 

  645. 								$offset += 2;
    646. 

  646. 							}
    647. 

  647. 							$offset += 2; // skip reservedPad
    648. 

  648. 							$startCount = array(); // array of start character codes for each segment
    649. 

  649. 							for ($k = 0; $k < $segCount; ++$k) {
    650. 

  650. 								$startCount[$k] = TCPDF_STATIC::_getUSHORT($font, $offset);
    651. 

  651. 								$offset += 2;
    652. 

  652. 							}
    653. 

  653. 							$idDelta = array(); // delta for all character codes in segment
    654. 

  654. 							for ($k = 0; $k < $segCount; ++$k) {
    655. 

  655. 								$idDelta[$k] = TCPDF_STATIC::_getUSHORT($font, $offset);
    656. 

  656. 								$offset += 2;
    657. 

  657. 							}
    658. 

  658. 							$idRangeOffset = array(); // Offsets into glyphIdArray or 0
    659. 

  659. 							for ($k = 0; $k < $segCount; ++$k) {
    660. 

  660. 								$idRangeOffset[$k] = TCPDF_STATIC::_getUSHORT($font, $offset);
    661. 

  661. 								$offset += 2;
    662. 

  662. 							}
    663. 

  663. 							$gidlen = (floor($length / 2) - 8 - (4 * $segCount));
    664. 

  664. 							$glyphIdArray = array(); // glyph index array
    665. 

  665. 							for ($k = 0; $k < $gidlen; ++$k) {
    666. 

  666. 								$glyphIdArray[$k] = TCPDF_STATIC::_getUSHORT($font, $offset);
    667. 

  667. 								$offset += 2;
    668. 

  668. 							}
    669. 

  669. 							for ($k = 0; $k < $segCount - 1; ++$k) {
    670. 

  670. 								for ($c = $startCount[$k]; $c <= $endCount[$k]; ++$c) {
    671. 

  671. 									if ($idRangeOffset[$k] == 0) {
    672. 

  672. 										$g = ($idDelta[$k] + $c) % 65536;
    673. 

  673. 									} else {
    674. 

  674. 										$gid = (floor($idRangeOffset[$k] / 2) + ($c - $startCount[$k]) - ($segCount - $k));
    675. 

  675. 										$g = ($glyphIdArray[$gid] + $idDelta[$k]) % 65536;
    676. 

  676. 									}
    677. 

  677. 									if ($g < 0) {
    678. 

  678. 										$g = 0;
    679. 

  679. 									}
    680. 

  680. 									$ctg[$c] = $g;
    681. 

  681. 								}
    682. 

  682. 							}
    683. 

  683. 							break;
    684. 

  684. 						}
    685. 

  685. 						case 6: { // Format 6: Trimmed table mapping
    686. 

  686. 							$offset += 4; // skip length and version/language
    687. 

  687. 							$firstCode = TCPDF_STATIC::_getUSHORT($font, $offset);
    688. 

  688. 							$offset += 2;
    689. 

  689. 							$entryCount = TCPDF_STATIC::_getUSHORT($font, $offset);
    690. 

  690. 							$offset += 2;
    691. 

  691. 							for ($k = 0; $k < $entryCount; ++$k) {
    692. 

  692. 								$c = ($k + $firstCode);
    693. 

  693. 								$g = TCPDF_STATIC::_getUSHORT($font, $offset);
    694. 

  694. 								$offset += 2;
    695. 

  695. 								$ctg[$c] = $g;
    696. 

  696. 							}
    697. 

  697. 							break;
    698. 

  698. 						}
    699. 

  699. 						case 8: { // Format 8: Mixed 16-bit and 32-bit coverage
    700. 

  700. 							$offset += 10; // skip reserved, length and version/language
    701. 

  701. 							for ($k = 0; $k < 8192; ++$k) {
    702. 

  702. 								$is32[$k] = TCPDF_STATIC::_getBYTE($font, $offset);
    703. 

  703. 								++$offset;
    704. 

  704. 							}
    705. 

  705. 							$nGroups = TCPDF_STATIC::_getULONG($font, $offset);
    706. 

  706. 							$offset += 4;
    707. 

  707. 							for ($i = 0; $i < $nGroups; ++$i) {
    708. 

  708. 								$startCharCode = TCPDF_STATIC::_getULONG($font, $offset);
    709. 

  709. 								$offset += 4;
    710. 

  710. 								$endCharCode = TCPDF_STATIC::_getULONG($font, $offset);
    711. 

  711. 								$offset += 4;
    712. 

  712. 								$startGlyphID = TCPDF_STATIC::_getULONG($font, $offset);
    713. 

  713. 								$offset += 4;
    714. 

  714. 								for ($k = $startCharCode; $k <= $endCharCode; ++$k) {
    715. 

  715. 									$is32idx = floor($c / 8);
    716. 

  716. 									if ((isset($is32[$is32idx])) AND (($is32[$is32idx] & (1 << (7 - ($c % 8)))) == 0)) {
    717. 

  717. 										$c = $k;
    718. 

  718. 									} else {
    719. 

  719. 										// 32 bit format
    720. 

  720. 										// convert to decimal (http://www.unicode.org/faq//utf_bom.html#utf16-4)
    721. 

  721. 										//LEAD_OFFSET = (0xD800 - (0x10000 >> 10)) = 55232
    722. 

  722. 										//SURROGATE_OFFSET = (0x10000 - (0xD800 << 10) - 0xDC00) = -56613888
    723. 

  723. 										$c = ((55232 + ($k >> 10)) << 10) + (0xDC00 + ($k & 0x3FF)) -56613888;
    724. 

  724. 									}
    725. 

  725. 									$ctg[$c] = 0;
    726. 

  726. 									++$startGlyphID;
    727. 

  727. 								}
    728. 

  728. 							}
    729. 

  729. 							break;
    730. 

  730. 						}
    731. 

  731. 						case 10: { // Format 10: Trimmed array
    732. 

  732. 							$offset += 10; // skip reserved, length and version/language
    733. 

  733. 							$startCharCode = TCPDF_STATIC::_getULONG($font, $offset);
    734. 

  734. 							$offset += 4;
    735. 

  735. 							$numChars = TCPDF_STATIC::_getULONG($font, $offset);
    736. 

  736. 							$offset += 4;
    737. 

  737. 							for ($k = 0; $k < $numChars; ++$k) {
    738. 

  738. 								$c = ($k + $startCharCode);
    739. 

  739. 								$g = TCPDF_STATIC::_getUSHORT($font, $offset);
    740. 

  740. 								$ctg[$c] = $g;
    741. 

  741. 								$offset += 2;
    742. 

  742. 							}
    743. 

  743. 							break;
    744. 

  744. 						}
    745. 

  745. 						case 12: { // Format 12: Segmented coverage
    746. 

  746. 							$offset += 10; // skip length and version/language
    747. 

  747. 							$nGroups = TCPDF_STATIC::_getULONG($font, $offset);
    748. 

  748. 							$offset += 4;
    749. 

  749. 							for ($k = 0; $k < $nGroups; ++$k) {
    750. 

  750. 								$startCharCode = TCPDF_STATIC::_getULONG($font, $offset);
    751. 

  751. 								$offset += 4;
    752. 

  752. 								$endCharCode = TCPDF_STATIC::_getULONG($font, $offset);
    753. 

  753. 								$offset += 4;
    754. 

  754. 								$startGlyphCode = TCPDF_STATIC::_getULONG($font, $offset);
    755. 

  755. 								$offset += 4;
    756. 

  756. 								for ($c = $startCharCode; $c <= $endCharCode; ++$c) {
    757. 

  757. 									$ctg[$c] = $startGlyphCode;
    758. 

  758. 									++$startGlyphCode;
    759. 

  759. 								}
    760. 

  760. 							}
    761. 

  761. 							break;
    762. 

  762. 						}
    763. 

  763. 						case 13: { // Format 13: Many-to-one range mappings
    764. 

  764. 							// to be implemented ...
    765. 

  765. 							break;
    766. 

  766. 						}
    767. 

  767. 						case 14: { // Format 14: Unicode Variation Sequences
    768. 

  768. 							// to be implemented ...
    769. 

  769. 							break;
    770. 

  770. 						}
    771. 

  771. 					}
    772. 

  772. 				}
    773. 

  773. 			}
    774. 

  774. 			if (!isset($ctg[0])) {
    775. 

  775. 				$ctg[0] = 0;
    776. 

  776. 			}
    777. 

  777. 			// get xHeight (height of x)
    778. 

  778. 			$offset = ($table['glyf']['offset'] + $indexToLoc[$ctg[120]] + 4);
    779. 

  779. 			$yMin = TCPDF_STATIC::_getFWORD($font, $offset);
    780. 

  780. 			$offset += 4;
    781. 

  781. 			$yMax = TCPDF_STATIC::_getFWORD($font, $offset);
    782. 

  782. 			$offset += 2;
    783. 

  783. 			$fmetric['XHeight'] = round(($yMax - $yMin) * $urk);
    784. 

  784. 			// get CapHeight (height of H)
    785. 

  785. 			$offset = ($table['glyf']['offset'] + $indexToLoc[$ctg[72]] + 4);
    786. 

  786. 			$yMin = TCPDF_STATIC::_getFWORD($font, $offset);
    787. 

  787. 			$offset += 4;
    788. 

  788. 			$yMax = TCPDF_STATIC::_getFWORD($font, $offset);
    789. 

  789. 			$offset += 2;
    790. 

  790. 			$fmetric['CapHeight'] = round(($yMax - $yMin) * $urk);
    791. 

  791. 			// ceate widths array
    792. 

  792. 			$cw = array();
    793. 

  793. 			$offset = $table['hmtx']['offset'];
    794. 

  794. 			for ($i = 0 ; $i < $numberOfHMetrics; ++$i) {
    795. 

  795. 				$cw[$i] = round(TCPDF_STATIC::_getUFWORD($font, $offset) * $urk);
    796. 

  796. 				$offset += 4; // skip lsb
    797. 

  797. 			}
    798. 

  798. 			if ($numberOfHMetrics < $numGlyphs) {
    799. 

  799. 				// fill missing widths with the last value
    800. 

  800. 				$cw = array_pad($cw, $numGlyphs, $cw[($numberOfHMetrics - 1)]);
    801. 

  801. 			}
    802. 

  802. 			$fmetric['MissingWidth'] = $cw[0];
    803. 

  803. 			$fmetric['cw'] = '';
    804. 

  804. 			$fmetric['cbbox'] = '';
    805. 

  805. 			for ($cid = 0; $cid <= 65535; ++$cid) {
    806. 

  806. 				if (isset($ctg[$cid])) {
    807. 

  807. 					if (isset($cw[$ctg[$cid]])) {
    808. 

  808. 						$fmetric['cw'] .= ','.$cid.'=>'.$cw[$ctg[$cid]];
    809. 

  809. 					}
    810. 

  810. 					if ($addcbbox AND isset($indexToLoc[$ctg[$cid]])) {
    811. 

  811. 						$offset = ($table['glyf']['offset'] + $indexToLoc[$ctg[$cid]]);
    812. 

  812. 						$xMin = round(TCPDF_STATIC::_getFWORD($font, $offset + 2) * $urk);
    813. 

  813. 						$yMin = round(TCPDF_STATIC::_getFWORD($font, $offset + 4) * $urk);
    814. 

  814. 						$xMax = round(TCPDF_STATIC::_getFWORD($font, $offset + 6) * $urk);
    815. 

  815. 						$yMax = round(TCPDF_STATIC::_getFWORD($font, $offset + 8) * $urk);
    816. 

  816. 						$fmetric['cbbox'] .= ','.$cid.'=>array('.$xMin.','.$yMin.','.$xMax.','.$yMax.')';
    817. 

  817. 					}
    818. 

  818. 				}
    819. 

  819. 			}
    820. 

  820. 		} // end of true type
    821. 

  821. 		if (($fmetric['type'] == 'TrueTypeUnicode') AND (count($ctg) == 256)) {
    822. 

  822. 			$fmetric['type'] = 'TrueType';
    823. 

  823. 		}
    824. 

  824. 		// ---------- create php font file ----------
    825. 

  825. 		$pfile = '<'.'?'.'php'."\n";
    826. 

  826. 		$pfile .= '// TCPDF FONT FILE DESCRIPTION'."\n";
    827. 

  827. 		$pfile .= '$type=\''.$fmetric['type'].'\';'."\n";
    828. 

  828. 		$pfile .= '$name=\''.$fmetric['name'].'\';'."\n";
    829. 

  829. 		$pfile .= '$up='.$fmetric['underlinePosition'].';'."\n";
    830. 

  830. 		$pfile .= '$ut='.$fmetric['underlineThickness'].';'."\n";
    831. 

  831. 		if ($fmetric['MissingWidth'] > 0) {
    832. 

  832. 			$pfile .= '$dw='.$fmetric['MissingWidth'].';'."\n";
    833. 

  833. 		} else {
    834. 

  834. 			$pfile .= '$dw='.$fmetric['AvgWidth'].';'."\n";
    835. 

  835. 		}
    836. 

  836. 		$pfile .= '$diff=\''.$fmetric['diff'].'\';'."\n";
    837. 

  837. 		if ($fmetric['type'] == 'Type1') {
    838. 

  838. 			// Type 1
    839. 

  839. 			$pfile .= '$enc=\''.$fmetric['enc'].'\';'."\n";
    840. 

  840. 			$pfile .= '$file=\''.$fmetric['file'].'\';'."\n";
    841. 

  841. 			$pfile .= '$size1='.$fmetric['size1'].';'."\n";
    842. 

  842. 			$pfile .= '$size2='.$fmetric['size2'].';'."\n";
    843. 

  843. 		} else {
    844. 

  844. 			$pfile .= '$originalsize='.$fmetric['originalsize'].';'."\n";
    845. 

  845. 			if ($fmetric['type'] == 'cidfont0') {
    846. 

  846. 				// CID-0
    847. 

  847. 				switch ($fonttype) {
    848. 

  848. 					case 'CID0JP': {
    849. 

  849. 						$pfile .= '// Japanese'."\n";
    850. 

  850. 						$pfile .= '$enc=\'UniJIS-UTF16-H\';'."\n";
    851. 

  851. 						$pfile .= '$cidinfo=array(\'Registry\'=>\'Adobe\', \'Ordering\'=>\'Japan1\',\'Supplement\'=>5);'."\n";
    852. 

  852. 						$pfile .= 'include(dirname(__FILE__).\'/uni2cid_aj16.php\');'."\n";
    853. 

  853. 						break;
    854. 

  854. 					}
    855. 

  855. 					case 'CID0KR': {
    856. 

  856. 						$pfile .= '// Korean'."\n";
    857. 

  857. 						$pfile .= '$enc=\'UniKS-UTF16-H\';'."\n";
    858. 

  858. 						$pfile .= '$cidinfo=array(\'Registry\'=>\'Adobe\', \'Ordering\'=>\'Korea1\',\'Supplement\'=>0);'."\n";
    859. 

  859. 						$pfile .= 'include(dirname(__FILE__).\'/uni2cid_ak12.php\');'."\n";
    860. 

  860. 						break;
    861. 

  861. 					}
    862. 

  862. 					case 'CID0CS': {
    863. 

  863. 						$pfile .= '// Chinese Simplified'."\n";
    864. 

  864. 						$pfile .= '$enc=\'UniGB-UTF16-H\';'."\n";
    865. 

  865. 						$pfile .= '$cidinfo=array(\'Registry\'=>\'Adobe\', \'Ordering\'=>\'GB1\',\'Supplement\'=>2);'."\n";
    866. 

  866. 						$pfile .= 'include(dirname(__FILE__).\'/uni2cid_ag15.php\');'."\n";
    867. 

  867. 						break;
    868. 

  868. 					}
    869. 

  869. 					case 'CID0CT':
    870. 

  870. 					default: {
    871. 

  871. 						$pfile .= '// Chinese Traditional'."\n";
    872. 

  872. 						$pfile .= '$enc=\'UniCNS-UTF16-H\';'."\n";
    873. 

  873. 						$pfile .= '$cidinfo=array(\'Registry\'=>\'Adobe\', \'Ordering\'=>\'CNS1\',\'Supplement\'=>0);'."\n";
    874. 

  874. 						$pfile .= 'include(dirname(__FILE__).\'/uni2cid_aj16.php\');'."\n";
    875. 

  875. 						break;
    876. 

  876. 					}
    877. 

  877. 				}
    878. 

  878. 			} else {
    879. 

  879. 				// TrueType
    880. 

  880. 				$pfile .= '$enc=\''.$fmetric['enc'].'\';'."\n";
    881. 

  881. 				$pfile .= '$file=\''.$fmetric['file'].'\';'."\n";
    882. 

  882. 				$pfile .= '$ctg=\''.$fmetric['ctg'].'\';'."\n";
    883. 

  883. 				// create CIDToGIDMap
    884. 

  884. 				$cidtogidmap = str_pad('', 131072, "\x00"); // (256 * 256 * 2) = 131072
    885. 

  885. 				foreach ($ctg as $cid => $gid) {
    886. 

  886. 					$cidtogidmap = self::updateCIDtoGIDmap($cidtogidmap, $cid, $ctg[$cid]);
    887. 

  887. 				}
    888. 

  888. 				// store compressed CIDToGIDMap
    889. 

  889. 				$fp = TCPDF_STATIC::fopenLocal($outpath.$fmetric['ctg'], 'wb');
    890. 

  890. 				fwrite($fp, gzcompress($cidtogidmap));
    891. 

  891. 				fclose($fp);
    892. 

  892. 			}
    893. 

  893. 		}
    894. 

  894. 		$pfile .= '$desc=array(';
    895. 

  895. 		$pfile .= '\'Flags\'=>'.$fmetric['Flags'].',';
    896. 

  896. 		$pfile .= '\'FontBBox\'=>\'['.$fmetric['bbox'].']\',';
    897. 

  897. 		$pfile .= '\'ItalicAngle\'=>'.$fmetric['italicAngle'].',';
    898. 

  898. 		$pfile .= '\'Ascent\'=>'.$fmetric['Ascent'].',';
    899. 

  899. 		$pfile .= '\'Descent\'=>'.$fmetric['Descent'].',';
    900. 

  900. 		$pfile .= '\'Leading\'=>'.$fmetric['Leading'].',';
    901. 

  901. 		$pfile .= '\'CapHeight\'=>'.$fmetric['CapHeight'].',';
    902. 

  902. 		$pfile .= '\'XHeight\'=>'.$fmetric['XHeight'].',';
    903. 

  903. 		$pfile .= '\'StemV\'=>'.$fmetric['StemV'].',';
    904. 

  904. 		$pfile .= '\'StemH\'=>'.$fmetric['StemH'].',';
    905. 

  905. 		$pfile .= '\'AvgWidth\'=>'.$fmetric['AvgWidth'].',';
    906. 

  906. 		$pfile .= '\'MaxWidth\'=>'.$fmetric['MaxWidth'].',';
    907. 

  907. 		$pfile .= '\'MissingWidth\'=>'.$fmetric['MissingWidth'].'';
    908. 

  908. 		$pfile .= ');'."\n";
    909. 

  909. 		if (!empty($fmetric['cbbox'])) {
    910. 

  910. 			$pfile .= '$cbbox=array('.substr($fmetric['cbbox'], 1).');'."\n";
    911. 

  911. 		}
    912. 

  912. 		$pfile .= '$cw=array('.substr($fmetric['cw'], 1).');'."\n";
    913. 

  913. 		$pfile .= '// --- EOF ---'."\n";
    914. 

  914. 		// store file
    915. 

  915. 		$fp = TCPDF_STATIC::fopenLocal($outpath.$font_name.'.php', 'w');
    916. 

  916. 		fwrite($fp, $pfile);
    917. 

  917. 		fclose($fp);
    918. 

  918. 		// return TCPDF font name
    919. 

  919. 		return $font_name;
    920. 

  920. 	}
    921. 

  921. 

  922. 	/**
    923. 

  923. 	 * Returs the checksum of a TTF table.
    924. 

  924. 	 * @param $table (string) table to check
    925. 

  925. 	 * @param $length (int) length of table in bytes
    926. 

  926. 	 * @return int checksum
    927. 

  927. 	 * @author Nicola Asuni
    928. 

  928. 	 * @since 5.2.000 (2010-06-02)
    929. 

  929. 	 * @public static
    930. 

  930. 	 */
    931. 

  931. 	public static function _getTTFtableChecksum($table, $length) {
    932. 

  932. 		$sum = 0;
    933. 

  933. 		$tlen = ($length / 4);
    934. 

  934. 		$offset = 0;
    935. 

  935. 		for ($i = 0; $i < $tlen; ++$i) {
    936. 

  936. 			$v = unpack('Ni', substr($table, $offset, 4));
    937. 

  937. 			$sum += $v['i'];
    938. 

  938. 			$offset += 4;
    939. 

  939. 		}
    940. 

  940. 		$sum = unpack('Ni', pack('N', $sum));
    941. 

  941. 		return $sum['i'];
    942. 

  942. 	}
    943. 

  943. 

  944. 	/**
    945. 

  945. 	 * Returns a subset of the TrueType font data without the unused glyphs.
    946. 

  946. 	 * @param $font (string) TrueType font data.
    947. 

  947. 	 * @param $subsetchars (array) Array of used characters (the glyphs to keep).
    948. 

  948. 	 * @return (string) A subset of TrueType font data without the unused glyphs.
    949. 

  949. 	 * @author Nicola Asuni
    950. 

  950. 	 * @since 5.2.000 (2010-06-02)
    951. 

  951. 	 * @public static
    952. 

  952. 	 */
    953. 

  953. 	public static function _getTrueTypeFontSubset($font, $subsetchars) {
    954. 

  954. 		ksort($subsetchars);
    955. 

  955. 		$offset = 0; // offset position of the font data
    956. 

  956. 		if (TCPDF_STATIC::_getULONG($font, $offset) != 0x10000) {
    957. 

  957. 			// sfnt version must be 0x00010000 for TrueType version 1.0.
    958. 

  958. 			return $font;
    959. 

  959. 		}
    960. 

  960. 		$c = 0;
    961. 

  961. 		$offset += 4;
    962. 

  962. 		// get number of tables
    963. 

  963. 		$numTables = TCPDF_STATIC::_getUSHORT($font, $offset);
    964. 

  964. 		$offset += 2;
    965. 

  965. 		// skip searchRange, entrySelector and rangeShift
    966. 

  966. 		$offset += 6;
    967. 

  967. 		// tables array
    968. 

  968. 		$table = array();
    969. 

  969. 		// for each table
    970. 

  970. 		for ($i = 0; $i < $numTables; ++$i) {
    971. 

  971. 			// get table info
    972. 

  972. 			$tag = substr($font, $offset, 4);
    973. 

  973. 			$offset += 4;
    974. 

  974. 			$table[$tag] = array();
    975. 

  975. 			$table[$tag]['checkSum'] = TCPDF_STATIC::_getULONG($font, $offset);
    976. 

  976. 			$offset += 4;
    977. 

  977. 			$table[$tag]['offset'] = TCPDF_STATIC::_getULONG($font, $offset);
    978. 

  978. 			$offset += 4;
    979. 

  979. 			$table[$tag]['length'] = TCPDF_STATIC::_getULONG($font, $offset);
    980. 

  980. 			$offset += 4;
    981. 

  981. 		}
    982. 

  982. 		// check magicNumber
    983. 

  983. 		$offset = $table['head']['offset'] + 12;
    984. 

  984. 		if (TCPDF_STATIC::_getULONG($font, $offset) != 0x5F0F3CF5) {
    985. 

  985. 			// magicNumber must be 0x5F0F3CF5
    986. 

  986. 			return $font;
    987. 

  987. 		}
    988. 

  988. 		$offset += 4;
    989. 

  989. 		// get offset mode (indexToLocFormat : 0 = short, 1 = long)
    990. 

  990. 		$offset = $table['head']['offset'] + 50;
    991. 

  991. 		$short_offset = (TCPDF_STATIC::_getSHORT($font, $offset) == 0);
    992. 

  992. 		$offset += 2;
    993. 

  993. 		// get the offsets to the locations of the glyphs in the font, relative to the beginning of the glyphData table
    994. 

  994. 		$indexToLoc = array();
    995. 

  995. 		$offset = $table['loca']['offset'];
    996. 

  996. 		if ($short_offset) {
    997. 

  997. 			// short version
    998. 

  998. 			$tot_num_glyphs = floor($table['loca']['length'] / 2); // numGlyphs + 1
    999. 

  999. 			for ($i = 0; $i < $tot_num_glyphs; ++$i) {
    1000. 

  1000. 				$indexToLoc[$i] = TCPDF_STATIC::_getUSHORT($font, $offset) * 2;
    1001. 

  1001. 				$offset += 2;
    1002. 

  1002. 			}
    1003. 

  1003. 		} else {
    1004. 

  1004. 			// long version
    1005. 

  1005. 			$tot_num_glyphs = ($table['loca']['length'] / 4); // numGlyphs + 1
    1006. 

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

  1007. 				$indexToLoc[$i] = TCPDF_STATIC::_getULONG($font, $offset);
    1008. 

  1008. 				$offset += 4;
    1009. 

  1009. 			}
    1010. 

  1010. 		}
    1011. 

  1011. 		// get glyphs indexes of chars from cmap table
    1012. 

  1012. 		$subsetglyphs = array(); // glyph IDs on key
    1013. 

  1013. 		$subsetglyphs[0] = true; // character codes that do not correspond to any glyph in the font should be mapped to glyph index 0
    1014. 

  1014. 		$offset = $table['cmap']['offset'] + 2;
    1015. 

  1015. 		$numEncodingTables = TCPDF_STATIC::_getUSHORT($font, $offset);
    1016. 

  1016. 		$offset += 2;
    1017. 

  1017. 		$encodingTables = array();
    1018. 

  1018. 		for ($i = 0; $i < $numEncodingTables; ++$i) {
    1019. 

  1019. 			$encodingTables[$i]['platformID'] = TCPDF_STATIC::_getUSHORT($font, $offset);
    1020. 

  1020. 			$offset += 2;
    1021. 

  1021. 			$encodingTables[$i]['encodingID'] = TCPDF_STATIC::_getUSHORT($font, $offset);
    1022. 

  1022. 			$offset += 2;
    1023. 

  1023. 			$encodingTables[$i]['offset'] = TCPDF_STATIC::_getULONG($font, $offset);
    1024. 

  1024. 			$offset += 4;
    1025. 

  1025. 		}
    1026. 

  1026. 		foreach ($encodingTables as $enctable) {
    1027. 

  1027. 			// get all platforms and encodings
    1028. 

  1028. 			$offset = $table['cmap']['offset'] + $enctable['offset'];
    1029. 

  1029. 			$format = TCPDF_STATIC::_getUSHORT($font, $offset);
    1030. 

  1030. 			$offset += 2;
    1031. 

  1031. 			switch ($format) {
    1032. 

  1032. 				case 0: { // Format 0: Byte encoding table
    1033. 

  1033. 					$offset += 4; // skip length and version/language
    1034. 

  1034. 					for ($c = 0; $c < 256; ++$c) {
    1035. 

  1035. 						if (isset($subsetchars[$c])) {
    1036. 

  1036. 							$g = TCPDF_STATIC::_getBYTE($font, $offset);
    1037. 

  1037. 							$subsetglyphs[$g] = true;
    1038. 

  1038. 						}
    1039. 

  1039. 						++$offset;
    1040. 

  1040. 					}
    1041. 

  1041. 					break;
    1042. 

  1042. 				}
    1043. 

  1043. 				case 2: { // Format 2: High-byte mapping through table
    1044. 

  1044. 					$offset += 4; // skip length and version/language
    1045. 

  1045. 					$numSubHeaders = 0;
    1046. 

  1046. 					for ($i = 0; $i < 256; ++$i) {
    1047. 

  1047. 						// Array that maps high bytes to subHeaders: value is subHeader index * 8.
    1048. 

  1048. 						$subHeaderKeys[$i] = (TCPDF_STATIC::_getUSHORT($font, $offset) / 8);
    1049. 

  1049. 						$offset += 2;
    1050. 

  1050. 						if ($numSubHeaders < $subHeaderKeys[$i]) {
    1051. 

  1051. 							$numSubHeaders = $subHeaderKeys[$i];
    1052. 

  1052. 						}
    1053. 

  1053. 					}
    1054. 

  1054. 					// the number of subHeaders is equal to the max of subHeaderKeys + 1
    1055. 

  1055. 					++$numSubHeaders;
    1056. 

  1056. 					// read subHeader structures
    1057. 

  1057. 					$subHeaders = array();
    1058. 

  1058. 					$numGlyphIndexArray = 0;
    1059. 

  1059. 					for ($k = 0; $k < $numSubHeaders; ++$k) {
    1060. 

  1060. 						$subHeaders[$k]['firstCode'] = TCPDF_STATIC::_getUSHORT($font, $offset);
    1061. 

  1061. 						$offset += 2;
    1062. 

  1062. 						$subHeaders[$k]['entryCount'] = TCPDF_STATIC::_getUSHORT($font, $offset);
    1063. 

  1063. 						$offset += 2;
    1064. 

  1064. 						$subHeaders[$k]['idDelta'] = TCPDF_STATIC::_getUSHORT($font, $offset);
    1065. 

  1065. 						$offset += 2;
    1066. 

  1066. 						$subHeaders[$k]['idRangeOffset'] = TCPDF_STATIC::_getUSHORT($font, $offset);
    1067. 

  1067. 						$offset += 2;
    1068. 

  1068. 						$subHeaders[$k]['idRangeOffset'] -= (2 + (($numSubHeaders - $k - 1) * 8));
    1069. 

  1069. 						$subHeaders[$k]['idRangeOffset'] /= 2;
    1070. 

  1070. 						$numGlyphIndexArray += $subHeaders[$k]['entryCount'];
    1071. 

  1071. 					}
    1072. 

  1072. 					for ($k = 0; $k < $numGlyphIndexArray; ++$k) {
    1073. 

  1073. 						$glyphIndexArray[$k] = TCPDF_STATIC::_getUSHORT($font, $offset);
    1074. 

  1074. 						$offset += 2;
    1075. 

  1075. 					}
    1076. 

  1076. 					for ($i = 0; $i < 256; ++$i) {
    1077. 

  1077. 						$k = $subHeaderKeys[$i];
    1078. 

  1078. 						if ($k == 0) {
    1079. 

  1079. 							// one byte code
    1080. 

  1080. 							$c = $i;
    1081. 

  1081. 							if (isset($subsetchars[$c])) {
    1082. 

  1082. 								$g = $glyphIndexArray[0];
    1083. 

  1083. 								$subsetglyphs[$g] = true;
    1084. 

  1084. 							}
    1085. 

  1085. 						} else {
    1086. 

  1086. 							// two bytes code
    1087. 

  1087. 							$start_byte = $subHeaders[$k]['firstCode'];
    1088. 

  1088. 							$end_byte = $start_byte + $subHeaders[$k]['entryCount'];
    1089. 

  1089. 							for ($j = $start_byte; $j < $end_byte; ++$j) {
    1090. 

  1090. 								// combine high and low bytes
    1091. 

  1091. 								$c = (($i << 8) + $j);
    1092. 

  1092. 								if (isset($subsetchars[$c])) {
    1093. 

  1093. 									$idRangeOffset = ($subHeaders[$k]['idRangeOffset'] + $j - $subHeaders[$k]['firstCode']);
    1094. 

  1094. 									$g = ($glyphIndexArray[$idRangeOffset] + $subHeaders[$k]['idDelta']) % 65536;
    1095. 

  1095. 									if ($g < 0) {
    1096. 

  1096. 										$g = 0;
    1097. 

  1097. 									}
    1098. 

  1098. 									$subsetglyphs[$g] = true;
    1099. 

  1099. 								}
    1100. 

  1100. 							}
    1101. 

  1101. 						}
    1102. 

  1102. 					}
    1103. 

  1103. 					break;
    1104. 

  1104. 				}
    1105. 

  1105. 				case 4: { // Format 4: Segment mapping to delta values
    1106. 

  1106. 					$length = TCPDF_STATIC::_getUSHORT($font, $offset);
    1107. 

  1107. 					$offset += 2;
    1108. 

  1108. 					$offset += 2; // skip version/language
    1109. 

  1109. 					$segCount = floor(TCPDF_STATIC::_getUSHORT($font, $offset) / 2);
    1110. 

  1110. 					$offset += 2;
    1111. 

  1111. 					$offset += 6; // skip searchRange, entrySelector, rangeShift
    1112. 

  1112. 					$endCount = array(); // array of end character codes for each segment
    1113. 

  1113. 					for ($k = 0; $k < $segCount; ++$k) {
    1114. 

  1114. 						$endCount[$k] = TCPDF_STATIC::_getUSHORT($font, $offset);
    1115. 

  1115. 						$offset += 2;
    1116. 

  1116. 					}
    1117. 

  1117. 					$offset += 2; // skip reservedPad
    1118. 

  1118. 					$startCount = array(); // array of start character codes for each segment
    1119. 

  1119. 					for ($k = 0; $k < $segCount; ++$k) {
    1120. 

  1120. 						$startCount[$k] = TCPDF_STATIC::_getUSHORT($font, $offset);
    1121. 

  1121. 						$offset += 2;
    1122. 

  1122. 					}
    1123. 

  1123. 					$idDelta = array(); // delta for all character codes in segment
    1124. 

  1124. 					for ($k = 0; $k < $segCount; ++$k) {
    1125. 

  1125. 						$idDelta[$k] = TCPDF_STATIC::_getUSHORT($font, $offset);
    1126. 

  1126. 						$offset += 2;
    1127. 

  1127. 					}
    1128. 

  1128. 					$idRangeOffset = array(); // Offsets into glyphIdArray or 0
    1129. 

  1129. 					for ($k = 0; $k < $segCount; ++$k) {
    1130. 

  1130. 						$idRangeOffset[$k] = TCPDF_STATIC::_getUSHORT($font, $offset);
    1131. 

  1131. 						$offset += 2;
    1132. 

  1132. 					}
    1133. 

  1133. 					$gidlen = (floor($length / 2) - 8 - (4 * $segCount));
    1134. 

  1134. 					$glyphIdArray = array(); // glyph index array
    1135. 

  1135. 					for ($k = 0; $k < $gidlen; ++$k) {
    1136. 

  1136. 						$glyphIdArray[$k] = TCPDF_STATIC::_getUSHORT($font, $offset);
    1137. 

  1137. 						$offset += 2;
    1138. 

  1138. 					}
    1139. 

  1139. 					for ($k = 0; $k < $segCount; ++$k) {
    1140. 

  1140. 						for ($c = $startCount[$k]; $c <= $endCount[$k]; ++$c) {
    1141. 

  1141. 							if (isset($subsetchars[$c])) {
    1142. 

  1142. 								if ($idRangeOffset[$k] == 0) {
    1143. 

  1143. 									$g = ($idDelta[$k] + $c) % 65536;
    1144. 

  1144. 								} else {
    1145. 

  1145. 									$gid = (floor($idRangeOffset[$k] / 2) + ($c - $startCount[$k]) - ($segCount - $k));
    1146. 

  1146. 									$g = ($glyphIdArray[$gid] + $idDelta[$k]) % 65536;
    1147. 

  1147. 								}
    1148. 

  1148. 								if ($g < 0) {
    1149. 

  1149. 									$g = 0;
    1150. 

  1150. 								}
    1151. 

  1151. 								$subsetglyphs[$g] = true;
    1152. 

  1152. 							}
    1153. 

  1153. 						}
    1154. 

  1154. 					}	
    1155. 

  1155. 					break;
    1156. 

  1156. 				}
    1157. 

  1157. 				case 6: { // Format 6: Trimmed table mapping
    1158. 

  1158. 					$offset += 4; // skip length and version/language
    1159. 

  1159. 					$firstCode = TCPDF_STATIC::_getUSHORT($font, $offset);
    1160. 

  1160. 					$offset += 2;
    1161. 

  1161. 					$entryCount = TCPDF_STATIC::_getUSHORT($font, $offset);
    1162. 

  1162. 					$offset += 2;
    1163. 

  1163. 					for ($k = 0; $k < $entryCount; ++$k) {
    1164. 

  1164. 						$c = ($k + $firstCode);
    1165. 

  1165. 						if (isset($subsetchars[$c])) {
    1166. 

  1166. 							$g = TCPDF_STATIC::_getUSHORT($font, $offset);
    1167. 

  1167. 							$subsetglyphs[$g] = true;
    1168. 

  1168. 						}
    1169. 

  1169. 						$offset += 2;
    1170. 

  1170. 					}
    1171. 

  1171. 					break;
    1172. 

  1172. 				}
    1173. 

  1173. 				case 8: { // Format 8: Mixed 16-bit and 32-bit coverage
    1174. 

  1174. 					$offset += 10; // skip reserved, length and version/language
    1175. 

  1175. 					for ($k = 0; $k < 8192; ++$k) {
    1176. 

  1176. 						$is32[$k] = TCPDF_STATIC::_getBYTE($font, $offset);
    1177. 

  1177. 						++$offset;
    1178. 

  1178. 					}
    1179. 

  1179. 					$nGroups = TCPDF_STATIC::_getULONG($font, $offset);
    1180. 

  1180. 					$offset += 4;
    1181. 

  1181. 					for ($i = 0; $i < $nGroups; ++$i) {
    1182. 

  1182. 						$startCharCode = TCPDF_STATIC::_getULONG($font, $offset);
    1183. 

  1183. 						$offset += 4;
    1184. 

  1184. 						$endCharCode = TCPDF_STATIC::_getULONG($font, $offset);
    1185. 

  1185. 						$offset += 4;
    1186. 

  1186. 						$startGlyphID = TCPDF_STATIC::_getULONG($font, $offset);
    1187. 

  1187. 						$offset += 4;
    1188. 

  1188. 						for ($k = $startCharCode; $k <= $endCharCode; ++$k) {
    1189. 

  1189. 							$is32idx = floor($c / 8);
    1190. 

  1190. 							if ((isset($is32[$is32idx])) AND (($is32[$is32idx] & (1 << (7 - ($c % 8)))) == 0)) {
    1191. 

  1191. 								$c = $k;
    1192. 

  1192. 							} else {
    1193. 

  1193. 								// 32 bit format
    1194. 

  1194. 								// convert to decimal (http://www.unicode.org/faq//utf_bom.html#utf16-4)
    1195. 

  1195. 								//LEAD_OFFSET = (0xD800 - (0x10000 >> 10)) = 55232
    1196. 

  1196. 								//SURROGATE_OFFSET = (0x10000 - (0xD800 << 10) - 0xDC00) = -56613888
    1197. 

  1197. 								$c = ((55232 + ($k >> 10)) << 10) + (0xDC00 + ($k & 0x3FF)) -56613888;
    1198. 

  1198. 							}
    1199. 

  1199. 							if (isset($subsetchars[$c])) {
    1200. 

  1200. 								$subsetglyphs[$startGlyphID] = true;
    1201. 

  1201. 							}
    1202. 

  1202. 							++$startGlyphID;
    1203. 

  1203. 						}
    1204. 

  1204. 					}
    1205. 

  1205. 					break;
    1206. 

  1206. 				}
    1207. 

  1207. 				case 10: { // Format 10: Trimmed array
    1208. 

  1208. 					$offset += 10; // skip reserved, length and version/language
    1209. 

  1209. 					$startCharCode = TCPDF_STATIC::_getULONG($font, $offset);
    1210. 

  1210. 					$offset += 4;
    1211. 

  1211. 					$numChars = TCPDF_STATIC::_getULONG($font, $offset);
    1212. 

  1212. 					$offset += 4;
    1213. 

  1213. 					for ($k = 0; $k < $numChars; ++$k) {
    1214. 

  1214. 						$c = ($k + $startCharCode);
    1215. 

  1215. 						if (isset($subsetchars[$c])) {
    1216. 

  1216. 							$g = TCPDF_STATIC::_getUSHORT($font, $offset);
    1217. 

  1217. 							$subsetglyphs[$g] = true;
    1218. 

  1218. 						}
    1219. 

  1219. 						$offset += 2;
    1220. 

  1220. 					}
    1221. 

  1221. 					break;
    1222. 

  1222. 				}
    1223. 

  1223. 				case 12: { // Format 12: Segmented coverage
    1224. 

  1224. 					$offset += 10; // skip length and version/language
    1225. 

  1225. 					$nGroups = TCPDF_STATIC::_getULONG($font, $offset);
    1226. 

  1226. 					$offset += 4;
    1227. 

  1227. 					for ($k = 0; $k < $nGroups; ++$k) {
    1228. 

  1228. 						$startCharCode = TCPDF_STATIC::_getULONG($font, $offset);
    1229. 

  1229. 						$offset += 4;
    1230. 

  1230. 						$endCharCode = TCPDF_STATIC::_getULONG($font, $offset);
    1231. 

  1231. 						$offset += 4;
    1232. 

  1232. 						$startGlyphCode = TCPDF_STATIC::_getULONG($font, $offset);
    1233. 

  1233. 						$offset += 4;
    1234. 

  1234. 						for ($c = $startCharCode; $c <= $endCharCode; ++$c) {
    1235. 

  1235. 							if (isset($subsetchars[$c])) {
    1236. 

  1236. 								$subsetglyphs[$startGlyphCode] = true;
    1237. 

  1237. 							}
    1238. 

  1238. 							++$startGlyphCode;
    1239. 

  1239. 						}
    1240. 

  1240. 					}
    1241. 

  1241. 					break;
    1242. 

  1242. 				}
    1243. 

  1243. 				case 13: { // Format 13: Many-to-one range mappings
    1244. 

  1244. 					// to be implemented ...
    1245. 

  1245. 					break;
    1246. 

  1246. 				}
    1247. 

  1247. 				case 14: { // Format 14: Unicode Variation Sequences
    1248. 

  1248. 					// to be implemented ...
    1249. 

  1249. 					break;
    1250. 

  1250. 				}
    1251. 

  1251. 			}
    1252. 

  1252. 		}
    1253. 

  1253. 		// include all parts of composite glyphs
    1254. 

  1254. 		$new_sga = $subsetglyphs;
    1255. 

  1255. 		while (!empty($new_sga)) {
    1256. 

  1256. 			$sga = $new_sga;
    1257. 

  1257. 			$new_sga = array();
    1258. 

  1258. 			foreach ($sga as $key => $val) {
    1259. 

  1259. 				if (isset($indexToLoc[$key])) {
    1260. 

  1260. 					$offset = ($table['glyf']['offset'] + $indexToLoc[$key]);
    1261. 

  1261. 					$numberOfContours = TCPDF_STATIC::_getSHORT($font, $offset);
    1262. 

  1262. 					$offset += 2;
    1263. 

  1263. 					if ($numberOfContours < 0) { // composite glyph
    1264. 

  1264. 						$offset += 8; // skip xMin, yMin, xMax, yMax
    1265. 

  1265. 						do {
    1266. 

  1266. 							$flags = TCPDF_STATIC::_getUSHORT($font, $offset);
    1267. 

  1267. 							$offset += 2;
    1268. 

  1268. 							$glyphIndex = TCPDF_STATIC::_getUSHORT($font, $offset);
    1269. 

  1269. 							$offset += 2;
    1270. 

  1270. 							if (!isset($subsetglyphs[$glyphIndex])) {
    1271. 

  1271. 								// add missing glyphs
    1272. 

  1272. 								$new_sga[$glyphIndex] = true;
    1273. 

  1273. 							}
    1274. 

  1274. 							// skip some bytes by case
    1275. 

  1275. 							if ($flags & 1) {
    1276. 

  1276. 								$offset += 4;
    1277. 

  1277. 							} else {
    1278. 

  1278. 								$offset += 2;
    1279. 

  1279. 							}
    1280. 

  1280. 							if ($flags & 8) {
    1281. 

  1281. 								$offset += 2;
    1282. 

  1282. 							} elseif ($flags & 64) {
    1283. 

  1283. 								$offset += 4;
    1284. 

  1284. 							} elseif ($flags & 128) {
    1285. 

  1285. 								$offset += 8;
    1286. 

  1286. 							}
    1287. 

  1287. 						} while ($flags & 32);
    1288. 

  1288. 					}
    1289. 

  1289. 				}
    1290. 

  1290. 			}
    1291. 

  1291. 			$subsetglyphs += $new_sga;
    1292. 

  1292. 		}
    1293. 

  1293. 		// sort glyphs by key (and remove duplicates)
    1294. 

  1294. 		ksort($subsetglyphs);
    1295. 

  1295. 		// build new glyf and loca tables
    1296. 

  1296. 		$glyf = '';
    1297. 

  1297. 		$loca = '';
    1298. 

  1298. 		$offset = 0;
    1299. 

  1299. 		$glyf_offset = $table['glyf']['offset'];
    1300. 

  1300. 		for ($i = 0; $i < $tot_num_glyphs; ++$i) {
    1301. 

  1301. 			if (isset($subsetglyphs[$i])) {
    1302. 

  1302. 				$length = ($indexToLoc[($i + 1)] - $indexToLoc[$i]);
    1303. 

  1303. 				$glyf .= substr($font, ($glyf_offset + $indexToLoc[$i]), $length);
    1304. 

  1304. 			} else {
    1305. 

  1305. 				$length = 0;
    1306. 

  1306. 			}
    1307. 

  1307. 			if ($short_offset) {
    1308. 

  1308. 				$loca .= pack('n', floor($offset / 2));
    1309. 

  1309. 			} else {
    1310. 

  1310. 				$loca .= pack('N', $offset);
    1311. 

  1311. 			}
    1312. 

  1312. 			$offset += $length;
    1313. 

  1313. 		}
    1314. 

  1314. 		// array of table names to preserve (loca and glyf tables will be added later)
    1315. 

  1315. 		// the cmap table is not needed and shall not be present, since the mapping from character codes to glyph descriptions is provided separately
    1316. 

  1316. 		$table_names = array ('head', 'hhea', 'hmtx', 'maxp', 'cvt ', 'fpgm', 'prep'); // minimum required table names
    1317. 

  1317. 		// get the tables to preserve
    1318. 

  1318. 		$offset = 12;
    1319. 

  1319. 		foreach ($table as $tag => $val) {
    1320. 

  1320. 			if (in_array($tag, $table_names)) {
    1321. 

  1321. 				$table[$tag]['data'] = substr($font, $table[$tag]['offset'], $table[$tag]['length']);
    1322. 

  1322. 				if ($tag == 'head') {
    1323. 

  1323. 					// set the checkSumAdjustment to 0
    1324. 

  1324. 					$table[$tag]['data'] = substr($table[$tag]['data'], 0, 8)."\x0\x0\x0\x0".substr($table[$tag]['data'], 12);
    1325. 

  1325. 				}
    1326. 

  1326. 				$pad = 4 - ($table[$tag]['length'] % 4);
    1327. 

  1327. 				if ($pad != 4) {
    1328. 

  1328. 					// the length of a table must be a multiple of four bytes
    1329. 

  1329. 					$table[$tag]['length'] += $pad;
    1330. 

  1330. 					$table[$tag]['data'] .= str_repeat("\x0", $pad);
    1331. 

  1331. 				}
    1332. 

  1332. 				$table[$tag]['offset'] = $offset;
    1333. 

  1333. 				$offset += $table[$tag]['length'];
    1334. 

  1334. 				// check sum is not changed (so keep the following line commented)
    1335. 

  1335. 				//$table[$tag]['checkSum'] = self::_getTTFtableChecksum($table[$tag]['data'], $table[$tag]['length']);
    1336. 

  1336. 			} else {
    1337. 

  1337. 				unset($table[$tag]);
    1338. 

  1338. 			}
    1339. 

  1339. 		}
    1340. 

  1340. 		// add loca
    1341. 

  1341. 		$table['loca']['data'] = $loca;
    1342. 

  1342. 		$table['loca']['length'] = strlen($loca);
    1343. 

  1343. 		$pad = 4 - ($table['loca']['length'] % 4);
    1344. 

  1344. 		if ($pad != 4) {
    1345. 

  1345. 			// the length of a table must be a multiple of four bytes
    1346. 

  1346. 			$table['loca']['length'] += $pad;
    1347. 

  1347. 			$table['loca']['data'] .= str_repeat("\x0", $pad);
    1348. 

  1348. 		}
    1349. 

  1349. 		…
    1350.

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