1 /***************************************************************************/
2 /* */
3 /* psft.c */
4 /* */
5 /* FreeType Glue Component to Adobe's Interpreter (body). */
6 /* */
7 /* Copyright 2013-2014 Adobe Systems Incorporated. */
8 /* */
9 /* This software, and all works of authorship, whether in source or */
10 /* object code form as indicated by the copyright notice(s) included */
11 /* herein (collectively, the "Work") is made available, and may only be */
12 /* used, modified, and distributed under the FreeType Project License, */
13 /* LICENSE.TXT. Additionally, subject to the terms and conditions of the */
14 /* FreeType Project License, each contributor to the Work hereby grants */
15 /* to any individual or legal entity exercising permissions granted by */
16 /* the FreeType Project License and this section (hereafter, "You" or */
17 /* "Your") a perpetual, worldwide, non-exclusive, no-charge, */
18 /* royalty-free, irrevocable (except as stated in this section) patent */
19 /* license to make, have made, use, offer to sell, sell, import, and */
20 /* otherwise transfer the Work, where such license applies only to those */
21 /* patent claims licensable by such contributor that are necessarily */
22 /* infringed by their contribution(s) alone or by combination of their */
23 /* contribution(s) with the Work to which such contribution(s) was */
24 /* submitted. If You institute patent litigation against any entity */
25 /* (including a cross-claim or counterclaim in a lawsuit) alleging that */
26 /* the Work or a contribution incorporated within the Work constitutes */
27 /* direct or contributory patent infringement, then any patent licenses */
28 /* granted to You under this License for that Work shall terminate as of */
29 /* the date such litigation is filed. */
30 /* */
31 /* By using, modifying, or distributing the Work you indicate that you */
32 /* have read and understood the terms and conditions of the */
33 /* FreeType Project License as well as those provided in this section, */
34 /* and you accept them fully. */
35 /* */
36 /***************************************************************************/
37
38
39 #include "psft.h"
40 #include FT_INTERNAL_DEBUG_H
41
42 #include "psfont.h"
43 #include "pserror.h"
44 #include "psobjs.h"
45 #include "cffdecode.h"
46
47 #ifdef TT_CONFIG_OPTION_GX_VAR_SUPPORT
48 #include FT_MULTIPLE_MASTERS_H
49 #include FT_SERVICE_MULTIPLE_MASTERS_H
50 #endif
51
52 #include FT_SERVICE_CFF_TABLE_LOAD_H
53
54
55 #define CF2_MAX_SIZE cf2_intToFixed( 2000 ) /* max ppem */
56
57
58 /*
59 * This check should avoid most internal overflow cases. Clients should
60 * generally respond to `Glyph_Too_Big' by getting a glyph outline
61 * at EM size, scaling it and filling it as a graphics operation.
62 *
63 */
64 static FT_Error
65 cf2_checkTransform( const CF2_Matrix* transform,
66 CF2_Int unitsPerEm )
67 {
68 CF2_Fixed maxScale;
69
70
71 FT_ASSERT( unitsPerEm > 0 );
72
73 if ( transform->a <= 0 || transform->d <= 0 )
74 return FT_THROW( Invalid_Size_Handle );
75
76 FT_ASSERT( transform->b == 0 && transform->c == 0 );
77 FT_ASSERT( transform->tx == 0 && transform->ty == 0 );
78
79 if ( unitsPerEm > 0x7FFF )
80 return FT_THROW( Glyph_Too_Big );
81
82 maxScale = FT_DivFix( CF2_MAX_SIZE, cf2_intToFixed( unitsPerEm ) );
83
84 if ( transform->a > maxScale || transform->d > maxScale )
85 return FT_THROW( Glyph_Too_Big );
86
87 return FT_Err_Ok;
88 }
89
90
91 static void
92 cf2_setGlyphWidth( CF2_Outline outline,
93 CF2_Fixed width )
94 {
95 PS_Decoder* decoder = outline->decoder;
96
97
98 FT_ASSERT( decoder );
99
100 if ( !decoder->builder.is_t1 )
101 *decoder->glyph_width = cf2_fixedToInt( width );
102 }
103
104
105 /* Clean up font instance. */
106 static void
107 cf2_free_instance( void* ptr )
108 {
109 CF2_Font font = (CF2_Font)ptr;
110
111
112 if ( font )
113 {
114 FT_Memory memory = font->memory;
115
116
117 FT_FREE( font->blend.lastNDV );
118 FT_FREE( font->blend.BV );
119 }
120 }
121
122
123 /********************************************/
124 /* */
125 /* functions for handling client outline; */
126 /* FreeType uses coordinates in 26.6 format */
127 /* */
128 /********************************************/
129
130 static void
131 cf2_builder_moveTo( CF2_OutlineCallbacks callbacks,
132 const CF2_CallbackParams params )
133 {
134 /* downcast the object pointer */
135 CF2_Outline outline = (CF2_Outline)callbacks;
136 PS_Builder* builder;
137
138 (void)params; /* only used in debug mode */
139
140
141 FT_ASSERT( outline && outline->decoder );
142 FT_ASSERT( params->op == CF2_PathOpMoveTo );
143
144 builder = &outline->decoder->builder;
145
146 /* note: two successive moves simply close the contour twice */
147 ps_builder_close_contour( builder );
148 builder->path_begun = 0;
149 }
150
151
152 static void
153 cf2_builder_lineTo( CF2_OutlineCallbacks callbacks,
154 const CF2_CallbackParams params )
155 {
156 FT_Error error;
157
158 /* downcast the object pointer */
159 CF2_Outline outline = (CF2_Outline)callbacks;
160 PS_Builder* builder;
161
162
163 FT_ASSERT( outline && outline->decoder );
164 FT_ASSERT( params->op == CF2_PathOpLineTo );
165
166 builder = &outline->decoder->builder;
167
168 if ( !builder->path_begun )
169 {
170 /* record the move before the line; also check points and set */
171 /* `path_begun' */
172 error = ps_builder_start_point( builder,
173 params->pt0.x,
174 params->pt0.y );
175 if ( error )
176 {
177 if ( !*callbacks->error )
178 *callbacks->error = error;
179 return;
180 }
181 }
182
183 /* `ps_builder_add_point1' includes a check_points call for one point */
184 error = ps_builder_add_point1( builder,
185 params->pt1.x,
186 params->pt1.y );
187 if ( error )
188 {
189 if ( !*callbacks->error )
190 *callbacks->error = error;
191 return;
192 }
193 }
194
195
196 static void
197 cf2_builder_cubeTo( CF2_OutlineCallbacks callbacks,
198 const CF2_CallbackParams params )
199 {
200 FT_Error error;
201
202 /* downcast the object pointer */
203 CF2_Outline outline = (CF2_Outline)callbacks;
204 PS_Builder* builder;
205
206
207 FT_ASSERT( outline && outline->decoder );
208 FT_ASSERT( params->op == CF2_PathOpCubeTo );
209
210 builder = &outline->decoder->builder;
211
212 if ( !builder->path_begun )
213 {
214 /* record the move before the line; also check points and set */
215 /* `path_begun' */
216 error = ps_builder_start_point( builder,
217 params->pt0.x,
218 params->pt0.y );
219 if ( error )
220 {
221 if ( !*callbacks->error )
222 *callbacks->error = error;
223 return;
224 }
225 }
226
227 /* prepare room for 3 points: 2 off-curve, 1 on-curve */
228 error = ps_builder_check_points( builder, 3 );
229 if ( error )
230 {
231 if ( !*callbacks->error )
232 *callbacks->error = error;
233 return;
234 }
235
236 ps_builder_add_point( builder,
237 params->pt1.x,
238 params->pt1.y, 0 );
239 ps_builder_add_point( builder,
240 params->pt2.x,
241 params->pt2.y, 0 );
242 ps_builder_add_point( builder,
243 params->pt3.x,
244 params->pt3.y, 1 );
245 }
246
247
248 static void
249 cf2_outline_init( CF2_Outline outline,
250 FT_Memory memory,
251 FT_Error* error )
252 {
253 FT_ZERO( outline );
254
255 outline->root.memory = memory;
256 outline->root.error = error;
257
258 outline->root.moveTo = cf2_builder_moveTo;
259 outline->root.lineTo = cf2_builder_lineTo;
260 outline->root.cubeTo = cf2_builder_cubeTo;
261 }
262
263
264 /* get scaling and hint flag from GlyphSlot */
265 static void
266 cf2_getScaleAndHintFlag( PS_Decoder* decoder,
267 CF2_Fixed* x_scale,
268 CF2_Fixed* y_scale,
269 FT_Bool* hinted,
270 FT_Bool* scaled )
271 {
272 FT_ASSERT( decoder && decoder->builder.glyph );
273
274 /* note: FreeType scale includes a factor of 64 */
275 *hinted = decoder->builder.glyph->hint;
276 *scaled = decoder->builder.glyph->scaled;
277
278 if ( *hinted )
279 {
280 *x_scale = ADD_INT32( decoder->builder.glyph->x_scale, 32 ) / 64;
281 *y_scale = ADD_INT32( decoder->builder.glyph->y_scale, 32 ) / 64;
282 }
283 else
284 {
285 /* for unhinted outlines, `cff_slot_load' does the scaling, */
286 /* thus render at `unity' scale */
287
288 *x_scale = 0x0400; /* 1/64 as 16.16 */
289 *y_scale = 0x0400;
290 }
291 }
292
293
294 /* get units per em from `FT_Face' */
295 /* TODO: should handle font matrix concatenation? */
296 static FT_UShort
297 cf2_getUnitsPerEm( PS_Decoder* decoder )
298 {
299 FT_ASSERT( decoder && decoder->builder.face );
300 FT_ASSERT( decoder->builder.face->units_per_EM );
301
302 return decoder->builder.face->units_per_EM;
303 }
304
305
306 /* Main entry point: Render one glyph. */
307 FT_LOCAL_DEF( FT_Error )
308 cf2_decoder_parse_charstrings( PS_Decoder* decoder,
309 FT_Byte* charstring_base,
310 FT_ULong charstring_len )
311 {
312 FT_Memory memory;
313 FT_Error error = FT_Err_Ok;
314 CF2_Font font;
315
316 FT_Bool is_t1 = decoder->builder.is_t1;
317
318
319 FT_ASSERT( decoder &&
320 ( is_t1 || decoder->cff ) );
321
322 if ( is_t1 && !decoder->current_subfont )
323 {
324 FT_ERROR(( "cf2_decoder_parse_charstrings (Type 1): "
325 "SubFont missing. Use `t1_make_subfont' first\n" ));
326 return FT_THROW( Invalid_Table );
327 }
328
329 memory = decoder->builder.memory;
330
331 /* CF2 data is saved here across glyphs */
332 font = (CF2_Font)decoder->cf2_instance->data;
333
334 /* on first glyph, allocate instance structure */
335 if ( !decoder->cf2_instance->data )
336 {
337 decoder->cf2_instance->finalizer =
338 (FT_Generic_Finalizer)cf2_free_instance;
339
340 if ( FT_ALLOC( decoder->cf2_instance->data,
341 sizeof ( CF2_FontRec ) ) )
342 return FT_THROW( Out_Of_Memory );
343
344 font = (CF2_Font)decoder->cf2_instance->data;
345
346 font->memory = memory;
347
348 if ( !is_t1 )
349 font->cffload = (FT_Service_CFFLoad)decoder->cff->cffload;
350
351 /* initialize a client outline, to be shared by each glyph rendered */
352 cf2_outline_init( &font->outline, font->memory, &font->error );
353 }
354
355 /* save decoder; it is a stack variable and will be different on each */
356 /* call */
357 font->decoder = decoder;
358 font->outline.decoder = decoder;
359
360 {
361 /* build parameters for Adobe engine */
362
363 PS_Builder* builder = &decoder->builder;
364 PS_Driver driver = (PS_Driver)FT_FACE_DRIVER( builder->face );
365
366 FT_Bool no_stem_darkening_driver =
367 driver->no_stem_darkening;
368 FT_Char no_stem_darkening_font =
369 builder->face->internal->no_stem_darkening;
370
371 /* local error */
372 FT_Error error2 = FT_Err_Ok;
373 CF2_BufferRec buf;
374 CF2_Matrix transform;
375 CF2_F16Dot16 glyphWidth;
376
377 FT_Bool hinted;
378 FT_Bool scaled;
379
380
381 /* FreeType has already looked up the GID; convert to */
382 /* `RegionBuffer', assuming that the input has been validated */
383 FT_ASSERT( charstring_base + charstring_len >= charstring_base );
384
385 FT_ZERO( &buf );
386 buf.start =
387 buf.ptr = charstring_base;
388 buf.end = charstring_base + charstring_len;
389
390 FT_ZERO( &transform );
391
392 cf2_getScaleAndHintFlag( decoder,
393 &transform.a,
394 &transform.d,
395 &hinted,
396 &scaled );
397
398 if ( is_t1 )
399 font->isCFF2 = FALSE;
400 else
401 {
402 /* copy isCFF2 boolean from TT_Face to CF2_Font */
403 font->isCFF2 = ((TT_Face)builder->face)->is_cff2;
404 }
405 font->isT1 = is_t1;
406
407 font->renderingFlags = 0;
408 if ( hinted )
409 font->renderingFlags |= CF2_FlagsHinted;
410 if ( scaled && ( !no_stem_darkening_font ||
411 ( no_stem_darkening_font < 0 &&
412 !no_stem_darkening_driver ) ) )
413 font->renderingFlags |= CF2_FlagsDarkened;
414
415 font->darkenParams[0] = driver->darken_params[0];
416 font->darkenParams[1] = driver->darken_params[1];
417 font->darkenParams[2] = driver->darken_params[2];
418 font->darkenParams[3] = driver->darken_params[3];
419 font->darkenParams[4] = driver->darken_params[4];
420 font->darkenParams[5] = driver->darken_params[5];
421 font->darkenParams[6] = driver->darken_params[6];
422 font->darkenParams[7] = driver->darken_params[7];
423
424 /* now get an outline for this glyph; */
425 /* also get units per em to validate scale */
426 font->unitsPerEm = (CF2_Int)cf2_getUnitsPerEm( decoder );
427
428 if ( scaled )
429 {
430 error2 = cf2_checkTransform( &transform, font->unitsPerEm );
431 if ( error2 )
432 return error2;
433 }
434
435 error2 = cf2_getGlyphOutline( font, &buf, &transform, &glyphWidth );
436 if ( error2 )
437 return FT_ERR( Invalid_File_Format );
438
439 cf2_setGlyphWidth( &font->outline, glyphWidth );
440
441 return FT_Err_Ok;
442 }
443 }
444
445
446 /* get pointer to current FreeType subfont (based on current glyphID) */
447 FT_LOCAL_DEF( CFF_SubFont )
448 cf2_getSubfont( PS_Decoder* decoder )
449 {
450 FT_ASSERT( decoder && decoder->current_subfont );
451
452 return decoder->current_subfont;
453 }
454
455
456 /* get pointer to VStore structure */
457 FT_LOCAL_DEF( CFF_VStore )
458 cf2_getVStore( PS_Decoder* decoder )
459 {
460 FT_ASSERT( decoder && decoder->cff );
461
462 return &decoder->cff->vstore;
463 }
464
465
466 /* get maxstack value from CFF2 Top DICT */
467 FT_LOCAL_DEF( FT_UInt )
468 cf2_getMaxstack( PS_Decoder* decoder )
469 {
470 FT_ASSERT( decoder && decoder->cff );
471
472 return decoder->cff->top_font.font_dict.maxstack;
473 }
474
475
476 #ifdef TT_CONFIG_OPTION_GX_VAR_SUPPORT
477 /* Get normalized design vector for current render request; */
478 /* return pointer and length. */
479 /* */
480 /* Note: Uses FT_Fixed not CF2_Fixed for the vector. */
481 FT_LOCAL_DEF( FT_Error )
482 cf2_getNormalizedVector( PS_Decoder* decoder,
483 CF2_UInt *len,
484 FT_Fixed* *vec )
485 {
486 TT_Face face;
487 FT_Service_MultiMasters mm;
488
489
490 FT_ASSERT( decoder && decoder->builder.face );
491 FT_ASSERT( vec && len );
492 FT_ASSERT( !decoder->builder.is_t1 );
493
494 face = (TT_Face)decoder->builder.face;
495 mm = (FT_Service_MultiMasters)face->mm;
496
497 return mm->get_var_blend( FT_FACE( face ), len, NULL, vec, NULL );
498 }
499 #endif
500
501
502 /* get `y_ppem' from `CFF_Size' */
503 FT_LOCAL_DEF( CF2_Fixed )
504 cf2_getPpemY( PS_Decoder* decoder )
505 {
506 FT_ASSERT( decoder &&
507 decoder->builder.face &&
508 decoder->builder.face->size );
509
510 /*
511 * Note that `y_ppem' can be zero if there wasn't a call to
512 * `FT_Set_Char_Size' or something similar. However, this isn't a
513 * problem since we come to this place in the code only if
514 * FT_LOAD_NO_SCALE is set (the other case gets caught by
515 * `cf2_checkTransform'). The ppem value is needed to compute the stem
516 * darkening, which is disabled for getting the unscaled outline.
517 *
518 */
519 return cf2_intToFixed(
520 decoder->builder.face->size->metrics.y_ppem );
521 }
522
523
524 /* get standard stem widths for the current subfont; */
525 /* FreeType stores these as integer font units */
526 /* (note: variable names seem swapped) */
527 FT_LOCAL_DEF( CF2_Fixed )
528 cf2_getStdVW( PS_Decoder* decoder )
529 {
530 FT_ASSERT( decoder && decoder->current_subfont );
531
532 return cf2_intToFixed(
533 decoder->current_subfont->private_dict.standard_height );
534 }
535
536
537 FT_LOCAL_DEF( CF2_Fixed )
538 cf2_getStdHW( PS_Decoder* decoder )
539 {
540 FT_ASSERT( decoder && decoder->current_subfont );
541
542 return cf2_intToFixed(
543 decoder->current_subfont->private_dict.standard_width );
544 }
545
546
547 /* note: FreeType stores 1000 times the actual value for `BlueScale' */
548 FT_LOCAL_DEF( void )
549 cf2_getBlueMetrics( PS_Decoder* decoder,
550 CF2_Fixed* blueScale,
551 CF2_Fixed* blueShift,
552 CF2_Fixed* blueFuzz )
553 {
554 FT_ASSERT( decoder && decoder->current_subfont );
555
556 *blueScale = FT_DivFix(
557 decoder->current_subfont->private_dict.blue_scale,
558 cf2_intToFixed( 1000 ) );
559 *blueShift = cf2_intToFixed(
560 decoder->current_subfont->private_dict.blue_shift );
561 *blueFuzz = cf2_intToFixed(
562 decoder->current_subfont->private_dict.blue_fuzz );
563 }
564
565
566 /* get blue values counts and arrays; the FreeType parser has validated */
567 /* the counts and verified that each is an even number */
568 FT_LOCAL_DEF( void )
569 cf2_getBlueValues( PS_Decoder* decoder,
570 size_t* count,
571 FT_Pos* *data )
572 {
573 FT_ASSERT( decoder && decoder->current_subfont );
574
575 *count = decoder->current_subfont->private_dict.num_blue_values;
576 *data = (FT_Pos*)
577 &decoder->current_subfont->private_dict.blue_values;
578 }
579
580
581 FT_LOCAL_DEF( void )
582 cf2_getOtherBlues( PS_Decoder* decoder,
583 size_t* count,
584 FT_Pos* *data )
585 {
586 FT_ASSERT( decoder && decoder->current_subfont );
587
588 *count = decoder->current_subfont->private_dict.num_other_blues;
589 *data = (FT_Pos*)
590 &decoder->current_subfont->private_dict.other_blues;
591 }
592
593
594 FT_LOCAL_DEF( void )
595 cf2_getFamilyBlues( PS_Decoder* decoder,
596 size_t* count,
597 FT_Pos* *data )
598 {
599 FT_ASSERT( decoder && decoder->current_subfont );
600
601 *count = decoder->current_subfont->private_dict.num_family_blues;
602 *data = (FT_Pos*)
603 &decoder->current_subfont->private_dict.family_blues;
604 }
605
606
607 FT_LOCAL_DEF( void )
608 cf2_getFamilyOtherBlues( PS_Decoder* decoder,
609 size_t* count,
610 FT_Pos* *data )
611 {
612 FT_ASSERT( decoder && decoder->current_subfont );
613
614 *count = decoder->current_subfont->private_dict.num_family_other_blues;
615 *data = (FT_Pos*)
616 &decoder->current_subfont->private_dict.family_other_blues;
617 }
618
619
620 FT_LOCAL_DEF( CF2_Int )
621 cf2_getLanguageGroup( PS_Decoder* decoder )
622 {
623 FT_ASSERT( decoder && decoder->current_subfont );
624
625 return decoder->current_subfont->private_dict.language_group;
626 }
627
628
629 /* convert unbiased subroutine index to `CF2_Buffer' and */
630 /* return 0 on success */
631 FT_LOCAL_DEF( CF2_Int )
632 cf2_initGlobalRegionBuffer( PS_Decoder* decoder,
633 CF2_Int subrNum,
634 CF2_Buffer buf )
635 {
636 CF2_UInt idx;
637
638
639 FT_ASSERT( decoder );
640
641 FT_ZERO( buf );
642
643 idx = (CF2_UInt)( subrNum + decoder->globals_bias );
644 if ( idx >= decoder->num_globals )
645 return TRUE; /* error */
646
647 FT_ASSERT( decoder->globals );
648
649 buf->start =
650 buf->ptr = decoder->globals[idx];
651 buf->end = decoder->globals[idx + 1];
652
653 return FALSE; /* success */
654 }
655
656
657 /* convert AdobeStandardEncoding code to CF2_Buffer; */
658 /* used for seac component */
659 FT_LOCAL_DEF( FT_Error )
660 cf2_getSeacComponent( PS_Decoder* decoder,
661 CF2_Int code,
662 CF2_Buffer buf )
663 {
664 CF2_Int gid;
665 FT_Byte* charstring;
666 FT_ULong len;
667 FT_Error error;
668
669
670 FT_ASSERT( decoder );
671 FT_ASSERT( !decoder->builder.is_t1 );
672
673 FT_ZERO( buf );
674
675 #ifdef FT_CONFIG_OPTION_INCREMENTAL
676 /* Incremental fonts don't necessarily have valid charsets. */
677 /* They use the character code, not the glyph index, in this case. */
678 if ( decoder->builder.face->internal->incremental_interface )
679 gid = code;
680 else
681 #endif /* FT_CONFIG_OPTION_INCREMENTAL */
682 {
683 gid = cff_lookup_glyph_by_stdcharcode( decoder->cff, code );
684 if ( gid < 0 )
685 return FT_THROW( Invalid_Glyph_Format );
686 }
687
688 error = decoder->get_glyph_callback( (TT_Face)decoder->builder.face,
689 (CF2_UInt)gid,
690 &charstring,
691 &len );
692 /* TODO: for now, just pass the FreeType error through */
693 if ( error )
694 return error;
695
696 /* assume input has been validated */
697 FT_ASSERT( charstring + len >= charstring );
698
699 buf->start = charstring;
700 buf->end = charstring + len;
701 buf->ptr = buf->start;
702
703 return FT_Err_Ok;
704 }
705
706
707 FT_LOCAL_DEF( void )
708 cf2_freeSeacComponent( PS_Decoder* decoder,
709 CF2_Buffer buf )
710 {
711 FT_ASSERT( decoder );
712 FT_ASSERT( !decoder->builder.is_t1 );
713
714 decoder->free_glyph_callback( (TT_Face)decoder->builder.face,
715 (FT_Byte**)&buf->start,
716 (FT_ULong)( buf->end - buf->start ) );
717 }
718
719
720 FT_LOCAL_DEF( FT_Error )
721 cf2_getT1SeacComponent( PS_Decoder* decoder,
722 FT_UInt glyph_index,
723 CF2_Buffer buf )
724 {
725 FT_Data glyph_data;
726 FT_Error error = FT_Err_Ok;
727 T1_Face face = (T1_Face)decoder->builder.face;
728 T1_Font type1 = &face->type1;
729
730 #ifdef FT_CONFIG_OPTION_INCREMENTAL
731 FT_Incremental_InterfaceRec *inc =
732 face->root.internal->incremental_interface;
733
734
735 /* For incremental fonts get the character data using the */
736 /* callback function. */
737 if ( inc )
738 error = inc->funcs->get_glyph_data( inc->object,
739 glyph_index, &glyph_data );
740 else
741 #endif
742 /* For ordinary fonts get the character data stored in the face record. */
743 {
744 glyph_data.pointer = type1->charstrings[glyph_index];
745 glyph_data.length = (FT_Int)type1->charstrings_len[glyph_index];
746 }
747
748 if ( !error )
749 {
750 FT_Byte* charstring_base = (FT_Byte*)glyph_data.pointer;
751 FT_ULong charstring_len = (FT_ULong)glyph_data.length;
752
753
754 FT_ASSERT( charstring_base + charstring_len >= charstring_base );
755
756 FT_ZERO( buf );
757 buf->start =
758 buf->ptr = charstring_base;
759 buf->end = charstring_base + charstring_len;
760 }
761
762 return error;
763 }
764
765
766 FT_LOCAL_DEF( void )
767 cf2_freeT1SeacComponent( PS_Decoder* decoder,
768 CF2_Buffer buf )
769 {
770 T1_Face face;
771 FT_Data data;
772
773
774 FT_ASSERT( decoder );
775
776 #ifdef FT_CONFIG_OPTION_INCREMENTAL
777 face = (T1_Face)decoder->builder.face;
778
779 data.pointer = buf->start;
780 data.length = (FT_Int)( buf->end - buf->start );
781
782 if ( face->root.internal->incremental_interface )
783 face->root.internal->incremental_interface->funcs->free_glyph_data(
784 face->root.internal->incremental_interface->object,
785 &data );
786 #endif /* FT_CONFIG_OPTION_INCREMENTAL */
787 }
788
789
790 FT_LOCAL_DEF( CF2_Int )
791 cf2_initLocalRegionBuffer( PS_Decoder* decoder,
792 CF2_Int subrNum,
793 CF2_Buffer buf )
794 {
795 CF2_UInt idx;
796
797
798 FT_ASSERT( decoder );
799
800 FT_ZERO( buf );
801
802 idx = (CF2_UInt)( subrNum + decoder->locals_bias );
803 if ( idx >= decoder->num_locals )
804 return TRUE; /* error */
805
806 FT_ASSERT( decoder->locals );
807
808 buf->start = decoder->locals[idx];
809
810 if ( decoder->builder.is_t1 )
811 {
812 /* The Type 1 driver stores subroutines without the seed bytes. */
813 /* The CID driver stores subroutines with seed bytes. This */
814 /* case is taken care of when decoder->subrs_len == 0. */
815 if ( decoder->locals_len )
816 buf->end = buf->start + decoder->locals_len[idx];
817 else
818 {
819 /* We are using subroutines from a CID font. We must adjust */
820 /* for the seed bytes. */
821 buf->start += ( decoder->lenIV >= 0 ? decoder->lenIV : 0 );
822 buf->end = decoder->locals[idx + 1];
823 }
824
825 if ( !buf->start )
826 {
827 FT_ERROR(( "cf2_initLocalRegionBuffer (Type 1 mode):"
828 " invoking empty subrs\n" ));
829 }
830 }
831 else
832 {
833 buf->end = decoder->locals[idx + 1];
834 }
835
836 buf->ptr = buf->start;
837
838 return FALSE; /* success */
839 }
840
841
842 FT_LOCAL_DEF( CF2_Fixed )
843 cf2_getDefaultWidthX( PS_Decoder* decoder )
844 {
845 FT_ASSERT( decoder && decoder->current_subfont );
846
847 return cf2_intToFixed(
848 decoder->current_subfont->private_dict.default_width );
849 }
850
851
852 FT_LOCAL_DEF( CF2_Fixed )
853 cf2_getNominalWidthX( PS_Decoder* decoder )
854 {
855 FT_ASSERT( decoder && decoder->current_subfont );
856
857 return cf2_intToFixed(
858 decoder->current_subfont->private_dict.nominal_width );
859 }
860
861
862 FT_LOCAL_DEF( void )
863 cf2_outline_reset( CF2_Outline outline )
864 {
865 PS_Decoder* decoder = outline->decoder;
866
867
868 FT_ASSERT( decoder );
869
870 outline->root.windingMomentum = 0;
871
872 FT_GlyphLoader_Rewind( decoder->builder.loader );
873 }
874
875
876 FT_LOCAL_DEF( void )
877 cf2_outline_close( CF2_Outline outline )
878 {
879 PS_Decoder* decoder = outline->decoder;
880
881
882 FT_ASSERT( decoder );
883
884 ps_builder_close_contour( &decoder->builder );
885
886 FT_GlyphLoader_Add( decoder->builder.loader );
887 }
888
889
890 /* END */