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