2 * sfnttofnt. Bitmap only ttf to Window fnt file converter
4 * Copyright 2004 Huw Davies
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
30 #ifdef HAVE_FT2BUILD_H
33 #include FT_FREETYPE_H
34 #include FT_SFNT_NAMES_H
35 #include FT_TRUETYPE_TABLES_H
37 #include "wine/unicode.h"
56 INT16 dfInternalLeading;
57 INT16 dfExternalLeading;
65 CHAR dfPitchAndFamily;
78 /* Fields, introduced for Windows 3.x fonts */
85 } FONTINFO16, *LPFONTINFO16;
93 void usage(char **argv)
95 fprintf(stderr, "%s foo.ttf ppem enc dpi def_char avg_width\n", argv[0]);
99 int lookup_charset(int enc)
101 /* FIXME: make winelib app and use TranslateCharsetInfo */
106 return RUSSIAN_CHARSET;
110 return GREEK_CHARSET;
112 return TURKISH_CHARSET;
114 return HEBREW_CHARSET;
116 return ARABIC_CHARSET;
118 return BALTIC_CHARSET;
120 return VIETNAMESE_CHARSET;
140 return SHIFTJIS_CHARSET;
142 return GB2312_CHARSET;
144 return HANGUL_CHARSET;
146 return CHINESEBIG5_CHARSET;
148 fprintf(stderr, "Unknown encoding %d - using OEM_CHARSET\n", enc);
153 static void fill_fontinfo(FT_Face face, int enc, FILE *fp, int dpi, unsigned char def_char, int avg_width)
155 int ascent, il, ppem, descent, width_bytes = 0, space_size, max_width = 0;
158 BYTE left_byte, right_byte, byte;
160 CHAR_TABLE_ENTRY *dfCharTable;
161 int i, x, y, x_off, x_end, first_char;
164 const union cptable *cptable;
165 FT_SfntName sfntname;
167 cptable = wine_cp_get_table(enc);
169 fprintf(stderr, "Can't find codepage %d\n", enc);
172 if(cptable->info.char_size != 1) {
173 fprintf(stderr, "Can't cope with double byte codepages\n");
177 ppem = face->size->metrics.y_ppem;
178 start = sizeof(FNT_HEADER) + sizeof(FONTINFO16);
180 if(FT_Load_Char(face, 0xc5, FT_LOAD_DEFAULT)) {
181 fprintf(stderr, "Can't find Aring\n");
184 ascent = face->glyph->metrics.height >> 6;
185 descent = ppem - ascent;
186 if(FT_Load_Char(face, 'M', FT_LOAD_DEFAULT)) {
187 fprintf(stderr, "Can't find M\n");
190 il = ascent - (face->glyph->metrics.height >> 6);
192 /* Hack: Courier has no internal leading, so we do likewise */
193 if(!strcmp(face->family_name, "Wine Courier"))
196 first_char = FT_Get_First_Char(face, &gi);
197 if(first_char == 0xd) /* fontforge's first glyph is 0xd, we'll catch this and skip it */
198 first_char = FT_Get_Next_Char(face, first_char, &gi);
200 dfCharTable = malloc((255 + 3) * sizeof(*dfCharTable));
201 memset(&fi, 0, sizeof(fi));
202 fi.dfFirstChar = first_char;
203 fi.dfLastChar = 0xff;
204 start += ((unsigned char)fi.dfLastChar - (unsigned char)fi.dfFirstChar + 3 ) * sizeof(*dfCharTable);
206 num_names = FT_Get_Sfnt_Name_Count(face);
207 for(i = 0; i <num_names; i++) {
208 FT_Get_Sfnt_Name(face, i, &sfntname);
209 if(sfntname.platform_id == 1 && sfntname.encoding_id == 0 &&
210 sfntname.language_id == 0 && sfntname.name_id == 0) {
211 size_t len = min( sfntname.string_len, sizeof(hdr.dfCopyright)-1 );
212 memcpy(hdr.dfCopyright, sfntname.string, len);
213 hdr.dfCopyright[len] = 0;
217 os2 = FT_Get_Sfnt_Table(face, ft_sfnt_os2);
218 for(i = first_char; i < 0x100; i++) {
219 gi = FT_Get_Char_Index(face, cptable->sbcs.cp2uni[i]);
221 fprintf(stderr, "Missing glyph for char %04x\n", cptable->sbcs.cp2uni[i]);
222 if(FT_Load_Char(face, cptable->sbcs.cp2uni[i], FT_LOAD_DEFAULT)) {
223 fprintf(stderr, "error loading char %d - bad news!\n", i);
226 dfCharTable[i].width = face->glyph->metrics.horiAdvance >> 6;
227 dfCharTable[i].offset = start + (width_bytes * ppem);
228 width_bytes += ((face->glyph->metrics.horiAdvance >> 6) + 7) >> 3;
229 if(max_width < (face->glyph->metrics.horiAdvance >> 6))
230 max_width = face->glyph->metrics.horiAdvance >> 6;
233 space_size = (ppem + 3) / 4;
234 dfCharTable[i].width = space_size;
235 dfCharTable[i].offset = start + (width_bytes * ppem);
236 width_bytes += (space_size + 7) >> 3;
238 dfCharTable[++i].width = 0;
239 dfCharTable[i].offset = start + (width_bytes * ppem);
242 fi.dfPoints = ((ppem - il) * 72 + dpi/2) / dpi;
245 fi.dfAscent = ascent;
246 fi.dfInternalLeading = il;
247 fi.dfExternalLeading = 0;
248 fi.dfItalic = (face->style_flags & FT_STYLE_FLAG_ITALIC) ? 1 : 0;
251 fi.dfWeight = os2->usWeightClass;
252 fi.dfCharSet = lookup_charset(enc);
253 fi.dfPixWidth = (face->face_flags & FT_FACE_FLAG_FIXED_WIDTH) ?
255 fi.dfPixHeight = ppem;
256 fi.dfPitchAndFamily = FT_IS_FIXED_WIDTH(face) ? 0 : TMPF_FIXED_PITCH;
257 switch(os2->panose[PAN_FAMILYTYPE_INDEX]) {
258 case PAN_FAMILY_SCRIPT:
259 fi.dfPitchAndFamily |= FF_SCRIPT;
261 case PAN_FAMILY_DECORATIVE:
262 case PAN_FAMILY_PICTORIAL:
263 fi.dfPitchAndFamily |= FF_DECORATIVE;
265 case PAN_FAMILY_TEXT_DISPLAY:
266 if(fi.dfPitchAndFamily == 0) /* fixed */
267 fi.dfPitchAndFamily = FF_MODERN;
269 switch(os2->panose[PAN_SERIFSTYLE_INDEX]) {
270 case PAN_SERIF_NORMAL_SANS:
271 case PAN_SERIF_OBTUSE_SANS:
272 case PAN_SERIF_PERP_SANS:
273 fi.dfPitchAndFamily |= FF_SWISS;
276 fi.dfPitchAndFamily |= FF_ROMAN;
281 fi.dfPitchAndFamily |= FF_DONTCARE;
284 fi.dfAvgWidth = avg_width;
285 fi.dfMaxWidth = max_width;
286 fi.dfDefaultChar = def_char - fi.dfFirstChar;
287 fi.dfBreakChar = ' ' - fi.dfFirstChar;
288 fi.dfWidthBytes = (width_bytes + 1) & ~1;
290 fi.dfFace = start + fi.dfWidthBytes * ppem;
291 fi.dfBitsOffset = start;
292 fi.dfFlags = 0x10; /* DFF_1COLOR */
293 fi.dfFlags |= FT_IS_FIXED_WIDTH(face) ? 1 : 2; /* DFF_FIXED : DFF_PROPORTIONAL */
295 hdr.dfVersion = 0x300;
296 hdr.dfSize = start + fi.dfWidthBytes * ppem + strlen(face->family_name) + 1;
297 fwrite(&hdr, sizeof(hdr), 1, fp);
298 fwrite(&fi, sizeof(fi), 1, fp);
299 fwrite(dfCharTable + fi.dfFirstChar, sizeof(*dfCharTable), ((unsigned char)fi.dfLastChar - (unsigned char)fi.dfFirstChar) + 3, fp);
301 for(i = first_char; i < 0x100; i++) {
302 if(FT_Load_Char(face, cptable->sbcs.cp2uni[i], FT_LOAD_DEFAULT)) {
305 assert(dfCharTable[i].width == face->glyph->metrics.horiAdvance >> 6);
307 for(x = 0; x < ((dfCharTable[i].width + 7) / 8); x++) {
308 for(y = 0; y < ppem; y++) {
309 if(y < ascent - face->glyph->bitmap_top ||
310 y >= face->glyph->bitmap.rows + ascent - face->glyph->bitmap_top) {
314 x_off = face->glyph->bitmap_left / 8;
315 x_end = (face->glyph->bitmap_left + face->glyph->bitmap.width - 1) / 8;
316 if(x < x_off || x > x_end) {
323 left_byte = face->glyph->bitmap.buffer[(y - (ascent - face->glyph->bitmap_top)) * face->glyph->bitmap.pitch + x - x_off - 1];
325 /* On the last non-trival output byte (x == x_end) have we got one or two input bytes */
326 if(x == x_end && (face->glyph->bitmap_left % 8 != 0) && ((face->glyph->bitmap.width % 8 == 0) || (x != (((face->glyph->bitmap.width) & ~0x7) + face->glyph->bitmap_left) / 8)))
329 right_byte = face->glyph->bitmap.buffer[(y - (ascent - face->glyph->bitmap_top)) * face->glyph->bitmap.pitch + x - x_off];
331 byte = (left_byte << (8 - (face->glyph->bitmap_left & 7))) & 0xff;
332 byte |= ((right_byte >> (face->glyph->bitmap_left & 7)) & 0xff);
337 for(x = 0; x < (space_size + 7) / 8; x++) {
338 for(y = 0; y < ppem; y++)
342 if(width_bytes & 1) {
343 for(y = 0; y < ppem; y++)
346 fprintf(fp, "%s", face->family_name);
352 int main(int argc, char **argv)
358 unsigned int def_char;
368 ppem = atoi(argv[2]);
371 def_char = atoi(argv[5]);
372 avg_width = atoi(argv[6]);
374 if(FT_Init_FreeType(&lib)) {
375 fprintf(stderr, "ft init failure\n");
379 if(FT_New_Face(lib, argv[1], 0, &face)) {
380 fprintf(stderr, "Can't open face\n");
385 if(FT_Set_Pixel_Sizes(face, ppem, ppem)) {
386 fprintf(stderr, "Can't set size\n");
391 strcpy(name, face->family_name);
392 /* FIXME: should add a -o option instead */
393 for(cp = name; *cp; cp++)
395 if(*cp == ' ') *cp = '_';
396 else if (*cp >= 'A' && *cp <= 'Z') *cp += 'a' - 'A';
399 sprintf(output, "%s-%d-%d-%d.fnt", name, enc, dpi, ppem);
401 fp = fopen(output, "w");
403 fill_fontinfo(face, enc, fp, dpi, def_char, avg_width);
408 #else /* HAVE_FREETYPE */
410 int main(int argc, char **argv)
412 fprintf( stderr, "%s needs to be built with Freetype support\n", argv[0] );
416 #endif /* HAVE_FREETYPE */