otlgpos.c

下载来的一个看图软件的源代码

#include "otlgpos.h"
#include "otlcommn.h"

 /* forward declaration */
  static OTL_ValidateFunc  otl_gpos_validate_funcs[];


 /************************************************************************/
 /************************************************************************/
 /*****                                                              *****/
 /*****                         VALUE RECORDS                        *****/
 /*****                                                              *****/
 /************************************************************************/
 /************************************************************************/

  static OTL_UInt
  otl_value_length( OTL_UInt  format )
  {
    FT_UInt  count;

    count = (( format & 0xAA ) >> 1) + ( format & 0x55 );
    count = (( count  & 0xCC ) >> 2) + ( count  & 0x33 );
    count = (( count  & 0xF0 ) >> 4) + ( count  & 0x0F );

    return count;
  }


  static void
  otl_value_validate( OTL_Bytes      table,
                      OTL_Bytes      pos_table,
                      OTL_UInt       format,
                      OTL_Validator  valid )
  {
    OTL_Bytes  p = table;
    OTL_UInt   count, device;

    if ( format >= 0x100U )
      OTL_INVALID_DATA;

    for ( count = 4; count > 0; count-- )
    {
      if ( format & 1 )
      {
        OTL_CHECK( 2 );
        p += 2;
      }

      format >>= 1;
    }

    for ( count = 4; count > 0; count-- )
    {
      if ( format & 1 )
      {
        OTL_CHECK( 2 );
        device = OTL_NEXT_USHORT( p );
        if ( device )
          otl_device_table_validate( pos_table + device, valid );
      }
      format >>= 1;
    }
  }


 /************************************************************************/
 /************************************************************************/
 /*****                                                              *****/
 /*****                          ANCHORS                             *****/
 /*****                                                              *****/
 /************************************************************************/
 /************************************************************************/

  static void
  otl_anchor_validate( OTL_Bytes      table,
                       OTL_Validator  valid )
  {
    OTL_Bytes  p = table;
    OTL_UInt   format;

    OTL_CHECK( 6 );
    format = OTL_NEXT_USHORT( p );
    p += 4;

    switch ( format )
    {
      case 1:
        break;

      case 2:
        OTL_CHECK( 2 );  /* anchor point */
        break;

      case 3:
        {
          OTL_UInt  x_device, y_device;

          OTL_CHECK( 4 );
          x_device = OTL_NEXT_USHORT( p );
          y_device = OTL_NEXT_USHORT( p );

          if ( x_device )
            otl_device_table_validate( table + x_device, valid );

          if ( y_device )
            otl_device_table_validate( table + y_device, valid );
        }
        break;

      default:
        OTL_INVALID_DATA;
    }
  }


 /************************************************************************/
 /************************************************************************/
 /*****                                                              *****/
 /*****                           MARK ARRAY                         *****/
 /*****                                                              *****/
 /************************************************************************/
 /************************************************************************/

  static void
  otl_mark_array_validate( OTL_Bytes      table,
                           OTL_Validator  valid )
  {
    OTL_Bytes  p = table;
    OTL_UInt   count;

    OTL_CHECK( 2 );

    count = OTL_NEXT_USHORT( p );
    OTL_CHECK( count * 4 );
    for ( ; count > 0; count-- )
    {
      p += 2;  /* ignore class index */
      otl_anchor_validate( table + OTL_NEXT_USHORT( p ), valid );
    }
  }


 /************************************************************************/
 /************************************************************************/
 /*****                                                              *****/
 /*****                 GPOS LOOKUP TYPE 1                           *****/
 /*****                                                              *****/
 /************************************************************************/
 /************************************************************************/

  static void
  otl_gpos_lookup1_validate( OTL_Bytes      table,
                             OTL_Validator  valid )
  {
    OTL_Bytes  p = table;
    OTL_UInt   format;

    OTL_CHECK( 2 );
    format = OTL_NEXT_USHORT( p );
    switch ( format )
    {
      case 1:
        {
          FT_UInt  coverage, value_format;

          OTL_CHECK( 4 );
          coverage     = OTL_NEXT_USHORT( p );
          value_format = OTL_NEXT_USHORT( p );

          otl_coverage_validate( table + coverage, valid );
          otl_value_validate( p, table, value_format, valid );
        }
        break;

      case 2:
        {
          FT_UInt  coverage, value_format, count, len;

          OTL_CHECK( 6 );
          coverage     = OTL_NEXT_USHORT( p );
          value_format = OTL_NEXT_USHORT( p );
          count        = OTL_NEXT_USHORT( p );
          len          = otl_value_length( value_format );

          otl_coverage_validate( table + coverage, valid );

          OTL_CHECK( count * len );
          for ( ; count > 0; count-- )
          {
            otl_value_validate( p, table, value_format, valid );
            p += len;
          }
        }
        break;

      default:
        OTL_INVALID_DATA;
    }
  }


 /************************************************************************/
 /************************************************************************/
 /*****                                                              *****/
 /*****                 GPOS LOOKUP TYPE 2                           *****/
 /*****                                                              *****/
 /************************************************************************/
 /************************************************************************/

  static otl_gpos_pairset_validate( OTL_Bytes      table,
                                    OTL_Bytes      pos_table,
                                    OTL_UInt       format1,
                                    OTL_UInt       format2,
                                    OTL_Validator  valid )
  {
    OTL_Bytes  p = table;
    OTL_UInt   len1, len2, count;

    OTL_CHECK( 2 );
    count = OTL_NEXT_USHORT( p );
    len1  = otl_value_length( format1 );
    len2  = otl_value_length( format2 );

    OTL_CHECK( count * (len1+len2+2) );
    for ( ; count > 0; count-- )
    {
      p += 2;  /* ignore glyph id */
      otl_value_validate( p, pos_table, format1, valid );
      p += len1;

      otl_value_validate( p, pos_table, format2, valid );
      p += len2;
    }
  }

  static void
  otl_gpos_lookup2_validate( OTL_Bytes      table,
                             OTL_Validator  valid )
  {
    OTL_Bytes  p = table;
    OTL_UInt   format;

    OTL_CHECK( 2 );
    format = OTL_NEXT_USHORT( p );
    switch (format)
    {
      case 1:
        {
          OTL_UInt  coverage, value1, value2, count;

          OTL_CHECK( 8 );
          coverage = OTL_NEXT_USHORT( p );
          value1   = OTL_NEXT_USHORT( p );
          value2   = OTL_NEXT_USHORT( p );
          count    = OTL_NEXT_USHORT( p );

          otl_coverage_validate( table + coverage, valid );

          OTL_CHECK( count*2 );
          for ( ; count > 0; count-- )
          {
            otl_gpos_pairset_validate( table + OTL_NEXT_USHORT( p ),
                                       table, value1, value2, valid );
          }
        }
        break;

      case 2:
        {
          OTL_UInt  coverage, value1, value2, class1, class2, count1, count2;
          OTL_UInt  len1, len2;

          OTL_CHECK( 14 );
          coverage = OTL_NEXT_USHORT( p );
          value1   = OTL_NEXT_USHORT( p );
          value2   = OTL_NEXT_USHORT( p );
          class1   = OTL_NEXT_USHORT( p );
          class2   = OTL_NEXT_USHORT( p );
          count1   = OTL_NEXT_USHORT( p );
          count2   = OTL_NEXT_USHORT( p );

          len1 = otl_value_length( value1 );
          len2 = otl_value_length( value2 );

          otl_coverage_validate( table + coverage, valid );

          OTL_CHECK( count1*count2*(len1+len2) );
          for ( ; count1 > 0; count1-- )
          {
            for ( ; count2 > 0; count2-- )
            {
              otl_value_validate( p, table, value1, valid );
              p += len1;

              otl_value_validate( p, table, value2, valid );
              p += len2;
            }
          }
        }
        break;

      default:
        OTL_INVALID_DATA;
    }
  }


 /************************************************************************/
 /************************************************************************/
 /*****                                                              *****/
 /*****                 GPOS LOOKUP TYPE 3                           *****/
 /*****                                                              *****/
 /************************************************************************/
 /************************************************************************/

  static void
  otl_gpos_lookup3_validate( OTL_Bytes  table,
                             OTL_Valid  valid )
  {
    OTL_Bytes  p = table;
    OTL_UInt   format;

    OTL_CHECK( 2 );
    format = OTL_NEXT_USHORT( p );
    switch (format)
    {
      case 1:
        {
          OTL_UInt  coverage, count, anchor1, anchor2;

          OTL_CHECK( 4 );
          coverage = OTL_NEXT_USHORT( p );
          count    = OTL_NEXT_USHORT( p );

          otl_coverage_validate( table + coverage, valid );

          OTL_CHECK( count*4 );
          for ( ; count > 0; count-- )
          {
            anchor1 = OTL_NEXT_USHORT( p );
            anchor2 = OTL_NEXT_USHORT( p );

            if ( anchor1 )
              otl_anchor_validate( table + anchor1, valid );

            if ( anchor2 )
              otl_anchor_validate( table + anchor2, valid );
          }
        }
        break;

      default:
        OTL_INVALID_DATA;
    }
  }


 /************************************************************************/
 /************************************************************************/
 /*****                                                              *****/
 /*****                 GPOS LOOKUP TYPE 4                           *****/
 /*****                                                              *****/
 /************************************************************************/
 /************************************************************************/

  static void
  otl_base_array_validate( OTL_Bytes      table,
                           OTL_UInt       class_count,
                           OTL_Validator  valid )
  {
    OTL_Bytes  p = table;
    OTL_UInt   count, count2;

    OTL_CHECK( 2 );
    count = OTL_NEXT_USHORT( p );

    OTL_CHECK( count*class_count*2 );
    for ( ; count > 0; count-- )
      for ( count2 = class_count; count2 > 0; count2-- )
        otl_anchor_validate( table + OTL_NEXT_USHORT( p ) );
  }


  static void
  otl_gpos_lookup4_validate( OTL_Bytes  table,
                             OTL_Valid  valid )
  {
    OTL_Bytes  p = table;
    OTL_UInt   format;

    OTL_CHECK( 2 );
    format = OTL_NEXT_USHORT( p );
    switch (format)
    {
      case 1:
        {
          OTL_UInt  mark_coverage, base_coverage, class_count;
          OTL_UInt  mark_array, base_array;

          OTL_CHECK( 10 );
          mark_coverage = OTL_NEXT_USHORT( p );
          base_coverage = OTL_NEXT_USHORT( p );
          class_count   = OTL_NEXT_USHORT( p );
          mark_array    = OTL_NEXT_USHORT( p );
          base_array    = OTL_NEXT_USHORT( p );

          otl_coverage_validate( table + mark_coverage, valid );
          otl_coverage_validate( table + base_coverage, valid );

          otl_mark_array_validate( table + mark_array, valid );
          otl_base_array_validate( table, class_count, valid );
        }
        break;

      default:
        OTL_INVALID_DATA;
    }
  }

 /************************************************************************/
 /************************************************************************/
 /*****                                                              *****/
 /*****                 GPOS LOOKUP TYPE 5                           *****/
 /*****                                                              *****/
 /************************************************************************/
 /************************************************************************/

  static void
  otl_liga_attach_validate( OTL_Bytes      table,
                            OTL_UInt       class_count,
                            OTL_Validator  valid )
  {
    OTL_Bytes  p = table;
    OTL_UInt   count, count2;

    OTL_CHECK( 2 );
    count = OTL_NEXT_USHORT( p );

    OTL_CHECK( count*class_count*2 );
    for ( ; count > 0; count-- )
      for ( count2 = class_count; class_count > 0; class_count-- )
        otl_anchor_validate( table + OTL_NEXT_USHORT( p ), valid );
  }


  static void
  otl_liga_array_validate( OTL_Bytes      table,
                           OTL_UInt       class_count,
                           OTL_Validator  valid )
  {
    OTL_Bytes  p = table;
    OTL_UInt   count, count2;

    OTL_CHECK( 2 );
    count = OTL_NEXT_USHORT( p );

    OTL_CHECK( count*2 );
    for ( ; count > 0; count-- )
      otl_liga_attach_validate( table + OTL_NEXT_USHORT( p ), valid );
  }


  static void
  otl_gpos_lookup5_validate( OTL_Bytes  table,
                             OTL_Valid  valid )
  {
    OTL_Bytes  p = table;
    OTL_UInt   format;

    OTL_CHECK( 2 );
    format = OTL_NEXT_USHORT( p );
    switch (format)
    {
      case 1:
        {
          OTL_UInt  mark_coverage, lig_coverage, class_count;
          OTL_UInt  mar_array, lig_array;

          OTL_CHECK( 10 );
          mark_coverage = OTL_NEXT_USHORT( p );
          liga_coverage = OTL_NEXT_USHORT( p );
          class_count   = OTL_NEXT_USHORT( p );
          mark_array    = OTL_NEXT_USHORT( p );
          liga_array    = OTL_NEXT_USHORT( p );

          otl_coverage_validate( table + mark_coverage, valid );
          otl_coverage_validate( table + liga_coverage, valid );

          otl_mark_array_validate( table + mark_array, valid );
          otl_liga_array_validate( table + liga_array, class_count, valid );