source: trunk/poppler/freetype2/src/base/ftoutln.c @ 182

Last change on this file since 182 was 182, checked in by Eugene Romanenko, 15 years ago

freetype update to version 2.3.0

File size: 27.7 KB
Line 
1/***************************************************************************/
2/*                                                                         */
3/*  ftoutln.c                                                              */
4/*                                                                         */
5/*    FreeType outline management (body).                                  */
6/*                                                                         */
7/*  Copyright 1996-2001, 2002, 2003, 2004, 2005, 2006, 2007 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
19  /*************************************************************************/
20  /*                                                                       */
21  /* All functions are declared in freetype.h.                             */
22  /*                                                                       */
23  /*************************************************************************/
24
25
26#include <ft2build.h>
27#include FT_OUTLINE_H
28#include FT_INTERNAL_OBJECTS_H
29#include FT_TRIGONOMETRY_H
30
31
32  /*************************************************************************/
33  /*                                                                       */
34  /* The macro FT_COMPONENT is used in trace mode.  It is an implicit      */
35  /* parameter of the FT_TRACE() and FT_ERROR() macros, used to print/log  */
36  /* messages during execution.                                            */
37  /*                                                                       */
38#undef  FT_COMPONENT
39#define FT_COMPONENT  trace_outline
40
41
42  static
43  const FT_Outline  null_outline = { 0, 0, 0, 0, 0, 0 };
44
45
46  /* documentation is in ftoutln.h */
47
48  FT_EXPORT_DEF( FT_Error )
49  FT_Outline_Decompose( FT_Outline*              outline,
50                        const FT_Outline_Funcs*  func_interface,
51                        void*                    user )
52  {
53#undef SCALED
54#define SCALED( x )  ( ( (x) << shift ) - delta )
55
56    FT_Vector   v_last;
57    FT_Vector   v_control;
58    FT_Vector   v_start;
59
60    FT_Vector*  point;
61    FT_Vector*  limit;
62    char*       tags;
63
64    FT_Error    error;
65
66    FT_Int   n;         /* index of contour in outline     */
67    FT_UInt  first;     /* index of first point in contour */
68    FT_Int   tag;       /* current point's state           */
69
70    FT_Int   shift;
71    FT_Pos   delta;
72
73
74    if ( !outline || !func_interface )
75      return FT_Err_Invalid_Argument;
76
77    shift = func_interface->shift;
78    delta = func_interface->delta;
79    first = 0;
80
81    for ( n = 0; n < outline->n_contours; n++ )
82    {
83      FT_Int  last;  /* index of last point in contour */
84
85
86      last  = outline->contours[n];
87      limit = outline->points + last;
88
89      v_start = outline->points[first];
90      v_last  = outline->points[last];
91
92      v_start.x = SCALED( v_start.x ); v_start.y = SCALED( v_start.y );
93      v_last.= SCALED( v_last.x );  v_last.= SCALED( v_last.y );
94
95      v_control = v_start;
96
97      point = outline->points + first;
98      tags  = outline->tags  + first;
99      tag   = FT_CURVE_TAG( tags[0] );
100
101      /* A contour cannot start with a cubic control point! */
102      if ( tag == FT_CURVE_TAG_CUBIC )
103        goto Invalid_Outline;
104
105      /* check first point to determine origin */
106      if ( tag == FT_CURVE_TAG_CONIC )
107      {
108        /* first point is conic control.  Yes, this happens. */
109        if ( FT_CURVE_TAG( outline->tags[last] ) == FT_CURVE_TAG_ON )
110        {
111          /* start at last point if it is on the curve */
112          v_start = v_last;
113          limit--;
114        }
115        else
116        {
117          /* if both first and last points are conic,         */
118          /* start at their middle and record its position    */
119          /* for closure                                      */
120          v_start.x = ( v_start.x + v_last.x ) / 2;
121          v_start.y = ( v_start.y + v_last.y ) / 2;
122
123          v_last = v_start;
124        }
125        point--;
126        tags--;
127      }
128
129      error = func_interface->move_to( &v_start, user );
130      if ( error )
131        goto Exit;
132
133      while ( point < limit )
134      {
135        point++;
136        tags++;
137
138        tag = FT_CURVE_TAG( tags[0] );
139        switch ( tag )
140        {
141        case FT_CURVE_TAG_ON:  /* emit a single line_to */
142          {
143            FT_Vector  vec;
144
145
146            vec.x = SCALED( point->x );
147            vec.y = SCALED( point->y );
148
149            error = func_interface->line_to( &vec, user );
150            if ( error )
151              goto Exit;
152            continue;
153          }
154
155        case FT_CURVE_TAG_CONIC:  /* consume conic arcs */
156          v_control.x = SCALED( point->x );
157          v_control.y = SCALED( point->y );
158
159        Do_Conic:
160          if ( point < limit )
161          {
162            FT_Vector  vec;
163            FT_Vector  v_middle;
164
165
166            point++;
167            tags++;
168            tag = FT_CURVE_TAG( tags[0] );
169
170            vec.x = SCALED( point->x );
171            vec.y = SCALED( point->y );
172
173            if ( tag == FT_CURVE_TAG_ON )
174            {
175              error = func_interface->conic_to( &v_control, &vec, user );
176              if ( error )
177                goto Exit;
178              continue;
179            }
180
181            if ( tag != FT_CURVE_TAG_CONIC )
182              goto Invalid_Outline;
183
184            v_middle.x = ( v_control.x + vec.x ) / 2;
185            v_middle.y = ( v_control.y + vec.y ) / 2;
186
187            error = func_interface->conic_to( &v_control, &v_middle, user );
188            if ( error )
189              goto Exit;
190
191            v_control = vec;
192            goto Do_Conic;
193          }
194
195          error = func_interface->conic_to( &v_control, &v_start, user );
196          goto Close;
197
198        default:  /* FT_CURVE_TAG_CUBIC */
199          {
200            FT_Vector  vec1, vec2;
201
202
203            if ( point + 1 > limit                             ||
204                 FT_CURVE_TAG( tags[1] ) != FT_CURVE_TAG_CUBIC )
205              goto Invalid_Outline;
206
207            point += 2;
208            tags  += 2;
209
210            vec1.x = SCALED( point[-2].x ); vec1.y = SCALED( point[-2].y );
211            vec2.x = SCALED( point[-1].x ); vec2.y = SCALED( point[-1].y );
212
213            if ( point <= limit )
214            {
215              FT_Vector  vec;
216
217
218              vec.x = SCALED( point->x );
219              vec.y = SCALED( point->y );
220
221              error = func_interface->cubic_to( &vec1, &vec2, &vec, user );
222              if ( error )
223                goto Exit;
224              continue;
225            }
226
227            error = func_interface->cubic_to( &vec1, &vec2, &v_start, user );
228            goto Close;
229          }
230        }
231      }
232
233      /* close the contour with a line segment */
234      error = func_interface->line_to( &v_start, user );
235
236    Close:
237      if ( error )
238        goto Exit;
239
240      first = last + 1;
241    }
242
243    return 0;
244
245  Exit:
246    return error;
247
248  Invalid_Outline:
249    return FT_Err_Invalid_Outline;
250  }
251
252
253  FT_EXPORT_DEF( FT_Error )
254  FT_Outline_New_Internal( FT_Memory    memory,
255                           FT_UInt      numPoints,
256                           FT_Int       numContours,
257                           FT_Outline  *anoutline )
258  {
259    FT_Error  error;
260
261
262    if ( !anoutline || !memory )
263      return FT_Err_Invalid_Argument;
264
265    *anoutline = null_outline;
266
267    if ( FT_NEW_ARRAY( anoutline->points,   numPoints * 2L ) ||
268         FT_NEW_ARRAY( anoutline->tags,     numPoints      ) ||
269         FT_NEW_ARRAY( anoutline->contours, numContours    ) )
270      goto Fail;
271
272    anoutline->n_points    = (FT_UShort)numPoints;
273    anoutline->n_contours  = (FT_Short)numContours;
274    anoutline->flags      |= FT_OUTLINE_OWNER;
275
276    return FT_Err_Ok;
277
278  Fail:
279    anoutline->flags |= FT_OUTLINE_OWNER;
280    FT_Outline_Done_Internal( memory, anoutline );
281
282    return error;
283  }
284
285
286  /* documentation is in ftoutln.h */
287
288  FT_EXPORT_DEF( FT_Error )
289  FT_Outline_New( FT_Library   library,
290                  FT_UInt      numPoints,
291                  FT_Int       numContours,
292                  FT_Outline  *anoutline )
293  {
294    if ( !library )
295      return FT_Err_Invalid_Library_Handle;
296
297    return FT_Outline_New_Internal( library->memory, numPoints,
298                                    numContours, anoutline );
299  }
300
301
302  /* documentation is in ftoutln.h */
303
304  FT_EXPORT_DEF( FT_Error )
305  FT_Outline_Check( FT_Outline*  outline )
306  {
307    if ( outline )
308    {
309      FT_Int  n_points   = outline->n_points;
310      FT_Int  n_contours = outline->n_contours;
311      FT_Int  end0, end;
312      FT_Int  n;
313
314
315      /* empty glyph? */
316      if ( n_points == 0 && n_contours == 0 )
317        return 0;
318
319      /* check point and contour counts */
320      if ( n_points <= 0 || n_contours <= 0 )
321        goto Bad;
322
323      end0 = end = -1;
324      for ( n = 0; n < n_contours; n++ )
325      {
326        end = outline->contours[n];
327
328        /* note that we don't accept empty contours */
329        if ( end <= end0 || end >= n_points )
330          goto Bad;
331
332        end0 = end;
333      }
334
335      if ( end != n_points - 1 )
336        goto Bad;
337
338      /* XXX: check the tags array */
339      return 0;
340    }
341
342  Bad:
343    return FT_Err_Invalid_Argument;
344  }
345
346
347  /* documentation is in ftoutln.h */
348
349  FT_EXPORT_DEF( FT_Error )
350  FT_Outline_Copy( const FT_Outline*  source,
351                   FT_Outline        *target )
352  {
353    FT_Int  is_owner;
354
355
356    if ( !source            || !target            ||
357         source->n_points   != target->n_points   ||
358         source->n_contours != target->n_contours )
359      return FT_Err_Invalid_Argument;
360
361    if ( source == target )
362      return FT_Err_Ok;
363
364    FT_ARRAY_COPY( target->points, source->points, source->n_points );
365
366    FT_ARRAY_COPY( target->tags, source->tags, source->n_points );
367
368    FT_ARRAY_COPY( target->contours, source->contours, source->n_contours );
369
370    /* copy all flags, except the `FT_OUTLINE_OWNER' one */
371    is_owner      = target->flags & FT_OUTLINE_OWNER;
372    target->flags = source->flags;
373
374    target->flags &= ~FT_OUTLINE_OWNER;
375    target->flags |= is_owner;
376
377    return FT_Err_Ok;
378  }
379
380
381  FT_EXPORT_DEF( FT_Error )
382  FT_Outline_Done_Internal( FT_Memory    memory,
383                            FT_Outline*  outline )
384  {
385    if ( memory && outline )
386    {
387      if ( outline->flags & FT_OUTLINE_OWNER )
388      {
389        FT_FREE( outline->points   );
390        FT_FREE( outline->tags     );
391        FT_FREE( outline->contours );
392      }
393      *outline = null_outline;
394
395      return FT_Err_Ok;
396    }
397    else
398      return FT_Err_Invalid_Argument;
399  }
400
401
402  /* documentation is in ftoutln.h */
403
404  FT_EXPORT_DEF( FT_Error )
405  FT_Outline_Done( FT_Library   library,
406                   FT_Outline*  outline )
407  {
408    /* check for valid `outline' in FT_Outline_Done_Internal() */
409
410    if ( !library )
411      return FT_Err_Invalid_Library_Handle;
412
413    return FT_Outline_Done_Internal( library->memory, outline );
414  }
415
416
417  /* documentation is in ftoutln.h */
418
419  FT_EXPORT_DEF( void )
420  FT_Outline_Get_CBox( const FT_Outline*  outline,
421                       FT_BBox           *acbox )
422  {
423    FT_Pos  xMin, yMin, xMax, yMax;
424
425
426    if ( outline && acbox )
427    {
428      if ( outline->n_points == 0 )
429      {
430        xMin = 0;
431        yMin = 0;
432        xMax = 0;
433        yMax = 0;
434      }
435      else
436      {
437        FT_Vector*  vec   = outline->points;
438        FT_Vector*  limit = vec + outline->n_points;
439
440
441        xMin = xMax = vec->x;
442        yMin = yMax = vec->y;
443        vec++;
444
445        for ( ; vec < limit; vec++ )
446        {
447          FT_Pos  x, y;
448
449
450          x = vec->x;
451          if ( x < xMin ) xMin = x;
452          if ( x > xMax ) xMax = x;
453
454          y = vec->y;
455          if ( y < yMin ) yMin = y;
456          if ( y > yMax ) yMax = y;
457        }
458      }
459      acbox->xMin = xMin;
460      acbox->xMax = xMax;
461      acbox->yMin = yMin;
462      acbox->yMax = yMax;
463    }
464  }
465
466
467  /* documentation is in ftoutln.h */
468
469  FT_EXPORT_DEF( void )
470  FT_Outline_Translate( const FT_Outline*  outline,
471                        FT_Pos             xOffset,
472                        FT_Pos             yOffset )
473  {
474    FT_UShort   n;
475    FT_Vector*  vec = outline->points;
476
477
478    if ( !outline )
479      return;
480
481    for ( n = 0; n < outline->n_points; n++ )
482    {
483      vec->x += xOffset;
484      vec->y += yOffset;
485      vec++;
486    }
487  }
488
489
490  /* documentation is in ftoutln.h */
491
492  FT_EXPORT_DEF( void )
493  FT_Outline_Reverse( FT_Outline*  outline )
494  {
495    FT_UShort  n;
496    FT_Int     first, last;
497
498
499    if ( !outline )
500      return;
501
502    first = 0;
503
504    for ( n = 0; n < outline->n_contours; n++ )
505    {
506      last  = outline->contours[n];
507
508      /* reverse point table */
509      {
510        FT_Vector*  p = outline->points + first;
511        FT_Vector*  q = outline->points + last;
512        FT_Vector   swap;
513
514
515        while ( p < q )
516        {
517          swap = *p;
518          *p   = *q;
519          *q   = swap;
520          p++;
521          q--;
522        }
523      }
524
525      /* reverse tags table */
526      {
527        char*  p = outline->tags + first;
528        char*  q = outline->tags + last;
529        char   swap;
530
531
532        while ( p < q )
533        {
534          swap = *p;
535          *p   = *q;
536          *q   = swap;
537          p++;
538          q--;
539        }
540      }
541
542      first = last + 1;
543    }
544
545    outline->flags ^= FT_OUTLINE_REVERSE_FILL;
546  }
547
548
549  /* documentation is in ftoutln.h */
550
551  FT_EXPORT_DEF( FT_Error )
552  FT_Outline_Render( FT_Library         library,
553                     FT_Outline*        outline,
554                     FT_Raster_Params*  params )
555  {
556    FT_Error     error;
557    FT_Bool      update = 0;
558    FT_Renderer  renderer;
559    FT_ListNode  node;
560
561
562    if ( !library )
563      return FT_Err_Invalid_Library_Handle;
564
565    if ( !outline || !params )
566      return FT_Err_Invalid_Argument;
567
568    renderer = library->cur_renderer;
569    node     = library->renderers.head;
570
571    params->source = (void*)outline;
572
573    error = FT_Err_Cannot_Render_Glyph;
574    while ( renderer )
575    {
576      error = renderer->raster_render( renderer->raster, params );
577      if ( !error || FT_ERROR_BASE( error ) != FT_Err_Cannot_Render_Glyph )
578        break;
579
580      /* FT_Err_Cannot_Render_Glyph is returned if the render mode   */
581      /* is unsupported by the current renderer for this glyph image */
582      /* format                                                      */
583
584      /* now, look for another renderer that supports the same */
585      /* format                                                */
586      renderer = FT_Lookup_Renderer( library, FT_GLYPH_FORMAT_OUTLINE,
587                                     &node );
588      update   = 1;
589    }
590
591    /* if we changed the current renderer for the glyph image format */
592    /* we need to select it as the next current one                  */
593    if ( !error && update && renderer )
594      FT_Set_Renderer( library, renderer, 0, 0 );
595
596    return error;
597  }
598
599
600  /* documentation is in ftoutln.h */
601
602  FT_EXPORT_DEF( FT_Error )
603  FT_Outline_Get_Bitmap( FT_Library        library,
604                         FT_Outline*       outline,
605                         const FT_Bitmap  *abitmap )
606  {
607    FT_Raster_Params  params;
608
609
610    if ( !abitmap )
611      return FT_Err_Invalid_Argument;
612
613    /* other checks are delayed to FT_Outline_Render() */
614
615    params.target = abitmap;
616    params.flags  = 0;
617
618    if ( abitmap->pixel_mode == FT_PIXEL_MODE_GRAY  ||
619         abitmap->pixel_mode == FT_PIXEL_MODE_LCD   ||
620         abitmap->pixel_mode == FT_PIXEL_MODE_LCD_V )
621      params.flags |= FT_RASTER_FLAG_AA;
622
623    return FT_Outline_Render( library, outline, &params );
624  }
625
626
627  /* documentation is in ftoutln.h */
628
629  FT_EXPORT_DEF( void )
630  FT_Vector_Transform( FT_Vector*        vector,
631                       const FT_Matrix*  matrix )
632  {
633    FT_Pos xz, yz;
634
635
636    if ( !vector || !matrix )
637      return;
638
639    xz = FT_MulFix( vector->x, matrix->xx ) +
640         FT_MulFix( vector->y, matrix->xy );
641
642    yz = FT_MulFix( vector->x, matrix->yx ) +
643         FT_MulFix( vector->y, matrix->yy );
644
645    vector->x = xz;
646    vector->y = yz;
647  }
648
649
650  /* documentation is in ftoutln.h */
651
652  FT_EXPORT_DEF( void )
653  FT_Outline_Transform( const FT_Outline*  outline,
654                        const FT_Matrix*   matrix )
655  {
656    FT_Vector*  vec;
657    FT_Vector*  limit;
658
659
660    if ( !outline || !matrix )
661      return;
662
663    vec   = outline->points;
664    limit = vec + outline->n_points;
665
666    for ( ; vec < limit; vec++ )
667      FT_Vector_Transform( vec, matrix );
668  }
669
670
671#if 0
672
673#define FT_OUTLINE_GET_CONTOUR( outline, c, first, last )  \
674  do {                                                     \
675    (first) = ( c > 0 ) ? (outline)->points +              \
676                            (outline)->contours[c - 1] + 1 \
677                        : (outline)->points;               \
678    (last) = (outline)->points + (outline)->contours[c];   \
679  } while ( 0 )
680
681
682  /* Is a point in some contour?                     */
683  /*                                                 */
684  /* We treat every point of the contour as if it    */
685  /* it were ON.  That is, we allow false positives, */
686  /* but disallow false negatives.  (XXX really?)    */
687  static FT_Bool
688  ft_contour_has( FT_Outline*  outline,
689                  FT_Short     c,
690                  FT_Vector*   point )
691  {
692    FT_Vector*  first;
693    FT_Vector*  last;
694    FT_Vector*  a;
695    FT_Vector*  b;
696    FT_UInt     n = 0;
697
698
699    FT_OUTLINE_GET_CONTOUR( outline, c, first, last );
700
701    for ( a = first; a <= last; a++ )
702    {
703      FT_Pos  x;
704      FT_Int  intersect;
705
706
707      b = ( a == last ) ? first : a + 1;
708
709      intersect = ( a->y - point->y ) ^ ( b->y - point->y );
710
711      /* a and b are on the same side */
712      if ( intersect >= 0 )
713      {
714        if ( intersect == 0 && a->y == point->y )
715        {
716          if ( ( a->x <= point->x && b->x >= point->x ) ||
717               ( a->x >= point->x && b->x <= point->x ) )
718            return 1;
719        }
720
721        continue;
722      }
723
724      x = a->x + ( b->x - a->x ) * (point->y - a->y ) / ( b->y - a->y );
725
726      if ( x < point->x )
727        n++;
728      else if ( x == point->x )
729        return 1;
730    }
731
732    return ( n % 2 );
733  }
734
735
736  static FT_Bool
737  ft_contour_enclosed( FT_Outline*  outline,
738                       FT_UShort    c )
739  {
740    FT_Vector*  first;
741    FT_Vector*  last;
742    FT_Short    i;
743
744
745    FT_OUTLINE_GET_CONTOUR( outline, c, first, last );
746
747    for ( i = 0; i < outline->n_contours; i++ )
748    {
749      if ( i != c && ft_contour_has( outline, i, first ) )
750      {
751        FT_Vector*  pt;
752
753
754        for ( pt = first + 1; pt <= last; pt++ )
755          if ( !ft_contour_has( outline, i, pt ) )
756            return 0;
757
758        return 1;
759      }
760    }
761
762    return 0;
763  }
764
765
766  /* This version differs from the public one in that each */
767  /* part (contour not enclosed in another contour) of the */
768  /* outline is checked for orientation.  This is          */
769  /* necessary for some buggy CJK fonts.                   */
770  static FT_Orientation
771  ft_outline_get_orientation( FT_Outline*  outline )
772  {
773    FT_Short        i;
774    FT_Vector*      first;
775    FT_Vector*      last;
776    FT_Orientation  orient = FT_ORIENTATION_NONE;
777
778
779    first = outline->points;
780    for ( i = 0; i < outline->n_contours; i++, first = last + 1 )
781    {
782      FT_Vector*  point;
783      FT_Vector*  xmin_point;
784      FT_Pos      xmin;
785
786
787      last = outline->points + outline->contours[i];
788
789      /* skip degenerate contours */
790      if ( last < first + 2 )
791        continue;
792
793      if ( ft_contour_enclosed( outline, i ) )
794        continue;
795
796      xmin       = first->x;
797      xmin_point = first;
798
799      for ( point = first + 1; point <= last; point++ )
800      {
801        if ( point->x < xmin )
802        {
803          xmin       = point->x;
804          xmin_point = point;
805        }
806      }
807
808      /* check the orientation of the contour */
809      {
810        FT_Vector*      prev;
811        FT_Vector*      next;
812        FT_Orientation  o;
813
814
815        prev = ( xmin_point == first ) ? last : xmin_point - 1;
816        next = ( xmin_point == last ) ? first : xmin_point + 1;
817
818        if ( FT_Atan2( prev->x - xmin_point->x, prev->y - xmin_point->y ) >
819             FT_Atan2( next->x - xmin_point->x, next->y - xmin_point->y ) )
820          o = FT_ORIENTATION_POSTSCRIPT;
821        else
822          o = FT_ORIENTATION_TRUETYPE;
823
824        if ( orient == FT_ORIENTATION_NONE )
825          orient = o;
826        else if ( orient != o )
827          return FT_ORIENTATION_NONE;
828      }
829    }
830
831    return orient;
832  }
833
834#endif /* 0 */
835
836
837  /* documentation is in ftoutln.h */
838
839  FT_EXPORT_DEF( FT_Error )
840  FT_Outline_Embolden( FT_Outline*  outline,
841                       FT_Pos       strength )
842  {
843    FT_Vector*  points;
844    FT_Vector   v_prev, v_first, v_next, v_cur;
845    FT_Angle    rotate, angle_in, angle_out;
846    FT_Int      c, n, first;
847    FT_Int      orientation;
848
849
850    if ( !outline )
851      return FT_Err_Invalid_Argument;
852
853    strength /= 2;
854    if ( strength == 0 )
855      return FT_Err_Ok;
856
857    orientation = FT_Outline_Get_Orientation( outline );
858    if ( orientation == FT_ORIENTATION_NONE )
859    {
860      if ( outline->n_contours )
861        return FT_Err_Invalid_Argument;
862      else
863        return FT_Err_Ok;
864    }
865
866    if ( orientation == FT_ORIENTATION_TRUETYPE )
867      rotate = -FT_ANGLE_PI2;
868    else
869      rotate = FT_ANGLE_PI2;
870
871    points = outline->points;
872
873    first = 0;
874    for ( c = 0; c < outline->n_contours; c++ )
875    {
876      int  last = outline->contours[c];
877
878
879      v_first = points[first];
880      v_prev  = points[last];
881      v_cur   = v_first;
882
883      for ( n = first; n <= last; n++ )
884      {
885        FT_Vector  in, out;
886        FT_Angle   angle_diff;
887        FT_Pos     d;
888        FT_Fixed   scale;
889
890
891        if ( n < last )
892          v_next = points[n + 1];
893        else
894          v_next = v_first;
895
896        /* compute the in and out vectors */
897        in.x = v_cur.x - v_prev.x;
898        in.y = v_cur.y - v_prev.y;
899
900        out.x = v_next.x - v_cur.x;
901        out.y = v_next.y - v_cur.y;
902
903        angle_in   = FT_Atan2( in.x, in.y );
904        angle_out  = FT_Atan2( out.x, out.y );
905        angle_diff = FT_Angle_Diff( angle_in, angle_out );
906        scale      = FT_Cos( angle_diff / 2 );
907
908        if ( scale < 0x4000L && scale > -0x4000L )
909          in.x = in.y = 0;
910        else
911        {
912          d = FT_DivFix( strength, scale );
913
914          FT_Vector_From_Polar( &in, d, angle_in + angle_diff / 2 - rotate );
915        }
916
917        outline->points[n].x = v_cur.x + strength + in.x;
918        outline->points[n].y = v_cur.y + strength + in.y;
919
920        v_prev = v_cur;
921        v_cur  = v_next;
922      }
923
924      first = last + 1;
925    }
926
927    return FT_Err_Ok;
928  }
929
930
931  /* documentation is in ftoutln.h */
932
933  FT_EXPORT_DEF( FT_Orientation )
934  FT_Outline_Get_Orientation( FT_Outline*  outline )
935  {
936    FT_Pos      xmin       = 32768L;
937    FT_Pos      xmin_ymin  = 32768L;
938    FT_Pos      xmin_ymax  = -32768L;
939    FT_Vector*  xmin_first = NULL;
940    FT_Vector*  xmin_last  = NULL;
941
942    short*      contour;
943
944    FT_Vector*  first;
945    FT_Vector*  last;
946    FT_Vector*  prev;
947    FT_Vector*  point;
948
949    int             i;
950    FT_Pos          ray_y[3];
951    FT_Orientation  result[3];
952
953
954    if ( !outline || outline->n_points <= 0 )
955      return FT_ORIENTATION_TRUETYPE;
956
957    /* We use the nonzero winding rule to find the orientation.       */
958    /* Since glyph outlines behave much more `regular' than arbitrary */
959    /* cubic or quadratic curves, this test deals with the polygon    */
960    /* only which is spanned up by the control points.                */
961
962    first = outline->points;
963    for ( contour = outline->contours;
964          contour < outline->contours + outline->n_contours;
965          contour++, first = last + 1 )
966    {
967      FT_Pos  contour_xmin = 32768L;
968      FT_Pos  contour_xmax = -32768L;
969      FT_Pos  contour_ymin = 32768L;
970      FT_Pos  contour_ymax = -32768L;
971
972
973      last = outline->points + *contour;
974
975      /* skip degenerate contours */
976      if ( last < first + 2 )
977        continue;
978
979      for ( point = first; point <= last; ++point )
980      {
981        if ( point->x < contour_xmin )
982          contour_xmin = point->x;
983
984        if ( point->x > contour_xmax )
985          contour_xmax = point->x;
986
987        if ( point->y < contour_ymin )
988          contour_ymin = point->y;
989
990        if ( point->y > contour_ymax )
991          contour_ymax = point->y;
992      }
993
994      if ( contour_xmin < xmin          &&
995           contour_xmin != contour_xmax &&
996           contour_ymin != contour_ymax )
997      {
998        xmin       = contour_xmin;
999        xmin_ymin  = contour_ymin;
1000        xmin_ymax  = contour_ymax;
1001        xmin_first = first;
1002        xmin_last  = last;
1003      }
1004    }
1005
1006    if ( xmin == 32768 )
1007      return FT_ORIENTATION_TRUETYPE;
1008
1009    ray_y[0] = ( xmin_ymin * 3 + xmin_ymax     ) >> 2;
1010    ray_y[1] = ( xmin_ymin     + xmin_ymax     ) >> 1;
1011    ray_y[2] = ( xmin_ymin     + xmin_ymax * 3 ) >> 2;
1012
1013    for ( i = 0; i < 3; i++ )
1014    {
1015      FT_Pos      left_x;
1016      FT_Pos      right_x;
1017      FT_Vector*  left1;
1018      FT_Vector*  left2;
1019      FT_Vector*  right1;
1020      FT_Vector*  right2;
1021
1022
1023    RedoRay:
1024      left_x  = 32768L;
1025      right_x = -32768L;
1026
1027      left1 = left2 = right1 = right2 = NULL;
1028
1029      prev = xmin_last;
1030      for ( point = xmin_first; point <= xmin_last; prev = point, ++point )
1031      {
1032        FT_Pos  tmp_x;
1033
1034
1035        if ( point->y == ray_y[i] || prev->y == ray_y[i] )
1036        {
1037          ray_y[i]++;
1038          goto RedoRay;
1039        }
1040
1041        if ( ( point->y < ray_y[i] && prev->y < ray_y[i] ) ||
1042             ( point->y > ray_y[i] && prev->y > ray_y[i] ) )
1043          continue;
1044
1045        tmp_x = FT_MulDiv( point->x - prev->x,
1046                           ray_y[i] - prev->y,
1047                           point->y - prev->y ) + prev->x;
1048
1049        if ( tmp_x < left_x )
1050        {
1051          left_x = tmp_x;
1052          left1  = prev;
1053          left2  = point;
1054        }
1055
1056        if ( tmp_x > right_x )
1057        {
1058          right_x = tmp_x;
1059          right1  = prev;
1060          right2  = point;
1061        }
1062      }
1063
1064      if ( left1 && right1 )
1065      {
1066        if ( left1->y < left2->y && right1->y > right2->y )
1067          result[i] = FT_ORIENTATION_TRUETYPE;
1068        else if ( left1->y > left2->y && right1->y < right2->y )
1069          result[i] = FT_ORIENTATION_POSTSCRIPT;
1070        else
1071          result[i] = FT_ORIENTATION_NONE;
1072      }
1073    }
1074
1075    if ( result[0] != FT_ORIENTATION_NONE                     &&
1076         ( result[0] == result[1] || result[0] == result[2] ) )
1077      return result[0];
1078
1079    if ( result[1] != FT_ORIENTATION_NONE && result[1] == result[2] )
1080      return result[1];
1081
1082    return FT_ORIENTATION_TRUETYPE;
1083  }
1084
1085
1086/* END */
Note: See TracBrowser for help on using the repository browser.