remamed swf_FontExtractDefineTextCallback to swf_ParseDefineText.
[swftools.git] / lib / modules / swftext.c
index 433dc81..671c99d 100644 (file)
@@ -6,6 +6,7 @@
    Part of the swftools package.
 
    Copyright (c) 2001 Rainer Böhme <rfxswf@reflex-studio.de>
+   Copyright (c) 2003,2004 Matthias Kramm
  
    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
@@ -56,22 +57,26 @@ int swf_FontEnumerate(SWF * swf,void (*FontCallback) (U16,U8*))
   n = 0;
 
   while (t)
-  { if (swf_GetTagID(t)==ST_DEFINEFONTINFO || swf_GetTagID(t)==ST_DEFINEFONTINFO2 ||
-         swf_GetTagID(t)==ST_DEFINEFONT2)
+  { 
+    if (swf_GetTagID(t)==ST_DEFINEFONT2 || swf_GetTagID(t)==ST_DEFINEFONT)
     { n++;
       if (FontCallback)
       { U16 id;
         int l;
         U8 s[257];
+       s[0] = 0;
         swf_SaveTagPos(t);
         swf_SetTagPos(t,0);
        
         id  = swf_GetU16(t);
-       if(swf_GetTagID(t) == ST_DEFINEFONT2)
+       if(swf_GetTagID(t) == ST_DEFINEFONT2 ||
+          swf_GetTagID(t) == ST_DEFINEFONTINFO ||
+          swf_GetTagID(t) == ST_DEFINEFONTINFO2) {
            swf_GetU16(t);
-        l   = swf_GetU8(t);
-        swf_GetBlock(t,s,l);
-        s[l] = 0;
+           l = swf_GetU8(t);
+            swf_GetBlock(t,s,l);
+            s[l] = 0;
+       }
 
         (FontCallback)(id,s); 
       
@@ -174,6 +179,31 @@ int swf_FontExtract_DefineFontInfo(int id,SWFFONT * f,TAG * t)
   return id;
 }
 
+int swf_FontExtract_GlyphNames(int id,SWFFONT * f,TAG * tag)
+{ 
+    U16 fid;
+    U16 maxcode;
+    U8 flags;
+    swf_SaveTagPos(tag);
+    swf_SetTagPos(tag,0);
+
+    fid = swf_GetU16(tag);
+
+    if (fid==id)
+    { 
+        int num = swf_GetU16(tag);
+       int t;
+       f->glyphnames = malloc(sizeof(char*)*num);
+       for(t=0;t<num;t++) {
+           f->glyphnames[t] = strdup(swf_GetString(tag));
+       }
+    }
+
+    swf_RestoreTagPos(tag);
+    return id;
+}
+
+
 int swf_FontExtract_DefineFont2(int id,SWFFONT * font,TAG * tag)
 {
     int t, glyphcount;
@@ -297,15 +327,18 @@ int swf_FontExtract_DefineFont2(int id,SWFFONT * font,TAG * tag)
 #define FEDTJ_MODIFY 0x02
 #define FEDTJ_CALLBACK 0x04
 
-int swf_FontExtract_DefineTextCallback(int id,SWFFONT * f,TAG * t,int jobs, 
-       void(*callback)(int*chars, int nr, int fontid))
+static int swf_FontExtract_DefineTextCallback(int id,SWFFONT * f,TAG * t,int jobs, 
+       void(*callback)(void*self, int*chars, int*ypos, int nr, int fontid, int fontsize, int xstart, int ystart, RGBA* color), void*self)
 { U16    cid;
   SRECT  r;
   MATRIX m;
-  U8     gbits, abits, flags;
-  int    fid;
+  U8     gbits, abits;
+  int    fid=0;
+  RGBA  color;
+  int   x=0,y=0;
+  int   fontsize=0;
 
-  fid = 0;
+  memset(&color, 0, sizeof(color));
 
   swf_SaveTagPos(t);
   swf_SetTagPos(t,0);
@@ -316,53 +349,77 @@ int swf_FontExtract_DefineTextCallback(int id,SWFFONT * f,TAG * t,int jobs,
   gbits = swf_GetU8(t);
   abits = swf_GetU8(t);
 
-  flags = swf_GetU8(t);
+  while(1)
+  { 
+    int flags,num;
+    flags = swf_GetU8(t);
+    if(!flags)
+       break;
   
-  while(flags)
-  { if (flags&TF_TEXTCONTROL)
+    if (flags&TF_TEXTCONTROL)
     { if (flags&TF_HASFONT) fid = swf_GetU16(t);
       if (flags&TF_HASCOLOR)
-      { swf_GetU8(t); // rgb
-        swf_GetU8(t);
-        swf_GetU8(t);
-        if (swf_GetTagID(t)==ST_DEFINETEXT2) swf_GetU8(t);
+      { color.r = swf_GetU8(t); // rgb
+        color.g = swf_GetU8(t);
+        color.b = swf_GetU8(t);
+        if (swf_GetTagID(t)==ST_DEFINETEXT2) color.a = swf_GetU8(t);
       }
-      if (flags&TF_HASXOFFSET) swf_GetS16(t);
-      if (flags&TF_HASYOFFSET) swf_GetS16(t);
-      if (flags&TF_HASFONT) swf_GetU16(t);
+      if (flags&TF_HASXOFFSET) x = swf_GetS16(t);
+      if (flags&TF_HASYOFFSET) y = swf_GetS16(t);
+      if (flags&TF_HASFONT) fontsize = swf_GetU16(t);
     }
-    else
+
+    num = swf_GetU8(t);
+    if(!num)
+       break;
+
     { int i;
       int buf[256];
-      for (i=0;i<flags;i++)
+      int advance[256];
+      int xpos = 0;
+      for (i=0;i<num;i++)
       { int glyph;
-        int adv;
+        int adv = 0;
+       advance[i] = xpos;
         glyph = swf_GetBits(t,gbits);
         adv = swf_GetBits(t,abits);
-        if (id==fid)                    // mitlesen ?
+       xpos+=adv;
+       
+       // <deprectated>
+       if (id==fid) {
           if (jobs&FEDTJ_PRINT) {
-           { int code = f->glyph2ascii[glyph];
+             int code = f->glyph2ascii[glyph];
              printf("%c",code);
          }
           if (jobs&FEDTJ_MODIFY)
-            /*if (!f->glyph[code].advance)*/ f->glyph[glyph].advance = adv;
-        }
+           f->glyph[glyph].advance = adv;
+        } else {
+            if (jobs&FEDTJ_PRINT) {
+               printf("?");
+           }
+       }
+       // </deprectated>
+
        buf[i] = glyph;
       }
       if ((id==fid)&&(jobs&FEDTJ_PRINT)) printf("\n");
       if (jobs&FEDTJ_CALLBACK)
-         callback(buf, flags, fid);
+         callback(self, buf, advance, num, fid, fontsize, x, y, &color);
+      x += xpos;
     }
-    flags = swf_GetU8(t);
   }
   
   swf_RestoreTagPos(t);
   return id;
 }  
+int swf_ParseDefineText(TAG * tag, void(*callback)(void*self, int*chars, int*ypos, int nr, int fontid, int fontsize, int xstart, int ystart, RGBA* color), void*self)
+{
+    return swf_FontExtract_DefineTextCallback(-1, 0, tag, FEDTJ_CALLBACK, callback, self);
+}
 
 int swf_FontExtract_DefineText(int id,SWFFONT * f,TAG * t,int jobs)
 {
-    return swf_FontExtract_DefineTextCallback(id,f,t,jobs,0);
+    return swf_FontExtract_DefineTextCallback(id,f,t,jobs,0,0);
 }
 
 int swf_FontExtract(SWF * swf,int id,SWFFONT * * font)
@@ -396,6 +453,10 @@ int swf_FontExtract(SWF * swf,int id,SWFFONT * * font)
       case ST_DEFINETEXT2:
         nid = swf_FontExtract_DefineText(id,f,t,f->layout?0:FEDTJ_MODIFY);
         break;
+      
+      case ST_GLYPHNAMES:
+        nid = swf_FontExtract_GlyphNames(id,f,t);
+        break;
     }
     if (nid>0) id = nid;
     t = swf_NextTag(t);
@@ -417,7 +478,7 @@ int swf_FontReduce(SWFFONT * f,FONTUSAGE * use)
   j = 0;
   for (i=0;i<f->numchars;i++)
     if (f->glyph[i].shape)
-    { if (f->glyph2ascii[i]<MAX_CHAR_PER_FONT && 
+    { if (f->glyph2ascii[i]<f->numchars&& 
            use->code[f->glyph2ascii[i]])
       { f->ascii2glyph[f->glyph2ascii[i]] = j;
         f->glyph2ascii[j] = f->glyph2ascii[i];
@@ -438,12 +499,18 @@ int swf_FontReduce(SWFFONT * f,FONTUSAGE * use)
   return j;
 }
 
-int swf_FontInitUsage(FONTUSAGE * use)
+int swf_FontInitUsage(SWFFONT* f, FONTUSAGE * use)
 { if (!use) return -1;
-  memset(use->code,0,sizeof(use->code[0])*MAX_CHAR_PER_FONT);
+  use->code = malloc(sizeof(use->code[0])*f->numchars);
+  memset(use->code,0,sizeof(use->code[0])*f->numchars);
   return 0;
 }
 
+void swf_FontClearUsage(SWFFONT* f, FONTUSAGE * use)
+{ if (!use) return;
+  free(use->code);
+}
+
 int swf_FontUse(FONTUSAGE * use,U8 * s)
 { if ((!use)||(!s)) return -1;
   while (s[0])
@@ -483,6 +550,17 @@ int swf_FontSetDefine(TAG * t,SWFFONT * f)
   return 0;
 }
 
+static inline int fontSize(SWFFONT*font)
+{
+    int t;
+    int size = 0;
+    for(t=0;t<font->numchars;t++) {
+       int l = (font->glyph[t].shape->bitlen+7)/8;
+       size += l+1;
+    }
+    return size + (font->numchars+1)*2;
+}
+
 int swf_FontSetDefine2(TAG *tag, SWFFONT * f)
 {
     U8 flags = 0;
@@ -490,6 +568,7 @@ int swf_FontSetDefine2(TAG *tag, SWFFONT * f)
     int pos;
     int pos2;
     swf_SetU16(tag, f->id);
+
     if(f->layout) 
        flags |= 128; // haslayout
     if(f->numchars>256)
@@ -498,7 +577,12 @@ int swf_FontSetDefine2(TAG *tag, SWFFONT * f)
        flags |= 1; // bold
     if(f->style & FONT_STYLE_ITALIC)
        flags |= 2; // italic
-    /* wideoffs 8 */
+    if(f->maxascii>=256)
+       flags |= 4; //wide codecs
+    if(fontSize(f)>65535)
+       flags |= 8; //wide offsets
+    flags |= 8; //FIXME: the above check doesn't work
+
     if(f->encoding & FONT_ENCODING_ANSI)
        flags |= 16; // ansi
     if(f->encoding & FONT_ENCODING_UNICODE)
@@ -520,25 +604,38 @@ int swf_FontSetDefine2(TAG *tag, SWFFONT * f)
     swf_SetU16(tag, f->numchars);
     /* font offset table */
     pos = tag->len;
-    for(t=0;t<f->numchars;t++)
+    for(t=0;t<=f->numchars;t++)
     {
-       swf_SetU16(tag, /* fontoffset */ 0); /*placeholder*/
+       if(flags&8)
+           swf_SetU32(tag, /* fontoffset */ 0); /*placeholder*/
+       else
+           swf_SetU16(tag, /* fontoffset */ 0); /*placeholder*/
     }
-    pos2 = tag->len;
-    swf_SetU16(tag, 0); //fontcode-fontoffset
-    for(t=0;t<f->numchars;t++) {
-       tag->data[pos + t*2] = (tag->len-pos);
-       tag->data[pos + t*2 + 1] = (tag->len-pos) >> 8;
-       swf_SetSimpleShape(tag, f->glyph[t].shape);
+
+    for(t=0;t<=f->numchars;t++) {
+       if(flags&8) {
+           tag->data[pos + t*4    ] = (tag->len-pos);
+           tag->data[pos + t*4 + 1] = (tag->len-pos) >> 8;
+           tag->data[pos + t*4 + 2] = (tag->len-pos) >> 16;
+           tag->data[pos + t*4 + 3] = (tag->len-pos) >> 24;
+       } else {
+           if(tag->len - pos > 65535) {
+               fprintf(stderr, "Internal error: Font too big and WideOffsets flag not set\n");
+               exit(1);
+           }
+           tag->data[pos + t*2    ] = (tag->len-pos);
+           tag->data[pos + t*2 + 1] = (tag->len-pos) >> 8;
+       }
+       if(t<f->numchars)
+           swf_SetSimpleShape(tag, f->glyph[t].shape);
     }
 
-    tag->data[pos2] = tag->len - pos;
-    tag->data[pos2 + 1] = (tag->len - pos) >> 8;
     
     /* font code table */
     if(flags & 4) /* wide codes */ {
-       for(t=0;t<f->numchars;t++)
+       for(t=0;t<f->numchars;t++) {
            swf_SetU16(tag,f->glyph2ascii[t]);
+       }
     } else {
        for(t=0;t<f->numchars;t++)
            swf_SetU8(tag,f->glyph2ascii[t]);
@@ -557,11 +654,11 @@ int swf_FontSetDefine2(TAG *tag, SWFFONT * f)
        swf_SetU16(tag, f->layout->kerningcount);
        for(t=0;t<f->layout->kerningcount;t++) {
            if(flags & 4) /* wide codes */ {
-               swf_SetU8(tag,f->layout->kerning[t].char1);
-               swf_SetU8(tag,f->layout->kerning[t].char2);
-           } else {
                swf_SetU16(tag,f->layout->kerning[t].char1);
                swf_SetU16(tag,f->layout->kerning[t].char2);
+           } else {
+               swf_SetU8(tag,f->layout->kerning[t].char1);
+               swf_SetU8(tag,f->layout->kerning[t].char2);
            }
            swf_SetU16(tag,f->layout->kerning[t].adjustment);
        }
@@ -661,6 +758,13 @@ void swf_FontFree(SWFFONT * f)
       free(f->glyph2ascii);
       f->glyph2ascii = NULL;
     }
+    if(f->glyphnames) {
+      int t;
+      for(t=0;t<f->numchars;t++) {
+       free(f->glyphnames[t]);
+      }
+      free(f->glyphnames);
+    }
   }
   free(f);
 }
@@ -783,6 +887,7 @@ void swf_WriteFont(SWFFONT*font, char* filename)
   RGBA rgb;
   int f;
   int useDefineFont2 = 0;
+  int storeGlyphNames = 1;
 
   if(font->layout)
       useDefineFont2 = 1; /* the only thing new in definefont2 
@@ -804,8 +909,8 @@ void swf_WriteFont(SWFFONT*font, char* filename)
      did use definefont2 -mk*/
   t = swf_InsertTag(NULL,ST_SETBACKGROUNDCOLOR);
   swf.firstTag = t;
-       rgb.r = 0xff;
-       rgb.g = 0xff;
+       rgb.r = 0xef;
+       rgb.g = 0xef;
        rgb.b = 0xff;
        swf_SetRGB(t,&rgb);
   if(!useDefineFont2) {
@@ -818,24 +923,46 @@ void swf_WriteFont(SWFFONT*font, char* filename)
     swf_FontSetDefine2(t,font);
   }
 
-  if(1) //useDefineFont2
-  {     int textscale = 400;
+  if(storeGlyphNames && font->glyphnames)
+  {
+    int c;
+    t = swf_InsertTag(t,ST_GLYPHNAMES);
+    swf_SetU16(t, font->id);
+    swf_SetU16(t, font->numchars);
+    for(c=0;c<font->numchars;c++) {
+       swf_SetString(t, font->glyphnames[c]);
+    }
+  }
+
+  if(1) //neccessary only for df1, but pretty to look at anyhow, so do it always
+  {
+        int textscale = 400;
        int s;
        int xmax = 0;
-       int ymax = textscale * 2 * (font->maxascii/16+1);
+       int ymax = 0;
+       int ypos = 1;
        U8 gbits,abits;
-       U8 text[MAX_CHAR_PER_FONT+1];
-       int x,y;
-       text[MAX_CHAR_PER_FONT]=0;
+       int x,y,c;
+       
+       c=0;
        for(s=0;s<font->maxascii;s++)
        {
            int g = font->ascii2glyph[s];
-           text[s] = s;
            if(g>=0) {
-              if(font->glyph[g].advance*textscale/64 > xmax)
+              if(font->glyph[g].advance*textscale/64 > xmax) {
                   xmax = font->glyph[g].advance*textscale/64;
+              }
+              c++;
+           }
+           if((s&15)==0) {
+               if(c) {
+                   ypos++;
+               }
+               c=0;
            }
        }
+       ymax = ypos*textscale*2;
+
        swf.movieSize.xmax = xmax*20;
        swf.movieSize.ymax = ymax;
 
@@ -845,7 +972,7 @@ void swf_WriteFont(SWFFONT*font, char* filename)
 
            r.xmin = 0;
            r.ymin = 0;
-           r.xmax = swf.movieSize.xmax*20;
+           r.xmax = swf.movieSize.xmax;
            r.ymax = swf.movieSize.ymax;
            
            swf_SetRect(t,&r);
@@ -861,10 +988,10 @@ void swf_WriteFont(SWFFONT*font, char* filename)
            rgb.r = 0x00;
            rgb.g = 0x00;
            rgb.b = 0x00;
-           for(y=0;y<=((font->maxascii-1)/16);y++)
+           ypos = 1;
+           for(y=0;y<((font->maxascii+15)/16);y++)
            {
                int c=0,lastx=-1;
-               /* TODO: firstx?? */
                for(x=0;x<16;x++) {
                    int g = (y*16+x<font->maxascii)?font->ascii2glyph[y*16+x]:-1;
                    if(g>=0 && font->glyph[g].shape) {
@@ -874,7 +1001,7 @@ void swf_WriteFont(SWFFONT*font, char* filename)
                    }
                }
                if(c) {
-                 swf_TextSetInfoRecord(t,font,textscale,&rgb,lastx+1,textscale*y*2);
+                 swf_TextSetInfoRecord(t,font,textscale,&rgb,lastx+1,textscale*ypos*2);
                  for(x=0;x<16;x++)
                  {
                      int g = (y*16+x<font->maxascii)?font->ascii2glyph[y*16+x]:-1;
@@ -889,6 +1016,7 @@ void swf_WriteFont(SWFFONT*font, char* filename)
                        swf_ResetWriteBits(t);
                      }
                  }
+                 ypos++;
                } 
            }
            swf_SetU8(t,0);
@@ -899,6 +1027,7 @@ void swf_WriteFont(SWFFONT*font, char* filename)
             swf_ObjectPlace(t,font->id+1,1,NULL,NULL,NULL);
      
         t = swf_InsertTag(t,ST_SHOWFRAME);
+
   }
   
   t = swf_InsertTag(t,ST_END);
@@ -1092,36 +1221,37 @@ static U32 readUTF8char(char**text)
     return *((*text)++);
 }
 
-void swf_DrawText(SWFSHAPEDRAWER*draw, SWFFONT*font, char*text)
+void swf_DrawText(drawer_t*draw, SWFFONT*font, char*text)
 {
     char*s = text;
     int advance = 0;
     while(*s) {
        SHAPE*shape;
        SHAPE2*shape2;
+       SHAPELINE*l;
        U32 c = readUTF8char(&s);
        int g = font->ascii2glyph[c];
        shape = font->glyph[g].shape;
        shape2 = swf_ShapeToShape2(shape);
-       SHAPELINE*l = shape2->lines;
+       l = shape2->lines;
        while(l) {
            if(l->type == moveTo) {
                FPOINT to;
                to.x = l->x/20.0+advance;
                to.y = l->y/20.0;
-               swf_DrawerMoveTo(draw, &to);
+               draw->moveTo(draw, &to);
            } else if(l->type == lineTo) {
                FPOINT to;
                to.x = l->x/20.0+advance;
                to.y = l->y/20.0;
-               swf_DrawerLineTo(draw, &to);
+               draw->lineTo(draw, &to);
            } else if(l->type == splineTo) {
                FPOINT mid,to;
                mid.x = l->sx/20.0+advance;
                mid.y = l->sy/20.0;
                to.x = l->x/20.0+advance;
                to.y = l->y/20.0;
-               swf_DrawerSplineTo(draw, &mid, &to);
+               draw->splineTo(draw, &mid, &to);
            }
            l = l->next;
        }