fixed avm3 detection
[swftools.git] / src / pdf2swf.c
1 /* pdf2swf.c
2    main routine for pdf2swf(1)
3
4    Part of the swftools package.
5    
6    Copyright (c) 2001,2002,2003 Matthias Kramm <kramm@quiss.org> 
7  
8    This program is free software; you can redistribute it and/or modify
9    it under the terms of the GNU General Public License as published by
10    the Free Software Foundation; either version 2 of the License, or
11    (at your option) any later version.
12
13    This program is distributed in the hope that it will be useful,
14    but WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    GNU General Public License for more details.
17
18    You should have received a copy of the GNU General Public License
19    along with this program; if not, write to the Free Software
20    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
21
22 #include <stdlib.h>
23 #include <stdio.h>
24 #include <stdarg.h>
25 #include <string.h>
26 #include <memory.h>
27 #include <unistd.h>
28 #include "../config.h"
29 #ifdef HAVE_SIGNAL_H
30 #include <signal.h>
31 #endif
32 #ifdef HAVE_DIRENT_H
33 #include <dirent.h>
34 #endif
35 #ifdef HAVE_MALLOC_H
36 #include <malloc.h>
37 #endif
38
39 #include "../lib/args.h"
40 #include "../lib/os.h"
41 #include "../lib/rfxswf.h"
42 #include "../lib/devices/swf.h"
43 #include "../lib/devices/polyops.h"
44 #include "../lib/devices/record.h"
45 #include "../lib/pdf/pdf.h"
46 #include "../lib/log.h"
47
48 #define SWFDIR concatPaths(getInstallationPath(), "swfs")
49
50 static gfxsource_t*driver = 0;
51 static gfxdevice_t*out = 0;
52
53 static char * outputname = 0;
54 static int loglevel = 3;
55 static char * pagerange = 0;
56 static char * filename = 0;
57 static char * password = 0;
58 static int zlib = 0;
59
60 static char * preloader = 0;
61 static char * viewer = 0;
62 static int xnup = 1;
63 static int ynup = 1;
64
65 static int info_only = 0;
66
67 static int max_time = 0;
68
69 static int flatten = 0;
70
71 char* fontpaths[256];
72 int fontpathpos = 0;
73
74 int move_x=0;
75 int move_y=0;
76 int custom_move = 0;
77 int clip_x1=0,clip_y1=0,clip_x2=0,clip_y2=0;
78 int custom_clip = 0;
79
80 static int system_quiet=0;
81
82 int systemf(const char* format, ...)
83 {
84     char buf[1024];
85     int ret;
86     va_list arglist;
87     va_start(arglist, format);
88     vsprintf(buf, format, arglist);
89     va_end(arglist);
90
91     if(!system_quiet) {
92         printf("%s\n", buf);
93         fflush(stdout);
94     }
95     ret = system(buf);
96     if(ret) {
97         fprintf(stderr, "system() returned %d\n", ret);
98         exit(ret);
99     }
100     return ret;
101 }
102
103 #ifdef HAVE_SIGNAL_H
104 void sigalarm(int signal)
105 {
106     msg("<fatal> Aborting rendering after %d seconds", max_time);
107 #if 0 && defined(HAVE_SYS_TIME_H) && defined(HAVE_SYS_RESOURCE_H) && defined(HAVE_GETRUSAGE)
108     struct rusage usage;
109     getrusage(RUSAGE_CHILDREN, &usage);
110     msg("<fatal> Memory used: %d,%d,%d", usage.ru_maxrss, usage.ru_idrss, usage.ru_isrss);
111 #endif 
112 #if defined(HAVE_MALLINFO) && defined(HAVE_MALLOC_H)
113     struct mallinfo info = mallinfo();
114     msg("<fatal> Memory used: %d Mb (%d bytes)", info.uordblks/1048576, info.uordblks);
115 #endif
116     exit(1);
117 }
118 #endif
119
120 typedef struct _parameter {
121     struct _parameter*next;
122     const char*name;
123     const char*value;
124 } parameter_t;
125
126 static parameter_t* device_config = 0;
127 static parameter_t* device_config_next = 0;
128 static void store_parameter(const char*name, const char*value)
129 {
130     parameter_t*o = device_config;
131     while(o) {
132         if(!strcmp(name, o->name)) {
133             /* overwrite old value */
134             free((void*)o->value);
135             o->value = strdup(value);
136             return;
137         }
138         o = o->next;
139     }
140     parameter_t*p = (parameter_t*)malloc(sizeof(parameter_t));
141     p->name = strdup(name);
142     p->value = strdup(value);
143     p->next = 0;
144
145     if(device_config_next) {
146         device_config_next->next = p;
147         device_config_next = p;
148     } else {
149         device_config = p;
150         device_config_next = p;
151     }
152 }
153
154 int args_callback_option(char*name,char*val) {
155     if (!strcmp(name, "o"))
156     {
157         outputname = val;
158         return 1;
159     }
160     else if (!strcmp(name, "v"))
161     {
162         loglevel ++;
163         setConsoleLogging(loglevel);
164         return 0;
165     }
166     else if (!strcmp(name, "2"))
167     {
168         xnup = 2;
169         ynup = 1;
170         return 0;
171     }
172     else if (!strcmp(name, "4"))
173     {
174         xnup = 2;
175         ynup = 2;
176         return 0;
177     }
178     else if (!strcmp(name, "9"))
179     {
180         xnup = 3;
181         ynup = 3;
182         return 0;
183     }
184     else if (!strcmp(name, "q"))
185     {
186         loglevel --;
187         setConsoleLogging(loglevel);
188         system_quiet = 1;
189         return 0;
190     }
191     else if (name[0]=='p')
192     {
193         /* check whether the page range follows the p directly, like 
194            in -p1,2 */
195         do {
196             name++;
197         } while(*name == 32 || *name == 13 || *name == 10 || *name == '\t');
198
199         if(*name) {
200             pagerange = name;
201             return 0;
202         } 
203         pagerange = val;        
204         return 1;
205     }
206     else if (!strcmp(name, "P"))
207     {
208         password = val;
209         return 1;
210     }
211     else if (!strcmp(name, "c"))
212     {
213         char*s = strdup(val);
214         char*x1 = strtok(s, ":");
215         char*y1 = strtok(0, ":");
216         char*x2 = strtok(0, ":");
217         char*y2 = strtok(0, ":");
218         if(!(x1 && y1 && x2 && y2)) {
219             fprintf(stderr, "-c option requires four arguments, <x1>:<y1>:<x2>:<y2>\n");
220             exit(1);
221         }
222         custom_clip = 1;
223         clip_x1 = atoi(x1);
224         clip_y1 = atoi(y1);
225         clip_x2 = atoi(x2);
226         clip_y2 = atoi(y2);
227         free(s);
228         return 1;
229     }
230     else if (!strcmp(name, "m"))
231     {
232         char*s = strdup(val);
233         char*c = strchr(s, ':');
234         if(!c) {
235             fprintf(stderr, "-m option requires two arguments, <x>:<y>\n");
236             exit(1);
237         }
238         *c = 0;
239         custom_move = 1;
240         move_x = atoi(val);
241         move_y = atoi(c+1);
242         free(s);
243         return 1;
244     }
245     else if (!strcmp(name, "s"))
246     {
247         char*s = strdup(val);
248         char*c = strchr(s, '=');
249         if(c && *c && c[1])  {
250             *c = 0;
251             c++;
252             store_parameter(s,c);
253         } else if(!strcmp(s,"help")) {
254             printf("PDF Parameters:\n");
255             gfxsource_t*pdf = gfxsource_pdf_create();
256             pdf->set_parameter(pdf, "help", "");
257             gfxdevice_t swf;
258             gfxdevice_swf_init(&swf);
259             printf("SWF Parameters:\n");
260             swf.setparameter(&swf, "help", "");
261             exit(0);
262         } else {
263             store_parameter(s,"1");
264         }
265         return 1;
266     }
267     else if (!strcmp(name, "S"))
268     {
269         store_parameter("drawonlyshapes", "1");
270         return 0;
271     }
272     else if (!strcmp(name, "i"))
273     {
274         store_parameter("ignoredraworder", "1");
275         return 0;
276     }
277 #ifndef WIN32
278     else if (!strcmp(name, "Q"))
279     {
280         max_time = atoi(val);
281         alarm(max_time);
282 # ifdef HAVE_SIGNAL_H
283         signal(SIGALRM, sigalarm);
284 # endif
285         return 1;
286     }
287 #endif
288     else if (!strcmp(name, "z"))
289     {
290         store_parameter("enablezlib", "1");
291         zlib = 1;
292         return 0;
293     }
294     else if (!strcmp(name, "n"))
295     {
296         store_parameter("opennewwindow", "1");
297         return 0;
298     }
299     else if (!strcmp(name, "I"))
300     {
301         info_only = 1;
302         return 0;
303     }
304     else if (!strcmp(name, "t"))
305     {
306         store_parameter("insertstop", "1");
307         return 0;
308     }
309     else if (!strcmp(name, "T"))
310     {
311         if(!strcasecmp(val, "mx"))
312             store_parameter("flashversion", "6");
313         else
314             store_parameter("flashversion", val);
315
316         return 1;
317     }
318     else if (!strcmp(name, "f"))
319     {
320         store_parameter("storeallcharacters", "1");
321         store_parameter("extrafontdata", "1");
322         return 0;
323     }
324     else if (!strcmp(name, "w"))
325     {
326         store_parameter("linksopennewwindow", "0");
327         return 0;
328     }
329     else if (!strcmp(name, "O"))
330     {
331         int level = 1;
332         int ret=0;
333         if(val&& val[0] && val[1]==0 && isdigit(val[0])) {
334             level = atoi(val);
335             ret=1;
336         }
337         if(level>=1)
338             store_parameter("poly2bitmap", "1");
339         if(level>=2)
340             store_parameter("bitmapfonts", "1");
341         if(level>=3)
342             store_parameter("ignoredraworder", "1");
343         return ret;
344     }
345     else if (!strcmp(name, "G"))
346     {
347         //store_parameter("optimize_polygons", "1");
348         flatten = 1;
349         return 0;
350     }
351     else if (!strcmp(name, "F"))
352     {
353         char *s = strdup(val);
354         int l = strlen(s);
355         while(l && s[l-1]=='/') {
356             s[l-1] = 0;
357             l--;
358         }
359         fontpaths[fontpathpos++] = s;
360         return 1;
361     }
362     else if (!strcmp(name, "l"))
363     {
364         char buf[256];
365         sprintf(buf, "%s/default_loader.swf", SWFDIR);
366         preloader = strdup(buf);
367         return 0;
368     }
369     else if (!strcmp(name, "b"))
370     {
371         char buf[256];
372         sprintf(buf, "%s/default_viewer.swf", SWFDIR);
373         viewer = strdup(buf);
374         return 0;
375     }
376     else if (!strcmp(name, "L"))
377     {
378         if(val)
379         {
380             preloader = val;
381         }
382         else
383         {
384             systemf("ls %s/*_loader.swf", SWFDIR);
385             if(!system_quiet)
386                 printf("\n");
387             exit(1);
388         }
389         return 1;
390     }
391     else if (!strcmp(name, "B"))
392     {
393         if(val)
394         {
395             viewer = val;
396         }
397         else
398         {
399             systemf("ls %s/*_viewer.swf", SWFDIR);
400             if(!system_quiet)
401                 printf("\n");
402             exit(1);
403         }
404         return 1;
405     }
406     else if (!strcmp(name, "j"))
407     {
408         if(name[1]) {
409             store_parameter("jpegquality", &name[1]);
410             return 0;
411         } else {
412             store_parameter("jpegquality", val);
413             return 1;
414         }
415     }
416     else if (!strcmp(name, "V"))
417     {   
418         printf("pdf2swf - part of %s %s\n", PACKAGE, VERSION);
419         exit(0);
420     }
421     else 
422     {
423         fprintf(stderr, "Unknown option: -%s\n", name);
424         exit(1);
425     }
426     return 0;
427 }
428
429 /*struct docoptions_t options[] =
430 {{"o","output","filename::Specify output file"},
431  {"V","version","Print program version"},
432  {"i","ignore","Ignore draw order (makes the SWF file smaller, but may produce graphic errors)"},
433  {"z","zlib","Use Flash 6 (MX) zlib compression (Needs at least Flash 6 Plugin to play)"},
434  {"s","shapes","Don't use SWF Fonts, but store everything as shape"},
435  {"j","jpegquality","Set quality of embedded jpeg pictures (default: 85)"},
436  {"p","pages","Convert only pages in range. (E.g. 3-85)"},
437  {"w","samewindow","Don't open a new browser window for links in the SWF"},
438  {"f","fonts","Stroe full fonts in SWF. (Don't reduce to used characters)"},
439  {"F","fontpath","path::Add directory to font search path"},
440  {"B","viewer","name::Link viewer \"name\" to the pdf"},
441  {"L","preloader","file.swf::Link preloader \"file.swf\" to the pdf"},
442  {"b","defaultviewer","Link default viewer to the pdf"},
443  {"l","defaultpreloader","Link default preloader to the pdf"}
444  {0,0}
445 };*/
446 static struct options_t options[] = {
447 {"h", "help"},
448 {"V", "version"},
449 {"o", "output"},
450 {"p", "pages"},
451 {"P", "password"},
452 {"v", "verbose"},
453 {"z", "zlib"},
454 {"i", "ignore"},
455 {"j", "jpegquality"},
456 {"s", "set"},
457 {"w", "samewindow"},
458 {"t", "stop"},
459 {"T", "flashversion"},
460 {"F", "fontdir"},
461 {"b", "defaultviewer"},
462 {"l", "defaultloader"},
463 {"B", "viewer"},
464 {"L", "preloader"},
465 {"q", "quiet"},
466 {"S", "shapes"},
467 {"f", "fonts"},
468 {"G", "flatten"},
469 {"I", "info"},
470 {"Q", "maxtime"},
471 {0,0}
472 };
473
474 int args_callback_longoption(char*name,char*val) {
475     return args_long2shortoption(options, name, val);
476 }
477
478 int args_callback_command(char*name, char*val) {
479     if (!filename) 
480         filename = name;
481     else {
482         if(outputname)
483         {
484              fprintf(stderr, "Error: Do you want the output to go to %s or to %s?", 
485                      outputname, name);
486              exit(1);
487         }
488         outputname = name;
489     }
490     return 0;
491 }
492
493 void args_callback_usage(char *name)
494 {
495     printf("\n");
496     printf("Usage: %s [-options] file.pdf -o file.swf\n", name);
497     printf("\n");
498     printf("-h , --help                    Print short help message and exit\n");
499     printf("-V , --version                 Print version info and exit\n");
500     printf("-o , --output file.swf         Direct output to file.swf. If file.swf contains '%d' (file%d.swf), then each page \n");
501     printf("-p , --pages range             Convert only pages in range with range e.g. 1-20 or 1,4,6,9-11 or\n");
502     printf("-P , --password password       Use password for deciphering the pdf.\n");
503     printf("-v , --verbose                 Be verbose. Use more than one -v for greater effect.\n");
504     printf("-z , --zlib                    Use Flash 6 (MX) zlib compression.\n");
505     printf("-i , --ignore                  Allows pdf2swf to change the draw order of the pdf. This may make the generated\n");
506     printf("-j , --jpegquality quality     Set quality of embedded jpeg pictures to quality. 0 is worst (small), 100 is best (big). (default:85)\n");
507     printf("-s , --set param=value         Set a SWF encoder specific parameter.  See pdf2swf -s help for more information.\n");
508     printf("-w , --samewindow              When converting pdf hyperlinks, don't make the links open a new window. \n");
509     printf("-t , --stop                    Insert a stop() command in each page. \n");
510     printf("-T , --flashversion num        Set Flash Version in the SWF header to num.\n");
511     printf("-F , --fontdir directory       Add directory to the font search path.\n");
512     printf("-b , --defaultviewer           Link a standard viewer to the swf file. \n");
513     printf("-l , --defaultloader           Link a standard preloader to the swf file which will be displayed while the main swf is loading.\n");
514     printf("-B , --viewer filename         Link viewer filename to the swf file. \n");
515     printf("-L , --preloader filename      Link preloader filename to the swf file. \n");
516     printf("-q , --quiet                   Suppress normal messages.  Use -qq to suppress warnings, also.\n");
517     printf("-S , --shapes                  Don't use SWF Fonts, but store everything as shape.\n");
518     printf("-f , --fonts                   Store full fonts in SWF. (Don't reduce to used characters).\n");
519     printf("-G , --flatten                 Remove as many clip layers from file as possible. \n");
520     printf("-I , --info                    Don't do actual conversion, just display a list of all pages in the PDF.\n");
521     printf("-Q , --maxtime n               Abort conversion after n seconds. Only available on Unix.\n");
522     printf("\n");
523 }
524
525 float getRate(char*filename)
526 {
527     int fi;
528     SWF swf;
529     fi = open(filename,O_RDONLY|O_BINARY);
530     if(fi<0) { 
531         char buffer[256];
532         sprintf(buffer, "Couldn't open %s", filename);
533         perror(buffer);
534         exit(1);
535     }
536     if(swf_ReadSWF(fi,&swf) < 0)
537     { 
538         fprintf(stderr, "%s is not a valid SWF file or contains errors.\n",filename);
539         close(fi);
540         exit(1);
541     }
542     swf_FreeTags(&swf);
543     return swf.frameRate / 256.0;
544 }
545
546 void show_info(gfxsource_t*driver, char*filename)
547 {
548     gfxdocument_t* pdf = driver->open(driver, filename);
549     int pagenr;
550     FILE*fo=0;
551     if(!pdf) {
552         msg("<error> Couldn't open %s", filename);
553         exit(1);
554     }
555     if(outputname) {
556         fo = fopen(outputname, "wb");
557         if(!fo) {
558             perror(outputname);exit(1);;
559         }
560     } else {
561         fo = stdout;
562     }
563
564     for(pagenr = 1; pagenr <= pdf->num_pages; pagenr++) 
565     {
566         gfxpage_t*page = pdf->getpage(pdf,pagenr);
567         if(is_in_range(pagenr, pagerange)) {
568             fprintf(fo, "page=%d width=%.2f height=%.2f\n", pagenr, page->width, page->height);
569         }
570     }
571     pdf->destroy(pdf);
572 }
573
574
575 static gfxdevice_t swf,wrap;
576 gfxdevice_t*create_output_device()
577 {
578     gfxdevice_swf_init(&swf);
579     gfxdevice_removeclippings_init(&wrap, &swf);
580     out = &wrap;
581     if(!flatten) {
582         out = &swf;
583     }
584     /* pass global parameters to output device */
585     parameter_t*p = device_config;
586     while(p) {
587         out->setparameter(out, p->name, p->value);
588         p = p->next;
589     }
590     return out;
591 }
592
593 int main(int argn, char *argv[])
594 {
595     int ret;
596     char buf[256];
597     int numfonts = 0;
598     int t;
599     char t1searchpath[1024];
600     int nup_pos = 0;
601     int x,y;
602     char* installPath = getInstallationPath();
603     int one_file_per_page = 0;
604     
605     initLog(0,-1,0,0,-1,loglevel);
606
607     /* not needed anymore since fonts are embedded
608        if(installPath) {
609         fontpaths[fontpathpos++] = concatPaths(installPath, "fonts");
610     }*/
611
612 #ifdef HAVE_SRAND48
613     srand48(time(0));
614 #else
615 #ifdef HAVE_SRAND
616     srand(time(0));
617 #endif
618 #endif
619
620     processargs(argn, argv);
621     
622     driver = gfxsource_pdf_create();
623     
624     /* pass global parameters to PDF driver*/
625     parameter_t*p = device_config;
626     while(p) {
627         driver->set_parameter(driver, p->name, p->value);
628         p = p->next;
629     }
630
631     if(!filename)
632     {
633         fprintf(stderr, "Please specify an input file\n");
634         exit(1);
635     }
636
637     if(info_only) {
638         show_info(driver, filename);
639         return 0;
640     }
641
642     if(!outputname)
643     {
644         if(filename) {
645             outputname = stripFilename(filename, ".swf");
646             msg("<notice> Output filename not given. Writing to %s", outputname);
647         } 
648     }
649         
650     if(!outputname)
651     {
652         fprintf(stderr, "Please use -o to specify an output file\n");
653         exit(1);
654     }
655
656     // test if the page range is o.k.
657     is_in_range(0x7fffffff, pagerange);
658
659     if(pagerange)
660         driver->set_parameter(driver, "pages", pagerange);
661
662     if (!filename) {
663         args_callback_usage(argv[0]);
664         exit(0);
665     }
666
667     /* add fonts */
668     for(t=0;t<fontpathpos;t++) {
669         driver->set_parameter(driver, "fontdir", fontpaths[t]);
670     }
671
672     char fullname[256];
673     if(password && *password) {
674         sprintf(fullname, "%s|%s", filename, password);
675         filename = fullname;
676     }
677
678     char*u = 0;
679     if((u = strchr(outputname, '%'))) {
680         if(strchr(u+1, '%') || 
681            strchr(outputname, '%')!=u)  {
682             msg("<error> only one %%d allowed in filename\n");
683             return 1;
684         }
685         if(preloader || viewer) {
686             msg("<error> -b/-l/-B/-L not supported together with %%d in filename\n");
687             return 1;
688         }
689         msg("<notice> outputting one file per page");
690         one_file_per_page = 1;
691         char*pattern = (char*)malloc(strlen(outputname)+2);
692         /* convert % to %d */
693         int l = u-outputname+1;
694         memcpy(pattern, outputname, l);
695         pattern[l]='d';
696         strcpy(pattern+l+1, outputname+l);
697         outputname = pattern;
698     }
699
700     gfxdocument_t* pdf = driver->open(driver, filename);
701     if(!pdf) {
702         msg("<error> Couldn't open %s", filename);
703         exit(1);
704     }
705     /* pass global parameters document */
706     p = device_config;
707     while(p) {
708         pdf->set_parameter(pdf, p->name, p->value);
709         p = p->next;
710     }
711
712     struct mypage_t {
713         int x;
714         int y;
715         gfxpage_t*page;
716     } pages[4];
717
718     int pagenum = 0;
719     int frame = 1;
720     int pagenr;
721     
722     for(pagenr = 1; pagenr <= pdf->num_pages; pagenr++) 
723     {
724         if(is_in_range(pagenr, pagerange)) {
725             char mapping[80];
726             sprintf(mapping, "%d:%d", pagenr, frame);
727             pdf->set_parameter(pdf, "pagemap", mapping);
728             pagenum++;
729         }
730         if(pagenum == xnup*ynup || (pagenr == pdf->num_pages && pagenum>1)) {
731             pagenum = 0;
732             frame++;
733         }
734     }
735
736     pagenum = 0;
737
738     gfxdevice_t*out = create_output_device();;
739     for(pagenr = 1; pagenr <= pdf->num_pages; pagenr++) 
740     {
741         if(is_in_range(pagenr, pagerange)) {
742             gfxpage_t* page = pages[pagenum].page = pdf->getpage(pdf, pagenr);
743             pages[pagenum].x = 0;
744             pages[pagenum].y = 0;
745             pages[pagenum].page = page;
746             pagenum++;
747         }
748         if(pagenum == xnup*ynup || (pagenr == pdf->num_pages && pagenum>1)) {
749
750             int t;
751             int xmax[xnup], ymax[xnup];
752             int x,y;
753             int width=0, height=0;
754
755             memset(xmax, 0, xnup*sizeof(int));
756             memset(ymax, 0, ynup*sizeof(int));
757
758             for(y=0;y<ynup;y++)
759             for(x=0;x<xnup;x++) {
760                 int t = y*xnup + x;
761
762                 if(pages[t].page->width > xmax[x])
763                     xmax[x] = (int)pages[t].page->width;
764                 if(pages[t].page->height > ymax[y])
765                     ymax[y] = (int)pages[t].page->height;
766             }
767             for(x=0;x<xnup;x++) {
768                 width += xmax[x];
769                 xmax[x] = width;
770             }
771             for(y=0;y<ynup;y++) {
772                 height += ymax[y];
773                 ymax[y] = height;
774             }
775             if(custom_clip) {
776                 out->startpage(out,clip_x2 - clip_x1, clip_y2 - clip_y1);
777             } else {
778                 out->startpage(out,width,height);
779             }
780             for(t=0;t<pagenum;t++) {
781                 int x = t%xnup;
782                 int y = t/xnup;
783                 int xpos = x>0?xmax[x-1]:0;
784                 int ypos = y>0?ymax[y-1]:0;
785                 msg("<verbose> Render (%d,%d) move:%d/%d\n",
786                         (int)(pages[t].page->width + xpos),
787                         (int)(pages[t].page->height + ypos), xpos, ypos);
788                 pages[t].page->rendersection(pages[t].page, out, custom_move? move_x : xpos, 
789                                                            custom_move? move_y : ypos,
790                                                            custom_clip? clip_x1 : 0 + xpos, 
791                                                            custom_clip? clip_y1 : 0 + ypos, 
792                                                            custom_clip? clip_x2 : pages[t].page->width + xpos, 
793                                                            custom_clip? clip_y2 : pages[t].page->height + ypos);
794             }
795             out->endpage(out);
796             for(t=0;t<pagenum;t++)  {
797                 pages[t].page->destroy(pages[t].page);
798             }
799             pagenum = 0;
800
801             if(one_file_per_page) {
802                 gfxresult_t*result = out->finish(out);out=0;
803                 char buf[1024];
804                 sprintf(buf, outputname, one_file_per_page++);
805                 if(result->save(result, buf) < 0) {
806                     return 1;
807                 }
808                 result->destroy(result);result=0;
809                 out = create_output_device();;
810                 msg("<notice> Writing SWF file %s", buf);
811             }
812         }
813     }
814    
815     if(one_file_per_page) {
816         // remove empty device
817         gfxresult_t*result = out->finish(out);out=0;
818         result->destroy(result);result=0;
819     } else {
820         gfxresult_t*result = out->finish(out);
821         msg("<notice> Writing SWF file %s", outputname);
822         if(result->save(result, outputname) < 0) {
823             exit(1);
824         }
825         int width = (int)result->get(result, "width");
826         int height = (int)result->get(result, "height");
827         result->destroy(result);result=0;
828
829         if(preloader || viewer) {
830             const char*zip = "";
831             if(zlib) {
832                 zip = "-z";
833             }
834             if(!preloader && viewer) {
835                 systemf("swfcombine %s -X %d -Y %d \"%s\" viewport=\"%s\" -o \"%s\"",zip,width,height,
836                         viewer, outputname, outputname);
837                 if(!system_quiet)
838                     printf("\n");
839             }
840             if(preloader && !viewer) {
841                 msg("<warning> --preloader option without --viewer option doesn't make very much sense.");
842                 ret = systemf("swfcombine %s -Y %d -X %d %s/PreLoaderTemplate.swf loader=\"%s\" movie=\"%s\" -o \"%s\"",zip,width,height,
843                         SWFDIR, preloader, outputname, outputname);
844                 if(!system_quiet)
845                     printf("\n");
846             }
847             if(preloader && viewer) {
848 #ifdef HAVE_MKSTEMP
849                 char tmpname[] = "__swf__XXXXXX";
850                 mkstemp(tmpname);
851 #else 
852                 char*tmpname = "__tmp__.swf";
853 #endif
854                 systemf("swfcombine \"%s\" viewport=%s -o %s",
855                         viewer, outputname, tmpname);
856                 systemf("swfcombine %s -X %d -Y %d -r %f %s/PreLoaderTemplate.swf loader=%s movie=%s -o \"%s\"",zip,width,height,
857                         getRate(preloader), SWFDIR, preloader, tmpname, outputname);
858                 systemf("rm %s", tmpname);
859             }
860         }
861     }
862
863     pdf->destroy(pdf);
864     driver->destroy(driver);
865
866    
867     /* free global parameters */
868     p = device_config;
869     while(p) {
870         parameter_t*next = p->next;
871         if(p->name) free((void*)p->name);p->name = 0;
872         if(p->value) free((void*)p->value);p->value =0;
873         p->next = 0;free(p);
874         p = next;
875     }
876
877     return 0;
878 }
879