123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501 |
- /* pcfdriver.c
- FreeType font driver for pcf files
- Copyright (C) 2000-2001, 2002 by
- Francesco Zappa Nardelli
- Permission is hereby granted, free of charge, to any person obtaining a copy
- of this software and associated documentation files (the "Software"), to deal
- in the Software without restriction, including without limitation the rights
- to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
- copies of the Software, and to permit persons to whom the Software is
- furnished to do so, subject to the following conditions:
- The above copyright notice and this permission notice shall be included in
- all copies or substantial portions of the Software.
- THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
- IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
- FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
- AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
- LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
- OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
- THE SOFTWARE.
- */
- #include <ft2build.h>
- #include FT_INTERNAL_DEBUG_H
- #include FT_INTERNAL_STREAM_H
- #include FT_INTERNAL_OBJECTS_H
- #include FT_GZIP_H
- #include FT_ERRORS_H
- #include "pcf.h"
- #include "pcfdriver.h"
- #include "pcfutil.h"
- #include "pcferror.h"
- #undef FT_COMPONENT
- #define FT_COMPONENT trace_pcfread
- typedef struct PCF_CMapRec_
- {
- FT_CMapRec cmap;
- FT_UInt num_encodings;
- PCF_Encoding encodings;
- } PCF_CMapRec, *PCF_CMap;
- FT_CALLBACK_DEF( FT_Error )
- pcf_cmap_init( PCF_CMap cmap )
- {
- PCF_Face face = (PCF_Face)FT_CMAP_FACE( cmap );
- cmap->num_encodings = (FT_UInt)face->nencodings;
- cmap->encodings = face->encodings;
- return FT_Err_Ok;
- }
- FT_CALLBACK_DEF( void )
- pcf_cmap_done( PCF_CMap cmap )
- {
- cmap->encodings = NULL;
- cmap->num_encodings = 0;
- }
- FT_CALLBACK_DEF( FT_UInt )
- pcf_cmap_char_index( PCF_CMap cmap,
- FT_UInt32 charcode )
- {
- PCF_Encoding encodings = cmap->encodings;
- FT_UInt min, max, mid;
- FT_UInt result = 0;
- min = 0;
- max = cmap->num_encodings;
- while ( min < max )
- {
- FT_UInt32 code;
- mid = ( min + max ) >> 1;
- code = encodings[mid].enc;
- if ( charcode == code )
- {
- result = encodings[mid].glyph + 1;
- break;
- }
- if ( charcode < code )
- max = mid;
- else
- min = mid + 1;
- }
- return result;
- }
- FT_CALLBACK_DEF( FT_UInt )
- pcf_cmap_char_next( PCF_CMap cmap,
- FT_UInt32 *acharcode )
- {
- PCF_Encoding encodings = cmap->encodings;
- FT_UInt min, max, mid;
- FT_UInt32 charcode = *acharcode + 1;
- FT_UInt result = 0;
- min = 0;
- max = cmap->num_encodings;
- while ( min < max )
- {
- FT_UInt32 code;
- mid = ( min + max ) >> 1;
- code = encodings[mid].enc;
- if ( charcode == code )
- {
- result = encodings[mid].glyph + 1;
- goto Exit;
- }
- if ( charcode < code )
- max = mid;
- else
- min = mid + 1;
- }
- charcode = 0;
- if ( min < cmap->num_encodings )
- {
- charcode = encodings[min].enc;
- result = encodings[min].glyph + 1;
- }
- Exit:
- *acharcode = charcode;
- return result;
- }
- FT_CALLBACK_TABLE_DEF const FT_CMap_ClassRec pcf_cmap_class =
- {
- sizeof( PCF_CMapRec ),
- (FT_CMap_InitFunc) pcf_cmap_init,
- (FT_CMap_DoneFunc) pcf_cmap_done,
- (FT_CMap_CharIndexFunc)pcf_cmap_char_index,
- (FT_CMap_CharNextFunc) pcf_cmap_char_next
- };
- /*************************************************************************/
- /* */
- /* 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_pcfdriver
- FT_CALLBACK_DEF( FT_Error )
- PCF_Face_Done( PCF_Face face )
- {
- FT_Memory memory = FT_FACE_MEMORY( face );
- FT_FREE( face->encodings );
- FT_FREE( face->metrics );
- /* free properties */
- {
- PCF_Property prop = face->properties;
- FT_Int i;
- for ( i = 0; i < face->nprops; i++ )
- {
- prop = &face->properties[i];
- FT_FREE( prop->name );
- if ( prop->isString )
- FT_FREE( prop->value );
- }
- FT_FREE( face->properties );
- }
- FT_FREE( face->toc.tables );
- FT_FREE( face->root.family_name );
- FT_FREE( face->root.available_sizes );
- FT_FREE( face->charset_encoding );
- FT_FREE( face->charset_registry );
- FT_TRACE4(( "PCF_Face_Done: done face\n" ));
- /* close gzip stream if any */
- if ( face->root.stream == &face->gzip_stream )
- {
- FT_Stream_Close( &face->gzip_stream );
- face->root.stream = face->gzip_source;
- }
- return PCF_Err_Ok;
- }
- FT_CALLBACK_DEF( FT_Error )
- PCF_Face_Init( FT_Stream stream,
- PCF_Face face,
- FT_Int face_index,
- FT_Int num_params,
- FT_Parameter* params )
- {
- FT_Error error = PCF_Err_Ok;
- FT_UNUSED( num_params );
- FT_UNUSED( params );
- FT_UNUSED( face_index );
- error = pcf_load_font( stream, face );
- if ( error )
- {
- FT_Error error2;
- /* this didn't work, try gzip support !! */
- error2 = FT_Stream_OpenGzip( &face->gzip_stream, stream );
- if ( error2 == FT_Err_Unimplemented_Feature )
- goto Fail;
- error = error2;
- if ( error )
- goto Fail;
- face->gzip_source = stream;
- face->root.stream = &face->gzip_stream;
- stream = face->root.stream;
- error = pcf_load_font( stream, face );
- if ( error )
- goto Fail;
- }
- /* set-up charmap */
- {
- FT_String *charset_registry, *charset_encoding;
- FT_Bool unicode_charmap = 0;
- charset_registry = face->charset_registry;
- charset_encoding = face->charset_encoding;
- if ( ( charset_registry != NULL ) &&
- ( charset_encoding != NULL ) )
- {
- if ( !ft_strcmp( face->charset_registry, "ISO10646" ) ||
- ( !ft_strcmp( face->charset_registry, "ISO8859" ) &&
- !ft_strcmp( face->charset_encoding, "1" ) ) )
- unicode_charmap = 1;
- }
- {
- FT_CharMapRec charmap;
- charmap.face = FT_FACE( face );
- charmap.encoding = FT_ENCODING_NONE;
- charmap.platform_id = 0;
- charmap.encoding_id = 0;
- if ( unicode_charmap )
- {
- charmap.encoding = FT_ENCODING_UNICODE;
- charmap.platform_id = 3;
- charmap.encoding_id = 1;
- }
- error = FT_CMap_New( &pcf_cmap_class, NULL, &charmap, NULL );
- #if 0
- /* Select default charmap */
- if (face->root.num_charmaps)
- face->root.charmap = face->root.charmaps[0];
- #endif
- }
- }
- Exit:
- return error;
- Fail:
- FT_TRACE2(( "[not a valid PCF file]\n" ));
- error = PCF_Err_Unknown_File_Format; /* error */
- goto Exit;
- }
- static FT_Error
- PCF_Set_Pixel_Size( FT_Size size )
- {
- PCF_Face face = (PCF_Face)FT_SIZE_FACE( size );
- FT_TRACE4(( "rec %d - pres %d\n", size->metrics.y_ppem,
- face->root.available_sizes->height ));
- if ( size->metrics.y_ppem == face->root.available_sizes->height )
- {
- size->metrics.ascender = face->accel.fontAscent << 6;
- size->metrics.descender = face->accel.fontDescent * (-64);
- #if 0
- size->metrics.height = face->accel.maxbounds.ascent << 6;
- #endif
- size->metrics.height = size->metrics.ascender -
- size->metrics.descender;
- size->metrics.max_advance = face->accel.maxbounds.characterWidth << 6;
- return PCF_Err_Ok;
- }
- else
- {
- FT_TRACE4(( "size WRONG\n" ));
- return PCF_Err_Invalid_Pixel_Size;
- }
- }
- static FT_Error
- PCF_Glyph_Load( FT_GlyphSlot slot,
- FT_Size size,
- FT_UInt glyph_index,
- FT_Int32 load_flags )
- {
- PCF_Face face = (PCF_Face)FT_SIZE_FACE( size );
- FT_Stream stream = face->root.stream;
- FT_Error error = PCF_Err_Ok;
- FT_Memory memory = FT_FACE( face )->memory;
- FT_Bitmap* bitmap = &slot->bitmap;
- PCF_Metric metric;
- int bytes;
- FT_UNUSED( load_flags );
- FT_TRACE4(( "load_glyph %d ---", glyph_index ));
- if ( !face )
- {
- error = PCF_Err_Invalid_Argument;
- goto Exit;
- }
- if ( glyph_index > 0 )
- glyph_index--;
- metric = face->metrics + glyph_index;
- bitmap->rows = metric->ascent + metric->descent;
- bitmap->width = metric->rightSideBearing - metric->leftSideBearing;
- bitmap->num_grays = 1;
- bitmap->pixel_mode = FT_PIXEL_MODE_MONO;
- FT_TRACE6(( "BIT_ORDER %d ; BYTE_ORDER %d ; GLYPH_PAD %d\n",
- PCF_BIT_ORDER( face->bitmapsFormat ),
- PCF_BYTE_ORDER( face->bitmapsFormat ),
- PCF_GLYPH_PAD( face->bitmapsFormat ) ));
- switch ( PCF_GLYPH_PAD( face->bitmapsFormat ) )
- {
- case 1:
- bitmap->pitch = ( bitmap->width + 7 ) >> 3;
- break;
- case 2:
- bitmap->pitch = ( ( bitmap->width + 15 ) >> 4 ) << 1;
- break;
- case 4:
- bitmap->pitch = ( ( bitmap->width + 31 ) >> 5 ) << 2;
- break;
- case 8:
- bitmap->pitch = ( ( bitmap->width + 63 ) >> 6 ) << 3;
- break;
- default:
- return PCF_Err_Invalid_File_Format;
- }
- /* XXX: to do: are there cases that need repadding the bitmap? */
- bytes = bitmap->pitch * bitmap->rows;
- if ( FT_ALLOC( bitmap->buffer, bytes ) )
- goto Exit;
- if ( FT_STREAM_SEEK( metric->bits ) ||
- FT_STREAM_READ( bitmap->buffer, bytes ) )
- goto Exit;
- if ( PCF_BIT_ORDER( face->bitmapsFormat ) != MSBFirst )
- BitOrderInvert( bitmap->buffer, bytes );
- if ( ( PCF_BYTE_ORDER( face->bitmapsFormat ) !=
- PCF_BIT_ORDER( face->bitmapsFormat ) ) )
- {
- switch ( PCF_SCAN_UNIT( face->bitmapsFormat ) )
- {
- case 1:
- break;
- case 2:
- TwoByteSwap( bitmap->buffer, bytes );
- break;
- case 4:
- FourByteSwap( bitmap->buffer, bytes );
- break;
- }
- }
- slot->bitmap_left = metric->leftSideBearing;
- slot->bitmap_top = metric->ascent;
- slot->metrics.horiAdvance = metric->characterWidth << 6 ;
- slot->metrics.horiBearingX = metric->leftSideBearing << 6 ;
- slot->metrics.horiBearingY = metric->ascent << 6 ;
- slot->metrics.width = ( metric->rightSideBearing -
- metric->leftSideBearing ) << 6;
- slot->metrics.height = bitmap->rows << 6;
- slot->linearHoriAdvance = (FT_Fixed)bitmap->width << 16;
- slot->format = FT_GLYPH_FORMAT_BITMAP;
- slot->flags = FT_GLYPH_OWN_BITMAP;
- FT_TRACE4(( " --- ok\n" ));
- Exit:
- return error;
- }
- FT_CALLBACK_TABLE_DEF
- const FT_Driver_ClassRec pcf_driver_class =
- {
- {
- ft_module_font_driver,
- sizeof ( FT_DriverRec ),
- "pcf",
- 0x10000L,
- 0x20000L,
- 0,
- (FT_Module_Constructor)0,
- (FT_Module_Destructor) 0,
- (FT_Module_Requester) 0
- },
- sizeof( PCF_FaceRec ),
- sizeof( FT_SizeRec ),
- sizeof( FT_GlyphSlotRec ),
- (FT_Face_InitFunc) PCF_Face_Init,
- (FT_Face_DoneFunc) PCF_Face_Done,
- (FT_Size_InitFunc) 0,
- (FT_Size_DoneFunc) 0,
- (FT_Slot_InitFunc) 0,
- (FT_Slot_DoneFunc) 0,
- (FT_Size_ResetPointsFunc) PCF_Set_Pixel_Size,
- (FT_Size_ResetPixelsFunc) PCF_Set_Pixel_Size,
- (FT_Slot_LoadFunc) PCF_Glyph_Load,
- (FT_Face_GetKerningFunc) 0,
- (FT_Face_AttachFunc) 0,
- (FT_Face_GetAdvancesFunc) 0
- };
- /* END */
|