+ if(pos) {
+ lines[pos-1].next = 0;
+ return lines;
+ } else {
+ return 0;
+ }
+}
+
+/* TODO */
+static int imageInCache(gfxdevice_t*dev, void*data, int width, int height)
+{
+ return -1;
+}
+static void addImageToCache(gfxdevice_t*dev, void*data, int width, int height)
+{
+}
+
+static int add_image(swfoutput_internal*i, gfximage_t*img, int targetwidth, int targetheight, int* newwidth, int* newheight)
+{
+ gfxdevice_t*dev = i->dev;
+ RGBA*newpic = 0;
+ RGBA*mem = (RGBA*)img->data;
+
+ int sizex = img->width;
+ int sizey = img->height;
+ int is_jpeg = i->jpeg;
+ i->jpeg = 0;
+
+ int newsizex=sizex, newsizey=sizey;
+
+ /// {
+ if(is_jpeg && i->config_jpegsubpixels) {
+ newsizex = (int)(targetwidth*i->config_jpegsubpixels+0.5);
+ newsizey = (int)(targetheight*i->config_jpegsubpixels+0.5);
+ } else if(!is_jpeg && i->config_ppmsubpixels) {
+ newsizex = (int)(targetwidth*i->config_ppmsubpixels+0.5);
+ newsizey = (int)(targetheight*i->config_ppmsubpixels+0.5);
+ }
+ /// }
+
+ if(sizex<=0 || sizey<=0 || newsizex<=0 || newsizey<=0)
+ return -1;
+
+ /* TODO: cache images */
+ *newwidth = sizex;
+ *newheight = sizey;
+
+ if(newsizex<sizex || newsizey<sizey) {
+ msg("<verbose> Scaling %dx%d image to %dx%d", sizex, sizey, newsizex, newsizey);
+ newpic = swf_ImageScale(mem, sizex, sizey, newsizex, newsizey);
+ *newwidth = sizex = newsizex;
+ *newheight = sizey = newsizey;
+ mem = newpic;
+
+ }
+
+ int num_colors = swf_ImageGetNumberOfPaletteEntries(mem,sizex,sizey,0);
+ int has_alpha = swf_ImageHasAlpha(mem,sizex,sizey);
+
+ msg("<verbose> Drawing %dx%d %s%simage at size %dx%d (%dx%d), %s%d colors",
+ sizex, sizey,
+ has_alpha?(has_alpha==2?"semi-transparent ":"transparent "):"",
+ is_jpeg?"jpeg-":"",
+ newsizex, newsizey,
+ targetwidth, targetheight,
+ /*newsizex, newsizey,*/
+ num_colors>256?">":"", num_colors>256?256:num_colors);
+
+ /*RGBA* pal = (RGBA*)rfx_alloc(sizeof(RGBA)*num_colors);
+ swf_ImageGetNumberOfPaletteEntries(mem,sizex,sizey,pal);
+ int t;
+ for(t=0;t<num_colors;t++) {
+ printf("%02x%02x%02x%02x ",
+ pal[t].r, pal[t].g, pal[t].b, pal[t].a);
+ if((t&7)==7)
+ printf("\n");
+ }
+ printf("\n");*/
+
+ int bitid = -1;
+ int cacheid = imageInCache(dev, mem, sizex, sizey);
+
+ if(cacheid<=0) {
+ bitid = getNewID(dev);
+ i->tag = swf_AddImage(i->tag, bitid, mem, sizex, sizey, i->config_jpegquality);
+ addImageToCache(dev, mem, sizex, sizey);
+ } else {
+ bitid = cacheid;
+ }
+
+ if(newpic)
+ free(newpic);
+ return bitid;
+}
+
+static SRECT gfxline_getSWFbbox(gfxline_t*line)
+{
+ gfxbbox_t bbox = gfxline_getbbox(line);
+ SRECT r;
+ r.xmin = (int)(bbox.xmin*20);
+ r.ymin = (int)(bbox.ymin*20);
+ r.xmax = (int)(bbox.xmax*20);
+ r.ymax = (int)(bbox.ymax*20);
+ return r;
+}
+
+static void swf_fillbitmap(gfxdevice_t*dev, gfxline_t*line, gfximage_t*img, gfxmatrix_t*matrix, gfxcxform_t*cxform)
+{
+ swfoutput_internal*i = (swfoutput_internal*)dev->internal;
+
+ endshape(dev);
+ endtext(dev);
+
+ int targetx = (int)(sqrt(matrix->m00*matrix->m00 + matrix->m01*matrix->m01)*img->width);
+ int targety = (int)(sqrt(matrix->m10*matrix->m10 + matrix->m11*matrix->m11)*img->height);
+
+ int newwidth=0,newheight=0;
+ int bitid = add_image(i, img, targetx, targety, &newwidth, &newheight);
+ if(bitid<0)
+ return;
+ double fx = (double)img->width / (double)newwidth;
+ double fy = (double)img->height / (double)newheight;
+
+ MATRIX m;
+ float m00,m10,tx;
+ float m01,m11,ty;
+ m.sx = (int)(65536*20*matrix->m00*fx); m.r1 = (int)(65536*20*matrix->m10*fy);
+ m.r0 = (int)(65536*20*matrix->m01*fx); m.sy = (int)(65536*20*matrix->m11*fy);
+ m.tx = (int)(matrix->tx*20);
+ m.ty = (int)(matrix->ty*20);
+
+ /* shape */
+ int myshapeid = getNewID(dev);
+ i->tag = swf_InsertTag(i->tag,ST_DEFINESHAPE);
+ SHAPE*shape;
+ swf_ShapeNew(&shape);
+ int fsid = swf_ShapeAddBitmapFillStyle(shape,&m,bitid,1);
+ swf_SetU16(i->tag, myshapeid);
+ SRECT r = gfxline_getSWFbbox(line);
+ swf_SetRect(i->tag,&r);
+ swf_SetShapeStyles(i->tag,shape);
+ swf_ShapeCountBits(shape,NULL,NULL);
+ swf_SetShapeBits(i->tag,shape);
+ swf_ShapeSetAll(i->tag,shape,UNDEFINED_COORD,UNDEFINED_COORD,0,fsid,0);
+ i->swflastx = i->swflasty = UNDEFINED_COORD;
+ drawgfxline(dev, line);
+ swf_ShapeSetEnd(i->tag);
+ swf_ShapeFree(shape);
+
+ i->tag = swf_InsertTag(i->tag,ST_PLACEOBJECT2);
+ CXFORM cxform2 = gfxcxform_to_cxform(cxform);
+ swf_ObjectPlace(i->tag,myshapeid,getNewDepth(dev),&i->page_matrix,&cxform2,NULL);
+}
+
+static void swf_startclip(gfxdevice_t*dev, gfxline_t*line)
+{
+ swfoutput_internal*i = (swfoutput_internal*)dev->internal;
+
+ endtext(dev);
+ endshape(dev);
+
+ if(i->clippos >= 127)
+ {
+ msg("<warning> Too many clip levels.");
+ i->clippos --;
+ }
+
+ int myshapeid = getNewID(dev);
+ i->tag = swf_InsertTag(i->tag,ST_DEFINESHAPE);
+ RGBA col;
+ memset(&col, 0, sizeof(RGBA));
+ SHAPE*shape;
+ swf_ShapeNew(&shape);
+ int fsid = swf_ShapeAddSolidFillStyle(shape,&col);
+ swf_SetU16(i->tag,myshapeid);
+ SRECT r = gfxline_getSWFbbox(line);
+ swf_SetRect(i->tag,&r);
+ swf_SetShapeStyles(i->tag,shape);
+ swf_ShapeCountBits(shape,NULL,NULL);
+ swf_SetShapeBits(i->tag,shape);
+ swf_ShapeSetAll(i->tag,shape,UNDEFINED_COORD,UNDEFINED_COORD,0,fsid,0);
+ i->swflastx = i->swflasty = UNDEFINED_COORD;
+ drawgfxline(dev, line);
+ swf_ShapeSetEnd(i->tag);
+ swf_ShapeFree(shape);
+
+ /* TODO: remember the bbox, and check all shapes against it */
+
+ i->tag = swf_InsertTag(i->tag,ST_PLACEOBJECT2);
+ i->cliptags[i->clippos] = i->tag;
+ i->clipshapes[i->clippos] = myshapeid;
+ i->clipdepths[i->clippos] = getNewDepth(dev);
+ i->clippos++;
+}
+
+static void swf_endclip(gfxdevice_t*dev)
+{
+ swfoutput_internal*i = (swfoutput_internal*)dev->internal;
+ if(i->textid>=0)
+ endtext(dev);
+ if(i->shapeid>=0)
+ endshape(dev);
+
+ if(!i->clippos) {
+ msg("<error> Invalid end of clipping region");
+ return;
+ }
+ i->clippos--;
+ /*swf_ObjectPlaceClip(i->cliptags[i->clippos],i->clipshapes[i->clippos],i->clipdepths[i->clippos],&i->page_matrix,NULL,NULL,
+ / * clip to depth: * / i->depth <= i->clipdepths[i->clippos]? i->depth : i->depth - 1);
+ i->depth ++;*/
+ swf_ObjectPlaceClip(i->cliptags[i->clippos],i->clipshapes[i->clippos],i->clipdepths[i->clippos],&i->page_matrix,NULL,NULL,i->depth);
+}
+static int gfxline_type(gfxline_t*line)
+{
+ int tmplines=0;
+ int tmpsplines=0;
+ int lines=0;
+ int splines=0;
+ int haszerosegments=0;
+ while(line) {
+ if(line->type == gfx_moveTo) {
+ tmplines=0;
+ tmpsplines=0;
+ } else if(line->type == gfx_lineTo) {
+ tmplines++;
+ if(tmplines>lines)
+ lines=tmplines;
+ } else if(line->type == gfx_splineTo) {
+ tmpsplines++;
+ if(tmpsplines>lines)
+ splines=tmpsplines;
+ }
+ line = line->next;
+ }
+ if(lines==0 && splines==0) return 0;
+ else if(lines==1 && splines==0) return 1;
+ else if(lines==0 && splines==1) return 2;
+ else if(splines==0) return 3;
+ else return 4;
+}
+
+static int gfxline_has_dots(gfxline_t*line)
+{
+ int tmplines=0;
+ double x,y;
+ double dist = 0;
+ int isline = 0;
+ while(line) {
+ if(line->type == gfx_moveTo) {
+ if(isline && dist < 1) {
+ return 1;
+ }
+ dist = 0;
+ isline = 0;
+ } else if(line->type == gfx_lineTo) {
+ dist += fabs(line->x - x) + fabs(line->y - y);
+ isline = 1;
+ } else if(line->type == gfx_splineTo) {
+ dist += fabs(line->sx - x) + fabs(line->sy - y) +
+ fabs(line->x - line->sx) + fabs(line->y - line->sy);
+ isline = 1;
+ }
+ x = line->x;
+ y = line->y;
+ line = line->next;
+ }
+ if(isline && dist < 1) {
+ return 1;
+ }
+ return 0;
+}
+
+static int gfxline_fix_short_edges(gfxline_t*line)
+{
+ double x,y;
+ while(line) {
+ if(line->type == gfx_lineTo) {
+ if(fabs(line->x - x) + fabs(line->y - y) < 0.01) {
+ line->x += 0.01;
+ }
+ } else if(line->type == gfx_splineTo) {
+ if(fabs(line->sx - x) + fabs(line->sy - y) +
+ fabs(line->x - line->sx) + fabs(line->y - line->sy) < 0.01) {
+ line->x += 0.01;
+ }
+ }
+ x = line->x;
+ y = line->y;
+ line = line->next;
+ }
+ return 0;
+}
+
+static void swf_stroke(gfxdevice_t*dev, gfxline_t*line, gfxcoord_t width, gfxcolor_t*color, gfx_capType cap_style, gfx_joinType joint_style, gfxcoord_t miterLimit)
+{
+ swfoutput_internal*i = (swfoutput_internal*)dev->internal;
+ int type = gfxline_type(line);
+ int has_dots = gfxline_has_dots(line);
+
+ /* TODO: * split line into segments, and perform this check for all segments */
+ if(!has_dots &&
+ (width <= i->config_caplinewidth
+ || (cap_style == gfx_capRound && joint_style == gfx_joinRound)
+ || (cap_style == gfx_capRound && type<=2))) {
+ msg("<trace> draw as stroke, type=%d dots=%d", type, has_dots);
+ endtext(dev);
+ swfoutput_setstrokecolor(dev, color->r, color->g, color->b, color->a);
+ swfoutput_setlinewidth(dev, width);
+ startshape(dev);
+ stopFill(dev);
+ drawgfxline(dev, line);
+ } else {
+ msg("<trace> draw as polygon, type=%d dots=%d", type, has_dots);
+ if(has_dots)
+ gfxline_fix_short_edges(line);
+ /* we need to convert the line into a polygon */
+ ArtSVP* svp = gfxstrokeToSVP(line, width, cap_style, joint_style, miterLimit);
+ gfxline_t*gfxline = SVPtogfxline(svp);
+ dev->fill(dev, gfxline, color);
+ free(gfxline);
+ art_svp_free(svp);
+ }
+}
+static void swf_fill(gfxdevice_t*dev, gfxline_t*line, gfxcolor_t*color)
+{
+ swfoutput_internal*i = (swfoutput_internal*)dev->internal;
+ endtext(dev);
+ if(!i->config_ignoredraworder)
+ endshape(dev);
+ swfoutput_setfillcolor(dev, color->r, color->g, color->b, color->a);
+ startshape(dev);
+ startFill(dev);
+ i->fill=1;
+ drawgfxline(dev, line);
+ msg("<trace> end of swf_fill (shapeid=%d)", i->shapeid);
+}
+static void swf_fillgradient(gfxdevice_t*dev, gfxline_t*line, gfxgradient_t*gradient, gfxgradienttype_t type, gfxmatrix_t*matrix)
+{
+ msg("<error> Gradient filling not implemented yet");