| /***************************************************************************/ |
| /* */ |
| /* sfdriver.c */ |
| /* */ |
| /* High-level SFNT driver interface (body). */ |
| /* */ |
| /* Copyright 1996-2001, 2002, 2003, 2004, 2005, 2006 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_SFNT_H |
| #include FT_INTERNAL_OBJECTS_H |
| |
| #include "sfdriver.h" |
| #include "ttload.h" |
| #include "sfobjs.h" |
| |
| #include "sferrors.h" |
| |
| #ifdef TT_CONFIG_OPTION_EMBEDDED_BITMAPS |
| #include "ttsbit.h" |
| #endif |
| |
| #ifdef TT_CONFIG_OPTION_POSTSCRIPT_NAMES |
| #include "ttpost.h" |
| #endif |
| |
| #ifdef TT_CONFIG_OPTION_BDF |
| #include "ttbdf.h" |
| #include FT_SERVICE_BDF_H |
| #endif |
| |
| #include "ttcmap.h" |
| #include "ttkern.h" |
| #include "ttmtx.h" |
| |
| #include FT_SERVICE_GLYPH_DICT_H |
| #include FT_SERVICE_POSTSCRIPT_NAME_H |
| #include FT_SERVICE_SFNT_H |
| #include FT_SERVICE_TT_CMAP_H |
| |
| |
| /* |
| * SFNT TABLE SERVICE |
| * |
| */ |
| |
| static void* |
| get_sfnt_table( TT_Face face, |
| FT_Sfnt_Tag tag ) |
| { |
| void* table; |
| |
| |
| switch ( tag ) |
| { |
| case ft_sfnt_head: |
| table = &face->header; |
| break; |
| |
| case ft_sfnt_hhea: |
| table = &face->horizontal; |
| break; |
| |
| case ft_sfnt_vhea: |
| table = face->vertical_info ? &face->vertical : 0; |
| break; |
| |
| case ft_sfnt_os2: |
| table = face->os2.version == 0xFFFFU ? 0 : &face->os2; |
| break; |
| |
| case ft_sfnt_post: |
| table = &face->postscript; |
| break; |
| |
| case ft_sfnt_maxp: |
| table = &face->max_profile; |
| break; |
| |
| case ft_sfnt_pclt: |
| table = face->pclt.Version ? &face->pclt : 0; |
| break; |
| |
| default: |
| table = 0; |
| } |
| |
| return table; |
| } |
| |
| |
| static FT_Error |
| sfnt_table_info( TT_Face face, |
| FT_UInt idx, |
| FT_ULong *tag, |
| FT_ULong *length ) |
| { |
| if ( !tag || !length ) |
| return SFNT_Err_Invalid_Argument; |
| |
| if ( idx >= face->num_tables ) |
| return SFNT_Err_Table_Missing; |
| |
| *tag = face->dir_tables[idx].Tag; |
| *length = face->dir_tables[idx].Length; |
| |
| return SFNT_Err_Ok; |
| } |
| |
| |
| static const FT_Service_SFNT_TableRec sfnt_service_sfnt_table = |
| { |
| (FT_SFNT_TableLoadFunc)tt_face_load_any, |
| (FT_SFNT_TableGetFunc) get_sfnt_table, |
| (FT_SFNT_TableInfoFunc)sfnt_table_info |
| }; |
| |
| |
| #ifdef TT_CONFIG_OPTION_POSTSCRIPT_NAMES |
| |
| /* |
| * GLYPH DICT SERVICE |
| * |
| */ |
| |
| static FT_Error |
| sfnt_get_glyph_name( TT_Face face, |
| FT_UInt glyph_index, |
| FT_Pointer buffer, |
| FT_UInt buffer_max ) |
| { |
| FT_String* gname; |
| FT_Error error; |
| |
| |
| error = tt_face_get_ps_name( face, glyph_index, &gname ); |
| if ( !error ) |
| FT_STRCPYN( buffer, gname, buffer_max ); |
| |
| return error; |
| } |
| |
| |
| static const FT_Service_GlyphDictRec sfnt_service_glyph_dict = |
| { |
| (FT_GlyphDict_GetNameFunc) sfnt_get_glyph_name, |
| (FT_GlyphDict_NameIndexFunc)NULL |
| }; |
| |
| #endif /* TT_CONFIG_OPTION_POSTSCRIPT_NAMES */ |
| |
| |
| /* |
| * POSTSCRIPT NAME SERVICE |
| * |
| */ |
| |
| static const char* |
| sfnt_get_ps_name( TT_Face face ) |
| { |
| FT_Int n, found_win, found_apple; |
| const char* result = NULL; |
| |
| |
| /* shouldn't happen, but just in case to avoid memory leaks */ |
| if ( face->postscript_name ) |
| return face->postscript_name; |
| |
| /* scan the name table to see whether we have a Postscript name here, */ |
| /* either in Macintosh or Windows platform encodings */ |
| found_win = -1; |
| found_apple = -1; |
| |
| for ( n = 0; n < face->num_names; n++ ) |
| { |
| TT_NameEntryRec* name = face->name_table.names + n; |
| |
| |
| if ( name->nameID == 6 && name->stringLength > 0 ) |
| { |
| if ( name->platformID == 3 && |
| name->encodingID == 1 && |
| name->languageID == 0x409 ) |
| found_win = n; |
| |
| if ( name->platformID == 1 && |
| name->encodingID == 0 && |
| name->languageID == 0 ) |
| found_apple = n; |
| } |
| } |
| |
| if ( found_win != -1 ) |
| { |
| FT_Memory memory = face->root.memory; |
| TT_NameEntryRec* name = face->name_table.names + found_win; |
| FT_UInt len = name->stringLength / 2; |
| FT_Error error = SFNT_Err_Ok; |
| |
| FT_UNUSED( error ); |
| |
| |
| if ( !FT_ALLOC( result, name->stringLength + 1 ) ) |
| { |
| FT_Stream stream = face->name_table.stream; |
| FT_String* r = (FT_String*)result; |
| FT_Byte* p = (FT_Byte*)name->string; |
| |
| |
| if ( FT_STREAM_SEEK( name->stringOffset ) || |
| FT_FRAME_ENTER( name->stringLength ) ) |
| { |
| FT_FREE( result ); |
| name->stringLength = 0; |
| name->stringOffset = 0; |
| FT_FREE( name->string ); |
| |
| goto Exit; |
| } |
| |
| p = (FT_Byte*)stream->cursor; |
| |
| for ( ; len > 0; len--, p += 2 ) |
| { |
| if ( p[0] == 0 && p[1] >= 32 && p[1] < 128 ) |
| *r++ = p[1]; |
| } |
| *r = '\0'; |
| |
| FT_FRAME_EXIT(); |
| } |
| goto Exit; |
| } |
| |
| if ( found_apple != -1 ) |
| { |
| FT_Memory memory = face->root.memory; |
| TT_NameEntryRec* name = face->name_table.names + found_apple; |
| FT_UInt len = name->stringLength; |
| FT_Error error = SFNT_Err_Ok; |
| |
| FT_UNUSED( error ); |
| |
| |
| if ( !FT_ALLOC( result, len + 1 ) ) |
| { |
| FT_Stream stream = face->name_table.stream; |
| |
| |
| if ( FT_STREAM_SEEK( name->stringOffset ) || |
| FT_STREAM_READ( result, len ) ) |
| { |
| name->stringOffset = 0; |
| name->stringLength = 0; |
| FT_FREE( name->string ); |
| FT_FREE( result ); |
| goto Exit; |
| } |
| ((char*)result)[len] = '\0'; |
| } |
| } |
| |
| Exit: |
| face->postscript_name = result; |
| return result; |
| } |
| |
| static const FT_Service_PsFontNameRec sfnt_service_ps_name = |
| { |
| (FT_PsName_GetFunc)sfnt_get_ps_name |
| }; |
| |
| |
| /* |
| * TT CMAP INFO |
| */ |
| static const FT_Service_TTCMapsRec tt_service_get_cmap_info = |
| { |
| (TT_CMap_Info_GetFunc)tt_get_cmap_info |
| }; |
| |
| |
| #ifdef TT_CONFIG_OPTION_BDF |
| |
| static FT_Error |
| sfnt_get_charset_id( TT_Face face, |
| const char* *acharset_encoding, |
| const char* *acharset_registry ) |
| { |
| BDF_PropertyRec encoding, registry; |
| FT_Error error; |
| |
| |
| /* XXX: I don't know whether this is correct, since |
| * tt_face_find_bdf_prop only returns something correct if we have |
| * previously selected a size that is listed in the BDF table. |
| * Should we change the BDF table format to include single offsets |
| * for `CHARSET_REGISTRY' and `CHARSET_ENCODING'? |
| */ |
| error = tt_face_find_bdf_prop( face, "CHARSET_REGISTRY", ®istry ); |
| if ( !error ) |
| { |
| error = tt_face_find_bdf_prop( face, "CHARSET_ENCODING", &encoding ); |
| if ( !error ) |
| { |
| if ( registry.type == BDF_PROPERTY_TYPE_ATOM && |
| encoding.type == BDF_PROPERTY_TYPE_ATOM ) |
| { |
| *acharset_encoding = encoding.u.atom; |
| *acharset_registry = registry.u.atom; |
| } |
| else |
| error = FT_Err_Invalid_Argument; |
| } |
| } |
| |
| return error; |
| } |
| |
| |
| static const FT_Service_BDFRec sfnt_service_bdf = |
| { |
| (FT_BDF_GetCharsetIdFunc) sfnt_get_charset_id, |
| (FT_BDF_GetPropertyFunc) tt_face_find_bdf_prop, |
| }; |
| |
| #endif /* TT_CONFIG_OPTION_BDF */ |
| |
| |
| /* |
| * SERVICE LIST |
| */ |
| |
| static const FT_ServiceDescRec sfnt_services[] = |
| { |
| { FT_SERVICE_ID_SFNT_TABLE, &sfnt_service_sfnt_table }, |
| { FT_SERVICE_ID_POSTSCRIPT_FONT_NAME, &sfnt_service_ps_name }, |
| #ifdef TT_CONFIG_OPTION_POSTSCRIPT_NAMES |
| { FT_SERVICE_ID_GLYPH_DICT, &sfnt_service_glyph_dict }, |
| #endif |
| #ifdef TT_CONFIG_OPTION_BDF |
| { FT_SERVICE_ID_BDF, &sfnt_service_bdf }, |
| #endif |
| { FT_SERVICE_ID_TT_CMAP, &tt_service_get_cmap_info }, |
| |
| { NULL, NULL } |
| }; |
| |
| |
| FT_CALLBACK_DEF( FT_Module_Interface ) |
| sfnt_get_interface( FT_Module module, |
| const char* module_interface ) |
| { |
| FT_UNUSED( module ); |
| |
| return ft_service_list_lookup( sfnt_services, module_interface ); |
| } |
| |
| |
| #ifdef FT_CONFIG_OPTION_OLD_INTERNALS |
| |
| FT_CALLBACK_DEF( FT_Error ) |
| tt_face_load_sfnt_header_stub( TT_Face face, |
| FT_Stream stream, |
| FT_Long face_index, |
| SFNT_Header header ) |
| { |
| FT_UNUSED( face ); |
| FT_UNUSED( stream ); |
| FT_UNUSED( face_index ); |
| FT_UNUSED( header ); |
| |
| return FT_Err_Unimplemented_Feature; |
| } |
| |
| |
| FT_CALLBACK_DEF( FT_Error ) |
| tt_face_load_directory_stub( TT_Face face, |
| FT_Stream stream, |
| SFNT_Header header ) |
| { |
| FT_UNUSED( face ); |
| FT_UNUSED( stream ); |
| FT_UNUSED( header ); |
| |
| return FT_Err_Unimplemented_Feature; |
| } |
| |
| |
| FT_CALLBACK_DEF( FT_Error ) |
| tt_face_load_hdmx_stub( TT_Face face, |
| FT_Stream stream ) |
| { |
| FT_UNUSED( face ); |
| FT_UNUSED( stream ); |
| |
| return FT_Err_Unimplemented_Feature; |
| } |
| |
| |
| FT_CALLBACK_DEF( void ) |
| tt_face_free_hdmx_stub( TT_Face face ) |
| { |
| FT_UNUSED( face ); |
| } |
| |
| |
| FT_CALLBACK_DEF( FT_Error ) |
| tt_face_set_sbit_strike_stub( TT_Face face, |
| FT_UInt x_ppem, |
| FT_UInt y_ppem, |
| FT_ULong* astrike_index ) |
| { |
| /* |
| * We simply forge a FT_Size_Request and call the real function |
| * that does all the work. |
| * |
| * This stub might be called by libXfont in the X.Org Xserver, |
| * compiled against version 2.1.8 or newer. |
| */ |
| |
| FT_Size_RequestRec req; |
| |
| |
| req.type = FT_SIZE_REQUEST_TYPE_NOMINAL; |
| req.width = (FT_F26Dot6)x_ppem; |
| req.height = (FT_F26Dot6)y_ppem; |
| req.horiResolution = 0; |
| req.vertResolution = 0; |
| |
| *astrike_index = 0x7FFFFFFFUL; |
| |
| return tt_face_set_sbit_strike( face, &req, astrike_index ); |
| } |
| |
| |
| FT_CALLBACK_DEF( FT_Error ) |
| tt_face_load_sbit_stub( TT_Face face, |
| FT_Stream stream ) |
| { |
| FT_UNUSED( face ); |
| FT_UNUSED( stream ); |
| |
| /* |
| * This function was originally implemented to load the sbit table. |
| * However, it has been replaced by `tt_face_load_eblc', and this stub |
| * is only there for some rogue clients which would want to call it |
| * directly (which doesn't make much sense). |
| */ |
| return FT_Err_Unimplemented_Feature; |
| } |
| |
| |
| FT_CALLBACK_DEF( void ) |
| tt_face_free_sbit_stub( TT_Face face ) |
| { |
| /* nothing to do in this stub */ |
| FT_UNUSED( face ); |
| } |
| |
| |
| FT_CALLBACK_DEF( FT_Error ) |
| tt_face_load_charmap_stub( TT_Face face, |
| void* cmap, |
| FT_Stream input ) |
| { |
| FT_UNUSED( face ); |
| FT_UNUSED( cmap ); |
| FT_UNUSED( input ); |
| |
| return FT_Err_Unimplemented_Feature; |
| } |
| |
| |
| FT_CALLBACK_DEF( FT_Error ) |
| tt_face_free_charmap_stub( TT_Face face, |
| void* cmap ) |
| { |
| FT_UNUSED( face ); |
| FT_UNUSED( cmap ); |
| |
| return 0; |
| } |
| |
| #endif /* FT_CONFIG_OPTION_OLD_INTERNALS */ |
| |
| |
| static |
| const SFNT_Interface sfnt_interface = |
| { |
| tt_face_goto_table, |
| |
| sfnt_init_face, |
| sfnt_load_face, |
| sfnt_done_face, |
| sfnt_get_interface, |
| |
| tt_face_load_any, |
| |
| #ifdef FT_CONFIG_OPTION_OLD_INTERNALS |
| tt_face_load_sfnt_header_stub, |
| tt_face_load_directory_stub, |
| #endif |
| |
| tt_face_load_head, |
| tt_face_load_hhea, |
| tt_face_load_cmap, |
| tt_face_load_maxp, |
| tt_face_load_os2, |
| tt_face_load_post, |
| |
| tt_face_load_name, |
| tt_face_free_name, |
| |
| #ifdef FT_CONFIG_OPTION_OLD_INTERNALS |
| tt_face_load_hdmx_stub, |
| tt_face_free_hdmx_stub, |
| #endif |
| |
| tt_face_load_kern, |
| tt_face_load_gasp, |
| tt_face_load_pclt, |
| |
| #ifdef TT_CONFIG_OPTION_EMBEDDED_BITMAPS |
| /* see `ttload.h' */ |
| tt_face_load_bhed, |
| #else |
| 0, |
| #endif |
| |
| #ifdef FT_CONFIG_OPTION_OLD_INTERNALS |
| tt_face_set_sbit_strike_stub, |
| tt_face_load_sbit_stub, |
| |
| tt_find_sbit_image, |
| tt_load_sbit_metrics, |
| #endif |
| |
| #ifdef TT_CONFIG_OPTION_EMBEDDED_BITMAPS |
| tt_face_load_sbit_image, |
| #else |
| 0, |
| #endif |
| |
| #ifdef FT_CONFIG_OPTION_OLD_INTERNALS |
| tt_face_free_sbit_stub, |
| #endif |
| |
| #ifdef TT_CONFIG_OPTION_POSTSCRIPT_NAMES |
| /* see `ttpost.h' */ |
| tt_face_get_ps_name, |
| tt_face_free_ps_names, |
| #else |
| 0, |
| 0, |
| #endif |
| |
| #ifdef FT_CONFIG_OPTION_OLD_INTERNALS |
| tt_face_load_charmap_stub, |
| tt_face_free_charmap_stub, |
| #endif |
| |
| /* since version 2.1.8 */ |
| |
| tt_face_get_kerning, |
| |
| /* since version 2.2 */ |
| |
| tt_face_load_font_dir, |
| tt_face_load_hmtx, |
| |
| #ifdef TT_CONFIG_OPTION_EMBEDDED_BITMAPS |
| /* see `ttsbit.h' and `sfnt.h' */ |
| tt_face_load_eblc, |
| tt_face_free_eblc, |
| |
| tt_face_set_sbit_strike, |
| tt_face_load_strike_metrics, |
| #else |
| 0, |
| 0, |
| 0, |
| 0, |
| #endif |
| |
| tt_face_get_metrics |
| }; |
| |
| |
| FT_CALLBACK_TABLE_DEF |
| const FT_Module_Class sfnt_module_class = |
| { |
| 0, /* not a font driver or renderer */ |
| sizeof( FT_ModuleRec ), |
| |
| "sfnt", /* driver name */ |
| 0x10000L, /* driver version 1.0 */ |
| 0x20000L, /* driver requires FreeType 2.0 or higher */ |
| |
| (const void*)&sfnt_interface, /* module specific interface */ |
| |
| (FT_Module_Constructor)0, |
| (FT_Module_Destructor) 0, |
| (FT_Module_Requester) sfnt_get_interface |
| }; |
| |
| |
| /* END */ |