don't set optimize_polygons by default, it's broken
[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 <unistd.h>
27 #include "../config.h"
28 #ifdef HAVE_DIRENT_H
29 #include <dirent.h>
30 #endif
31 #include "../lib/args.h"
32 #include "../lib/os.h"
33 #include "../lib/rfxswf.h"
34 #include "../lib/devices/swf.h"
35 #include "../lib/devices/polyops.h"
36 #include "../lib/devices/record.h"
37 #include "../lib/pdf/pdf.h"
38 #include "../lib/log.h"
39
40 #define SWFDIR concatPaths(getInstallationPath(), "swfs")
41
42 static gfxsource_t*driver = 0;
43 static gfxdevice_t*out = 0;
44
45 static char * outputname = 0;
46 static int loglevel = 3;
47 static char * pagerange = 0;
48 static char * filename = 0;
49 static char * password = 0;
50 static int zlib = 0;
51
52 static char * preloader = 0;
53 static char * viewer = 0;
54 static int xnup = 1;
55 static int ynup = 1;
56
57 static int info_only = 0;
58
59 static int flatten = 0;
60
61 char* fontpaths[256];
62 int fontpathpos = 0;
63
64 int move_x=0;
65 int move_y=0;
66 int custom_move = 0;
67 int clip_x1=0,clip_y1=0,clip_x2=0,clip_y2=0;
68 int custom_clip = 0;
69
70 static int system_quiet=0;
71
72 int systemf(const char* format, ...)
73 {
74     char buf[1024];
75     int ret;
76     va_list arglist;
77     va_start(arglist, format);
78     vsprintf(buf, format, arglist);
79     va_end(arglist);
80
81     if(!system_quiet) {
82         printf("%s\n", buf);
83         fflush(stdout);
84     }
85     ret = system(buf);
86     if(ret) {
87         fprintf(stderr, "system() returned %d\n", ret);
88         exit(ret);
89     }
90     return ret;
91 }
92
93 int args_callback_option(char*name,char*val) {
94     if (!strcmp(name, "o"))
95     {
96         outputname = val;
97         return 1;
98     }
99     else if (!strcmp(name, "v"))
100     {
101         loglevel ++;
102         setConsoleLogging(loglevel);
103         return 0;
104     }
105     else if (!strcmp(name, "2"))
106     {
107         xnup = 2;
108         ynup = 1;
109         return 0;
110     }
111     else if (!strcmp(name, "4"))
112     {
113         xnup = 2;
114         ynup = 2;
115         return 0;
116     }
117     else if (!strcmp(name, "9"))
118     {
119         xnup = 3;
120         ynup = 3;
121         return 0;
122     }
123     else if (!strcmp(name, "q"))
124     {
125         loglevel --;
126         setConsoleLogging(loglevel);
127         system_quiet = 1;
128         return 0;
129     }
130     else if (name[0]=='p')
131     {
132         /* check whether the page range follows the p directly, like 
133            in -p1,2 */
134         do {
135             name++;
136         } while(*name == 32 || *name == 13 || *name == 10 || *name == '\t');
137
138         if(*name) {
139             pagerange = name;
140             return 0;
141         } 
142         pagerange = val;        
143         return 1;
144     }
145     else if (!strcmp(name, "P"))
146     {
147         password = val;
148         return 1;
149     }
150     else if (!strcmp(name, "c"))
151     {
152         char*s = strdup(val);
153         char*x1 = strtok(s, ":");
154         char*y1 = strtok(0, ":");
155         char*x2 = strtok(0, ":");
156         char*y2 = strtok(0, ":");
157         if(!(x1 && y1 && x2 && y2)) {
158             fprintf(stderr, "-c option requires four arguments, <x1>:<y1>:<x2>:<y2>\n");
159             exit(1);
160         }
161         custom_clip = 1;
162         clip_x1 = atoi(x1);
163         clip_y1 = atoi(y1);
164         clip_x2 = atoi(x2);
165         clip_y2 = atoi(y2);
166         free(s);
167         return 1;
168     }
169     else if (!strcmp(name, "m"))
170     {
171         char*s = strdup(val);
172         char*c = strchr(s, ':');
173         if(!c) {
174             fprintf(stderr, "-m option requires two arguments, <x>:<y>\n");
175             exit(1);
176         }
177         *c = 0;
178         custom_move = 1;
179         move_x = atoi(val);
180         move_y = atoi(c+1);
181         free(s);
182         return 1;
183     }
184     else if (!strcmp(name, "s"))
185     {
186         char*s = strdup(val);
187         char*c = strchr(s, '=');
188         if(c && *c && c[1])  {
189             *c = 0;
190             c++;
191             driver->set_parameter(driver, s,c);
192             out->setparameter(out, s,c);
193         } else {
194             driver->set_parameter(driver, s,"1");
195             out->setparameter(out, s,"1");
196         }
197         return 1;
198     }
199     else if (!strcmp(name, "S"))
200     {
201         driver->set_parameter(driver, "drawonlyshapes", "1");
202         return 0;
203     }
204     else if (!strcmp(name, "i"))
205     {
206         driver->set_parameter(driver, "ignoredraworder", "1");
207         return 0;
208     }
209 #ifndef WIN32
210     else if (!strcmp(name, "Q"))
211     {
212         int seconds = atoi(val);
213         alarm(seconds);
214         return 1;
215     }
216 #endif
217     else if (!strcmp(name, "z"))
218     {
219         driver->set_parameter(driver, "enablezlib", "1");
220         zlib = 1;
221         return 0;
222     }
223     else if (!strcmp(name, "n"))
224     {
225         driver->set_parameter(driver, "opennewwindow", "1");
226         return 0;
227     }
228     else if (!strcmp(name, "I"))
229     {
230         info_only = 1;
231         return 0;
232     }
233     else if (!strcmp(name, "t"))
234     {
235         driver->set_parameter(driver, "insertstop", "1");
236         return 0;
237     }
238     else if (!strcmp(name, "T"))
239     {
240         if(!strcasecmp(val, "mx"))
241             driver->set_parameter(driver, "flashversion", "6");
242         else
243             driver->set_parameter(driver, "flashversion", val);
244
245         return 1;
246     }
247     else if (!strcmp(name, "f"))
248     {
249         driver->set_parameter(driver, "storeallcharacters", "1");
250         driver->set_parameter(driver, "extrafontdata", "1");
251         return 0;
252     }
253     else if (!strcmp(name, "w"))
254     {
255         driver->set_parameter(driver, "linksopennewwindow", "0");
256         return 0;
257     }
258     else if (!strcmp(name, "O"))
259     {
260         int level = 1;
261         int ret=0;
262         if(val&& val[0] && val[1]==0 && isdigit(val[0])) {
263             level = atoi(val);
264             ret=1;
265         }
266         if(level>=1)
267             driver->set_parameter(driver, "poly2bitmap", "1");
268         if(level>=2)
269             driver->set_parameter(driver, "bitmapfonts", "1");
270         if(level>=3)
271             driver->set_parameter(driver, "ignoredraworder", "1");
272         return ret;
273     }
274     else if (!strcmp(name, "G"))
275     {
276         //driver->set_parameter(driver, "optimize_polygons", "1");
277         flatten = 1;
278         return 0;
279     }
280     else if (!strcmp(name, "F"))
281     {
282         char *s = strdup(val);
283         int l = strlen(s);
284         while(l && s[l-1]=='/') {
285             s[l-1] = 0;
286             l--;
287         }
288         fontpaths[fontpathpos++] = s;
289         return 1;
290     }
291     else if (!strcmp(name, "l"))
292     {
293         char buf[256];
294         sprintf(buf, "%s/default_loader.swf", SWFDIR);
295         preloader = strdup(buf);
296         return 0;
297     }
298     else if (!strcmp(name, "b"))
299     {
300         char buf[256];
301         sprintf(buf, "%s/default_viewer.swf", SWFDIR);
302         viewer = strdup(buf);
303         return 0;
304     }
305     else if (!strcmp(name, "L"))
306     {
307         if(val)
308         {
309             preloader = val;
310         }
311         else
312         {
313             systemf("ls %s/*_loader.swf", SWFDIR);
314             if(!system_quiet)
315                 printf("\n");
316             exit(1);
317         }
318         return 1;
319     }
320     else if (!strcmp(name, "B"))
321     {
322         if(val)
323         {
324             viewer = val;
325         }
326         else
327         {
328             systemf("ls %s/*_viewer.swf", SWFDIR);
329             if(!system_quiet)
330                 printf("\n");
331             exit(1);
332         }
333         return 1;
334     }
335     else if (!strcmp(name, "j"))
336     {
337         if(name[1]) {
338             driver->set_parameter(driver, "jpegquality", &name[1]);
339             return 0;
340         } else {
341             driver->set_parameter(driver, "jpegquality", val);
342             return 1;
343         }
344     }
345     else if (!strcmp(name, "V"))
346     {   
347         printf("pdf2swf - part of %s %s\n", PACKAGE, VERSION);
348         exit(0);
349     }
350     else 
351     {
352         fprintf(stderr, "Unknown option: -%s\n", name);
353         exit(1);
354     }
355     return 0;
356 }
357
358 /*struct docoptions_t options[] =
359 {{"o","output","filename::Specify output file"},
360  {"V","version","Print program version"},
361  {"i","ignore","Ignore draw order (makes the SWF file smaller, but may produce graphic errors)"},
362  {"z","zlib","Use Flash 6 (MX) zlib compression (Needs at least Flash 6 Plugin to play)"},
363  {"s","shapes","Don't use SWF Fonts, but store everything as shape"},
364  {"j","jpegquality","Set quality of embedded jpeg pictures (default: 85)"},
365  {"p","pages","Convert only pages in range. (E.g. 3-85)"},
366  {"w","samewindow","Don't open a new browser window for links in the SWF"},
367  {"f","fonts","Stroe full fonts in SWF. (Don't reduce to used characters)"},
368  {"F","fontpath","path::Add directory to font search path"},
369  {"B","viewer","name::Link viewer \"name\" to the pdf"},
370  {"L","preloader","file.swf::Link preloader \"file.swf\" to the pdf"},
371  {"b","defaultviewer","Link default viewer to the pdf"},
372  {"l","defaultpreloader","Link default preloader to the pdf"}
373  {0,0}
374 };*/
375 struct options_t options[] =
376 {{"o","output"},
377  {"q","quiet"},
378  {"V","version"},
379  {"i","ignore"},
380  {"I","info"},
381  {"z","zlib"},
382  {"s","set"},
383  {"S","shapes"},
384  {"Q","maxtime"},
385  {"j","jpegquality"},
386  {"p","pages"},
387  {"w","samewindow"},
388  {"f","fonts"},
389  {"F","fontdir"},
390  {"B","viewer"},
391  {"G","flatten"},
392  {"L","preloader"},
393  {"b","defaultviewer"},
394  {"l","defaultpreloader"},
395  {"t","stop"},
396  {"T","flashversion"},
397  {0,0}
398 };
399
400 int args_callback_longoption(char*name,char*val) {
401     return args_long2shortoption(options, name, val);
402 }
403
404 int args_callback_command(char*name, char*val) {
405     if (!filename) 
406         filename = name;
407     else {
408         if(outputname)
409         {
410              fprintf(stderr, "Error: Do you want the output to go to %s or to %s?", 
411                      outputname, name);
412              exit(1);
413         }
414         outputname = name;
415     }
416     return 0;
417 }
418
419 void args_callback_usage(char*name)
420 {
421     printf("Usage: %s [Options] input.pdf [-o output.swf]\n", name);
422     printf("\nBasic options:\n");
423     printf("-p  --pages=range          Convert only pages in range\n");
424     printf("-P  --password=password    Use password for deciphering the pdf\n");
425     printf("-v  --verbose              Be verbose. Use more than one -v for greater effect\n");
426     printf("-q  --quiet                Suppress normal messages. Use -qq to suppress warnings, also.\n");
427 #ifdef HAVE_DIRENT_H
428     printf("-F  --fontdir directory    Add directory to font search path\n");
429 #endif
430     printf("-V  --version              Print program version\n");
431     printf("\nEnhanced conversion options:\n");
432     printf("-S  --shapes               Don't use SWF Fonts, but store everything as shape\n");
433     printf("-z  --zlib                 Use Flash 6 (MX) zlib compression (Needs at least Flash 6 Plugin to play)\n");
434     printf("-w  --samewindow           Don't open a new Browser Window for Links in the SWF\n");
435     printf("-f  --fonts                Store full fonts in SWF. (Don't reduce to used characters)\n");
436     printf("-T  --flashversion=num     Set the flash version in the header to num (default: 4)\n");
437     printf("-s insertstop              Insert a \"Stop\" Tag in every frame (don't turn pages automatically)\n");
438     printf("-s zoom=factor             Scale result, default: 72\n");
439     printf("-s jpegquality=quality     Set quality of embedded jpeg pictures (default:85)\n");
440     printf("-s caplinewidth=value      Set the minimum line width to trigger cap style handling to value. (3)\n");
441     printf("-s splinequality=value     Set the quality of spline convertion to value (0-100, default: 100).\n");
442     printf("-s fontquality=value       Set the quality of font convertion to value (0-100, default: 100).\n");
443     printf("-s ignoredraworder         Ignore draw order (makes the SWF file smaller and faster, but may produce\n"
444            "                           graphic errors)\n");
445     printf("-s filloverlap             Make intersecting shapes overlap, instead of canceling each\n"
446            "                           other out. (Needed for some Powerpoint PDFs)\n");
447     printf("-s transparent             Make the SWF transparent\n");
448     //deliberately undocumented (for now)
449     //printf("-2                         Put 2 pages into each frame.\n");
450     //printf("-4                         Put 4 pages into each frame.\n");
451     printf("Postprocessing options:\n");
452     printf("-b  --defaultviewer        Link default viewer to the pdf (%s)\n", concatPaths(SWFDIR, "default_viewer.swf"));
453     printf("-l  --defaultpreloader     Link default preloader the pdf (%s)\n", concatPaths(SWFDIR, "default_loader.swf"));
454     printf("-B  --viewer=filename      Link viewer \"name\" to the pdf (\"%s -B\" for list)\n", name);
455     printf("-L  --preloader=filename   Link preloader \"name\" to the pdf (\"%s -L\" for list)\n",name);
456 }
457
458 float getRate(char*filename)
459 {
460     int fi;
461     SWF swf;
462     fi = open(filename,O_RDONLY|O_BINARY);
463     if(fi<0) { 
464         char buffer[256];
465         sprintf(buffer, "Couldn't open %s", filename);
466         perror(buffer);
467         exit(1);
468     }
469     if(swf_ReadSWF(fi,&swf) < 0)
470     { 
471         fprintf(stderr, "%s is not a valid SWF file or contains errors.\n",filename);
472         close(fi);
473         exit(1);
474     }
475     swf_FreeTags(&swf);
476     return swf.frameRate / 256.0;
477 }
478
479 void show_info(gfxsource_t*driver, char*filename)
480 {
481     gfxdocument_t* pdf = driver->open(driver, filename);
482     int pagenr;
483     FILE*fo=0;
484     if(!pdf) {
485         msg("<error> Couldn't open %s", filename);
486         exit(1);
487     }
488     if(outputname) {
489         fo = fopen(outputname, "wb");
490         if(!fo) {
491             perror(outputname);exit(1);;
492         }
493     } else {
494         fo = stdout;
495     }
496
497     for(pagenr = 1; pagenr <= pdf->num_pages; pagenr++) 
498     {
499         gfxpage_t*page = pdf->getpage(pdf,pagenr);
500         if(is_in_range(pagenr, pagerange)) {
501             fprintf(fo, "page=%d width=%.2f height=%.2f\n", pagenr, page->width, page->height);
502         }
503     }
504     pdf->destroy(pdf);
505 }
506
507 int main(int argn, char *argv[])
508 {
509     int ret;
510     char buf[256];
511     int numfonts = 0;
512     int t;
513     char t1searchpath[1024];
514     int nup_pos = 0;
515     int x,y;
516     char* installPath = getInstallationPath();
517     
518     initLog(0,-1,0,0,-1,loglevel);
519
520     /* not needed anymore since fonts are embedded
521        if(installPath) {
522         fontpaths[fontpathpos++] = concatPaths(installPath, "fonts");
523     }*/
524
525 #ifdef HAVE_SRAND48
526     srand48(time(0));
527 #else
528 #ifdef HAVE_SRAND
529     srand(time(0));
530 #endif
531 #endif
532     driver = gfxsource_pdf_create();
533
534     gfxdevice_t swf,wrap;
535     gfxdevice_swf_init(&swf);
536     
537     gfxdevice_removeclippings_init(&wrap, &swf);
538
539     out = &wrap;
540     processargs(argn, argv);
541     
542     if(!flatten) {
543         out = &swf;
544     }
545     
546     if(!filename)
547     {
548         fprintf(stderr, "Please specify an input file\n");
549         exit(1);
550     }
551
552     if(info_only) {
553         show_info(driver, filename);
554         return 0;
555     }
556
557     if(!outputname)
558     {
559         if(filename) {
560             outputname = stripFilename(filename, ".swf");
561             msg("<notice> Output filename not given. Writing to %s", outputname);
562         } 
563     }
564         
565     if(!outputname)
566     {
567         fprintf(stderr, "Please use -o to specify an output file\n");
568         exit(1);
569     }
570
571     // test if the page range is o.k.
572     is_in_range(0x7fffffff, pagerange);
573
574     if(pagerange)
575         driver->set_parameter(driver, "pages", pagerange);
576
577     if (!filename) {
578         args_callback_usage(argv[0]);
579         exit(0);
580     }
581
582     /* add fonts */
583     for(t=0;t<fontpathpos;t++) {
584         driver->set_parameter(driver, "fontdir", fontpaths[t]);
585     }
586
587     char fullname[256];
588     if(password && *password) {
589         sprintf(fullname, "%s|%s", filename, password);
590         filename = fullname;
591     }
592
593     gfxdocument_t* pdf = driver->open(driver, filename);
594     if(!pdf) {
595         msg("<error> Couldn't open %s", filename);
596         exit(1);
597     }
598
599     struct mypage_t {
600         int x;
601         int y;
602         gfxpage_t*page;
603     } pages[4];
604
605     int pagenum = 0;
606     int frame = 1;
607     int pagenr;
608     
609     for(pagenr = 1; pagenr <= pdf->num_pages; pagenr++) 
610     {
611         if(is_in_range(pagenr, pagerange)) {
612             char mapping[80];
613             sprintf(mapping, "%d:%d", pagenr, frame);
614             pdf->set_parameter(pdf, "pagemap", mapping);
615             pagenum++;
616         }
617         if(pagenum == xnup*ynup || (pagenr == pdf->num_pages && pagenum>1)) {
618             pagenum = 0;
619             frame++;
620         }
621     }
622
623     pagenum = 0;
624
625     for(pagenr = 1; pagenr <= pdf->num_pages; pagenr++) 
626     {
627         if(is_in_range(pagenr, pagerange)) {
628             gfxpage_t* page = pages[pagenum].page = pdf->getpage(pdf, pagenr);
629             pages[pagenum].x = 0;
630             pages[pagenum].y = 0;
631             pages[pagenum].page = page;
632             pagenum++;
633         }
634         if(pagenum == xnup*ynup || (pagenr == pdf->num_pages && pagenum>1)) {
635
636             int t;
637             int xmax[xnup], ymax[xnup];
638             int x,y;
639             int width=0, height=0;
640
641             memset(xmax, 0, xnup*sizeof(int));
642             memset(ymax, 0, ynup*sizeof(int));
643
644             for(y=0;y<ynup;y++)
645             for(x=0;x<xnup;x++) {
646                 int t = y*xnup + x;
647
648                 if(pages[t].page->width > xmax[x])
649                     xmax[x] = (int)pages[t].page->width;
650                 if(pages[t].page->height > ymax[y])
651                     ymax[y] = (int)pages[t].page->height;
652             }
653             for(x=0;x<xnup;x++) {
654                 width += xmax[x];
655                 xmax[x] = width;
656             }
657             for(y=0;y<ynup;y++) {
658                 height += ymax[y];
659                 ymax[y] = height;
660             }
661             if(custom_clip) {
662                 out->startpage(out,clip_x2 - clip_x1, clip_y2 - clip_y1);
663             } else {
664                 out->startpage(out,width,height);
665             }
666             for(t=0;t<pagenum;t++) {
667                 int x = t%xnup;
668                 int y = t/xnup;
669                 int xpos = x>0?xmax[x-1]:0;
670                 int ypos = y>0?ymax[y-1]:0;
671                 msg("<verbose> Render (%d,%d) move:%d/%d\n",
672                         (int)(pages[t].page->width + xpos),
673                         (int)(pages[t].page->height + ypos), xpos, ypos);
674                 pages[t].page->rendersection(pages[t].page, out, custom_move? move_x : xpos, 
675                                                            custom_move? move_y : ypos,
676                                                            custom_clip? clip_x1 : 0 + xpos, 
677                                                            custom_clip? clip_y1 : 0 + ypos, 
678                                                            custom_clip? clip_x2 : pages[t].page->width + xpos, 
679                                                            custom_clip? clip_y2 : pages[t].page->height + ypos);
680             }
681             out->endpage(out);
682             for(t=0;t<pagenum;t++)  {
683                 pages[t].page->destroy(pages[t].page);
684             }
685             pagenum = 0;
686         }
687     }
688     
689     gfxresult_t*result = out->finish(out);
690
691     if(result->save(result, outputname) < 0) {
692         exit(1);
693     }
694
695     int width = (int)result->get(result, "width");
696     int height = (int)result->get(result, "height");
697     msg("<notice> SWF written");
698     
699     result->destroy(result);
700
701     pdf->destroy(pdf);
702     driver->destroy(driver);
703
704     const char*zip = "";
705     if(zlib) {
706         zip = "-z";
707     }
708     if(!preloader && viewer) {
709         systemf("swfcombine %s -X %d -Y %d \"%s\" viewport=\"%s\" -o \"%s\"",zip,width,height,
710                 viewer, outputname, outputname);
711         if(!system_quiet)
712             printf("\n");
713     }
714     if(preloader && !viewer) {
715         msg("<warning> --preloader option without --viewer option doesn't make very much sense.");
716         ret = systemf("swfcombine %s -Y %d -X %d %s/PreLoaderTemplate.swf loader=\"%s\" movie=\"%s\" -o \"%s\"",zip,width,height,
717                 SWFDIR, preloader, outputname, outputname);
718         if(!system_quiet)
719             printf("\n");
720     }
721     if(preloader && viewer) {
722 #ifdef HAVE_MKSTEMP
723         char tmpname[] = "__swf__XXXXXX";
724         mkstemp(tmpname);
725 #else 
726         char*tmpname = "__tmp__.swf";
727 #endif
728         systemf("swfcombine \"%s\" viewport=%s -o %s",
729                 viewer, outputname, tmpname);
730         systemf("swfcombine %s -X %d -Y %d -r %f %s/PreLoaderTemplate.swf loader=%s movie=%s -o \"%s\"",zip,width,height,
731                 getRate(preloader), SWFDIR, preloader, tmpname, outputname);
732         systemf("rm %s", tmpname);
733     }
734
735
736     return 0;
737 }
738