summaryrefslogtreecommitdiff
path: root/Build/source/texk/ttfdump/libttf/name.c
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2006-01-17 21:41:51 +0000
committerKarl Berry <karl@freefriends.org>2006-01-17 21:41:51 +0000
commit487ca4806cc046076293cf6cc5fbba0db282bac7 (patch)
tree847b412ab5158dd7bdd7ed7e5a4cc3fbca94be32 /Build/source/texk/ttfdump/libttf/name.c
parenta3d3111bfe26b8e5f5bc6049dfb2a4ca2edc7881 (diff)
texk 1
git-svn-id: svn://tug.org/texlive/trunk@1485 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/ttfdump/libttf/name.c')
-rw-r--r--Build/source/texk/ttfdump/libttf/name.c182
1 files changed, 182 insertions, 0 deletions
diff --git a/Build/source/texk/ttfdump/libttf/name.c b/Build/source/texk/ttfdump/libttf/name.c
new file mode 100644
index 00000000000..968af094c7e
--- /dev/null
+++ b/Build/source/texk/ttfdump/libttf/name.c
@@ -0,0 +1,182 @@
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <ctype.h>
+#include "config.h"
+#include "ttf.h"
+#include "ttfutil.h"
+
+#ifdef MEMCHECK
+#include <dmalloc.h>
+#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;i<n;i++,pos+=12 /*sizeof(NameRecord)*/)
+ {
+ ttfLoadNameRecord(fp,name->NameRecords+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;i<name->numberOfRecords;i++)
+ {
+ fprintf(fp,"Name table %3d.\t",i);
+ ttfPrintNameRecord(fp,name->NameRecords+i);
+ }
+
+}
+void ttfFreeNAME(NAMEPtr name)
+{
+ USHORT i;
+ for (i=0;i<name->numberOfRecords;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;i<rec->length/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;i<len;i++)
+ {
+ c = *(p+i);
+ sprintf(buf,"%02x ",c);
+ strcat(hex,buf);
+ if (isprint(c))
+ *(asc+i) = c;
+ else
+ *(asc+i) = '.';
+ }
+ *(asc+len) = *(hex+len*3) = '\0';
+}
+static void ttfFreeNameRecordData(NameRecordPtr rec)
+{
+ free(rec->data);
+}