XFA: merge patch from CL 815103002
[pdfium.git] / third_party / freetype / src / psaux / t1cmap.c
1 /***************************************************************************/
2 /*                                                                         */
3 /*  t1cmap.c                                                               */
4 /*                                                                         */
5 /*    Type 1 character map support (body).                                 */
6 /*                                                                         */
7 /*  Copyright 2002, 2003, 2006, 2007, 2012 by                              */
8 /*  David Turner, Robert Wilhelm, and Werner Lemberg.                      */
9 /*                                                                         */
10 /*  This file is part of the FreeType project, and may only be used,       */
11 /*  modified, and distributed under the terms of the FreeType project      */
12 /*  license, LICENSE.TXT.  By continuing to use, modify, or distribute     */
13 /*  this file you indicate that you have read the license and              */
14 /*  understand and accept it fully.                                        */
15 /*                                                                         */
16 /***************************************************************************/
17
18
19 #include "t1cmap.h"
20
21 #include FT_INTERNAL_DEBUG_H
22
23 #include "psauxerr.h"
24
25
26   /*************************************************************************/
27   /*************************************************************************/
28   /*****                                                               *****/
29   /*****          TYPE1 STANDARD (AND EXPERT) ENCODING CMAPS           *****/
30   /*****                                                               *****/
31   /*************************************************************************/
32   /*************************************************************************/
33
34   static void
35   t1_cmap_std_init( T1_CMapStd  cmap,
36                     FT_Int      is_expert )
37   {
38     T1_Face             face    = (T1_Face)FT_CMAP_FACE( cmap );
39     FT_Service_PsCMaps  psnames = (FT_Service_PsCMaps)face->psnames;
40
41
42     cmap->num_glyphs    = face->type1.num_glyphs;
43     cmap->glyph_names   = (const char* const*)face->type1.glyph_names;
44     cmap->sid_to_string = psnames->adobe_std_strings;
45     cmap->code_to_sid   = is_expert ? psnames->adobe_expert_encoding
46                                     : psnames->adobe_std_encoding;
47
48     FT_ASSERT( cmap->code_to_sid != NULL );
49   }
50
51
52   FT_CALLBACK_DEF( void )
53   t1_cmap_std_done( T1_CMapStd  cmap )
54   {
55     cmap->num_glyphs    = 0;
56     cmap->glyph_names   = NULL;
57     cmap->sid_to_string = NULL;
58     cmap->code_to_sid   = NULL;
59   }
60
61
62   FT_CALLBACK_DEF( FT_UInt )
63   t1_cmap_std_char_index( T1_CMapStd  cmap,
64                           FT_UInt32   char_code )
65   {
66     FT_UInt  result = 0;
67
68
69     if ( char_code < 256 )
70     {
71       FT_UInt      code, n;
72       const char*  glyph_name;
73
74
75       /* convert character code to Adobe SID string */
76       code       = cmap->code_to_sid[char_code];
77       glyph_name = cmap->sid_to_string( code );
78
79       /* look for the corresponding glyph name */
80       for ( n = 0; n < cmap->num_glyphs; n++ )
81       {
82         const char* gname = cmap->glyph_names[n];
83
84
85         if ( gname && gname[0] == glyph_name[0]  &&
86              ft_strcmp( gname, glyph_name ) == 0 )
87         {
88           result = n;
89           break;
90         }
91       }
92     }
93
94     return result;
95   }
96
97
98   FT_CALLBACK_DEF( FT_UInt32 )
99   t1_cmap_std_char_next( T1_CMapStd   cmap,
100                          FT_UInt32   *pchar_code )
101   {
102     FT_UInt    result    = 0;
103     FT_UInt32  char_code = *pchar_code + 1;
104
105
106     while ( char_code < 256 )
107     {
108       result = t1_cmap_std_char_index( cmap, char_code );
109       if ( result != 0 )
110         goto Exit;
111
112       char_code++;
113     }
114     char_code = 0;
115
116   Exit:
117     *pchar_code = char_code;
118     return result;
119   }
120
121
122   FT_CALLBACK_DEF( FT_Error )
123   t1_cmap_standard_init( T1_CMapStd  cmap,
124                          FT_Pointer  pointer )
125   {
126     FT_UNUSED( pointer );
127
128
129     t1_cmap_std_init( cmap, 0 );
130     return 0;
131   }
132
133
134   FT_CALLBACK_TABLE_DEF const FT_CMap_ClassRec
135   t1_cmap_standard_class_rec =
136   {
137     sizeof ( T1_CMapStdRec ),
138
139     (FT_CMap_InitFunc)     t1_cmap_standard_init,
140     (FT_CMap_DoneFunc)     t1_cmap_std_done,
141     (FT_CMap_CharIndexFunc)t1_cmap_std_char_index,
142     (FT_CMap_CharNextFunc) t1_cmap_std_char_next,
143
144     NULL, NULL, NULL, NULL, NULL
145   };
146
147
148   FT_CALLBACK_DEF( FT_Error )
149   t1_cmap_expert_init( T1_CMapStd  cmap,
150                        FT_Pointer  pointer )
151   {
152     FT_UNUSED( pointer );
153
154
155     t1_cmap_std_init( cmap, 1 );
156     return 0;
157   }
158
159   FT_CALLBACK_TABLE_DEF const FT_CMap_ClassRec
160   t1_cmap_expert_class_rec =
161   {
162     sizeof ( T1_CMapStdRec ),
163
164     (FT_CMap_InitFunc)     t1_cmap_expert_init,
165     (FT_CMap_DoneFunc)     t1_cmap_std_done,
166     (FT_CMap_CharIndexFunc)t1_cmap_std_char_index,
167     (FT_CMap_CharNextFunc) t1_cmap_std_char_next,
168
169     NULL, NULL, NULL, NULL, NULL
170   };
171
172
173   /*************************************************************************/
174   /*************************************************************************/
175   /*****                                                               *****/
176   /*****                    TYPE1 CUSTOM ENCODING CMAP                 *****/
177   /*****                                                               *****/
178   /*************************************************************************/
179   /*************************************************************************/
180
181
182   FT_CALLBACK_DEF( FT_Error )
183   t1_cmap_custom_init( T1_CMapCustom  cmap,
184                        FT_Pointer     pointer )
185   {
186     T1_Face      face     = (T1_Face)FT_CMAP_FACE( cmap );
187     T1_Encoding  encoding = &face->type1.encoding;
188
189     FT_UNUSED( pointer );
190
191
192     cmap->first   = encoding->code_first;
193     cmap->count   = (FT_UInt)( encoding->code_last - cmap->first );
194     cmap->indices = encoding->char_index;
195
196     FT_ASSERT( cmap->indices != NULL );
197     FT_ASSERT( encoding->code_first <= encoding->code_last );
198
199     return 0;
200   }
201
202
203   FT_CALLBACK_DEF( void )
204   t1_cmap_custom_done( T1_CMapCustom  cmap )
205   {
206     cmap->indices = NULL;
207     cmap->first   = 0;
208     cmap->count   = 0;
209   }
210
211
212   FT_CALLBACK_DEF( FT_UInt )
213   t1_cmap_custom_char_index( T1_CMapCustom  cmap,
214                              FT_UInt32      char_code )
215   {
216     FT_UInt    result = 0;
217
218
219     if ( ( char_code >= cmap->first )                  &&
220          ( char_code < ( cmap->first + cmap->count ) ) )
221       result = cmap->indices[char_code];
222
223     return result;
224   }
225
226
227   FT_CALLBACK_DEF( FT_UInt32 )
228   t1_cmap_custom_char_next( T1_CMapCustom  cmap,
229                             FT_UInt32     *pchar_code )
230   {
231     FT_UInt    result = 0;
232     FT_UInt32  char_code = *pchar_code;
233
234
235     ++char_code;
236
237     if ( char_code < cmap->first )
238       char_code = cmap->first;
239
240     for ( ; char_code < ( cmap->first + cmap->count ); char_code++ )
241     {
242       result = cmap->indices[char_code];
243       if ( result != 0 )
244         goto Exit;
245     }
246
247     char_code = 0;
248
249   Exit:
250     *pchar_code = char_code;
251     return result;
252   }
253
254
255   FT_CALLBACK_TABLE_DEF const FT_CMap_ClassRec
256   t1_cmap_custom_class_rec =
257   {
258     sizeof ( T1_CMapCustomRec ),
259
260     (FT_CMap_InitFunc)     t1_cmap_custom_init,
261     (FT_CMap_DoneFunc)     t1_cmap_custom_done,
262     (FT_CMap_CharIndexFunc)t1_cmap_custom_char_index,
263     (FT_CMap_CharNextFunc) t1_cmap_custom_char_next,
264
265     NULL, NULL, NULL, NULL, NULL
266   };
267
268
269   /*************************************************************************/
270   /*************************************************************************/
271   /*****                                                               *****/
272   /*****            TYPE1 SYNTHETIC UNICODE ENCODING CMAP              *****/
273   /*****                                                               *****/
274   /*************************************************************************/
275   /*************************************************************************/
276
277   FT_CALLBACK_DEF( const char * )
278   psaux_get_glyph_name( T1_Face  face,
279                         FT_UInt  idx )
280   {
281     return face->type1.glyph_names[idx];
282   }
283
284
285   FT_CALLBACK_DEF( FT_Error )
286   t1_cmap_unicode_init( PS_Unicodes  unicodes,
287                         FT_Pointer   pointer )
288   {
289     T1_Face             face    = (T1_Face)FT_CMAP_FACE( unicodes );
290     FT_Memory           memory  = FT_FACE_MEMORY( face );
291     FT_Service_PsCMaps  psnames = (FT_Service_PsCMaps)face->psnames;
292
293     FT_UNUSED( pointer );
294
295
296     return psnames->unicodes_init( memory,
297                                    unicodes,
298                                    face->type1.num_glyphs,
299                                    (PS_GetGlyphNameFunc)&psaux_get_glyph_name,
300                                    (PS_FreeGlyphNameFunc)NULL,
301                                    (FT_Pointer)face );
302   }
303
304
305   FT_CALLBACK_DEF( void )
306   t1_cmap_unicode_done( PS_Unicodes  unicodes )
307   {
308     FT_Face    face   = FT_CMAP_FACE( unicodes );
309     FT_Memory  memory = FT_FACE_MEMORY( face );
310
311
312     FT_FREE( unicodes->maps );
313     unicodes->num_maps = 0;
314   }
315
316
317   FT_CALLBACK_DEF( FT_UInt )
318   t1_cmap_unicode_char_index( PS_Unicodes  unicodes,
319                               FT_UInt32    char_code )
320   {
321     T1_Face             face    = (T1_Face)FT_CMAP_FACE( unicodes );
322     FT_Service_PsCMaps  psnames = (FT_Service_PsCMaps)face->psnames;
323
324
325     return psnames->unicodes_char_index( unicodes, char_code );
326   }
327
328
329   FT_CALLBACK_DEF( FT_UInt32 )
330   t1_cmap_unicode_char_next( PS_Unicodes  unicodes,
331                              FT_UInt32   *pchar_code )
332   {
333     T1_Face             face    = (T1_Face)FT_CMAP_FACE( unicodes );
334     FT_Service_PsCMaps  psnames = (FT_Service_PsCMaps)face->psnames;
335
336
337     return psnames->unicodes_char_next( unicodes, pchar_code );
338   }
339
340
341   FT_CALLBACK_TABLE_DEF const FT_CMap_ClassRec
342   t1_cmap_unicode_class_rec =
343   {
344     sizeof ( PS_UnicodesRec ),
345
346     (FT_CMap_InitFunc)     t1_cmap_unicode_init,
347     (FT_CMap_DoneFunc)     t1_cmap_unicode_done,
348     (FT_CMap_CharIndexFunc)t1_cmap_unicode_char_index,
349     (FT_CMap_CharNextFunc) t1_cmap_unicode_char_next,
350
351     NULL, NULL, NULL, NULL, NULL
352   };
353
354
355 /* END */