Edit
kc3-lang/freetype/src/type1/t1driver.c
Branch :
-
Show log
Commit
-
Author :
Werner Lemberg
Date : 2013-06-06 09:16:38
Hash : badf3178
Message : Next round of compiler fixes. * builds/win32/ftdebug.c, builds/wince/ftdebug.c (ft_debug_init): Add proper cast. * include/freetype/internal/ftserv.h (FT_SERVICE_UNAVAILABLE): Fix cast. * include/freetype/internal/ftstream.h: Decorate stream and frame macros with `FT_Long' and `FT_ULong' as appropriate. * src/base/ftrfork.c (raccess_guess_darwin_hfsplus, raccess_guess_darwin_newvfs): Use cast. * src/bdf/bdflib.c (_bdf_set_default_spacing): Use cast. * src/cache/ftcmanag.c (FTC_Manager_Check): Fix cast. * src/cache/ftcmanag.h (FTC_ManagerRec): Ditto. * src/cff/cf2arrst.c (cf2_arrstack_setNum_Elements): Use cast. * src/cff/cf2ft.c (cf2_freeSeacComponent): Ditto. * src/cff/cffobjs.c (remove_subset_prefix, remove_style): Ditto. * src/cid/cidparse.c (cid_parser_new): Use cast. * src/pcf/pcfdrivr.c (PCF_Glyph_Load): Use cast. * src/psaux/psobjs.c (reallocate_t1_table): Fix argument type. * src/raster/ftraster.c (ft_black_reset): Use cast. * src/truetype/ttgxvar.c (FT_Stream_FTell): Use cast. (ALL_POINTS): Fix cast. * src/type1/t1driver.c (t1_ps_get_font_value): Add casts. * src/type1/t1parse.c (T1_Get_Private_Dict): Add cast.
- src/type1/t1driver.c
-
/***************************************************************************/ /* */ /* t1driver.c */ /* */ /* Type 1 driver interface (body). */ /* */ /* Copyright 1996-2004, 2006, 2007, 2009, 2011, 2013 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 "t1driver.h" #include "t1gload.h" #include "t1load.h" #include "t1errors.h" #ifndef T1_CONFIG_OPTION_NO_AFM #include "t1afm.h" #endif #include FT_INTERNAL_DEBUG_H #include FT_INTERNAL_STREAM_H #include FT_SERVICE_MULTIPLE_MASTERS_H #include FT_SERVICE_GLYPH_DICT_H #include FT_SERVICE_XFREE86_NAME_H #include FT_SERVICE_POSTSCRIPT_NAME_H #include FT_SERVICE_POSTSCRIPT_CMAPS_H #include FT_SERVICE_POSTSCRIPT_INFO_H #include FT_SERVICE_KERNING_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_t1driver /* * GLYPH DICT SERVICE * */ static FT_Error t1_get_glyph_name( T1_Face face, FT_UInt glyph_index, FT_Pointer buffer, FT_UInt buffer_max ) { FT_STRCPYN( buffer, face->type1.glyph_names[glyph_index], buffer_max ); return FT_Err_Ok; } static FT_UInt t1_get_name_index( T1_Face face, FT_String* glyph_name ) { FT_Int i; for ( i = 0; i < face->type1.num_glyphs; i++ ) { FT_String* gname = face->type1.glyph_names[i]; if ( !ft_strcmp( glyph_name, gname ) ) return (FT_UInt)i; } return 0; } static const FT_Service_GlyphDictRec t1_service_glyph_dict = { (FT_GlyphDict_GetNameFunc) t1_get_glyph_name, (FT_GlyphDict_NameIndexFunc)t1_get_name_index }; /* * POSTSCRIPT NAME SERVICE * */ static const char* t1_get_ps_name( T1_Face face ) { return (const char*) face->type1.font_name; } static const FT_Service_PsFontNameRec t1_service_ps_name = { (FT_PsName_GetFunc)t1_get_ps_name }; /* * MULTIPLE MASTERS SERVICE * */ #ifndef T1_CONFIG_OPTION_NO_MM_SUPPORT static const FT_Service_MultiMastersRec t1_service_multi_masters = { (FT_Get_MM_Func) T1_Get_Multi_Master, (FT_Set_MM_Design_Func) T1_Set_MM_Design, (FT_Set_MM_Blend_Func) T1_Set_MM_Blend, (FT_Get_MM_Var_Func) T1_Get_MM_Var, (FT_Set_Var_Design_Func)T1_Set_Var_Design }; #endif /* * POSTSCRIPT INFO SERVICE * */ static FT_Error t1_ps_get_font_info( FT_Face face, PS_FontInfoRec* afont_info ) { *afont_info = ((T1_Face)face)->type1.font_info; return FT_Err_Ok; } static FT_Error t1_ps_get_font_extra( FT_Face face, PS_FontExtraRec* afont_extra ) { *afont_extra = ((T1_Face)face)->type1.font_extra; return FT_Err_Ok; } static FT_Int t1_ps_has_glyph_names( FT_Face face ) { FT_UNUSED( face ); return 1; } static FT_Error t1_ps_get_font_private( FT_Face face, PS_PrivateRec* afont_private ) { *afont_private = ((T1_Face)face)->type1.private_dict; return FT_Err_Ok; } static FT_Long t1_ps_get_font_value( FT_Face face, PS_Dict_Keys key, FT_UInt idx, void *value, FT_Long value_len ) { FT_Long retval = -1; T1_Face t1face = (T1_Face)face; T1_Font type1 = &t1face->type1; switch ( key ) { case PS_DICT_FONT_TYPE: retval = sizeof ( type1->font_type ); if ( value && value_len >= retval ) *((FT_Byte *)value) = type1->font_type; break; case PS_DICT_FONT_MATRIX: if ( idx < sizeof ( type1->font_matrix ) / sizeof ( type1->font_matrix.xx ) ) { FT_Fixed val = 0; retval = sizeof ( val ); if ( value && value_len >= retval ) { switch ( idx ) { case 0: val = type1->font_matrix.xx; break; case 1: val = type1->font_matrix.xy; break; case 2: val = type1->font_matrix.yx; break; case 3: val = type1->font_matrix.yy; break; } *((FT_Fixed *)value) = val; } } break; case PS_DICT_FONT_BBOX: if ( idx < sizeof ( type1->font_bbox ) / sizeof ( type1->font_bbox.xMin ) ) { FT_Fixed val = 0; retval = sizeof ( val ); if ( value && value_len >= retval ) { switch ( idx ) { case 0: val = type1->font_bbox.xMin; break; case 1: val = type1->font_bbox.yMin; break; case 2: val = type1->font_bbox.xMax; break; case 3: val = type1->font_bbox.yMax; break; } *((FT_Fixed *)value) = val; } } break; case PS_DICT_PAINT_TYPE: retval = sizeof ( type1->paint_type ); if ( value && value_len >= retval ) *((FT_Byte *)value) = type1->paint_type; break; case PS_DICT_FONT_NAME: retval = (FT_Long)( ft_strlen( type1->font_name ) + 1 ); if ( value && value_len >= retval ) ft_memcpy( value, (void *)( type1->font_name ), retval ); break; case PS_DICT_UNIQUE_ID: retval = sizeof ( type1->private_dict.unique_id ); if ( value && value_len >= retval ) *((FT_Int *)value) = type1->private_dict.unique_id; break; case PS_DICT_NUM_CHAR_STRINGS: retval = sizeof ( type1->num_glyphs ); if ( value && value_len >= retval ) *((FT_Int *)value) = type1->num_glyphs; break; case PS_DICT_CHAR_STRING_KEY: if ( idx < (FT_UInt)type1->num_glyphs ) { retval = (FT_Long)( ft_strlen( type1->glyph_names[idx] ) + 1 ); if ( value && value_len >= retval ) { ft_memcpy( value, (void *)( type1->glyph_names[idx] ), retval ); ((FT_Char *)value)[retval - 1] = (FT_Char)'\0'; } } break; case PS_DICT_CHAR_STRING: if ( idx < (FT_UInt)type1->num_glyphs ) { retval = (FT_Long)( type1->charstrings_len[idx] + 1 ); if ( value && value_len >= retval ) { ft_memcpy( value, (void *)( type1->charstrings[idx] ), retval - 1 ); ((FT_Char *)value)[retval - 1] = (FT_Char)'\0'; } } break; case PS_DICT_ENCODING_TYPE: retval = sizeof ( type1->encoding_type ); if ( value && value_len >= retval ) *((T1_EncodingType *)value) = type1->encoding_type; break; case PS_DICT_ENCODING_ENTRY: if ( type1->encoding_type == T1_ENCODING_TYPE_ARRAY && idx < (FT_UInt)type1->encoding.num_chars ) { retval = (FT_Long)( ft_strlen( type1->encoding.char_name[idx] ) + 1 ); if ( value && value_len >= retval ) { ft_memcpy( value, (void *)( type1->encoding.char_name[idx] ), retval - 1 ); ((FT_Char *)value)[retval - 1] = (FT_Char)'\0'; } } break; case PS_DICT_NUM_SUBRS: retval = sizeof ( type1->num_subrs ); if ( value && value_len >= retval ) *((FT_Int *)value) = type1->num_subrs; break; case PS_DICT_SUBR: if ( idx < (FT_UInt)type1->num_subrs ) { retval = (FT_Long)( type1->subrs_len[idx] + 1 ); if ( value && value_len >= retval ) { ft_memcpy( value, (void *)( type1->subrs[idx] ), retval - 1 ); ((FT_Char *)value)[retval - 1] = (FT_Char)'\0'; } } break; case PS_DICT_STD_HW: retval = sizeof ( type1->private_dict.standard_width[0] ); if ( value && value_len >= retval ) *((FT_UShort *)value) = type1->private_dict.standard_width[0]; break; case PS_DICT_STD_VW: retval = sizeof ( type1->private_dict.standard_height[0] ); if ( value && value_len >= retval ) *((FT_UShort *)value) = type1->private_dict.standard_height[0]; break; case PS_DICT_NUM_BLUE_VALUES: retval = sizeof ( type1->private_dict.num_blue_values ); if ( value && value_len >= retval ) *((FT_Byte *)value) = type1->private_dict.num_blue_values; break; case PS_DICT_BLUE_VALUE: if ( idx < type1->private_dict.num_blue_values ) { retval = sizeof ( type1->private_dict.blue_values[idx] ); if ( value && value_len >= retval ) *((FT_Short *)value) = type1->private_dict.blue_values[idx]; } break; case PS_DICT_BLUE_SCALE: retval = sizeof ( type1->private_dict.blue_scale ); if ( value && value_len >= retval ) *((FT_Fixed *)value) = type1->private_dict.blue_scale; break; case PS_DICT_BLUE_FUZZ: retval = sizeof ( type1->private_dict.blue_fuzz ); if ( value && value_len >= retval ) *((FT_Int *)value) = type1->private_dict.blue_fuzz; break; case PS_DICT_BLUE_SHIFT: retval = sizeof ( type1->private_dict.blue_shift ); if ( value && value_len >= retval ) *((FT_Int *)value) = type1->private_dict.blue_shift; break; case PS_DICT_NUM_OTHER_BLUES: retval = sizeof ( type1->private_dict.num_other_blues ); if ( value && value_len >= retval ) *((FT_Byte *)value) = type1->private_dict.num_other_blues; break; case PS_DICT_OTHER_BLUE: if ( idx < type1->private_dict.num_other_blues ) { retval = sizeof ( type1->private_dict.other_blues[idx] ); if ( value && value_len >= retval ) *((FT_Short *)value) = type1->private_dict.other_blues[idx]; } break; case PS_DICT_NUM_FAMILY_BLUES: retval = sizeof ( type1->private_dict.num_family_blues ); if ( value && value_len >= retval ) *((FT_Byte *)value) = type1->private_dict.num_family_blues; break; case PS_DICT_FAMILY_BLUE: if ( idx < type1->private_dict.num_family_blues ) { retval = sizeof ( type1->private_dict.family_blues[idx] ); if ( value && value_len >= retval ) *((FT_Short *)value) = type1->private_dict.family_blues[idx]; } break; case PS_DICT_NUM_FAMILY_OTHER_BLUES: retval = sizeof ( type1->private_dict.num_family_other_blues ); if ( value && value_len >= retval ) *((FT_Byte *)value) = type1->private_dict.num_family_other_blues; break; case PS_DICT_FAMILY_OTHER_BLUE: if ( idx < type1->private_dict.num_family_other_blues ) { retval = sizeof ( type1->private_dict.family_other_blues[idx] ); if ( value && value_len >= retval ) *((FT_Short *)value) = type1->private_dict.family_other_blues[idx]; } break; case PS_DICT_NUM_STEM_SNAP_H: retval = sizeof ( type1->private_dict.num_snap_widths ); if ( value && value_len >= retval ) *((FT_Byte *)value) = type1->private_dict.num_snap_widths; break; case PS_DICT_STEM_SNAP_H: if ( idx < type1->private_dict.num_snap_widths ) { retval = sizeof ( type1->private_dict.snap_widths[idx] ); if ( value && value_len >= retval ) *((FT_Short *)value) = type1->private_dict.snap_widths[idx]; } break; case PS_DICT_NUM_STEM_SNAP_V: retval = sizeof ( type1->private_dict.num_snap_heights ); if ( value && value_len >= retval ) *((FT_Byte *)value) = type1->private_dict.num_snap_heights; break; case PS_DICT_STEM_SNAP_V: if ( idx < type1->private_dict.num_snap_heights ) { retval = sizeof ( type1->private_dict.snap_heights[idx] ); if ( value && value_len >= retval ) *((FT_Short *)value) = type1->private_dict.snap_heights[idx]; } break; case PS_DICT_RND_STEM_UP: retval = sizeof ( type1->private_dict.round_stem_up ); if ( value && value_len >= retval ) *((FT_Bool *)value) = type1->private_dict.round_stem_up; break; case PS_DICT_FORCE_BOLD: retval = sizeof ( type1->private_dict.force_bold ); if ( value && value_len >= retval ) *((FT_Bool *)value) = type1->private_dict.force_bold; break; case PS_DICT_MIN_FEATURE: if ( idx < sizeof ( type1->private_dict.min_feature ) / sizeof ( type1->private_dict.min_feature[0] ) ) { retval = sizeof ( type1->private_dict.min_feature[idx] ); if ( value && value_len >= retval ) *((FT_Short *)value) = type1->private_dict.min_feature[idx]; } break; case PS_DICT_LEN_IV: retval = sizeof ( type1->private_dict.lenIV ); if ( value && value_len >= retval ) *((FT_Int *)value) = type1->private_dict.lenIV; break; case PS_DICT_PASSWORD: retval = sizeof ( type1->private_dict.password ); if ( value && value_len >= retval ) *((FT_Long *)value) = type1->private_dict.password; break; case PS_DICT_LANGUAGE_GROUP: retval = sizeof ( type1->private_dict.language_group ); if ( value && value_len >= retval ) *((FT_Long *)value) = type1->private_dict.language_group; break; case PS_DICT_IS_FIXED_PITCH: retval = sizeof ( type1->font_info.is_fixed_pitch ); if ( value && value_len >= retval ) *((FT_Bool *)value) = type1->font_info.is_fixed_pitch; break; case PS_DICT_UNDERLINE_POSITION: retval = sizeof ( type1->font_info.underline_position ); if ( value && value_len >= retval ) *((FT_Short *)value) = type1->font_info.underline_position; break; case PS_DICT_UNDERLINE_THICKNESS: retval = sizeof ( type1->font_info.underline_thickness ); if ( value && value_len >= retval ) *((FT_UShort *)value) = type1->font_info.underline_thickness; break; case PS_DICT_FS_TYPE: retval = sizeof ( type1->font_extra.fs_type ); if ( value && value_len >= retval ) *((FT_UShort *)value) = type1->font_extra.fs_type; break; case PS_DICT_VERSION: retval = (FT_Long)( ft_strlen( type1->font_info.version ) + 1 ); if ( value && value_len >= retval ) ft_memcpy( value, (void *)( type1->font_info.version ), retval ); break; case PS_DICT_NOTICE: retval = (FT_Long)( ft_strlen( type1->font_info.notice ) + 1 ); if ( value && value_len >= retval ) ft_memcpy( value, (void *)( type1->font_info.notice ), retval ); break; case PS_DICT_FULL_NAME: retval = (FT_Long)( ft_strlen( type1->font_info.full_name ) + 1 ); if ( value && value_len >= retval ) ft_memcpy( value, (void *)( type1->font_info.full_name ), retval ); break; case PS_DICT_FAMILY_NAME: retval = (FT_Long)( ft_strlen( type1->font_info.family_name ) + 1 ); if ( value && value_len >= retval ) ft_memcpy( value, (void *)( type1->font_info.family_name ), retval ); break; case PS_DICT_WEIGHT: retval = (FT_Long)( ft_strlen( type1->font_info.weight ) + 1 ); if ( value && value_len >= retval ) ft_memcpy( value, (void *)( type1->font_info.weight ), retval ); break; case PS_DICT_ITALIC_ANGLE: retval = sizeof ( type1->font_info.italic_angle ); if ( value && value_len >= retval ) *((FT_Long *)value) = type1->font_info.italic_angle; break; default: break; } return retval; } static const FT_Service_PsInfoRec t1_service_ps_info = { (PS_GetFontInfoFunc) t1_ps_get_font_info, (PS_GetFontExtraFunc) t1_ps_get_font_extra, (PS_HasGlyphNamesFunc) t1_ps_has_glyph_names, (PS_GetFontPrivateFunc)t1_ps_get_font_private, (PS_GetFontValueFunc) t1_ps_get_font_value, }; #ifndef T1_CONFIG_OPTION_NO_AFM static const FT_Service_KerningRec t1_service_kerning = { T1_Get_Track_Kerning, }; #endif /* * SERVICE LIST * */ static const FT_ServiceDescRec t1_services[] = { { FT_SERVICE_ID_POSTSCRIPT_FONT_NAME, &t1_service_ps_name }, { FT_SERVICE_ID_GLYPH_DICT, &t1_service_glyph_dict }, { FT_SERVICE_ID_XF86_NAME, FT_XF86_FORMAT_TYPE_1 }, { FT_SERVICE_ID_POSTSCRIPT_INFO, &t1_service_ps_info }, #ifndef T1_CONFIG_OPTION_NO_AFM { FT_SERVICE_ID_KERNING, &t1_service_kerning }, #endif #ifndef T1_CONFIG_OPTION_NO_MM_SUPPORT { FT_SERVICE_ID_MULTI_MASTERS, &t1_service_multi_masters }, #endif { NULL, NULL } }; FT_CALLBACK_DEF( FT_Module_Interface ) Get_Interface( FT_Module module, const FT_String* t1_interface ) { FT_UNUSED( module ); return ft_service_list_lookup( t1_services, t1_interface ); } #ifndef T1_CONFIG_OPTION_NO_AFM /*************************************************************************/ /* */ /* <Function> */ /* Get_Kerning */ /* */ /* <Description> */ /* A driver method used to return the kerning vector between two */ /* glyphs of the same face. */ /* */ /* <Input> */ /* face :: A handle to the source face object. */ /* */ /* left_glyph :: The index of the left glyph in the kern pair. */ /* */ /* right_glyph :: The index of the right glyph in the kern pair. */ /* */ /* <Output> */ /* kerning :: The kerning vector. This is in font units for */ /* scalable formats, and in pixels for fixed-sizes */ /* formats. */ /* */ /* <Return> */ /* FreeType error code. 0 means success. */ /* */ /* <Note> */ /* Only horizontal layouts (left-to-right & right-to-left) are */ /* supported by this function. Other layouts, or more sophisticated */ /* kernings are out of scope of this method (the basic driver */ /* interface is meant to be simple). */ /* */ /* They can be implemented by format-specific interfaces. */ /* */ static FT_Error Get_Kerning( FT_Face t1face, /* T1_Face */ FT_UInt left_glyph, FT_UInt right_glyph, FT_Vector* kerning ) { T1_Face face = (T1_Face)t1face; kerning->x = 0; kerning->y = 0; if ( face->afm_data ) T1_Get_Kerning( (AFM_FontInfo)face->afm_data, left_glyph, right_glyph, kerning ); return FT_Err_Ok; } #endif /* T1_CONFIG_OPTION_NO_AFM */ FT_CALLBACK_TABLE_DEF const FT_Driver_ClassRec t1_driver_class = { { FT_MODULE_FONT_DRIVER | FT_MODULE_DRIVER_SCALABLE | FT_MODULE_DRIVER_HAS_HINTER, sizeof ( FT_DriverRec ), "type1", 0x10000L, 0x20000L, 0, /* format interface */ T1_Driver_Init, T1_Driver_Done, Get_Interface, }, sizeof ( T1_FaceRec ), sizeof ( T1_SizeRec ), sizeof ( T1_GlyphSlotRec ), T1_Face_Init, T1_Face_Done, T1_Size_Init, T1_Size_Done, T1_GlyphSlot_Init, T1_GlyphSlot_Done, T1_Load_Glyph, #ifdef T1_CONFIG_OPTION_NO_AFM 0, /* FT_Face_GetKerningFunc */ 0, /* FT_Face_AttachFunc */ #else Get_Kerning, T1_Read_Metrics, #endif T1_Get_Advances, T1_Size_Request, 0 /* FT_Size_SelectFunc */ }; /* END */