/***************************************************************************/ /* */ /* 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 #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 */