aboutsummaryrefslogtreecommitdiffhomepage
path: root/inc/3rdparty/libraries/mpdf/utils/font_coverage.php
diff options
context:
space:
mode:
Diffstat (limited to 'inc/3rdparty/libraries/mpdf/utils/font_coverage.php')
-rw-r--r--inc/3rdparty/libraries/mpdf/utils/font_coverage.php255
1 files changed, 255 insertions, 0 deletions
diff --git a/inc/3rdparty/libraries/mpdf/utils/font_coverage.php b/inc/3rdparty/libraries/mpdf/utils/font_coverage.php
new file mode 100644
index 00000000..5286d743
--- /dev/null
+++ b/inc/3rdparty/libraries/mpdf/utils/font_coverage.php
@@ -0,0 +1,255 @@
1<?php
2
3/* This script prints out the Unicode coverage of all TrueType font files
4 in your font directory.
5 Point your browser to
6 http://your.domain/your_path_to _mpdf/utils/font_coverage.php
7 By default this will examine the folder /ttfonts/ (or the default font
8 directory defined by _MPDF_TTFONTPATH.
9 You can optionally define an alternative folder to examine by setting
10 the variable below (must be a relative path, or filesystem path):
11*/
12
13
14$checkdir = '';
15
16
17//////////////////////////////////
18//////////////////////////////////
19//////////////////////////////////
20
21
22set_time_limit(600);
23ini_set("memory_limit","256M");
24
25//==============================================================
26//==============================================================
27include("../mpdf.php");
28
29$mpdf=new mPDF('','A4-L','','',10,10,10,10);
30$mpdf->SetDisplayMode('fullpage');
31$mpdf->useSubstitutions = true;
32$mpdf->debug = true;
33$mpdf->simpleTables = true;
34if ($checkdir) {
35 $ttfdir = $checkdir;
36}
37else { $ttfdir = _MPDF_TTFONTPATH; }
38
39
40
41$mqr=ini_get("magic_quotes_runtime");
42if ($mqr) { set_magic_quotes_runtime(0); }
43if (!class_exists('TTFontFile_Analysis', false)) { include(_MPDF_PATH .'classes/ttfontsuni_analysis.php'); }
44
45//==============================================================
46 $smp = true;
47 $maxt = 131071;
48//==============================================================
49//==============================================================
50$unifile = file('UnicodeData.txt');
51$unichars = array();
52foreach($unifile AS $line) {
53 if (preg_match('/<control>/',$line,$m)) {
54 $rangename = '';
55 continue;
56 }
57 else if (preg_match('/^([12]{0,1}[0-9A-Za-z]{4});<(.*?), Last>/',$line,$m)) {
58 if ($rangename && $rangename == $m[2]) {
59 $endrange = hexdec($m[1]);
60 for ($i=$startrange;$i<=$endrange; $i++) {
61 $unichars[$i] = $i;
62 }
63 }
64 $rangename = '';
65 }
66 else if (preg_match('/^([12]{0,1}[0-9A-Za-z]{4});<(.*?), First>/',$line,$m)) {
67 $startrange = hexdec($m[1]);
68 $rangename = $m[2];
69 }
70 else if (preg_match('/^([12]{0,1}[0-9A-Za-z]{4});/',$line,$m)) {
71 $unichars[hexdec($m[1])] = hexdec($m[1]);
72 $rangename = '';
73 }
74}
75
76// loads array $unicode_ranges
77include('UnicodeRanges.php');
78//==============================================================
79$html = '<html><head><style>td { border: 0.1mm solid #555555; }
80body { font-weight: normal; font-family: helvetica;font-size:8pt; }
81td { font-family: helvetica;font-size:8pt; vertical-align: top;}
82</style></head><body>';
83
84//==============================================================
85$ff = scandir($ttfdir);
86$tempfontdata = array();
87foreach($ff AS $f) {
88 $ttf = new TTFontFile_Analysis();
89 $ret = array();
90 $isTTC = false;
91 if (strtolower(substr($f,-4,4))=='.ttf' || strtolower(substr($f,-4,4))=='.otf') {
92 $ret[] = $ttf->extractCoreInfo($ttfdir.$f);
93 }
94 for ($i=0; $i<count($ret); $i++) {
95 if (is_array($ret[$i])) {
96 $tfname = $ret[$i][0];
97 $bold = $ret[$i][1];
98 $italic = $ret[$i][2];
99 $fname = strtolower($tfname );
100 $fname = preg_replace('/[ ()]/','',$fname );
101 //$tempfonttrans[$tfname] = $fname;
102 $style = '';
103 if ($bold) { $style .= 'B'; }
104 if ($italic) { $style .= 'I'; }
105 if (!$style) {
106 $tempfontdata[$fname]['file'] = $f;
107 if ($isTTC) {
108 $tempfontdata[$fname]['TTCfontID'] = $ret[$i][4];
109 }
110 }
111 }
112 }
113 unset($ttf);
114
115}
116
117$fullcovers = array();
118$nearlycovers = array();
119ksort($tempfontdata);
120$ningroup = 14;
121$nofgroups = ceil(count($unicode_ranges)/$ningroup);
122
123//==============================================================
124
125
126for ($urgp = 0; $urgp < $nofgroups; $urgp++) {
127
128
129 $html .= '<table cellpadding="2" cellspacing="0" style="page-break-inside:avoid; text-align:center; border-collapse: collapse; ">';
130 $html .= '<thead><tr><td></td>';
131
132 foreach($unicode_ranges AS $urk => $ur) {
133 if ($urk >= ($urgp*$ningroup) && $urk < (($urgp+1)*$ningroup)) {
134 $rangekey = $urk;
135 $range = $ur['range'];
136 $rangestart = $ur['starthex'];
137 $rangeend = $ur['endhex'];
138 $html .= '<td style="font-family:helvetica;font-size:8pt;font-weight:bold;">'.strtoupper($range).' (U+'.$rangestart .'-U+'.$rangeend.')</td>';
139 }
140 }
141 $html .= '</tr></thead>';
142
143
144 foreach ($tempfontdata AS $fname => $v) {
145 $cw = '';
146 if (file_exists((_MPDF_TTFONTDATAPATH.$fname.'.cw.dat'))) { $cw = file_get_contents(_MPDF_TTFONTDATAPATH.$fname.'.cw.dat'); }
147 else {
148 $mpdf->fontdata[$fname]['R'] = $tempfontdata[$fname]['file'];
149 $mpdf->AddFont($fname);
150 $cw = file_get_contents(_MPDF_TTFONTDATAPATH.$fname.'.cw.dat');
151 }
152 if (!$cw) {
153 continue;
154 die("Font data not available for $fname");
155 }
156
157 $counter=0;
158 $max = $maxt;
159
160 // create HTML content
161 $html .= '<tr>';
162 $html .= '<td>'.$fname.'</td>';
163
164 foreach($unicode_ranges AS $urk => $ur) {
165 if ($urk >= ($urgp*$ningroup) && $urk < (($urgp+1)*$ningroup)) {
166 if ($ur['pua'] || $ur['reserved'] || $ur['control']) {
167 $html .= '<td style="background-color: #000000;"></td>';
168 }
169 else {
170 $rangekey = $urk;
171 $range = $ur['range'];
172 $rangestart = $ur['starthex'];
173 $rangeend = $ur['endhex'];
174 $rangestartdec = $ur['startdec'];
175 $rangeenddec = $ur['enddec'];
176 $uniinrange = 0;
177 $fontinrange = 0;
178 for ($i=$rangestartdec; $i<=$rangeenddec; $i++) {
179 //if (isset($cw[$i])) { $fontinrange++; }
180 if ($mpdf->_charDefined($cw, $i)) { $fontinrange++; }
181 if (isset($unichars[$i])) { $uniinrange++; }
182 }
183 if ($uniinrange) {
184 if ($fontinrange) {
185 $pc = ($fontinrange/$uniinrange);
186 $str = '('.$fontinrange.'/'.$uniinrange.')';
187 if ($pc==1) {
188 $fullcovers[$urk][] = $fname;
189 $html .= '<td style="background-color: #00FF00;"></td>';
190 }
191 else if ($pc>1) {
192 $fullcovers[$urk][] = $fname;
193 $html .= '<td style="background-color: #00FF00;">'.$str.'</td>';
194 }
195 else if ($pc>=0.9) {
196 $html .= '<td style="background-color: #AAFFAA;">'.$str.'</td>';
197 $nearlycovers[$urk][] = $fname;
198 }
199 else if ($pc>0.75) { $html .= '<td style="background-color: #00FFAA;">'.$str.'</td>'; }
200 else if ($pc>0.5) { $html .= '<td style="background-color: #AAAAFF;">'.$str.'</td>'; }
201 else if ($pc>0.25) { $html .= '<td style="background-color: #FFFFAA;">'.$str.'</td>'; }
202 else { $html .= '<td style="background-color: #FFAAAA;">'.$str.'</td>'; }
203 }
204 else { $html .= '<td style="background-color: #555555;">(0/0)</td>'; }
205 }
206 else { $html .= '<td style="background-color: #000000;"></td>'; }
207 }
208 }
209 }
210
211
212 $html .= '</tr>';
213
214 }
215//==============================================================
216 $html .= '</table><pagebreak />';
217}
218
219$html .= '<h4>Fonts with full coverage of Unicode Ranges</h4>';
220$html .= '<table>';
221//$html .= '<tr><td></td><td></td></tr>';
222foreach($unicode_ranges AS $urk => $ur) {
223 if ($ur['pua'] || $ur['reserved'] || $ur['control']) { continue; }
224 $rangekey = $urk;
225 $range = $ur['range'];
226 $rangestart = $ur['starthex'];
227 $rangeend = $ur['endhex'];
228 $ext = $ext2 = '';
229 if ($ur['combining']) { $ext = 'background-color:#DDDDFF;'; $ext2 = '<br /><span style="color:#AA0000">Special positioning required</span>'; }
230 if ($ur['vertical']) { $ext = 'background-color:#FFDDDD;'; $ext2 = '<br /><span style="color:#AA0000">Vertical positioning required</span>'; }
231 if ($ur['special']) { $ext = 'background-color:#FFDDDD;'; $ext2 = '<br /><span style="color:#AA0000">Special processing required</span>'; }
232
233
234 $html .= '<tr><td style="font-family:helvetica;font-size:8pt;font-weight:bold;'.$ext.'">'.strtoupper($range).' (U+'.$rangestart .'-U+'.$rangeend.')'.$ext2.'</td>';
235 $arr = $fullcovers[$urk];
236 $narr = $nearlycovers[$urk];
237 if (is_array($arr)) { $html .= '<td>'. implode(', ',$arr). '</td></tr>'; }
238 else if (is_array($narr)) { $html .= '<td style="background-color: #AAAAAA;">'. implode(', ',$narr). ' (>90%)</td></tr>'; }
239 else { $html .= '<td style="background-color: #555555;"> </td></tr>'; }
240}
241$html.= '</table>';
242
243
244//==============================================================
245echo $html;
246
247exit;
248
249//==============================================================
250//==============================================================
251//==============================================================
252//==============================================================
253
254
255?> \ No newline at end of file
generated by cgit v1.2.3 (git 2.25.1) at 2024-11-26 15:55:40 +0000