9e49a088be08ecb30240f55198b8758e45c0498e
[swftools.git] / pdf2swf / pdf2swf.cc
1 /* pdf2swf.cc
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 #ifdef HAVE_SYS_STAT_H
32 #include <sys/stat.h>
33 #endif
34 #include "../lib/args.h"
35 #include "SWFOutputDev.h"
36 #include "t1lib.h"
37 extern "C" {
38 #include "log.h"
39 }
40 #include "xpdf/gfile.h"
41
42 #ifndef WIN32
43 #define FONTDIR SWFTOOLS_DATADIR "/fonts"
44 #define SWFDIR SWFTOOLS_DATADIR "/swfs"
45 #else
46 #define FONTDIR "C:\\swftools\\fonts"
47 #define SWFDIR "C:\\swftools\\swfs"
48 #endif
49
50 static char * outputname = 0;
51 static int loglevel = 3;
52 static char * pagerange = 0;
53 static char * filename = 0;
54 static char * password = 0;
55
56 static char * preloader = 0;
57 static char * viewer = 0;
58
59 char* fontpaths[256];
60 int fontpathpos = 0;
61
62 static int system_quiet=0;
63
64 int systemf(const char* format, ...)
65 {
66     char buf[1024];
67     int ret;
68     va_list arglist;
69     va_start(arglist, format);
70     vsprintf(buf, format, arglist);
71     va_end(arglist);
72
73     if(!system_quiet) {
74         printf("%s\n", buf);
75         fflush(stdout);
76     }
77     ret = system(buf);
78     if(ret) {
79         fprintf(stderr, "system() returned %d\n", ret);
80         exit(ret);
81     }
82     return ret;
83 }
84
85 int args_callback_option(char*name,char*val) {
86     if (!strcmp(name, "o"))
87     {
88         outputname = val;
89         return 1;
90     }
91     else if (!strcmp(name, "v"))
92     {
93         loglevel ++;
94         return 0;
95     }
96     else if (!strcmp(name, "q"))
97     {
98         loglevel --;
99         system_quiet = 1;
100         return 0;
101     }
102     else if (name[0]=='p')
103     {
104         /* check whether the page range follows the p directly, like 
105            in -p1,2 */
106         do {
107             name++;
108         } while(*name == 32 || *name == 13 || *name == 10 || *name == '\t');
109
110         if(*name) {
111             pagerange = name;
112             return 0;
113         } 
114         pagerange = val;        
115         return 1;
116     }
117     else if (!strcmp(name, "P"))
118     {
119         password = val;
120         return 1;
121     }
122     else if (!strcmp(name, "s"))
123     {
124         char*s = strdup(val);
125         char*c = strchr(s, '=');
126         if(c && *c && c[1])  {
127             *c = 0;
128             c++;
129             pdfswf_setparameter(s,c);
130         }
131         else
132             pdfswf_setparameter(s,"1");
133         return 1;
134     }
135     else if (!strcmp(name, "S"))
136     {
137         pdfswf_drawonlyshapes();
138         return 0;
139     }
140     else if (!strcmp(name, "i"))
141     {
142         pdfswf_ignoredraworder();
143         return 0;
144     }
145     else if (!strcmp(name, "z"))
146     {
147         pdfswf_enablezlib();
148         return 0;
149     }
150     else if (!strcmp(name, "n"))
151     {
152         pdfswf_linksopennewwindow();
153         return 0;
154     }
155     else if (!strcmp(name, "t"))
156     {
157         pdfswf_insertstop();
158         return 0;
159     }
160     else if (!strcmp(name, "T"))
161     {
162         int i = atoi(val);
163         if(!strcasecmp(val, "mx"))
164             i = 6;
165         pdfswf_setversion(i);
166         return 1;
167     }
168     else if (!strcmp(name, "f"))
169     {
170         pdfswf_storeallcharacters();
171         return 0;
172     }
173     else if (!strcmp(name, "F"))
174     {
175         char *s = strdup(val);
176         int l = strlen(s);
177         while(l && s[l-1]=='/') {
178             s[l-1] = 0;
179             l--;
180         }
181         fontpaths[fontpathpos++] = s;
182         return 1;
183     }
184     else if (!strcmp(name, "l"))
185     {
186         char buf[256];
187         sprintf(buf, "%s/default_loader.swf", SWFDIR);
188         preloader = strdup(buf);
189         return 0;
190     }
191     else if (!strcmp(name, "b"))
192     {
193         char buf[256];
194         sprintf(buf, "%s/default_viewer.swf", SWFDIR);
195         viewer = strdup(buf);
196         return 0;
197     }
198     else if (!strcmp(name, "L"))
199     {
200         if(val)
201         {
202             preloader = val;
203         }
204         else
205         {
206             systemf("ls %s/*_loader.swf", SWFDIR);
207             if(!system_quiet)
208                 printf("\n");
209             exit(1);
210         }
211         return 1;
212     }
213     else if (!strcmp(name, "B"))
214     {
215         if(val)
216         {
217             viewer = val;
218         }
219         else
220         {
221             systemf("ls %s/*_viewer.swf", SWFDIR);
222             if(!system_quiet)
223                 printf("\n");
224             exit(1);
225         }
226         return 1;
227     }
228     else if (!strcmp(name, "j"))
229     {
230         if(name[1]) {
231             pdfswf_jpegquality(atoi(&name[1]));
232             return 0;
233         } else {
234             pdfswf_jpegquality(atoi(val));
235             return 1;
236         }
237     }
238     else if (!strcmp(name, "V"))
239     {   
240         printf("pdf2swf - part of %s %s\n", PACKAGE, VERSION);
241         exit(0);
242     }
243     else 
244     {
245         fprintf(stderr, "Unknown option: -%s\n", name);
246         exit(1);
247     }
248     return 0;
249 }
250
251 /*struct docoptions_t options[] =
252 {{"o","output","filename::Specify output file"},
253  {"V","version","Print program version"},
254  {"i","ignore","Ignore draw order (makes the SWF file smaller, but may produce graphic errors)"},
255  {"z","zlib","Use Flash 6 (MX) zlib compression (Needs at least Flash 6 Plugin to play)"},
256  {"s","shapes","Don't use SWF Fonts, but store everything as shape"},
257  {"j","jpegquality","Set quality of embedded jpeg pictures (default: 85)"},
258  {"p","pages","Convert only pages in range. (E.g. 3-85)"},
259  {"w","samewindow","Don't open a new browser window for links in the SWF"},
260  {"f","fonts","Stroe full fonts in SWF. (Don't reduce to used characters)"},
261  {"F","fontpath","path::Add directory to font search path"},
262  {"B","viewer","name::Link viewer \"name\" to the pdf"},
263  {"L","preloader","file.swf::Link preloader \"file.swf\" to the pdf"},
264  {"b","defaultviewer","Link default viewer to the pdf"},
265  {"l","defaultpreloader","Link default preloader to the pdf"}
266  {0,0}
267 };*/
268 struct options_t options[] =
269 {{"o","output"},
270  {"q","quiet"},
271  {"V","version"},
272  {"i","ignore"},
273  {"z","zlib"},
274  {"s","set"},
275  {"S","shapes"},
276  {"j","jpegquality"},
277  {"p","pages"},
278  {"w","samewindow"},
279  {"f","fonts"},
280  {"F","fontdir"},
281  {"B","viewer"},
282  {"L","preloader"},
283  {"b","defaultviewer"},
284  {"l","defaultpreloader"},
285  {"t","stop"},
286  {"T","flashversion"},
287  {0,0}
288 };
289
290 int args_callback_longoption(char*name,char*val) {
291     return args_long2shortoption(options, name, val);
292 }
293
294 int args_callback_command(char*name, char*val) {
295     if (!filename) 
296         filename = name;
297     else {
298         if(outputname)
299         {
300              fprintf(stderr, "Error: Do you want the output to go to %s or to %s?", 
301                      outputname, name);
302              exit(1);
303         }
304         outputname = name;
305     }
306     return 0;
307 }
308
309 void args_callback_usage(char*name)
310 {
311     printf("Usage: %s [Options] input.pdf [-o output.swf]\n", name);
312     printf("\nBasic options:\n");
313     printf("-p  --pages=range          Convert only pages in range\n");
314     printf("-P  --password=password    Use password for deciphering the pdf\n");
315     printf("-v  --verbose              Be verbose. Use more than one -v for greater effect\n");
316     printf("-q  --quiet                Suppress normal messages. Use -qq to suppress warnings, also.\n");
317 #ifdef HAVE_DIRENT_H
318     printf("-F  --fontdir directory    Add directory to font search path\n");
319 #endif
320     printf("-V  --version              Print program version\n");
321     printf("\nEnhanced conversion options:\n");
322     printf("-t  --stop                 Insert a \"Stop\" Tag in every frame (don't turn pages automatically)\n");
323     printf("-S  --shapes               Don't use SWF Fonts, but store everything as shape\n");
324     printf("-z  --zlib                 Use Flash 6 (MX) zlib compression (Needs at least Flash 6 Plugin to play)\n");
325     printf("-j  --jpegquality=quality  Set quality of embedded jpeg pictures (default:85)\n");
326     printf("-w  --samewindow           Don't open a new Browser Window for Links in the SWF\n");
327     printf("-f  --fonts                Store full fonts in SWF. (Don't reduce to used characters)\n");
328     printf("-T  --flashversion=num     Set the flash version in the header to num (default: 4)\n");
329     printf("-s caplinewidth=value      Set the minimum line width to trigger cap style handling to value. (3)\n");
330     printf("-s splinequality=value     Set the quality of spline convertion to value (0-100, default: 100).\n");
331     printf("-s fontquality=value       Set the quality of font convertion to value (0-100, default: 100).\n");
332     printf("-s ignoredraworder         Ignore draw order (makes the SWF file smaller, but may produce\n"
333            "                           graphic errors)\n");
334     printf("Postprocessing options:\n");
335 #ifndef SYSTEM_BACKTICKS
336     printf("(They might not work because your system call doesn't support command substitution)\n");
337 #endif
338     printf("-b  --defaultviewer        Link default viewer to the pdf (%s/swfs/default_viewer.swf)\n", SWFTOOLS_DATADIR);
339     printf("-l  --defaultpreloader     Link default preloader the pdf (%s/swfs/default_loader.swf)\n", SWFTOOLS_DATADIR);
340     printf("-B  --viewer=filename      Link viewer \"name\" to the pdf (\"%s -B\" for list)\n", name);
341     printf("-L  --preloader=filename   Link preloader \"name\" to the pdf (\"%s -L\" for list)\n",name);
342 }
343
344 #ifdef HAVE_DIRENT_H
345 void addfontdir(FILE*database, char* dirname, int*numfonts, char*searchpath) 
346 {
347     if(searchpath) {
348         if(searchpath[0])
349             strcat(searchpath, ":");
350         strcat(searchpath, dirname);
351     }
352     if(!numfonts)
353         msg("<verbose> Adding %s to search path\n", dirname);
354
355     DIR*dir = opendir(dirname);
356     if(!dir) {
357         msg("<warning> Couldn't open directory %s\n", dirname);
358         return;
359     }
360     dirent*ent;
361     while(1) {
362         ent = readdir (dir);
363         if (!ent) 
364             break;
365         int l;
366         char*name = ent->d_name;
367         char type = 0;
368         if(!name) continue;
369         l=strlen(name);
370         if(l<4)
371             continue;
372         if(!strncasecmp(&name[l-4], ".afm", 4)) 
373             type=1;
374         if(!strncasecmp(&name[l-4], ".ttf", 4)) 
375             type=2;
376         if(type)
377         {
378             if(database && type==1) {
379                 char buf[256],a;
380                 FILE*fi;
381 #ifdef WIN32
382                 sprintf(buf, "%s\\%s", dirname,name);
383 #else
384                 sprintf(buf, "%s/%s", dirname,name);
385 #endif
386                 fi = fopen(buf, "rb");
387                 if(!fi || !fread(&a,1,1,fi)) {
388                     msg("<warning> Couldn't read from %s", buf);
389                 }
390
391 #ifdef WIN32
392 /* might also work for all other systems, but we *need* it for win32 */
393                 if(!strncmp(buf, FONTDIR, strlen(FONTDIR)))
394                     fprintf(database, "%s\n", buf+strlen(FONTDIR));
395                 else
396 #endif
397                     fprintf(database, "%s\n", buf);
398
399                 msg("<verbose> Found font %s\n", buf);
400                 fclose(fi);
401             } 
402             if(numfonts)
403                 (*numfonts)++;
404         }
405     }
406     closedir(dir);
407 }
408 #endif
409
410 char* stripfilename(char*filename, char*newext)
411 {
412     char*last1 = strrchr(filename, '/');
413     char*last2 = strrchr(filename, '\\');
414     char*pos = filename;
415     char*name;
416     char*dot;
417     if(last1>pos) pos = last1 + 1;
418     if(last2>pos) pos = last2 + 1;
419     name = (char*)malloc(strlen(pos)+5);
420     strcpy(name, pos);
421     dot = strrchr(name, '.');
422     if(dot) {
423         *dot = 0;
424     }
425     strcat(name, newext);
426     return name;
427 }
428
429 int main(int argn, char *argv[])
430 {
431     int ret;
432     char buf[256];
433     int numfonts = 0;
434     int t;
435     char t1searchpath[1024];
436
437 #if defined(WIN32) && defined(HAVE_STAT) && defined(HAVE_SYS_STAT_H)
438     FILE*test = fopen(FONTDIR "\\d050000l.afm", "rb");
439     if(!test) {
440         fprintf(stderr, "Couldn't find file " FONTDIR "\\d050000l.afm- pdf2swf not installed properly? OS says:\n");
441         perror("open");
442         exit(1);
443     }
444     fclose(test);
445 #endif
446
447 #ifdef HAVE_SRAND48
448     srand48(time(0));
449 #else
450 #ifdef HAVE_SRAND
451     srand(time(0));
452 #endif
453 #endif
454     processargs(argn, argv);
455     initLog(0,-1,0,0,-1,loglevel);
456
457     if(!filename)
458     {
459         fprintf(stderr, "Please specify an input file\n");
460         exit(1);
461     }
462
463     if(!outputname)
464     {
465         if(filename) {
466             outputname = stripfilename(filename, ".swf");
467             msg("<notice> Output filename not given. Writing to %s", outputname);
468         } 
469     }
470         
471     if(!outputname)
472     {
473         fprintf(stderr, "Please use -o to specify an output file\n");
474         exit(1);
475     }
476
477     // test if the page range is o.k.
478     is_in_range(0x7fffffff, pagerange);
479
480     if (!filename) {
481         args_callback_usage(argv[0]);
482         exit(0);
483     }
484
485     msg("<verbose> reading font files from %s\n", FONTDIR);
486     //TODO: use tempnam here. Check if environment already contains a
487     //T1LIB_CONFIG.
488     char buf1[256],buf2[256],buf3[256];
489     char* t1lib_config = mktmpname(buf1);
490     char* fontdatabase = mktmpname(buf2);
491    
492     sprintf(buf3, "T1LIB_CONFIG=%s", t1lib_config);
493     putenv(buf3);
494
495     FILE*db = fopen(fontdatabase, "wb");
496     FILE*fi = fopen(t1lib_config, "wb");
497     if(!db || !fi) {
498         if(!db) fprintf(stderr, "Couldn't create temporary file %s\n",fontdatabase);
499         if(!fi) fprintf(stderr, "Couldn't create temporary file %s\n",t1lib_config);
500         exit(1);
501     }
502     t1searchpath[0] = 0;
503 #ifdef HAVE_DIRENT_H
504     // pass 1
505     addfontdir(0, FONTDIR, &numfonts, 0);
506     for(t=0;t<fontpathpos;t++) {
507         addfontdir(0, fontpaths[t], &numfonts,0);
508     }
509     fprintf(db, "%d\n", numfonts);
510     // pass 2
511     addfontdir(db, FONTDIR, 0, t1searchpath);
512     for(t=0;t<fontpathpos;t++) {
513         addfontdir(db, fontpaths[t], 0, t1searchpath);
514     }
515 #else
516 #ifdef WIN32
517 #error Win32 version requires dirent.h
518 #endif
519 /* This is a workaround. The correct way would be to
520    get directory listings working on all systems.
521 */
522     strcpy(t1searchpath, SWFTOOLS_DATADIR);
523     strcat(t1searchpath, "/fonts");
524     fprintf(db, "14\n");
525     fprintf(db, "n021003l.afm\n");
526     fprintf(db, "n021023l.afm\n");
527     fprintf(db, "n021004l.afm\n");
528     fprintf(db, "n021024l.afm\n");
529     fprintf(db, "n019003l.afm\n");
530     fprintf(db, "n019023l.afm\n");
531     fprintf(db, "n019004l.afm\n");
532     fprintf(db, "n019024l.afm\n");
533     fprintf(db, "n022003l.afm\n");
534     fprintf(db, "n022023l.afm\n");
535     fprintf(db, "n022004l.afm\n");
536     fprintf(db, "n022024l.afm\n");
537     fprintf(db, "s050000l.afm\n");
538     fprintf(db, "d050000l.afm\n");
539 #endif
540
541     fprintf(fi, "FONTDATABASE=%s\n",fontdatabase);
542 #ifndef WIN32
543     fprintf(fi, "ENCODING=%s:.\n", t1searchpath);
544     fprintf(fi, "AFM=%s:.\n", t1searchpath);
545     fprintf(fi, "TYPE1=%s:.\n", t1searchpath);
546 #else
547     fprintf(fi, "ENCODING=%s\n", FONTDIR);
548     fprintf(fi, "AFM=%s\n", FONTDIR);
549     fprintf(fi, "TYPE1=%s\n", FONTDIR);
550 #endif
551     fclose(fi);
552     fclose(db);
553     /* initialize t1lib */
554     T1_SetBitmapPad( 16);
555     if ((T1_InitLib(LOGFILE)==NULL)){
556         fprintf(stderr, "Initialization of t1lib failed\n");
557         exit(1);
558     }
559     unlink(t1lib_config);
560
561     pdfswf_init(filename, password);
562     pdfswf_setoutputfilename(outputname);
563
564     int pages = pdfswf_numpages();
565     for(t = 1; t <= pages; t++) 
566     {
567         if(is_in_range(t, pagerange))
568         pdfswf_convertpage(t);
569     }
570     pdfswf_performconversion();
571
572     pdfswf_close();
573
574     if(viewer || preloader) {
575 #ifndef SYSTEM_BACKTICKS
576         msg("<warning> Not sure whether system() can handle command substitution");
577         msg("<warning> (According to config.h, it can't)");
578 #endif
579         if(!system_quiet)
580             printf("\n");
581     }
582
583     if(viewer && !preloader) {
584         systemf("swfcombine `swfdump -XY %s` %s viewport=%s -o %s",
585                 outputname, viewer, outputname, outputname);
586         if(!system_quiet)
587             printf("\n");
588     }
589     if(preloader && !viewer) {
590         msg("<warning> --preloader option without --viewer option doesn't make very much sense.");
591         ret = systemf("swfcombine `swfdump -r %s` %s/PreLoaderTemplate.swf loader=%s movie=%s -o %s",
592                 preloader, SWFDIR, preloader, outputname, outputname);
593         if(!system_quiet)
594             printf("\n");
595     }
596     if(preloader && viewer) {
597         systemf("swfcombine %s viewport=%s -o __tmp__.swf",
598                 viewer, outputname, outputname);
599         systemf("swfcombine `swfdump -XY %s` `swfdump -r %s` %s/PreLoaderTemplate.swf loader=%s movie=__tmp__.swf -o %s",
600                 outputname, preloader, SWFDIR, preloader, outputname);
601         systemf("rm __tmp__.swf");
602     }
603
604     unlink(fontdatabase);
605     return 0;
606 }
607
608