text: /****************************************************************************
   *
   * ftsnames.c
   *
   *   Simple interface to access SFNT name tables (which are used
   *   to hold font names, copyright info, notices, etc.) (body).
   *
   *   This is _not_ used to retrieve glyph names!
   *
   * Copyright (C) 1996-2020 by
   * David Turner, Robert Wilhelm, and Werner Lemberg.
   *
   * This file is part of the FreeType project, and may only be used,
   * modified, and distributed under the terms of the FreeType project
   * 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.
   *
   */
  
  
  #include <ft2build.h>
  #include FT_INTERNAL_DEBUG_H
  
  #include FT_SFNT_NAMES_H
  #include FT_INTERNAL_TRUETYPE_TYPES_H
  #include FT_INTERNAL_STREAM_H
  
  #ifdef TT_CONFIG_OPTION_SFNT_NAMES
  
  
  /* documentation is in ftsnames.h */
  
  FT_EXPORT_DEF(FT_UInt)
  FT_Get_Sfnt_Name_Count (FT_Face face) {
    return (face && FT_IS_SFNT(face)) ? ((TT_Face) face)->num_names : 0;
  }
  
  
  /* documentation is in ftsnames.h */
  
  FT_EXPORT_DEF(FT_Error)
  FT_Get_Sfnt_Name (FT_Face face,
                    FT_UInt idx,
                    FT_SfntName* aname) {
    FT_Error error = FT_ERR(Invalid_Argument);
  
    if (aname && face && FT_IS_SFNT(face)) {
      TT_Face ttface = (TT_Face) face;
  
      if (idx < (FT_UInt) ttface->num_names) {
        TT_Name entry = ttface->name_table.names + idx;
  
  
        /* load name on demand */
        if (entry->stringLength > 0 && !entry->string) {
          FT_Memory memory = face->memory;
          FT_Stream stream = face->stream;
  
          if (FT_NEW_ARRAY  (entry->string, entry->stringLength) ||
              FT_STREAM_SEEK(entry->stringOffset) ||
              FT_STREAM_READ(entry->string, entry->stringLength)) {
            FT_FREE(entry->string);
            entry->stringLength = 0;
          }
        }
  
        aname->platform_id = entry->platformID;
        aname->encoding_id = entry->encodingID;
        aname->language_id = entry->languageID;
        aname->name_id = entry->nameID;
        aname->string = (FT_Byte*) entry->string;
        aname->string_len = entry->stringLength;
  
        error = FT_Err_Ok;
      }
    }
  
    return error;
  }
  
  
  /* documentation is in ftsnames.h */
  
  FT_EXPORT_DEF(FT_Error)
  FT_Get_Sfnt_LangTag (FT_Face face,
                       FT_UInt langID,
                       FT_SfntLangTag* alangTag) {
    FT_Error error = FT_ERR(Invalid_Argument);
  
    if (alangTag && face && FT_IS_SFNT(face)) {
      TT_Face ttface = (TT_Face) face;
  
      if (ttface->name_table.format != 1)
        return FT_THROW(Invalid_Table);
  
      if (langID > 0x8000U &&
          langID - 0x8000U < ttface->name_table.numLangTagRecords) {
        TT_LangTag entry = ttface->name_table.langTags +
                           (langID - 0x8000U);
  
  
        /* load name on demand */
        if (entry->stringLength > 0 && !entry->string) {
          FT_Memory memory = face->memory;
          FT_Stream stream = face->stream;
  
          if (FT_NEW_ARRAY  (entry->string, entry->stringLength) ||
              FT_STREAM_SEEK(entry->stringOffset) ||
              FT_STREAM_READ(entry->string, entry->stringLength)) {
            FT_FREE(entry->string);
            entry->stringLength = 0;
          }
        }
  
        alangTag->string = (FT_Byte*) entry->string;
        alangTag->string_len = entry->stringLength;
  
        error = FT_Err_Ok;
      }
    }
  
    return error;
  }
  
  #else /* !TT_CONFIG_OPTION_SFNT_NAMES */
  
  
  FT_EXPORT_DEF( FT_UInt )
  FT_Get_Sfnt_Name_Count( FT_Face  face )
  {
    FT_UNUSED( face );
  
    return 0;
  }
  
  
  FT_EXPORT_DEF( FT_Error )
  FT_Get_Sfnt_Name( FT_Face       face,
                    FT_UInt       idx,
                    FT_SfntName  *aname )
  {
    FT_UNUSED( face );
    FT_UNUSED( idx );
    FT_UNUSED( aname );
  
    return FT_THROW( Unimplemented_Feature );
  }
  
  
  FT_EXPORT_DEF( FT_Error )
  FT_Get_Sfnt_LangTag( FT_Face          face,
                       FT_UInt          langID,
                       FT_SfntLangTag  *alangTag )
  {
    FT_UNUSED( face );
    FT_UNUSED( langID );
    FT_UNUSED( alangTag );
  
    return FT_THROW( Unimplemented_Feature );
  }
  
  
  #endif /* !TT_CONFIG_OPTION_SFNT_NAMES */
  
  
  /* END */
  