lib/example/makefonts.cc

   1 /* makefonts.cc
   2
   3    Utility for generating the standard fonts (arial, courier, etc.) in swf-format.
   4
   5    Part of the swftools package.
   6
   7    Copyright (c) 2001 Matthias Kramm <kramm@quiss.org>
   8
   9    This file is distributed under the GPL, see file COPYING for details
  10
  11 */
  12
  13
  14 #include <stdio.h>
  15 #include <fcntl.h>
  16 #include <math.h>
  17 extern "C" {
  18 #include "../rfxswf.h"
  19 }
  20 #include "../../pdf2swf/swfoutput.h"
  21 #include "../../pdf2swf/spline.h"
  22
  23 #define standardEncodingSize 335
  24 #define symbolEncodingSize 257
  25 #define zapfDingbatsEncodingSize 270
  26 #define macRomanEncodingSize 256
  27
  28 extern char *standardEncodingNames[standardEncodingSize];
  29 extern char *symbolEncodingNames[symbolEncodingSize];
  30 extern char *zapfDingbatsEncodingNames[zapfDingbatsEncodingSize];
  31 extern char *macRomanEncodingNames[macRomanEncodingSize];
  32
  33 char*DATADIR = "/usr/local/share/swftools";
  34
  35 extern void drawpath(TAG*tag, T1_OUTLINE*outline, struct swfmatrix*m);
  36
  37 SWFFONT * t1font2swffont(int i)
  38 {
  39     T1_LoadFont(i);
  40
  41     float angle = T1_GetItalicAngle(i);
  42     char*fontname = T1_GetFontName(i);
  43     char*fullname = T1_GetFullName(i);
  44     char*familyname = T1_GetFamilyName(i);
  45     float underline = T1_GetUnderlinePosition(i);
  46     BBox bbox = T1_GetFontBBox(i);
  47
  48     char ** encoding = standardEncodingNames;
  49     int encodingsize = standardEncodingSize;
  50
  51     printf("processing \"%s\"...\n", fullname);
  52
  53     if(strstr(fullname, "Dingbats")) {// Zapf Dingbats
  54         encoding = zapfDingbatsEncodingNames;
  55         encodingsize = zapfDingbatsEncodingSize;
  56     }
  57     else if(strstr(fullname, "Symbol")) {// Symbol
  58         encoding = symbolEncodingNames;
  59         encodingsize = zapfDingbatsEncodingSize;
  60     }
  61
  62     SWFFONT * wfont = (SWFFONT*)malloc(sizeof(SWFFONT));
  63     SWFFont * font = new SWFFont("", i, "");
  64
  65     wfont->version = 2;
  66     wfont->name = (U8*)fontname;
  67     wfont->layout = (SWFLAYOUT*)malloc(sizeof(SWFLAYOUT));
  68
  69     int s,num;
  70     num = 0;
  71     for(s=0;s<encodingsize;s++)
  72     {
  73         if(encoding[s]) {
  74             T1_OUTLINE*outline = font->getOutline(encoding[s]);
  75             if(outline && outline->link)
  76                 num++;
  77         }
  78     }
  79
  80     wfont->maxascii = encodingsize;
  81     wfont->numchars = num;
  82     wfont->flags = /*layout*/0x80 + /*bold*/0?0:1 + /*italic*/(angle>0.05)?2:0;
  83     wfont->glyph = (SWFGLYPH*)malloc(num*sizeof(SWFGLYPH));
  84     memset(wfont->glyph, 0, num*sizeof(SWFGLYPH));
  85     wfont->glyph2ascii = (U16*)malloc(num*sizeof(U16));
  86     memset(wfont->glyph2ascii, 0, num*sizeof(U16));
  87     wfont->ascii2glyph = (int*)malloc(encodingsize*sizeof(int));
  88     memset(wfont->ascii2glyph, -1, encodingsize*sizeof(int));
  89     wfont->layout->ascent = (U16)(underline - bbox.lly);
  90     wfont->layout->descent = (U16)(bbox.ury - underline);
  91     wfont->layout->leading = (U16)(wfont->layout->ascent -
  92                              wfont->layout->descent -
  93                              (bbox.lly - bbox.ury));
  94     wfont->layout->bounds = (SRECT*)malloc(sizeof(SRECT));
  95     wfont->layout->bounds->xmin = bbox.llx;
  96     wfont->layout->bounds->ymin = bbox.lly;
  97     wfont->layout->bounds->xmax = bbox.urx;
  98     wfont->layout->bounds->ymax = bbox.ury;
  99     wfont->layout->kerningcount = 0;
 100     wfont->layout->kerning = 0;
 101
 102     num = 0;
 103     for(s=0;s<encodingsize;s++)
 104     {
 105         if(encoding[s]) {
 106             T1_OUTLINE*outline = font->getOutline(encoding[s]);
 107             if(outline && outline->link) {
 108                 wfont->ascii2glyph[s] = num;
 109                 wfont->glyph2ascii[num] = s;
 110                 swf_ShapeNew(&wfont->glyph[num].shape);
 111                 SHAPE*shape = wfont->glyph[num].shape;
 112                 wfont->glyph[num].advance = font->getCharWidth(num)/8;
 113
 114                 TAG*tag = swf_InsertTag(0,ST_DEFINESHAPE);
 115
 116                 swfmatrix m;
 117                 m.m11 = 1;
 118                 m.m22 = 1;
 119                 m.m21 = 0;
 120                 m.m12 = 0;
 121                 m.m13 = 0;
 122                 m.m23 = 0;
 123
 124                 swf_SetU8(tag,0);
 125
 126                 shape->bits.fill = 1;
 127                 shape->bits.line = 0;
 128                 swf_ShapeSetStyle(tag,shape,0,1,0);
 129                 drawpath(tag, outline, &m);
 130                 swf_ShapeSetEnd(tag);
 131
 132                 wfont->glyph[num].shape->data = &tag->data[1];
 133                 int t;
 134                 for(t=0;t<8;t++)
 135                     if(tag->writeBit == (0x80>>t)) break;
 136                 if(tag->writeBit == 0)
 137                     t = 8;
 138                 wfont->glyph[num].shape->bitlen = (tag->len-1)*8;
 139                 num++;
 140             }
 141         }
 142     }
 143     return wfont;
 144 }
 145
 146 int main(int argc, char ** argv)
 147 {
 148   //TODO: use tempnam here. Check if environment already contains a
 149   //T1LIB_CONFIG.
 150   putenv( "T1LIB_CONFIG=/tmp/t1lib.config.tmp");
 151   FILE*fi = fopen("/tmp/t1lib.config.tmp", "wb");
 152   fprintf(fi, "FONTDATABASE=%s/FontDataBase\n", DATADIR);
 153   fprintf(fi, "ENCODING=%s:.\n", DATADIR);
 154   fprintf(fi, "AFM=%s:.\n", DATADIR);
 155   fprintf(fi, "TYPE1=%s:.\n", DATADIR);
 156   fclose(fi);
 157   /* initialize t1lib */
 158   T1_SetBitmapPad( 16);
 159   if ((T1_InitLib(NO_LOGFILE)==NULL)){
 160       fprintf(stderr, "Initialization of t1lib failed\n");
 161       exit(1);
 162   }
 163   unlink("/tmp/t1lib.config.tmp");
 164
 165   int i,num;
 166   for( i=0; i<T1_Get_no_fonts(); i++)
 167 //      i = 0;
 168   {
 169     SWFFONT * font = t1font2swffont(i);
 170
 171     char filename[128];
 172     sprintf(filename, "%s.swf", font->name);
 173     swf_WriteFont(font, filename);
 174     free(font);
 175   }
 176 }
 177