ttobjs.c 30.9 KB
Newer Older
David Turner's avatar
David Turner committed
1
2
3
4
5
6
/***************************************************************************/
/*                                                                         */
/*  ttobjs.c                                                               */
/*                                                                         */
/*    Objects manager (body).                                              */
/*                                                                         */
Werner Lemberg's avatar
Werner Lemberg committed
7
/*  Copyright 1996-2001, 2002, 2003 by                                     */
David Turner's avatar
David Turner committed
8
9
/*  David Turner, Robert Wilhelm, and Werner Lemberg.                      */
/*                                                                         */
Werner Lemberg's avatar
   
Werner Lemberg committed
10
11
/*  This file is part of the FreeType project, and may only be used,       */
/*  modified, and distributed under the terms of the FreeType project      */
David Turner's avatar
David Turner committed
12
13
14
15
16
17
/*  license, LICENSE.TXT.  By continuing to use, modify, or distribute     */
/*  this file you indicate that you have read the license and              */
/*  understand and accept it fully.                                        */
/*                                                                         */
/***************************************************************************/

Werner Lemberg's avatar
   
Werner Lemberg committed
18

19
20
21
22
#include <ft2build.h>
#include FT_INTERNAL_DEBUG_H
#include FT_INTERNAL_CALC_H
#include FT_INTERNAL_STREAM_H
23
#include FT_TRUETYPE_IDS_H
24
25
26
27
#include FT_TRUETYPE_TAGS_H
#include FT_INTERNAL_SFNT_H
#include FT_INTERNAL_POSTSCRIPT_NAMES_H

28
29
#include "ttgload.h"
#include "ttpload.h"
Werner Lemberg's avatar
   
Werner Lemberg committed
30

31
32
#include "tterrors.h"

33
#ifdef TT_CONFIG_OPTION_BYTECODE_INTERPRETER
34
#include "ttinterp.h"
35
36
#endif

37
38
39
#ifdef TT_CONFIG_OPTION_COMPILE_UNPATENTED_HINTING
#include FT_TRUETYPE_UNPATENTED_H
#endif
Werner Lemberg's avatar
   
Werner Lemberg committed
40
41
42
43
44
45
46

  /*************************************************************************/
  /*                                                                       */
  /* The macro FT_COMPONENT is used in trace mode.  It is an implicit      */
  /* parameter of the FT_TRACE() and FT_ERROR() macros, used to print/log  */
  /* messages during execution.                                            */
  /*                                                                       */
Werner Lemberg's avatar
   
Werner Lemberg committed
47
48
#undef  FT_COMPONENT
#define FT_COMPONENT  trace_ttobjs
David Turner's avatar
David Turner committed
49
50


Werner Lemberg's avatar
   
Werner Lemberg committed
51
52
#ifdef TT_CONFIG_OPTION_BYTECODE_INTERPRETER

David Turner's avatar
David Turner committed
53
54
55
56
57
58
  /*************************************************************************/
  /*                                                                       */
  /*                       GLYPH ZONE FUNCTIONS                            */
  /*                                                                       */
  /*************************************************************************/

Werner Lemberg's avatar
   
Werner Lemberg committed
59

60
61
62
  /*************************************************************************/
  /*                                                                       */
  /* <Function>                                                            */
63
  /*    tt_glyphzone_done                                                  */
64
65
66
67
68
69
70
  /*                                                                       */
  /* <Description>                                                         */
  /*    Deallocates a glyph zone.                                          */
  /*                                                                       */
  /* <Input>                                                               */
  /*    zone :: A pointer to the target glyph zone.                        */
  /*                                                                       */
71
  FT_LOCAL_DEF( void )
72
  tt_glyphzone_done( TT_GlyphZone  zone )
73
74
75
  {
    FT_Memory  memory = zone->memory;

Werner Lemberg's avatar
Werner Lemberg committed
76

77
78
79
80
81
82
83
84
85
86
87
    if ( memory )
    {
      FT_FREE( zone->contours );
      FT_FREE( zone->tags );
      FT_FREE( zone->cur );
      FT_FREE( zone->org );

      zone->max_points   = zone->n_points   = 0;
      zone->max_contours = zone->n_contours = 0;
      zone->memory       = NULL;
    }
88
89
90
91
92
93
  }


  /*************************************************************************/
  /*                                                                       */
  /* <Function>                                                            */
94
  /*    tt_glyphzone_new                                                   */
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
  /*                                                                       */
  /* <Description>                                                         */
  /*    Allocates a new glyph zone.                                        */
  /*                                                                       */
  /* <Input>                                                               */
  /*    memory      :: A handle to the current memory object.              */
  /*                                                                       */
  /*    maxPoints   :: The capacity of glyph zone in points.               */
  /*                                                                       */
  /*    maxContours :: The capacity of glyph zone in contours.             */
  /*                                                                       */
  /* <Output>                                                              */
  /*    zone        :: A pointer to the target glyph zone record.          */
  /*                                                                       */
  /* <Return>                                                              */
  /*    FreeType error code.  0 means success.                             */
  /*                                                                       */
112
  FT_LOCAL_DEF( FT_Error )
113
  tt_glyphzone_new( FT_Memory     memory,
Werner Lemberg's avatar
   
Werner Lemberg committed
114
115
116
                    FT_UShort     maxPoints,
                    FT_Short      maxContours,
                    TT_GlyphZone  zone )
117
  {
Werner Lemberg's avatar
   
Werner Lemberg committed
118
119
    FT_Error  error;

120
121
122
123

    if ( maxPoints > 0 )
      maxPoints += 2;

Werner Lemberg's avatar
   
Werner Lemberg committed
124
    FT_MEM_ZERO( zone, sizeof ( *zone ) );
125
126
    zone->memory = memory;

127
128
129
130
    if ( FT_NEW_ARRAY( zone->org,      maxPoints * 2 ) ||
         FT_NEW_ARRAY( zone->cur,      maxPoints * 2 ) ||
         FT_NEW_ARRAY( zone->tags,     maxPoints     ) ||
         FT_NEW_ARRAY( zone->contours, maxContours   ) )
131
    {
132
      tt_glyphzone_done( zone );
133
134
135
136
    }

    return error;
  }
Werner Lemberg's avatar
   
Werner Lemberg committed
137
138
#endif /* TT_CONFIG_OPTION_BYTECODE_INTERPRETER */

139

David Turner's avatar
David Turner committed
140
141
142
  /*************************************************************************/
  /*                                                                       */
  /* <Function>                                                            */
143
  /*    tt_face_init                                                       */
David Turner's avatar
David Turner committed
144
145
146
147
148
  /*                                                                       */
  /* <Description>                                                         */
  /*    Initializes a given TrueType face object.                          */
  /*                                                                       */
  /* <Input>                                                               */
Werner Lemberg's avatar
   
Werner Lemberg committed
149
150
  /*    stream     :: The source font stream.                              */
  /*                                                                       */
David Turner's avatar
David Turner committed
151
  /*    face_index :: The index of the font face in the resource.          */
Werner Lemberg's avatar
   
Werner Lemberg committed
152
153
154
155
156
157
  /*                                                                       */
  /*    num_params :: Number of additional generic parameters.  Ignored.   */
  /*                                                                       */
  /*    params     :: Additional generic parameters.  Ignored.             */
  /*                                                                       */
  /* <InOut>                                                               */
David Turner's avatar
David Turner committed
158
159
160
  /*    face       :: The newly built face object.                         */
  /*                                                                       */
  /* <Return>                                                              */
Werner Lemberg's avatar
   
Werner Lemberg committed
161
  /*    FreeType error code.  0 means success.                             */
David Turner's avatar
David Turner committed
162
  /*                                                                       */
163
  FT_LOCAL_DEF( FT_Error )
164
  tt_face_init( FT_Stream      stream,
Werner Lemberg's avatar
   
Werner Lemberg committed
165
166
167
168
                TT_Face        face,
                FT_Int         face_index,
                FT_Int         num_params,
                FT_Parameter*  params )
David Turner's avatar
David Turner committed
169
  {
Werner Lemberg's avatar
   
Werner Lemberg committed
170
171
    FT_Error      error;
    FT_Library    library;
172
    SFNT_Service  sfnt;
Werner Lemberg's avatar
   
Werner Lemberg committed
173

Werner Lemberg's avatar
   
Werner Lemberg committed
174

David Turner's avatar
David Turner committed
175
    library = face->root.driver->root.library;
176
    sfnt    = (SFNT_Service)FT_Get_Module_Interface( library, "sfnt" );
Werner Lemberg's avatar
   
Werner Lemberg committed
177
178
    if ( !sfnt )
      goto Bad_Format;
179

David Turner's avatar
David Turner committed
180
    /* create input stream from resource */
181
    if ( FT_STREAM_SEEK( 0 ) )
David Turner's avatar
David Turner committed
182
183
      goto Exit;

184
    /* check that we have a valid TrueType file */
185
    error = sfnt->init_face( stream, face, face_index, num_params, params );
Werner Lemberg's avatar
   
Werner Lemberg committed
186
187
    if ( error )
      goto Exit;
188

189
    /* We must also be able to accept Mac/GX fonts, as well as OT ones */
Werner Lemberg's avatar
   
Werner Lemberg committed
190
191
    if ( face->format_tag != 0x00010000L &&    /* MS fonts  */
         face->format_tag != TTAG_true   )     /* Mac fonts */
192
    {
Werner Lemberg's avatar
   
Werner Lemberg committed
193
      FT_TRACE2(( "[not a valid TTF font]\n" ));
194
      goto Bad_Format;
195
196
    }

Werner Lemberg's avatar
   
Werner Lemberg committed
197
    /* If we are performing a simple font format check, exit immediately */
David Turner's avatar
David Turner committed
198
199
200
    if ( face_index < 0 )
      return TT_Err_Ok;

201
202
    /* Load font directory */
    error = sfnt->load_face( stream, face, face_index, num_params, params );
Werner Lemberg's avatar
   
Werner Lemberg committed
203
204
    if ( error )
      goto Exit;
David Turner's avatar
David Turner committed
205

Werner Lemberg's avatar
   
Werner Lemberg committed
206
    if ( face->root.face_flags & FT_FACE_FLAG_SCALABLE )
Werner Lemberg's avatar
Werner Lemberg committed
207
    {
Werner Lemberg's avatar
   
Werner Lemberg committed
208

209
#ifdef FT_CONFIG_OPTION_INCREMENTAL
Werner Lemberg's avatar
   
Werner Lemberg committed
210

Werner Lemberg's avatar
Werner Lemberg committed
211
212
213
214
215
      if ( !face->root.internal->incremental_interface )
        error = tt_face_load_loca( face, stream );
      if ( !error )
        error = tt_face_load_cvt( face, stream ) ||
                tt_face_load_fpgm( face, stream );
Werner Lemberg's avatar
   
Werner Lemberg committed
216

217
#else
Werner Lemberg's avatar
   
Werner Lemberg committed
218

Werner Lemberg's avatar
Werner Lemberg committed
219
220
221
222
      if ( !error )
        error = tt_face_load_loca( face, stream ) ||
                tt_face_load_cvt( face, stream )  ||
                tt_face_load_fpgm( face, stream );
Werner Lemberg's avatar
   
Werner Lemberg committed
223

224
#endif
Werner Lemberg's avatar
   
Werner Lemberg committed
225

Werner Lemberg's avatar
Werner Lemberg committed
226
    }
Werner Lemberg's avatar
   
Werner Lemberg committed
227

228
229
#ifdef TT_CONFIG_OPTION_COMPILE_UNPATENTED_HINTING

Werner Lemberg's avatar
Werner Lemberg committed
230
    /* Determine whether unpatented hinting is to be used for this face. */
231
232

#ifdef TT_CONFIG_OPTION_FORCE_UNPATENTED_HINTING
Werner Lemberg's avatar
Werner Lemberg committed
233
    face->unpatented_hinting = TRUE;
234
#else
Werner Lemberg's avatar
Werner Lemberg committed
235
    face->unpatented_hinting = FALSE;
236
    {
Werner Lemberg's avatar
Werner Lemberg committed
237
238
      int i;

239

Werner Lemberg's avatar
Werner Lemberg committed
240
241
242
      for ( i = 0; i < num_params && !face->unpatented_hinting; i++ )
        if ( params[i].tag == FT_PARAM_TAG_UNPATENTED_HINTING )
          face->unpatented_hinting = TRUE;
243
    }
Werner Lemberg's avatar
Werner Lemberg committed
244
#endif /* TT_CONFIG_OPTION_FORCE_UNPATENTED_HINTING */
245

Werner Lemberg's avatar
Werner Lemberg committed
246
#endif /* TT_CONFIG_OPTION_COMPILE_UNPATENTED_HINTING */
247

Werner Lemberg's avatar
   
Werner Lemberg committed
248
    /* initialize standard glyph loading routines */
249
250
    TT_Init_Glyph_Loading( face );

David Turner's avatar
David Turner committed
251
252
  Exit:
    return error;
Werner Lemberg's avatar
   
Werner Lemberg committed
253

254
  Bad_Format:
Werner Lemberg's avatar
Werner Lemberg committed
255
    error = TT_Err_Unknown_File_Format;
256
    goto Exit;
David Turner's avatar
David Turner committed
257
258
259
260
261
262
  }


  /*************************************************************************/
  /*                                                                       */
  /* <Function>                                                            */
263
  /*    tt_face_done                                                       */
David Turner's avatar
David Turner committed
264
265
266
267
268
269
270
  /*                                                                       */
  /* <Description>                                                         */
  /*    Finalizes a given face object.                                     */
  /*                                                                       */
  /* <Input>                                                               */
  /*    face :: A pointer to the face object to destroy.                   */
  /*                                                                       */
271
  FT_LOCAL_DEF( void )
272
  tt_face_done( TT_Face  face )
David Turner's avatar
David Turner committed
273
  {
Werner Lemberg's avatar
   
Werner Lemberg committed
274
275
    FT_Memory     memory = face->root.memory;
    FT_Stream     stream = face->root.stream;
David Turner's avatar
David Turner committed
276

Werner Lemberg's avatar
   
Werner Lemberg committed
277
    SFNT_Service  sfnt   = (SFNT_Service)face->sfnt;
278

Werner Lemberg's avatar
   
Werner Lemberg committed
279

Werner Lemberg's avatar
   
Werner Lemberg committed
280
281
    /* for `extended TrueType formats' (i.e. compressed versions) */
    if ( face->extra.finalizer )
282
      face->extra.finalizer( face->extra.data );
Werner Lemberg's avatar
   
Werner Lemberg committed
283
284
285

    if ( sfnt )
      sfnt->done_face( face );
David Turner's avatar
David Turner committed
286
287

    /* freeing the locations table */
288
    FT_FREE( face->glyph_locations );
David Turner's avatar
David Turner committed
289
290
291
    face->num_locations = 0;

    /* freeing the CVT */
292
    FT_FREE( face->cvt );
David Turner's avatar
David Turner committed
293
294
295
    face->cvt_size = 0;

    /* freeing the programs */
296
297
    FT_FRAME_RELEASE( face->font_program );
    FT_FRAME_RELEASE( face->cvt_program );
David Turner's avatar
David Turner committed
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
    face->font_program_size = 0;
    face->cvt_program_size  = 0;
  }


  /*************************************************************************/
  /*                                                                       */
  /*                           SIZE  FUNCTIONS                             */
  /*                                                                       */
  /*************************************************************************/


  /*************************************************************************/
  /*                                                                       */
  /* <Function>                                                            */
313
  /*    tt_size_init                                                       */
David Turner's avatar
David Turner committed
314
315
316
317
318
319
320
321
  /*                                                                       */
  /* <Description>                                                         */
  /*    Initializes a new TrueType size object.                            */
  /*                                                                       */
  /* <InOut>                                                               */
  /*    size :: A handle to the size object.                               */
  /*                                                                       */
  /* <Return>                                                              */
Werner Lemberg's avatar
   
Werner Lemberg committed
322
  /*    FreeType error code.  0 means success.                             */
David Turner's avatar
David Turner committed
323
  /*                                                                       */
324
  FT_LOCAL_DEF( FT_Error )
325
  tt_size_init( TT_Size  size )
David Turner's avatar
David Turner committed
326
  {
Werner Lemberg's avatar
   
Werner Lemberg committed
327
328
    FT_Error  error = TT_Err_Ok;

329

330
#ifdef TT_CONFIG_OPTION_BYTECODE_INTERPRETER
Werner Lemberg's avatar
   
Werner Lemberg committed
331

David Turner's avatar
David Turner committed
332
333
    TT_Face    face   = (TT_Face)size->root.face;
    FT_Memory  memory = face->root.memory;
334
    FT_Int     i;
David Turner's avatar
David Turner committed
335
336

    TT_ExecContext  exec;
337
    FT_UShort       n_twilight;
338
    TT_MaxProfile*  maxp = &face->max_profile;
David Turner's avatar
David Turner committed
339

Werner Lemberg's avatar
   
Werner Lemberg committed
340

David Turner's avatar
David Turner committed
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
    size->ttmetrics.valid = FALSE;

    size->max_function_defs    = maxp->maxFunctionDefs;
    size->max_instruction_defs = maxp->maxInstructionDefs;

    size->num_function_defs    = 0;
    size->num_instruction_defs = 0;

    size->max_func = 0;
    size->max_ins  = 0;

    size->cvt_size     = face->cvt_size;
    size->storage_size = maxp->maxStorage;

    /* Set default metrics */
    {
      FT_Size_Metrics*  metrics  = &size->root.metrics;
      TT_Size_Metrics*  metrics2 = &size->ttmetrics;

Werner Lemberg's avatar
   
Werner Lemberg committed
360

David Turner's avatar
David Turner committed
361
362
363
364
365
366
367
368
369
370
371
      metrics->x_ppem = 0;
      metrics->y_ppem = 0;

      metrics2->rotated   = FALSE;
      metrics2->stretched = FALSE;

      /* set default compensation (all 0) */
      for ( i = 0; i < 4; i++ )
        metrics2->compensations[i] = 0;
    }

Werner Lemberg's avatar
   
Werner Lemberg committed
372
    /* allocate function defs, instruction defs, cvt, and storage area */
Werner Lemberg's avatar
   
Werner Lemberg committed
373
    if ( FT_NEW_ARRAY( size->function_defs,    size->max_function_defs    ) ||
374
         FT_NEW_ARRAY( size->instruction_defs, size->max_instruction_defs ) ||
Werner Lemberg's avatar
   
Werner Lemberg committed
375
376
         FT_NEW_ARRAY( size->cvt,              size->cvt_size             ) ||
         FT_NEW_ARRAY( size->storage,          size->storage_size         ) )
David Turner's avatar
David Turner committed
377
378
379
380
381

      goto Fail_Memory;

    /* reserve twilight zone */
    n_twilight = maxp->maxTwilightPoints;
382
    error = tt_glyphzone_new( memory, n_twilight, 0, &size->twilight );
David Turner's avatar
David Turner committed
383
384
385
386
387
388
389
    if ( error )
      goto Fail_Memory;

    size->twilight.n_points = n_twilight;

    /* set `face->interpreter' according to the debug hook present */
    {
David Turner's avatar
David Turner committed
390
      FT_Library  library = face->root.driver->root.library;
391

Werner Lemberg's avatar
   
Werner Lemberg committed
392

David Turner's avatar
David Turner committed
393
      face->interpreter = (TT_Interpreter)
Werner Lemberg's avatar
   
Werner Lemberg committed
394
395
                            library->debug_hooks[FT_DEBUG_HOOK_TRUETYPE];
      if ( !face->interpreter )
David Turner's avatar
David Turner committed
396
397
398
399
400
401
        face->interpreter = (TT_Interpreter)TT_RunIns;
    }

    /* Fine, now execute the font program! */
    exec = size->context;
    /* size objects used during debugging have their own context */
Werner Lemberg's avatar
   
Werner Lemberg committed
402
403
    if ( !size->debug )
      exec = TT_New_Context( face );
David Turner's avatar
David Turner committed
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425

    if ( !exec )
    {
      error = TT_Err_Could_Not_Find_Context;
      goto Fail_Memory;
    }

    size->GS = tt_default_graphics_state;
    TT_Load_Context( exec, face, size );

    exec->callTop   = 0;
    exec->top       = 0;

    exec->period    = 64;
    exec->phase     = 0;
    exec->threshold = 0;

    {
      FT_Size_Metrics*  metrics    = &exec->metrics;
      TT_Size_Metrics*  tt_metrics = &exec->tt_metrics;


Werner Lemberg's avatar
   
Werner Lemberg committed
426
427
428
429
      metrics->x_ppem   = 0;
      metrics->y_ppem   = 0;
      metrics->x_scale  = 0;
      metrics->y_scale  = 0;
David Turner's avatar
David Turner committed
430

Werner Lemberg's avatar
   
Werner Lemberg committed
431
432
433
      tt_metrics->ppem  = 0;
      tt_metrics->scale = 0;
      tt_metrics->ratio = 0x10000L;
David Turner's avatar
David Turner committed
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
    }

    exec->instruction_trap = FALSE;

    exec->cvtSize = size->cvt_size;
    exec->cvt     = size->cvt;

    exec->F_dot_P = 0x10000L;

    /* allow font program execution */
    TT_Set_CodeRange( exec,
                      tt_coderange_font,
                      face->font_program,
                      face->font_program_size );

    /* disable CVT and glyph programs coderange */
    TT_Clear_CodeRange( exec, tt_coderange_cvt );
    TT_Clear_CodeRange( exec, tt_coderange_glyph );

    if ( face->font_program_size > 0 )
    {
      error = TT_Goto_CodeRange( exec, tt_coderange_font, 0 );
      if ( !error )
        error = face->interpreter( exec );

      if ( error )
        goto Fail_Exec;
    }
    else
      error = TT_Err_Ok;

    TT_Save_Context( exec, size );

    if ( !size->debug )
      TT_Done_Context( exec );

470
471
#endif /* TT_CONFIG_OPTION_BYTECODE_INTERPRETER */

David Turner's avatar
David Turner committed
472
473
474
    size->ttmetrics.valid = FALSE;
    return error;

475
#ifdef TT_CONFIG_OPTION_BYTECODE_INTERPRETER
Werner Lemberg's avatar
   
Werner Lemberg committed
476

David Turner's avatar
David Turner committed
477
478
479
480
481
  Fail_Exec:
    if ( !size->debug )
      TT_Done_Context( exec );

  Fail_Memory:
Werner Lemberg's avatar
   
Werner Lemberg committed
482

483
    tt_size_done( size );
David Turner's avatar
David Turner committed
484
    return error;
Werner Lemberg's avatar
   
Werner Lemberg committed
485
486
487

#endif /* TT_CONFIG_OPTION_BYTECODE_INTERPRETER */

David Turner's avatar
David Turner committed
488
489
490
491
492
493
  }


  /*************************************************************************/
  /*                                                                       */
  /* <Function>                                                            */
494
  /*    tt_size_done                                                       */
David Turner's avatar
David Turner committed
495
496
497
498
499
500
501
  /*                                                                       */
  /* <Description>                                                         */
  /*    The TrueType size object finalizer.                                */
  /*                                                                       */
  /* <Input>                                                               */
  /*    size :: A handle to the target size object.                        */
  /*                                                                       */
502
  FT_LOCAL_DEF( void )
503
  tt_size_done( TT_Size  size )
David Turner's avatar
David Turner committed
504
  {
Werner Lemberg's avatar
   
Werner Lemberg committed
505

506
#ifdef TT_CONFIG_OPTION_BYTECODE_INTERPRETER
Werner Lemberg's avatar
   
Werner Lemberg committed
507

David Turner's avatar
David Turner committed
508
509
    FT_Memory  memory = size->root.face->memory;

Werner Lemberg's avatar
   
Werner Lemberg committed
510

David Turner's avatar
David Turner committed
511
512
513
514
515
516
517
    if ( size->debug )
    {
      /* the debug context must be deleted by the debugger itself */
      size->context = NULL;
      size->debug   = FALSE;
    }

518
    FT_FREE( size->cvt );
David Turner's avatar
David Turner committed
519
520
521
    size->cvt_size = 0;

    /* free storage area */
522
    FT_FREE( size->storage );
David Turner's avatar
David Turner committed
523
524
525
    size->storage_size = 0;

    /* twilight zone */
526
    tt_glyphzone_done( &size->twilight );
David Turner's avatar
David Turner committed
527

528
529
    FT_FREE( size->function_defs );
    FT_FREE( size->instruction_defs );
Werner Lemberg's avatar
   
Werner Lemberg committed
530

David Turner's avatar
David Turner committed
531
532
533
534
535
536
537
    size->num_function_defs    = 0;
    size->max_function_defs    = 0;
    size->num_instruction_defs = 0;
    size->max_instruction_defs = 0;

    size->max_func = 0;
    size->max_ins  = 0;
Werner Lemberg's avatar
   
Werner Lemberg committed
538

539
#endif
David Turner's avatar
David Turner committed
540
541
542
543
544
545
546
547

    size->ttmetrics.valid = FALSE;
  }


  /*************************************************************************/
  /*                                                                       */
  /* <Function>                                                            */
Werner Lemberg's avatar
   
Werner Lemberg committed
548
  /*    Reset_Outline_Size                                                 */
David Turner's avatar
David Turner committed
549
550
  /*                                                                       */
  /* <Description>                                                         */
Werner Lemberg's avatar
   
Werner Lemberg committed
551
552
  /*    Resets a TrueType outline size when resolutions and character      */
  /*    dimensions have been changed.                                      */
David Turner's avatar
David Turner committed
553
554
555
556
  /*                                                                       */
  /* <Input>                                                               */
  /*    size :: A handle to the target size object.                        */
  /*                                                                       */
Werner Lemberg's avatar
   
Werner Lemberg committed
557
558
  static FT_Error
  Reset_Outline_Size( TT_Size  size )
David Turner's avatar
David Turner committed
559
  {
Werner Lemberg's avatar
   
Werner Lemberg committed
560
561
    TT_Face           face;
    FT_Error          error = TT_Err_Ok;
David Turner's avatar
David Turner committed
562
563
564

    FT_Size_Metrics*  metrics;

Werner Lemberg's avatar
   
Werner Lemberg committed
565

David Turner's avatar
David Turner committed
566
567
568
569
570
    if ( size->ttmetrics.valid )
      return TT_Err_Ok;

    face = (TT_Face)size->root.face;

571
    metrics = &size->metrics;
David Turner's avatar
David Turner committed
572
573
574
575
576
577
578
579
580

    if ( metrics->x_ppem < 1 || metrics->y_ppem < 1 )
      return TT_Err_Invalid_PPem;

    /* compute new transformation */
    if ( metrics->x_ppem >= metrics->y_ppem )
    {
      size->ttmetrics.scale   = metrics->x_scale;
      size->ttmetrics.ppem    = metrics->x_ppem;
Werner Lemberg's avatar
   
Werner Lemberg committed
581
      size->ttmetrics.x_ratio = 0x10000L;
David Turner's avatar
David Turner committed
582
583
584
585
586
587
588
589
590
591
592
      size->ttmetrics.y_ratio = FT_MulDiv( metrics->y_ppem,
                                           0x10000L,
                                           metrics->x_ppem );
    }
    else
    {
      size->ttmetrics.scale   = metrics->y_scale;
      size->ttmetrics.ppem    = metrics->y_ppem;
      size->ttmetrics.x_ratio = FT_MulDiv( metrics->x_ppem,
                                           0x10000L,
                                           metrics->y_ppem );
Werner Lemberg's avatar
   
Werner Lemberg committed
593
      size->ttmetrics.y_ratio = 0x10000L;
David Turner's avatar
David Turner committed
594
595
    }

Werner Lemberg's avatar
   
Werner Lemberg committed
596
    /* Compute root ascender, descender, text height, and max_advance */
Werner Lemberg's avatar
   
Werner Lemberg committed
597
598
599
600
601
602
603
604
    metrics->ascender    = ( FT_MulFix( face->root.ascender,
                                        metrics->y_scale ) + 32 ) & -64;
    metrics->descender   = ( FT_MulFix( face->root.descender,
                                        metrics->y_scale ) + 32 ) & -64;
    metrics->height      = ( FT_MulFix( face->root.height,
                                        metrics->y_scale ) + 32 ) & -64;
    metrics->max_advance = ( FT_MulFix( face->root.max_advance_width,
                                        metrics->x_scale ) + 32 ) & -64;
David Turner's avatar
David Turner committed
605

606

607
#ifdef TT_CONFIG_OPTION_EMBEDDED_BITMAPS
Werner Lemberg's avatar
   
Werner Lemberg committed
608
    /* set to `invalid' by default */
Werner Lemberg's avatar
   
Werner Lemberg committed
609
    size->strike_index = 0xFFFFU;
610
611
#endif

612
613
#ifdef TT_CONFIG_OPTION_BYTECODE_INTERPRETER

David Turner's avatar
David Turner committed
614
    {
Werner Lemberg's avatar
   
Werner Lemberg committed
615
616
      TT_ExecContext  exec;
      FT_UInt         i, j;
617

Werner Lemberg's avatar
   
Werner Lemberg committed
618

619
620
621
622
      /* Scale the cvt values to the new ppem.          */
      /* We use by default the y ppem to scale the CVT. */
      for ( i = 0; i < size->cvt_size; i++ )
        size->cvt[i] = FT_MulFix( face->cvt[i], size->ttmetrics.scale );
623

624
      /* All twilight points are originally zero */
625
      for ( j = 0; j < (FT_UInt)size->twilight.n_points; j++ )
626
627
628
629
630
631
      {
        size->twilight.org[j].x = 0;
        size->twilight.org[j].y = 0;
        size->twilight.cur[j].x = 0;
        size->twilight.cur[j].y = 0;
      }
632

633
      /* clear storage area */
634
      for ( i = 0; i < (FT_UInt)size->storage_size; i++ )
635
        size->storage[i] = 0;
636

637
      size->GS = tt_default_graphics_state;
638

639
640
641
642
643
644
      /* get execution context and run prep program */
      if ( size->debug )
        exec = size->context;
      else
        exec = TT_New_Context( face );
      /* debugging instances have their own context */
645

646
647
      if ( !exec )
        return TT_Err_Could_Not_Find_Context;
648

649
      TT_Load_Context( exec, face, size );
650

651
652
653
654
      TT_Set_CodeRange( exec,
                        tt_coderange_cvt,
                        face->cvt_program,
                        face->cvt_program_size );
655

656
      TT_Clear_CodeRange( exec, tt_coderange_glyph );
657

658
      exec->instruction_trap = FALSE;
659

660
661
      exec->top     = 0;
      exec->callTop = 0;
662

663
664
665
666
      if ( face->cvt_program_size > 0 )
      {
        error = TT_Goto_CodeRange( exec, tt_coderange_cvt, 0 );
        if ( error )
Werner Lemberg's avatar
   
Werner Lemberg committed
667
          goto End;
668

669
670
671
672
673
        if ( !size->debug )
          error = face->interpreter( exec );
      }
      else
        error = TT_Err_Ok;
674

675
676
      size->GS = exec->GS;
      /* save default graphics state */
677

Werner Lemberg's avatar
   
Werner Lemberg committed
678
    End:
679
      TT_Save_Context( exec, size );
680

David Turner's avatar
David Turner committed
681
      if ( !size->debug )
682
683
        TT_Done_Context( exec );
      /* debugging instances keep their context */
David Turner's avatar
David Turner committed
684
    }
Werner Lemberg's avatar
   
Werner Lemberg committed
685

686
#endif /* TT_CONFIG_OPTION_BYTECODE_INTERPRETER */
David Turner's avatar
David Turner committed
687
688
689
690
691
692
693

    if ( !error )
      size->ttmetrics.valid = TRUE;

    return error;
  }

Werner Lemberg's avatar
   
Werner Lemberg committed
694

695
#ifdef TT_CONFIG_OPTION_EMBEDDED_BITMAPS
Werner Lemberg's avatar
   
Werner Lemberg committed
696
697
698
699
700
701
702
703
704
705
706
707
708

  /*************************************************************************/
  /*                                                                       */
  /* <Function>                                                            */
  /*    Reset_SBit_Size                                                    */
  /*                                                                       */
  /* <Description>                                                         */
  /*    Resets a TrueType sbit size when resolutions and character         */
  /*    dimensions have been changed.                                      */
  /*                                                                       */
  /* <Input>                                                               */
  /*    size :: A handle to the target size object.                        */
  /*                                                                       */
Werner Lemberg's avatar
   
Werner Lemberg committed
709
710
  static FT_Error
  Reset_SBit_Size( TT_Size  size )
711
712
713
714
715
716
717
  {
    TT_Face           face;
    FT_Error          error = TT_Err_Ok;

    FT_ULong          strike_index;
    FT_Size_Metrics*  metrics;
    FT_Size_Metrics*  sbit_metrics;
Werner Lemberg's avatar
   
Werner Lemberg committed
718
    SFNT_Service      sfnt;
719

Werner Lemberg's avatar
   
Werner Lemberg committed
720

721
    metrics = &size->metrics;
722

Werner Lemberg's avatar
   
Werner Lemberg committed
723
    if ( size->strike_index != 0xFFFFU )
724
725
726
      return TT_Err_Ok;

    face = (TT_Face)size->root.face;
727
    sfnt = (SFNT_Service)face->sfnt;
728
729
730

    sbit_metrics = &size->strike_metrics;

Werner Lemberg's avatar
   
Werner Lemberg committed
731
732
733
    error = sfnt->set_sbit_strike( face,
                                   metrics->x_ppem, metrics->y_ppem,
                                   &strike_index );
734

Werner Lemberg's avatar
   
Werner Lemberg committed
735
    if ( !error )
736
    {
Werner Lemberg's avatar
   
Werner Lemberg committed
737
      TT_SBit_Strike  strike = face->sbit_strikes + strike_index;
Werner Lemberg's avatar
   
Werner Lemberg committed
738
739


Werner Lemberg's avatar
   
Werner Lemberg committed
740
741
      sbit_metrics->x_ppem = metrics->x_ppem;
      sbit_metrics->y_ppem = metrics->y_ppem;
742
743
744
745
746
#if 0
      /*
       * sbit_metrics->?_scale
       * are not used now.
       */
Werner Lemberg's avatar
   
Werner Lemberg committed
747
748
      sbit_metrics->x_scale = 1 << 16;
      sbit_metrics->y_scale = 1 << 16;
749
#endif
Werner Lemberg's avatar
   
Werner Lemberg committed
750

Werner Lemberg's avatar
   
Werner Lemberg committed
751
752
      sbit_metrics->ascender  = strike->hori.ascender << 6;
      sbit_metrics->descender = strike->hori.descender << 6;
Werner Lemberg's avatar
   
Werner Lemberg committed
753

754
      /* XXX: Is this correct? */
Werner Lemberg's avatar
   
Werner Lemberg committed
755
      sbit_metrics->height = sbit_metrics->ascender - sbit_metrics->descender;
Werner Lemberg's avatar
   
Werner Lemberg committed
756

757
      /* XXX: Is this correct? */
758
759
      sbit_metrics->max_advance = ( strike->hori.min_origin_SB  +
                                    strike->hori.max_width      +
760
761
                                    strike->hori.min_advance_SB ) << 6;

Werner Lemberg's avatar
   
Werner Lemberg committed
762
      size->strike_index = (FT_UInt)strike_index;
763
764
765
    }
    else
    {
Werner Lemberg's avatar
   
Werner Lemberg committed
766
      size->strike_index = 0xFFFFU;
Werner Lemberg's avatar
   
Werner Lemberg committed
767

768
769
770
771
772
773
774
775
776
777
      sbit_metrics->x_ppem      = 0;
      sbit_metrics->y_ppem      = 0;
      sbit_metrics->ascender    = 0;
      sbit_metrics->descender   = 0;
      sbit_metrics->height      = 0;
      sbit_metrics->max_advance = 0;
    }

    return error;
  }
Werner Lemberg's avatar
   
Werner Lemberg committed
778

779
780
#endif /* TT_CONFIG_OPTION_EMBEDDED_BITMAPS */

Werner Lemberg's avatar
   
Werner Lemberg committed
781

782
783
784
  /*************************************************************************/
  /*                                                                       */
  /* <Function>                                                            */
785
  /*    tt_size_reset                                                      */
786
787
788
789
790
791
792
793
  /*                                                                       */
  /* <Description>                                                         */
  /*    Resets a TrueType size when resolutions and character dimensions   */
  /*    have been changed.                                                 */
  /*                                                                       */
  /* <Input>                                                               */
  /*    size :: A handle to the target size object.                        */
  /*                                                                       */
794
  FT_LOCAL_DEF( FT_Error )
795
  tt_size_reset( TT_Size  size )
796
  {
Werner Lemberg's avatar
   
Werner Lemberg committed
797
    FT_Face   face;
798
799
    FT_Error  error = TT_Err_Ok;

Werner Lemberg's avatar
   
Werner Lemberg committed
800

801
802
803
804
805
    face = size->root.face;

    if ( face->face_flags & FT_FACE_FLAG_SCALABLE )
    {
      if ( !size->ttmetrics.valid )
Werner Lemberg's avatar
   
Werner Lemberg committed
806
        error = Reset_Outline_Size( size );
807
808

      if ( error )
Werner Lemberg's avatar
   
Werner Lemberg committed
809
        return error;
810
811
812
    }

#ifdef TT_CONFIG_OPTION_EMBEDDED_BITMAPS
Werner Lemberg's avatar
   
Werner Lemberg committed
813

814
815
    if ( face->face_flags & FT_FACE_FLAG_FIXED_SIZES )
    {
Werner Lemberg's avatar
   
Werner Lemberg committed
816
      if ( size->strike_index == 0xFFFFU )
817
818
        error = Reset_SBit_Size( size );

Werner Lemberg's avatar
   
Werner Lemberg committed
819
      if ( !error && !( face->face_flags & FT_FACE_FLAG_SCALABLE ) )
820
        size->root.metrics = size->strike_metrics;
821
    }
Werner Lemberg's avatar
   
Werner Lemberg committed
822
823
824
825

#endif /* TT_CONFIG_OPTION_EMBEDDED_BITMAPS */

    if ( face->face_flags & FT_FACE_FLAG_SCALABLE )
826
827
828
829
      return TT_Err_Ok;
    else
      return error;
  }
David Turner's avatar
David Turner committed
830

Werner Lemberg's avatar
   
Werner Lemberg committed
831

David Turner's avatar
David Turner committed
832
833
834
  /*************************************************************************/
  /*                                                                       */
  /* <Function>                                                            */
835
  /*    tt_driver_init                                                     */
David Turner's avatar
David Turner committed
836
837
838
839
840
841
842
843
  /*                                                                       */
  /* <Description>                                                         */
  /*    Initializes a given TrueType driver object.                        */
  /*                                                                       */
  /* <Input>                                                               */
  /*    driver :: A handle to the target driver object.                    */
  /*                                                                       */
  /* <Return>                                                              */
Werner Lemberg's avatar
   
Werner Lemberg committed
844
  /*    FreeType error code.  0 means success.                             */
David Turner's avatar
David Turner committed
845
  /*                                                                       */
846
  FT_LOCAL_DEF( FT_Error )
847
  tt_driver_init( TT_Driver  driver )
David Turner's avatar
David Turner committed
848
  {
Werner Lemberg's avatar
   
Werner Lemberg committed
849
    FT_Error  error;
Werner Lemberg's avatar
   
Werner Lemberg committed
850

Werner Lemberg's avatar
   
Werner Lemberg committed
851
852

    /* set `extra' in glyph loader */
David Turner's avatar
David Turner committed
853
    error = FT_GlyphLoader_CreateExtra( FT_DRIVER( driver )->glyph_loader );
Werner Lemberg's avatar
   
Werner Lemberg committed
854

David Turner's avatar
David Turner committed
855
    return error;
David Turner's avatar
David Turner committed
856
857
858
859
860
861
  }


  /*************************************************************************/
  /*                                                                       */
  /* <Function>                                                            */
862
  /*    tt_driver_done                                                     */
David Turner's avatar
David Turner committed
863
864
865
866
867
868
869
  /*                                                                       */
  /* <Description>                                                         */
  /*    Finalizes a given TrueType driver.                                 */
  /*                                                                       */
  /* <Input>                                                               */
  /*    driver :: A handle to the target TrueType driver.                  */
  /*                                                                       */
870
  FT_LOCAL_DEF( void )
871
  tt_driver_done( TT_Driver  driver )
David Turner's avatar
David Turner committed
872
  {
873
#ifdef TT_CONFIG_OPTION_BYTECODE_INTERPRETER
Werner Lemberg's avatar
   
Werner Lemberg committed
874

David Turner's avatar
David Turner committed
875
876
877
    /* destroy the execution context */
    if ( driver->context )
    {
David Turner's avatar
David Turner committed
878
      TT_Destroy_Context( driver->context, driver->root.root.memory );
David Turner's avatar
David Turner committed
879
880
      driver->context = NULL;
    }
881
#else
Werner Lemberg's avatar
   
Werner Lemberg committed
882
    FT_UNUSED( driver );
883
#endif
Werner Lemberg's avatar
   
Werner Lemberg committed
884

David Turner's avatar
David Turner committed
885
886
887
888
  }


/* END */