CIDFonts: look for external replacement.
[swftools.git] / pdf2swf / pdf2swf.cc
index 0d81796..782e138 100644 (file)
@@ -9,11 +9,15 @@
 
 #include <stdlib.h>
 #include <stdio.h>
+#include <stdarg.h>
 #include <string.h>
 #include <unistd.h>
 #include "../config.h"
-#include "args.h"
-#include "pdfswf.h"
+#ifdef HAVE_DIRENT_H
+#include <dirent.h>
+#endif
+#include "../lib/args.h"
+#include "SWFOutputDev.h"
 #include "t1lib.h"
 extern "C" {
 #include "log.h"
@@ -25,6 +29,35 @@ static char * pagerange = 0;
 static char * filename = 0;
 static char * password = 0;
 
+static char * preloader = 0;
+static char * viewer = 0;
+
+char* fontpaths[256];
+int fontpathpos = 0;
+
+static int system_quiet=0;
+
+int systemf(const char* format, ...)
+{
+    char buf[1024];
+    int ret;
+    va_list arglist;
+    va_start(arglist, format);
+    vsprintf(buf, format, arglist);
+    va_end(arglist);
+
+    if(!system_quiet) {
+       printf("%s\n", buf);
+       fflush(stdout);
+    }
+    ret = system(buf);
+    if(ret) {
+       fprintf(stderr, "system() returned %d\n", ret);
+       exit(ret);
+    }
+    return ret;
+}
+
 int args_callback_option(char*name,char*val) {
     if (!strcmp(name, "o"))
     {
@@ -36,6 +69,12 @@ int args_callback_option(char*name,char*val) {
        loglevel ++;
        return 0;
     }
+    else if (!strcmp(name, "q"))
+    {
+       loglevel --;
+       system_quiet = 1;
+       return 0;
+    }
     else if (name[0]=='p')
     {
        /* check whether the page range follows the p directly, like 
@@ -56,6 +95,101 @@ int args_callback_option(char*name,char*val) {
        password = val;
        return 1;
     }
+    else if (!strcmp(name, "s"))
+    {
+       pdfswf_drawonlyshapes();
+       return 0;
+    }
+    else if (!strcmp(name, "i"))
+    {
+       pdfswf_ignoredraworder();
+       return 0;
+    }
+    else if (!strcmp(name, "z"))
+    {
+       pdfswf_enablezlib();
+       return 0;
+    }
+    else if (!strcmp(name, "n"))
+    {
+       pdfswf_linksopennewwindow();
+       return 0;
+    }
+    else if (!strcmp(name, "t"))
+    {
+       pdfswf_insertstop();
+       return 0;
+    }
+    else if (!strcmp(name, "f"))
+    {
+       pdfswf_storeallcharacters();
+       return 0;
+    }
+    else if (!strcmp(name, "F"))
+    {
+       char *s = strdup(val);
+       int l = strlen(s);
+       while(l && s[l-1]=='/') {
+           s[l-1] = 0;
+           l--;
+       }
+       fontpaths[fontpathpos++] = s;
+       return 1;
+    }
+    else if (!strcmp(name, "l"))
+    {
+       char buf[256];
+       sprintf(buf, "%s/swfs/default_loader.swf", DATADIR);
+       preloader = strdup(buf);
+       return 0;
+    }
+    else if (!strcmp(name, "b"))
+    {
+       char buf[256];
+       sprintf(buf, "%s/swfs/default_viewer.swf", DATADIR);
+       viewer = strdup(buf);
+       return 0;
+    }
+    else if (!strcmp(name, "L"))
+    {
+       if(val)
+       {
+           preloader = val;
+       }
+       else
+       {
+           systemf("ls %s/swfs/*_loader.swf", DATADIR);
+           if(!system_quiet)
+               printf("\n");
+           exit(1);
+       }
+       return 1;
+    }
+    else if (!strcmp(name, "B"))
+    {
+       if(val)
+       {
+           viewer = val;
+       }
+       else
+       {
+           systemf("ls %s/swfs/*_viewer.swf", DATADIR);
+           if(!system_quiet)
+               printf("\n");
+           exit(1);
+       }
+       return 1;
+    }
+    else if (!strcmp(name, "j"))
+    {
+       if(name[1]) {
+           pdfswf_jpegquality(atoi(&name[1]));
+           return 0;
+       } else {
+           pdfswf_jpegquality(atoi(val));
+           return 1;
+       }
+    }
     else if (!strcmp(name, "V"))
     {  
        printf("pdf2swf - part of %s %s\n", PACKAGE, VERSION);
@@ -69,36 +203,45 @@ int args_callback_option(char*name,char*val) {
     return 0;
 }
 
-struct options_t
-{
-    char shortoption;
-    char*longoption;
-} options[] =
-{{'o',"output"},
- {'V',"version"},
- {'p',"pages"}
+/*struct docoptions_t options[] =
+{{"o","output","filename::Specify output file"},
+ {"V","version","Print program version"},
+ {"i","ignore","Ignore draw order (makes the SWF file smaller, but may produce graphic errors)"},
+ {"z","zlib","Use Flash 6 (MX) zlib compression (Needs at least Flash 6 Plugin to play)"},
+ {"s","shapes","Don't use SWF Fonts, but store everything as shape"},
+ {"j","jpegquality","Set quality of embedded jpeg pictures (default: 85)"},
+ {"p","pages","Convert only pages in range. (E.g. 3-85)"},
+ {"w","samewindow","Don't open a new browser window for links in the SWF"},
+ {"f","fonts","Stroe full fonts in SWF. (Don't reduce to used characters)"},
+ {"F","fontpath","path::Add directory to font search path"},
+ {"B","viewer","name::Link viewer \"name\" to the pdf"},
+ {"L","preloader","file.swf::Link preloader \"file.swf\" to the pdf"},
+ {"b","defaultviewer","Link default viewer to the pdf"},
+ {"l","defaultpreloader","Link default preloader to the pdf"}
+ {0,0}
+};*/
+struct options_t options[] =
+{{"o","output"},
+ {"q","quiet"},
+ {"V","version"},
+ {"i","ignore"},
+ {"z","zlib"},
+ {"s","shapes"},
+ {"j","jpegquality"},
+ {"p","pages"},
+ {"w","samewindow"},
+ {"f","fonts"},
+ {"F","fontpath"},
+ {"B","viewer"},
+ {"L","preloader"},
+ {"b","defaultviewer"},
+ {"l","defaultpreloader"},
+ {"t","stop"},
+ {0,0}
 };
 
 int args_callback_longoption(char*name,char*val) {
-    int t;
-    char*equal = strchr(name,'=');
-    if (equal) {
-       *equal = 0;
-       equal++;
-    }
-    for(t=0;t<sizeof(options)/sizeof(struct options_t);t++) {
-        if(!strcmp(options[t].longoption, name)) {
-               char*tmp = (char*)malloc(strlen(equal)+strlen(name)+2);
-               tmp[0] = options[t].shortoption;
-               tmp[1] = 0;
-               if(equal) {
-                   strcpy(&tmp[1], equal);
-               }
-               return args_callback_option(tmp,val);
-       }
-    }
-    fprintf(stderr, "Unknown option: %s\n", name);
-    exit(1);
+    return args_long2shortoption(options, name, val);
 }
 
 int args_callback_command(char*name, char*val) {
@@ -118,92 +261,106 @@ int args_callback_command(char*name, char*val) {
 
 void args_callback_usage(char*name)
 {
-    printf("Usage: %s [-p range] [-P password] input.pdf [output.swf]\n", name);
-    printf("\n");
-    printf("-p range            (range) Convert only pages in range\n");
-    printf("-P password         (password) Use password for deciphering the pdf\n");
+    printf("Usage: %s [-si] [-j quality] [-p range] [-P password] input.pdf -o output.swf\n", name);
     printf("\n");
+    printf("-p  --pages=range          Convert only pages in range\n");
+    printf("-P  --password=password    Use password for deciphering the pdf\n");
+    printf("-s  --shapes               Don't use SWF Fonts, but store everything as shape\n");
+    printf("-i  --ignore               Ignore draw order (makes the SWF file smaller, but may produce\n");
+    printf("                           graphic errors)\n");
+    printf("-z  --zlib                 Use Flash 6 (MX) zlib compression (Needs at least Flash 6 Plugin to play)\n");
+    printf("-j  --jpegquality=quality  Set quality of embedded jpeg pictures (default:85)\n");
+    printf("-v  --verbose              Be verbose. Use more than one -v for greater effect\n");
+    printf("-q  --quiet                Suppress normal messages. Use -qq to suppress warnings, also.\n");
+    printf("-w  --samewindow           Don't open a new Browser Window for Links in the SWF\n");
+#ifdef HAVE_DIRENT
+    printf("-F  --fontdir directory    Add directory to font search path\n");
+#endif
+    printf("-f  --fonts                Store full fonts in SWF. (Don't reduce to used characters)\n");
+    printf("-V  --version              Print program version\n");
+    printf("-t  --stop                 Insert a \"Stop\" Tag in every frame (don't turn pages automatically)\n");
+#ifndef SYSTEM_BACKTICKS
+    printf("The following might not work because your system call doesn't support command substitution:\n");
+#endif
+    printf("-b  --defaultviewer        Link default viewer to the pdf (%s/swfs/default_viewer.swf)\n", DATADIR);
+    printf("-l  --defaultpreloader     Link default preloader the pdf (%s/swfs/default_loader.swf)\n", DATADIR);
+    printf("-B  --viewer=filename      Link viewer \"name\" to the pdf (\"%s -B\" for list)\n", name);
+    printf("-L  --preloader=filename   Link preloader \"name\" to the pdf (\"%s -L\" for list)\n",name);
 }
 
-/* check whether the value t is in a given range.
-  examples: 3 is in range 1-10: true
-            7 is in range 2-4,6,8-10: false
-           9 is in range 1,2,3-12: true
-*/
-char is_in_range(int t, char*irange)
+#ifdef HAVE_DIRENT_H
+void addfontdir(FILE*database, char* dirname, int*numfonts, char*searchpath) 
 {
-    char*pos = irange;
-    char*digits;
-    int num;
-    char range = 0;
-    int last=0;
-    char tmp;
-
-    if(!irange)  // no range resembles (-OO,OO)
-       return 1;
-
-    while(*pos)
-    {
-       while(*pos == ' ' || *pos == '\r' || *pos == '\n' || *pos == '\t')
-           pos++;
-
-       digits = pos;
-       while(*digits>='0' && *digits<='9')
-           digits++;
-       if(digits == pos) {
-           fprintf(stderr, "Error: \"%s\" is not a valid format (digit expected)\n",irange);
-           exit(1);
-        }
-       
-       tmp=*digits;*digits=0;
-       num = atoi(pos);
-       *digits=tmp;
-       pos = digits;
-
-       while(*pos == ' ' || *pos == '\r' || *pos == '\n' || *pos == '\t')
-           pos++;
-
-       if(range && last<=t && num>=t)
-           return 1;
-       if(range) {
-           range = 0;
-           if(*pos)
-            pos ++;
-           continue;
-       }
+    if(searchpath) {
+       if(searchpath[0])
+           strcat(searchpath, ":");
+       strcat(searchpath, dirname);
+    }
+    logf("<verbose> Adding %s to search path\n", dirname);
 
-       if(*pos=='-')
-       {
-           if(range) {
-               fprintf(stderr, "Error: \"%s\" is not a valid format (too many '-'s)\n",irange);
-               exit(1);
-           }
-           last = num;
-           range = 1;
-           if(*pos)
-            pos ++;
+    DIR*dir = opendir(dirname);
+    if(!dir) {
+       logf("<warning> Couldn't open directory %s\n", dirname);
+       return;
+    }
+    dirent*ent;
+    while(1) {
+       ent = readdir (dir);
+       if (!ent) 
+           break;
+       int l;
+       char*name = ent->d_name;
+       char type = 0;
+       if(!name) continue;
+       l=strlen(name);
+       if(l<4)
            continue;
-       } 
-       else 
+       if(!strncasecmp(&name[l-4], ".afm", 4)) 
+           type=1;
+       if(!strncasecmp(&name[l-4], ".ttf", 4)) 
+           type=2;
+       if(type)
        {
-           /* if it isn't a '-', we assume it is a seperator like
-              ',', ';', ':', whatever. */
-           if(t == num)
-               return 1;
-           if(*pos)
-            pos ++;
-           continue;
+           if(database && type==1) {
+               char buf[256],a;
+               FILE*fi;
+               sprintf(buf, "%s/%s", dirname,name);
+               fi = fopen(buf, "rb");
+               if(!fi || !fread(&a,1,1,fi)) {
+                   logf("<warning> Couldn't read from %s", buf);
+               }
+               fprintf(database, "%s\n", buf);
+               logf("<verbose> Found font %s\n", buf);
+           } 
+           if(numfonts)
+               (*numfonts)++;
        }
     }
-    if(range && last<=t)
-       return 1;
-    return 0;
+    closedir(dir);
 }
+#endif
 
 int main(int argn, char *argv[])
 {
+    int ret;
+    char buf[256];
+    int numfonts = 0;
+    int t;
+    char t1searchpath[1024];
+#ifdef HAVE_SRAND48
+    srand48(time(0));
+#else
+#ifdef HAVE_SRAND
+    srand(time(0));
+#endif
+#endif
     processargs(argn, argv);
     initLog(0,-1,0,0,-1,loglevel);
+    if(!outputname)
+    {
+       fprintf(stderr, "Please use -o to specify an output file\n");
+       exit(1);
+    }
 
     // test if the page range is o.k.
     is_in_range(0x7fffffff, pagerange);
@@ -213,16 +370,59 @@ int main(int argn, char *argv[])
        exit(0);
     }
 
-    logf("<verbose> reading data files from %s\n", DATADIR);
+    logf("<verbose> reading font files from %s/fonts\n", DATADIR);
     //TODO: use tempnam here. Check if environment already contains a
     //T1LIB_CONFIG.
     putenv( "T1LIB_CONFIG=/tmp/t1lib.config.tmp");
+    FILE*db = fopen("/tmp/FontDataBase", "wb");
     FILE*fi = fopen("/tmp/t1lib.config.tmp", "wb");
-    fprintf(fi, "FONTDATABASE=%s/FontDataBase\n", DATADIR);
-    fprintf(fi, "ENCODING=%s:.\n", DATADIR);
-    fprintf(fi, "AFM=%s:.\n", DATADIR);
-    fprintf(fi, "TYPE1=%s:.\n", DATADIR);
+    if(!db || !fi) {
+       fprintf(stderr, "Couldn't create temporary file in /tmp/\n");
+       exit(1);
+    }
+    t1searchpath[0] = 0;
+#ifdef HAVE_DIRENT_H
+    sprintf(buf, "%s/fonts",DATADIR);
+    // pass 1
+    addfontdir(0, buf, &numfonts, 0);
+    for(t=0;t<fontpathpos;t++) {
+       addfontdir(0, fontpaths[t], &numfonts,0);
+    }
+    fprintf(db, "%d\n", numfonts);
+    // pass 2
+    addfontdir(db, buf, 0, t1searchpath);
+    for(t=0;t<fontpathpos;t++) {
+       addfontdir(db, fontpaths[t], 0, t1searchpath);
+    }
+#else
+/* This is a workaround. The correct way would be to
+   get directory listings working on all systems.
+*/
+    strcpy(t1searchpath, DATADIR);
+    strcat(t1searchpath, "/fonts");
+    fprintf(db, "14\n");
+    fprintf(db, "n021003l.afm\n");
+    fprintf(db, "n021023l.afm\n");
+    fprintf(db, "n021004l.afm\n");
+    fprintf(db, "n021024l.afm\n");
+    fprintf(db, "n019003l.afm\n");
+    fprintf(db, "n019023l.afm\n");
+    fprintf(db, "n019004l.afm\n");
+    fprintf(db, "n019024l.afm\n");
+    fprintf(db, "n022003l.afm\n");
+    fprintf(db, "n022023l.afm\n");
+    fprintf(db, "n022004l.afm\n");
+    fprintf(db, "n022024l.afm\n");
+    fprintf(db, "s050000l.afm\n");
+    fprintf(db, "d050000l.afm\n");
+#endif
+
+    fprintf(fi, "FONTDATABASE=/tmp/FontDataBase\n");
+    fprintf(fi, "ENCODING=%s:.\n", t1searchpath);
+    fprintf(fi, "AFM=%s:.\n", t1searchpath);
+    fprintf(fi, "TYPE1=%s:.\n", t1searchpath);
     fclose(fi);
+    fclose(db);
     /* initialize t1lib */
     T1_SetBitmapPad( 16);
     if ((T1_InitLib(NO_LOGFILE)==NULL)){
@@ -235,14 +435,46 @@ int main(int argn, char *argv[])
     pdfswf_setoutputfilename(outputname);
 
     int pages = pdfswf_numpages();
-    int t = 1;
     for(t = 1; t <= pages; t++) 
     {
        if(is_in_range(t, pagerange))
        pdfswf_convertpage(t);
     }
+    pdfswf_performconversion();
 
     pdfswf_close();
+
+    if(viewer || preloader) {
+#ifndef SYSTEM_BACKTICKS
+       logf("<warning> Not sure whether system() can handle command substitution");
+       logf("<warning> (According to config.h, it can't)");
+#endif
+       if(!system_quiet)
+           printf("\n");
+    }
+
+    if(viewer && !preloader) {
+       systemf("swfcombine `swfdump -XY %s` %s viewport=%s -o %s",
+               outputname, viewer, outputname, outputname);
+       if(!system_quiet)
+           printf("\n");
+    }
+    if(preloader && !viewer) {
+       logf("<warning> --preloader option without --viewer option doesn't make very much sense.");
+       ret = systemf("swfcombine `swfdump -r %s` %s/swfs/PreLoaderTemplate.swf loader=%s movie=%s -o %s",
+               preloader, DATADIR, preloader, outputname, outputname);
+       if(!system_quiet)
+           printf("\n");
+    }
+    if(preloader && viewer) {
+       systemf("swfcombine %s viewport=%s -o __tmp__.swf",
+               viewer, outputname, outputname);
+       systemf("swfcombine `swfdump -XY %s` `swfdump -r %s` %s/swfs/PreLoaderTemplate.swf loader=%s movie=__tmp__.swf -o %s",
+               outputname, preloader, DATADIR, preloader, outputname);
+       systemf("rm __tmp__.swf");
+    }
+
+    unlink("/tmp/FontDataBase");
     return 0;
 }