projects / reactos.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
[FREETYPE] Update to v2.7.0. CORE-11639
[reactos.git] / reactos / sdk / lib / 3rdparty / freetype / src / sfnt / ttload.c
1 /***************************************************************************/
2 /* */
3 /* ttload.c */
4 /* */
5 /* Load the basic TrueType tables, i.e., tables that can be either in */
6 /* TTF or OTF fonts (body). */
7 /* */
8 /* Copyright 1996-2016 by */
9 /* David Turner, Robert Wilhelm, and Werner Lemberg. */
10 /* */
11 /* This file is part of the FreeType project, and may only be used, */
12 /* modified, and distributed under the terms of the FreeType project */
13 /* license, LICENSE.TXT. By continuing to use, modify, or distribute */
14 /* this file you indicate that you have read the license and */
15 /* understand and accept it fully. */
16 /* */
17 /***************************************************************************/
18
19
20 #include <ft2build.h>
21 #include FT_INTERNAL_DEBUG_H
22 #include FT_INTERNAL_STREAM_H
23 #include FT_TRUETYPE_TAGS_H
24 #include "ttload.h"
25
26 #include "sferrors.h"
27
28
29 /*************************************************************************/
30 /* */
31 /* The macro FT_COMPONENT is used in trace mode. It is an implicit */
32 /* parameter of the FT_TRACE() and FT_ERROR() macros, used to print/log */
33 /* messages during execution. */
34 /* */
35 #undef FT_COMPONENT
36 #define FT_COMPONENT trace_ttload
37
38
39 /*************************************************************************/
40 /* */
41 /* <Function> */
42 /* tt_face_lookup_table */
43 /* */
44 /* <Description> */
45 /* Looks for a TrueType table by name. */
46 /* */
47 /* <Input> */
48 /* face :: A face object handle. */
49 /* */
50 /* tag :: The searched tag. */
51 /* */
52 /* <Return> */
53 /* A pointer to the table directory entry. 0 if not found. */
54 /* */
55 FT_LOCAL_DEF( TT_Table )
56 tt_face_lookup_table( TT_Face face,
57 FT_ULong tag )
58 {
59 TT_Table entry;
60 TT_Table limit;
61 #ifdef FT_DEBUG_LEVEL_TRACE
62 FT_Bool zero_length = FALSE;
63 #endif
64
65
66 FT_TRACE4(( "tt_face_lookup_table: %08p, `%c%c%c%c' -- ",
67 face,
68 (FT_Char)( tag >> 24 ),
69 (FT_Char)( tag >> 16 ),
70 (FT_Char)( tag >> 8 ),
71 (FT_Char)( tag ) ));
72
73 entry = face->dir_tables;
74 limit = entry + face->num_tables;
75
76 for ( ; entry < limit; entry++ )
77 {
78 /* For compatibility with Windows, we consider */
79 /* zero-length tables the same as missing tables. */
80 if ( entry->Tag == tag )
81 {
82 if ( entry->Length != 0 )
83 {
84 FT_TRACE4(( "found table.\n" ));
85 return entry;
86 }
87 #ifdef FT_DEBUG_LEVEL_TRACE
88 zero_length = TRUE;
89 #endif
90 }
91 }
92
93 #ifdef FT_DEBUG_LEVEL_TRACE
94 if ( zero_length )
95 FT_TRACE4(( "ignoring empty table\n" ));
96 else
97 FT_TRACE4(( "could not find table\n" ));
98 #endif
99
100 return NULL;
101 }
102
103
104 /*************************************************************************/
105 /* */
106 /* <Function> */
107 /* tt_face_goto_table */
108 /* */
109 /* <Description> */
110 /* Looks for a TrueType table by name, then seek a stream to it. */
111 /* */
112 /* <Input> */
113 /* face :: A face object handle. */
114 /* */
115 /* tag :: The searched tag. */
116 /* */
117 /* stream :: The stream to seek when the table is found. */
118 /* */
119 /* <Output> */
120 /* length :: The length of the table if found, undefined otherwise. */
121 /* */
122 /* <Return> */
123 /* FreeType error code. 0 means success. */
124 /* */
125 FT_LOCAL_DEF( FT_Error )
126 tt_face_goto_table( TT_Face face,
127 FT_ULong tag,
128 FT_Stream stream,
129 FT_ULong* length )
130 {
131 TT_Table table;
132 FT_Error error;
133
134
135 table = tt_face_lookup_table( face, tag );
136 if ( table )
137 {
138 if ( length )
139 *length = table->Length;
140
141 if ( FT_STREAM_SEEK( table->Offset ) )
142 goto Exit;
143 }
144 else
145 error = FT_THROW( Table_Missing );
146
147 Exit:
148 return error;
149 }
150
151
152 /* Here, we */
153 /* */
154 /* - check that `num_tables' is valid (and adjust it if necessary); */
155 /* also return the number of valid table entries */
156 /* */
157 /* - look for a `head' table, check its size, and parse it to check */
158 /* whether its `magic' field is correctly set */
159 /* */
160 /* - errors (except errors returned by stream handling) */
161 /* */
162 /* SFNT_Err_Unknown_File_Format: */
163 /* no table is defined in directory, it is not sfnt-wrapped */
164 /* data */
165 /* SFNT_Err_Table_Missing: */
166 /* table directory is valid, but essential tables */
167 /* (head/bhed/SING) are missing */
168 /* */
169 static FT_Error
170 check_table_dir( SFNT_Header sfnt,
171 FT_Stream stream,
172 FT_UShort* valid )
173 {
174 FT_Error error;
175 FT_UShort nn, valid_entries = 0;
176 FT_UInt has_head = 0, has_sing = 0, has_meta = 0;
177 FT_ULong offset = sfnt->offset + 12;
178
179 static const FT_Frame_Field table_dir_entry_fields[] =
180 {
181 #undef FT_STRUCTURE
182 #define FT_STRUCTURE TT_TableRec
183
184 FT_FRAME_START( 16 ),
185 FT_FRAME_ULONG( Tag ),
186 FT_FRAME_ULONG( CheckSum ),
187 FT_FRAME_ULONG( Offset ),
188 FT_FRAME_ULONG( Length ),
189 FT_FRAME_END
190 };
191
192
193 if ( FT_STREAM_SEEK( offset ) )
194 goto Exit;
195
196 for ( nn = 0; nn < sfnt->num_tables; nn++ )
197 {
198 TT_TableRec table;
199
200
201 if ( FT_STREAM_READ_FIELDS( table_dir_entry_fields, &table ) )
202 {
203 nn--;
204 FT_TRACE2(( "check_table_dir:"
205 " can read only %d table%s in font (instead of %d)\n",
206 nn, nn == 1 ? "" : "s", sfnt->num_tables ));
207 sfnt->num_tables = nn;
208 break;
209 }
210
211 /* we ignore invalid tables */
212
213 if ( table.Offset > stream->size )
214 {
215 FT_TRACE2(( "check_table_dir: table entry %d invalid\n", nn ));
216 continue;
217 }
218 else if ( table.Length > stream->size - table.Offset )
219 {
220 /* Some tables have such a simple structure that clipping its */
221 /* contents is harmless. This also makes FreeType less sensitive */
222 /* to invalid table lengths (which programs like Acroread seem to */
223 /* ignore in general). */
224
225 if ( table.Tag == TTAG_hmtx ||
226 table.Tag == TTAG_vmtx )
227 valid_entries++;
228 else
229 {
230 FT_TRACE2(( "check_table_dir: table entry %d invalid\n", nn ));
231 continue;
232 }
233 }
234 else
235 valid_entries++;
236
237 if ( table.Tag == TTAG_head || table.Tag == TTAG_bhed )
238 {
239 FT_UInt32 magic;
240
241
242 #ifndef TT_CONFIG_OPTION_EMBEDDED_BITMAPS
243 if ( table.Tag == TTAG_head )
244 #endif
245 has_head = 1;
246
247 /*
248 * The table length should be 0x36, but certain font tools make it
249 * 0x38, so we will just check that it is greater.
250 *
251 * Note that according to the specification, the table must be
252 * padded to 32-bit lengths, but this doesn't apply to the value of
253 * its `Length' field!
254 *
255 */
256 if ( table.Length < 0x36 )
257 {
258 FT_TRACE2(( "check_table_dir:"
259 " `head' or `bhed' table too small\n" ));
260 error = FT_THROW( Table_Missing );
261 goto Exit;
262 }
263
264 if ( FT_STREAM_SEEK( table.Offset + 12 ) ||
265 FT_READ_ULONG( magic ) )
266 goto Exit;
267
268 if ( magic != 0x5F0F3CF5UL )
269 FT_TRACE2(( "check_table_dir:"
270 " invalid magic number in `head' or `bhed' table\n"));
271
272 if ( FT_STREAM_SEEK( offset + ( nn + 1 ) * 16 ) )
273 goto Exit;
274 }
275 else if ( table.Tag == TTAG_SING )
276 has_sing = 1;
277 else if ( table.Tag == TTAG_META )
278 has_meta = 1;
279 }
280
281 *valid = valid_entries;
282
283 if ( !valid_entries )
284 {
285 FT_TRACE2(( "check_table_dir: no valid tables found\n" ));
286 error = FT_THROW( Unknown_File_Format );
287 goto Exit;
288 }
289
290 /* if `sing' and `meta' tables are present, there is no `head' table */
291 if ( has_head || ( has_sing && has_meta ) )
292 {
293 error = FT_Err_Ok;
294 goto Exit;
295 }
296 else
297 {
298 FT_TRACE2(( "check_table_dir:" ));
299 #ifdef TT_CONFIG_OPTION_EMBEDDED_BITMAPS
300 FT_TRACE2(( " neither `head', `bhed', nor `sing' table found\n" ));
301 #else
302 FT_TRACE2(( " neither `head' nor `sing' table found\n" ));
303 #endif
304 error = FT_THROW( Table_Missing );
305 }
306
307 Exit:
308 return error;
309 }
310
311
312 /*************************************************************************/
313 /* */
314 /* <Function> */
315 /* tt_face_load_font_dir */
316 /* */
317 /* <Description> */
318 /* Loads the header of a SFNT font file. */
319 /* */
320 /* <Input> */
321 /* face :: A handle to the target face object. */
322 /* */
323 /* stream :: The input stream. */
324 /* */
325 /* <Output> */
326 /* sfnt :: The SFNT header. */
327 /* */
328 /* <Return> */
329 /* FreeType error code. 0 means success. */
330 /* */
331 /* <Note> */
332 /* The stream cursor must be at the beginning of the font directory. */
333 /* */
334 FT_LOCAL_DEF( FT_Error )
335 tt_face_load_font_dir( TT_Face face,
336 FT_Stream stream )
337 {
338 SFNT_HeaderRec sfnt;
339 FT_Error error;
340 FT_Memory memory = stream->memory;
341 FT_UShort nn, valid_entries;
342
343 static const FT_Frame_Field offset_table_fields[] =
344 {
345 #undef FT_STRUCTURE
346 #define FT_STRUCTURE SFNT_HeaderRec
347
348 FT_FRAME_START( 8 ),
349 FT_FRAME_USHORT( num_tables ),
350 FT_FRAME_USHORT( search_range ),
351 FT_FRAME_USHORT( entry_selector ),
352 FT_FRAME_USHORT( range_shift ),
353 FT_FRAME_END
354 };
355
356
357 FT_TRACE2(( "tt_face_load_font_dir: %08p\n", face ));
358
359 /* read the offset table */
360
361 sfnt.offset = FT_STREAM_POS();
362
363 if ( FT_READ_ULONG( sfnt.format_tag ) ||
364 FT_STREAM_READ_FIELDS( offset_table_fields, &sfnt ) )
365 goto Exit;
366
367 /* many fonts don't have these fields set correctly */
368 #if 0
369 if ( sfnt.search_range != 1 << ( sfnt.entry_selector + 4 ) ||
370 sfnt.search_range + sfnt.range_shift != sfnt.num_tables << 4 )
371 return FT_THROW( Unknown_File_Format );
372 #endif
373
374 /* load the table directory */
375
376 FT_TRACE2(( "-- Number of tables: %10u\n", sfnt.num_tables ));
377 FT_TRACE2(( "-- Format version: 0x%08lx\n", sfnt.format_tag ));
378
379 if ( sfnt.format_tag != TTAG_OTTO )
380 {
381 /* check first */
382 error = check_table_dir( &sfnt, stream, &valid_entries );
383 if ( error )
384 {
385 FT_TRACE2(( "tt_face_load_font_dir:"
386 " invalid table directory for TrueType\n" ));
387 goto Exit;
388 }
389 }
390 else
391 valid_entries = sfnt.num_tables;
392
393 face->num_tables = valid_entries;
394 face->format_tag = sfnt.format_tag;
395
396 if ( FT_QNEW_ARRAY( face->dir_tables, face->num_tables ) )
397 goto Exit;
398
399 if ( FT_STREAM_SEEK( sfnt.offset + 12 ) ||
400 FT_FRAME_ENTER( sfnt.num_tables * 16L ) )
401 goto Exit;
402
403 FT_TRACE2(( "\n"
404 " tag offset length checksum\n"
405 " ----------------------------------\n" ));
406
407 valid_entries = 0;
408 for ( nn = 0; nn < sfnt.num_tables; nn++ )
409 {
410 TT_TableRec entry;
411 FT_UShort i;
412 FT_Bool duplicate;
413
414
415 entry.Tag = FT_GET_TAG4();
416 entry.CheckSum = FT_GET_ULONG();
417 entry.Offset = FT_GET_ULONG();
418 entry.Length = FT_GET_ULONG();
419
420 /* ignore invalid tables that can't be sanitized */
421
422 if ( entry.Offset > stream->size )
423 continue;
424 else if ( entry.Length > stream->size - entry.Offset )
425 {
426 if ( entry.Tag == TTAG_hmtx ||
427 entry.Tag == TTAG_vmtx )
428 {
429 #ifdef FT_DEBUG_LEVEL_TRACE
430 FT_ULong old_length = entry.Length;
431 #endif
432
433
434 /* make metrics table length a multiple of 4 */
435 entry.Length = ( stream->size - entry.Offset ) & ~3U;
436
437 FT_TRACE2(( " %c%c%c%c %08lx %08lx %08lx"
438 " (sanitized; original length %08lx)",
439 (FT_Char)( entry.Tag >> 24 ),
440 (FT_Char)( entry.Tag >> 16 ),
441 (FT_Char)( entry.Tag >> 8 ),
442 (FT_Char)( entry.Tag ),
443 entry.Offset,
444 entry.Length,
445 entry.CheckSum,
446 old_length ));
447 }
448 else
449 continue;
450 }
451 #ifdef FT_DEBUG_LEVEL_TRACE
452 else
453 FT_TRACE2(( " %c%c%c%c %08lx %08lx %08lx",
454 (FT_Char)( entry.Tag >> 24 ),
455 (FT_Char)( entry.Tag >> 16 ),
456 (FT_Char)( entry.Tag >> 8 ),
457 (FT_Char)( entry.Tag ),
458 entry.Offset,
459 entry.Length,
460 entry.CheckSum ));
461 #endif
462
463 /* ignore duplicate tables – the first one wins */
464 duplicate = 0;
465 for ( i = 0; i < valid_entries; i++ )
466 {
467 if ( face->dir_tables[i].Tag == entry.Tag )
468 {
469 duplicate = 1;
470 break;
471 }
472 }
473 if ( duplicate )
474 {
475 FT_TRACE2(( " (duplicate, ignored)\n" ));
476 continue;
477 }
478 else
479 {
480 FT_TRACE2(( "\n" ));
481
482 /* we finally have a valid entry */
483 face->dir_tables[valid_entries++] = entry;
484 }
485 }
486
487 /* final adjustment to number of tables */
488 face->num_tables = valid_entries;
489
490 FT_FRAME_EXIT();
491
492 FT_TRACE2(( "table directory loaded\n\n" ));
493
494 Exit:
495 return error;
496 }
497
498
499 /*************************************************************************/
500 /* */
501 /* <Function> */
502 /* tt_face_load_any */
503 /* */
504 /* <Description> */
505 /* Loads any font table into client memory. */
506 /* */
507 /* <Input> */
508 /* face :: The face object to look for. */
509 /* */
510 /* tag :: The tag of table to load. Use the value 0 if you want */
511 /* to access the whole font file, else set this parameter */
512 /* to a valid TrueType table tag that you can forge with */
513 /* the MAKE_TT_TAG macro. */
514 /* */
515 /* offset :: The starting offset in the table (or the file if */
516 /* tag == 0). */
517 /* */
518 /* length :: The address of the decision variable: */
519 /* */
520 /* If length == NULL: */
521 /* Loads the whole table. Returns an error if */
522 /* `offset' == 0! */
523 /* */
524 /* If *length == 0: */
525 /* Exits immediately; returning the length of the given */
526 /* table or of the font file, depending on the value of */
527 /* `tag'. */
528 /* */
529 /* If *length != 0: */
530 /* Loads the next `length' bytes of table or font, */
531 /* starting at offset `offset' (in table or font too). */
532 /* */
533 /* <Output> */
534 /* buffer :: The address of target buffer. */
535 /* */
536 /* <Return> */
537 /* FreeType error code. 0 means success. */
538 /* */
539 FT_LOCAL_DEF( FT_Error )
540 tt_face_load_any( TT_Face face,
541 FT_ULong tag,
542 FT_Long offset,
543 FT_Byte* buffer,
544 FT_ULong* length )
545 {
546 FT_Error error;
547 FT_Stream stream;
548 TT_Table table;
549 FT_ULong size;
550
551
552 if ( tag != 0 )
553 {
554 /* look for tag in font directory */
555 table = tt_face_lookup_table( face, tag );
556 if ( !table )
557 {
558 error = FT_THROW( Table_Missing );
559 goto Exit;
560 }
561
562 offset += table->Offset;
563 size = table->Length;
564 }
565 else
566 /* tag == 0 -- the user wants to access the font file directly */
567 size = face->root.stream->size;
568
569 if ( length && *length == 0 )
570 {
571 *length = size;
572
573 return FT_Err_Ok;
574 }
575
576 if ( length )
577 size = *length;
578
579 stream = face->root.stream;
580 /* the `if' is syntactic sugar for picky compilers */
581 if ( FT_STREAM_READ_AT( offset, buffer, size ) )
582 goto Exit;
583
584 Exit:
585 return error;
586 }
587
588
589 /*************************************************************************/
590 /* */
591 /* <Function> */
592 /* tt_face_load_generic_header */
593 /* */
594 /* <Description> */
595 /* Loads the TrueType table `head' or `bhed'. */
596 /* */
597 /* <Input> */
598 /* face :: A handle to the target face object. */
599 /* */
600 /* stream :: The input stream. */
601 /* */
602 /* <Return> */
603 /* FreeType error code. 0 means success. */
604 /* */
605 static FT_Error
606 tt_face_load_generic_header( TT_Face face,
607 FT_Stream stream,
608 FT_ULong tag )
609 {
610 FT_Error error;
611 TT_Header* header;
612
613 static const FT_Frame_Field header_fields[] =
614 {
615 #undef FT_STRUCTURE
616 #define FT_STRUCTURE TT_Header
617
618 FT_FRAME_START( 54 ),
619 FT_FRAME_ULONG ( Table_Version ),
620 FT_FRAME_ULONG ( Font_Revision ),
621 FT_FRAME_LONG ( CheckSum_Adjust ),
622 FT_FRAME_LONG ( Magic_Number ),
623 FT_FRAME_USHORT( Flags ),
624 FT_FRAME_USHORT( Units_Per_EM ),
625 FT_FRAME_LONG ( Created[0] ),
626 FT_FRAME_LONG ( Created[1] ),
627 FT_FRAME_LONG ( Modified[0] ),
628 FT_FRAME_LONG ( Modified[1] ),
629 FT_FRAME_SHORT ( xMin ),
630 FT_FRAME_SHORT ( yMin ),
631 FT_FRAME_SHORT ( xMax ),
632 FT_FRAME_SHORT ( yMax ),
633 FT_FRAME_USHORT( Mac_Style ),
634 FT_FRAME_USHORT( Lowest_Rec_PPEM ),
635 FT_FRAME_SHORT ( Font_Direction ),
636 FT_FRAME_SHORT ( Index_To_Loc_Format ),
637 FT_FRAME_SHORT ( Glyph_Data_Format ),
638 FT_FRAME_END
639 };
640
641
642 error = face->goto_table( face, tag, stream, 0 );
643 if ( error )
644 goto Exit;
645
646 header = &face->header;
647
648 if ( FT_STREAM_READ_FIELDS( header_fields, header ) )
649 goto Exit;
650
651 FT_TRACE3(( "Units per EM: %4u\n", header->Units_Per_EM ));
652 FT_TRACE3(( "IndexToLoc: %4d\n", header->Index_To_Loc_Format ));
653
654 Exit:
655 return error;
656 }
657
658
659 FT_LOCAL_DEF( FT_Error )
660 tt_face_load_head( TT_Face face,
661 FT_Stream stream )
662 {
663 return tt_face_load_generic_header( face, stream, TTAG_head );
664 }
665
666
667 #ifdef TT_CONFIG_OPTION_EMBEDDED_BITMAPS
668
669 FT_LOCAL_DEF( FT_Error )
670 tt_face_load_bhed( TT_Face face,
671 FT_Stream stream )
672 {
673 return tt_face_load_generic_header( face, stream, TTAG_bhed );
674 }
675
676 #endif /* TT_CONFIG_OPTION_EMBEDDED_BITMAPS */
677
678
679 /*************************************************************************/
680 /* */
681 /* <Function> */
682 /* tt_face_load_max_profile */
683 /* */
684 /* <Description> */
685 /* Loads the maximum profile into a face object. */
686 /* */
687 /* <Input> */
688 /* face :: A handle to the target face object. */
689 /* */
690 /* stream :: The input stream. */
691 /* */
692 /* <Return> */
693 /* FreeType error code. 0 means success. */
694 /* */
695 FT_LOCAL_DEF( FT_Error )
696 tt_face_load_maxp( TT_Face face,
697 FT_Stream stream )
698 {
699 FT_Error error;
700 TT_MaxProfile* maxProfile = &face->max_profile;
701
702 static const FT_Frame_Field maxp_fields[] =
703 {
704 #undef FT_STRUCTURE
705 #define FT_STRUCTURE TT_MaxProfile
706
707 FT_FRAME_START( 6 ),
708 FT_FRAME_LONG ( version ),
709 FT_FRAME_USHORT( numGlyphs ),
710 FT_FRAME_END
711 };
712
713 static const FT_Frame_Field maxp_fields_extra[] =
714 {
715 FT_FRAME_START( 26 ),
716 FT_FRAME_USHORT( maxPoints ),
717 FT_FRAME_USHORT( maxContours ),
718 FT_FRAME_USHORT( maxCompositePoints ),
719 FT_FRAME_USHORT( maxCompositeContours ),
720 FT_FRAME_USHORT( maxZones ),
721 FT_FRAME_USHORT( maxTwilightPoints ),
722 FT_FRAME_USHORT( maxStorage ),
723 FT_FRAME_USHORT( maxFunctionDefs ),
724 FT_FRAME_USHORT( maxInstructionDefs ),
725 FT_FRAME_USHORT( maxStackElements ),
726 FT_FRAME_USHORT( maxSizeOfInstructions ),
727 FT_FRAME_USHORT( maxComponentElements ),
728 FT_FRAME_USHORT( maxComponentDepth ),
729 FT_FRAME_END
730 };
731
732
733 error = face->goto_table( face, TTAG_maxp, stream, 0 );
734 if ( error )
735 goto Exit;
736
737 if ( FT_STREAM_READ_FIELDS( maxp_fields, maxProfile ) )
738 goto Exit;
739
740 maxProfile->maxPoints = 0;
741 maxProfile->maxContours = 0;
742 maxProfile->maxCompositePoints = 0;
743 maxProfile->maxCompositeContours = 0;
744 maxProfile->maxZones = 0;
745 maxProfile->maxTwilightPoints = 0;
746 maxProfile->maxStorage = 0;
747 maxProfile->maxFunctionDefs = 0;
748 maxProfile->maxInstructionDefs = 0;
749 maxProfile->maxStackElements = 0;
750 maxProfile->maxSizeOfInstructions = 0;
751 maxProfile->maxComponentElements = 0;
752 maxProfile->maxComponentDepth = 0;
753
754 if ( maxProfile->version >= 0x10000L )
755 {
756 if ( FT_STREAM_READ_FIELDS( maxp_fields_extra, maxProfile ) )
757 goto Exit;
758
759 /* XXX: an adjustment that is necessary to load certain */
760 /* broken fonts like `Keystrokes MT' :-( */
761 /* */
762 /* We allocate 64 function entries by default when */
763 /* the maxFunctionDefs value is smaller. */
764
765 if ( maxProfile->maxFunctionDefs < 64 )
766 maxProfile->maxFunctionDefs = 64;
767
768 /* we add 4 phantom points later */
769 if ( maxProfile->maxTwilightPoints > ( 0xFFFFU - 4 ) )
770 {
771 FT_TRACE0(( "tt_face_load_maxp:"
772 " too much twilight points in `maxp' table;\n"
773 " "
774 " some glyphs might be rendered incorrectly\n" ));
775
776 maxProfile->maxTwilightPoints = 0xFFFFU - 4;
777 }
778 }
779
780 FT_TRACE3(( "numGlyphs: %u\n", maxProfile->numGlyphs ));
781
782 Exit:
783 return error;
784 }
785
786
787 /*************************************************************************/
788 /* */
789 /* <Function> */
790 /* tt_face_load_name */
791 /* */
792 /* <Description> */
793 /* Loads the name records. */
794 /* */
795 /* <Input> */
796 /* face :: A handle to the target face object. */
797 /* */
798 /* stream :: The input stream. */
799 /* */
800 /* <Return> */
801 /* FreeType error code. 0 means success. */
802 /* */
803 FT_LOCAL_DEF( FT_Error )
804 tt_face_load_name( TT_Face face,
805 FT_Stream stream )
806 {
807 FT_Error error;
808 FT_Memory memory = stream->memory;
809 FT_ULong table_pos, table_len;
810 FT_ULong storage_start, storage_limit;
811 FT_UInt count;
812 TT_NameTable table;
813
814 static const FT_Frame_Field name_table_fields[] =
815 {
816 #undef FT_STRUCTURE
817 #define FT_STRUCTURE TT_NameTableRec
818
819 FT_FRAME_START( 6 ),
820 FT_FRAME_USHORT( format ),
821 FT_FRAME_USHORT( numNameRecords ),
822 FT_FRAME_USHORT( storageOffset ),
823 FT_FRAME_END
824 };
825
826 static const FT_Frame_Field name_record_fields[] =
827 {
828 #undef FT_STRUCTURE
829 #define FT_STRUCTURE TT_NameEntryRec
830
831 /* no FT_FRAME_START */
832 FT_FRAME_USHORT( platformID ),
833 FT_FRAME_USHORT( encodingID ),
834 FT_FRAME_USHORT( languageID ),
835 FT_FRAME_USHORT( nameID ),
836 FT_FRAME_USHORT( stringLength ),
837 FT_FRAME_USHORT( stringOffset ),
838 FT_FRAME_END
839 };
840
841
842 table = &face->name_table;
843 table->stream = stream;
844
845 error = face->goto_table( face, TTAG_name, stream, &table_len );
846 if ( error )
847 goto Exit;
848
849 table_pos = FT_STREAM_POS();
850
851
852 if ( FT_STREAM_READ_FIELDS( name_table_fields, table ) )
853 goto Exit;
854
855 /* Some popular Asian fonts have an invalid `storageOffset' value */
856 /* (it should be at least "6 + 12*num_names"). However, the string */
857 /* offsets, computed as "storageOffset + entry->stringOffset", are */
858 /* valid pointers within the name table... */
859 /* */
860 /* We thus can't check `storageOffset' right now. */
861 /* */
862 storage_start = table_pos + 6 + 12*table->numNameRecords;
863 storage_limit = table_pos + table_len;
864
865 if ( storage_start > storage_limit )
866 {
867 FT_ERROR(( "tt_face_load_name: invalid `name' table\n" ));
868 error = FT_THROW( Name_Table_Missing );
869 goto Exit;
870 }
871
872 /* Allocate the array of name records. */
873 count = table->numNameRecords;
874 table->numNameRecords = 0;
875
876 if ( FT_NEW_ARRAY( table->names, count ) ||
877 FT_FRAME_ENTER( count * 12 ) )
878 goto Exit;
879
880 /* Load the name records and determine how much storage is needed */
881 /* to hold the strings themselves. */
882 {
883 TT_NameEntryRec* entry = table->names;
884
885
886 for ( ; count > 0; count-- )
887 {
888 if ( FT_STREAM_READ_FIELDS( name_record_fields, entry ) )
889 continue;
890
891 /* check that the name is not empty */
892 if ( entry->stringLength == 0 )
893 continue;
894
895 /* check that the name string is within the table */
896 entry->stringOffset += table_pos + table->storageOffset;
897 if ( entry->stringOffset < storage_start ||
898 entry->stringOffset + entry->stringLength > storage_limit )
899 {
900 /* invalid entry - ignore it */
901 entry->stringOffset = 0;
902 entry->stringLength = 0;
903 continue;
904 }
905
906 entry++;
907 }
908
909 table->numNameRecords = (FT_UInt)( entry - table->names );
910 }
911
912 FT_FRAME_EXIT();
913
914 /* everything went well, update face->num_names */
915 face->num_names = (FT_UShort) table->numNameRecords;
916
917 Exit:
918 return error;
919 }
920
921
922 /*************************************************************************/
923 /* */
924 /* <Function> */
925 /* tt_face_free_names */
926 /* */
927 /* <Description> */
928 /* Frees the name records. */
929 /* */
930 /* <Input> */
931 /* face :: A handle to the target face object. */
932 /* */
933 FT_LOCAL_DEF( void )
934 tt_face_free_name( TT_Face face )
935 {
936 FT_Memory memory = face->root.driver->root.memory;
937 TT_NameTable table = &face->name_table;
938 TT_NameEntry entry = table->names;
939 FT_UInt count = table->numNameRecords;
940
941
942 if ( table->names )
943 {
944 for ( ; count > 0; count--, entry++ )
945 {
946 FT_FREE( entry->string );
947 entry->stringLength = 0;
948 }
949
950 /* free strings table */
951 FT_FREE( table->names );
952 }
953
954 table->numNameRecords = 0;
955 table->format = 0;
956 table->storageOffset = 0;
957 }
958
959
960 /*************************************************************************/
961 /* */
962 /* <Function> */
963 /* tt_face_load_cmap */
964 /* */
965 /* <Description> */
966 /* Loads the cmap directory in a face object. The cmaps themselves */
967 /* are loaded on demand in the `ttcmap.c' module. */
968 /* */
969 /* <Input> */
970 /* face :: A handle to the target face object. */
971 /* */
972 /* stream :: A handle to the input stream. */
973 /* */
974 /* <Return> */
975 /* FreeType error code. 0 means success. */
976 /* */
977
978 FT_LOCAL_DEF( FT_Error )
979 tt_face_load_cmap( TT_Face face,
980 FT_Stream stream )
981 {
982 FT_Error error;
983
984
985 error = face->goto_table( face, TTAG_cmap, stream, &face->cmap_size );
986 if ( error )
987 goto Exit;
988
989 if ( FT_FRAME_EXTRACT( face->cmap_size, face->cmap_table ) )
990 face->cmap_size = 0;
991
992 Exit:
993 return error;
994 }
995
996
997
998 /*************************************************************************/
999 /* */
1000 /* <Function> */
1001 /* tt_face_load_os2 */
1002 /* */
1003 /* <Description> */
1004 /* Loads the OS2 table. */
1005 /* */
1006 /* <Input> */
1007 /* face :: A handle to the target face object. */
1008 /* */
1009 /* stream :: A handle to the input stream. */
1010 /* */
1011 /* <Return> */
1012 /* FreeType error code. 0 means success. */
1013 /* */
1014 FT_LOCAL_DEF( FT_Error )
1015 tt_face_load_os2( TT_Face face,
1016 FT_Stream stream )
1017 {
1018 FT_Error error;
1019 TT_OS2* os2;
1020
1021 static const FT_Frame_Field os2_fields[] =
1022 {
1023 #undef FT_STRUCTURE
1024 #define FT_STRUCTURE TT_OS2
1025
1026 FT_FRAME_START( 78 ),
1027 FT_FRAME_USHORT( version ),
1028 FT_FRAME_SHORT ( xAvgCharWidth ),
1029 FT_FRAME_USHORT( usWeightClass ),
1030 FT_FRAME_USHORT( usWidthClass ),
1031 FT_FRAME_SHORT ( fsType ),
1032 FT_FRAME_SHORT ( ySubscriptXSize ),
1033 FT_FRAME_SHORT ( ySubscriptYSize ),
1034 FT_FRAME_SHORT ( ySubscriptXOffset ),
1035 FT_FRAME_SHORT ( ySubscriptYOffset ),
1036 FT_FRAME_SHORT ( ySuperscriptXSize ),
1037 FT_FRAME_SHORT ( ySuperscriptYSize ),
1038 FT_FRAME_SHORT ( ySuperscriptXOffset ),
1039 FT_FRAME_SHORT ( ySuperscriptYOffset ),
1040 FT_FRAME_SHORT ( yStrikeoutSize ),
1041 FT_FRAME_SHORT ( yStrikeoutPosition ),
1042 FT_FRAME_SHORT ( sFamilyClass ),
1043 FT_FRAME_BYTE ( panose[0] ),
1044 FT_FRAME_BYTE ( panose[1] ),
1045 FT_FRAME_BYTE ( panose[2] ),
1046 FT_FRAME_BYTE ( panose[3] ),
1047 FT_FRAME_BYTE ( panose[4] ),
1048 FT_FRAME_BYTE ( panose[5] ),
1049 FT_FRAME_BYTE ( panose[6] ),
1050 FT_FRAME_BYTE ( panose[7] ),
1051 FT_FRAME_BYTE ( panose[8] ),
1052 FT_FRAME_BYTE ( panose[9] ),
1053 FT_FRAME_ULONG ( ulUnicodeRange1 ),
1054 FT_FRAME_ULONG ( ulUnicodeRange2 ),
1055 FT_FRAME_ULONG ( ulUnicodeRange3 ),
1056 FT_FRAME_ULONG ( ulUnicodeRange4 ),
1057 FT_FRAME_BYTE ( achVendID[0] ),
1058 FT_FRAME_BYTE ( achVendID[1] ),
1059 FT_FRAME_BYTE ( achVendID[2] ),
1060 FT_FRAME_BYTE ( achVendID[3] ),
1061
1062 FT_FRAME_USHORT( fsSelection ),
1063 FT_FRAME_USHORT( usFirstCharIndex ),
1064 FT_FRAME_USHORT( usLastCharIndex ),
1065 FT_FRAME_SHORT ( sTypoAscender ),
1066 FT_FRAME_SHORT ( sTypoDescender ),
1067 FT_FRAME_SHORT ( sTypoLineGap ),
1068 FT_FRAME_USHORT( usWinAscent ),
1069 FT_FRAME_USHORT( usWinDescent ),
1070 FT_FRAME_END
1071 };
1072
1073 /* `OS/2' version 1 and newer */
1074 static const FT_Frame_Field os2_fields_extra1[] =
1075 {
1076 FT_FRAME_START( 8 ),
1077 FT_FRAME_ULONG( ulCodePageRange1 ),
1078 FT_FRAME_ULONG( ulCodePageRange2 ),
1079 FT_FRAME_END
1080 };
1081
1082 /* `OS/2' version 2 and newer */
1083 static const FT_Frame_Field os2_fields_extra2[] =
1084 {
1085 FT_FRAME_START( 10 ),
1086 FT_FRAME_SHORT ( sxHeight ),
1087 FT_FRAME_SHORT ( sCapHeight ),
1088 FT_FRAME_USHORT( usDefaultChar ),
1089 FT_FRAME_USHORT( usBreakChar ),
1090 FT_FRAME_USHORT( usMaxContext ),
1091 FT_FRAME_END
1092 };
1093
1094 /* `OS/2' version 5 and newer */
1095 static const FT_Frame_Field os2_fields_extra5[] =
1096 {
1097 FT_FRAME_START( 4 ),
1098 FT_FRAME_USHORT( usLowerOpticalPointSize ),
1099 FT_FRAME_USHORT( usUpperOpticalPointSize ),
1100 FT_FRAME_END
1101 };
1102
1103
1104 /* We now support old Mac fonts where the OS/2 table doesn't */
1105 /* exist. Simply put, we set the `version' field to 0xFFFF */
1106 /* and test this value each time we need to access the table. */
1107 error = face->goto_table( face, TTAG_OS2, stream, 0 );
1108 if ( error )
1109 goto Exit;
1110
1111 os2 = &face->os2;
1112
1113 if ( FT_STREAM_READ_FIELDS( os2_fields, os2 ) )
1114 goto Exit;
1115
1116 os2->ulCodePageRange1 = 0;
1117 os2->ulCodePageRange2 = 0;
1118 os2->sxHeight = 0;
1119 os2->sCapHeight = 0;
1120 os2->usDefaultChar = 0;
1121 os2->usBreakChar = 0;
1122 os2->usMaxContext = 0;
1123 os2->usLowerOpticalPointSize = 0;
1124 os2->usUpperOpticalPointSize = 0xFFFF;
1125
1126 if ( os2->version >= 0x0001 )
1127 {
1128 /* only version 1 tables */
1129 if ( FT_STREAM_READ_FIELDS( os2_fields_extra1, os2 ) )
1130 goto Exit;
1131
1132 if ( os2->version >= 0x0002 )
1133 {
1134 /* only version 2 tables */
1135 if ( FT_STREAM_READ_FIELDS( os2_fields_extra2, os2 ) )
1136 goto Exit;
1137
1138 if ( os2->version >= 0x0005 )
1139 {
1140 /* only version 5 tables */
1141 if ( FT_STREAM_READ_FIELDS( os2_fields_extra5, os2 ) )
1142 goto Exit;
1143 }
1144 }
1145 }
1146
1147 FT_TRACE3(( "sTypoAscender: %4d\n", os2->sTypoAscender ));
1148 FT_TRACE3(( "sTypoDescender: %4d\n", os2->sTypoDescender ));
1149 FT_TRACE3(( "usWinAscent: %4u\n", os2->usWinAscent ));
1150 FT_TRACE3(( "usWinDescent: %4u\n", os2->usWinDescent ));
1151 FT_TRACE3(( "fsSelection: 0x%2x\n", os2->fsSelection ));
1152
1153 Exit:
1154 return error;
1155 }
1156
1157
1158 /*************************************************************************/
1159 /* */
1160 /* <Function> */
1161 /* tt_face_load_postscript */
1162 /* */
1163 /* <Description> */
1164 /* Loads the Postscript table. */
1165 /* */
1166 /* <Input> */
1167 /* face :: A handle to the target face object. */
1168 /* */
1169 /* stream :: A handle to the input stream. */
1170 /* */
1171 /* <Return> */
1172 /* FreeType error code. 0 means success. */
1173 /* */
1174 FT_LOCAL_DEF( FT_Error )
1175 tt_face_load_post( TT_Face face,
1176 FT_Stream stream )
1177 {
1178 FT_Error error;
1179 TT_Postscript* post = &face->postscript;
1180
1181 static const FT_Frame_Field post_fields[] =
1182 {
1183 #undef FT_STRUCTURE
1184 #define FT_STRUCTURE TT_Postscript
1185
1186 FT_FRAME_START( 32 ),
1187 FT_FRAME_LONG ( FormatType ),
1188 FT_FRAME_LONG ( italicAngle ),
1189 FT_FRAME_SHORT( underlinePosition ),
1190 FT_FRAME_SHORT( underlineThickness ),
1191 FT_FRAME_ULONG( isFixedPitch ),
1192 FT_FRAME_ULONG( minMemType42 ),
1193 FT_FRAME_ULONG( maxMemType42 ),
1194 FT_FRAME_ULONG( minMemType1 ),
1195 FT_FRAME_ULONG( maxMemType1 ),
1196 FT_FRAME_END
1197 };
1198
1199
1200 error = face->goto_table( face, TTAG_post, stream, 0 );
1201 if ( error )
1202 return error;
1203
1204 if ( FT_STREAM_READ_FIELDS( post_fields, post ) )
1205 return error;
1206
1207 /* we don't load the glyph names, we do that in another */
1208 /* module (ttpost). */
1209
1210 FT_TRACE3(( "FormatType: 0x%x\n", post->FormatType ));
1211 FT_TRACE3(( "isFixedPitch: %s\n", post->isFixedPitch
1212 ? " yes" : " no" ));
1213
1214 return FT_Err_Ok;
1215 }
1216
1217
1218 /*************************************************************************/
1219 /* */
1220 /* <Function> */
1221 /* tt_face_load_pclt */
1222 /* */
1223 /* <Description> */
1224 /* Loads the PCL 5 Table. */
1225 /* */
1226 /* <Input> */
1227 /* face :: A handle to the target face object. */
1228 /* */
1229 /* stream :: A handle to the input stream. */
1230 /* */
1231 /* <Return> */
1232 /* FreeType error code. 0 means success. */
1233 /* */
1234 FT_LOCAL_DEF( FT_Error )
1235 tt_face_load_pclt( TT_Face face,
1236 FT_Stream stream )
1237 {
1238 static const FT_Frame_Field pclt_fields[] =
1239 {
1240 #undef FT_STRUCTURE
1241 #define FT_STRUCTURE TT_PCLT
1242
1243 FT_FRAME_START( 54 ),
1244 FT_FRAME_ULONG ( Version ),
1245 FT_FRAME_ULONG ( FontNumber ),
1246 FT_FRAME_USHORT( Pitch ),
1247 FT_FRAME_USHORT( xHeight ),
1248 FT_FRAME_USHORT( Style ),
1249 FT_FRAME_USHORT( TypeFamily ),
1250 FT_FRAME_USHORT( CapHeight ),
1251 FT_FRAME_USHORT( SymbolSet ),
1252 FT_FRAME_BYTES ( TypeFace, 16 ),
1253 FT_FRAME_BYTES ( CharacterComplement, 8 ),
1254 FT_FRAME_BYTES ( FileName, 6 ),
1255 FT_FRAME_CHAR ( StrokeWeight ),
1256 FT_FRAME_CHAR ( WidthType ),
1257 FT_FRAME_BYTE ( SerifStyle ),
1258 FT_FRAME_BYTE ( Reserved ),
1259 FT_FRAME_END
1260 };
1261
1262 FT_Error error;
1263 TT_PCLT* pclt = &face->pclt;
1264
1265
1266 /* optional table */
1267 error = face->goto_table( face, TTAG_PCLT, stream, 0 );
1268 if ( error )
1269 goto Exit;
1270
1271 if ( FT_STREAM_READ_FIELDS( pclt_fields, pclt ) )
1272 goto Exit;
1273
1274 Exit:
1275 return error;
1276 }
1277
1278
1279 /*************************************************************************/
1280 /* */
1281 /* <Function> */
1282 /* tt_face_load_gasp */
1283 /* */
1284 /* <Description> */
1285 /* Loads the `gasp' table into a face object. */
1286 /* */
1287 /* <Input> */
1288 /* face :: A handle to the target face object. */
1289 /* */
1290 /* stream :: The input stream. */
1291 /* */
1292 /* <Return> */
1293 /* FreeType error code. 0 means success. */
1294 /* */
1295 FT_LOCAL_DEF( FT_Error )
1296 tt_face_load_gasp( TT_Face face,
1297 FT_Stream stream )
1298 {
1299 FT_Error error;
1300 FT_Memory memory = stream->memory;
1301
1302 FT_UInt j,num_ranges;
1303 TT_GaspRange gaspranges = NULL;
1304
1305
1306 /* the gasp table is optional */
1307 error = face->goto_table( face, TTAG_gasp, stream, 0 );
1308 if ( error )
1309 goto Exit;
1310
1311 if ( FT_FRAME_ENTER( 4L ) )
1312 goto Exit;
1313
1314 face->gasp.version = FT_GET_USHORT();
1315 face->gasp.numRanges = FT_GET_USHORT();
1316
1317 FT_FRAME_EXIT();
1318
1319 /* only support versions 0 and 1 of the table */
1320 if ( face->gasp.version >= 2 )
1321 {
1322 face->gasp.numRanges = 0;
1323 error = FT_THROW( Invalid_Table );
1324 goto Exit;
1325 }
1326
1327 num_ranges = face->gasp.numRanges;
1328 FT_TRACE3(( "numRanges: %u\n", num_ranges ));
1329
1330 if ( FT_QNEW_ARRAY( face->gasp.gaspRanges, num_ranges ) ||
1331 FT_FRAME_ENTER( num_ranges * 4L ) )
1332 goto Exit;
1333
1334 gaspranges = face->gasp.gaspRanges;
1335
1336 for ( j = 0; j < num_ranges; j++ )
1337 {
1338 gaspranges[j].maxPPEM = FT_GET_USHORT();
1339 gaspranges[j].gaspFlag = FT_GET_USHORT();
1340
1341 FT_TRACE3(( "gaspRange %d: rangeMaxPPEM %5d, rangeGaspBehavior 0x%x\n",
1342 j,
1343 gaspranges[j].maxPPEM,
1344 gaspranges[j].gaspFlag ));
1345 }
1346
1347 FT_FRAME_EXIT();
1348
1349 Exit:
1350 return error;
1351 }
1352
1353
1354 /* END */
A free Windows-compatible Operating System