Subversion-Projekte lars-tiefland.php_share

Revision

Details | Letzte Änderung | Log anzeigen | RSS feed

Revision Autor Zeilennr. Zeile
1 lars 1 
<?php
2 
/*******************************************************************************
3 
* Utility to generate font definition files                                    *
4 
*                                                                              *
5 
* Version: 1.2                                                                 *
6 
* Date:    2011-06-18                                                          *
7 
* Author:  Olivier PLATHEY                                                     *
8 
*******************************************************************************/
9 
 
10 
require('ttfparser.php');
11 
 
12 
function Message($txt, $severity='')
13 
{
14 
	if(PHP_SAPI=='cli')
15 
	{
16 
		if($severity)
17 
			echo "$severity: ";
18 
		echo "$txt\n";
19 
	}
20 
	else
21 
	{
22 
		if($severity)
23 
			echo "<b>$severity</b>: ";
24 
		echo "$txt<br>";
25 
	}
26 
}
27 
 
28 
function Notice($txt)
29 
{
30 
	Message($txt, 'Notice');
31 
}
32 
 
33 
function Warning($txt)
34 
{
35 
	Message($txt, 'Warning');
36 
}
37 
 
38 
function Error($txt)
39 
{
40 
	Message($txt, 'Error');
41 
	exit;
42 
}
43 
 
44 
function LoadMap($enc)
45 
{
46 
	$file = dirname(__FILE__).'/'.strtolower($enc).'.map';
47 
	$a = file($file);
48 
	if(empty($a))
49 
		Error('Encoding not found: '.$enc);
50 
	$map = array_fill(0, 256, array('uv'=>-1, 'name'=>'.notdef'));
51 
	foreach($a as $line)
52 
	{
53 
		$e = explode(' ', rtrim($line));
54 
		$c = hexdec(substr($e[0],1));
55 
		$uv = hexdec(substr($e[1],2));
56 
		$name = $e[2];
57 
		$map[$c] = array('uv'=>$uv, 'name'=>$name);
58 
	}
59 
	return $map;
60 
}
61 
 
62 
function GetInfoFromTrueType($file, $embed, $map)
63 
{
64 
	// Return informations from a TrueType font
65 
	$ttf = new TTFParser();
66 
	$ttf->Parse($file);
67 
	if($embed)
68 
	{
69 
		if(!$ttf->Embeddable)
70 
			Error('Font license does not allow embedding');
71 
		$info['Data'] = file_get_contents($file);
72 
		$info['OriginalSize'] = filesize($file);
73 
	}
74 
	$k = 1000/$ttf->unitsPerEm;
75 
	$info['FontName'] = $ttf->postScriptName;
76 
	$info['Bold'] = $ttf->Bold;
77 
	$info['ItalicAngle'] = $ttf->italicAngle;
78 
	$info['IsFixedPitch'] = $ttf->isFixedPitch;
79 
	$info['Ascender'] = round($k*$ttf->typoAscender);
80 
	$info['Descender'] = round($k*$ttf->typoDescender);
81 
	$info['UnderlineThickness'] = round($k*$ttf->underlineThickness);
82 
	$info['UnderlinePosition'] = round($k*$ttf->underlinePosition);
83 
	$info['FontBBox'] = array(round($k*$ttf->xMin), round($k*$ttf->yMin), round($k*$ttf->xMax), round($k*$ttf->yMax));
84 
	$info['CapHeight'] = round($k*$ttf->capHeight);
85 
	$info['MissingWidth'] = round($k*$ttf->widths[0]);
86 
	$widths = array_fill(0, 256, $info['MissingWidth']);
87 
	for($c=0;$c<=255;$c++)
88 
	{
89 
		if($map[$c]['name']!='.notdef')
90 
		{
91 
			$uv = $map[$c]['uv'];
92 
			if(isset($ttf->chars[$uv]))
93 
			{
94 
				$w = $ttf->widths[$ttf->chars[$uv]];
95 
				$widths[$c] = round($k*$w);
96 
			}
97 
			else
98 
				Warning('Character '.$map[$c]['name'].' is missing');
99 
		}
100 
	}
101 
	$info['Widths'] = $widths;
102 
	return $info;
103 
}
104 
 
105 
function GetInfoFromType1($file, $embed, $map)
106 
{
107 
	// Return informations from a Type1 font
108 
	if($embed)
109 
	{
110 
		$f = fopen($file, 'rb');
111 
		if(!$f)
112 
			Error('Can\'t open font file');
113 
		// Read first segment
114 
		$a = unpack('Cmarker/Ctype/Vsize', fread($f,6));
115 
		if($a['marker']!=128)
116 
			Error('Font file is not a valid binary Type1');
117 
		$size1 = $a['size'];
118 
		$data = fread($f, $size1);
119 
		// Read second segment
120 
		$a = unpack('Cmarker/Ctype/Vsize', fread($f,6));
121 
		if($a['marker']!=128)
122 
			Error('Font file is not a valid binary Type1');
123 
		$size2 = $a['size'];
124 
		$data .= fread($f, $size2);
125 
		fclose($f);
126 
		$info['Data'] = $data;
127 
		$info['Size1'] = $size1;
128 
		$info['Size2'] = $size2;
129 
	}
130 
 
131 
	$afm = substr($file, 0, -3).'afm';
132 
	if(!file_exists($afm))
133 
		Error('AFM font file not found: '.$afm);
134 
	$a = file($afm);
135 
	if(empty($a))
136 
		Error('AFM file empty or not readable');
137 
	foreach($a as $line)
138 
	{
139 
		$e = explode(' ', rtrim($line));
140 
		if(count($e)<2)
141 
			continue;
142 
		$entry = $e[0];
143 
		if($entry=='C')
144 
		{
145 
			$w = $e[4];
146 
			$name = $e[7];
147 
			$cw[$name] = $w;
148 
		}
149 
		elseif($entry=='FontName')
150 
			$info['FontName'] = $e[1];
151 
		elseif($entry=='Weight')
152 
			$info['Weight'] = $e[1];
153 
		elseif($entry=='ItalicAngle')
154 
			$info['ItalicAngle'] = (int)$e[1];
155 
		elseif($entry=='Ascender')
156 
			$info['Ascender'] = (int)$e[1];
157 
		elseif($entry=='Descender')
158 
			$info['Descender'] = (int)$e[1];
159 
		elseif($entry=='UnderlineThickness')
160 
			$info['UnderlineThickness'] = (int)$e[1];
161 
		elseif($entry=='UnderlinePosition')
162 
			$info['UnderlinePosition'] = (int)$e[1];
163 
		elseif($entry=='IsFixedPitch')
164 
			$info['IsFixedPitch'] = ($e[1]=='true');
165 
		elseif($entry=='FontBBox')
166 
			$info['FontBBox'] = array((int)$e[1], (int)$e[2], (int)$e[3], (int)$e[4]);
167 
		elseif($entry=='CapHeight')
168 
			$info['CapHeight'] = (int)$e[1];
169 
		elseif($entry=='StdVW')
170 
			$info['StdVW'] = (int)$e[1];
171 
	}
172 
 
173 
	if(!isset($info['FontName']))
174 
		Error('FontName missing in AFM file');
175 
	$info['Bold'] = isset($info['Weight']) && preg_match('/bold|black/i', $info['Weight']);
176 
	if(isset($cw['.notdef']))
177 
		$info['MissingWidth'] = $cw['.notdef'];
178 
	else
179 
		$info['MissingWidth'] = 0;
180 
	$widths = array_fill(0, 256, $info['MissingWidth']);
181 
	for($c=0;$c<=255;$c++)
182 
	{
183 
		$name = $map[$c]['name'];
184 
		if($name!='.notdef')
185 
		{
186 
			if(isset($cw[$name]))
187 
				$widths[$c] = $cw[$name];
188 
			else
189 
				Warning('Character '.$name.' is missing');
190 
		}
191 
	}
192 
	$info['Widths'] = $widths;
193 
	return $info;
194 
}
195 
 
196 
function MakeFontDescriptor($info)
197 
{
198 
	// Ascent
199 
	$fd = "array('Ascent'=>".$info['Ascender'];
200 
	// Descent
201 
	$fd .= ",'Descent'=>".$info['Descender'];
202 
	// CapHeight
203 
	if(!empty($info['CapHeight']))
204 
		$fd .= ",'CapHeight'=>".$info['CapHeight'];
205 
	else
206 
		$fd .= ",'CapHeight'=>".$info['Ascender'];
207 
	// Flags
208 
	$flags = 0;
209 
	if($info['IsFixedPitch'])
210 
		$flags += 1<<0;
211 
	$flags += 1<<5;
212 
	if($info['ItalicAngle']!=0)
213 
		$flags += 1<<6;
214 
	$fd .= ",'Flags'=>".$flags;
215 
	// FontBBox
216 
	$fbb = $info['FontBBox'];
217 
	$fd .= ",'FontBBox'=>'[".$fbb[0].' '.$fbb[1].' '.$fbb[2].' '.$fbb[3]."]'";
218 
	// ItalicAngle
219 
	$fd .= ",'ItalicAngle'=>".$info['ItalicAngle'];
220 
	// StemV
221 
	if(isset($info['StdVW']))
222 
		$stemv = $info['StdVW'];
223 
	elseif($info['Bold'])
224 
		$stemv = 120;
225 
	else
226 
		$stemv = 70;
227 
	$fd .= ",'StemV'=>".$stemv;
228 
	// MissingWidth
229 
	$fd .= ",'MissingWidth'=>".$info['MissingWidth'].')';
230 
	return $fd;
231 
}
232 
 
233 
function MakeWidthArray($widths)
234 
{
235 
	$s = "array(\n\t";
236 
	for($c=0;$c<=255;$c++)
237 
	{
238 
		if(chr($c)=="'")
239 
			$s .= "'\\''";
240 
		elseif(chr($c)=="\\")
241 
			$s .= "'\\\\'";
242 
		elseif($c>=32 && $c<=126)
243 
			$s .= "'".chr($c)."'";
244 
		else
245 
			$s .= "chr($c)";
246 
		$s .= '=>'.$widths[$c];
247 
		if($c<255)
248 
			$s .= ',';
249 
		if(($c+1)%22==0)
250 
			$s .= "\n\t";
251 
	}
252 
	$s .= ')';
253 
	return $s;
254 
}
255 
 
256 
function MakeFontEncoding($map)
257 
{
258 
	// Build differences from reference encoding
259 
	$ref = LoadMap('cp1252');
260 
	$s = '';
261 
	$last = 0;
262 
	for($c=32;$c<=255;$c++)
263 
	{
264 
		if($map[$c]['name']!=$ref[$c]['name'])
265 
		{
266 
			if($c!=$last+1)
267 
				$s .= $c.' ';
268 
			$last = $c;
269 
			$s .= '/'.$map[$c]['name'].' ';
270 
		}
271 
	}
272 
	return rtrim($s);
273 
}
274 
 
275 
function SaveToFile($file, $s, $mode)
276 
{
277 
	$f = fopen($file, 'w'.$mode);
278 
	if(!$f)
279 
		Error('Can\'t write to file '.$file);
280 
	fwrite($f, $s, strlen($s));
281 
	fclose($f);
282 
}
283 
 
284 
function MakeDefinitionFile($file, $type, $enc, $embed, $map, $info)
285 
{
286 
	$s = "<?php\n";
287 
	$s .= '$type = \''.$type."';\n";
288 
	$s .= '$name = \''.$info['FontName']."';\n";
289 
	$s .= '$desc = '.MakeFontDescriptor($info).";\n";
290 
	$s .= '$up = '.$info['UnderlinePosition'].";\n";
291 
	$s .= '$ut = '.$info['UnderlineThickness'].";\n";
292 
	$s .= '$cw = '.MakeWidthArray($info['Widths']).";\n";
293 
	$s .= '$enc = \''.$enc."';\n";
294 
	$diff = MakeFontEncoding($map);
295 
	if($diff)
296 
		$s .= '$diff = \''.$diff."';\n";
297 
	if($embed)
298 
	{
299 
		$s .= '$file = \''.$info['File']."';\n";
300 
		if($type=='Type1')
301 
		{
302 
			$s .= '$size1 = '.$info['Size1'].";\n";
303 
			$s .= '$size2 = '.$info['Size2'].";\n";
304 
		}
305 
		else
306 
			$s .= '$originalsize = '.$info['OriginalSize'].";\n";
307 
	}
308 
	$s .= "?>\n";
309 
	SaveToFile($file, $s, 't');
310 
}
311 
 
312 
function MakeFont($fontfile, $enc='cp1252', $embed=true)
313 
{
314 
	// Generate a font definition file
315 
	if(get_magic_quotes_runtime())
316 
		@set_magic_quotes_runtime(0);
317 
	ini_set('auto_detect_line_endings', '1');
318 
 
319 
	if(!file_exists($fontfile))
320 
		Error('Font file not found: '.$fontfile);
321 
	$ext = strtolower(substr($fontfile,-3));
322 
	if($ext=='ttf' || $ext=='otf')
323 
		$type = 'TrueType';
324 
	elseif($ext=='pfb')
325 
		$type = 'Type1';
326 
	else
327 
		Error('Unrecognized font file extension: '.$ext);
328 
 
329 
	$map = LoadMap($enc);
330 
 
331 
	if($type=='TrueType')
332 
		$info = GetInfoFromTrueType($fontfile, $embed, $map);
333 
	else
334 
		$info = GetInfoFromType1($fontfile, $embed, $map);
335 
 
336 
	$basename = substr(basename($fontfile), 0, -4);
337 
	if($embed)
338 
	{
339 
		if(function_exists('gzcompress'))
340 
		{
341 
			$file = $basename.'.z';
342 
			SaveToFile($file, gzcompress($info['Data']), 'b');
343 
			$info['File'] = $file;
344 
			Message('Font file compressed: '.$file);
345 
		}
346 
		else
347 
		{
348 
			$info['File'] = basename($fontfile);
349 
			Notice('Font file could not be compressed (zlib extension not available)');
350 
		}
351 
	}
352 
 
353 
	MakeDefinitionFile($basename.'.php', $type, $enc, $embed, $map, $info);
354 
	Message('Font definition file generated: '.$basename.'.php');
355 
}
356 
 
357 
if(PHP_SAPI=='cli')
358 
{
359 
	// Command-line interface
360 
	if($argc==1)
361 
		die("Usage: php makefont.php fontfile [enc] [embed]\n");
362 
	$fontfile = $argv[1];
363 
	if($argc>=3)
364 
		$enc = $argv[2];
365 
	else
366 
		$enc = 'cp1252';
367 
	if($argc>=4)
368 
		$embed = ($argv[3]=='true' || $argv[3]=='1');
369 
	else
370 
		$embed = true;
371 
	MakeFont($fontfile, $enc, $embed);
372 
}
373 
?>