OLD | NEW |
| (Empty) |
1 /***************************************************************************/ | |
2 /* */ | |
3 /* sfdriver.c */ | |
4 /* */ | |
5 /* High-level SFNT driver interface (body). */ | |
6 /* */ | |
7 /* Copyright 1996-2007, 2009-2013 by */ | |
8 /* David Turner, Robert Wilhelm, and Werner Lemberg. */ | |
9 /* */ | |
10 /* This file is part of the FreeType project, and may only be used, */ | |
11 /* modified, and distributed under the terms of the FreeType project */ | |
12 /* license, LICENSE.TXT. By continuing to use, modify, or distribute */ | |
13 /* this file you indicate that you have read the license and */ | |
14 /* understand and accept it fully. */ | |
15 /* */ | |
16 /***************************************************************************/ | |
17 | |
18 | |
19 #include "../../include/ft2build.h" | |
20 #include "../../include/freetype/internal/ftdebug.h" | |
21 #include "../../include/freetype/internal/sfnt.h" | |
22 #include "../../include/freetype/internal/ftobjs.h" | |
23 | |
24 #include "sfdriver.h" | |
25 #include "ttload.h" | |
26 #include "sfobjs.h" | |
27 #include "sfntpic.h" | |
28 | |
29 #include "sferrors.h" | |
30 | |
31 #ifdef TT_CONFIG_OPTION_EMBEDDED_BITMAPS | |
32 #include "ttsbit.h" | |
33 #endif | |
34 | |
35 #ifdef TT_CONFIG_OPTION_POSTSCRIPT_NAMES | |
36 #include "ttpost.h" | |
37 #endif | |
38 | |
39 #ifdef TT_CONFIG_OPTION_BDF | |
40 #include "ttbdf.h" | |
41 #include "../../include/freetype/internal/services/svbdf.h" | |
42 #endif | |
43 | |
44 #include "ttcmap.h" | |
45 #include "ttkern.h" | |
46 #include "ttmtx.h" | |
47 | |
48 #include "../../include/freetype/internal/services/svgldict.h" | |
49 #include "../../include/freetype/internal/services/svpostnm.h" | |
50 #include "../../include/freetype/internal/services/svsfnt.h" | |
51 #include "../../include/freetype/internal/services/svttcmap.h" | |
52 | |
53 | |
54 /*************************************************************************/ | |
55 /* */ | |
56 /* The macro FT_COMPONENT is used in trace mode. It is an implicit */ | |
57 /* parameter of the FT_TRACE() and FT_ERROR() macros, used to print/log */ | |
58 /* messages during execution. */ | |
59 /* */ | |
60 #undef FT_COMPONENT | |
61 #define FT_COMPONENT trace_sfdriver | |
62 | |
63 | |
64 /* | |
65 * SFNT TABLE SERVICE | |
66 * | |
67 */ | |
68 | |
69 static void* | |
70 get_sfnt_table( TT_Face face, | |
71 FT_Sfnt_Tag tag ) | |
72 { | |
73 void* table; | |
74 | |
75 | |
76 switch ( tag ) | |
77 { | |
78 case ft_sfnt_head: | |
79 table = &face->header; | |
80 break; | |
81 | |
82 case ft_sfnt_hhea: | |
83 table = &face->horizontal; | |
84 break; | |
85 | |
86 case ft_sfnt_vhea: | |
87 table = face->vertical_info ? &face->vertical : 0; | |
88 break; | |
89 | |
90 case ft_sfnt_os2: | |
91 table = face->os2.version == 0xFFFFU ? 0 : &face->os2; | |
92 break; | |
93 | |
94 case ft_sfnt_post: | |
95 table = &face->postscript; | |
96 break; | |
97 | |
98 case ft_sfnt_maxp: | |
99 table = &face->max_profile; | |
100 break; | |
101 | |
102 case ft_sfnt_pclt: | |
103 table = face->pclt.Version ? &face->pclt : 0; | |
104 break; | |
105 | |
106 default: | |
107 table = 0; | |
108 } | |
109 | |
110 return table; | |
111 } | |
112 | |
113 | |
114 static FT_Error | |
115 sfnt_table_info( TT_Face face, | |
116 FT_UInt idx, | |
117 FT_ULong *tag, | |
118 FT_ULong *offset, | |
119 FT_ULong *length ) | |
120 { | |
121 if ( !offset || !length ) | |
122 return FT_THROW( Invalid_Argument ); | |
123 | |
124 if ( !tag ) | |
125 *length = face->num_tables; | |
126 else | |
127 { | |
128 if ( idx >= face->num_tables ) | |
129 return FT_THROW( Table_Missing ); | |
130 | |
131 *tag = face->dir_tables[idx].Tag; | |
132 *offset = face->dir_tables[idx].Offset; | |
133 *length = face->dir_tables[idx].Length; | |
134 } | |
135 | |
136 return FT_Err_Ok; | |
137 } | |
138 | |
139 | |
140 FT_DEFINE_SERVICE_SFNT_TABLEREC( | |
141 sfnt_service_sfnt_table, | |
142 (FT_SFNT_TableLoadFunc)tt_face_load_any, | |
143 (FT_SFNT_TableGetFunc) get_sfnt_table, | |
144 (FT_SFNT_TableInfoFunc)sfnt_table_info ) | |
145 | |
146 | |
147 #ifdef TT_CONFIG_OPTION_POSTSCRIPT_NAMES | |
148 | |
149 /* | |
150 * GLYPH DICT SERVICE | |
151 * | |
152 */ | |
153 | |
154 static FT_Error | |
155 sfnt_get_glyph_name( TT_Face face, | |
156 FT_UInt glyph_index, | |
157 FT_Pointer buffer, | |
158 FT_UInt buffer_max ) | |
159 { | |
160 FT_String* gname; | |
161 FT_Error error; | |
162 | |
163 | |
164 error = tt_face_get_ps_name( face, glyph_index, &gname ); | |
165 if ( !error ) | |
166 FT_STRCPYN( buffer, gname, buffer_max ); | |
167 | |
168 return error; | |
169 } | |
170 | |
171 | |
172 static FT_UInt | |
173 sfnt_get_name_index( TT_Face face, | |
174 FT_String* glyph_name ) | |
175 { | |
176 FT_Face root = &face->root; | |
177 | |
178 FT_UInt i, max_gid = FT_UINT_MAX; | |
179 | |
180 | |
181 if ( root->num_glyphs < 0 ) | |
182 return 0; | |
183 else if ( (FT_ULong)root->num_glyphs < FT_UINT_MAX ) | |
184 max_gid = (FT_UInt)root->num_glyphs; | |
185 else | |
186 FT_TRACE0(( "Ignore glyph names for invalid GID 0x%08x - 0x%08x\n", | |
187 FT_UINT_MAX, root->num_glyphs )); | |
188 | |
189 for ( i = 0; i < max_gid; i++ ) | |
190 { | |
191 FT_String* gname; | |
192 FT_Error error = tt_face_get_ps_name( face, i, &gname ); | |
193 | |
194 | |
195 if ( error ) | |
196 continue; | |
197 | |
198 if ( !ft_strcmp( glyph_name, gname ) ) | |
199 return i; | |
200 } | |
201 | |
202 return 0; | |
203 } | |
204 | |
205 | |
206 FT_DEFINE_SERVICE_GLYPHDICTREC( | |
207 sfnt_service_glyph_dict, | |
208 (FT_GlyphDict_GetNameFunc) sfnt_get_glyph_name, | |
209 (FT_GlyphDict_NameIndexFunc)sfnt_get_name_index ) | |
210 | |
211 | |
212 #endif /* TT_CONFIG_OPTION_POSTSCRIPT_NAMES */ | |
213 | |
214 | |
215 /* | |
216 * POSTSCRIPT NAME SERVICE | |
217 * | |
218 */ | |
219 | |
220 static const char* | |
221 sfnt_get_ps_name( TT_Face face ) | |
222 { | |
223 FT_Int n, found_win, found_apple; | |
224 const char* result = NULL; | |
225 | |
226 | |
227 /* shouldn't happen, but just in case to avoid memory leaks */ | |
228 if ( face->postscript_name ) | |
229 return face->postscript_name; | |
230 | |
231 /* scan the name table to see whether we have a Postscript name here, */ | |
232 /* either in Macintosh or Windows platform encodings */ | |
233 found_win = -1; | |
234 found_apple = -1; | |
235 | |
236 for ( n = 0; n < face->num_names; n++ ) | |
237 { | |
238 TT_NameEntryRec* name = face->name_table.names + n; | |
239 | |
240 | |
241 if ( name->nameID == 6 && name->stringLength > 0 ) | |
242 { | |
243 if ( name->platformID == 3 && | |
244 name->encodingID == 1 && | |
245 name->languageID == 0x409 ) | |
246 found_win = n; | |
247 | |
248 if ( name->platformID == 1 && | |
249 name->encodingID == 0 && | |
250 name->languageID == 0 ) | |
251 found_apple = n; | |
252 } | |
253 } | |
254 | |
255 if ( found_win != -1 ) | |
256 { | |
257 FT_Memory memory = face->root.memory; | |
258 TT_NameEntryRec* name = face->name_table.names + found_win; | |
259 FT_UInt len = name->stringLength / 2; | |
260 FT_Error error = FT_Err_Ok; | |
261 | |
262 FT_UNUSED( error ); | |
263 | |
264 | |
265 if ( !FT_ALLOC( result, name->stringLength + 1 ) ) | |
266 { | |
267 FT_Stream stream = face->name_table.stream; | |
268 FT_String* r = (FT_String*)result; | |
269 FT_Byte* p = (FT_Byte*)name->string; | |
270 | |
271 | |
272 if ( FT_STREAM_SEEK( name->stringOffset ) || | |
273 FT_FRAME_ENTER( name->stringLength ) ) | |
274 { | |
275 FT_FREE( result ); | |
276 name->stringLength = 0; | |
277 name->stringOffset = 0; | |
278 FT_FREE( name->string ); | |
279 | |
280 goto Exit; | |
281 } | |
282 | |
283 p = (FT_Byte*)stream->cursor; | |
284 | |
285 for ( ; len > 0; len--, p += 2 ) | |
286 { | |
287 if ( p[0] == 0 && p[1] >= 32 && p[1] < 128 ) | |
288 *r++ = p[1]; | |
289 } | |
290 *r = '\0'; | |
291 | |
292 FT_FRAME_EXIT(); | |
293 } | |
294 goto Exit; | |
295 } | |
296 | |
297 if ( found_apple != -1 ) | |
298 { | |
299 FT_Memory memory = face->root.memory; | |
300 TT_NameEntryRec* name = face->name_table.names + found_apple; | |
301 FT_UInt len = name->stringLength; | |
302 FT_Error error = FT_Err_Ok; | |
303 | |
304 FT_UNUSED( error ); | |
305 | |
306 | |
307 if ( !FT_ALLOC( result, len + 1 ) ) | |
308 { | |
309 FT_Stream stream = face->name_table.stream; | |
310 | |
311 | |
312 if ( FT_STREAM_SEEK( name->stringOffset ) || | |
313 FT_STREAM_READ( result, len ) ) | |
314 { | |
315 name->stringOffset = 0; | |
316 name->stringLength = 0; | |
317 FT_FREE( name->string ); | |
318 FT_FREE( result ); | |
319 goto Exit; | |
320 } | |
321 ((char*)result)[len] = '\0'; | |
322 } | |
323 } | |
324 | |
325 Exit: | |
326 face->postscript_name = result; | |
327 return result; | |
328 } | |
329 | |
330 | |
331 FT_DEFINE_SERVICE_PSFONTNAMEREC( | |
332 sfnt_service_ps_name, | |
333 (FT_PsName_GetFunc)sfnt_get_ps_name ) | |
334 | |
335 | |
336 /* | |
337 * TT CMAP INFO | |
338 */ | |
339 FT_DEFINE_SERVICE_TTCMAPSREC( | |
340 tt_service_get_cmap_info, | |
341 (TT_CMap_Info_GetFunc)tt_get_cmap_info ) | |
342 | |
343 | |
344 #ifdef TT_CONFIG_OPTION_BDF | |
345 | |
346 static FT_Error | |
347 sfnt_get_charset_id( TT_Face face, | |
348 const char* *acharset_encoding, | |
349 const char* *acharset_registry ) | |
350 { | |
351 BDF_PropertyRec encoding, registry; | |
352 FT_Error error; | |
353 | |
354 | |
355 /* XXX: I don't know whether this is correct, since | |
356 * tt_face_find_bdf_prop only returns something correct if we have | |
357 * previously selected a size that is listed in the BDF table. | |
358 * Should we change the BDF table format to include single offsets | |
359 * for `CHARSET_REGISTRY' and `CHARSET_ENCODING'? | |
360 */ | |
361 error = tt_face_find_bdf_prop( face, "CHARSET_REGISTRY", ®istry ); | |
362 if ( !error ) | |
363 { | |
364 error = tt_face_find_bdf_prop( face, "CHARSET_ENCODING", &encoding ); | |
365 if ( !error ) | |
366 { | |
367 if ( registry.type == BDF_PROPERTY_TYPE_ATOM && | |
368 encoding.type == BDF_PROPERTY_TYPE_ATOM ) | |
369 { | |
370 *acharset_encoding = encoding.u.atom; | |
371 *acharset_registry = registry.u.atom; | |
372 } | |
373 else | |
374 error = FT_THROW( Invalid_Argument ); | |
375 } | |
376 } | |
377 | |
378 return error; | |
379 } | |
380 | |
381 | |
382 FT_DEFINE_SERVICE_BDFRec( | |
383 sfnt_service_bdf, | |
384 (FT_BDF_GetCharsetIdFunc)sfnt_get_charset_id, | |
385 (FT_BDF_GetPropertyFunc) tt_face_find_bdf_prop ) | |
386 | |
387 | |
388 #endif /* TT_CONFIG_OPTION_BDF */ | |
389 | |
390 | |
391 /* | |
392 * SERVICE LIST | |
393 */ | |
394 | |
395 #if defined TT_CONFIG_OPTION_POSTSCRIPT_NAMES && defined TT_CONFIG_OPTION_BDF | |
396 FT_DEFINE_SERVICEDESCREC5( | |
397 sfnt_services, | |
398 FT_SERVICE_ID_SFNT_TABLE, &SFNT_SERVICE_SFNT_TABLE_GET, | |
399 FT_SERVICE_ID_POSTSCRIPT_FONT_NAME, &SFNT_SERVICE_PS_NAME_GET, | |
400 FT_SERVICE_ID_GLYPH_DICT, &SFNT_SERVICE_GLYPH_DICT_GET, | |
401 FT_SERVICE_ID_BDF, &SFNT_SERVICE_BDF_GET, | |
402 FT_SERVICE_ID_TT_CMAP, &TT_SERVICE_CMAP_INFO_GET ) | |
403 #elif defined TT_CONFIG_OPTION_POSTSCRIPT_NAMES | |
404 FT_DEFINE_SERVICEDESCREC4( | |
405 sfnt_services, | |
406 FT_SERVICE_ID_SFNT_TABLE, &SFNT_SERVICE_SFNT_TABLE_GET, | |
407 FT_SERVICE_ID_POSTSCRIPT_FONT_NAME, &SFNT_SERVICE_PS_NAME_GET, | |
408 FT_SERVICE_ID_GLYPH_DICT, &SFNT_SERVICE_GLYPH_DICT_GET, | |
409 FT_SERVICE_ID_TT_CMAP, &TT_SERVICE_CMAP_INFO_GET ) | |
410 #elif defined TT_CONFIG_OPTION_BDF | |
411 FT_DEFINE_SERVICEDESCREC4( | |
412 sfnt_services, | |
413 FT_SERVICE_ID_SFNT_TABLE, &SFNT_SERVICE_SFNT_TABLE_GET, | |
414 FT_SERVICE_ID_POSTSCRIPT_FONT_NAME, &SFNT_SERVICE_PS_NAME_GET, | |
415 FT_SERVICE_ID_BDF, &SFNT_SERVICE_BDF_GET, | |
416 FT_SERVICE_ID_TT_CMAP, &TT_SERVICE_CMAP_INFO_GET ) | |
417 #else | |
418 FT_DEFINE_SERVICEDESCREC3( | |
419 sfnt_services, | |
420 FT_SERVICE_ID_SFNT_TABLE, &SFNT_SERVICE_SFNT_TABLE_GET, | |
421 FT_SERVICE_ID_POSTSCRIPT_FONT_NAME, &SFNT_SERVICE_PS_NAME_GET, | |
422 FT_SERVICE_ID_TT_CMAP, &TT_SERVICE_CMAP_INFO_GET ) | |
423 #endif | |
424 | |
425 | |
426 FT_CALLBACK_DEF( FT_Module_Interface ) | |
427 sfnt_get_interface( FT_Module module, | |
428 const char* module_interface ) | |
429 { | |
430 /* SFNT_SERVICES_GET derefers `library' in PIC mode */ | |
431 #ifdef FT_CONFIG_OPTION_PIC | |
432 FT_Library library; | |
433 | |
434 | |
435 if ( !module ) | |
436 return NULL; | |
437 library = module->library; | |
438 if ( !library ) | |
439 return NULL; | |
440 #else | |
441 FT_UNUSED( module ); | |
442 #endif | |
443 | |
444 return ft_service_list_lookup( SFNT_SERVICES_GET, module_interface ); | |
445 } | |
446 | |
447 | |
448 #ifdef TT_CONFIG_OPTION_EMBEDDED_BITMAPS | |
449 #define PUT_EMBEDDED_BITMAPS( a ) a | |
450 #else | |
451 #define PUT_EMBEDDED_BITMAPS( a ) NULL | |
452 #endif | |
453 | |
454 #ifdef TT_CONFIG_OPTION_POSTSCRIPT_NAMES | |
455 #define PUT_PS_NAMES( a ) a | |
456 #else | |
457 #define PUT_PS_NAMES( a ) NULL | |
458 #endif | |
459 | |
460 FT_DEFINE_SFNT_INTERFACE( | |
461 sfnt_interface, | |
462 tt_face_goto_table, | |
463 | |
464 sfnt_init_face, | |
465 sfnt_load_face, | |
466 sfnt_done_face, | |
467 sfnt_get_interface, | |
468 | |
469 tt_face_load_any, | |
470 | |
471 tt_face_load_head, | |
472 tt_face_load_hhea, | |
473 tt_face_load_cmap, | |
474 tt_face_load_maxp, | |
475 tt_face_load_os2, | |
476 tt_face_load_post, | |
477 | |
478 tt_face_load_name, | |
479 tt_face_free_name, | |
480 | |
481 tt_face_load_kern, | |
482 tt_face_load_gasp, | |
483 tt_face_load_pclt, | |
484 | |
485 /* see `ttload.h' */ | |
486 PUT_EMBEDDED_BITMAPS( tt_face_load_bhed ), | |
487 | |
488 PUT_EMBEDDED_BITMAPS( tt_face_load_sbit_image ), | |
489 | |
490 /* see `ttpost.h' */ | |
491 PUT_PS_NAMES( tt_face_get_ps_name ), | |
492 PUT_PS_NAMES( tt_face_free_ps_names ), | |
493 | |
494 /* since version 2.1.8 */ | |
495 tt_face_get_kerning, | |
496 | |
497 /* since version 2.2 */ | |
498 tt_face_load_font_dir, | |
499 tt_face_load_hmtx, | |
500 | |
501 /* see `ttsbit.h' and `sfnt.h' */ | |
502 PUT_EMBEDDED_BITMAPS( tt_face_load_eblc ), | |
503 PUT_EMBEDDED_BITMAPS( tt_face_free_eblc ), | |
504 | |
505 PUT_EMBEDDED_BITMAPS( tt_face_set_sbit_strike ), | |
506 PUT_EMBEDDED_BITMAPS( tt_face_load_strike_metrics ), | |
507 | |
508 tt_face_get_metrics | |
509 ) | |
510 | |
511 | |
512 FT_DEFINE_MODULE( | |
513 sfnt_module_class, | |
514 | |
515 0, /* not a font driver or renderer */ | |
516 sizeof ( FT_ModuleRec ), | |
517 | |
518 "sfnt", /* driver name */ | |
519 0x10000L, /* driver version 1.0 */ | |
520 0x20000L, /* driver requires FreeType 2.0 or higher */ | |
521 | |
522 (const void*)&SFNT_INTERFACE_GET, /* module specific interface */ | |
523 | |
524 (FT_Module_Constructor)0, | |
525 (FT_Module_Destructor) 0, | |
526 (FT_Module_Requester) sfnt_get_interface ) | |
527 | |
528 | |
529 /* END */ | |
OLD | NEW |