added background color support.
[swftools.git] / lib / modules / swfrender.c
index e3236af..29b6e4b 100644 (file)
@@ -47,6 +47,12 @@ typedef struct _bitmap {
     struct _bitmap*next;
 } bitmap_t;
 
+typedef struct _dummyshape
+{
+    SHAPE2*shape;
+    struct _dummyshape*next;
+} dummyshape_t;
+
 typedef struct _renderbuf_internal
 {
     renderline_t*lines;
@@ -54,6 +60,10 @@ typedef struct _renderbuf_internal
     char antialize;
     int multiply;
     int width2,height2;
+    dummyshape_t*dshapes;
+    dummyshape_t*dshapes_next;
+    RGBA*background;
+    int background_width, background_height;
 } renderbuf_internal;
 
 #define DEBUG 0
@@ -66,7 +76,12 @@ static inline void add_pixel(RENDERBUF*dest, float x, int y, renderpoint_t*p)
     p->fx = x;
     swf_SetBlock(i->lines[y].points, (U8*)p, sizeof(renderpoint_t));
 }
-static void add_line(RENDERBUF*buf, double x1, int y1, double x2, int y2, renderpoint_t*p, char thin)
+
+/* set this to 0.777777 or something if the "both fillstyles set while not inside shape"
+   problem appears to often */
+#define CUT 0.5
+
+static void add_line(RENDERBUF*buf, double x1, double y1, double x2, double y2, renderpoint_t*p, char thin)
 {
     renderbuf_internal*i = (renderbuf_internal*)buf->internal;
 /*    if(DEBUG&4) {
@@ -74,63 +89,52 @@ static void add_line(RENDERBUF*buf, double x1, int y1, double x2, int y2, render
         printf(" l[%d - %.2f/%.2f -> %.2f/%.2f]", l, x1/20.0, y1/20.0, x2/20.0, y2/20.0);
     }*/
 
-    /* SCALE DOWN */ 
-    y1*=i->multiply;
-    y2*=i->multiply;
-    x1*=i->multiply;
-    x2*=i->multiply;
-
-    y1/=20; 
-    y2/=20;
+    y1=y1*i->multiply;
+    y2=y2*i->multiply;
+    x1=x1*i->multiply;
+    x2=x2*i->multiply;
+    
+    y1 = y1/20.0;
+    y2 = y2/20.0;
+    x1 = x1/20.0;
+    x2 = x2/20.0;
+
+    if(y2 < y1) {
+        double x = x1;x1 = x2;x2=x;
+        double y = y1;y1 = y2;y2=y;
+    }
     
-    int diffy = y2 - y1;
-    int starty = y1;
-    int posy=0;
     double diffx = x2 - x1;
-    double stepx;
-    double startx = x1;
-    double posx=0;
+    double diffy = y2 - y1;
+    
+    double ny1 = (int)(y1)+CUT;
+    double ny2 = (int)(y2)+CUT;
 
-    if(diffy<0) {
-        startx = x2;
-        starty = y2;
-        diffx = -diffx;
-        diffy = -diffy;
+    if(ny1 < y1) {
+        ny1 = (int)(y1) + 1.0 + CUT;
     }
-
-    if(diffy == 0) {
-        if(thin) {
-            stepx = diffx;
-        } else {
-            return;
-        }
-    } else {
-        stepx = diffx / diffy;
+    if(ny2 >= y2) {
+        ny2 = (int)(y2) - 1.0 + CUT;
     }
-    
-    if(thin)
-        diffy++;
 
-    while(posy<diffy) {
-        float xx = (float)((startx + posx)/20.0);
-        int yy = starty + posy;
+    if(ny1 > ny2)
+        return;
+
+    double stepx = diffx/diffy;
+    x1 = x1 + (ny1-y1)*stepx;
+    x2 = x2 + (ny2-y2)*stepx;
 
-        add_pixel(buf, xx ,yy, p);
+    int posy=(int)ny1;
+    int endy=(int)ny2;
+    double posx=0;
+    double startx = x1;
+
+    while(posy<=endy) {
+        float xx = (float)(startx + posx);
+        add_pixel(buf, xx ,posy, p);
         posx+=stepx;
-        if(thin) {
-            float x2 = (float)((startx + posx)/20.0);
-            if(xx==x2) {
-                if(stepx<0) {
-                    x2 = xx-1;
-                } else {
-                    x2 = xx+1;
-                }
-            }
-            add_pixel(buf, x2, yy, p);
-        }
         posy++;
     }
-    return;
 }
 #define PI 3.14159265358979
 static void add_solidline(RENDERBUF*buf, double x1, double y1, double x2, double y2, int width, renderpoint_t*p)
@@ -144,22 +148,14 @@ static void add_solidline(RENDERBUF*buf, double x1, double y1, double x2, double
 
     int t;
     int segments;
-    double lastx;
+    double lastx,lasty;
     double vx,vy;
-    double xx;
-    
-    int lasty;
-    int yy;
+    double xx,yy;
    
     /* The Flash Player does this, too. This means every line is always at least
        one pixel wide */
     width += 20;
 
-    /*if(width<=20) {
-        add_line(buf, x1, y1, x2, y2, p, 1);
-        return;
-    }*/
-
     sd = (double)dx*(double)dx+(double)dy*(double)dy;
     d = sqrt(sd);
 
@@ -181,27 +177,27 @@ static void add_solidline(RENDERBUF*buf, double x1, double y1, double x2, double
     vy=vy*width*0.5;
 
     xx = x2+vx;
-    yy = (int)(y2+vy);
-    add_line(buf, x1+vx, (int)(y1+vy), xx, yy, p, 0);
+    yy = y2+vy;
+    add_line(buf, x1+vx, y1+vy, xx, yy, p, 0);
     lastx = xx;
     lasty = yy;
     for(t=1;t<segments;t++) {
         double s = sin(t*PI/segments);
         double c = cos(t*PI/segments);
         xx = (x2 + vx*c - vy*s);
-        yy = (int)(y2 + vx*s + vy*c);
+        yy = (y2 + vx*s + vy*c);
         add_line(buf, lastx, lasty, xx, yy, p, 0);
         lastx = xx;
         lasty = yy;
     }
     
     xx = (x2-vx);
-    yy = (int)(y2-vy);
+    yy = (y2-vy);
     add_line(buf, lastx, lasty, xx, yy, p, 0);
     lastx = xx;
     lasty = yy;
     xx = (x1-vx);
-    yy = (int)(y1-vy);
+    yy = (y1-vy);
     add_line(buf, lastx, lasty, xx, yy, p, 0);
     lastx = xx;
     lasty = yy;
@@ -209,12 +205,12 @@ static void add_solidline(RENDERBUF*buf, double x1, double y1, double x2, double
         double s = sin(t*PI/segments);
         double c = cos(t*PI/segments);
         xx = (x1 - vx*c + vy*s);
-        yy = (int)(y1 - vx*s - vy*c);
+        yy = (y1 - vx*s - vy*c);
         add_line(buf, lastx, lasty, xx, yy, p, 0);
         lastx = xx;
         lasty = yy;
     }
-    add_line(buf, lastx, lasty, (x1+vx), (int)(y1+vy), p, 0);
+    add_line(buf, lastx, lasty, (x1+vx), (y1+vy), p, 0);
 }
 
 static inline void transform_point(MATRIX*m, int x, int y, int*dx, int*dy)
@@ -247,7 +243,7 @@ void swf_Render_Init(RENDERBUF*buf, int posx, int posy, int width, int height, c
     buf->posy = posy;
     buf->internal = (renderbuf_internal*)rfx_calloc(sizeof(renderbuf_internal));
     i = (renderbuf_internal*)buf->internal;
-    i->antialize = antialize;
+    i->antialize = !!antialize;
     i->multiply = antialize?multiply*2:multiply;
     i->height2 = antialize?2*buf->height:buf->height;
     i->width2 = antialize?2*buf->width:buf->width;
@@ -256,6 +252,19 @@ void swf_Render_Init(RENDERBUF*buf, int posx, int posy, int width, int height, c
         i->lines[y].points = swf_InsertTag(0, 0);
     }
 }
+void swf_Render_SetBackground(RENDERBUF*buf, RGBA*img, int width, int height)
+{
+    renderbuf_internal*i = (renderbuf_internal*)buf->internal;
+    RGBA*bck = (RGBA*)rfx_alloc(sizeof(RGBA)*width*height);
+    memcpy(bck, img, sizeof(RGBA)*width*height);
+    i->background = bck;
+    i->background_width = width;
+    i->background_height = height;
+}
+void swf_Render_SetBackgroundColor(RENDERBUF*buf, RGBA color)
+{
+    swf_Render_SetBackground(buf, &color, 1, 1);
+}
 void swf_Render_AddImage(RENDERBUF*buf, U16 id, RGBA*img, int width, int height)
 {
     renderbuf_internal*i = (renderbuf_internal*)buf->internal;
@@ -282,12 +291,26 @@ void swf_Render_Delete(RENDERBUF*dest)
     renderbuf_internal*i = (renderbuf_internal*)dest->internal;
     int y;
     bitmap_t*b = i->bitmaps;
+    dummyshape_t*d = i->dshapes;
+
+    if(i->background) {
+       free(i->background);i->background=0;
+    }
 
     /* delete line buffers */
     for(y=0;y<i->height2;y++) {
         swf_DeleteTag(i->lines[y].points);
         i->lines[y].points = 0;
     }
+
+    while(d) {
+        dummyshape_t*next = d->next;
+        swf_Shape2Free(d->shape);
+        free(d->shape);d->shape=0;
+        free(d);
+        d=next;
+    }
+    i->dshapes = 0;
     
     /* delete bitmaps */
     while(b) {
@@ -321,7 +344,7 @@ void swf_RenderShape(RENDERBUF*dest, SHAPE2*shape, MATRIX*m, CXFORM*c, U16 _dept
     mat.ty -= dest->posy*20;
 
     if(shape->numlinestyles) {
-        /* TODO: free this again */
+        dummyshape_t*dshape = rfx_calloc(sizeof(dummyshape_t));
         lshape = rfx_calloc(sizeof(SHAPE2));
         int t;
         lshape->numfillstyles = shape->numlinestyles;
@@ -335,6 +358,13 @@ void swf_RenderShape(RENDERBUF*dest, SHAPE2*shape, MATRIX*m, CXFORM*c, U16 _dept
         lp.type = fill_type;
         lp.shape = lshape;
         lp.depth = p.depth+1;
+
+        /* add this shape to the global shape list, for deallocing */
+        dshape->shape = lshape;
+        i->dshapes_next = dshape;
+        if(!i->dshapes) {
+            i->dshapes = dshape;
+        }
     }
 
     if(p.clipdepth) {
@@ -383,7 +413,7 @@ void swf_RenderShape(RENDERBUF*dest, SHAPE2*shape, MATRIX*m, CXFORM*c, U16 _dept
             int t;
             double xx=x1,yy=y1;
 
-            parts = (int)(sqrt(c)/2);
+            parts = (int)(sqrt(c)/3);
             if(!parts) parts = 1;
 
             if(DEBUG&4)
@@ -468,16 +498,21 @@ static void fill_bitmap(RGBA*line, int y, int x1, int x2, MATRIX*m, bitmap_t*b,
        return;
     }
     det = 20.0/det;
-    
+    if(!b->width || !b->height) {
+        fill_plain(line, x1, x2, color_red);
+        return;
+    }
+
     do {
         int xx = (int)((  (x - rx) * m22 - (y - ry) * m21)*det);
         int yy = (int)((- (x - rx) * m12 + (y - ry) * m11)*det);
         
         if(clip) {
-            if(xx<0 || xx>=b->width || yy<0 || yy>=b->height) {
-                //line[x] = color_red;
-                continue;
-            }
+            if(xx<0) xx=0;
+            if(xx>=b->width) xx = b->width-1;
+            if(yy<0) yy=0;
+            if(yy>=b->height) yy = b->height-1;
         } else {
             xx %= b->width;
             yy %= b->height;
@@ -696,7 +731,16 @@ RGBA* swf_Render(RENDERBUF*dest)
         state_t state;
         memset(&state, 0, sizeof(state_t));
 
-        memset(line, 0, sizeof(RGBA)*i->width2);
+       if(!i->background) {
+           memset(line, 0, sizeof(RGBA)*i->width2);
+       } else {
+           int x,xx;
+           int xstep=i->background_width*65536/i->width2;
+           RGBA*src = &i->background[(i->background_height*y/i->height2)*i->background_width];
+           for(x=0,xx=0;x<i->width2;x++,xx+=xstep) {
+               line[x] = src[xx>>16];
+           }
+       }
         memory += tag->memsize;
         qsort(tag->data, num, size, compare_renderpoints);
         for(n=0;n<num;n++) {
@@ -739,12 +783,13 @@ RGBA* swf_Render(RENDERBUF*dest)
     }
     free(line1);
     free(line2);
-
+    
     if(DEBUG) printf("\nMemory used: %d\n", memory);
 #ifdef STATISTICS
     if(DEBUG) printf("Statistics:\n");
     if(DEBUG) printf("Average layer depth: %f\n", (double)layers/layernum);
 #endif
 
+
     return img;
 }