useSubstitutions = true;
if ($checkdir) {
$ttfdir = $checkdir;
} else {
$ttfdir = _MPDF_TTFONTPATH;
}
$mqr = ini_get("magic_quotes_runtime");
if ($mqr) {
set_magic_quotes_runtime(0);
}
if (!class_exists('TTFontFile_Analysis', false)) {
include(_MPDF_PATH . 'classes/ttfontsuni_analysis.php');
}
$ttf = new TTFontFile_Analysis();
$tempfontdata = array();
$tempsansfonts = array();
$tempseriffonts = array();
$tempmonofonts = array();
$tempfonttrans = array();
$ff = scandir($ttfdir);
foreach ($ff AS $f) {
$ret = array();
$isTTC = false;
if (strtolower(substr($f, -4, 4)) == '.ttc' || strtolower(substr($f, -5, 5)) == '.ttcf') { // Mac ttcf
$isTTC = true;
$ttf->getTTCFonts($ttfdir . $f);
$nf = $ttf->numTTCFonts;
for ($i = 1; $i <= $nf; $i++) {
$ret[] = $ttf->extractCoreInfo($ttfdir . $f, $i);
}
} else if (strtolower(substr($f, -4, 4)) == '.ttf' || strtolower(substr($f, -4, 4)) == '.otf') {
$ret[] = $ttf->extractCoreInfo($ttfdir . $f);
}
for ($i = 0; $i < count($ret); $i++) {
if (!is_array($ret[$i])) {
if (!$pdf)
echo $ret[$i] . '
';
}
else {
$tfname = $ret[$i][0];
$bold = $ret[$i][1];
$italic = $ret[$i][2];
$fname = strtolower($tfname);
$fname = preg_replace('/[ ()]/', '', $fname);
$tempfonttrans[$tfname] = $fname;
$style = '';
if ($bold) {
$style .= 'B';
}
if ($italic) {
$style .= 'I';
}
if (!$style) {
$style = 'R';
}
$tempfontdata[$fname][$style] = $f;
if ($isTTC) {
$tempfontdata[$fname]['TTCfontID'][$style] = $ret[$i][4];
}
//if ($ret[$i][5]) { $tempfontdata[$fname]['rtl'] = true; }
//if ($ret[$i][7]) { $tempfontdata[$fname]['cjk'] = true; }
if ($ret[$i][8]) {
$tempfontdata[$fname]['sip'] = true;
}
if ($ret[$i][9]) {
$tempfontdata[$fname]['smp'] = true;
}
if ($ret[$i][10]) {
$tempfontdata[$fname]['puaag'] = true;
}
if ($ret[$i][11]) {
$tempfontdata[$fname]['pua'] = true;
}
if ($ret[$i][12]) {
$tempfontdata[$fname]['unAGlyphs'] = true;
}
$ftype = $ret[$i][3]; // mono, sans or serif
if ($ftype == 'sans') {
$tempsansfonts[] = $fname;
} else if ($ftype == 'serif') {
$tempseriffonts[] = $fname;
} else if ($ftype == 'mono') {
$tempmonofonts[] = $fname;
}
}
}
}
$tempsansfonts = array_unique($tempsansfonts);
$tempseriffonts = array_unique($tempseriffonts);
$tempmonofonts = array_unique($tempmonofonts);
$tempfonttrans = array_unique($tempfonttrans);
if (!$pdf) {
echo 'Information
';
}
foreach ($tempfontdata AS $fname => $v) {
if (!isset($tempfontdata[$fname]['R']) || !$tempfontdata[$fname]['R']) {
if (!$pdf)
echo 'WARNING - Font file for ' . $fname . ' may be an italic cursive script, or extra-bold etc.
';
if (isset($tempfontdata[$fname]['I']) && $tempfontdata[$fname]['I']) {
$tempfontdata[$fname]['R'] = $tempfontdata[$fname]['I'];
} else if (isset($tempfontdata[$fname]['B']) && $tempfontdata[$fname]['B']) {
$tempfontdata[$fname]['R'] = $tempfontdata[$fname]['B'];
} else if (isset($tempfontdata[$fname]['BI']) && $tempfontdata[$fname]['BI']) {
$tempfontdata[$fname]['R'] = $tempfontdata[$fname]['BI'];
}
}
if (isset($tempfontdata[$fname]['smp']) && $tempfontdata[$fname]['smp']) {
if (!$pdf)
echo 'INFO - Font file ' . $fname . ' contains characters in Unicode Plane 1 SMP
';
$tempfontdata[$fname]['smp'] = false;
}
// if (isset($tempfontdata[$fname]['pua']) && $tempfontdata[$fname]['pua']) {
// if (!$pdf) echo 'INFO - Font file '.$fname.' contains characters in Unicode Private Use Area (U+E000-U+F8FF)
';
// }
if (isset($tempfontdata[$fname]['unAGlyphs']) && $tempfontdata[$fname]['unAGlyphs']) {
if (!$pdf)
echo 'INFO - Font file ' . $fname . ' contains non-indexed Arabic Glyphs "unAGlyphs" (which can be mapped to U+F500-U+F7FF)
';
if (isset($tempfontdata[$fname]['puaag']) && $tempfontdata[$fname]['puaag']) {
if (!$pdf)
echo 'WARNING - Font file ' . $fname . ' already includes mapped characters in the part of Unicode Private Use Area which mPDF uses for mapping non-indexed Arabic Glyphs "unAGlyphs" (U+F500-U+F7FF)
';
}
}
if (isset($tempfontdata[$fname]['sip']) && $tempfontdata[$fname]['sip']) {
if (!$pdf)
echo 'INFO - Font file ' . $fname . ' contains characters in Unicode Plane 2 SIP
';
if (preg_match('/^(.*)-extb/', $fname, $fm)) {
if (isset($tempfontdata[($fm[1])]) && $tempfontdata[($fm[1])]) {
$tempfontdata[($fm[1])]['sip-ext'] = $fname;
if (!$pdf)
echo 'INFO - Font file ' . $fname . ' has been defined as a CJK ext-B for ' . ($fm[1]) . '
';
}
else if (isset($tempfontdata[($fm[1] . '-exta')]) && $tempfontdata[($fm[1] . '-exta')]) {
$tempfontdata[($fm[1] . '-exta')]['sip-ext'] = $fname;
if (!$pdf)
echo 'INFO - Font file ' . $fname . ' has been defined as a CJK ext-B for ' . ($fm[1] . '-exta') . '
';
}
}
// else { unset($tempfontdata[$fname]['sip']); }
}
unset($tempfontdata[$fname]['sip']);
unset($tempfontdata[$fname]['smp']);
unset($tempfontdata[$fname]['pua']);
unset($tempfontdata[$fname]['puaag']);
unset($tempfontdata[$fname]['unAGlyphs']);
}
$mpdf->fontdata = array_merge($tempfontdata, $mpdf->fontdata);
$mpdf->available_unifonts = array();
foreach ($mpdf->fontdata AS $f => $fs) {
if (isset($fs['R']) && $fs['R']) {
$mpdf->available_unifonts[] = $f;
}
if (isset($fs['B']) && $fs['B']) {
$mpdf->available_unifonts[] = $f . 'B';
}
if (isset($fs['I']) && $fs['I']) {
$mpdf->available_unifonts[] = $f . 'I';
}
if (isset($fs['BI']) && $fs['BI']) {
$mpdf->available_unifonts[] = $f . 'BI';
}
}
$mpdf->default_available_fonts = $mpdf->available_unifonts;
if (!$pdf) {
echo '
';
echo 'Font names as parsed by mPDF
';
}
ksort($tempfonttrans);
$html = '';
foreach ($tempfonttrans AS $on => $mn) {
if (!file_exists($ttfdir . $mpdf->fontdata[$mn]['R'])) {
continue;
}
$ond = '"' . $on . '"';
$html .= '' . $ond . ' font is available as ' . $mn;
if (isset($mpdf->fontdata[$mn]['sip-ext']) && $mpdf->fontdata[$mn]['sip-ext']) {
$html .= '; CJK ExtB: ' . $mpdf->fontdata[$mn]['sip-ext'];
}
$html .= '
';
}
if ($pdf) {
$mpdf->WriteHTML($html);
$mpdf->Output();
exit;
}
foreach ($tempfonttrans AS $on => $mn) {
$ond = '"' . $on . '"';
echo '' . $ond . ' font is available as ' . $mn;
if (isset($mpdf->fontdata[$mn]['sip-ext']) && $mpdf->fontdata[$mn]['sip-ext']) {
echo '; CJK ExtB: ' . $mpdf->fontdata[$mn]['sip-ext'];
}
echo '
';
}
echo '
';
echo 'Sample config_fonts.php file
';
echo 'Remember to edit the following arrays to place your preferred default first in order:
';
echo '';
ksort($tempfontdata);
echo '$this->fontdata = ' . var_export($tempfontdata, true) . ";\n";
sort($tempsansfonts);
echo '$this->sans_fonts = array(\'' . implode("', '", $tempsansfonts) . "');\n";
sort($tempseriffonts);
echo '$this->serif_fonts = array(\'' . implode("', '", $tempseriffonts) . "');\n";
sort($tempmonofonts);
echo '$this->mono_fonts = array(\'' . implode("', '", $tempmonofonts) . "');\n";
echo '';
exit;
?>