aboutsummaryrefslogtreecommitdiff
path: root/nx-X11/extras/freetype2/src/psnames/psmodule.c
diff options
context:
space:
mode:
Diffstat (limited to 'nx-X11/extras/freetype2/src/psnames/psmodule.c')
-rw-r--r--nx-X11/extras/freetype2/src/psnames/psmodule.c408
1 files changed, 0 insertions, 408 deletions
diff --git a/nx-X11/extras/freetype2/src/psnames/psmodule.c b/nx-X11/extras/freetype2/src/psnames/psmodule.c
deleted file mode 100644
index f6d6ae328..000000000
--- a/nx-X11/extras/freetype2/src/psnames/psmodule.c
+++ /dev/null
@@ -1,408 +0,0 @@
-/***************************************************************************/
-/* */
-/* psmodule.c */
-/* */
-/* PSNames module implementation (body). */
-/* */
-/* Copyright 1996-2001, 2002, 2003 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_OBJECTS_H
-#include FT_SERVICE_POSTSCRIPT_CMAPS_H
-
-#include "psmodule.h"
-#include "pstables.h"
-
-#include "psnamerr.h"
-
-
-#ifndef FT_CONFIG_OPTION_NO_POSTSCRIPT_NAMES
-
-
-#ifdef FT_CONFIG_OPTION_ADOBE_GLYPH_LIST
-
-
- /* return the Unicode value corresponding to a given glyph. Note that */
- /* we do deal with glyph variants by detecting a non-initial dot in */
- /* the name, as in `A.swash' or `e.final', etc. */
- /* */
- static FT_UInt32
- ps_unicode_value( const char* glyph_name )
- {
- FT_Int n;
- char first = glyph_name[0];
- char temp[64];
-
-
- /* If the name begins with `uni', then the glyph name may be a */
- /* hard-coded unicode character code. */
- if ( glyph_name[0] == 'u' &&
- glyph_name[1] == 'n' &&
- glyph_name[2] == 'i' )
- {
- /* determine whether the next four characters following are */
- /* hexadecimal. */
-
- /* XXX: Add code to deal with ligatures, i.e. glyph names like */
- /* `uniXXXXYYYYZZZZ'... */
-
- FT_Int count;
- FT_ULong value = 0;
- const char* p = glyph_name + 3;
-
-
- for ( count = 4; count > 0; count--, p++ )
- {
- char c = *p;
- unsigned int d;
-
-
- d = (unsigned char)c - '0';
- if ( d >= 10 )
- {
- d = (unsigned char)c - 'A';
- if ( d >= 6 )
- d = 16;
- else
- d += 10;
- }
-
- /* exit if a non-uppercase hexadecimal character was found */
- if ( d >= 16 )
- break;
-
- value = ( value << 4 ) + d;
- }
-
- /* there must be exactly four hex digits */
- if ( ( *p == '\0' || *p == '.' ) && count == 0 )
- return value;
- }
-
- /* If the name begins with `u', followed by four to six uppercase */
- /* hexadicimal digits, it is a hard-coded unicode character code. */
- if ( glyph_name[0] == 'u' )
- {
- FT_Int count;
- FT_ULong value = 0;
- const char* p = glyph_name + 1;
-
-
- for ( count = 6; count > 0; count--, p++ )
- {
- char c = *p;
- unsigned int d;
-
-
- d = (unsigned char)c - '0';
- if ( d >= 10 )
- {
- d = (unsigned char)c - 'A';
- if ( d >= 6 )
- d = 16;
- else
- d += 10;
- }
-
- if ( d >= 16 )
- break;
-
- value = ( value << 4 ) + d;
- }
-
- if ( ( *p == '\0' || *p == '.' ) && count <= 2 )
- return value;
- }
-
- /* look for a non-initial dot in the glyph name in order to */
- /* sort-out variants like `A.swash', `e.final', etc. */
- {
- const char* p;
- int len;
-
-
- p = glyph_name;
-
- while ( *p && *p != '.' )
- p++;
-
- len = (int)( p - glyph_name );
-
- if ( *p && len < 64 )
- {
- ft_strncpy( temp, glyph_name, len );
- temp[len] = 0;
- glyph_name = temp;
- }
- }
-
- /* now, look up the glyph in the Adobe Glyph List */
- for ( n = 0; n < NUM_ADOBE_GLYPHS; n++ )
- {
- const char* name = sid_standard_names[n];
-
-
- if ( first == name[0] && ft_strcmp( glyph_name, name ) == 0 )
- return ps_names_to_unicode[n];
- }
-
- /* not found, there is probably no Unicode value for this glyph name */
- return 0;
- }
-
-
- /* ft_qsort callback to sort the unicode map */
- FT_CALLBACK_DEF( int )
- compare_uni_maps( const void* a,
- const void* b )
- {
- PS_UniMap* map1 = (PS_UniMap*)a;
- PS_UniMap* map2 = (PS_UniMap*)b;
-
-
- return ( map1->unicode - map2->unicode );
- }
-
-
- /* Builds a table that maps Unicode values to glyph indices */
- static FT_Error
- ps_unicodes_init( FT_Memory memory,
- FT_UInt num_glyphs,
- const char** glyph_names,
- PS_Unicodes* table )
- {
- FT_Error error;
-
-
- /* we first allocate the table */
- table->num_maps = 0;
- table->maps = 0;
-
- if ( !FT_NEW_ARRAY( table->maps, num_glyphs ) )
- {
- FT_UInt n;
- FT_UInt count;
- PS_UniMap* map;
- FT_UInt32 uni_char;
-
-
- map = table->maps;
-
- for ( n = 0; n < num_glyphs; n++ )
- {
- const char* gname = glyph_names[n];
-
-
- if ( gname )
- {
- uni_char = ps_unicode_value( gname );
-
- if ( uni_char != 0 && uni_char != 0xFFFFL )
- {
- map->unicode = (FT_UInt)uni_char;
- map->glyph_index = n;
- map++;
- }
- }
- }
-
- /* now, compress the table a bit */
- count = (FT_UInt)( map - table->maps );
-
- if ( count > 0 && FT_REALLOC( table->maps,
- num_glyphs * sizeof ( PS_UniMap ),
- count * sizeof ( PS_UniMap ) ) )
- count = 0;
-
- if ( count == 0 )
- {
- FT_FREE( table->maps );
- if ( !error )
- error = PSnames_Err_Invalid_Argument; /* no unicode chars here! */
- }
- else
- /* sort the table in increasing order of unicode values */
- ft_qsort( table->maps, count, sizeof ( PS_UniMap ), compare_uni_maps );
-
- table->num_maps = count;
- }
-
- return error;
- }
-
-
- static FT_UInt
- ps_unicodes_char_index( PS_Unicodes* table,
- FT_ULong unicode )
- {
- PS_UniMap *min, *max, *mid;
-
-
- /* perform a binary search on the table */
-
- min = table->maps;
- max = min + table->num_maps - 1;
-
- while ( min <= max )
- {
- mid = min + ( max - min ) / 2;
- if ( mid->unicode == unicode )
- return mid->glyph_index;
-
- if ( min == max )
- break;
-
- if ( mid->unicode < unicode )
- min = mid + 1;
- else
- max = mid - 1;
- }
-
- return 0xFFFFU;
- }
-
-
- static FT_ULong
- ps_unicodes_char_next( PS_Unicodes* table,
- FT_ULong unicode )
- {
- PS_UniMap *min, *max, *mid;
-
-
- unicode++;
- /* perform a binary search on the table */
-
- min = table->maps;
- max = min + table->num_maps - 1;
-
- while ( min <= max )
- {
- mid = min + ( max - min ) / 2;
- if ( mid->unicode == unicode )
- return unicode;
-
- if ( min == max )
- break;
-
- if ( mid->unicode < unicode )
- min = mid + 1;
- else
- max = mid - 1;
- }
-
- if ( max < table->maps )
- max = table->maps;
-
- while ( max < table->maps + table->num_maps )
- {
- if ( unicode < max->unicode )
- return max->unicode;
- max++;
- }
-
- return 0;
- }
-
-
-#endif /* FT_CONFIG_OPTION_ADOBE_GLYPH_LIST */
-
-
- static const char*
- ps_get_macintosh_name( FT_UInt name_index )
- {
- if ( name_index >= 258 )
- name_index = 0;
-
- return ps_glyph_names[mac_standard_names[name_index]];
- }
-
-
- static const char*
- ps_get_standard_strings( FT_UInt sid )
- {
- return ( sid < NUM_SID_GLYPHS ? sid_standard_names[sid] : 0 );
- }
-
-
- static
- const FT_Service_PsCMapsRec pscmaps_interface =
- {
-#ifdef FT_CONFIG_OPTION_ADOBE_GLYPH_LIST
-
- (PS_Unicode_ValueFunc) ps_unicode_value,
- (PS_Unicodes_InitFunc) ps_unicodes_init,
- (PS_Unicodes_CharIndexFunc)ps_unicodes_char_index,
- (PS_Unicodes_CharNextFunc) ps_unicodes_char_next,
-
-#else
-
- 0,
- 0,
- 0,
- 0,
-
-#endif /* FT_CONFIG_OPTION_ADOBE_GLYPH_LIST */
-
- (PS_Macintosh_Name_Func) ps_get_macintosh_name,
- (PS_Adobe_Std_Strings_Func)ps_get_standard_strings,
-
- t1_standard_encoding,
- t1_expert_encoding
- };
-
-
- static const FT_ServiceDescRec pscmaps_services[] =
- {
- { FT_SERVICE_ID_POSTSCRIPT_CMAPS, &pscmaps_interface },
- { NULL, NULL }
- };
-
-
- static FT_Pointer
- psnames_get_service( FT_Module module,
- const char* service_id )
- {
- FT_UNUSED( module );
-
- return ft_service_list_lookup( pscmaps_services, service_id );
- }
-
-#endif /* !FT_CONFIG_OPTION_NO_POSTSCRIPT_NAMES */
-
-
-
- FT_CALLBACK_TABLE_DEF
- const FT_Module_Class psnames_module_class =
- {
- 0, /* this is not a font driver, nor a renderer */
- sizeof ( FT_ModuleRec ),
-
- "psnames", /* driver name */
- 0x10000L, /* driver version */
- 0x20000L, /* driver requires FreeType 2 or above */
-
-#ifdef FT_CONFIG_OPTION_NO_POSTSCRIPT_NAMES
- 0,
- (FT_Module_Constructor)0,
- (FT_Module_Destructor) 0,
- (FT_Module_Requester) 0
-#else
- (void*)&pscmaps_interface, /* module specific interface */
- (FT_Module_Constructor)0,
- (FT_Module_Destructor) 0,
- (FT_Module_Requester) psnames_get_service
-#endif
- };
-
-
-/* END */
generated by cgit v1.2.3 (git 2.25.1) at 2024-08-23 22:47:49 +0000