1 /***************************************************************************/ 2 /* */ 3 /* afmparse.c */ 4 /* */ 5 /* AFM parser (body). */ 6 /* */ 7 /* Copyright 2006, 2007, 2008, 2009, 2010 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 #include <ft2build.h> 19 #include FT_FREETYPE_H 20 #include FT_INTERNAL_POSTSCRIPT_AUX_H 21 22 #include "afmparse.h" 23 #include "psconv.h" 24 25 #include "psauxerr.h" 26 27 28 /***************************************************************************/ 29 /* */ 30 /* AFM_Stream */ 31 /* */ 32 /* The use of AFM_Stream is largely inspired by parseAFM.[ch] from t1lib. */ 33 /* */ 34 /* */ 35 36 enum 37 { 38 AFM_STREAM_STATUS_NORMAL, 39 AFM_STREAM_STATUS_EOC, 40 AFM_STREAM_STATUS_EOL, 41 AFM_STREAM_STATUS_EOF 42 }; 43 44 45 typedef struct AFM_StreamRec_ 46 { 47 FT_Byte* cursor; 48 FT_Byte* base; 49 FT_Byte* limit; 50 51 FT_Int status; 52 53 } AFM_StreamRec; 54 55 56 #ifndef EOF 57 #define EOF -1 58 #endif 59 60 61 /* this works because empty lines are ignored */ 62 #define AFM_IS_NEWLINE( ch ) ( (ch) == '\r' || (ch) == '\n' ) 63 64 #define AFM_IS_EOF( ch ) ( (ch) == EOF || (ch) == '\x1a' ) 65 #define AFM_IS_SPACE( ch ) ( (ch) == ' ' || (ch) == '\t' ) 66 67 /* column separator; there is no `column' in the spec actually */ 68 #define AFM_IS_SEP( ch ) ( (ch) == ';' ) 69 70 #define AFM_GETC() \ 71 ( ( (stream)->cursor < (stream)->limit ) ? *(stream)->cursor++ \ 72 : EOF ) 73 74 #define AFM_STREAM_KEY_BEGIN( stream ) \ 75 (char*)( (stream)->cursor - 1 ) 76 77 #define AFM_STREAM_KEY_LEN( stream, key ) \ 78 ( (char*)(stream)->cursor - key - 1 ) 79 80 #define AFM_STATUS_EOC( stream ) \ 81 ( (stream)->status >= AFM_STREAM_STATUS_EOC ) 82 83 #define AFM_STATUS_EOL( stream ) \ 84 ( (stream)->status >= AFM_STREAM_STATUS_EOL ) 85 86 #define AFM_STATUS_EOF( stream ) \ 87 ( (stream)->status >= AFM_STREAM_STATUS_EOF ) 88 89 90 static int afm_stream_skip_spaces(AFM_Stream stream)91 afm_stream_skip_spaces( AFM_Stream stream ) 92 { 93 int ch = 0; /* make stupid compiler happy */ 94 95 96 if ( AFM_STATUS_EOC( stream ) ) 97 return ';'; 98 99 while ( 1 ) 100 { 101 ch = AFM_GETC(); 102 if ( !AFM_IS_SPACE( ch ) ) 103 break; 104 } 105 106 if ( AFM_IS_NEWLINE( ch ) ) 107 stream->status = AFM_STREAM_STATUS_EOL; 108 else if ( AFM_IS_SEP( ch ) ) 109 stream->status = AFM_STREAM_STATUS_EOC; 110 else if ( AFM_IS_EOF( ch ) ) 111 stream->status = AFM_STREAM_STATUS_EOF; 112 113 return ch; 114 } 115 116 117 /* read a key or value in current column */ 118 static char* afm_stream_read_one(AFM_Stream stream)119 afm_stream_read_one( AFM_Stream stream ) 120 { 121 char* str; 122 int ch; 123 124 125 afm_stream_skip_spaces( stream ); 126 if ( AFM_STATUS_EOC( stream ) ) 127 return NULL; 128 129 str = AFM_STREAM_KEY_BEGIN( stream ); 130 131 while ( 1 ) 132 { 133 ch = AFM_GETC(); 134 if ( AFM_IS_SPACE( ch ) ) 135 break; 136 else if ( AFM_IS_NEWLINE( ch ) ) 137 { 138 stream->status = AFM_STREAM_STATUS_EOL; 139 break; 140 } 141 else if ( AFM_IS_SEP( ch ) ) 142 { 143 stream->status = AFM_STREAM_STATUS_EOC; 144 break; 145 } 146 else if ( AFM_IS_EOF( ch ) ) 147 { 148 stream->status = AFM_STREAM_STATUS_EOF; 149 break; 150 } 151 } 152 153 return str; 154 } 155 156 157 /* read a string (i.e., read to EOL) */ 158 static char* afm_stream_read_string(AFM_Stream stream)159 afm_stream_read_string( AFM_Stream stream ) 160 { 161 char* str; 162 int ch; 163 164 165 afm_stream_skip_spaces( stream ); 166 if ( AFM_STATUS_EOL( stream ) ) 167 return NULL; 168 169 str = AFM_STREAM_KEY_BEGIN( stream ); 170 171 /* scan to eol */ 172 while ( 1 ) 173 { 174 ch = AFM_GETC(); 175 if ( AFM_IS_NEWLINE( ch ) ) 176 { 177 stream->status = AFM_STREAM_STATUS_EOL; 178 break; 179 } 180 else if ( AFM_IS_EOF( ch ) ) 181 { 182 stream->status = AFM_STREAM_STATUS_EOF; 183 break; 184 } 185 } 186 187 return str; 188 } 189 190 191 /*************************************************************************/ 192 /* */ 193 /* AFM_Parser */ 194 /* */ 195 /* */ 196 197 /* all keys defined in Ch. 7-10 of 5004.AFM_Spec.pdf */ 198 typedef enum AFM_Token_ 199 { 200 AFM_TOKEN_ASCENDER, 201 AFM_TOKEN_AXISLABEL, 202 AFM_TOKEN_AXISTYPE, 203 AFM_TOKEN_B, 204 AFM_TOKEN_BLENDAXISTYPES, 205 AFM_TOKEN_BLENDDESIGNMAP, 206 AFM_TOKEN_BLENDDESIGNPOSITIONS, 207 AFM_TOKEN_C, 208 AFM_TOKEN_CC, 209 AFM_TOKEN_CH, 210 AFM_TOKEN_CAPHEIGHT, 211 AFM_TOKEN_CHARWIDTH, 212 AFM_TOKEN_CHARACTERSET, 213 AFM_TOKEN_CHARACTERS, 214 AFM_TOKEN_DESCENDER, 215 AFM_TOKEN_ENCODINGSCHEME, 216 AFM_TOKEN_ENDAXIS, 217 AFM_TOKEN_ENDCHARMETRICS, 218 AFM_TOKEN_ENDCOMPOSITES, 219 AFM_TOKEN_ENDDIRECTION, 220 AFM_TOKEN_ENDFONTMETRICS, 221 AFM_TOKEN_ENDKERNDATA, 222 AFM_TOKEN_ENDKERNPAIRS, 223 AFM_TOKEN_ENDTRACKKERN, 224 AFM_TOKEN_ESCCHAR, 225 AFM_TOKEN_FAMILYNAME, 226 AFM_TOKEN_FONTBBOX, 227 AFM_TOKEN_FONTNAME, 228 AFM_TOKEN_FULLNAME, 229 AFM_TOKEN_ISBASEFONT, 230 AFM_TOKEN_ISCIDFONT, 231 AFM_TOKEN_ISFIXEDPITCH, 232 AFM_TOKEN_ISFIXEDV, 233 AFM_TOKEN_ITALICANGLE, 234 AFM_TOKEN_KP, 235 AFM_TOKEN_KPH, 236 AFM_TOKEN_KPX, 237 AFM_TOKEN_KPY, 238 AFM_TOKEN_L, 239 AFM_TOKEN_MAPPINGSCHEME, 240 AFM_TOKEN_METRICSSETS, 241 AFM_TOKEN_N, 242 AFM_TOKEN_NOTICE, 243 AFM_TOKEN_PCC, 244 AFM_TOKEN_STARTAXIS, 245 AFM_TOKEN_STARTCHARMETRICS, 246 AFM_TOKEN_STARTCOMPOSITES, 247 AFM_TOKEN_STARTDIRECTION, 248 AFM_TOKEN_STARTFONTMETRICS, 249 AFM_TOKEN_STARTKERNDATA, 250 AFM_TOKEN_STARTKERNPAIRS, 251 AFM_TOKEN_STARTKERNPAIRS0, 252 AFM_TOKEN_STARTKERNPAIRS1, 253 AFM_TOKEN_STARTTRACKKERN, 254 AFM_TOKEN_STDHW, 255 AFM_TOKEN_STDVW, 256 AFM_TOKEN_TRACKKERN, 257 AFM_TOKEN_UNDERLINEPOSITION, 258 AFM_TOKEN_UNDERLINETHICKNESS, 259 AFM_TOKEN_VV, 260 AFM_TOKEN_VVECTOR, 261 AFM_TOKEN_VERSION, 262 AFM_TOKEN_W, 263 AFM_TOKEN_W0, 264 AFM_TOKEN_W0X, 265 AFM_TOKEN_W0Y, 266 AFM_TOKEN_W1, 267 AFM_TOKEN_W1X, 268 AFM_TOKEN_W1Y, 269 AFM_TOKEN_WX, 270 AFM_TOKEN_WY, 271 AFM_TOKEN_WEIGHT, 272 AFM_TOKEN_WEIGHTVECTOR, 273 AFM_TOKEN_XHEIGHT, 274 N_AFM_TOKENS, 275 AFM_TOKEN_UNKNOWN 276 277 } AFM_Token; 278 279 280 static const char* const afm_key_table[N_AFM_TOKENS] = 281 { 282 "Ascender", 283 "AxisLabel", 284 "AxisType", 285 "B", 286 "BlendAxisTypes", 287 "BlendDesignMap", 288 "BlendDesignPositions", 289 "C", 290 "CC", 291 "CH", 292 "CapHeight", 293 "CharWidth", 294 "CharacterSet", 295 "Characters", 296 "Descender", 297 "EncodingScheme", 298 "EndAxis", 299 "EndCharMetrics", 300 "EndComposites", 301 "EndDirection", 302 "EndFontMetrics", 303 "EndKernData", 304 "EndKernPairs", 305 "EndTrackKern", 306 "EscChar", 307 "FamilyName", 308 "FontBBox", 309 "FontName", 310 "FullName", 311 "IsBaseFont", 312 "IsCIDFont", 313 "IsFixedPitch", 314 "IsFixedV", 315 "ItalicAngle", 316 "KP", 317 "KPH", 318 "KPX", 319 "KPY", 320 "L", 321 "MappingScheme", 322 "MetricsSets", 323 "N", 324 "Notice", 325 "PCC", 326 "StartAxis", 327 "StartCharMetrics", 328 "StartComposites", 329 "StartDirection", 330 "StartFontMetrics", 331 "StartKernData", 332 "StartKernPairs", 333 "StartKernPairs0", 334 "StartKernPairs1", 335 "StartTrackKern", 336 "StdHW", 337 "StdVW", 338 "TrackKern", 339 "UnderlinePosition", 340 "UnderlineThickness", 341 "VV", 342 "VVector", 343 "Version", 344 "W", 345 "W0", 346 "W0X", 347 "W0Y", 348 "W1", 349 "W1X", 350 "W1Y", 351 "WX", 352 "WY", 353 "Weight", 354 "WeightVector", 355 "XHeight" 356 }; 357 358 359 /* 360 * `afm_parser_read_vals' and `afm_parser_next_key' provide 361 * high-level operations to an AFM_Stream. The rest of the 362 * parser functions should use them without accessing the 363 * AFM_Stream directly. 364 */ 365 366 FT_LOCAL_DEF( FT_Int ) afm_parser_read_vals(AFM_Parser parser,AFM_Value vals,FT_UInt n)367 afm_parser_read_vals( AFM_Parser parser, 368 AFM_Value vals, 369 FT_UInt n ) 370 { 371 AFM_Stream stream = parser->stream; 372 char* str; 373 FT_UInt i; 374 375 376 if ( n > AFM_MAX_ARGUMENTS ) 377 return 0; 378 379 for ( i = 0; i < n; i++ ) 380 { 381 FT_Offset len; 382 AFM_Value val = vals + i; 383 384 385 if ( val->type == AFM_VALUE_TYPE_STRING ) 386 str = afm_stream_read_string( stream ); 387 else 388 str = afm_stream_read_one( stream ); 389 390 if ( !str ) 391 break; 392 393 len = AFM_STREAM_KEY_LEN( stream, str ); 394 395 switch ( val->type ) 396 { 397 case AFM_VALUE_TYPE_STRING: 398 case AFM_VALUE_TYPE_NAME: 399 { 400 FT_Memory memory = parser->memory; 401 FT_Error error; 402 403 404 if ( !FT_QALLOC( val->u.s, len + 1 ) ) 405 { 406 ft_memcpy( val->u.s, str, len ); 407 val->u.s[len] = '\0'; 408 } 409 } 410 break; 411 412 case AFM_VALUE_TYPE_FIXED: 413 val->u.f = PS_Conv_ToFixed( (FT_Byte**)(void*)&str, 414 (FT_Byte*)str + len, 0 ); 415 break; 416 417 case AFM_VALUE_TYPE_INTEGER: 418 val->u.i = PS_Conv_ToInt( (FT_Byte**)(void*)&str, 419 (FT_Byte*)str + len ); 420 break; 421 422 case AFM_VALUE_TYPE_BOOL: 423 val->u.b = FT_BOOL( len == 4 && 424 !ft_strncmp( str, "true", 4 ) ); 425 break; 426 427 case AFM_VALUE_TYPE_INDEX: 428 if ( parser->get_index ) 429 val->u.i = parser->get_index( str, len, parser->user_data ); 430 else 431 val->u.i = 0; 432 break; 433 } 434 } 435 436 return i; 437 } 438 439 440 FT_LOCAL_DEF( char* ) afm_parser_next_key(AFM_Parser parser,FT_Bool line,FT_Offset * len)441 afm_parser_next_key( AFM_Parser parser, 442 FT_Bool line, 443 FT_Offset* len ) 444 { 445 AFM_Stream stream = parser->stream; 446 char* key = 0; /* make stupid compiler happy */ 447 448 449 if ( line ) 450 { 451 while ( 1 ) 452 { 453 /* skip current line */ 454 if ( !AFM_STATUS_EOL( stream ) ) 455 afm_stream_read_string( stream ); 456 457 stream->status = AFM_STREAM_STATUS_NORMAL; 458 key = afm_stream_read_one( stream ); 459 460 /* skip empty line */ 461 if ( !key && 462 !AFM_STATUS_EOF( stream ) && 463 AFM_STATUS_EOL( stream ) ) 464 continue; 465 466 break; 467 } 468 } 469 else 470 { 471 while ( 1 ) 472 { 473 /* skip current column */ 474 while ( !AFM_STATUS_EOC( stream ) ) 475 afm_stream_read_one( stream ); 476 477 stream->status = AFM_STREAM_STATUS_NORMAL; 478 key = afm_stream_read_one( stream ); 479 480 /* skip empty column */ 481 if ( !key && 482 !AFM_STATUS_EOF( stream ) && 483 AFM_STATUS_EOC( stream ) ) 484 continue; 485 486 break; 487 } 488 } 489 490 if ( len ) 491 *len = ( key ) ? (FT_Offset)AFM_STREAM_KEY_LEN( stream, key ) 492 : 0; 493 494 return key; 495 } 496 497 498 static AFM_Token afm_tokenize(const char * key,FT_Offset len)499 afm_tokenize( const char* key, 500 FT_Offset len ) 501 { 502 int n; 503 504 505 for ( n = 0; n < N_AFM_TOKENS; n++ ) 506 { 507 if ( *( afm_key_table[n] ) == *key ) 508 { 509 for ( ; n < N_AFM_TOKENS; n++ ) 510 { 511 if ( *( afm_key_table[n] ) != *key ) 512 return AFM_TOKEN_UNKNOWN; 513 514 if ( ft_strncmp( afm_key_table[n], key, len ) == 0 ) 515 return (AFM_Token) n; 516 } 517 } 518 } 519 520 return AFM_TOKEN_UNKNOWN; 521 } 522 523 524 FT_LOCAL_DEF( FT_Error ) afm_parser_init(AFM_Parser parser,FT_Memory memory,FT_Byte * base,FT_Byte * limit)525 afm_parser_init( AFM_Parser parser, 526 FT_Memory memory, 527 FT_Byte* base, 528 FT_Byte* limit ) 529 { 530 AFM_Stream stream = NULL; 531 FT_Error error; 532 533 534 if ( FT_NEW( stream ) ) 535 return error; 536 537 stream->cursor = stream->base = base; 538 stream->limit = limit; 539 540 /* don't skip the first line during the first call */ 541 stream->status = AFM_STREAM_STATUS_EOL; 542 543 parser->memory = memory; 544 parser->stream = stream; 545 parser->FontInfo = NULL; 546 parser->get_index = NULL; 547 548 return PSaux_Err_Ok; 549 } 550 551 552 FT_LOCAL( void ) afm_parser_done(AFM_Parser parser)553 afm_parser_done( AFM_Parser parser ) 554 { 555 FT_Memory memory = parser->memory; 556 557 558 FT_FREE( parser->stream ); 559 } 560 561 562 FT_LOCAL_DEF( FT_Error ) afm_parser_read_int(AFM_Parser parser,FT_Int * aint)563 afm_parser_read_int( AFM_Parser parser, 564 FT_Int* aint ) 565 { 566 AFM_ValueRec val; 567 568 569 val.type = AFM_VALUE_TYPE_INTEGER; 570 571 if ( afm_parser_read_vals( parser, &val, 1 ) == 1 ) 572 { 573 *aint = val.u.i; 574 575 return PSaux_Err_Ok; 576 } 577 else 578 return PSaux_Err_Syntax_Error; 579 } 580 581 582 static FT_Error afm_parse_track_kern(AFM_Parser parser)583 afm_parse_track_kern( AFM_Parser parser ) 584 { 585 AFM_FontInfo fi = parser->FontInfo; 586 AFM_TrackKern tk; 587 char* key; 588 FT_Offset len; 589 int n = -1; 590 591 592 if ( afm_parser_read_int( parser, &fi->NumTrackKern ) ) 593 goto Fail; 594 595 if ( fi->NumTrackKern ) 596 { 597 FT_Memory memory = parser->memory; 598 FT_Error error; 599 600 601 if ( FT_QNEW_ARRAY( fi->TrackKerns, fi->NumTrackKern ) ) 602 return error; 603 } 604 605 while ( ( key = afm_parser_next_key( parser, 1, &len ) ) != 0 ) 606 { 607 AFM_ValueRec shared_vals[5]; 608 609 610 switch ( afm_tokenize( key, len ) ) 611 { 612 case AFM_TOKEN_TRACKKERN: 613 n++; 614 615 if ( n >= fi->NumTrackKern ) 616 goto Fail; 617 618 tk = fi->TrackKerns + n; 619 620 shared_vals[0].type = AFM_VALUE_TYPE_INTEGER; 621 shared_vals[1].type = AFM_VALUE_TYPE_FIXED; 622 shared_vals[2].type = AFM_VALUE_TYPE_FIXED; 623 shared_vals[3].type = AFM_VALUE_TYPE_FIXED; 624 shared_vals[4].type = AFM_VALUE_TYPE_FIXED; 625 if ( afm_parser_read_vals( parser, shared_vals, 5 ) != 5 ) 626 goto Fail; 627 628 tk->degree = shared_vals[0].u.i; 629 tk->min_ptsize = shared_vals[1].u.f; 630 tk->min_kern = shared_vals[2].u.f; 631 tk->max_ptsize = shared_vals[3].u.f; 632 tk->max_kern = shared_vals[4].u.f; 633 634 /* is this correct? */ 635 if ( tk->degree < 0 && tk->min_kern > 0 ) 636 tk->min_kern = -tk->min_kern; 637 break; 638 639 case AFM_TOKEN_ENDTRACKKERN: 640 case AFM_TOKEN_ENDKERNDATA: 641 case AFM_TOKEN_ENDFONTMETRICS: 642 fi->NumTrackKern = n + 1; 643 return PSaux_Err_Ok; 644 645 case AFM_TOKEN_UNKNOWN: 646 break; 647 648 default: 649 goto Fail; 650 } 651 } 652 653 Fail: 654 return PSaux_Err_Syntax_Error; 655 } 656 657 658 #undef KERN_INDEX 659 #define KERN_INDEX( g1, g2 ) ( ( (FT_ULong)g1 << 16 ) | g2 ) 660 661 662 /* compare two kerning pairs */ 663 FT_CALLBACK_DEF( int ) afm_compare_kern_pairs(const void * a,const void * b)664 afm_compare_kern_pairs( const void* a, 665 const void* b ) 666 { 667 AFM_KernPair kp1 = (AFM_KernPair)a; 668 AFM_KernPair kp2 = (AFM_KernPair)b; 669 670 FT_ULong index1 = KERN_INDEX( kp1->index1, kp1->index2 ); 671 FT_ULong index2 = KERN_INDEX( kp2->index1, kp2->index2 ); 672 673 674 if ( index1 > index2 ) 675 return 1; 676 else if ( index1 < index2 ) 677 return -1; 678 else 679 return 0; 680 } 681 682 683 static FT_Error afm_parse_kern_pairs(AFM_Parser parser)684 afm_parse_kern_pairs( AFM_Parser parser ) 685 { 686 AFM_FontInfo fi = parser->FontInfo; 687 AFM_KernPair kp; 688 char* key; 689 FT_Offset len; 690 int n = -1; 691 692 693 if ( afm_parser_read_int( parser, &fi->NumKernPair ) ) 694 goto Fail; 695 696 if ( fi->NumKernPair ) 697 { 698 FT_Memory memory = parser->memory; 699 FT_Error error; 700 701 702 if ( FT_QNEW_ARRAY( fi->KernPairs, fi->NumKernPair ) ) 703 return error; 704 } 705 706 while ( ( key = afm_parser_next_key( parser, 1, &len ) ) != 0 ) 707 { 708 AFM_Token token = afm_tokenize( key, len ); 709 710 711 switch ( token ) 712 { 713 case AFM_TOKEN_KP: 714 case AFM_TOKEN_KPX: 715 case AFM_TOKEN_KPY: 716 { 717 FT_Int r; 718 AFM_ValueRec shared_vals[4]; 719 720 721 n++; 722 723 if ( n >= fi->NumKernPair ) 724 goto Fail; 725 726 kp = fi->KernPairs + n; 727 728 shared_vals[0].type = AFM_VALUE_TYPE_INDEX; 729 shared_vals[1].type = AFM_VALUE_TYPE_INDEX; 730 shared_vals[2].type = AFM_VALUE_TYPE_INTEGER; 731 shared_vals[3].type = AFM_VALUE_TYPE_INTEGER; 732 r = afm_parser_read_vals( parser, shared_vals, 4 ); 733 if ( r < 3 ) 734 goto Fail; 735 736 kp->index1 = shared_vals[0].u.i; 737 kp->index2 = shared_vals[1].u.i; 738 if ( token == AFM_TOKEN_KPY ) 739 { 740 kp->x = 0; 741 kp->y = shared_vals[2].u.i; 742 } 743 else 744 { 745 kp->x = shared_vals[2].u.i; 746 kp->y = ( token == AFM_TOKEN_KP && r == 4 ) 747 ? shared_vals[3].u.i : 0; 748 } 749 } 750 break; 751 752 case AFM_TOKEN_ENDKERNPAIRS: 753 case AFM_TOKEN_ENDKERNDATA: 754 case AFM_TOKEN_ENDFONTMETRICS: 755 fi->NumKernPair = n + 1; 756 ft_qsort( fi->KernPairs, fi->NumKernPair, 757 sizeof( AFM_KernPairRec ), 758 afm_compare_kern_pairs ); 759 return PSaux_Err_Ok; 760 761 case AFM_TOKEN_UNKNOWN: 762 break; 763 764 default: 765 goto Fail; 766 } 767 } 768 769 Fail: 770 return PSaux_Err_Syntax_Error; 771 } 772 773 774 static FT_Error afm_parse_kern_data(AFM_Parser parser)775 afm_parse_kern_data( AFM_Parser parser ) 776 { 777 FT_Error error; 778 char* key; 779 FT_Offset len; 780 781 782 while ( ( key = afm_parser_next_key( parser, 1, &len ) ) != 0 ) 783 { 784 switch ( afm_tokenize( key, len ) ) 785 { 786 case AFM_TOKEN_STARTTRACKKERN: 787 error = afm_parse_track_kern( parser ); 788 if ( error ) 789 return error; 790 break; 791 792 case AFM_TOKEN_STARTKERNPAIRS: 793 case AFM_TOKEN_STARTKERNPAIRS0: 794 error = afm_parse_kern_pairs( parser ); 795 if ( error ) 796 return error; 797 break; 798 799 case AFM_TOKEN_ENDKERNDATA: 800 case AFM_TOKEN_ENDFONTMETRICS: 801 return PSaux_Err_Ok; 802 803 case AFM_TOKEN_UNKNOWN: 804 break; 805 806 default: 807 goto Fail; 808 } 809 } 810 811 Fail: 812 return PSaux_Err_Syntax_Error; 813 } 814 815 816 static FT_Error afm_parser_skip_section(AFM_Parser parser,FT_UInt n,AFM_Token end_section)817 afm_parser_skip_section( AFM_Parser parser, 818 FT_UInt n, 819 AFM_Token end_section ) 820 { 821 char* key; 822 FT_Offset len; 823 824 825 while ( n-- > 0 ) 826 { 827 key = afm_parser_next_key( parser, 1, NULL ); 828 if ( !key ) 829 goto Fail; 830 } 831 832 while ( ( key = afm_parser_next_key( parser, 1, &len ) ) != 0 ) 833 { 834 AFM_Token token = afm_tokenize( key, len ); 835 836 837 if ( token == end_section || token == AFM_TOKEN_ENDFONTMETRICS ) 838 return PSaux_Err_Ok; 839 } 840 841 Fail: 842 return PSaux_Err_Syntax_Error; 843 } 844 845 846 FT_LOCAL_DEF( FT_Error ) afm_parser_parse(AFM_Parser parser)847 afm_parser_parse( AFM_Parser parser ) 848 { 849 FT_Memory memory = parser->memory; 850 AFM_FontInfo fi = parser->FontInfo; 851 FT_Error error = PSaux_Err_Syntax_Error; 852 char* key; 853 FT_Offset len; 854 FT_Int metrics_sets = 0; 855 856 857 if ( !fi ) 858 return PSaux_Err_Invalid_Argument; 859 860 key = afm_parser_next_key( parser, 1, &len ); 861 if ( !key || len != 16 || 862 ft_strncmp( key, "StartFontMetrics", 16 ) != 0 ) 863 return PSaux_Err_Unknown_File_Format; 864 865 while ( ( key = afm_parser_next_key( parser, 1, &len ) ) != 0 ) 866 { 867 AFM_ValueRec shared_vals[4]; 868 869 870 switch ( afm_tokenize( key, len ) ) 871 { 872 case AFM_TOKEN_METRICSSETS: 873 if ( afm_parser_read_int( parser, &metrics_sets ) ) 874 goto Fail; 875 876 if ( metrics_sets != 0 && metrics_sets != 2 ) 877 { 878 error = PSaux_Err_Unimplemented_Feature; 879 880 goto Fail; 881 } 882 break; 883 884 case AFM_TOKEN_ISCIDFONT: 885 shared_vals[0].type = AFM_VALUE_TYPE_BOOL; 886 if ( afm_parser_read_vals( parser, shared_vals, 1 ) != 1 ) 887 goto Fail; 888 889 fi->IsCIDFont = shared_vals[0].u.b; 890 break; 891 892 case AFM_TOKEN_FONTBBOX: 893 shared_vals[0].type = AFM_VALUE_TYPE_FIXED; 894 shared_vals[1].type = AFM_VALUE_TYPE_FIXED; 895 shared_vals[2].type = AFM_VALUE_TYPE_FIXED; 896 shared_vals[3].type = AFM_VALUE_TYPE_FIXED; 897 if ( afm_parser_read_vals( parser, shared_vals, 4 ) != 4 ) 898 goto Fail; 899 900 fi->FontBBox.xMin = shared_vals[0].u.f; 901 fi->FontBBox.yMin = shared_vals[1].u.f; 902 fi->FontBBox.xMax = shared_vals[2].u.f; 903 fi->FontBBox.yMax = shared_vals[3].u.f; 904 break; 905 906 case AFM_TOKEN_ASCENDER: 907 shared_vals[0].type = AFM_VALUE_TYPE_FIXED; 908 if ( afm_parser_read_vals( parser, shared_vals, 1 ) != 1 ) 909 goto Fail; 910 911 fi->Ascender = shared_vals[0].u.f; 912 break; 913 914 case AFM_TOKEN_DESCENDER: 915 shared_vals[0].type = AFM_VALUE_TYPE_FIXED; 916 if ( afm_parser_read_vals( parser, shared_vals, 1 ) != 1 ) 917 goto Fail; 918 919 fi->Descender = shared_vals[0].u.f; 920 break; 921 922 case AFM_TOKEN_STARTCHARMETRICS: 923 { 924 FT_Int n = 0; 925 926 927 if ( afm_parser_read_int( parser, &n ) ) 928 goto Fail; 929 930 error = afm_parser_skip_section( parser, n, 931 AFM_TOKEN_ENDCHARMETRICS ); 932 if ( error ) 933 return error; 934 } 935 break; 936 937 case AFM_TOKEN_STARTKERNDATA: 938 error = afm_parse_kern_data( parser ); 939 if ( error ) 940 goto Fail; 941 /* fall through since we only support kern data */ 942 943 case AFM_TOKEN_ENDFONTMETRICS: 944 return PSaux_Err_Ok; 945 946 default: 947 break; 948 } 949 } 950 951 Fail: 952 FT_FREE( fi->TrackKerns ); 953 fi->NumTrackKern = 0; 954 955 FT_FREE( fi->KernPairs ); 956 fi->NumKernPair = 0; 957 958 fi->IsCIDFont = 0; 959 960 return error; 961 } 962 963 964 /* END */ 965