| /***************************************************************************/ |
| /* */ |
| /* cidriver.c */ |
| /* */ |
| /* CID driver interface (body). */ |
| /* */ |
| /* Copyright 1996-2017 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 "cidriver.h" |
| #include "cidgload.h" |
| #include FT_INTERNAL_DEBUG_H |
| |
| #include "ciderrs.h" |
| |
| #include FT_SERVICE_POSTSCRIPT_NAME_H |
| #include FT_SERVICE_FONT_FORMAT_H |
| #include FT_SERVICE_POSTSCRIPT_INFO_H |
| #include FT_SERVICE_CID_H |
| #include FT_SERVICE_PROPERTIES_H |
| #include FT_TYPE1_DRIVER_H |
| |
| |
| /*************************************************************************/ |
| /* */ |
| /* The macro FT_COMPONENT is used in trace mode. It is an implicit */ |
| /* parameter of the FT_TRACE() and FT_ERROR() macros, used to print/log */ |
| /* messages during execution. */ |
| /* */ |
| #undef FT_COMPONENT |
| #define FT_COMPONENT trace_ciddriver |
| |
| |
| /* |
| * POSTSCRIPT NAME SERVICE |
| * |
| */ |
| |
| static const char* |
| cid_get_postscript_name( CID_Face face ) |
| { |
| const char* result = face->cid.cid_font_name; |
| |
| |
| if ( result && result[0] == '/' ) |
| result++; |
| |
| return result; |
| } |
| |
| |
| static const FT_Service_PsFontNameRec cid_service_ps_name = |
| { |
| (FT_PsName_GetFunc)cid_get_postscript_name /* get_ps_font_name */ |
| }; |
| |
| |
| /* |
| * POSTSCRIPT INFO SERVICE |
| * |
| */ |
| |
| static FT_Error |
| cid_ps_get_font_info( FT_Face face, |
| PS_FontInfoRec* afont_info ) |
| { |
| *afont_info = ((CID_Face)face)->cid.font_info; |
| |
| return FT_Err_Ok; |
| } |
| |
| static FT_Error |
| cid_ps_get_font_extra( FT_Face face, |
| PS_FontExtraRec* afont_extra ) |
| { |
| *afont_extra = ((CID_Face)face)->font_extra; |
| |
| return FT_Err_Ok; |
| } |
| |
| static const FT_Service_PsInfoRec cid_service_ps_info = |
| { |
| (PS_GetFontInfoFunc) cid_ps_get_font_info, /* ps_get_font_info */ |
| (PS_GetFontExtraFunc) cid_ps_get_font_extra, /* ps_get_font_extra */ |
| /* unsupported with CID fonts */ |
| (PS_HasGlyphNamesFunc) NULL, /* ps_has_glyph_names */ |
| /* unsupported */ |
| (PS_GetFontPrivateFunc)NULL, /* ps_get_font_private */ |
| /* not implemented */ |
| (PS_GetFontValueFunc) NULL /* ps_get_font_value */ |
| }; |
| |
| |
| /* |
| * CID INFO SERVICE |
| * |
| */ |
| static FT_Error |
| cid_get_ros( CID_Face face, |
| const char* *registry, |
| const char* *ordering, |
| FT_Int *supplement ) |
| { |
| CID_FaceInfo cid = &face->cid; |
| |
| |
| if ( registry ) |
| *registry = cid->registry; |
| |
| if ( ordering ) |
| *ordering = cid->ordering; |
| |
| if ( supplement ) |
| *supplement = cid->supplement; |
| |
| return FT_Err_Ok; |
| } |
| |
| |
| static FT_Error |
| cid_get_is_cid( CID_Face face, |
| FT_Bool *is_cid ) |
| { |
| FT_Error error = FT_Err_Ok; |
| FT_UNUSED( face ); |
| |
| |
| if ( is_cid ) |
| *is_cid = 1; /* cid driver is only used for CID keyed fonts */ |
| |
| return error; |
| } |
| |
| |
| static FT_Error |
| cid_get_cid_from_glyph_index( CID_Face face, |
| FT_UInt glyph_index, |
| FT_UInt *cid ) |
| { |
| FT_Error error = FT_Err_Ok; |
| FT_UNUSED( face ); |
| |
| |
| if ( cid ) |
| *cid = glyph_index; /* identity mapping */ |
| |
| return error; |
| } |
| |
| |
| static const FT_Service_CIDRec cid_service_cid_info = |
| { |
| (FT_CID_GetRegistryOrderingSupplementFunc) |
| cid_get_ros, /* get_ros */ |
| (FT_CID_GetIsInternallyCIDKeyedFunc) |
| cid_get_is_cid, /* get_is_cid */ |
| (FT_CID_GetCIDFromGlyphIndexFunc) |
| cid_get_cid_from_glyph_index /* get_cid_from_glyph_index */ |
| }; |
| |
| |
| /* |
| * PROPERTY SERVICE |
| * |
| */ |
| static FT_Error |
| cid_property_set( FT_Module module, /* PS_Driver */ |
| const char* property_name, |
| const void* value, |
| FT_Bool value_is_string ) |
| { |
| FT_Error error = FT_Err_Ok; |
| PS_Driver driver = (PS_Driver)module; |
| |
| #ifndef FT_CONFIG_OPTION_ENVIRONMENT_PROPERTIES |
| FT_UNUSED( value_is_string ); |
| #endif |
| |
| |
| if ( !ft_strcmp( property_name, "darkening-parameters" ) ) |
| { |
| FT_Int* darken_params; |
| FT_Int x1, y1, x2, y2, x3, y3, x4, y4; |
| |
| #ifdef FT_CONFIG_OPTION_ENVIRONMENT_PROPERTIES |
| FT_Int dp[8]; |
| |
| |
| if ( value_is_string ) |
| { |
| const char* s = (const char*)value; |
| char* ep; |
| int i; |
| |
| |
| /* eight comma-separated numbers */ |
| for ( i = 0; i < 7; i++ ) |
| { |
| dp[i] = (FT_Int)ft_strtol( s, &ep, 10 ); |
| if ( *ep != ',' || s == ep ) |
| return FT_THROW( Invalid_Argument ); |
| |
| s = ep + 1; |
| } |
| |
| dp[7] = (FT_Int)ft_strtol( s, &ep, 10 ); |
| if ( !( *ep == '\0' || *ep == ' ' ) || s == ep ) |
| return FT_THROW( Invalid_Argument ); |
| |
| darken_params = dp; |
| } |
| else |
| #endif |
| darken_params = (FT_Int*)value; |
| |
| x1 = darken_params[0]; |
| y1 = darken_params[1]; |
| x2 = darken_params[2]; |
| y2 = darken_params[3]; |
| x3 = darken_params[4]; |
| y3 = darken_params[5]; |
| x4 = darken_params[6]; |
| y4 = darken_params[7]; |
| |
| if ( x1 < 0 || x2 < 0 || x3 < 0 || x4 < 0 || |
| y1 < 0 || y2 < 0 || y3 < 0 || y4 < 0 || |
| x1 > x2 || x2 > x3 || x3 > x4 || |
| y1 > 500 || y2 > 500 || y3 > 500 || y4 > 500 ) |
| return FT_THROW( Invalid_Argument ); |
| |
| driver->darken_params[0] = x1; |
| driver->darken_params[1] = y1; |
| driver->darken_params[2] = x2; |
| driver->darken_params[3] = y2; |
| driver->darken_params[4] = x3; |
| driver->darken_params[5] = y3; |
| driver->darken_params[6] = x4; |
| driver->darken_params[7] = y4; |
| |
| return error; |
| } |
| else if ( !ft_strcmp( property_name, "hinting-engine" ) ) |
| { |
| #ifdef FT_CONFIG_OPTION_ENVIRONMENT_PROPERTIES |
| if ( value_is_string ) |
| { |
| const char* s = (const char*)value; |
| |
| |
| if ( !ft_strcmp( s, "adobe" ) ) |
| driver->hinting_engine = FT_T1_HINTING_ADOBE; |
| #ifdef T1_CONFIG_OPTION_OLD_ENGINE |
| else if ( !ft_strcmp( s, "freetype" ) ) |
| driver->hinting_engine = FT_T1_HINTING_FREETYPE; |
| #endif |
| else |
| return FT_THROW( Invalid_Argument ); |
| } |
| else |
| #endif |
| { |
| FT_UInt* hinting_engine = (FT_UInt*)value; |
| |
| |
| if ( *hinting_engine == FT_T1_HINTING_ADOBE |
| #ifdef T1_CONFIG_OPTION_OLD_ENGINE |
| || *hinting_engine == FT_T1_HINTING_FREETYPE |
| #endif |
| ) |
| driver->hinting_engine = *hinting_engine; |
| else |
| error = FT_ERR( Unimplemented_Feature ); |
| |
| return error; |
| } |
| } |
| else if ( !ft_strcmp( property_name, "no-stem-darkening" ) ) |
| { |
| #ifdef FT_CONFIG_OPTION_ENVIRONMENT_PROPERTIES |
| if ( value_is_string ) |
| { |
| const char* s = (const char*)value; |
| long nsd = ft_strtol( s, NULL, 10 ); |
| |
| |
| if ( !nsd ) |
| driver->no_stem_darkening = FALSE; |
| else |
| driver->no_stem_darkening = TRUE; |
| } |
| else |
| #endif |
| { |
| FT_Bool* no_stem_darkening = (FT_Bool*)value; |
| |
| |
| driver->no_stem_darkening = *no_stem_darkening; |
| } |
| |
| return error; |
| } |
| else if ( !ft_strcmp( property_name, "random-seed" ) ) |
| { |
| FT_Int32 random_seed; |
| |
| |
| #ifdef FT_CONFIG_OPTION_ENVIRONMENT_PROPERTIES |
| if ( value_is_string ) |
| { |
| const char* s = (const char*)value; |
| |
| |
| random_seed = (FT_Int32)ft_strtol( s, NULL, 10 ); |
| } |
| else |
| #endif |
| random_seed = *(FT_Int32*)value; |
| |
| if ( random_seed < 0 ) |
| random_seed = 0; |
| |
| driver->random_seed = random_seed; |
| |
| return error; |
| } |
| |
| FT_TRACE0(( "cid_property_set: missing property `%s'\n", |
| property_name )); |
| return FT_THROW( Missing_Property ); |
| } |
| |
| |
| static FT_Error |
| cid_property_get( FT_Module module, /* PS_Driver */ |
| const char* property_name, |
| const void* value ) |
| { |
| FT_Error error = FT_Err_Ok; |
| PS_Driver driver = (PS_Driver)module; |
| |
| |
| if ( !ft_strcmp( property_name, "darkening-parameters" ) ) |
| { |
| FT_Int* darken_params = driver->darken_params; |
| FT_Int* val = (FT_Int*)value; |
| |
| |
| val[0] = darken_params[0]; |
| val[1] = darken_params[1]; |
| val[2] = darken_params[2]; |
| val[3] = darken_params[3]; |
| val[4] = darken_params[4]; |
| val[5] = darken_params[5]; |
| val[6] = darken_params[6]; |
| val[7] = darken_params[7]; |
| |
| return error; |
| } |
| else if ( !ft_strcmp( property_name, "hinting-engine" ) ) |
| { |
| FT_UInt hinting_engine = driver->hinting_engine; |
| FT_UInt* val = (FT_UInt*)value; |
| |
| |
| *val = hinting_engine; |
| |
| return error; |
| } |
| else if ( !ft_strcmp( property_name, "no-stem-darkening" ) ) |
| { |
| FT_Bool no_stem_darkening = driver->no_stem_darkening; |
| FT_Bool* val = (FT_Bool*)value; |
| |
| |
| *val = no_stem_darkening; |
| |
| return error; |
| } |
| |
| FT_TRACE0(( "cid_property_get: missing property `%s'\n", |
| property_name )); |
| return FT_THROW( Missing_Property ); |
| } |
| |
| |
| FT_DEFINE_SERVICE_PROPERTIESREC( |
| cid_service_properties, |
| |
| (FT_Properties_SetFunc)cid_property_set, /* set_property */ |
| (FT_Properties_GetFunc)cid_property_get ) /* get_property */ |
| |
| |
| /* |
| * SERVICE LIST |
| * |
| */ |
| |
| static const FT_ServiceDescRec cid_services[] = |
| { |
| { FT_SERVICE_ID_FONT_FORMAT, FT_FONT_FORMAT_CID }, |
| { FT_SERVICE_ID_POSTSCRIPT_FONT_NAME, &cid_service_ps_name }, |
| { FT_SERVICE_ID_POSTSCRIPT_INFO, &cid_service_ps_info }, |
| { FT_SERVICE_ID_CID, &cid_service_cid_info }, |
| { FT_SERVICE_ID_PROPERTIES, &cid_service_properties }, |
| { NULL, NULL } |
| }; |
| |
| |
| FT_CALLBACK_DEF( FT_Module_Interface ) |
| cid_get_interface( FT_Module module, |
| const char* cid_interface ) |
| { |
| FT_UNUSED( module ); |
| |
| return ft_service_list_lookup( cid_services, cid_interface ); |
| } |
| |
| |
| |
| FT_CALLBACK_TABLE_DEF |
| const FT_Driver_ClassRec t1cid_driver_class = |
| { |
| { |
| FT_MODULE_FONT_DRIVER | |
| FT_MODULE_DRIVER_SCALABLE | |
| FT_MODULE_DRIVER_HAS_HINTER, |
| sizeof ( PS_DriverRec ), |
| |
| "t1cid", /* module name */ |
| 0x10000L, /* version 1.0 of driver */ |
| 0x20000L, /* requires FreeType 2.0 */ |
| |
| NULL, /* module-specific interface */ |
| |
| cid_driver_init, /* FT_Module_Constructor module_init */ |
| cid_driver_done, /* FT_Module_Destructor module_done */ |
| cid_get_interface /* FT_Module_Requester get_interface */ |
| }, |
| |
| sizeof ( CID_FaceRec ), |
| sizeof ( CID_SizeRec ), |
| sizeof ( CID_GlyphSlotRec ), |
| |
| cid_face_init, /* FT_Face_InitFunc init_face */ |
| cid_face_done, /* FT_Face_DoneFunc done_face */ |
| cid_size_init, /* FT_Size_InitFunc init_size */ |
| cid_size_done, /* FT_Size_DoneFunc done_size */ |
| cid_slot_init, /* FT_Slot_InitFunc init_slot */ |
| cid_slot_done, /* FT_Slot_DoneFunc done_slot */ |
| |
| cid_slot_load_glyph, /* FT_Slot_LoadFunc load_glyph */ |
| |
| NULL, /* FT_Face_GetKerningFunc get_kerning */ |
| NULL, /* FT_Face_AttachFunc attach_file */ |
| NULL, /* FT_Face_GetAdvancesFunc get_advances */ |
| |
| cid_size_request, /* FT_Size_RequestFunc request_size */ |
| NULL /* FT_Size_SelectFunc select_size */ |
| }; |
| |
| |
| /* END */ |