projects / reactos.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
* Sync the recent cmake branch changes.
[reactos.git] / lib / 3rdparty / freetype / src / winfonts / winfnt.c
1 /***************************************************************************/
2 /* */
3 /* winfnt.c */
4 /* */
5 /* FreeType font driver for Windows FNT/FON files */
6 /* */
7 /* Copyright 1996-2001, 2002, 2003, 2004, 2006, 2007, 2008, 2009, 2010 by */
8 /* David Turner, Robert Wilhelm, and Werner Lemberg. */
9 /* Copyright 2003 Huw D M Davies for Codeweavers */
10 /* Copyright 2007 Dmitry Timoshkov for Codeweavers */
11 /* */
12 /* This file is part of the FreeType project, and may only be used, */
13 /* modified, and distributed under the terms of the FreeType project */
14 /* license, LICENSE.TXT. By continuing to use, modify, or distribute */
15 /* this file you indicate that you have read the license and */
16 /* understand and accept it fully. */
17 /* */
18 /***************************************************************************/
19
20
21 #include <ft2build.h>
22 #include FT_WINFONTS_H
23 #include FT_INTERNAL_DEBUG_H
24 #include FT_INTERNAL_STREAM_H
25 #include FT_INTERNAL_OBJECTS_H
26 #include FT_TRUETYPE_IDS_H
27
28 #include "winfnt.h"
29 #include "fnterrs.h"
30 #include FT_SERVICE_WINFNT_H
31 #include FT_SERVICE_XFREE86_NAME_H
32
33 /*************************************************************************/
34 /* */
35 /* The macro FT_COMPONENT is used in trace mode. It is an implicit */
36 /* parameter of the FT_TRACE() and FT_ERROR() macros, used to print/log */
37 /* messages during execution. */
38 /* */
39 #undef FT_COMPONENT
40 #define FT_COMPONENT trace_winfnt
41
42
43 static const FT_Frame_Field winmz_header_fields[] =
44 {
45 #undef FT_STRUCTURE
46 #define FT_STRUCTURE WinMZ_HeaderRec
47
48 FT_FRAME_START( 64 ),
49 FT_FRAME_USHORT_LE ( magic ),
50 FT_FRAME_SKIP_BYTES( 29 * 2 ),
51 FT_FRAME_ULONG_LE ( lfanew ),
52 FT_FRAME_END
53 };
54
55 static const FT_Frame_Field winne_header_fields[] =
56 {
57 #undef FT_STRUCTURE
58 #define FT_STRUCTURE WinNE_HeaderRec
59
60 FT_FRAME_START( 40 ),
61 FT_FRAME_USHORT_LE ( magic ),
62 FT_FRAME_SKIP_BYTES( 34 ),
63 FT_FRAME_USHORT_LE ( resource_tab_offset ),
64 FT_FRAME_USHORT_LE ( rname_tab_offset ),
65 FT_FRAME_END
66 };
67
68 static const FT_Frame_Field winpe32_header_fields[] =
69 {
70 #undef FT_STRUCTURE
71 #define FT_STRUCTURE WinPE32_HeaderRec
72
73 FT_FRAME_START( 248 ),
74 FT_FRAME_ULONG_LE ( magic ), /* PE00 */
75 FT_FRAME_USHORT_LE ( machine ), /* 0x014c - i386 */
76 FT_FRAME_USHORT_LE ( number_of_sections ),
77 FT_FRAME_SKIP_BYTES( 12 ),
78 FT_FRAME_USHORT_LE ( size_of_optional_header ),
79 FT_FRAME_SKIP_BYTES( 2 ),
80 FT_FRAME_USHORT_LE ( magic32 ), /* 0x10b */
81 FT_FRAME_SKIP_BYTES( 110 ),
82 FT_FRAME_ULONG_LE ( rsrc_virtual_address ),
83 FT_FRAME_ULONG_LE ( rsrc_size ),
84 FT_FRAME_SKIP_BYTES( 104 ),
85 FT_FRAME_END
86 };
87
88 static const FT_Frame_Field winpe32_section_fields[] =
89 {
90 #undef FT_STRUCTURE
91 #define FT_STRUCTURE WinPE32_SectionRec
92
93 FT_FRAME_START( 40 ),
94 FT_FRAME_BYTES ( name, 8 ),
95 FT_FRAME_SKIP_BYTES( 4 ),
96 FT_FRAME_ULONG_LE ( virtual_address ),
97 FT_FRAME_ULONG_LE ( size_of_raw_data ),
98 FT_FRAME_ULONG_LE ( pointer_to_raw_data ),
99 FT_FRAME_SKIP_BYTES( 16 ),
100 FT_FRAME_END
101 };
102
103 static const FT_Frame_Field winpe_rsrc_dir_fields[] =
104 {
105 #undef FT_STRUCTURE
106 #define FT_STRUCTURE WinPE_RsrcDirRec
107
108 FT_FRAME_START( 16 ),
109 FT_FRAME_ULONG_LE ( characteristics ),
110 FT_FRAME_ULONG_LE ( time_date_stamp ),
111 FT_FRAME_USHORT_LE( major_version ),
112 FT_FRAME_USHORT_LE( minor_version ),
113 FT_FRAME_USHORT_LE( number_of_named_entries ),
114 FT_FRAME_USHORT_LE( number_of_id_entries ),
115 FT_FRAME_END
116 };
117
118 static const FT_Frame_Field winpe_rsrc_dir_entry_fields[] =
119 {
120 #undef FT_STRUCTURE
121 #define FT_STRUCTURE WinPE_RsrcDirEntryRec
122
123 FT_FRAME_START( 8 ),
124 FT_FRAME_ULONG_LE( name ),
125 FT_FRAME_ULONG_LE( offset ),
126 FT_FRAME_END
127 };
128
129 static const FT_Frame_Field winpe_rsrc_data_entry_fields[] =
130 {
131 #undef FT_STRUCTURE
132 #define FT_STRUCTURE WinPE_RsrcDataEntryRec
133
134 FT_FRAME_START( 16 ),
135 FT_FRAME_ULONG_LE( offset_to_data ),
136 FT_FRAME_ULONG_LE( size ),
137 FT_FRAME_ULONG_LE( code_page ),
138 FT_FRAME_ULONG_LE( reserved ),
139 FT_FRAME_END
140 };
141
142 static const FT_Frame_Field winfnt_header_fields[] =
143 {
144 #undef FT_STRUCTURE
145 #define FT_STRUCTURE FT_WinFNT_HeaderRec
146
147 FT_FRAME_START( 148 ),
148 FT_FRAME_USHORT_LE( version ),
149 FT_FRAME_ULONG_LE ( file_size ),
150 FT_FRAME_BYTES ( copyright, 60 ),
151 FT_FRAME_USHORT_LE( file_type ),
152 FT_FRAME_USHORT_LE( nominal_point_size ),
153 FT_FRAME_USHORT_LE( vertical_resolution ),
154 FT_FRAME_USHORT_LE( horizontal_resolution ),
155 FT_FRAME_USHORT_LE( ascent ),
156 FT_FRAME_USHORT_LE( internal_leading ),
157 FT_FRAME_USHORT_LE( external_leading ),
158 FT_FRAME_BYTE ( italic ),
159 FT_FRAME_BYTE ( underline ),
160 FT_FRAME_BYTE ( strike_out ),
161 FT_FRAME_USHORT_LE( weight ),
162 FT_FRAME_BYTE ( charset ),
163 FT_FRAME_USHORT_LE( pixel_width ),
164 FT_FRAME_USHORT_LE( pixel_height ),
165 FT_FRAME_BYTE ( pitch_and_family ),
166 FT_FRAME_USHORT_LE( avg_width ),
167 FT_FRAME_USHORT_LE( max_width ),
168 FT_FRAME_BYTE ( first_char ),
169 FT_FRAME_BYTE ( last_char ),
170 FT_FRAME_BYTE ( default_char ),
171 FT_FRAME_BYTE ( break_char ),
172 FT_FRAME_USHORT_LE( bytes_per_row ),
173 FT_FRAME_ULONG_LE ( device_offset ),
174 FT_FRAME_ULONG_LE ( face_name_offset ),
175 FT_FRAME_ULONG_LE ( bits_pointer ),
176 FT_FRAME_ULONG_LE ( bits_offset ),
177 FT_FRAME_BYTE ( reserved ),
178 FT_FRAME_ULONG_LE ( flags ),
179 FT_FRAME_USHORT_LE( A_space ),
180 FT_FRAME_USHORT_LE( B_space ),
181 FT_FRAME_USHORT_LE( C_space ),
182 FT_FRAME_ULONG_LE ( color_table_offset ),
183 FT_FRAME_BYTES ( reserved1, 16 ),
184 FT_FRAME_END
185 };
186
187
188 static void
189 fnt_font_done( FNT_Face face )
190 {
191 FT_Memory memory = FT_FACE( face )->memory;
192 FT_Stream stream = FT_FACE( face )->stream;
193 FNT_Font font = face->font;
194
195
196 if ( !font )
197 return;
198
199 if ( font->fnt_frame )
200 FT_FRAME_RELEASE( font->fnt_frame );
201 FT_FREE( font->family_name );
202
203 FT_FREE( font );
204 face->font = 0;
205 }
206
207
208 static FT_Error
209 fnt_font_load( FNT_Font font,
210 FT_Stream stream )
211 {
212 FT_Error error;
213 FT_WinFNT_Header header = &font->header;
214 FT_Bool new_format;
215 FT_UInt size;
216
217
218 /* first of all, read the FNT header */
219 if ( FT_STREAM_SEEK( font->offset ) ||
220 FT_STREAM_READ_FIELDS( winfnt_header_fields, header ) )
221 goto Exit;
222
223 /* check header */
224 if ( header->version != 0x200 &&
225 header->version != 0x300 )
226 {
227 FT_TRACE2(( "[not a valid FNT file]\n" ));
228 error = FNT_Err_Unknown_File_Format;
229 goto Exit;
230 }
231
232 new_format = FT_BOOL( font->header.version == 0x300 );
233 size = new_format ? 148 : 118;
234
235 if ( header->file_size < size )
236 {
237 FT_TRACE2(( "[not a valid FNT file]\n" ));
238 error = FNT_Err_Unknown_File_Format;
239 goto Exit;
240 }
241
242 /* Version 2 doesn't have these fields */
243 if ( header->version == 0x200 )
244 {
245 header->flags = 0;
246 header->A_space = 0;
247 header->B_space = 0;
248 header->C_space = 0;
249
250 header->color_table_offset = 0;
251 }
252
253 if ( header->file_type & 1 )
254 {
255 FT_TRACE2(( "[can't handle vector FNT fonts]\n" ));
256 error = FNT_Err_Unknown_File_Format;
257 goto Exit;
258 }
259
260 /* this is a FNT file/table; extract its frame */
261 if ( FT_STREAM_SEEK( font->offset ) ||
262 FT_FRAME_EXTRACT( header->file_size, font->fnt_frame ) )
263 goto Exit;
264
265 Exit:
266 return error;
267 }
268
269
270 static FT_Error
271 fnt_face_get_dll_font( FNT_Face face,
272 FT_Int face_index )
273 {
274 FT_Error error;
275 FT_Stream stream = FT_FACE( face )->stream;
276 FT_Memory memory = FT_FACE( face )->memory;
277 WinMZ_HeaderRec mz_header;
278
279
280 face->font = 0;
281
282 /* does it begin with an MZ header? */
283 if ( FT_STREAM_SEEK( 0 ) ||
284 FT_STREAM_READ_FIELDS( winmz_header_fields, &mz_header ) )
285 goto Exit;
286
287 error = FNT_Err_Unknown_File_Format;
288 if ( mz_header.magic == WINFNT_MZ_MAGIC )
289 {
290 /* yes, now look for an NE header in the file */
291 WinNE_HeaderRec ne_header;
292
293
294 FT_TRACE2(( "MZ signature found\n" ));
295
296 if ( FT_STREAM_SEEK( mz_header.lfanew ) ||
297 FT_STREAM_READ_FIELDS( winne_header_fields, &ne_header ) )
298 goto Exit;
299
300 error = FNT_Err_Unknown_File_Format;
301 if ( ne_header.magic == WINFNT_NE_MAGIC )
302 {
303 /* good, now look into the resource table for each FNT resource */
304 FT_ULong res_offset = mz_header.lfanew +
305 ne_header.resource_tab_offset;
306 FT_UShort size_shift;
307 FT_UShort font_count = 0;
308 FT_ULong font_offset = 0;
309
310
311 FT_TRACE2(( "NE signature found\n" ));
312
313 if ( FT_STREAM_SEEK( res_offset ) ||
314 FT_FRAME_ENTER( ne_header.rname_tab_offset -
315 ne_header.resource_tab_offset ) )
316 goto Exit;
317
318 size_shift = FT_GET_USHORT_LE();
319
320 for (;;)
321 {
322 FT_UShort type_id, count;
323
324
325 type_id = FT_GET_USHORT_LE();
326 if ( !type_id )
327 break;
328
329 count = FT_GET_USHORT_LE();
330
331 if ( type_id == 0x8008U )
332 {
333 font_count = count;
334 font_offset = (FT_ULong)( FT_STREAM_POS() + 4 +
335 ( stream->cursor - stream->limit ) );
336 break;
337 }
338
339 stream->cursor += 4 + count * 12;
340 }
341
342 FT_FRAME_EXIT();
343
344 if ( !font_count || !font_offset )
345 {
346 FT_TRACE2(( "this file doesn't contain any FNT resources\n" ));
347 error = FNT_Err_Invalid_File_Format;
348 goto Exit;
349 }
350
351 /* loading `winfnt_header_fields' needs at least 118 bytes; */
352 /* use this as a rough measure to check the expected font size */
353 if ( font_count * 118UL > stream->size )
354 {
355 FT_TRACE2(( "invalid number of faces\n" ));
356 error = FNT_Err_Invalid_File_Format;
357 goto Exit;
358 }
359
360 face->root.num_faces = font_count;
361
362 if ( face_index >= font_count )
363 {
364 error = FNT_Err_Invalid_Argument;
365 goto Exit;
366 }
367 else if ( face_index < 0 )
368 goto Exit;
369
370 if ( FT_NEW( face->font ) )
371 goto Exit;
372
373 if ( FT_STREAM_SEEK( font_offset + face_index * 12 ) ||
374 FT_FRAME_ENTER( 12 ) )
375 goto Fail;
376
377 face->font->offset = (FT_ULong)FT_GET_USHORT_LE() << size_shift;
378 face->font->fnt_size = (FT_ULong)FT_GET_USHORT_LE() << size_shift;
379
380 stream->cursor += 8;
381
382 FT_FRAME_EXIT();
383
384 error = fnt_font_load( face->font, stream );
385 }
386 else if ( ne_header.magic == WINFNT_PE_MAGIC )
387 {
388 WinPE32_HeaderRec pe32_header;
389 WinPE32_SectionRec pe32_section;
390 WinPE_RsrcDirRec root_dir, name_dir, lang_dir;
391 WinPE_RsrcDirEntryRec dir_entry1, dir_entry2, dir_entry3;
392 WinPE_RsrcDataEntryRec data_entry;
393
394 FT_Long root_dir_offset, name_dir_offset, lang_dir_offset;
395 FT_UShort i, j, k;
396
397
398 FT_TRACE2(( "PE signature found\n" ));
399
400 if ( FT_STREAM_SEEK( mz_header.lfanew ) ||
401 FT_STREAM_READ_FIELDS( winpe32_header_fields, &pe32_header ) )
402 goto Exit;
403
404 FT_TRACE2(( "magic %04lx, machine %02x, number_of_sections %u, "
405 "size_of_optional_header %02x\n"
406 "magic32 %02x, rsrc_virtual_address %04lx, "
407 "rsrc_size %04lx\n",
408 pe32_header.magic, pe32_header.machine,
409 pe32_header.number_of_sections,
410 pe32_header.size_of_optional_header,
411 pe32_header.magic32, pe32_header.rsrc_virtual_address,
412 pe32_header.rsrc_size ));
413
414 if ( pe32_header.magic != WINFNT_PE_MAGIC /* check full signature */ ||
415 pe32_header.machine != 0x014c /* i386 */ ||
416 pe32_header.size_of_optional_header != 0xe0 /* FIXME */ ||
417 pe32_header.magic32 != 0x10b )
418 {
419 FT_TRACE2(( "this file has an invalid PE header\n" ));
420 error = FNT_Err_Invalid_File_Format;
421 goto Exit;
422 }
423
424 face->root.num_faces = 0;
425
426 for ( i = 0; i < pe32_header.number_of_sections; i++ )
427 {
428 if ( FT_STREAM_READ_FIELDS( winpe32_section_fields,
429 &pe32_section ) )
430 goto Exit;
431
432 FT_TRACE2(( "name %.8s, va %04lx, size %04lx, offset %04lx\n",
433 pe32_section.name, pe32_section.virtual_address,
434 pe32_section.size_of_raw_data,
435 pe32_section.pointer_to_raw_data ));
436
437 if ( pe32_header.rsrc_virtual_address ==
438 pe32_section.virtual_address )
439 goto Found_rsrc_section;
440 }
441
442 FT_TRACE2(( "this file doesn't contain any resources\n" ));
443 error = FNT_Err_Invalid_File_Format;
444 goto Exit;
445
446 Found_rsrc_section:
447 FT_TRACE2(( "found resources section %.8s\n", pe32_section.name ));
448
449 if ( FT_STREAM_SEEK( pe32_section.pointer_to_raw_data ) ||
450 FT_STREAM_READ_FIELDS( winpe_rsrc_dir_fields, &root_dir ) )
451 goto Exit;
452
453 root_dir_offset = pe32_section.pointer_to_raw_data;
454
455 for ( i = 0; i < root_dir.number_of_named_entries +
456 root_dir.number_of_id_entries; i++ )
457 {
458 if ( FT_STREAM_SEEK( root_dir_offset + 16 + i * 8 ) ||
459 FT_STREAM_READ_FIELDS( winpe_rsrc_dir_entry_fields,
460 &dir_entry1 ) )
461 goto Exit;
462
463 if ( !(dir_entry1.offset & 0x80000000UL ) /* DataIsDirectory */ )
464 {
465 error = FNT_Err_Invalid_File_Format;
466 goto Exit;
467 }
468
469 dir_entry1.offset &= ~0x80000000UL;
470
471 name_dir_offset = pe32_section.pointer_to_raw_data +
472 dir_entry1.offset;
473
474 if ( FT_STREAM_SEEK( pe32_section.pointer_to_raw_data +
475 dir_entry1.offset ) ||
476 FT_STREAM_READ_FIELDS( winpe_rsrc_dir_fields, &name_dir ) )
477 goto Exit;
478
479 for ( j = 0; j < name_dir.number_of_named_entries +
480 name_dir.number_of_id_entries; j++ )
481 {
482 if ( FT_STREAM_SEEK( name_dir_offset + 16 + j * 8 ) ||
483 FT_STREAM_READ_FIELDS( winpe_rsrc_dir_entry_fields,
484 &dir_entry2 ) )
485 goto Exit;
486
487 if ( !(dir_entry2.offset & 0x80000000UL ) /* DataIsDirectory */ )
488 {
489 error = FNT_Err_Invalid_File_Format;
490 goto Exit;
491 }
492
493 dir_entry2.offset &= ~0x80000000UL;
494
495 lang_dir_offset = pe32_section.pointer_to_raw_data +
496 dir_entry2.offset;
497
498 if ( FT_STREAM_SEEK( pe32_section.pointer_to_raw_data +
499 dir_entry2.offset ) ||
500 FT_STREAM_READ_FIELDS( winpe_rsrc_dir_fields, &lang_dir ) )
501 goto Exit;
502
503 for ( k = 0; k < lang_dir.number_of_named_entries +
504 lang_dir.number_of_id_entries; k++ )
505 {
506 if ( FT_STREAM_SEEK( lang_dir_offset + 16 + k * 8 ) ||
507 FT_STREAM_READ_FIELDS( winpe_rsrc_dir_entry_fields,
508 &dir_entry3 ) )
509 goto Exit;
510
511 if ( dir_entry2.offset & 0x80000000UL /* DataIsDirectory */ )
512 {
513 error = FNT_Err_Invalid_File_Format;
514 goto Exit;
515 }
516
517 if ( dir_entry1.name == 8 /* RT_FONT */ )
518 {
519 if ( FT_STREAM_SEEK( root_dir_offset + dir_entry3.offset ) ||
520 FT_STREAM_READ_FIELDS( winpe_rsrc_data_entry_fields,
521 &data_entry ) )
522 goto Exit;
523
524 FT_TRACE2(( "found font #%lu, offset %04lx, "
525 "size %04lx, cp %lu\n",
526 dir_entry2.name,
527 pe32_section.pointer_to_raw_data +
528 data_entry.offset_to_data -
529 pe32_section.virtual_address,
530 data_entry.size, data_entry.code_page ));
531
532 if ( face_index == face->root.num_faces )
533 {
534 if ( FT_NEW( face->font ) )
535 goto Exit;
536
537 face->font->offset = pe32_section.pointer_to_raw_data +
538 data_entry.offset_to_data -
539 pe32_section.virtual_address;
540 face->font->fnt_size = data_entry.size;
541
542 error = fnt_font_load( face->font, stream );
543 if ( error )
544 {
545 FT_TRACE2(( "font #%lu load error %d\n",
546 dir_entry2.name, error ));
547 goto Fail;
548 }
549 else
550 FT_TRACE2(( "font #%lu successfully loaded\n",
551 dir_entry2.name ));
552 }
553
554 face->root.num_faces++;
555 }
556 }
557 }
558 }
559 }
560
561 if ( !face->root.num_faces )
562 {
563 FT_TRACE2(( "this file doesn't contain any RT_FONT resources\n" ));
564 error = FNT_Err_Invalid_File_Format;
565 goto Exit;
566 }
567
568 if ( face_index >= face->root.num_faces )
569 {
570 error = FNT_Err_Invalid_Argument;
571 goto Exit;
572 }
573 }
574
575 Fail:
576 if ( error )
577 fnt_font_done( face );
578
579 Exit:
580 return error;
581 }
582
583
584 typedef struct FNT_CMapRec_
585 {
586 FT_CMapRec cmap;
587 FT_UInt32 first;
588 FT_UInt32 count;
589
590 } FNT_CMapRec, *FNT_CMap;
591
592
593 static FT_Error
594 fnt_cmap_init( FNT_CMap cmap )
595 {
596 FNT_Face face = (FNT_Face)FT_CMAP_FACE( cmap );
597 FNT_Font font = face->font;
598
599
600 cmap->first = (FT_UInt32) font->header.first_char;
601 cmap->count = (FT_UInt32)( font->header.last_char - cmap->first + 1 );
602
603 return 0;
604 }
605
606
607 static FT_UInt
608 fnt_cmap_char_index( FNT_CMap cmap,
609 FT_UInt32 char_code )
610 {
611 FT_UInt gindex = 0;
612
613
614 char_code -= cmap->first;
615 if ( char_code < cmap->count )
616 /* we artificially increase the glyph index; */
617 /* FNT_Load_Glyph reverts to the right one */
618 gindex = (FT_UInt)( char_code + 1 );
619 return gindex;
620 }
621
622
623 static FT_UInt32
624 fnt_cmap_char_next( FNT_CMap cmap,
625 FT_UInt32 *pchar_code )
626 {
627 FT_UInt gindex = 0;
628 FT_UInt32 result = 0;
629 FT_UInt32 char_code = *pchar_code + 1;
630
631
632 if ( char_code <= cmap->first )
633 {
634 result = cmap->first;
635 gindex = 1;
636 }
637 else
638 {
639 char_code -= cmap->first;
640 if ( char_code < cmap->count )
641 {
642 result = cmap->first + char_code;
643 gindex = (FT_UInt)( char_code + 1 );
644 }
645 }
646
647 *pchar_code = result;
648 return gindex;
649 }
650
651
652 static const FT_CMap_ClassRec fnt_cmap_class_rec =
653 {
654 sizeof ( FNT_CMapRec ),
655
656 (FT_CMap_InitFunc) fnt_cmap_init,
657 (FT_CMap_DoneFunc) NULL,
658 (FT_CMap_CharIndexFunc)fnt_cmap_char_index,
659 (FT_CMap_CharNextFunc) fnt_cmap_char_next,
660
661 NULL, NULL, NULL, NULL, NULL
662 };
663
664 static FT_CMap_Class const fnt_cmap_class = &fnt_cmap_class_rec;
665
666
667 static void
668 FNT_Face_Done( FNT_Face face )
669 {
670 FT_Memory memory;
671
672
673 if ( !face )
674 return;
675
676 memory = FT_FACE_MEMORY( face );
677
678 fnt_font_done( face );
679
680 FT_FREE( face->root.available_sizes );
681 face->root.num_fixed_sizes = 0;
682 }
683
684
685 static FT_Error
686 FNT_Face_Init( FT_Stream stream,
687 FNT_Face face,
688 FT_Int face_index,
689 FT_Int num_params,
690 FT_Parameter* params )
691 {
692 FT_Error error;
693 FT_Memory memory = FT_FACE_MEMORY( face );
694
695 FT_UNUSED( num_params );
696 FT_UNUSED( params );
697
698
699 /* try to load font from a DLL */
700 error = fnt_face_get_dll_font( face, face_index );
701 if ( !error && face_index < 0 )
702 goto Exit;
703
704 if ( error == FNT_Err_Unknown_File_Format )
705 {
706 /* this didn't work; try to load a single FNT font */
707 FNT_Font font;
708
709 if ( FT_NEW( face->font ) )
710 goto Exit;
711
712 face->root.num_faces = 1;
713
714 font = face->font;
715 font->offset = 0;
716 font->fnt_size = stream->size;
717
718 error = fnt_font_load( font, stream );
719
720 if ( !error )
721 {
722 if ( face_index > 0 )
723 error = FNT_Err_Invalid_Argument;
724 else if ( face_index < 0 )
725 goto Exit;
726 }
727 }
728
729 if ( error )
730 goto Fail;
731
732 /* we now need to fill the root FT_Face fields */
733 /* with relevant information */
734 {
735 FT_Face root = FT_FACE( face );
736 FNT_Font font = face->font;
737 FT_PtrDist family_size;
738
739
740 root->face_index = face_index;
741
742 root->face_flags = FT_FACE_FLAG_FIXED_SIZES |
743 FT_FACE_FLAG_HORIZONTAL;
744
745 if ( font->header.avg_width == font->header.max_width )
746 root->face_flags |= FT_FACE_FLAG_FIXED_WIDTH;
747
748 if ( font->header.italic )
749 root->style_flags |= FT_STYLE_FLAG_ITALIC;
750
751 if ( font->header.weight >= 800 )
752 root->style_flags |= FT_STYLE_FLAG_BOLD;
753
754 /* set up the `fixed_sizes' array */
755 if ( FT_NEW_ARRAY( root->available_sizes, 1 ) )
756 goto Fail;
757
758 root->num_fixed_sizes = 1;
759
760 {
761 FT_Bitmap_Size* bsize = root->available_sizes;
762 FT_UShort x_res, y_res;
763
764
765 bsize->width = font->header.avg_width;
766 bsize->height = (FT_Short)(
767 font->header.pixel_height + font->header.external_leading );
768 bsize->size = font->header.nominal_point_size << 6;
769
770 x_res = font->header.horizontal_resolution;
771 if ( !x_res )
772 x_res = 72;
773
774 y_res = font->header.vertical_resolution;
775 if ( !y_res )
776 y_res = 72;
777
778 bsize->y_ppem = FT_MulDiv( bsize->size, y_res, 72 );
779 bsize->y_ppem = FT_PIX_ROUND( bsize->y_ppem );
780
781 /*
782 * this reads:
783 *
784 * the nominal height is larger than the bbox's height
785 *
786 * => nominal_point_size contains incorrect value;
787 * use pixel_height as the nominal height
788 */
789 if ( bsize->y_ppem > ( font->header.pixel_height << 6 ) )
790 {
791 FT_TRACE2(( "use pixel_height as the nominal height\n" ));
792
793 bsize->y_ppem = font->header.pixel_height << 6;
794 bsize->size = FT_MulDiv( bsize->y_ppem, 72, y_res );
795 }
796
797 bsize->x_ppem = FT_MulDiv( bsize->size, x_res, 72 );
798 bsize->x_ppem = FT_PIX_ROUND( bsize->x_ppem );
799 }
800
801 {
802 FT_CharMapRec charmap;
803
804
805 charmap.encoding = FT_ENCODING_NONE;
806 /* initial platform/encoding should indicate unset status? */
807 charmap.platform_id = TT_PLATFORM_APPLE_UNICODE;
808 charmap.encoding_id = TT_APPLE_ID_DEFAULT;
809 charmap.face = root;
810
811 if ( font->header.charset == FT_WinFNT_ID_MAC )
812 {
813 charmap.encoding = FT_ENCODING_APPLE_ROMAN;
814 charmap.platform_id = TT_PLATFORM_MACINTOSH;
815 /* charmap.encoding_id = TT_MAC_ID_ROMAN; */
816 }
817
818 error = FT_CMap_New( fnt_cmap_class,
819 NULL,
820 &charmap,
821 NULL );
822 if ( error )
823 goto Fail;
824
825 /* Select default charmap */
826 if ( root->num_charmaps )
827 root->charmap = root->charmaps[0];
828 }
829
830 /* setup remaining flags */
831
832 /* reserve one slot for the .notdef glyph at index 0 */
833 root->num_glyphs = font->header.last_char -
834 font->header.first_char + 1 + 1;
835
836 if ( font->header.face_name_offset >= font->header.file_size )
837 {
838 FT_TRACE2(( "invalid family name offset\n" ));
839 error = FNT_Err_Invalid_File_Format;
840 goto Fail;
841 }
842 family_size = font->header.file_size - font->header.face_name_offset;
843 /* Some broken fonts don't delimit the face name with a final */
844 /* NULL byte -- the frame is erroneously one byte too small. */
845 /* We thus allocate one more byte, setting it explicitly to */
846 /* zero. */
847 if ( FT_ALLOC( font->family_name, family_size + 1 ) )
848 goto Fail;
849
850 FT_MEM_COPY( font->family_name,
851 font->fnt_frame + font->header.face_name_offset,
852 family_size );
853
854 font->family_name[family_size] = '\0';
855
856 if ( FT_REALLOC( font->family_name,
857 family_size,
858 ft_strlen( font->family_name ) + 1 ) )
859 goto Fail;
860
861 root->family_name = font->family_name;
862 root->style_name = (char *)"Regular";
863
864 if ( root->style_flags & FT_STYLE_FLAG_BOLD )
865 {
866 if ( root->style_flags & FT_STYLE_FLAG_ITALIC )
867 root->style_name = (char *)"Bold Italic";
868 else
869 root->style_name = (char *)"Bold";
870 }
871 else if ( root->style_flags & FT_STYLE_FLAG_ITALIC )
872 root->style_name = (char *)"Italic";
873 }
874 goto Exit;
875
876 Fail:
877 FNT_Face_Done( face );
878
879 Exit:
880 return error;
881 }
882
883
884 static FT_Error
885 FNT_Size_Select( FT_Size size )
886 {
887 FNT_Face face = (FNT_Face)size->face;
888 FT_WinFNT_Header header = &face->font->header;
889
890
891 FT_Select_Metrics( size->face, 0 );
892
893 size->metrics.ascender = header->ascent * 64;
894 size->metrics.descender = -( header->pixel_height -
895 header->ascent ) * 64;
896 size->metrics.max_advance = header->max_width * 64;
897
898 return FNT_Err_Ok;
899 }
900
901
902 static FT_Error
903 FNT_Size_Request( FT_Size size,
904 FT_Size_Request req )
905 {
906 FNT_Face face = (FNT_Face)size->face;
907 FT_WinFNT_Header header = &face->font->header;
908 FT_Bitmap_Size* bsize = size->face->available_sizes;
909 FT_Error error = FNT_Err_Invalid_Pixel_Size;
910 FT_Long height;
911
912
913 height = FT_REQUEST_HEIGHT( req );
914 height = ( height + 32 ) >> 6;
915
916 switch ( req->type )
917 {
918 case FT_SIZE_REQUEST_TYPE_NOMINAL:
919 if ( height == ( ( bsize->y_ppem + 32 ) >> 6 ) )
920 error = FNT_Err_Ok;
921 break;
922
923 case FT_SIZE_REQUEST_TYPE_REAL_DIM:
924 if ( height == header->pixel_height )
925 error = FNT_Err_Ok;
926 break;
927
928 default:
929 error = FNT_Err_Unimplemented_Feature;
930 break;
931 }
932
933 if ( error )
934 return error;
935 else
936 return FNT_Size_Select( size );
937 }
938
939
940 static FT_Error
941 FNT_Load_Glyph( FT_GlyphSlot slot,
942 FT_Size size,
943 FT_UInt glyph_index,
944 FT_Int32 load_flags )
945 {
946 FNT_Face face = (FNT_Face)FT_SIZE_FACE( size );
947 FNT_Font font;
948 FT_Error error = FNT_Err_Ok;
949 FT_Byte* p;
950 FT_Int len;
951 FT_Bitmap* bitmap = &slot->bitmap;
952 FT_ULong offset;
953 FT_Bool new_format;
954
955 FT_UNUSED( load_flags );
956
957
958 if ( !face )
959 {
960 error = FNT_Err_Invalid_Argument;
961 goto Exit;
962 }
963
964 font = face->font;
965
966 if ( !font ||
967 glyph_index >= (FT_UInt)( FT_FACE( face )->num_glyphs ) )
968 {
969 error = FNT_Err_Invalid_Argument;
970 goto Exit;
971 }
972
973 if ( glyph_index > 0 )
974 glyph_index--; /* revert to real index */
975 else
976 glyph_index = font->header.default_char; /* the .notdef glyph */
977
978 new_format = FT_BOOL( font->header.version == 0x300 );
979 len = new_format ? 6 : 4;
980
981 /* jump to glyph entry */
982 p = font->fnt_frame + ( new_format ? 148 : 118 ) + len * glyph_index;
983
984 bitmap->width = FT_NEXT_SHORT_LE( p );
985
986 if ( new_format )
987 offset = FT_NEXT_ULONG_LE( p );
988 else
989 offset = FT_NEXT_USHORT_LE( p );
990
991 if ( offset >= font->header.file_size )
992 {
993 FT_TRACE2(( "invalid FNT offset\n" ));
994 error = FNT_Err_Invalid_File_Format;
995 goto Exit;
996 }
997
998 /* jump to glyph data */
999 p = font->fnt_frame + /* font->header.bits_offset */ + offset;
1000
1001 /* allocate and build bitmap */
1002 {
1003 FT_Memory memory = FT_FACE_MEMORY( slot->face );
1004 FT_Int pitch = ( bitmap->width + 7 ) >> 3;
1005 FT_Byte* column;
1006 FT_Byte* write;
1007
1008
1009 bitmap->pitch = pitch;
1010 bitmap->rows = font->header.pixel_height;
1011 bitmap->pixel_mode = FT_PIXEL_MODE_MONO;
1012
1013 if ( offset + pitch * bitmap->rows >= font->header.file_size )
1014 {
1015 FT_TRACE2(( "invalid bitmap width\n" ));
1016 error = FNT_Err_Invalid_File_Format;
1017 goto Exit;
1018 }
1019
1020 /* note: since glyphs are stored in columns and not in rows we */
1021 /* can't use ft_glyphslot_set_bitmap */
1022 if ( FT_ALLOC_MULT( bitmap->buffer, pitch, bitmap->rows ) )
1023 goto Exit;
1024
1025 column = (FT_Byte*)bitmap->buffer;
1026
1027 for ( ; pitch > 0; pitch--, column++ )
1028 {
1029 FT_Byte* limit = p + bitmap->rows;
1030
1031
1032 for ( write = column; p < limit; p++, write += bitmap->pitch )
1033 *write = *p;
1034 }
1035 }
1036
1037 slot->internal->flags = FT_GLYPH_OWN_BITMAP;
1038 slot->bitmap_left = 0;
1039 slot->bitmap_top = font->header.ascent;
1040 slot->format = FT_GLYPH_FORMAT_BITMAP;
1041
1042 /* now set up metrics */
1043 slot->metrics.width = bitmap->width << 6;
1044 slot->metrics.height = bitmap->rows << 6;
1045 slot->metrics.horiAdvance = bitmap->width << 6;
1046 slot->metrics.horiBearingX = 0;
1047 slot->metrics.horiBearingY = slot->bitmap_top << 6;
1048
1049 ft_synthesize_vertical_metrics( &slot->metrics,
1050 bitmap->rows << 6 );
1051
1052 Exit:
1053 return error;
1054 }
1055
1056
1057 static FT_Error
1058 winfnt_get_header( FT_Face face,
1059 FT_WinFNT_HeaderRec *aheader )
1060 {
1061 FNT_Font font = ((FNT_Face)face)->font;
1062
1063
1064 *aheader = font->header;
1065
1066 return 0;
1067 }
1068
1069
1070 static const FT_Service_WinFntRec winfnt_service_rec =
1071 {
1072 winfnt_get_header
1073 };
1074
1075 /*
1076 * SERVICE LIST
1077 *
1078 */
1079
1080 static const FT_ServiceDescRec winfnt_services[] =
1081 {
1082 { FT_SERVICE_ID_XF86_NAME, FT_XF86_FORMAT_WINFNT },
1083 { FT_SERVICE_ID_WINFNT, &winfnt_service_rec },
1084 { NULL, NULL }
1085 };
1086
1087
1088 static FT_Module_Interface
1089 winfnt_get_service( FT_Driver driver,
1090 const FT_String* service_id )
1091 {
1092 FT_UNUSED( driver );
1093
1094 return ft_service_list_lookup( winfnt_services, service_id );
1095 }
1096
1097
1098
1099
1100 FT_CALLBACK_TABLE_DEF
1101 const FT_Driver_ClassRec winfnt_driver_class =
1102 {
1103 {
1104 FT_MODULE_FONT_DRIVER |
1105 FT_MODULE_DRIVER_NO_OUTLINES,
1106 sizeof ( FT_DriverRec ),
1107
1108 "winfonts",
1109 0x10000L,
1110 0x20000L,
1111
1112 0,
1113
1114 (FT_Module_Constructor)0,
1115 (FT_Module_Destructor) 0,
1116 (FT_Module_Requester) winfnt_get_service
1117 },
1118
1119 sizeof( FNT_FaceRec ),
1120 sizeof( FT_SizeRec ),
1121 sizeof( FT_GlyphSlotRec ),
1122
1123 (FT_Face_InitFunc) FNT_Face_Init,
1124 (FT_Face_DoneFunc) FNT_Face_Done,
1125 (FT_Size_InitFunc) 0,
1126 (FT_Size_DoneFunc) 0,
1127 (FT_Slot_InitFunc) 0,
1128 (FT_Slot_DoneFunc) 0,
1129
1130 #ifdef FT_CONFIG_OPTION_OLD_INTERNALS
1131 ft_stub_set_char_sizes,
1132 ft_stub_set_pixel_sizes,
1133 #endif
1134 (FT_Slot_LoadFunc) FNT_Load_Glyph,
1135
1136 (FT_Face_GetKerningFunc) 0,
1137 (FT_Face_AttachFunc) 0,
1138 (FT_Face_GetAdvancesFunc) 0,
1139
1140 (FT_Size_RequestFunc) FNT_Size_Request,
1141 (FT_Size_SelectFunc) FNT_Size_Select
1142 };
1143
1144
1145 /* END */
A free Windows-compatible Operating System