#include #include #include #include #include "config.h" #include "ttf.h" #include "ttfutil.h" #ifdef MEMCHECK #include #endif /* $Id: name.c,v 1.1.1.1 1998/06/05 07:47:52 robert Exp $ */ #ifndef lint static char vcid[] = "$Id: name.c,v 1.1.1.1 1998/06/05 07:47:52 robert Exp $"; #endif /* lint */ static NAMEPtr ttfAllocNAME(TTFontPtr font); static void ttfLoadNAME(FILE *fp,NAMEPtr name,ULONG offset); static void ttfLoadNameRecord(FILE *fp,NameRecordPtr rec,ULONG offset); static void ttfPrintNameRecord(FILE *fp,NameRecordPtr rec); static void ttfLoadNameRecordData(FILE *fp,NameRecordPtr rec,ULONG offset); static void ttfPrintNameRecordData(FILE *fp,NameRecordPtr rec); static void ttfFreeNameRecordData(NameRecordPtr rec); static void HexDump(char *p,char *hex,char *asc,int len); void ttfInitNAME(TTFontPtr font) { ULONG tag = 'n' | 'a' << 8 | 'm' << 16 | 'e' <<24; TableDirPtr ptd; if ((ptd = ttfLookUpTableDir(tag,font)) != NULL) { font->name = ttfAllocNAME(font); ttfLoadNAME(font->fp,font->name,ptd->offset); } } static NAMEPtr ttfAllocNAME(TTFontPtr font) { NAMEPtr name; if((name = (NAMEPtr) calloc(1,sizeof(NAME))) == NULL) { ttfError("Out of Memory in __FILE__:__LINE__\n"); return NULL; } return name; } static void ttfLoadNAME(FILE *fp,NAMEPtr name,ULONG offset) { USHORT i,n; ULONG pos; if (fseek(fp,offset,SEEK_SET) !=0) ttfError("Fseek Failed in ttfLOADNAME \n"); name->format = ttfGetUSHORT(fp); name->numberOfRecords = n = ttfGetUSHORT(fp); name->offset = ttfGetUSHORT(fp); if ((name->NameRecords = (NameRecordPtr) calloc(n,sizeof(NameRecord))) == NULL) ttfError("Out Of Memory\n"); pos = offset + sizeof(USHORT)*3; for(i=0;iNameRecords+i,pos); ttfLoadNameRecordData(fp,name->NameRecords+i,offset+name->offset); } } void ttfPrintNAME(FILE *fp,NAMEPtr name) { USHORT i; fprintf(fp,"'name' Table - Naming Table\n"); fprintf(fp,"---------------------------\n"); fprintf(fp,"\t Format:\t\t %d\n",name->format); fprintf(fp,"\t Number of Record:\t %d\n",name->numberOfRecords); fprintf(fp,"\t Storage offset:\t %d\n",name->offset); for (i=0;inumberOfRecords;i++) { fprintf(fp,"Name table %3d.\t",i); ttfPrintNameRecord(fp,name->NameRecords+i); } } void ttfFreeNAME(NAMEPtr name) { USHORT i; for (i=0;inumberOfRecords;i++) ttfFreeNameRecordData(name->NameRecords+i); free(name->NameRecords); free(name); } /* offset: address of the beginning of the name record */ static void ttfLoadNameRecord(FILE *fp,NameRecordPtr rec,ULONG offset) { if (fseek(fp,offset,SEEK_SET) !=0) ttfError("Fseek Failed in ttfLoadNameRecord \n"); rec->PlatformID = ttfGetUSHORT(fp); rec->EncodingID = ttfGetUSHORT(fp); rec->LanguageID = ttfGetUSHORT(fp); rec->NameID = ttfGetUSHORT(fp); rec->length = ttfGetUSHORT(fp); rec->offset = ttfGetUSHORT(fp); } static void ttfPrintNameRecord(FILE *fp,NameRecordPtr rec) { fprintf(fp," PlatformID:\t %d\n",rec->PlatformID); fprintf(fp,"\t\t EncodingID:\t %d\n",rec->EncodingID); fprintf(fp,"\t\t LanguageID:\t %d\n",rec->LanguageID); fprintf(fp,"\t\t NameID:\t %d\n",rec->NameID); fprintf(fp,"\t\t Length:\t %d\n",rec->length); fprintf(fp,"\t\t Offset:\t %d\n",rec->offset); ttfPrintNameRecordData(fp,rec); } /* ULONG offset: address of the beginning of the actual data (base actually) * base: start of data storage, specified by NAME.offset * offset: specified by NameRecord.offset */ static void ttfLoadNameRecordData(FILE *fp,NameRecordPtr rec,ULONG offset) { ULONG pos; pos = offset + rec->offset; if (fseek(fp,pos,SEEK_SET) !=0) ttfError("Fseek Failed in ttfLoadSubTable\n"); if ((rec->data = (char *) calloc(rec->length,sizeof(char))) == NULL) ttfError("Out Of Memory\n"); if (fread(rec->data,sizeof(char),rec->length,fp) != rec->length) ttfError("Error when getting Name Record Data\n"); } static void ttfPrintNameRecordData(FILE *fp,NameRecordPtr rec) { USHORT i,j; char hexbuf[100],ascbuf[100],*p; p = rec->data; for (i=0;ilength/10;i++,p+=10) { HexDump(p,hexbuf,ascbuf,10); fprintf(fp,"\t\t %s > %s\n",hexbuf,ascbuf); } HexDump(p,hexbuf,ascbuf,rec->length % 10); /* i know that this is ugly, but this makes output beautiful */ i = strlen(hexbuf); for (j=i;j<30;j++) { hexbuf[j] = ' '; } fprintf(fp,"\t\t %s > %s\n",hexbuf,ascbuf); } static void HexDump(char *p,char *hex,char *asc,int len) { int i; unsigned char c; char buf[100]; *hex = '\0'; *asc = '\0'; for (i=0;idata); }