src/base/ftoutln.c

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