summaryrefslogtreecommitdiff
path: root/dviware/catdvi/adobe2h.c
blob: f374a119845773d4b2f1c0bfef4388fcd821d403 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
/* catdvi - get text from DVI files
   Copyright (C) 2001-2002 Bjoern Brill <brill@fs.math.uni-frankfurt.de>

   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 2 of the License, or
   (at your option) any later version.

   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with this program; if not, write to the Free Software
   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/

/* Standalone program - generates a header which enumerates
 * (in fact #defines, since ISO C restricts enums to int and we don't know
 * if int is 32 bit wide) constant names for all the glyphs in adobetbl.h
 */

#include <stdlib.h>
#include <stdio.h>
#include <ctype.h>
#include <string.h>
#include <time.h>

typedef unsigned long uint32;

/* FIXME: remove this struct in pse2unic.c and here, move it to adobetbl.h? */
struct adobe2unicode_t {
        char const * adobe;
        uint32 unicode;
};
#define A_MAX_LEN 32
    /* including 0 terminator */


#define PROGNAME "adobe2h"

#define ORIGFILE "adobetbl.h"
#include ORIGFILE

/* #define OUTFILE "glyphenm.h" */
#define GUARD "GLYPHENM_H"



int main(void) {
    FILE * f;
    int i;
    int tbl_len;
    time_t now;

    time(&now);

#ifdef OUTFILE
    f = fopen(OUTFILE, "w");
    if(f == NULL) {
	perror(PROGNAME ": could not open " OUTFILE " for writing");
	exit(1);
    }
#else
    f = stdout;
#endif

    fputs(
    	"/* AUTOMATICALLY GENERATED -- DO NOT EDIT ! */\n"    	    \
	"\n"	    	    	    	    	    	    	    \
	"#ifndef " GUARD "\n"	    	    	    	    	    \
	"#define " GUARD "\n"	    	    	    	    	    \
	"\n",
	f
    );
    fprintf(
    	f,
	"/* created by " PROGNAME " on %s", /* newline from ctime */
    	ctime(&now)
    );
    fputs(
	" * from included glyph name table \"" ORIGFILE "\"\n" 	    \
	" */\n"     	    	    	    	    	    	    \
    	"\n",
	f
    );

    /* loop over all entries and output a #define for each */
    tbl_len = sizeof(adobe2unicode) / sizeof(adobe2unicode[0]);
    for(i = 0; i < tbl_len; ++i) {
    	uint32 u;
	const char * a, * prefix;
	char *p;
    	char s[A_MAX_LEN];
	int duplicate, is_private, is_catdvi;
	
	u = adobe2unicode[i].unicode;
	a = adobe2unicode[i].adobe;

    	/* Attention: adobetbl.h used to have duplicate definitions of some
	 * glyphs (removed by brute force).
	 */
	duplicate = (i > 0) && (strcmp(adobe2unicode[i-1].adobe, a) == 0);

	is_private = (u >= 0xe000 && u <= 0xf8ff) ||
	    (u >= 0xf0000 && u <= 0x10ffff);
   	
    	/* our additions in the glyph name table begin with `$' */
	is_catdvi = (a[0] == '$');

    	/* need to rename .notdef and .notavail */
	if(strcmp(a, ".notdef") == 0) a = "NOTDEF";
	if(strcmp(a, ".notavail") == 0) a = "NOTAVAIL";

	 /* $ is not valid in C identifiers */
	if(is_catdvi) ++a;

    	/* As adobetbl.h is based on the adobe glyph list, we choose a
	 * naming convention that tries to avoid clashes with Adobe's as
	 * defined in
    	 * http://partners.adobe.com/asn/developer/type/unicodegn.html
	 * (to retain source level compatibility with future glyph list
	 * extensions and other software using Adobe glyph names, e.g. dvips).
	 * Some things have to be changed, though, since we want to
	 * generate a sane C header file :)
	 */
	if(is_private) {
	    /* mark Adobes + our private use area */
	    if(is_catdvi) prefix = "GLYPH_CATDVI_";
	    else prefix = "GLYPH_ADOBE_";
	}
	else {
	    if(is_catdvi) prefix = "GLYPH_UNI_";
		/* if our additions are not in the private use area, assume
		 * we have added something that is defined in Unicode but
		 * missing in Adobes glyph list.
		 */
	    else prefix = "GLYPH_";
    	    	/* Is Adobe and Unicode. No special markers required. */
	}

	/* Check for non-alphanumeric characters in glyph names. Dot and
	 * underscore may appear. We change dot to underscore as well.
	 */
	strncpy(s, a, A_MAX_LEN);
	if(s[A_MAX_LEN - 1] != 0) {
	    fprintf(
		stderr,
		PROGNAME ": Warning: glyph name `%s' too long; "    \
		"glyph ignored.\n",
		a
	    );
	    goto some_error;
	}

	for(p = s; *p != 0; ++p) {
	    if(!isalnum(*p)) switch(*p) {
	    	case '_':
		    break;
		case '.':
		    *p = '_';
		    break;
		default:
		    fprintf(
			stderr,
			PROGNAME ": Warning: illegal character "   \
			"`%c\' in glyph name `%s'; glyph ignored.\n",
			*p,
			a
		    );
		    goto some_error;
	    }
	}

	if(duplicate) {
    	    /* We can't have duplicate definitions in the header; assume the
	     * first one is the best and document the others as comment.
	     */
	    fprintf(f, "/* #define %s%s %#06lxL ;Duplicate */\n", prefix, s, u);
	    fprintf(
		stderr,
		PROGNAME ": Warning: duplicate definition for "	\
		"glyph name `%s\'; commented out.\n",
		s
	    );
	}
	else fprintf(f, "#define %s%s  %#06lxL\n", prefix, s, u);

    	some_error: ;
		
    }	/* for i */

    fputs(
	"\n"	    	\
	"#endif /* " GUARD " */\n",
	f
    );
    fclose(f);
    exit(0);
}