fixed sound routines.
[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 Matthias Kramm <kramm@quiss.org> 
7
8    This file is distributed under the GPL, see file COPYING for details */
9
10 #include <stdlib.h>
11 #include <stdio.h>
12 #include <stdarg.h>
13 #include <string.h>
14 #include <unistd.h>
15 #include "../config.h"
16 #ifdef HAVE_DIRENT_H
17 #include <dirent.h>
18 #endif
19 #include "../lib/args.h"
20 #include "pdfswf.h"
21 #include "t1lib.h"
22 extern "C" {
23 #include "log.h"
24 }
25
26 static char * outputname = 0;
27 static int loglevel = 3;
28 static char * pagerange = 0;
29 static char * filename = 0;
30 static char * password = 0;
31
32 static char * preloader = 0;
33 static char * viewer = 0;
34
35 char* fontpaths[256];
36 int fontpathpos = 0;
37
38 int systemf(const char* format, ...)
39 {
40     char buf[1024];
41     int ret;
42     va_list arglist;
43     va_start(arglist, format);
44     vsprintf(buf, format, arglist);
45     va_end(arglist);
46
47     printf("%s\n", buf);
48     fflush(stdout);
49     ret = system(buf);
50     if(ret) {
51         fprintf(stderr, "system() returned %d\n", ret);
52         exit(ret);
53     }
54     return ret;
55 }
56
57 int args_callback_option(char*name,char*val) {
58     if (!strcmp(name, "o"))
59     {
60         outputname = val;
61         return 1;
62     }
63     else if (!strcmp(name, "v"))
64     {
65         loglevel ++;
66         return 0;
67     }
68     else if (name[0]=='p')
69     {
70         /* check whether the page range follows the p directly, like 
71            in -p1,2 */
72         do {
73             name++;
74         } while(*name == 32 || *name == 13 || *name == 10 || *name == '\t');
75
76         if(*name) {
77             pagerange = name;
78             return 0;
79         } 
80         pagerange = val;        
81         return 1;
82     }
83     else if (!strcmp(name, "P"))
84     {
85         password = val;
86         return 1;
87     }
88     else if (!strcmp(name, "s"))
89     {
90         pdfswf_drawonlyshapes();
91         return 0;
92     }
93     else if (!strcmp(name, "i"))
94     {
95         pdfswf_ignoredraworder();
96         return 0;
97     }
98     else if (!strcmp(name, "z"))
99     {
100         pdfswf_enablezlib();
101         return 0;
102     }
103     else if (!strcmp(name, "n"))
104     {
105         pdfswf_linksopennewwindow();
106         return 0;
107     }
108     else if (!strcmp(name, "f"))
109     {
110         pdfswf_storeallcharacters();
111         return 0;
112     }
113     else if (!strcmp(name, "F"))
114     {
115         char *s = strdup(val);
116         int l = strlen(s);
117         while(l && s[l-1]=='/') {
118             s[l-1] = 0;
119             l--;
120         }
121         fontpaths[fontpathpos++] = s;
122         return 1;
123     }
124     else if (!strcmp(name, "l"))
125     {
126         char buf[256];
127         sprintf(buf, "%s/swfs/default_loader.swf", DATADIR);
128         preloader = strdup(buf);
129         return 0;
130     }
131     else if (!strcmp(name, "b"))
132     {
133         char buf[256];
134         sprintf(buf, "%s/swfs/default_viewer.swf", DATADIR);
135         viewer = strdup(buf);
136         return 0;
137     }
138     else if (!strcmp(name, "L"))
139     {
140         if(val)
141         {
142             preloader = val;
143         }
144         else
145         {
146             systemf("ls %s/swfs/*_loader.swf", DATADIR);
147             printf("\n");
148             exit(1);
149         }
150         return 1;
151     }
152     else if (!strcmp(name, "B"))
153     {
154         if(val)
155         {
156             viewer = val;
157         }
158         else
159         {
160             systemf("ls %s/swfs/*_viewer.swf", DATADIR);
161             printf("\n");
162             exit(1);
163         }
164         return 1;
165     }
166     else if (name[0]=='j')
167     {
168         if(name[1]) {
169             pdfswf_jpegquality(atoi(&name[1]));
170             return 0;
171         } else {
172             pdfswf_jpegquality(atoi(val));
173             return 1;
174         }
175     }
176     else if (!strcmp(name, "V"))
177     {   
178         printf("pdf2swf - part of %s %s\n", PACKAGE, VERSION);
179         exit(0);
180     }
181     else 
182     {
183         fprintf(stderr, "Unknown option: -%s\n", name);
184         exit(1);
185     }
186     return 0;
187 }
188
189 struct options_t options[] =
190 {{"o","output"},
191  {"V","version"},
192  {"i","ignore"},
193  {"z","zlib"},
194  {"s","shapes"},
195  {"j","jpegquality"},
196  {"p","pages"},
197  {"w","samewindow"},
198  {"f","fonts"},
199  {"F","fontpath"},
200  {"B","viewer"},
201  {"L","preloader"},
202  {"b","defaultviewer"},
203  {"l","defaultpreloader"},
204  {0,0}
205 };
206
207 int args_callback_longoption(char*name,char*val) {
208     return args_long2shortoption(options, name, val);
209 }
210
211 int args_callback_command(char*name, char*val) {
212     if (!filename) 
213         filename = name;
214     else {
215         if(outputname)
216         {
217              fprintf(stderr, "Error: Do you want the output to go to %s or to %s?", 
218                      outputname, name);
219              exit(1);
220         }
221         outputname = name;
222     }
223     return 0;
224 }
225
226 void args_callback_usage(char*name)
227 {
228     printf("Usage: %s [-si] [-j quality] [-p range] [-P password] input.pdf [output.swf]\n", name);
229     printf("\n");
230     printf("-p  --pages=range          Convert only pages in range\n");
231     printf("-P  --password=password    Use password for deciphering the pdf\n");
232     printf("-s  --shapes               Don't use SWF Fonts, but store everything as shape\n");
233     printf("-i  --ignore               Ignore draw order (makes the SWF file smaller, but may produce\n");
234     printf("                           graphic errors)\n");
235     printf("-z  --zlib                 Use Flash 6 (MX) zlib compression (Needs at least Flash 6 Plugin to play)\n");
236     printf("-j  --jpegquality=quality  Set quality of embedded jpeg pictures (default:85)\n");
237     printf("-v  --verbose              Be verbose. Use more than one -v for greater effect\n");
238     printf("-w  --samewindow           Don't open a new Browser Window for Links in the SWF\n");
239 #ifdef HAVE_DIRENT
240     printf("-F  --fontdir directory    Add directory to font search path\n");
241 #endif
242     printf("-f  --fonts                Store full fonts in SWF. (Don't reduce to used characters)\n");
243     printf("-V  --version              Print program version\n");
244 #ifndef SYSTEM_BACKTICKS
245     printf("The following might not work because your system call doesn't support command substitution:\n");
246 #endif
247     printf("-b  --defaultviewer        Link default viewer to the pdf (%s/swfs/default_viewer.swf)\n", DATADIR);
248     printf("-l  --defaultpreloader     Link preloader \"name\" to the pdf (%s/swfs/default_loader.swf)\n", DATADIR);
249     printf("-B  --viewer=filename      Link viewer \"name\" to the pdf (\"%s -B\" for list)\n", name);
250     printf("-L  --preloader=filename   Link preloader \"name\" to the pdf (\"%s -L\" for list)\n",name);
251 }
252
253 #ifdef HAVE_DIRENT_H
254 void addfontdir(FILE*database, char* dirname, int*numfonts, char*searchpath) 
255 {
256     if(searchpath) {
257         if(searchpath[0])
258             strcat(searchpath, ":");
259         strcat(searchpath, dirname);
260     }
261     logf("<verbose> Adding %s to search path\n", dirname);
262
263     DIR*dir = opendir(dirname);
264     if(!dir) {
265         logf("<warning> Couldn't open directory %s\n", dirname);
266         return;
267     }
268     dirent*ent;
269     while(1) {
270         ent = readdir (dir);
271         if (!ent) 
272             break;
273         int l;
274         char*name = ent->d_name;
275         char type = 0;
276         if(!name) continue;
277         l=strlen(name);
278         if(l<4)
279             continue;
280         if(!strncasecmp(&name[l-4], ".afm", 4)) 
281             type=1;
282         if(!strncasecmp(&name[l-4], ".ttf", 4)) 
283             type=2;
284         if(type)
285         {
286             if(database && type==1) {
287                 char buf[256],a;
288                 FILE*fi;
289                 sprintf(buf, "%s/%s", dirname,name);
290                 fi = fopen(buf, "rb");
291                 if(!fi || !fread(&a,1,1,fi)) {
292                     logf("<warning> Couldn't read from %s", buf);
293                 }
294                 fprintf(database, "%s\n", buf);
295                 logf("<verbose> Found font %s\n", buf);
296             } 
297             if(numfonts)
298                 (*numfonts)++;
299         }
300     }
301     closedir(dir);
302 }
303 #endif
304
305 int main(int argn, char *argv[])
306 {
307     int ret;
308     char buf[256];
309     int numfonts = 0;
310     int t;
311     char t1searchpath[1024];
312 #ifdef HAVE_SRAND48
313     srand48(time(0));
314 #else
315 #ifdef HAVE_SRAND
316     srand(time(0));
317 #endif
318 #endif
319     processargs(argn, argv);
320     initLog(0,-1,0,0,-1,loglevel);
321     if(!outputname)
322     {
323         fprintf(stderr, "Please use -o to specify an output file\n");
324         exit(1);
325     }
326
327     // test if the page range is o.k.
328     is_in_range(0x7fffffff, pagerange);
329
330     if (!filename) {
331         args_callback_usage(argv[0]);
332         exit(0);
333     }
334
335     logf("<verbose> reading font files from %s/fonts\n", DATADIR);
336     //TODO: use tempnam here. Check if environment already contains a
337     //T1LIB_CONFIG.
338     putenv( "T1LIB_CONFIG=/tmp/t1lib.config.tmp");
339     FILE*db = fopen("/tmp/FontDataBase", "wb");
340     FILE*fi = fopen("/tmp/t1lib.config.tmp", "wb");
341     if(!db || !fi) {
342         fprintf(stderr, "Couldn't create temporary file in /tmp/\n");
343         exit(1);
344     }
345     t1searchpath[0] = 0;
346 #ifdef HAVE_DIRENT_H
347     sprintf(buf, "%s/fonts",DATADIR);
348     // pass 1
349     addfontdir(0, buf, &numfonts, 0);
350     for(t=0;t<fontpathpos;t++) {
351         addfontdir(0, fontpaths[t], &numfonts,0);
352     }
353     fprintf(db, "%d\n", numfonts);
354     // pass 2
355     addfontdir(db, buf, 0, t1searchpath);
356     for(t=0;t<fontpathpos;t++) {
357         addfontdir(db, fontpaths[t], 0, t1searchpath);
358     }
359 #else
360 /* This is a workaround. The correct way would be to
361    get directory listings working on all systems.
362 */
363     strcpy(t1searchpath, DATADIR);
364     strcat(t1searchpath, "/fonts");
365     fprintf(db, "14\n");
366     fprintf(db, "n021003l.afm\n");
367     fprintf(db, "n021023l.afm\n");
368     fprintf(db, "n021004l.afm\n");
369     fprintf(db, "n021024l.afm\n");
370     fprintf(db, "n019003l.afm\n");
371     fprintf(db, "n019023l.afm\n");
372     fprintf(db, "n019004l.afm\n");
373     fprintf(db, "n019024l.afm\n");
374     fprintf(db, "n022003l.afm\n");
375     fprintf(db, "n022023l.afm\n");
376     fprintf(db, "n022004l.afm\n");
377     fprintf(db, "n022024l.afm\n");
378     fprintf(db, "s050000l.afm\n");
379     fprintf(db, "d050000l.afm\n");
380 #endif
381
382     fprintf(fi, "FONTDATABASE=/tmp/FontDataBase\n");
383     fprintf(fi, "ENCODING=%s:.\n", t1searchpath);
384     fprintf(fi, "AFM=%s:.\n", t1searchpath);
385     fprintf(fi, "TYPE1=%s:.\n", t1searchpath);
386     fclose(fi);
387     fclose(db);
388     /* initialize t1lib */
389     T1_SetBitmapPad( 16);
390     if ((T1_InitLib(NO_LOGFILE)==NULL)){
391         fprintf(stderr, "Initialization of t1lib failed\n");
392         exit(1);
393     }
394     unlink("/tmp/t1lib.config.tmp");
395
396     pdfswf_init(filename, password);
397     pdfswf_setoutputfilename(outputname);
398
399     int pages = pdfswf_numpages();
400     for(t = 1; t <= pages; t++) 
401     {
402         if(is_in_range(t, pagerange))
403         pdfswf_convertpage(t);
404     }
405     pdfswf_performconversion();
406
407     pdfswf_close();
408
409     if(viewer || preloader) {
410 #ifndef SYSTEM_BACKTICKS
411         logf("<warning> Not sure whether system() can handle command substitution");
412         logf("<warning> (According to config.h, it can't)");
413 #endif
414         printf("\n");
415     }
416
417     if(viewer && !preloader) {
418         systemf("swfcombine `swfdump -XY %s` %s viewport=%s -o %s",
419                 outputname, viewer, outputname, outputname);
420         printf("\n");
421     }
422     if(preloader && !viewer) {
423         logf("<warning> --preloader option without --viewer option doesn't make very much sense.");
424         ret = systemf("swfcombine `swfdump -r %s` %s/swfs/PreLoaderTemplate.swf loader=%s movie=%s -o %s",
425                 preloader, DATADIR, preloader, outputname, outputname);
426         printf("\n");
427     }
428     if(preloader && viewer) {
429         systemf("swfcombine %s viewport=%s -o __tmp__.swf",
430                 viewer, outputname, outputname);
431         systemf("swfcombine `swfdump -XY %s` `swfdump -r %s` %s/swfs/PreLoaderTemplate.swf loader=%s movie=__tmp__.swf -o %s",
432                 outputname, preloader, DATADIR, preloader, outputname);
433         systemf("rm __tmp__.swf");
434     }
435
436     unlink("/tmp/FontDataBase");
437     return 0;
438 }
439
440