gcc 2.95.4 fixes
[swftools.git] / lib / modules / swftext.c
index 10b04fc..8d61e04 100644 (file)
@@ -6,10 +6,21 @@
    Part of the swftools package.
 
    Copyright (c) 2001 Rainer Böhme <rfxswf@reflex-studio.de>
+   Copyright (c) 2003,2004 Matthias Kramm
  
-   This file is distributed under the GPL, see file COPYING for details 
+   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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
 
 #define TF_TEXTCONTROL  0x80
 #define TF_HASFONT      0x08
@@ -164,6 +175,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;
@@ -309,7 +345,11 @@ int swf_FontExtract_DefineTextCallback(int id,SWFFONT * f,TAG * t,int jobs,
   flags = swf_GetU8(t);
   
   while(flags)
-  { if (flags&TF_TEXTCONTROL)
+  { 
+    // FIXME: according to open-swf@macromedia.com, this is wrong.
+    // it should alternate textcontrol and text arrays, not
+    // rely on the high bit. (and length can be 0-255).
+    if (flags&TF_TEXTCONTROL)
     { if (flags&TF_HASFONT) fid = swf_GetU16(t);
       if (flags&TF_HASCOLOR)
       { swf_GetU8(t); // rgb
@@ -386,6 +426,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);
@@ -407,7 +451,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];
@@ -428,12 +472,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])
@@ -473,6 +523,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;
@@ -480,6 +541,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)
@@ -488,7 +550,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)
@@ -510,25 +577,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]);
@@ -547,11 +627,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);
        }
@@ -651,11 +731,18 @@ 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);
 }
 
-int swf_TextSetInfoRecord(TAG * t,SWFFONT * font,U16 size,RGBA * color,S16 dx,S16 dy)
+int swf_TextSetInfoRecord(TAG * t,SWFFONT * font,U16 size,RGBA * color,int dx,int dy)
 { U8 flags;
   if (!t) return -1;
 
@@ -685,7 +772,7 @@ int swf_TextCountBits(SWFFONT * font,U8 * s,int scale,U8 * gbits,U8 * abits)
     if(s[0] < font->maxascii)
        glyph = font->ascii2glyph[s[0]];
     if(glyph>=0) {
-       g = swf_CountBits(glyph,g);
+       g = swf_CountUBits(glyph,g);
        a = swf_CountBits((((U32)font->glyph[glyph].advance)*scale)/100,a);
     }
     s++;
@@ -773,6 +860,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 
@@ -794,8 +882,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) {
@@ -808,24 +896,46 @@ void swf_WriteFont(SWFFONT*font, char* filename)
     swf_FontSetDefine2(t,font);
   }
 
-  if(1) //useDefineFont2
-  {     int textscale = 400;
+  if(storeGlyphNames)
+  {
+    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;
 
@@ -835,7 +945,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);
@@ -851,10 +961,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) {
@@ -864,7 +974,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;
@@ -879,6 +989,7 @@ void swf_WriteFont(SWFFONT*font, char* filename)
                        swf_ResetWriteBits(t);
                      }
                  }
+                 ypos++;
                } 
            }
            swf_SetU8(t,0);
@@ -889,6 +1000,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);
@@ -1016,7 +1128,7 @@ void swf_FontCreateLayout(SWFFONT*f)
        if(!shape2) { 
            fprintf(stderr, "Shape parse error\n");exit(1);
        }
-       bbox = swf_GetShapeBoundingBox(shape2->lines);
+       bbox = swf_GetShapeBoundingBox(shape2);
        swf_Shape2Free(shape2);
        f->layout->bounds[t] = bbox;
        /* FIXME */
@@ -1038,4 +1150,87 @@ void swf_FontCreateLayout(SWFFONT*f)
     }
 }
        
+static U32 readUTF8char(char**text)
+{
+    U32 c = 0;
+    if(!(*(*text) & 0x80))
+       return *((*text)++);
+
+    /* 0000 0080-0000 07FF   110xxxxx 10xxxxxx */
+    if(((*text)[0] & 0xe0) == 0xc0 && (*text)[1])  
+    {
+       c = ((*text)[0] & 0x1f) << 6 | ((*text)[1] & 0x3f);
+       (*text) += 2;
+       return c;
+    }
+    /* 0000 0800-0000 FFFF   1110xxxx 10xxxxxx 10xxxxxx */
+    if(((*text)[0] & 0xf0) == 0xe0 && (*text)[1] && (*text)[2])
+    {
+       c = ((*text)[0] & 0x0f) << 12 | ((*text)[1] & 0x3f) << 6 | ((*text)[2] & 0x3f);
+       (*text) += 3;
+       return c;
+    }
+    /* 0001 0000-001F FFFF   11110xxx 10xxxxxx 10xxxxxx 10xxxxxx */
+    if(((*text)[0] & 0xf8) == 0xf0 && (*text)[1] && (*text)[2] && (*text)[3] )  
+    {
+       c = ((*text)[0] & 0x07) << 18 | ((*text)[1] & 0x3f) << 12 | ((*text)[2] & 0x3f)<<6 | ((*text)[3] & 0x3f);
+       (*text) += 4;
+       return c;
+    }
+    /* 0020 0000-03FF FFFF   111110xx 10xxxxxx 10xxxxxx 10xxxxxx 10xxxxxx */
+    if(((*text)[0] & 0xfc) == 0xf8 && (*text)[1] && (*text)[2] && (*text)[3] && (*text)[4])  
+    {
+       c = ((*text)[0] & 0x03) << 24 | ((*text)[1] & 0x3f) << 18 | ((*text)[2] & 0x3f)<<12 | ((*text)[3] & 0x3f) << 6 | ((*text)[4] & 0x3f);
+       (*text) += 5;
+       return c;
+    }
+    /* 0400 0000-7FFF FFFF   1111110x 10xxxxxx ... 10xxxxxx */
+    if(((*text)[0] & 0xfe) == 0xfc && (*text)[1] && (*text)[2] && (*text)[3] && (*text)[4] && (*text)[5])  
+    {
+       c = ((*text)[0] & 0x01) << 30 | ((*text)[1] & 0x3f) << 24 | ((*text)[2] & 0x3f)<<18 | ((*text)[3] & 0x3f) << 12 | ((*text)[4] & 0x3f) << 6  | ((*text)[5] & 0x3f) << 6;
+       (*text) += 6;
+       return c;
+    }
+    return *((*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);
+       l = shape2->lines;
+       while(l) {
+           if(l->type == moveTo) {
+               FPOINT to;
+               to.x = l->x/20.0+advance;
+               to.y = l->y/20.0;
+               draw->moveTo(draw, &to);
+           } else if(l->type == lineTo) {
+               FPOINT to;
+               to.x = l->x/20.0+advance;
+               to.y = l->y/20.0;
+               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;
+               draw->splineTo(draw, &mid, &to);
+           }
+           l = l->next;
+       }
+       swf_Shape2Free(shape2);
+       advance += font->glyph[g].advance;
+    }
+}
+