moved image rescaler to lib/gfximage.c
[swftools.git] / lib / modules / swfbits.c
index 4643551..1e32cf2 100644 (file)
@@ -61,30 +61,6 @@ int swf_ImageHasAlpha(RGBA*img, int width, int height)
     return hasalpha;
 }
 
-int swf_ImageGetNumberOfPaletteEntries2(RGBA*_img, int width, int height)
-{
-    int len = width*height;
-    int t;
-    U32* img = (U32*)_img;
-    U32 color1 = img[0];
-    U32 color2 = 0;
-    for(t=1;t<len;t++) {
-       if(img[t] != color1) {
-           color2 = img[t];
-           break;
-       }
-    }
-    if(t==len)
-       return 1;
-
-    for(;t<len;t++) {
-       if(img[t] != color1 && img[t] != color2) {
-           return width*height;
-       }
-    }
-    return 2;
-}
-
 /*int swf_ImageGetNumberOfPaletteEntries(RGBA*img, int width, int height, RGBA*palette)
 {
     int len = width*height;
@@ -1286,286 +1262,3 @@ void swf_RemoveJPEGTables(SWF * swf)
     swf_DeleteTag(swf, tables_tag);
 }
 
-typedef struct scale_lookup {
-    int pos;
-    unsigned int weight;
-} scale_lookup_t;
-
-typedef struct rgba_int {
-    unsigned int r,g,b,a;
-} rgba_int_t;
-
-static int bicubic = 0;
-
-static scale_lookup_t**make_scale_lookup(int width, int newwidth)
-{
-    scale_lookup_t*lookupx = (scale_lookup_t*)malloc((width>newwidth?width:newwidth)*2*sizeof(scale_lookup_t));
-    scale_lookup_t**lblockx = (scale_lookup_t**)malloc((newwidth+1)*sizeof(scale_lookup_t**));
-    double fx = ((double)width)/((double)newwidth);
-    double px = 0;
-    int x;
-    scale_lookup_t*p_x = lookupx;
-
-    if(newwidth<=width) {
-       for(x=0;x<newwidth;x++) {
-           double ex = px + fx;
-           int fromx = (int)px;
-           int tox = (int)ex;
-           double rem = fromx+1-px;
-           int i = (int)(256/fx);
-           int xweight = (int)(rem*256/fx);
-           int xx;
-           int w = 0;
-           lblockx[x] = p_x;
-           if(tox>=width) tox = width-1;
-           for(xx=fromx;xx<=tox;xx++) {
-               if(xx==fromx && xx==tox) p_x->weight = 256;
-               else if(xx==fromx) p_x->weight = xweight;
-               else if(xx==tox) p_x->weight = 256-w;
-               else p_x->weight = i;
-               w+=p_x->weight;
-               p_x->pos = xx;
-               p_x++;
-           }
-           px = ex;
-       }
-    } else {
-       for(x=0;x<newwidth;x++) {
-           int ix1 = (int)px;
-           int ix2 = ((int)px)+1;
-           double r = px-ix1;
-           if(ix2>=width) ix2=width-1;
-           lblockx[x] = p_x;
-           if(bicubic)
-               r = -2*r*r*r+3*r*r;
-           p_x[0].weight = (int)(256*(1-r));
-           p_x[0].pos = ix1;
-           p_x[1].weight = 256-p_x[0].weight;
-           p_x[1].pos = ix2;
-           p_x+=2;
-           px += fx;
-       }
-    }
-    lblockx[newwidth] = p_x;
-    return lblockx;
-}
-
-static void encodeMonochromeImage(RGBA*data, int width, int height, RGBA*colors)
-{
-    int t;
-    int len = width*height;
-
-    U32* img = (U32*)data;
-    U32 color1 = img[0];
-    U32 color2 = 0;
-    for(t=1;t<len;t++) {
-       if(img[t] != color1) {
-           color2 = img[t];
-           break;
-       }
-    }
-    *(U32*)&colors[0] = color1;
-    *(U32*)&colors[1] = color2;
-    for(t=0;t<len;t++) {
-       if(img[t] == color1) {
-           img[t] = 0;
-       } else {
-           img[t] = 0xffffffff;
-       }
-    }
-}
-
-static void decodeMonochromeImage(RGBA*data, int width, int height, RGBA*colors)
-{
-    int t;
-    int len = width*height;
-
-    for(t=0;t<len;t++) {
-       U32 m = data[t].r;
-       data[t].r = (colors[0].r * (255-m) + colors[1].r * m) >> 8;
-       data[t].g = (colors[0].g * (255-m) + colors[1].g * m) >> 8;
-       data[t].b = (colors[0].b * (255-m) + colors[1].b * m) >> 8;
-       data[t].a = (colors[0].a * (255-m) + colors[1].a * m) >> 8;
-    }
-}
-
-static void blurImage(RGBA*src, int width, int height, int r)
-{
-    int e = 2; // r times e is the sampling interval
-    double*gauss = (double*)malloc(r*e*sizeof(double));
-    double sum=0;
-    int x;
-    for(x=0;x<r*e;x++) {
-        double t = (x - r*e/2.0)/r;
-        gauss[x] = exp(-0.5*t*t);
-        sum += gauss[x];
-    }
-    int*weights = (int*)malloc(r*e*sizeof(int));
-    for(x=0;x<r*e;x++) {
-        weights[x] = (int)(gauss[x]*65536.0001/sum);
-    }
-    int range = r*e/2;
-
-    RGBA*tmp = malloc(sizeof(RGBA)*width*height);
-
-    int y;
-    for(y=0;y<height;y++) {
-        RGBA*s = &src[y*width];
-        RGBA*d = &tmp[y*width];
-        for(x=0;x<range;x++) {
-            d[x] = s[x];
-        }
-        for(x=range;x<width-range;x++) {
-            int r=0;
-            int g=0;
-            int b=0;
-            int a=0;
-            int*f = weights;
-            int xx;
-            for(xx=x-range;xx<x+range;xx++) {
-                r += s[xx].r * f[0];
-                g += s[xx].g * f[0];
-                b += s[xx].b * f[0];
-                a += s[xx].a * f[0];
-                f++;
-            }
-            d[x].r = r >> 16;
-            d[x].g = g >> 16;
-            d[x].b = b >> 16;
-            d[x].a = a >> 16;
-        }
-        for(x=width-range;x<width;x++) {
-            d[x] = s[x];
-        }
-    }
-
-    for(x=0;x<width;x++) {
-        RGBA*s = &tmp[x];
-        RGBA*d = &src[x];
-        int yy=0;
-        for(y=0;y<range;y++) {
-            d[yy] = s[yy];
-            yy+=width;
-        }
-        for(y=range;y<height-range;y++) {
-            int r=0;
-            int g=0;
-            int b=0;
-            int a=0;
-            int*f = weights;
-            int cy,cyy=yy-range*width;
-            for(cy=y-range;cy<y+range;cy++) {
-                r += s[cyy].r * f[0];
-                g += s[cyy].g * f[0];
-                b += s[cyy].b * f[0];
-                a += s[cyy].a * f[0];
-                cyy += width;
-                f++;
-            }
-            d[yy].r = r >> 16;
-            d[yy].g = g >> 16;
-            d[yy].b = b >> 16;
-            d[yy].a = a >> 16;
-            yy += width;
-        }
-        for(y=0;y<range;y++) {
-            d[yy] = s[yy];
-            yy += width;
-        }
-    }
-
-    free(tmp);
-    free(weights);
-    free(gauss);
-}
-
-
-RGBA* swf_ImageScale(RGBA*data, int width, int height, int newwidth, int newheight)
-{
-    int x,y;
-    RGBA* newdata; 
-    scale_lookup_t *p, **lblockx,**lblocky;
-    rgba_int_t*tmpline;
-    int monochrome = 0;
-    RGBA monochrome_colors[2];
-    
-    if(newwidth<1 || newheight<1)
-       return 0;
-
-    if(swf_ImageGetNumberOfPaletteEntries2(data, width, height) == 2) {
-       monochrome=1;
-       encodeMonochromeImage(data, width, height, monochrome_colors);
-        int r1 = width / newwidth;
-        int r2 = height / newheight;
-        int r = r1<r2?r1:r2;
-        if(r>4) {
-            /* high-resolution monochrome images are usually dithered, so 
-               low-pass filter them first to get rid of any moire patterns */
-            blurImage(data, width, height, r+1);
-        }
-    }
-
-    tmpline = (rgba_int_t*)malloc(width*sizeof(rgba_int_t));
-    newdata = (RGBA*)malloc(newwidth*newheight*sizeof(RGBA));
-  
-    lblockx = make_scale_lookup(width, newwidth);
-    lblocky = make_scale_lookup(height, newheight);
-
-    for(p=lblocky[0];p<lblocky[newheight];p++)
-       p->pos*=width;
-
-    for(y=0;y<newheight;y++) {
-       RGBA*destline = &newdata[y*newwidth];
-       
-       /* create lookup table for y */
-       rgba_int_t*l = tmpline;
-       scale_lookup_t*p_y,*p_x;
-       memset(tmpline, 0, width*sizeof(rgba_int_t));
-       for(p_y=lblocky[y];p_y<lblocky[y+1];p_y++) {
-           RGBA*line = &data[p_y->pos];
-           scale_lookup_t*p_x;
-           int weight = p_y->weight;
-           for(x=0;x<width;x++) {
-               tmpline[x].r += line[x].r*weight;
-               tmpline[x].g += line[x].g*weight;
-               tmpline[x].b += line[x].b*weight;
-               tmpline[x].a += line[x].a*weight;
-           }
-       }
-
-       /* process x direction */
-       p_x = lblockx[0];
-       for(x=0;x<newwidth;x++) {
-           unsigned int r=0,g=0,b=0,a=0;
-           scale_lookup_t*p_x_to = lblockx[x+1];
-           do { 
-               rgba_int_t* col = &tmpline[p_x->pos];
-               unsigned int weight = p_x->weight;
-               r += col->r*weight;
-               g += col->g*weight;
-               b += col->b*weight;
-               a += col->a*weight;
-               p_x++;
-           } while (p_x<p_x_to);
-
-           destline->r = r >> 16;
-           destline->g = g >> 16;
-           destline->b = b >> 16;
-           destline->a = a >> 16;
-          
-           destline++;
-       }
-    }
-
-    if(monochrome)
-       decodeMonochromeImage(newdata, newwidth, newheight, monochrome_colors);
-
-    free(tmpline);
-    free(*lblockx);
-    free(lblockx);
-    free(*lblocky);
-    free(lblocky);
-    return newdata;
-}
-
-