Current Path : /var/www/html/clients/pv.e-nk.ru/ |
Current File : /var/www/html/clients/pv.e-nk.ru/makefontuni.php |
<?php /******************************************************************************* * Utility to generate font definition files for Unicode Truetype fonts * * Version: 1.12 * * Date: 2003-12-30 * *******************************************************************************/ function ReadUFM($file, &$cidtogidmap) { //Prepare empty CIDToGIDMap $cidtogidmap = str_pad('', 256*256*2, "\x00"); //Read a font metric file $a=file($file); if(empty($a)) die('File not found'); $widths=array(); $fm=array(); foreach($a as $l) { $e=explode(' ',chop($l)); if(count($e)<2) continue; $code=$e[0]; $param=$e[1]; if($code=='U') { // U 827 ; WX 0 ; N squaresubnosp ; G 675 ; //Character metrics $cc=(int)$e[1]; if ($cc != -1) { $gn = $e[7]; $w = $e[4]; $glyph = $e[10]; $widths[$cc] = $w; if($cc == ord('X')) $fm['CapXHeight'] = $e[13]; // Set GID if ($cc >= 0 && $cc < 0xFFFF && $glyph) { $cidtogidmap{$cc*2} = chr($glyph >> 8); $cidtogidmap{$cc*2 + 1} = chr($glyph & 0xFF); } } if($gn=='.notdef' && !isset($fm['MissingWidth'])) $fm['MissingWidth']=$w; } elseif($code=='FontName') $fm['FontName']=$param; elseif($code=='Weight') $fm['Weight']=$param; elseif($code=='ItalicAngle') $fm['ItalicAngle']=(double)$param; elseif($code=='Ascender') $fm['Ascender']=(int)$param; elseif($code=='Descender') $fm['Descender']=(int)$param; elseif($code=='UnderlineThickness') $fm['UnderlineThickness']=(int)$param; elseif($code=='UnderlinePosition') $fm['UnderlinePosition']=(int)$param; elseif($code=='IsFixedPitch') $fm['IsFixedPitch']=($param=='true'); elseif($code=='FontBBox') $fm['FontBBox']=array($e[1],$e[2],$e[3],$e[4]); elseif($code=='CapHeight') $fm['CapHeight']=(int)$param; elseif($code=='StdVW') $fm['StdVW']=(int)$param; } if(!isset($fm['MissingWidth'])) $fm['MissingWidth']=600; if(!isset($fm['FontName'])) die('FontName not found'); $fm['Widths']=$widths; return $fm; } function MakeFontDescriptor($fm) { //Ascent $asc=(isset($fm['Ascender']) ? $fm['Ascender'] : 1000); $fd="array('Ascent'=>".$asc; //Descent $desc=(isset($fm['Descender']) ? $fm['Descender'] : -200); $fd.=",'Descent'=>".$desc; //CapHeight if(isset($fm['CapHeight'])) $ch=$fm['CapHeight']; elseif(isset($fm['CapXHeight'])) $ch=$fm['CapXHeight']; else $ch=$asc; $fd.=",'CapHeight'=>".$ch; //Flags $flags=0; if(isset($fm['IsFixedPitch']) and $fm['IsFixedPitch']) $flags+=1<<0; $flags+=1<<5; if(isset($fm['ItalicAngle']) and $fm['ItalicAngle']!=0) $flags+=1<<6; $fd.=",'Flags'=>".$flags; //FontBBox if(isset($fm['FontBBox'])) $fbb=$fm['FontBBox']; else $fbb=array(0,$des-100,1000,$asc+100); $fd.=",'FontBBox'=>'[".$fbb[0].' '.$fbb[1].' '.$fbb[2].' '.$fbb[3]."]'"; //ItalicAngle $ia=(isset($fm['ItalicAngle']) ? $fm['ItalicAngle'] : 0); $fd.=",'ItalicAngle'=>".$ia; //StemV if(isset($fm['StdVW'])) $stemv=$fm['StdVW']; elseif(isset($fm['Weight']) and eregi('(bold|black)',$fm['Weight'])) $stemv=120; else $stemv=70; $fd.=",'StemV'=>".$stemv; //MissingWidth if(isset($fm['MissingWidth'])) $fd.=",'MissingWidth'=>".$fm['MissingWidth']; $fd.=')'; return $fd; } function MakeWidthArray($fm) { //Make character width array $s="array("; $cw=$fm['Widths']; $els=array(); $c=0; foreach ($cw as $i => $w) { $els[] = ((($c++)%16==0)?"\n\t":'').$i.'=>'.$w; } $s .= implode(', ', $els); $s.=')'; return $s; } function SaveToFile($file,$s,$mode='t') { $f=fopen($file,'w'.$mode); if(!$f) die('Can\'t write to file '.$file); fwrite($f,$s,strlen($s)); fclose($f); } function ReadShort($f) { $a=unpack('n1n',fread($f,2)); return $a['n']; } function ReadLong($f) { $a=unpack('N1N',fread($f,4)); return $a['N']; } function CheckTTF($file) { //Check if font license allows embedding $f=fopen($file,'rb'); if(!$f) die('<B>Error:</B> Can\'t open '.$file); //Extract number of tables fseek($f,4,SEEK_CUR); $nb=ReadShort($f); fseek($f,6,SEEK_CUR); //Seek OS/2 table $found=false; for($i=0;$i<$nb;$i++) { if(fread($f,4)=='OS/2') { $found=true; break; } fseek($f,12,SEEK_CUR); } if(!$found) { fclose($f); return; } fseek($f,4,SEEK_CUR); $offset=ReadLong($f); fseek($f,$offset,SEEK_SET); //Extract fsType flags fseek($f,8,SEEK_CUR); $fsType=ReadShort($f); $rl=($fsType & 0x02)!=0; $pp=($fsType & 0x04)!=0; $e=($fsType & 0x08)!=0; fclose($f); if($rl and !$pp and !$e) echo '<B>Warning:</B> font license does not allow embedding'; } /******************************************************************************* * $fontfile: path to TTF file (or empty string if not to be embedded) * * $ufmfile: path to UFM file * *******************************************************************************/ function MakeFont($fontfile,$ufmfile) { //Generate a font definition file set_magic_quotes_runtime(0); if(!file_exists($ufmfile)) die('<B>Error:</B> UFM file not found: '.$ufmfile); $cidtogidmap = ''; $fm=ReadUFM($ufmfile, $cidtogidmap); $fd=MakeFontDescriptor($fm); //Find font type if($fontfile) { $ext=strtolower(substr($fontfile,-3)); if($ext=='ttf') $type='TrueTypeUnicode'; else die('<B>Error:</B> not a truetype font: '.$ext); } else { if($type!='TrueTypeUnicode') die('<B>Error:</B> incorrect font type: '.$type); } //Start generation $s='<?php'."\n"; $s.='$type=\''.$type."';\n"; $s.='$name=\''.$fm['FontName']."';\n"; $s.='$desc='.$fd.";\n"; if(!isset($fm['UnderlinePosition'])) $fm['UnderlinePosition']=-100; if(!isset($fm['UnderlineThickness'])) $fm['UnderlineThickness']=50; $s.='$up='.$fm['UnderlinePosition'].";\n"; $s.='$ut='.$fm['UnderlineThickness'].";\n"; $w=MakeWidthArray($fm); $s.='$cw='.$w.";\n"; $s.="\$enc='';\n"; $s.="\$diff='';\n"; $basename=substr(basename($ufmfile),0,-4); if($fontfile) { //Embedded font if(!file_exists($fontfile)) die('<B>Error:</B> font file not found: '.$fontfile); CheckTTF($fontfile); $f=fopen($fontfile,'rb'); if(!$f) die('<B>Error:</B> Can\'t open '.$fontfile); $file=fread($f,filesize($fontfile)); fclose($f); if(function_exists('gzcompress')) { $cmp=$basename.'.z'; SaveToFile($cmp,gzcompress($file),'b'); $s.='$file=\''.$cmp."';\n"; echo 'Font file compressed ('.$cmp.')<BR>'; $cmp=$basename.'.ctg.z'; SaveToFile($cmp,gzcompress($cidtogidmap),'b'); echo 'CIDToGIDMap created and compressed ('.$cmp.')<BR>'; $s.='$ctg=\''.$cmp."';\n"; } else { $s.='$file=\''.basename($fontfile)."';\n"; echo '<B>Notice:</B> font file could not be compressed (gzcompress not available)<BR>'; $cmp=$basename.'.ctg'; $f = fopen($cmp, 'wb'); fwrite($f, $cidtogidmap); fclose($f); echo 'CIDToGIDMap created ('.$cmp.')<BR>'; $s.='$ctg=\''.$cmp."';\n"; } if($type=='Type1') { $s.='$size1='.$size1.";\n"; $s.='$size2='.$size2.";\n"; } else $s.='$originalsize='.filesize($fontfile).";\n"; } else { //Not embedded font $s.='$file='."'';\n"; } $s.="?>\n"; SaveToFile($basename.'.php',$s); echo 'Font definition file generated ('.$basename.'.php'.')<BR>'; } $arg = $GLOBALS['argv']; if (count($arg) >= 3) { ob_start(); array_shift($arg); MakeFont($arg[0], $arg[1]); $t = ob_get_clean(); print preg_replace('!<BR( /)?>!i', "\n", $t); } else { print "Usage: makefontuni.php <ttf-file> <ufm-file>\n"; } ?>