/**
* Convert and add the selected TrueType or Type1 font to the fonts folder (that must be writeable).
* @param $fontfile (string) Font file (full path).
* @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.
* @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.
* @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.
* @param $outpath (string) Output path for generated font files (must be writeable by the web server). Leave empty for default font folder.
* @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).
* @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.
* @param $addcbbox (boolean) If true includes the character bounding box information on the php font file.
* @param $link (boolean) If true link to system font instead of copying the font data (not transportable) - Note: do not work with Type1 fonts.
* @return (string) TCPDF font name or boolean false in case of error.
* @author Nicola Asuni
* @since 5.9.123 (2010-09-30)
* @public static
*/
public static function addTTFfont($fontfile, $fonttype = '', $enc = '', $flags = 32, $outpath = '', $platid = 3, $encid = 1, $addcbbox = false, $link = false)
{
if (!file_exists($fontfile)) {
// Could not find file
return false;
}
// font metrics
$fmetric = array();
// build new font name for TCPDF compatibility
$font_path_parts = pathinfo($fontfile);
if (!isset($font_path_parts['filename'])) {
$font_path_parts['filename'] = substr($font_path_parts['basename'], 0, -(strlen($font_path_parts['extension']) + 1));
}
$font_name = strtolower($font_path_parts['filename']);
$font_name = preg_replace('/[^a-z0-9_]/', '', $font_name);
$search = array('bold', 'oblique', 'italic', 'regular');
$replace = array('b', 'i', 'i', '');
$font_name = str_replace($search, $replace, $font_name);
if (empty($font_name)) {
// set generic name
$font_name = 'tcpdffont';
}
// set output path
if (empty($outpath)) {
$outpath = self::_getfontpath();
}
// check if this font already exist
if (@file_exists($outpath . $font_name . '.php')) {
// this font already exist (delete it from fonts folder to rebuild it)
return $font_name;
}
$fmetric['file'] = $font_name;
$fmetric['ctg'] = $font_name . '.ctg.z';
// get font data
$font = file_get_contents($fontfile);
$fmetric['originalsize'] = strlen($font);
// autodetect font type
if (empty($fonttype)) {
if (TcpdfStatic::_getULONG($font, 0) == 0x10000) {
// True Type (Unicode or not)
$fonttype = 'TrueTypeUnicode';
} elseif (substr($font, 0, 4) == 'OTTO') {
// Open Type (Unicode or not)
//Unsupported font format: OpenType with CFF data
return false;
} else {
// Type 1
$fonttype = 'Type1';
}
}
// set font type
switch ($fonttype) {
case 'CID0CT':
case 'CID0CS':
case 'CID0KR':
case 'CID0JP':
$fmetric['type'] = 'cidfont0';
break;
case 'Type1':
$fmetric['type'] = 'Type1';
if (empty($enc) and ($flags & 4) == 0) {
$enc = 'cp1252';
}
break;
case 'TrueType':
$fmetric['type'] = 'TrueType';
break;
case 'TrueTypeUnicode':
default:
$fmetric['type'] = 'TrueTypeUnicode';
break;
}
// set encoding maps (if any)
$fmetric['enc'] = preg_replace('/[^A-Za-z0-9_\\-]/', '', $enc);
$fmetric['diff'] = '';
if ($fmetric['type'] == 'TrueType' or $fmetric['type'] == 'Type1') {
if (!empty($enc) and $enc != 'cp1252' and isset(TcpdfFontData::$encmap[$enc])) {
// build differences from reference encoding
$enc_ref = TcpdfFontData::$encmap['cp1252'];
$enc_target = TcpdfFontData::$encmap[$enc];
$last = 0;
for ($i = 32; $i <= 255; ++$i) {
if ($enc_target != $enc_ref[$i]) {
if ($i != $last + 1) {
$fmetric['diff'] .= $i . ' ';
}
$last = $i;
$fmetric['diff'] .= '/' . $enc_target[$i] . ' ';
}
}
}
}
// parse the font by type
if ($fmetric['type'] == 'Type1') {
// ---------- TYPE 1 ----------
// read first segment
$a = unpack('Cmarker/Ctype/Vsize', substr($font, 0, 6));
if ($a['marker'] != 128) {
// Font file is not a valid binary Type1
return false;
}
$fmetric['size1'] = $a['size'];
$data = substr($font, 6, $fmetric['size1']);
// read second segment
$a = unpack('Cmarker/Ctype/Vsize', substr($font, 6 + $fmetric['size1'], 6));
if ($a['marker'] != 128) {
// Font file is not a valid binary Type1
return false;
}
$fmetric['size2'] = $a['size'];
$encrypted = substr($font, 12 + $fmetric['size1'], $fmetric['size2']);
$data .= $encrypted;
// store compressed font
$fmetric['file'] .= '.z';
$fp = fopen($outpath . $fmetric['file'], 'wb');
fwrite($fp, gzcompress($data));
fclose($fp);
// get font info
$fmetric['Flags'] = $flags;
preg_match('#/FullName[\\s]*\\(([^\\)]*)#', $font, $matches);
$fmetric['name'] = preg_replace('/[^a-zA-Z0-9_\\-]/', '', $matches[1]);
preg_match('#/FontBBox[\\s]*{([^}]*)#', $font, $matches);
$fmetric['bbox'] = trim($matches[1]);
$bv = explode(' ', $fmetric['bbox']);
$fmetric['Ascent'] = intval($bv[3]);
$fmetric['Descent'] = intval($bv[1]);
preg_match('#/ItalicAngle[\\s]*([0-9\\+\\-]*)#', $font, $matches);
$fmetric['italicAngle'] = intval($matches[1]);
if ($fmetric['italicAngle'] != 0) {
$fmetric['Flags'] |= 64;
}
preg_match('#/UnderlinePosition[\\s]*([0-9\\+\\-]*)#', $font, $matches);
$fmetric['underlinePosition'] = intval($matches[1]);
preg_match('#/UnderlineThickness[\\s]*([0-9\\+\\-]*)#', $font, $matches);
$fmetric['underlineThickness'] = intval($matches[1]);
preg_match('#/isFixedPitch[\\s]*([^\\s]*)#', $font, $matches);
if ($matches[1] == 'true') {
$fmetric['Flags'] |= 1;
}
// get internal map
$imap = array();
if (preg_match_all('#dup[\\s]([0-9]+)[\\s]*/([^\\s]*)[\\s]put#sU', $font, $fmap, PREG_SET_ORDER) > 0) {
foreach ($fmap as $v) {
$imap[$v[2]] = $v[1];
}
}
// decrypt eexec encrypted part
$r = 55665;
// eexec encryption constant
$c1 = 52845;
$c2 = 22719;
$elen = strlen($encrypted);
$eplain = '';
for ($i = 0; $i < $elen; ++$i) {
$chr = ord($encrypted[$i]);
$eplain .= chr($chr ^ $r >> 8);
$r = (($chr + $r) * $c1 + $c2) % 65536;
}
if (preg_match('#/ForceBold[\\s]*([^\\s]*)#', $eplain, $matches) > 0) {
if ($matches[1] == 'true') {
$fmetric['Flags'] |= 0x40000;
}
}
if (preg_match('#/StdVW[\\s]*\\[([^\\]]*)#', $eplain, $matches) > 0) {
$fmetric['StemV'] = intval($matches[1]);
} else {
$fmetric['StemV'] = 70;
}
if (preg_match('#/StdHW[\\s]*\\[([^\\]]*)#', $eplain, $matches) > 0) {
$fmetric['StemH'] = intval($matches[1]);
} else {
$fmetric['StemH'] = 30;
}
if (preg_match('#/BlueValues[\\s]*\\[([^\\]]*)#', $eplain, $matches) > 0) {
$bv = explode(' ', $matches[1]);
if (count($bv) >= 6) {
$v1 = intval($bv[2]);
$v2 = intval($bv[4]);
if ($v1 <= $v2) {
$fmetric['XHeight'] = $v1;
$fmetric['CapHeight'] = $v2;
} else {
$fmetric['XHeight'] = $v2;
$fmetric['CapHeight'] = $v1;
}
} else {
$fmetric['XHeight'] = 450;
$fmetric['CapHeight'] = 700;
}
} else {
$fmetric['XHeight'] = 450;
$fmetric['CapHeight'] = 700;
}
// get the number of random bytes at the beginning of charstrings
if (preg_match('#/lenIV[\\s]*([0-9]*)#', $eplain, $matches) > 0) {
$lenIV = intval($matches[1]);
} else {
$lenIV = 4;
}
$fmetric['Leading'] = 0;
// get charstring data
$eplain = substr($eplain, strpos($eplain, '/CharStrings') + 1);
preg_match_all('#/([A-Za-z0-9\\.]*)[\\s][0-9]+[\\s]RD[\\s](.*)[\\s]ND#sU', $eplain, $matches, PREG_SET_ORDER);
if (!empty($enc) and isset(TcpdfFontData::$encmap[$enc])) {
$enc_map = TcpdfFontData::$encmap[$enc];
} else {
$enc_map = false;
}
$fmetric['cw'] = '';
$fmetric['MaxWidth'] = 0;
$cwidths = array();
foreach ($matches as $k => $v) {
$cid = 0;
if (isset($imap[$v[1]])) {
$cid = $imap[$v[1]];
} elseif ($enc_map !== false) {
$cid = array_search($v[1], $enc_map);
if ($cid === false) {
$cid = 0;
} elseif ($cid > 1000) {
$cid -= 1000;
}
}
// decrypt charstring encrypted part
$r = 4330;
// charstring encryption constant
$c1 = 52845;
$c2 = 22719;
$cd = $v[2];
$clen = strlen($cd);
$ccom = array();
for ($i = 0; $i < $clen; ++$i) {
$chr = ord($cd[$i]);
$ccom[] = $chr ^ $r >> 8;
$r = (($chr + $r) * $c1 + $c2) % 65536;
}
// decode numbers
$cdec = array();
$ck = 0;
$i = $lenIV;
while ($i < $clen) {
if ($ccom[$i] < 32) {
$cdec[$ck] = $ccom[$i];
if ($ck > 0 and $cdec[$ck] == 13) {
// hsbw command: update width
$cwidths[$cid] = $cdec[$ck - 1];
}
++$i;
} elseif ($ccom[$i] >= 32 and $ccom[$i] <= 246) {
$cdec[$ck] = $ccom[$i] - 139;
++$i;
} elseif ($ccom[$i] >= 247 and $ccom[$i] <= 250) {
$cdec[$ck] = ($ccom[$i] - 247) * 256 + $ccom[$i + 1] + 108;
$i += 2;
} elseif ($ccom[$i] >= 251 and $ccom[$i] <= 254) {
$cdec[$ck] = -($ccom[$i] - 251) * 256 - $ccom[$i + 1] - 108;
$i += 2;
} elseif ($ccom[$i] == 255) {
$sval = chr($ccom[$i + 1]) . chr($ccom[$i + 2]) . chr($ccom[$i + 3]) . chr($ccom[$i + 4]);
$vsval = unpack('li', $sval);
$cdec[$ck] = $vsval['i'];
$i += 5;
}
++$ck;
}
}
// end for each matches
$fmetric['MissingWidth'] = $cwidths[0];
$fmetric['MaxWidth'] = $fmetric['MissingWidth'];
$fmetric['AvgWidth'] = 0;
// set chars widths
for ($cid = 0; $cid <= 255; ++$cid) {
if (isset($cwidths[$cid])) {
if ($cwidths[$cid] > $fmetric['MaxWidth']) {
$fmetric['MaxWidth'] = $cwidths[$cid];
}
$fmetric['AvgWidth'] += $cwidths[$cid];
$fmetric['cw'] .= ',' . $cid . '=>' . $cwidths[$cid];
} else {
$fmetric['cw'] .= ',' . $cid . '=>' . $fmetric['MissingWidth'];
}
}
$fmetric['AvgWidth'] = round($fmetric['AvgWidth'] / count($cwidths));
} else {
// ---------- TRUE TYPE ----------
if ($fmetric['type'] != 'cidfont0') {
if ($link) {
// creates a symbolic link to the existing font
symlink($fontfile, $outpath . $fmetric['file']);
} else {
// store compressed font
$fmetric['file'] .= '.z';
$fp = fopen($outpath . $fmetric['file'], 'wb');
fwrite($fp, gzcompress($font));
fclose($fp);
}
}
$offset = 0;
// offset position of the font data
if (TcpdfStatic::_getULONG($font, $offset) != 0x10000) {
// sfnt version must be 0x00010000 for TrueType version 1.0.
return false;
}
$offset += 4;
// get number of tables
$numTables = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
// skip searchRange, entrySelector and rangeShift
$offset += 6;
// tables array
$table = array();
// ---------- get tables ----------
for ($i = 0; $i < $numTables; ++$i) {
// get table info
$tag = substr($font, $offset, 4);
$offset += 4;
$table[$tag] = array();
$table[$tag]['checkSum'] = TcpdfStatic::_getULONG($font, $offset);
$offset += 4;
$table[$tag]['offset'] = TcpdfStatic::_getULONG($font, $offset);
$offset += 4;
$table[$tag]['length'] = TcpdfStatic::_getULONG($font, $offset);
$offset += 4;
}
// check magicNumber
$offset = $table['head']['offset'] + 12;
if (TcpdfStatic::_getULONG($font, $offset) != 0x5f0f3cf5) {
// magicNumber must be 0x5F0F3CF5
return false;
}
$offset += 4;
$offset += 2;
// skip flags
// get FUnits
$fmetric['unitsPerEm'] = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
// units ratio constant
$urk = 1000 / $fmetric['unitsPerEm'];
$offset += 16;
// skip created, modified
$xMin = round(TcpdfStatic::_getFWORD($font, $offset) * $urk);
$offset += 2;
$yMin = round(TcpdfStatic::_getFWORD($font, $offset) * $urk);
$offset += 2;
$xMax = round(TcpdfStatic::_getFWORD($font, $offset) * $urk);
$offset += 2;
$yMax = round(TcpdfStatic::_getFWORD($font, $offset) * $urk);
$offset += 2;
$fmetric['bbox'] = '' . $xMin . ' ' . $yMin . ' ' . $xMax . ' ' . $yMax . '';
$macStyle = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
// PDF font flags
$fmetric['Flags'] = $flags;
if (($macStyle & 2) == 2) {
// italic flag
$fmetric['Flags'] |= 64;
}
// get offset mode (indexToLocFormat : 0 = short, 1 = long)
$offset = $table['head']['offset'] + 50;
$short_offset = TcpdfStatic::_getSHORT($font, $offset) == 0;
$offset += 2;
// get the offsets to the locations of the glyphs in the font, relative to the beginning of the glyphData table
$indexToLoc = array();
$offset = $table['loca']['offset'];
if ($short_offset) {
// short version
$tot_num_glyphs = floor($table['loca']['length'] / 2);
// numGlyphs + 1
for ($i = 0; $i < $tot_num_glyphs; ++$i) {
$indexToLoc[$i] = TcpdfStatic::_getUSHORT($font, $offset) * 2;
$offset += 2;
}
} else {
// long version
$tot_num_glyphs = floor($table['loca']['length'] / 4);
// numGlyphs + 1
for ($i = 0; $i < $tot_num_glyphs; ++$i) {
$indexToLoc[$i] = TcpdfStatic::_getULONG($font, $offset);
$offset += 4;
}
}
// get glyphs indexes of chars from cmap table
$offset = $table['cmap']['offset'] + 2;
$numEncodingTables = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
$encodingTables = array();
for ($i = 0; $i < $numEncodingTables; ++$i) {
$encodingTables[$i]['platformID'] = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
$encodingTables[$i]['encodingID'] = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
$encodingTables[$i]['offset'] = TcpdfStatic::_getULONG($font, $offset);
$offset += 4;
}
// ---------- get os/2 metrics ----------
$offset = $table['OS/2']['offset'];
$offset += 2;
// skip version
// xAvgCharWidth
$fmetric['AvgWidth'] = round(TcpdfStatic::_getFWORD($font, $offset) * $urk);
$offset += 2;
// usWeightClass
$usWeightClass = round(TcpdfStatic::_getUFWORD($font, $offset) * $urk);
// estimate StemV and StemH (400 = usWeightClass for Normal - Regular font)
$fmetric['StemV'] = round(70 * $usWeightClass / 400);
$fmetric['StemH'] = round(30 * $usWeightClass / 400);
$offset += 2;
$offset += 2;
// usWidthClass
$fsType = TcpdfStatic::_getSHORT($font, $offset);
$offset += 2;
if ($fsType == 2) {
// This Font cannot be modified, embedded or exchanged in any manner without first obtaining permission of the legal owner.
return false;
}
// ---------- get font name ----------
$fmetric['name'] = '';
$offset = $table['name']['offset'];
$offset += 2;
// skip Format selector (=0).
// Number of NameRecords that follow n.
$numNameRecords = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
// Offset to start of string storage (from start of table).
$stringStorageOffset = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
for ($i = 0; $i < $numNameRecords; ++$i) {
$offset += 6;
// skip Platform ID, Platform-specific encoding ID, Language ID.
// Name ID.
$nameID = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
if ($nameID == 6) {
// String length (in bytes).
$stringLength = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
// String offset from start of storage area (in bytes).
$stringOffset = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
$offset = $table['name']['offset'] + $stringStorageOffset + $stringOffset;
$fmetric['name'] = substr($font, $offset, $stringLength);
$fmetric['name'] = preg_replace('/[^a-zA-Z0-9_\\-]/', '', $fmetric['name']);
break;
} else {
$offset += 4;
// skip String length, String offset
}
}
if (empty($fmetric['name'])) {
$fmetric['name'] = $font_name;
}
// ---------- get post data ----------
$offset = $table['post']['offset'];
$offset += 4;
// skip Format Type
$fmetric['italicAngle'] = TcpdfStatic::_getFIXED($font, $offset);
$offset += 4;
$fmetric['underlinePosition'] = round(TcpdfStatic::_getFWORD($font, $offset) * $urk);
$offset += 2;
$fmetric['underlineThickness'] = round(TcpdfStatic::_getFWORD($font, $offset) * $urk);
$offset += 2;
$isFixedPitch = TcpdfStatic::_getULONG($font, $offset) == 0 ? false : true;
$offset += 2;
if ($isFixedPitch) {
$fmetric['Flags'] |= 1;
}
// ---------- get hhea data ----------
$offset = $table['hhea']['offset'];
$offset += 4;
// skip Table version number
// Ascender
$fmetric['Ascent'] = round(TcpdfStatic::_getFWORD($font, $offset) * $urk);
$offset += 2;
// Descender
$fmetric['Descent'] = round(TcpdfStatic::_getFWORD($font, $offset) * $urk);
$offset += 2;
// LineGap
$fmetric['Leading'] = round(TcpdfStatic::_getFWORD($font, $offset) * $urk);
$offset += 2;
// advanceWidthMax
$fmetric['MaxWidth'] = round(TcpdfStatic::_getUFWORD($font, $offset) * $urk);
$offset += 2;
$offset += 22;
// skip some values
// get the number of hMetric entries in hmtx table
$numberOfHMetrics = TcpdfStatic::_getUSHORT($font, $offset);
// ---------- get maxp data ----------
$offset = $table['maxp']['offset'];
$offset += 4;
// skip Table version number
// get the the number of glyphs in the font.
$numGlyphs = TcpdfStatic::_getUSHORT($font, $offset);
// ---------- get CIDToGIDMap ----------
$ctg = array();
foreach ($encodingTables as $enctable) {
// get only specified Platform ID and Encoding ID
if ($enctable['platformID'] == $platid and $enctable['encodingID'] == $encid) {
$offset = $table['cmap']['offset'] + $enctable['offset'];
$format = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
switch ($format) {
case 0:
// Format 0: Byte encoding table
$offset += 4;
// skip length and version/language
for ($c = 0; $c < 256; ++$c) {
$g = TcpdfStatic::_getBYTE($font, $offset);
$ctg[$c] = $g;
++$offset;
}
break;
case 2:
// Format 2: High-byte mapping through table
$offset += 4;
// skip length and version/language
$numSubHeaders = 0;
for ($i = 0; $i < 256; ++$i) {
// Array that maps high bytes to subHeaders: value is subHeader index * 8.
$subHeaderKeys[$i] = TcpdfStatic::_getUSHORT($font, $offset) / 8;
$offset += 2;
if ($numSubHeaders < $subHeaderKeys[$i]) {
$numSubHeaders = $subHeaderKeys[$i];
}
}
// the number of subHeaders is equal to the max of subHeaderKeys + 1
++$numSubHeaders;
// read subHeader structures
$subHeaders = array();
$numGlyphIndexArray = 0;
for ($k = 0; $k < $numSubHeaders; ++$k) {
$subHeaders[$k]['firstCode'] = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
$subHeaders[$k]['entryCount'] = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
$subHeaders[$k]['idDelta'] = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
$subHeaders[$k]['idRangeOffset'] = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
$subHeaders[$k]['idRangeOffset'] -= 2 + ($numSubHeaders - $k - 1) * 8;
$subHeaders[$k]['idRangeOffset'] /= 2;
$numGlyphIndexArray += $subHeaders[$k]['entryCount'];
}
for ($k = 0; $k < $numGlyphIndexArray; ++$k) {
$glyphIndexArray[$k] = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
}
for ($i = 0; $i < 256; ++$i) {
$k = $subHeaderKeys[$i];
if ($k == 0) {
// one byte code
$c = $i;
$g = $glyphIndexArray[0];
$ctg[$c] = $g;
} else {
// two bytes code
$start_byte = $subHeaders[$k]['firstCode'];
$end_byte = $start_byte + $subHeaders[$k]['entryCount'];
for ($j = $start_byte; $j < $end_byte; ++$j) {
// combine high and low bytes
$c = ($i << 8) + $j;
$idRangeOffset = $subHeaders[$k]['idRangeOffset'] + $j - $subHeaders[$k]['firstCode'];
$g = ($glyphIndexArray[$idRangeOffset] + $idDelta[$k]) % 65536;
if ($g < 0) {
$g = 0;
}
$ctg[$c] = $g;
}
}
}
break;
case 4:
// Format 4: Segment mapping to delta values
$length = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
$offset += 2;
// skip version/language
$segCount = floor(TcpdfStatic::_getUSHORT($font, $offset) / 2);
$offset += 2;
$offset += 6;
// skip searchRange, entrySelector, rangeShift
$endCount = array();
// array of end character codes for each segment
for ($k = 0; $k < $segCount; ++$k) {
$endCount[$k] = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
}
$offset += 2;
// skip reservedPad
$startCount = array();
// array of start character codes for each segment
for ($k = 0; $k < $segCount; ++$k) {
$startCount[$k] = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
}
$idDelta = array();
// delta for all character codes in segment
for ($k = 0; $k < $segCount; ++$k) {
$idDelta[$k] = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
}
$idRangeOffset = array();
// Offsets into glyphIdArray or 0
for ($k = 0; $k < $segCount; ++$k) {
$idRangeOffset[$k] = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
}
$gidlen = floor($length / 2) - 8 - 4 * $segCount;
$glyphIdArray = array();
// glyph index array
for ($k = 0; $k < $gidlen; ++$k) {
$glyphIdArray[$k] = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
}
for ($k = 0; $k < $segCount; ++$k) {
for ($c = $startCount[$k]; $c <= $endCount[$k]; ++$c) {
if ($idRangeOffset[$k] == 0) {
$g = ($idDelta[$k] + $c) % 65536;
} else {
$gid = floor($idRangeOffset[$k] / 2) + ($c - $startCount[$k]) - ($segCount - $k);
$g = ($glyphIdArray[$gid] + $idDelta[$k]) % 65536;
}
if ($g < 0) {
$g = 0;
}
$ctg[$c] = $g;
}
}
break;
case 6:
// Format 6: Trimmed table mapping
$offset += 4;
// skip length and version/language
$firstCode = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
$entryCount = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
for ($k = 0; $k < $entryCount; ++$k) {
$c = $k + $firstCode;
$g = TcpdfStatic::_getUSHORT($font, $offset);
$offset += 2;
$ctg[$c] = $g;
}
break;
case 8:
// Format 8: Mixed 16-bit and 32-bit coverage
$offset += 10;
// skip reserved, length and version/language
for ($k = 0; $k < 8192; ++$k) {
$is32[$k] = TcpdfStatic::_getBYTE($font, $offset);
++$offset;
}
$nGroups = TcpdfStatic::_getULONG($font, $offset);
$offset += 4;
for ($i = 0; $i < $nGroups; ++$i) {
$startCharCode = TcpdfStatic::_getULONG($font, $offset);
$offset += 4;
$endCharCode = TcpdfStatic::_getULONG($font, $offset);
$offset += 4;
$startGlyphID = TcpdfStatic::_getULONG($font, $offset);
$offset += 4;
for ($k = $startCharCode; $k <= $endCharCode; ++$k) {
$is32idx = floor($c / 8);
if (isset($is32[$is32idx]) and ($is32[$is32idx] & 1 << 7 - $c % 8) == 0) {
$c = $k;
} else {
// 32 bit format
// convert to decimal (http://www.unicode.org/faq//utf_bom.html#utf16-4)
//LEAD_OFFSET = (0xD800 - (0x10000 >> 10)) = 55232
//SURROGATE_OFFSET = (0x10000 - (0xD800 << 10) - 0xDC00) = -56613888
$c = (55232 + ($k >> 10) << 10) + (0xdc00 + ($k & 0x3ff)) - 56613888;
}
$ctg[$c] = 0;
++$startGlyphID;
}
}
break;
case 10:
// Format 10: Trimmed array
$offset += 10;
// skip reserved, length and version/language
$startCharCode = TcpdfStatic::_getULONG($font, $offset);
$offset += 4;
$numChars = TcpdfStatic::_getULONG($font, $offset);
$offset += 4;
for ($k = 0; $k < $numChars; ++$k) {
$c = $k + $startCharCode;
$g = TcpdfStatic::_getUSHORT($font, $offset);
$ctg[$c] = $g;
$offset += 2;
}
break;
case 12:
// Format 12: Segmented coverage
$offset += 10;
// skip length and version/language
$nGroups = TcpdfStatic::_getULONG($font, $offset);
$offset += 4;
for ($k = 0; $k < $nGroups; ++$k) {
$startCharCode = TcpdfStatic::_getULONG($font, $offset);
$offset += 4;
$endCharCode = TcpdfStatic::_getULONG($font, $offset);
$offset += 4;
$startGlyphCode = TcpdfStatic::_getULONG($font, $offset);
$offset += 4;
for ($c = $startCharCode; $c <= $endCharCode; ++$c) {
$ctg[$c] = $startGlyphCode;
++$startGlyphCode;
}
}
break;
case 13:
// Format 13: Many-to-one range mappings
// to be implemented ...
break;
case 14:
// Format 14: Unicode Variation Sequences
// to be implemented ...
break;
}
}
}
if (!isset($ctg[0])) {
$ctg[0] = 0;
}
// get xHeight (height of x)
$offset = $table['glyf']['offset'] + $indexToLoc[$ctg[120]] + 4;
$yMin = TcpdfStatic::_getFWORD($font, $offset);
$offset += 4;
$yMax = TcpdfStatic::_getFWORD($font, $offset);
$offset += 2;
$fmetric['XHeight'] = round(($yMax - $yMin) * $urk);
// get CapHeight (height of H)
$offset = $table['glyf']['offset'] + $indexToLoc[$ctg[72]] + 4;
$yMin = TcpdfStatic::_getFWORD($font, $offset);
$offset += 4;
$yMax = TcpdfStatic::_getFWORD($font, $offset);
$offset += 2;
$fmetric['CapHeight'] = round(($yMax - $yMin) * $urk);
// ceate widths array
$cw = array();
$offset = $table['hmtx']['offset'];
for ($i = 0; $i < $numberOfHMetrics; ++$i) {
$cw[$i] = round(TcpdfStatic::_getUFWORD($font, $offset) * $urk);
$offset += 4;
// skip lsb
}
if ($numberOfHMetrics < $numGlyphs) {
// fill missing widths with the last value
$cw = array_pad($cw, $numGlyphs, $cw[$numberOfHMetrics - 1]);
}
$fmetric['MissingWidth'] = $cw[0];
$fmetric['cw'] = '';
for ($cid = 0; $cid <= 65535; ++$cid) {
if (isset($ctg[$cid])) {
if (isset($cw[$ctg[$cid]])) {
$fmetric['cw'] .= ',' . $cid . '=>' . $cw[$ctg[$cid]];
}
if ($addcbbox and isset($indexToLoc[$ctg[$cid]])) {
$offset = $table['glyf']['offset'] + $indexToLoc[$ctg[$cid]];
$xMin = round(TcpdfStatic::_getFWORD($font, $offset + 2)) * $urk;
$yMin = round(TcpdfStatic::_getFWORD($font, $offset + 4)) * $urk;
$xMax = round(TcpdfStatic::_getFWORD($font, $offset + 6)) * $urk;
$yMax = round(TcpdfStatic::_getFWORD($font, $offset + 8)) * $urk;
$fmetric['cbbox'] .= ',' . $cid . '=>array(' . $xMin . ',' . $yMin . ',' . $xMax . ',' . $yMax . ')';
}
}
}
}
// end of true type
if ($fmetric['type'] == 'TrueTypeUnicode' and count($ctg) == 256) {
$fmetric['type'] == 'TrueType';
}
// ---------- create php font file ----------
$pfile = '<' . '?' . 'php' . "\n";
$pfile .= '// TCPDF FONT FILE DESCRIPTION' . "\n";
$pfile .= '$type=\'' . $fmetric['type'] . '\';' . "\n";
$pfile .= '$name=\'' . $fmetric['name'] . '\';' . "\n";
$pfile .= '$up=' . $fmetric['underlinePosition'] . ';' . "\n";
$pfile .= '$ut=' . $fmetric['underlineThickness'] . ';' . "\n";
if ($fmetric['MissingWidth'] > 0) {
$pfile .= '$dw=' . $fmetric['MissingWidth'] . ';' . "\n";
} else {
$pfile .= '$dw=' . $fmetric['AvgWidth'] . ';' . "\n";
}
$pfile .= '$diff=\'' . $fmetric['diff'] . '\';' . "\n";
if ($fmetric['type'] == 'Type1') {
// Type 1
$pfile .= '$enc=\'' . $fmetric['enc'] . '\';' . "\n";
$pfile .= '$file=\'' . $fmetric['file'] . '\';' . "\n";
$pfile .= '$size1=' . $fmetric['size1'] . ';' . "\n";
$pfile .= '$size2=' . $fmetric['size2'] . ';' . "\n";
} else {
$pfile .= '$originalsize=' . $fmetric['originalsize'] . ';' . "\n";
if ($fmetric['type'] == 'cidfont0') {
// CID-0
switch ($fonttype) {
case 'CID0JP':
$pfile .= '// Japanese' . "\n";
$pfile .= '$enc=\'UniJIS-UTF16-H\';' . "\n";
$pfile .= '$cidinfo=array(\'Registry\'=>\'Adobe\', \'Ordering\'=>\'Japan1\',\'Supplement\'=>5);' . "\n";
$pfile .= 'include(dirname(__FILE__).\'/uni2cid_aj16.php\');' . "\n";
break;
case 'CID0KR':
$pfile .= '// Korean' . "\n";
$pfile .= '$enc=\'UniKS-UTF16-H\';' . "\n";
$pfile .= '$cidinfo=array(\'Registry\'=>\'Adobe\', \'Ordering\'=>\'Korea1\',\'Supplement\'=>0);' . "\n";
$pfile .= 'include(dirname(__FILE__).\'/uni2cid_ak12.php\');' . "\n";
break;
case 'CID0CS':
$pfile .= '// Chinese Simplified' . "\n";
$pfile .= '$enc=\'UniGB-UTF16-H\';' . "\n";
$pfile .= '$cidinfo=array(\'Registry\'=>\'Adobe\', \'Ordering\'=>\'GB1\',\'Supplement\'=>2);' . "\n";
$pfile .= 'include(dirname(__FILE__).\'/uni2cid_ag15.php\');' . "\n";
break;
case 'CID0CT':
default:
$pfile .= '// Chinese Traditional' . "\n";
$pfile .= '$enc=\'UniCNS-UTF16-H\';' . "\n";
$pfile .= '$cidinfo=array(\'Registry\'=>\'Adobe\', \'Ordering\'=>\'CNS1\',\'Supplement\'=>0);' . "\n";
$pfile .= 'include(dirname(__FILE__).\'/uni2cid_aj16.php\');' . "\n";
break;
}
} else {
// TrueType
$pfile .= '$enc=\'' . $fmetric['enc'] . '\';' . "\n";
$pfile .= '$file=\'' . $fmetric['file'] . '\';' . "\n";
$pfile .= '$ctg=\'' . $fmetric['ctg'] . '\';' . "\n";
// create CIDToGIDMap
$cidtogidmap = str_pad('', 131072, "");
// (256 * 256 * 2) = 131072
foreach ($ctg as $cid => $gid) {
$cidtogidmap = self::updateCIDtoGIDmap($cidtogidmap, $cid, $ctg[$cid]);
}
// store compressed CIDToGIDMap
$fp = fopen($outpath . $fmetric['ctg'], 'wb');
fwrite($fp, gzcompress($cidtogidmap));
fclose($fp);
}
}
$pfile .= '$desc=array(';
$pfile .= '\'Flags\'=>' . $fmetric['Flags'] . ',';
$pfile .= '\'FontBBox\'=>\'[' . $fmetric['bbox'] . ']\',';
$pfile .= '\'ItalicAngle\'=>' . $fmetric['italicAngle'] . ',';
$pfile .= '\'Ascent\'=>' . $fmetric['Ascent'] . ',';
$pfile .= '\'Descent\'=>' . $fmetric['Descent'] . ',';
$pfile .= '\'Leading\'=>' . $fmetric['Leading'] . ',';
$pfile .= '\'CapHeight\'=>' . $fmetric['CapHeight'] . ',';
$pfile .= '\'XHeight\'=>' . $fmetric['XHeight'] . ',';
$pfile .= '\'StemV\'=>' . $fmetric['StemV'] . ',';
$pfile .= '\'StemH\'=>' . $fmetric['StemH'] . ',';
$pfile .= '\'AvgWidth\'=>' . $fmetric['AvgWidth'] . ',';
$pfile .= '\'MaxWidth\'=>' . $fmetric['MaxWidth'] . ',';
$pfile .= '\'MissingWidth\'=>' . $fmetric['MissingWidth'] . '';
$pfile .= ');' . "\n";
if (isset($fmetric['cbbox'])) {
$pfile .= '$cbbox=array(' . substr($fmetric['cbbox'], 1) . ');' . "\n";
}
$pfile .= '$cw=array(' . substr($fmetric['cw'], 1) . ');' . "\n";
$pfile .= '// --- EOF ---' . "\n";
// store file
$fp = fopen($outpath . $font_name . '.php', 'w');
fwrite($fp, $pfile);
fclose($fp);
// return TCPDF font name
return $font_name;
}
