set FONT_INTERNAL_SIZE to 4.
[swftools.git] / pdf2swf / swfoutput.cc
index dc84be2..3511eee 100644 (file)
@@ -47,6 +47,8 @@ int insertstoptag=0;
 int flashversion=5;
 int splinemaxerror=1;
 int fontsplinemaxerror=1;
+int filloverlap=0;
+float minlinewidth=0.05;
 
 static char storefont = 0;
 static int flag_protected = 0;
@@ -62,6 +64,7 @@ static TAG *tag;
 static int currentswfid = 0;
 static int depth = 1;
 static int startdepth = 1;
+static int linewidth = 0;
 
 static SHAPE* shape;
 static int shapeid = -1;
@@ -86,9 +89,12 @@ int CHARMIDY = 0;
 
 char fillstylechanged = 0;
 
+int bboxrectpos = -1;
+SRECT bboxrect;
+
 static void startshape(struct swfoutput* obj);
 static void starttext(struct swfoutput* obj);
-static void endshape();
+static void endshape(struct swfoutput* obj,int clip);
 static void endtext(struct swfoutput* obj);
 
 // matrix multiplication. changes p0
@@ -115,6 +121,24 @@ static int moveto(TAG*tag, plotxy p0)
     }
     return 0;
 }
+static int moveto(TAG*tag, float x, float y)
+{
+    plotxy p;
+    p.x = x;
+    p.y = y;
+    return moveto(tag, p);
+}
+static void addPointToBBox(int px, int py) 
+{
+    SPOINT p;
+    p.x = px;
+    p.y = py;
+    if(fill) {
+       swf_ExpandRect(&bboxrect, p);
+    } else {
+       swf_ExpandRect3(&bboxrect, p, linewidth*3/2);
+    }
+}
 
 // write a line-to command into the swf
 static void lineto(TAG*tag, plotxy p0)
@@ -127,17 +151,28 @@ static void lineto(TAG*tag, plotxy p0)
        are plots */
     swf_ShapeSetLine (tag, shape, rx,ry);
 
-    //swf_ExpandRect3(boundingBox, px, py, linewidth);
-    //swf_ExpandRect3(boundingBox, swflastx, swflasty, linewidth);
+    addPointToBBox(swflastx,swflasty);
+    addPointToBBox(px,py);
 
     shapeisempty = 0;
     swflastx+=rx;
     swflasty+=ry;
 }
+static void lineto(TAG*tag, double x, double y)
+{
+    plotxy p;
+    p.x = x;
+    p.y = y;
+    lineto(tag, p);
+}
+
 
 // write a spline-to command into the swf
 static void splineto(TAG*tag, plotxy control,plotxy end)
 {
+    int lastlastx = swflastx;
+    int lastlasty = swflasty;
+
     int cx = ((int)(control.x*20)-swflastx);
     int cy = ((int)(control.y*20)-swflasty);
     swflastx += cx;
@@ -146,8 +181,13 @@ static void splineto(TAG*tag, plotxy control,plotxy end)
     int ey = ((int)(end.y*20)-swflasty);
     swflastx += ex;
     swflasty += ey;
-    if(cx || cy || ex || ey)
+    
+    if(cx || cy || ex || ey) {
        swf_ShapeSetCurve(tag, shape, cx,cy,ex,ey);
+       addPointToBBox(lastlastx   ,lastlasty   );
+       addPointToBBox(lastlastx+cx,lastlasty+cy);
+       addPointToBBox(lastlastx+cx+ex,lastlasty+cy+ey);
+    }
     shapeisempty = 0;
 }
 
@@ -240,13 +280,14 @@ void drawpath(struct swfoutput*output, SWF_OUTLINE*outline, struct swfmatrix*m,
         y += (outline->dest.y/(float)0xffff);
         if(outline->type == SWF_PATHTYPE_MOVE)
         {
-           if(!init && fill && output->drawmode != DRAWMODE_EOFILL && !ignoredraworder) {
+           //if(!init && fill && output->drawmode != DRAWMODE_EOFILL && !ignoredraworder) {
+           if(filloverlap && !init && fill && output->drawmode != DRAWMODE_EOFILL) {
                /* drawmode=FILL (not EOFILL) means that
                   seperate shapes do not cancel each other out.
                   On SWF side, we need to start a new shape for each
                   closed polygon, because SWF only knows EOFILL.
                */
-               endshape();
+               endshape(output,0);
                startshape(output);
                startFill();
            }
@@ -471,7 +512,7 @@ void drawShortPathWithEnds(struct swfoutput*output, double x, double y, struct s
     int back = 0;
 
     if(line_cap == LINE_CAP_BUTT || line_cap == LINE_CAP_SQUARE) {
-       endshape();
+       endshape(output,0);
        startshape(output);
        SWF_OUTLINE *last, *tmp=outline;
        plotxy s,e,p0,p1,p2,p3,m0,m1,m2,m3;
@@ -517,6 +558,7 @@ void drawShortPathWithEnds(struct swfoutput*output, double x, double y, struct s
        for(nr=0;nr<2;nr++) {
            int dir=0;
            struct plotxy q0,q1,q2,q3,q4,q5;
+
            startFill();
            if(line_cap == LINE_CAP_BUTT) {
                if(dir) {
@@ -549,11 +591,7 @@ void drawShortPathWithEnds(struct swfoutput*output, double x, double y, struct s
 
            if(line_cap == LINE_CAP_BUTT) {
                lineto(tag, q0);
-               swf_ShapeSetEnd(tag);
-               tag = swf_InsertTag(tag, ST_PLACEOBJECT2);
-               swf_ObjectPlaceClip(tag,shapeid,depth,NULL,NULL,NULL,depth+2-nr);
-               depth++;
-               shapeid = -1;
+               endshape(output, depth+2-nr);
                startshape(output);
            }
            p0 = m0;
@@ -568,7 +606,7 @@ void drawShortPathWithEnds(struct swfoutput*output, double x, double y, struct s
     drawShortPath(output,x,y,m,outline);
 
     if(line_cap == LINE_CAP_BUTT) {
-       endshape();
+       endshape(output,0);
        startshape(output);
     }
 }
@@ -630,7 +668,7 @@ void drawShortPathWithStraightEnds(struct swfoutput*output, double x, double y,
               need to draw) are very likely to overlap. To avoid that
               they cancel each other out at the end points, start a new
               shape for the second one */
-           endshape();startshape(output);
+           endshape(output,0);startshape(output);
            startFill();
        }
 
@@ -737,7 +775,7 @@ static inline int colorcompare(RGBA*a,RGBA*b)
 static const int CHARDATAMAX = 8192;
 struct chardata {
     int charid;
-    int fontid;
+    int fontid; /* TODO: use a SWFFONT instead */
     int x;
     int y;
     int size;
@@ -963,8 +1001,10 @@ struct fontlist_t
     fontlist_t*next;
 } *fontlist = 0;
 
-/* todo: why don't higher values (64, 1024) work here? */
-#define FONT_INTERNAL_SIZE 1
+/* Notice: we can only put chars in the range -1639,1638 (-32768/20,32768/20).
+   So if we set this value to high, the char coordinates will overflow.
+   If we set it to low, however, the char positions will be inaccurate */
+#define FONT_INTERNAL_SIZE 4
 
 /* process a character. */
 static int drawchar(struct swfoutput*obj, SWFFONT *swffont, char*character, int charnr, int u, swfmatrix*m)
@@ -983,7 +1023,7 @@ static int drawchar(struct swfoutput*obj, SWFFONT *swffont, char*character, int
     }
 
     if(shapeid>=0)
-       endshape();
+       endshape(obj,0);
     if(textid<0)
        starttext(obj);
 
@@ -1071,7 +1111,7 @@ void swfoutput_drawpath(swfoutput*output, SWF_OUTLINE*outline,
        so we better start a new shape here if the polygon is filled
      */
     if(shapeid>=0 && fill && !ignoredraworder) {
-       endshape();
+       endshape(output,0);
     }
 
     if(shapeid<0)
@@ -1090,7 +1130,7 @@ void swfoutput_drawpath2poly(struct swfoutput*output, SWF_OUTLINE*outline, struc
     if(textid>=0)
         endtext(output);
     if(shapeid>=0)
-       endshape();
+       endshape(output,0);
     assert(shapeid<0);
     startshape(output);
     stopFill();
@@ -1127,12 +1167,14 @@ int getCharID(SWFFONT *font, int charnr, char *charname, int u)
        return charnr;
     }
 
-    /* the following is technically wrong, and only works if the font encoding
-       is US-ASCII based. It's needed for fonts which return broken unicode
-       indices */
-/*    if(charnr>=0 && charnr<font->maxascii && font->ascii2glyph[charnr]>=0) {
-       return font->ascii2glyph[charnr];
-    }*/
+    if(font->encoding != FONT_ENCODING_UNICODE) {
+       /* the following only works if the font encoding
+          is US-ASCII based. It's needed for fonts which return broken unicode
+          indices */
+       if(charnr>=0 && charnr<font->maxascii && font->ascii2glyph[charnr]>=0) {
+           return font->ascii2glyph[charnr];
+       }
+    }
 
     return -1;
 }
@@ -1196,6 +1238,11 @@ void swfoutput_setfont(struct swfoutput*obj, char*fontid, char*filename)
                    swffont->layout->bounds[iii].xmax/20.0,
                    swffont->layout->bounds[iii].ymax/20.0
                    );
+           int t;
+           for(t=0;t<swffont->maxascii;t++) {
+               if(swffont->ascii2glyph[t] == iii)
+                   msg("<debug> | - maps to %d",t);
+           }
        }
     }
 
@@ -1346,7 +1393,7 @@ static void startshape(struct swfoutput*obj)
   tag = swf_InsertTag(tag,ST_DEFINESHAPE);
 
   swf_ShapeNew(&shape);
-  linestyleid = swf_ShapeAddLineStyle(shape,obj->linewidth,&obj->strokergb);
+  linestyleid = swf_ShapeAddLineStyle(shape,linewidth,&obj->strokergb);
   rgb.r = obj->fillrgb.r;
   rgb.g = obj->fillrgb.g;
   rgb.b = obj->fillrgb.b;
@@ -1355,18 +1402,20 @@ static void startshape(struct swfoutput*obj)
   shapeid = ++currentswfid;
   swf_SetU16(tag,shapeid);  // ID
 
-  /* TODO: patch back */
+  bboxrectpos = tag->len;
   r.xmin = 0;
   r.ymin = 0;
   r.xmax = 20*sizex;
   r.ymax = 20*sizey;
-  
   swf_SetRect(tag,&r);
+  memset(&bboxrect, 0, sizeof(bboxrect));
 
   swf_SetShapeStyles(tag,shape);
   swf_ShapeCountBits(shape,NULL,NULL);
   swf_SetShapeBits(tag,shape);
 
+  /* TODO: do we really need this? */
   swf_ShapeSetAll(tag,shape,/*x*/0,/*y*/0,linestyleid,0,0);
   swflastx=swflasty=0;
   lastwasfill = 0;
@@ -1376,36 +1425,119 @@ static void startshape(struct swfoutput*obj)
 static void starttext(struct swfoutput*obj)
 {
   if(shapeid>=0)
-      endshape();
+      endshape(obj,0);
     
   textid = ++currentswfid;
 
   swflastx=swflasty=0;
 }
+           
+
+/* TODO: move to ../lib/rfxswf */
+void changeRect(TAG*tag, int pos, SRECT*newrect)
+{
+    /* determine length of old rect */
+    tag->pos = pos;
+    tag->readBit = 0;
+    SRECT old;
+    swf_GetRect(tag, &old);
+    swf_ResetReadBits(tag);
+    int pos_end = tag->pos;
+
+    int len = tag->len - pos_end;
+    U8*data = (U8*)malloc(len);
+    memcpy(data, &tag->data[pos_end], len);
+    tag->writeBit = 0;
+    tag->len = pos;
+    swf_SetRect(tag, newrect);
+    swf_SetBlock(tag, data, len);
+    free(data);
+    tag->pos = tag->readBit = 0;
+}
+
+void cancelshape(swfoutput*obj)
+{
+    /* delete old shape tag */
+    TAG*todel = tag;
+    tag = tag->prev;
+    swf_DeleteTag(todel);
+    shapeid = -1;
+    bboxrectpos = -1;
+}
+
+void fixAreas(swfoutput*obj)
+{
+    if(!shapeisempty && fill &&
+       (bboxrect.xmin == bboxrect.xmax ||
+        bboxrect.ymin == bboxrect.ymax) &&
+        minlinewidth >= 0.001
+       ) {
+       msg("<debug> Shape has size 0: width=%.2f height=%.2f",
+               (bboxrect.xmax-bboxrect.xmin)/20.0,
+               (bboxrect.ymax-bboxrect.ymin)/20.0
+               );
+    
+       SRECT r = bboxrect;
+       
+       if(r.xmin == r.xmax && r.ymin == r.ymax) {
+           /* this thing comes down to a single dot- nothing to fix here */
+           return;
+       }
+
+       cancelshape(obj);
+
+       RGBA save_col = obj->strokergb;
+       int  save_width = linewidth;
+
+       obj->strokergb = obj->fillrgb;
+       linewidth = (int)(minlinewidth*20);
+       if(linewidth==0) linewidth = 1;
+       
+       startshape(obj);
+
+       moveto(tag, r.xmin/20.0,r.ymin/20.0);
+       lineto(tag, r.xmax/20.0,r.ymax/20.0);
+
+       obj->strokergb = save_col;
+       linewidth = save_width;
+    }
+    
+}
 
-static void endshape()
+static void endshape(swfoutput*obj, int clipdepth)
 {
     if(shapeid<0) 
         return;
+
+    if(!clipdepth)
+       fixAreas(obj);
+       
+    if(shapeisempty ||
+       (bboxrect.xmin == bboxrect.xmax && bboxrect.ymin == bboxrect.ymax)) 
+    {
+       // delete the shape again, we didn't do anything
+       cancelshape(obj);
+       return;
+    }
+    
     swf_ShapeSetEnd(tag);
 
-    if(shapeisempty) {
-       // delete the tag again, we didn't do anything
-       TAG*todel = tag;
-       tag = tag->prev;
-       swf_DeleteTag(todel);
-    } else {
-       /* TODO: fix bounding box */
-       tag = swf_InsertTag(tag,ST_PLACEOBJECT2);
+    changeRect(tag, bboxrectpos, &bboxrect);
+
+    tag = swf_InsertTag(tag,ST_PLACEOBJECT2);
+    if(clipdepth)
+       swf_ObjectPlaceClip(tag,shapeid,depth++,NULL,NULL,NULL,clipdepth);
+    else
        swf_ObjectPlace(tag,shapeid,/*depth*/depth++,NULL,NULL,NULL);
-    }
+
     shapeid = -1;
+    bboxrectpos = -1;
 }
 
 static void endpage(struct swfoutput*obj)
 {
     if(shapeid>=0)
-      endshape();
+      endshape(obj,0);
     if(textid>=0)
       endtext(obj);
     while(clippos)
@@ -1502,7 +1634,7 @@ void swfoutput_setfillcolor(swfoutput* obj, u8 r, u8 g, u8 b, u8 a)
        obj->fillrgb.b == b &&
        obj->fillrgb.a == a) return;
     if(shapeid>=0)
-     endshape();
+     endshape(obj,0);
 
     obj->fillrgb.r = r;
     obj->fillrgb.g = g;
@@ -1518,21 +1650,21 @@ void swfoutput_setstrokecolor(swfoutput* obj, u8 r, u8 g, u8 b, u8 a)
        obj->strokergb.a == a) return;
 
     if(shapeid>=0)
-     endshape();
+     endshape(obj,0);
     obj->strokergb.r = r;
     obj->strokergb.g = g;
     obj->strokergb.b = b;
     obj->strokergb.a = a;
 }
 
-void swfoutput_setlinewidth(struct swfoutput*obj, double linewidth)
+void swfoutput_setlinewidth(struct swfoutput*obj, double _linewidth)
 {
-    if(obj->linewidth == (u16)(linewidth*20))
+    if(linewidth == (u16)(_linewidth*20))
         return;
 
     if(shapeid>=0)
-     endshape();
-    obj->linewidth = (u16)(linewidth*20);
+       endshape(obj,0);
+    linewidth = (u16)(_linewidth*20);
 }
 
 
@@ -1541,7 +1673,7 @@ void swfoutput_startclip(swfoutput*obj, SWF_OUTLINE*outline, struct swfmatrix*m)
     if(textid>=0)
      endtext(obj);
     if(shapeid>=0)
-     endshape();
+     endshape(obj,0);
 
     if(clippos >= 127)
     {
@@ -1567,9 +1699,9 @@ void swfoutput_startclip(swfoutput*obj, SWF_OUTLINE*outline, struct swfmatrix*m)
 void swfoutput_endclip(swfoutput*obj)
 {
     if(textid>=0)
-     endtext(obj);
+       endtext(obj);
     if(shapeid>=0)
-     endshape();
+       endshape(obj,0);
 
     if(!clippos) {
         msg("<error> Invalid end of clipping region");
@@ -1595,9 +1727,9 @@ void swfoutput_linktourl(struct swfoutput*obj, char*url, swfcoord*points)
     }
     
     if(shapeid>=0)
-     endshape();
+       endshape(obj,0);
     if(textid>=0)
-     endtext(obj);
+       endtext(obj);
     
     if(opennewwindow)
       actions = action_GetUrl(0, url, "_parent");
@@ -1612,9 +1744,9 @@ void swfoutput_linktopage(struct swfoutput*obj, int page, swfcoord*points)
     ActionTAG* actions;
 
     if(shapeid>=0)
-     endshape();
+       endshape(obj,0);
     if(textid>=0)
-     endtext(obj);
+       endtext(obj);
    
       actions = action_GotoFrame(0, page);
       actions = action_End(actions);
@@ -1632,9 +1764,9 @@ void swfoutput_namedlink(struct swfoutput*obj, char*name, swfcoord*points)
     char mouseover = 1;
 
     if(shapeid>=0)
-     endshape();
+       endshape(obj,0);
     if(textid>=0)
-     endtext(obj);
+       endtext(obj);
 
     if(!strncmp(tmp, "call:", 5))
     {
@@ -1859,7 +1991,7 @@ static void drawimage(struct swfoutput*obj, int bitid, int sizex,int sizey,
     myshapeid = ++currentswfid;
     tag = swf_InsertTag(tag,ST_DEFINESHAPE);
     swf_ShapeNew(&shape);
-    //lsid = ShapeAddLineStyle(shape,obj->linewidth,&obj->strokergb);
+    //lsid = ShapeAddLineStyle(shape,linewidth,&obj->strokergb);
     //fsid = ShapeAddSolidFillStyle(shape,&obj->fillrgb);
     fsid = swf_ShapeAddBitmapFillStyle(shape,&m,bitid,1);
     swf_SetU16(tag, myshapeid);
@@ -1899,9 +2031,9 @@ int swfoutput_drawimagejpeg_old(struct swfoutput*obj, char*filename, int sizex,i
 {
     TAG*oldtag;
     if(shapeid>=0)
-     endshape();
+       endshape(obj,0);
     if(textid>=0)
-     endtext(obj);
+       endtext(obj);
 
     int bitid = ++currentswfid;
     oldtag = tag;
@@ -1927,9 +2059,9 @@ int swfoutput_drawimagejpeg(struct swfoutput*obj, RGBA*mem, int sizex,int sizey,
     JPEGBITS*jpeg;
 
     if(shapeid>=0)
-     endshape();
+       endshape(obj,0);
     if(textid>=0)
-     endtext(obj);
+       endtext(obj);
 
     int bitid = ++currentswfid;
     oldtag = tag;
@@ -1948,9 +2080,9 @@ int swfoutput_drawimagelossless(struct swfoutput*obj, RGBA*mem, int sizex,int si
 {
     TAG*oldtag;
     if(shapeid>=0)
-     endshape();
+       endshape(obj,0);
     if(textid>=0)
-     endtext(obj);
+       endtext(obj);
 
     int bitid = ++currentswfid;
     oldtag = tag;
@@ -1975,9 +2107,9 @@ int swfoutput_drawimagelosslessN(struct swfoutput*obj, U8*mem, RGBA*pal, int siz
     TAG*oldtag;
     U8*mem2 = 0;
     if(shapeid>=0)
-     endshape();
+       endshape(obj,0);
     if(textid>=0)
-     endtext(obj);
+       endtext(obj);
 
     if(sizex&3)
     { 
@@ -2019,10 +2151,52 @@ void swfoutput_drawimageagain(struct swfoutput*obj, int id, int sizex,int sizey,
 {
     if(id<0) return;
     if(shapeid>=0)
-     endshape();
+       endshape(obj,0);
     if(textid>=0)
-     endtext(obj);
+       endtext(obj);
 
     drawimage(obj, id, sizex, sizey, x1,y1,x2,y2,x3,y3,x4,y4);
 }
 
+void swfoutput_setparameter(char*name, char*value)
+{
+    if(!strcmp(name, "drawonlyshapes")) {
+       drawonlyshapes = atoi(value);
+    } else if(!strcmp(name, "ignoredraworder")) {
+       ignoredraworder = atoi(value);
+    } else if(!strcmp(name, "filloverlap")) {
+       filloverlap = atoi(value);
+    } else if(!strcmp(name, "linksopennewwindow")) {
+       opennewwindow = atoi(value);
+    } else if(!strcmp(name, "opennewwindow")) {
+       opennewwindow = atoi(value);
+    } else if(!strcmp(name, "storeallcharacters")) {
+       storeallcharacters = atoi(value);
+    } else if(!strcmp(name, "enablezlib")) {
+       enablezlib = atoi(value);
+    } else if(!strcmp(name, "insertstop")) {
+       insertstoptag = atoi(value);
+    } else if(!strcmp(name, "flashversion")) {
+       flashversion = atoi(value);
+    } else if(!strcmp(name, "minlinewidth")) {
+       minlinewidth = atof(value);
+    } else if(!strcmp(name, "jpegquality")) {
+       int val = atoi(value);
+       if(val<0) val=0;
+       if(val>100) val=100;
+       jpegquality = val;
+    } else if(!strcmp(name, "splinequality")) {
+       int v = atoi(value);
+       v = 500-(v*5); // 100% = 0.25 pixel, 0% = 25 pixel
+       if(v<1) v = 1;
+       splinemaxerror = v;
+    } else if(!strcmp(name, "fontquality")) {
+       int v = atoi(value);
+       v = 500-(v*5); // 100% = 0.25 pixel, 0% = 25 pixel
+       if(v<1) v = 1;
+       fontsplinemaxerror = v;
+    } else {
+       fprintf(stderr, "unknown parameter: %s (=%s)\n", name, value);
+    }
+}
+