2 Implements generation of swf files using the rfxswf lib. The routines
3 in this file are called from pdf2swf.
5 This file is part of swftools.
7 Swftools is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
12 Swftools is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with swftools; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */
24 #include "swfoutput.h"
27 #include "../lib/log.h"
28 #include "../lib/rfxswf.h"
30 #define standardEncodingSize 335
31 extern char *standardEncodingNames[standardEncodingSize];
34 int ignoredraworder=0;
37 int storeallcharacters=0;
41 static int flag_protected = 0;
43 typedef unsigned char u8;
44 typedef unsigned short int u16;
45 typedef unsigned long int u32;
48 static char* filename = 0;
51 static int currentswfid = 0;
53 static int startdepth = 1;
56 static int shapeid = -1;
57 static int textid = -1;
59 static int drawmode = -1;
60 static char storefont = 0;
61 static int fillstyleid;
62 static int linestyleid;
63 static int swflastx=0;
64 static int swflasty=0;
65 static int lastwasfill = 0;
77 char fillstylechanged = 0;
79 static void startshape(struct swfoutput* obj);
80 static void starttext(struct swfoutput* obj);
81 static void endshape();
82 static void endtext();
84 // matrix multiplication. changes p0
85 static void transform (plotxy*p0,struct swfmatrix*m)
88 x = m->m11*p0->x+m->m12*p0->y;
89 y = m->m21*p0->x+m->m22*p0->y;
94 // write a move-to command into the swf
95 static int moveto(TAG*tag, plotxy p0)
97 int rx = (int)(p0.x*20);
98 int ry = (int)(p0.y*20);
99 if(rx!=swflastx || ry!=swflasty || fillstylechanged) {
100 swf_ShapeSetMove (tag, shape, rx,ry);
101 fillstylechanged = 0;
109 // write a line-to command into the swf
110 static void lineto(TAG*tag, plotxy p0)
112 int rx = ((int)(p0.x*20)-swflastx);
113 int ry = ((int)(p0.y*20)-swflasty);
114 /* we can't skip this for rx=0,ry=0, those
116 swf_ShapeSetLine (tag, shape, rx,ry);
121 // write a spline-to command into the swf
122 static void splineto(TAG*tag, plotxy control,plotxy end)
124 int cx = ((int)(control.x*20)-swflastx);
125 int cy = ((int)(control.y*20)-swflasty);
128 int ex = ((int)(end.x*20)-swflastx);
129 int ey = ((int)(end.y*20)-swflasty);
132 if(cx || cy || ex || ey)
133 swf_ShapeSetCurve(tag, shape, cx,cy,ex,ey);
136 /* write a line, given two points and the transformation
138 static void line(TAG*tag, plotxy p0, plotxy p1, struct swfmatrix*m)
146 /* write a cubic (!) spline. This involves calling the approximate()
147 function out of spline.cc to convert it to a quadratic spline. */
148 static void spline(TAG*tag,plotxy p0,plotxy p1,plotxy p2,plotxy p3,struct swfmatrix*m)
151 struct qspline q[128];
165 /* fonts use a different approximation than shapes */
166 num = cspline_approximate(&c, q, 10.0, APPROXIMATE_RECURSIVE_BINARY);
167 //num = cspline_approximate(&c, q, 10.0, APPROXIMATE_INFLECTION);
169 num = cspline_approximate(&c, q, 1.0, APPROXIMATE_RECURSIVE_BINARY);
173 moveto(tag,q[t].start);
174 splineto(tag,q[t].control, q[t].end);
184 /* draw a T1 outline. These are generated by pdf2swf and by t1lib.
185 (representing characters) */
186 void drawpath(TAG*tag, T1_OUTLINE*outline, struct swfmatrix*m, int log)
188 if(tag->id != ST_DEFINEFONT &&
189 tag->id != ST_DEFINESHAPE &&
190 tag->id != ST_DEFINESHAPE2 &&
191 tag->id != ST_DEFINESHAPE3)
193 logf("<error> internal error: drawpath needs a shape tag, not %d\n",tag->id);
197 double lastx=0,lasty=0;
198 double firstx=0,firsty=0;
203 x += (outline->dest.x/(float)0xffff);
204 y += (outline->dest.y/(float)0xffff);
205 if(outline->type == T1_PATHTYPE_MOVE)
207 if(((int)(lastx*20) != (int)(firstx*20) ||
208 (int)(lasty*20) != (int)(firsty*20)) &&
217 if(log) printf("fix: %f,%f -> %f,%f\n",p0.x,p0.y,p1.x,p1.y);
218 line(tag, p0, p1, m);
224 else if(outline->type == T1_PATHTYPE_LINE)
232 if(log) printf("line: %f,%f -> %f,%f\n",p0.x,p0.y,p1.x,p1.y);
235 else if(outline->type == T1_PATHTYPE_BEZIER)
241 T1_BEZIERSEGMENT*o2 = (T1_BEZIERSEGMENT*)outline;
244 p1.x=o2->C.x/(float)0xffff+lastx;
245 p1.y=o2->C.y/(float)0xffff+lasty;
246 p2.x=o2->B.x/(float)0xffff+lastx;
247 p2.y=o2->B.y/(float)0xffff+lasty;
250 if(log) printf("spline: %f,%f -> %f,%f\n",p3.x,p3.y,p0.x,p0.y);
251 spline(tag,p0,p1,p2,p3,m);
254 logf("<error> drawpath: unknown outline type:%d\n", outline->type);
258 outline = outline->link;
260 if(((int)(lastx*20) != (int)(firstx*20) ||
261 (int)(lasty*20) != (int)(firsty*20)) &&
270 if(log) printf("fix: %f,%f -> %f,%f\n",p0.x,p0.y,p1.x,p1.y);
271 line(tag, p0, p1, m);
275 static inline int colorcompare(RGBA*a,RGBA*b)
287 static const int CHARDATAMAX = 1024;
295 } chardata[CHARDATAMAX];
298 static void putcharacters(TAG*tag)
303 color.r = chardata[0].color.r^255;
312 int charadvance[128];
315 int glyphbits=1; //TODO: can this be zero?
318 if(tag->id != ST_DEFINETEXT &&
319 tag->id != ST_DEFINETEXT2) {
320 logf("<error> internal error: putcharacters needs an text tag, not %d\n",tag->id);
324 logf("<warning> putcharacters called with zero characters");
327 for(pass = 0; pass < 2; pass++)
337 advancebits++; // add sign bit
338 swf_SetU8(tag, glyphbits);
339 swf_SetU8(tag, advancebits);
342 for(t=0;t<=chardatapos;t++)
344 if(lastfontid != chardata[t].fontid ||
345 lastx!=chardata[t].x ||
346 lasty!=chardata[t].y ||
347 !colorcompare(&color, &chardata[t].color) ||
349 lastsize != chardata[t].size ||
352 if(charstorepos && pass==0)
355 for(s=0;s<charstorepos;s++)
357 while(charids[s]>=(1<<glyphbits))
359 while(charadvance[s]>=(1<<advancebits))
363 if(charstorepos && pass==1)
365 tag->writeBit = 0; // Q&D
366 swf_SetBits(tag, 0, 1); // GLYPH Record
367 swf_SetBits(tag, charstorepos, 7); // number of glyphs
369 for(s=0;s<charstorepos;s++)
371 swf_SetBits(tag, charids[s], glyphbits);
372 swf_SetBits(tag, charadvance[s], advancebits);
377 if(pass == 1 && t<chardatapos)
383 if(lastx != chardata[t].x ||
384 lasty != chardata[t].y)
389 if(!colorcompare(&color, &chardata[t].color))
391 color = chardata[t].color;
394 font.id = chardata[t].fontid;
395 if(lastfontid != chardata[t].fontid || lastsize != chardata[t].size)
398 tag->writeBit = 0; // Q&D
399 swf_TextSetInfoRecord(tag, newfont, chardata[t].size, newcolor, newx,newy);
402 lastfontid = chardata[t].fontid;
403 lastx = chardata[t].x;
404 lasty = chardata[t].y;
405 lastsize = chardata[t].size;
412 int nextt = t==chardatapos-1?t:t+1;
413 int rel = chardata[nextt].x-chardata[t].x;
414 if(rel>=0 && (rel<(1<<(advancebits-1)) || pass==0)) {
416 lastx=chardata[nextt].x;
422 charids[charstorepos] = chardata[t].charid;
423 charadvance[charstorepos] = advance;
430 static void putcharacter(struct swfoutput*obj, int fontid, int charid,
431 int x,int y, int size)
433 if(chardatapos == CHARDATAMAX)
438 chardata[chardatapos].fontid = fontid;
439 chardata[chardatapos].charid = charid;
440 chardata[chardatapos].x = x;
441 chardata[chardatapos].y = y;
442 chardata[chardatapos].color = obj->fillrgb;
443 chardata[chardatapos].size = size;
448 /* process a character. */
449 static void drawchar(struct swfoutput*obj, SWFFont*font, char*character, int charnr, swfmatrix*m)
452 if(m->m12!=0 || m->m21!=0)
457 if(usefonts && ! drawonlyshapes)
459 int charid = font->getSWFCharID(character, charnr);
464 putcharacter(obj, font->swfid, charid,(int)(m->m13*20),(int)(m->m23*20),
465 (int)(m->m11*20/2+0.5)); //where does the /2 come from?
469 T1_OUTLINE*outline = font->getOutline(character, charnr);
470 char* charname = character;
473 logf("<warning> Didn't find %s in current charset (%s)",
474 FIXNULL(character),FIXNULL(font->getName()));
490 swf_ShapeSetStyle(tag,shape,0x8000,fillstyleid,0);
491 fillstylechanged = 1;
497 drawpath(tag, outline, &m2, 0);
502 /* draw a curved polygon. */
503 void swfoutput_drawpath(swfoutput*output, T1_OUTLINE*outline,
509 /* Multiple polygons in one shape don't overlap correctly,
510 so we better start a new shape here if the polygon is filled
512 if(shapeid>=0 && fill && !ignoredraworder) {
519 if(lastwasfill && !fill)
521 swf_ShapeSetStyle(tag,shape,linestyleid,0x8000,0);
522 fillstylechanged = 1;
525 if(!lastwasfill && fill)
527 swf_ShapeSetStyle(tag,shape,0x8000,fillstyleid,0);
528 fillstylechanged = 1;
532 drawpath(tag, outline,m, 0);
535 /* SWFFont: copy all t1 font outlines to a local
537 SWFFont::SWFFont(char*name, int id, char*filename)
539 if(!T1_GetFontName(id))
542 this->name = strdup(T1_GetFontFileName(id));
543 this->fontid = strdup(name);
546 char**a= T1_GetAllCharNames(id);
557 logf("<verbose> Font %s(%d): Storing %d outlines.\n", FIXNULL(name), id, charnum);
559 this->standardtablesize = 256;
560 if(this->charnum < this->standardtablesize)
561 this->standardtablesize = this->charnum;
562 this->standardtable = (char**)malloc(standardtablesize*sizeof(char*));
564 for(t = 0; t < this->standardtablesize; t++) {
565 char*name = T1_GetCharName(id,t);
568 standardtable[t] = strdup(name);
571 outline = (T1_OUTLINE**)malloc(charnum*sizeof(T1_OUTLINE*));
572 charname = (char**)malloc(charnum*sizeof(char*));
573 width = (int*)malloc(charnum*sizeof(int));
574 memset(width, 0, charnum*sizeof(int));
575 memset(charname, 0, charnum*sizeof(char*));
576 used = (char*)malloc(charnum*sizeof(char));
577 char2swfcharid = (U16*)malloc(charnum*2);
578 swfcharid2char = (U16*)malloc(charnum*2);
581 memset(used,0,charnum*sizeof(char));
583 this->swfid = ++currentswfid;
596 int ret = T1_ReencodeFont(id, map);
600 int ret = T1_ReencodeFont(id, map);
602 fprintf(stderr,"Can't reencode font: (%s) ret:%d\n",filename, ret);
608 char* name = T1_GetCharName(id, s);
610 this->outline[outlinepos] = T1_CopyOutline(T1_GetCharOutline(id, s, 100.0, 0));
611 this->width[outlinepos] = T1_GetCharWidth(id, s);
612 this->charname[outlinepos] = strdup(name);
620 /* free all tables, write out definefont tags */
626 if(storeallcharacters)
629 for(t=0;t<this->charnum;t++)
631 if(this->charname[t])
632 getSWFCharID(this->charname[t], -1);
636 ptr = (int*)malloc(swfcharpos*sizeof(int));
638 for(t=0;t<charnum;t++)
639 if(used[t]) usednum++;
641 if(usednum && !drawonlyshapes)
643 logf("<verbose> Font %s has %d used characters",FIXNULL(fontid), usednum);
644 TAG*ftag = swf_InsertTag(swf.firstTag,ST_DEFINEFONT);
645 swf_SetU16(ftag, this->swfid);
646 int initpos = swf_GetTagLen(ftag);
653 for(t=0;t<swfcharpos;t++)
655 ptr[t] = swf_GetTagLen(ftag);
656 swf_SetU16(ftag, 0x1234);
658 for(t=0;t<swfcharpos;t++)
660 *(U16*)&ftag->data[ptr[t]] =
661 SWAP16(swf_GetTagLen(ftag)-initpos);
665 swf_SetU8(ftag,0x10); //1 fill bits, 0 linestyle bits
669 swf_ShapeSetStyle(ftag,&s,0,1,0);
670 fillstylechanged = 1;
674 drawpath(ftag, outline[swfcharid2char[t]],&m, 0);
677 swf_ShapeSetEnd(ftag);
679 ftag = swf_InsertTag(ftag,ST_DEFINEFONTINFO);
680 swf_SetU16(ftag, this->swfid);
682 swf_SetU8(ftag, strlen(this->fontid));
683 swf_SetBlock(ftag, (U8*)this->fontid, strlen(this->fontid));
687 swf_SetU8(ftag, 0); //flags
688 for(t=0;t<swfcharpos;t++)
691 char * name = this->charname[this->swfcharid2char[t]];
693 if(standardEncodingNames[s] &&
694 !strcmp(name,standardEncodingNames[s]))
697 swf_SetU8(ftag, (U8)s);
703 for(t=0;t<charnum;t++)
705 for(t=0;t<standardtablesize;t++)
706 if(standardtable[t]) {
707 free(standardtable[t]);
713 free(swfcharid2char);
714 free(char2swfcharid);
717 T1_OUTLINE*SWFFont::getOutline(char*name, int charnr)
720 for(t=0;t<this->charnum;t++) {
721 if(!strcmp(this->charname[t],name)) {
726 /* if we didn't find the character, maybe
727 we can find the capitalized version */
728 for(t=0;t<this->charnum;t++) {
729 if(!strcasecmp(this->charname[t],name))
733 /* if we didn't find it by name, use the names of the first 256 characters
734 of the font to try a new name based on charnr */
735 if(this->standardtable && charnr>=0 && charnr < this->standardtablesize) {
736 return getOutline(this->standardtable[charnr], -1);
739 logf("<warning> Didn't find character '%s' in font '%s'", FIXNULL(name), this->name);
743 int SWFFont::getSWFCharID(char*name, int charnr)
746 for(t=0;t<this->charnum;t++) {
747 if(!strcmp(this->charname[t],name)) {
750 swfcharid2char[swfcharpos] = t;
751 char2swfcharid[t] = swfcharpos++;
754 return char2swfcharid[t];
758 /* if we didn't find the character, maybe
759 we can find the capitalized version */
760 for(t=0;t<this->charnum;t++) {
761 if(!strcasecmp(this->charname[t],name)) {
764 swfcharid2char[swfcharpos] = t;
765 char2swfcharid[t] = swfcharpos++;
768 return char2swfcharid[t];
772 /* if we didn't find it by name, use the names of the first 256 (or so) characters
773 of the font to try a new name based on charnr */
774 if(this->standardtable && charnr>=0 && charnr < this->standardtablesize) {
775 return getSWFCharID(this->standardtable[charnr], -1);
777 logf("<warning> Didn't find character '%s' in font '%s'", FIXNULL(name), this->name);
781 int SWFFont::getWidth(char*name)
784 for(t=0;t<this->charnum;t++) {
785 if(!strcmp(this->charname[t],name)) {
786 return this->width[t];
792 char*SWFFont::getName()
803 /* set's the t1 font index of the font to use for swfoutput_drawchar(). */
804 void swfoutput_setfont(struct swfoutput*obj, char*fontid, int t1id, char*filename)
806 fontlist_t*last=0,*iterator;
807 if(obj->font && !strcmp(obj->font->fontid,fontid))
812 if(!strcmp(iterator->font->fontid,fontid))
815 iterator = iterator->next;
819 obj->font = iterator->font;
824 logf("<error> internal error: t1id:%d, fontid:%s\n", t1id,FIXNULL(fontid));
827 SWFFont*font = new SWFFont(fontid, t1id, filename);
828 iterator = new fontlist_t;
829 iterator->font = font;
833 last->next = iterator;
839 int swfoutput_queryfont(struct swfoutput*obj, char*fontid)
841 fontlist_t *iterator = fontlist;
843 if(!strcmp(iterator->font->fontid,fontid))
845 iterator = iterator->next;
850 /* set's the matrix which is to be applied to characters drawn by
851 swfoutput_drawchar() */
852 void swfoutput_setfontmatrix(struct swfoutput*obj,double m11,double m12,
853 double m21,double m22)
855 if(obj->fontm11 == m11 &&
856 obj->fontm12 == m12 &&
857 obj->fontm21 == m21 &&
868 /* draws a character at x,y. */
869 void swfoutput_drawchar(struct swfoutput* obj,double x,double y,char*character, int charnr)
872 m.m11 = obj->fontm11;
873 m.m12 = obj->fontm12;
874 m.m21 = obj->fontm21;
875 m.m22 = obj->fontm22;
878 drawchar(obj, obj->font, character, charnr, &m);
881 /* initialize the swf writer */
882 void swfoutput_init(struct swfoutput* obj, char*_filename, int _sizex, int _sizey)
887 memset(obj, 0, sizeof(struct swfoutput));
888 filename = _filename;
892 logf("<verbose> initializing swf output for size %d*%d\n", sizex,sizey);
896 memset(&swf,0x00,sizeof(SWF));
898 swf.fileVersion = flashversion;
899 swf.frameRate = 0x0040; // 1 frame per 4 seconds
900 swf.movieSize.xmax = 20*sizex;
901 swf.movieSize.ymax = 20*sizey;
903 swf.firstTag = swf_InsertTag(NULL,ST_SETBACKGROUNDCOLOR);
908 swf_SetRGB(tag,&rgb);
909 if(flag_protected) // good practice! /r
910 tag = swf_InsertTag(tag, ST_PROTECT);
915 void swfoutput_setprotected() //write PROTECT tag
920 static void startshape(struct swfoutput*obj)
928 tag = swf_InsertTag(tag,ST_DEFINESHAPE);
930 swf_ShapeNew(&shape);
931 linestyleid = swf_ShapeAddLineStyle(shape,obj->linewidth,&obj->strokergb);
932 rgb.r = obj->fillrgb.r;
933 rgb.g = obj->fillrgb.g;
934 rgb.b = obj->fillrgb.b;
935 fillstyleid = swf_ShapeAddSolidFillStyle(shape,&obj->fillrgb);
937 shapeid = ++currentswfid;
938 swf_SetU16(tag,shapeid); // ID
947 swf_SetShapeStyles(tag,shape);
948 swf_ShapeCountBits(shape,NULL,NULL);
949 swf_SetShapeBits(tag,shape);
951 swf_ShapeSetAll(tag,shape,/*x*/0,/*y*/0,linestyleid,0,0);
956 static void starttext(struct swfoutput*obj)
962 tag = swf_InsertTag(tag,ST_DEFINETEXT);
963 textid = ++currentswfid;
964 swf_SetU16(tag, textid);
980 swf_SetMatrix(tag,&m);
984 static void endshape()
988 swf_ShapeSetEnd(tag);
989 tag = swf_InsertTag(tag,ST_PLACEOBJECT2);
990 swf_ObjectPlace(tag,shapeid,/*depth*/depth++,NULL,NULL,NULL);
994 static void endtext()
1000 tag = swf_InsertTag(tag,ST_PLACEOBJECT2);
1001 swf_ObjectPlace(tag,textid,/*depth*/depth++,NULL,NULL,NULL);
1005 static void endpage(struct swfoutput*obj)
1012 swfoutput_endclip(obj);
1016 atag = action_Stop(atag);
1017 atag = action_End(atag);
1018 tag = swf_InsertTag(tag,ST_DOACTION);
1019 swf_ActionSet(tag,atag);
1021 tag = swf_InsertTag(tag,ST_SHOWFRAME);
1024 void swfoutput_newpage(struct swfoutput*obj)
1028 for(depth--;depth>=startdepth;depth--) {
1029 tag = swf_InsertTag(tag,ST_REMOVEOBJECT2);
1030 swf_SetU16(tag,depth);
1037 /* "destroy" like in (oo-terminology) "destructor". Perform cleaning
1038 up, complete the swf, and write it out. */
1039 void swfoutput_destroy(struct swfoutput* obj)
1042 fontlist_t *tmp,*iterator = fontlist;
1044 delete iterator->font;
1047 iterator = iterator->next;
1055 fi = open(filename, O_BINARY|O_CREAT|O_TRUNC|O_WRONLY, 0777);
1060 logf("<fatal> Could not create \"%s\". ", FIXNULL(filename));
1064 tag = swf_InsertTag(tag,ST_END);
1067 if FAILED(swf_WriteSWC(fi,&swf))
1068 logf("<error> WriteSWC() failed.\n");
1070 if FAILED(swf_WriteSWF(fi,&swf))
1071 logf("<error> WriteSWF() failed.\n");
1076 logf("<notice> SWF written\n");
1079 void swfoutput_setdrawmode(swfoutput* obj, int mode)
1082 if(mode == DRAWMODE_FILL)
1084 else if(mode == DRAWMODE_EOFILL)
1086 else if(mode == DRAWMODE_STROKE)
1088 else if(mode == DRAWMODE_CLIP)
1090 else if(mode == DRAWMODE_EOCLIP)
1094 void swfoutput_setfillcolor(swfoutput* obj, u8 r, u8 g, u8 b, u8 a)
1096 if(obj->fillrgb.r == r &&
1097 obj->fillrgb.g == g &&
1098 obj->fillrgb.b == b &&
1099 obj->fillrgb.a == a) return;
1109 void swfoutput_setstrokecolor(swfoutput* obj, u8 r, u8 g, u8 b, u8 a)
1111 if(obj->strokergb.r == r &&
1112 obj->strokergb.g == g &&
1113 obj->strokergb.b == b &&
1114 obj->strokergb.a == a) return;
1118 obj->strokergb.r = r;
1119 obj->strokergb.g = g;
1120 obj->strokergb.b = b;
1121 obj->strokergb.a = a;
1124 void swfoutput_setlinewidth(struct swfoutput*obj, double linewidth)
1126 if(obj->linewidth == (u16)(linewidth*20))
1131 obj->linewidth = (u16)(linewidth*20);
1135 void swfoutput_startclip(swfoutput*obj, T1_OUTLINE*outline, struct swfmatrix*m)
1144 logf("<warning> Too many clip levels.");
1149 int olddrawmode = drawmode;
1150 swfoutput_setdrawmode(obj, DRAWMODE_CLIP);
1151 swfoutput_drawpath(obj, outline, m);
1152 swf_ShapeSetEnd(tag);
1153 swfoutput_setdrawmode(obj, olddrawmode);
1155 tag = swf_InsertTag(tag,ST_PLACEOBJECT2);
1156 cliptags[clippos] = tag;
1157 clipshapes[clippos] = shapeid;
1158 clipdepths[clippos] = depth++;
1163 void swfoutput_endclip(swfoutput*obj)
1171 logf("<error> Invalid end of clipping region");
1175 swf_ObjectPlaceClip(cliptags[clippos],clipshapes[clippos],clipdepths[clippos],NULL,NULL,NULL,depth++);
1178 static void drawlink(struct swfoutput*obj, ActionTAG*,ActionTAG*, swfcoord*points, char mouseover);
1180 void swfoutput_linktourl(struct swfoutput*obj, char*url, swfcoord*points)
1183 if(!strncmp("http://pdf2swf:", url, 15)) {
1184 char*tmp = strdup(url);
1185 int l = strlen(tmp);
1188 swfoutput_namedlink(obj, tmp+15, points);
1199 actions = action_GetUrl(0, url, "_parent");
1201 actions = action_GetUrl(0, url, "_this");
1202 actions = action_End(actions);
1204 drawlink(obj, actions, 0, points,0);
1206 void swfoutput_linktopage(struct swfoutput*obj, int page, swfcoord*points)
1215 actions = action_GotoFrame(0, page);
1216 actions = action_End(actions);
1218 drawlink(obj, actions, 0, points,0);
1221 /* Named Links (a.k.a. Acrobatmenu) are used to implement various gadgets
1222 of the viewer objects, like subtitles, index elements etc.
1224 void swfoutput_namedlink(struct swfoutput*obj, char*name, swfcoord*points)
1226 ActionTAG *actions1,*actions2;
1227 char*tmp = strdup(name);
1235 if(!strncmp(tmp, "call:", 5))
1237 char*x = strchr(&tmp[5], ':');
1239 actions1 = action_PushInt(0, 0); //number of parameters (0)
1240 actions1 = action_PushString(actions1, &tmp[5]); //function name
1241 actions1 = action_CallFunction(actions1);
1244 actions1 = action_PushString(0, x+1); //parameter
1245 actions1 = action_PushInt(actions1, 1); //number of parameters (1)
1246 actions1 = action_PushString(actions1, &tmp[5]); //function name
1247 actions1 = action_CallFunction(actions1);
1249 actions2 = action_End(0);
1254 actions1 = action_PushString(0, "/:subtitle");
1255 actions1 = action_PushString(actions1, name);
1256 actions1 = action_SetVariable(actions1);
1257 actions1 = action_End(actions1);
1259 actions2 = action_PushString(0, "/:subtitle");
1260 actions2 = action_PushString(actions2, "");
1261 actions2 = action_SetVariable(actions2);
1262 actions2 = action_End(actions2);
1265 drawlink(obj, actions1, actions2, points,mouseover);
1267 swf_ActionFree(actions1);
1268 swf_ActionFree(actions2);
1272 static void drawlink(struct swfoutput*obj, ActionTAG*actions1, ActionTAG*actions2, swfcoord*points, char mouseover)
1278 struct plotxy p1,p2,p3,p4;
1282 double xmax=xmin=points[0].x,ymax=ymin=points[0].y;
1286 int buttonid = ++currentswfid;
1289 if(points[t].x>xmax) xmax=points[t].x;
1290 if(points[t].y>ymax) ymax=points[t].y;
1291 if(points[t].x<xmin) xmin=points[t].x;
1292 if(points[t].y<ymin) ymin=points[t].y;
1295 p1.x=points[0].x; p1.y=points[0].y; p2.x=points[1].x; p2.y=points[1].y;
1296 p3.x=points[2].x; p3.y=points[2].y; p4.x=points[3].x; p4.y=points[3].y;
1298 /* the following code subtracts the upper left edge from all coordinates,
1299 and set's posx,posy so that ST_PLACEOBJECT is used with a matrix.
1300 Necessary for preprocessing with swfcombine. */
1301 posx = xmin; posy = ymin;
1302 p1.x-=posx;p2.x-=posx;p3.x-=posx;p4.x-=posx;
1303 p1.y-=posy;p2.y-=posy;p3.y-=posy;p4.y-=posy;
1304 xmin -= posx; ymin -= posy;
1305 xmax -= posx; ymax -= posy;
1308 myshapeid = ++currentswfid;
1309 tag = swf_InsertTag(tag,ST_DEFINESHAPE3);
1310 swf_ShapeNew(&shape);
1311 rgb.r = rgb.b = rgb.a = rgb.g = 0;
1312 fsid = swf_ShapeAddSolidFillStyle(shape,&rgb);
1313 swf_SetU16(tag, myshapeid);
1314 r.xmin = (int)(xmin*20);
1315 r.ymin = (int)(ymin*20);
1316 r.xmax = (int)(xmax*20);
1317 r.ymax = (int)(ymax*20);
1318 swf_SetRect(tag,&r);
1319 swf_SetShapeStyles(tag,shape);
1320 swf_ShapeCountBits(shape,NULL,NULL);
1321 swf_SetShapeBits(tag,shape);
1322 swf_ShapeSetAll(tag,shape,/*x*/0,/*y*/0,0,fsid,0);
1323 swflastx = swflasty = 0;
1329 swf_ShapeSetEnd(tag);
1332 myshapeid2 = ++currentswfid;
1333 tag = swf_InsertTag(tag,ST_DEFINESHAPE3);
1334 swf_ShapeNew(&shape);
1335 rgb.r = rgb.b = rgb.a = rgb.g = 255;
1337 fsid = swf_ShapeAddSolidFillStyle(shape,&rgb);
1338 swf_SetU16(tag, myshapeid2);
1339 r.xmin = (int)(xmin*20);
1340 r.ymin = (int)(ymin*20);
1341 r.xmax = (int)(xmax*20);
1342 r.ymax = (int)(ymax*20);
1343 swf_SetRect(tag,&r);
1344 swf_SetShapeStyles(tag,shape);
1345 swf_ShapeCountBits(shape,NULL,NULL);
1346 swf_SetShapeBits(tag,shape);
1347 swf_ShapeSetAll(tag,shape,/*x*/0,/*y*/0,0,fsid,0);
1348 swflastx = swflasty = 0;
1354 swf_ShapeSetEnd(tag);
1358 tag = swf_InsertTag(tag,ST_DEFINEBUTTON);
1359 swf_SetU16(tag,buttonid); //id
1360 swf_ButtonSetFlags(tag, 0); //menu=no
1361 swf_ButtonSetRecord(tag,0x01,myshapeid,depth,0,0);
1362 swf_ButtonSetRecord(tag,0x02,myshapeid2,depth,0,0);
1363 swf_ButtonSetRecord(tag,0x04,myshapeid2,depth,0,0);
1364 swf_ButtonSetRecord(tag,0x08,myshapeid,depth,0,0);
1366 swf_ActionSet(tag,actions1);
1371 tag = swf_InsertTag(tag,ST_DEFINEBUTTON2);
1372 swf_SetU16(tag,buttonid); //id
1373 swf_ButtonSetFlags(tag, 0); //menu=no
1374 swf_ButtonSetRecord(tag,0x01,myshapeid,depth,0,0);
1375 swf_ButtonSetRecord(tag,0x02,myshapeid2,depth,0,0);
1376 swf_ButtonSetRecord(tag,0x04,myshapeid2,depth,0,0);
1377 swf_ButtonSetRecord(tag,0x08,myshapeid,depth,0,0);
1378 swf_SetU8(tag,0); // end of button records
1379 swf_ButtonSetCondition(tag, BC_IDLE_OVERUP);
1380 swf_ActionSet(tag,actions1);
1382 swf_ButtonSetCondition(tag, BC_OVERUP_IDLE);
1383 swf_ActionSet(tag,actions2);
1385 swf_ButtonPostProcess(tag, 2);
1388 swf_ButtonPostProcess(tag, 1);
1392 tag = swf_InsertTag(tag,ST_PLACEOBJECT2);
1394 if(posx!=0 || posy!=0) {
1396 swf_GetMatrix(0,&m);
1397 m.tx = (int)(posx*20);
1398 m.ty = (int)(posy*20);
1399 swf_ObjectPlace(tag, buttonid, depth++,&m,0,0);
1402 swf_ObjectPlace(tag, buttonid, depth++,0,0,0);
1406 static void drawimage(struct swfoutput*obj, int bitid, int sizex,int sizey,
1407 double x1,double y1,
1408 double x2,double y2,
1409 double x3,double y3,
1410 double x4,double y4)
1416 struct plotxy p1,p2,p3,p4;
1418 double xmax=x1,ymax=y1,xmin=x1,ymin=y1;
1419 if(x2>xmax) xmax=x2;
1420 if(y2>ymax) ymax=y2;
1421 if(x2<xmin) xmin=x2;
1422 if(y2<ymin) ymin=y2;
1423 if(x3>xmax) xmax=x3;
1424 if(y3>ymax) ymax=y3;
1425 if(x3<xmin) xmin=x3;
1426 if(y3<ymin) ymin=y3;
1427 if(x4>xmax) xmax=x4;
1428 if(y4>ymax) ymax=y4;
1429 if(x4<xmin) xmin=x4;
1430 if(y4<ymin) ymin=y4;
1436 {p1.x = (int)(p1.x*20)/20.0;
1437 p1.y = (int)(p1.y*20)/20.0;
1438 p2.x = (int)(p2.x*20)/20.0;
1439 p2.y = (int)(p2.y*20)/20.0;
1440 p3.x = (int)(p3.x*20)/20.0;
1441 p3.y = (int)(p3.y*20)/20.0;
1442 p4.x = (int)(p4.x*20)/20.0;
1443 p4.y = (int)(p4.y*20)/20.0;}
1446 m.sx = (int)(65536*20*(p4.x-p1.x)/sizex);
1447 m.r1 = -(int)(65536*20*(p4.y-p1.y)/sizex);
1448 m.r0 = (int)(65536*20*(p1.x-p2.x)/sizey);
1449 m.sy = -(int)(65536*20*(p1.y-p2.y)/sizey);
1451 m.tx = (int)(p1.x*20);
1452 m.ty = (int)(p1.y*20);
1455 myshapeid = ++currentswfid;
1456 tag = swf_InsertTag(tag,ST_DEFINESHAPE);
1457 swf_ShapeNew(&shape);
1458 //lsid = ShapeAddLineStyle(shape,obj->linewidth,&obj->strokergb);
1459 //fsid = ShapeAddSolidFillStyle(shape,&obj->fillrgb);
1460 fsid = swf_ShapeAddBitmapFillStyle(shape,&m,bitid,1);
1461 swf_SetU16(tag, myshapeid);
1462 r.xmin = (int)(xmin*20);
1463 r.ymin = (int)(ymin*20);
1464 r.xmax = (int)(xmax*20);
1465 r.ymax = (int)(ymax*20);
1466 swf_SetRect(tag,&r);
1467 swf_SetShapeStyles(tag,shape);
1468 swf_ShapeCountBits(shape,NULL,NULL);
1469 swf_SetShapeBits(tag,shape);
1470 swf_ShapeSetAll(tag,shape,/*x*/0,/*y*/0,lsid,fsid,0);
1471 swflastx = swflasty = 0;
1478 ShapeMoveTo (tag, shape, (int)(x1*20),(int)(y1*20));
1479 ShapeSetLine (tag, shape, (int)(x1*20);
1480 ShapeSetLine (tag, shape, x*20,0);
1481 ShapeSetLine (tag, shape, 0,-y*20);
1482 ShapeSetLine (tag, shape, -x*20,0);*/
1483 swf_ShapeSetEnd(tag);
1486 tag = swf_InsertTag(tag,ST_PLACEOBJECT2);
1487 swf_ObjectPlace(tag,myshapeid,/*depth*/depth++,NULL,NULL,NULL);
1490 int swfoutput_drawimagejpeg_old(struct swfoutput*obj, char*filename, int sizex,int sizey,
1491 double x1,double y1,
1492 double x2,double y2,
1493 double x3,double y3,
1494 double x4,double y4)
1502 int bitid = ++currentswfid;
1504 tag = swf_InsertTag(tag,ST_DEFINEBITSJPEG2);
1505 swf_SetU16(tag, bitid);
1506 if(swf_SetJPEGBits(tag, filename, jpegquality)<0) {
1512 drawimage(obj, bitid, sizex, sizey, x1,y1,x2,y2,x3,y3,x4,y4);
1516 int swfoutput_drawimagejpeg(struct swfoutput*obj, RGBA*mem, int sizex,int sizey,
1517 double x1,double y1,
1518 double x2,double y2,
1519 double x3,double y3,
1520 double x4,double y4)
1530 int bitid = ++currentswfid;
1532 tag = swf_InsertTag(tag,ST_DEFINEBITSJPEG2);
1533 swf_SetU16(tag, bitid);
1534 swf_SetJPEGBits2(tag,sizex,sizey,mem,jpegquality);
1535 drawimage(obj, bitid, sizex, sizey, x1,y1,x2,y2,x3,y3,x4,y4);
1539 int swfoutput_drawimagelossless(struct swfoutput*obj, RGBA*mem, int sizex,int sizey,
1540 double x1,double y1,
1541 double x2,double y2,
1542 double x3,double y3,
1543 double x4,double y4)
1551 int bitid = ++currentswfid;
1553 tag = swf_InsertTag(tag,ST_DEFINEBITSLOSSLESS);
1554 swf_SetU16(tag, bitid);
1555 if(swf_SetLosslessBits(tag,sizex,sizey,mem, BMF_32BIT)<0) {
1561 drawimage(obj, bitid, sizex, sizey, x1,y1,x2,y2,x3,y3,x4,y4);
1565 int swfoutput_drawimagelosslessN(struct swfoutput*obj, U8*mem, RGBA*pal, int sizex,int sizey,
1566 double x1,double y1,
1567 double x2,double y2,
1568 double x3,double y3,
1569 double x4,double y4, int n)
1580 /* SWF expects scanlines to be 4 byte aligned */
1583 mem2 = (U8*)malloc(BYTES_PER_SCANLINE(sizex)*sizey);
1585 for(y=0;y<sizey;y++)
1587 for(x=0;x<sizex;x++)
1588 *ptr++ = mem[y*sizex+x];
1589 ptr+= BYTES_PER_SCANLINE(sizex)-sizex;
1594 int bitid = ++currentswfid;
1596 tag = swf_InsertTag(tag,ST_DEFINEBITSLOSSLESS2);
1597 swf_SetU16(tag, bitid);
1598 if(swf_SetLosslessBitsIndexed(tag,sizex,sizey,mem, pal, n)<0) {
1606 drawimage(obj, bitid, sizex, sizey, x1,y1,x2,y2,x3,y3,x4,y4);
1610 void swfoutput_drawimageagain(struct swfoutput*obj, int id, int sizex,int sizey,
1611 double x1,double y1,
1612 double x2,double y2,
1613 double x3,double y3,
1614 double x4,double y4)
1622 drawimage(obj, id, sizex, sizey, x1,y1,x2,y2,x3,y3,x4,y4);