Annotation of ratfiv/epstopdf.c, revision 1.1
1.1 ! brouard 1: /*
! 2: # epstopdf: written by Kong Hoon Lee konghoon@hyowon.cc.pusan.ac.kr<4/1/1999>
! 3: #
! 4: # It converts an EPS file to an encapsulated PDF File and
! 5: # coded with the perl script 'epstopdf' by Sebastian Rahtz on
! 6: # http://tug.org/applications/pdftex/epstopdf .
! 7: # It works like as the perl script without 'perl' for Windows 95
! 8: # but requires 'Ghostscript' for Windows.
! 9: #
! 10: */
! 11:
! 12: #include <stdio.h>
! 13: #include <stdlib.h>
! 14: #include <string.h>
! 15: #include <math.h>
! 16: #define MAX_IN 10000
! 17:
! 18:
! 19: #ifndef GSEXEC
! 20: #ifdef __WIN32__
! 21: #define GSEXEC "gswin32c"
! 22: #else
! 23: #define GSEXEC "gs"
! 24: #endif
! 25: #endif
! 26:
! 27:
! 28: #define BEGINDOC "%%BeginDocument"
! 29: #define ENDDOC "%%EndDocument"
! 30: #define PSSTART "%!"
! 31: #define PSEOF "%%EOF"
! 32:
! 33: #define TRUE 1
! 34: #define FALSE 0
! 35:
! 36:
! 37: static void usage(void)
! 38:
! 39: {
! 40: printf("epstopdf 2.2.9:\n");
! 41: printf("written by Kong Hoon Lee, konghoon@dreamwiz.com <1999-4-1>\n");
! 42: printf("changes by Juergen Bausa, Juergen.Bausa@T-Online.de <2000-10-6>\n");
! 43: printf("bugfix by Pascal Perichon, Pascal.Perichon@u-bourgogne.fr <2000-5-25>\n\n");
! 44: printf("It converts an EPS file to an encapsulated PDF File and is written\n");
! 45: printf("based on the perl script 'epstopdf' by Sebastian Rahtz on\n");
! 46: printf("http://tug.org/applications/pdftex/epstopdf .\n");
! 47: printf("It works like the perl script without 'perl' but requires 'Ghostscript'.\n");
! 48: printf("The accompanied Makefile can be used to automate the update of all eps/pdf\n");
! 49: printf("files in a directory. Just put it in the directory where your eps files\n");
! 50: printf("are and type 'make' from the command line (you will need a version of\n");
! 51: printf("GNU-make)\n\n");
! 52:
! 53: printf("This program invokes '%s' and the path including '%s'\n",GSEXEC,GSEXEC);
! 54: printf("should be included to the environment variable 'PATH'.\n");
! 55: printf("'%s' should know, where to find its initialization files\n",GSEXEC);
! 56: printf("and fonts, using an registry entry (Windows) or an environment variable.\n\n");
! 57:
! 58: printf("Using a different output device, it is also possible to convert eps\n");
! 59: printf("files to bitmaps (e.g. -sDEVICE=bmpmono).\n\n");
! 60:
! 61: printf("Usage: epstopdf [options] filename-of-an-eps-file\n");
! 62: printf("Options:\n");
! 63: printf(" --help: print usage\n");
! 64: printf(" --outfile=<file>: write result to <file>\n");
! 65: printf(" --tmpfile=<file>: use <file> as temporary file\n");
! 66: printf(" --(no)filter: read/writ standard input/output (default: false)\n");
! 67: printf(" --(no)gs: run ghostscript (default: true)\n");
! 68: printf(" --(no)compress: use compression (default: true)\n");
! 69: printf(" --(no)hires: scan HiresBoundingBox (default: false)\n");
! 70: printf(" --(no)exact: scan ExactBoundingBox (default: false)\n");
! 71: printf(" --(no)debug: debug informations (default: false)\n");
! 72: printf(" --(no)wait: wait for keystroke (default: false)\n");
! 73: printf(" --gsexec=<gs>: use <gs> to invoke ghostscript (default: %s)\n",GSEXEC);
! 74: printf(" --enlarge=<a>: enlarge BB by <a>/72 '' (default: 0.)\n");
! 75: printf(" -sDEVICE=<dev> : use <dev> as output device (default: pdfwrite)\n");
! 76: printf(" -r<a>: output resolution for gs (default: 600)\n");
! 77: printf(" --width=<a>: output width in pixels (default: none)\n");
! 78: printf(" --height=<a>: output height in pixels (default: none)\n");
! 79: printf(" --gsopt=<a>: add <a> to the gs command line (default: none)\n");
! 80: }
! 81:
! 82:
! 83: static int round(double a)
! 84:
! 85: {
! 86: return floor(a+0.5);
! 87: }
! 88:
! 89: static int isint(double a)
! 90:
! 91: {
! 92: if(fabs(a-round(a))<1e-6) return 1;
! 93: else return 0;
! 94: }
! 95:
! 96:
! 97: int main(int argc,char *argv[])
! 98:
! 99: {
! 100: FILE *in,*out;
! 101: char *infile=NULL,*outfile=NULL,*tmpfile=NULL,*copt,*ptr,*gsexec,buf[21];
! 102: char command[MAX_IN],ch[MAX_IN],*BBname,*device,ropt[20],*gsopt;
! 103: double bbllx,bblly,bburx,bbury,xoffset,yoffset,enlarge;
! 104: int width,height,res,xpix,ypix;
! 105: int i,count,status,BBCorrected,did_CR,debug,compress,usegs,wait,
! 106: BBhires,BBexact,found,depth,filter,ngsopt,in_ps;
! 107: fpos_t fpos;
! 108:
! 109:
! 110: #if defined (__EMX__)
! 111: _wildcard (&argc, &argv);
! 112: #endif
! 113:
! 114: /* default parameter */
! 115: status=0;
! 116: BBCorrected=0;
! 117: BBhires=0;
! 118: BBexact=0;
! 119: debug=0;
! 120: compress=1;
! 121: usegs=1;
! 122: gsexec=GSEXEC;
! 123: wait=0;
! 124: filter=0;
! 125: enlarge=0.;
! 126: res=600;
! 127: device="pdfwrite";
! 128: xpix=0;
! 129: ypix=0;
! 130: ngsopt=100;
! 131: gsopt=malloc(ngsopt);
! 132: gsopt[0]='\0';
! 133:
! 134:
! 135: /******************************************************************
! 136:
! 137: Process command line options
! 138:
! 139: ******************************************************************/
! 140:
! 141: for(i=1;i<argc;i++){
! 142:
! 143: /* printf("i=%d arg=>>%s<<\n",i,argv[i]); */
! 144:
! 145: if(!strcmp(argv[i],"--help") || !strcmp(argv[i],"-h")){
! 146: usage();
! 147: status=0;
! 148: goto EXIT;
! 149: }
! 150:
! 151: if(!strcmp(argv[i],"--debug") || !strcmp(argv[i],"-d")){
! 152: debug=1;
! 153: continue;
! 154: }
! 155:
! 156: if(!strcmp(argv[i],"--nodebug")){
! 157: debug=0;
! 158: continue;
! 159: }
! 160:
! 161: if(!strcmp(argv[i],"--compress") || !strcmp(argv[i],"-c")){
! 162: compress=1;
! 163: continue;
! 164: }
! 165:
! 166: if(!strcmp(argv[i],"--nocompress")){
! 167: compress=0;
! 168: continue;
! 169: }
! 170:
! 171: if(!strcmp(argv[i],"--nogs")){
! 172: usegs=0;
! 173: continue;
! 174: }
! 175:
! 176: if(!strcmp(argv[i],"--gs")){
! 177: usegs=1;
! 178: continue;
! 179: }
! 180:
! 181: if(!strcmp(argv[i],"--wait") || !strcmp(argv[i],"-w")){
! 182: wait=1;
! 183: continue;
! 184: }
! 185:
! 186: if(!strcmp(argv[i],"--nowait")){
! 187: wait=0;
! 188: continue;
! 189: }
! 190:
! 191: if(!strcmp(argv[i],"--filter")){
! 192: filter=1;
! 193: continue;
! 194: }
! 195:
! 196: if(!strcmp(argv[i],"--nofilter")){
! 197: filter=0;
! 198: continue;
! 199: }
! 200:
! 201: if(!strcmp(argv[i],"--hires")){
! 202: BBhires=1;
! 203: continue;
! 204: }
! 205:
! 206: if(!strcmp(argv[i],"--nohires")){
! 207: BBhires=0;
! 208: continue;
! 209: }
! 210:
! 211: if(!strcmp(argv[i],"--exact")){
! 212: BBexact=1;
! 213: continue;
! 214: }
! 215:
! 216: if(!strcmp(argv[i],"--noexact")){
! 217: BBexact=0;
! 218: continue;
! 219: }
! 220:
! 221: if(!strncmp(argv[i],"--outfile=",strlen("--outfile="))){
! 222: outfile=malloc(strlen(argv[i])-strlen("--outfile=")+1);
! 223: strcpy(outfile, argv[i]+strlen("--outfile="));
! 224: continue;
! 225: }
! 226:
! 227: if(!strncmp(argv[i],"--tmpfile=",strlen("--tmpfile="))){
! 228: tmpfile=malloc(strlen(argv[i])-strlen("--tmpfile=")+1);
! 229: strcpy(tmpfile, argv[i]+strlen("--tmpfile="));
! 230: continue;
! 231: }
! 232:
! 233: if(!strncmp(argv[i],"-r",strlen("-r"))){
! 234: sscanf(argv[i]+strlen("-r"),"%d",&res);
! 235: continue;
! 236: }
! 237:
! 238: if(!strncmp(argv[i],"--width=",strlen("--width="))){
! 239: sscanf(argv[i]+strlen("--width="),"%d",&xpix);
! 240: continue;
! 241: }
! 242:
! 243: if(!strncmp(argv[i],"--height=",strlen("--height="))){
! 244: sscanf(argv[i]+strlen("--height="),"%d",&ypix);
! 245: continue;
! 246: }
! 247:
! 248: if(!strncmp(argv[i],"--gsopt=",strlen("--gsopt="))){
! 249: char *opt=argv[i]+strlen("--gsopt=");
! 250: if(strlen(gsopt)+strlen(opt)+2 < ngsopt){
! 251: ngsopt+=100;
! 252: gsopt=realloc(gsopt,ngsopt);
! 253: }
! 254: strcat(gsopt," ");
! 255: strcat(gsopt,opt);
! 256: continue;
! 257: }
! 258:
! 259: if(!strncmp(argv[i],"-sDEVICE=",strlen("-sDEVICE="))){
! 260: device=argv[i]+strlen("-sDEVICE=");
! 261: continue;
! 262: }
! 263:
! 264: if(!strcmp(argv[i],"-o") && i+1<argc){
! 265: outfile=malloc(strlen(argv[i+1])+1);
! 266: strcpy(outfile, argv[i+1]);
! 267: i++;
! 268: continue;
! 269: }
! 270:
! 271: if(!strncmp(argv[i],"--gsexec=",strlen("--gsexec="))){
! 272: gsexec=argv[i]+strlen("--gsexec=");
! 273: continue;
! 274: }
! 275:
! 276:
! 277: if(argv[i][0]!='-'){
! 278: if(infile) printf("\nCan process only one input file\n");
! 279: else infile=argv[i];
! 280: continue;
! 281: }
! 282:
! 283: if(!strncmp(argv[i],"--enlarge=",strlen("--enlarge="))){
! 284: sscanf(argv[i]+strlen("--enlarge="),"%lf",&enlarge);
! 285: continue;
! 286: }
! 287:
! 288: usage();
! 289: fprintf(stderr,"\nunknown option >>%s<<\n",argv[i]);
! 290: status=1;
! 291: goto EXIT;
! 292: }
! 293:
! 294:
! 295:
! 296: /******************************************************************
! 297:
! 298: check arguments and files
! 299:
! 300: ******************************************************************/
! 301:
! 302:
! 303: if(filter) debug=0;
! 304: if(filter) wait =0;
! 305:
! 306: if(BBexact && BBhires){
! 307: fprintf(stderr,"\nOptions --hires and --exact cannot be used together\n");
! 308: status=1;
! 309: goto EXIT;
! 310: }
! 311:
! 312: if (BBexact) BBname="%%ExactBoundingBox:";
! 313: else if(BBhires) BBname="%%HiresBoundingBox:";
! 314: else BBname="%%BoundingBox:";
! 315:
! 316: if(!filter) {
! 317:
! 318: if(!infile) {
! 319: usage();
! 320: fprintf(stderr,"no input file specified!\n");
! 321: status=1;
! 322: goto EXIT;
! 323: }
! 324:
! 325: if((in=fopen(infile,"r")) == NULL) {
! 326: usage();
! 327: fprintf(stderr,"%s: File not found!\n",infile);
! 328: status=1;
! 329: goto EXIT;
! 330: }
! 331: fclose(in);
! 332:
! 333: }else{
! 334:
! 335: if(infile) {
! 336: fprintf(stderr,"Input file cannot be used with filter option!\n");
! 337: status=1;
! 338: goto EXIT;
! 339: }
! 340:
! 341: infile="epstopdf"; /* dummy input filename to generate tmp-filename */
! 342: }
! 343:
! 344:
! 345:
! 346: /* find a temporary filename that does not exist yet */
! 347: if(usegs && !tmpfile){
! 348: tmpfile=malloc(strlen(infile)+9);
! 349: count=0;
! 350: do{
! 351: if(count>99) {
! 352: fprintf(stderr,"No temporary file available! Try deleting *.tmp.\n\n");
! 353: status=1;
! 354: goto EXIT;
! 355: }
! 356: sprintf(tmpfile,"%s.%d.tmp",infile,count);
! 357: if(debug) printf("checking temporary filename >>%s<<\n",tmpfile);
! 358: out=fopen(tmpfile,"r");
! 359: if(out) fclose(out);
! 360: count++;
! 361: }while(out);
! 362: }
! 363:
! 364: if(!filter){
! 365: if(!outfile){
! 366: outfile=malloc(strlen(infile)+6);
! 367: strcpy(outfile,infile);
! 368: ptr=outfile;
! 369: while(strpbrk(ptr,"\\/")) ptr=strpbrk(ptr,"\\/")+1;
! 370: ptr=strrchr(ptr,'.');
! 371: if(ptr) *ptr='\0';
! 372: if(usegs) strcat(outfile,".pdf");
! 373: else strcat(outfile,"2.eps");
! 374: }
! 375: }else{
! 376: if(outfile) {
! 377: fprintf(stderr,"Output file cannot be used with filter option!\n");
! 378: status=1;
! 379: goto EXIT;
! 380: }
! 381: outfile=malloc(2);
! 382: strcpy(outfile,"-");
! 383: }
! 384:
! 385:
! 386:
! 387: if(!filter) printf("Converting %s to %s ..... ",infile,outfile);
! 388:
! 389:
! 390: /******************************************************************
! 391:
! 392: put the pagesize from the bounding box into the eps file
! 393:
! 394: ******************************************************************/
! 395:
! 396:
! 397: if(debug) printf("\nAdding correct pagesize to EPS ... searching for %s ...\n",BBname);
! 398:
! 399: if (!filter) in = fopen(infile, "r");
! 400: else in = stdin;
! 401: if (usegs) out = fopen(tmpfile,"w");
! 402: else if(!filter) out = fopen(outfile,"w");
! 403: else out = stdout;
! 404: if(!in || !out){
! 405: fprintf(stderr,"cannot open files\n");
! 406: status=1;
! 407: goto EXIT;
! 408: }
! 409:
! 410: depth=0;
! 411: in_ps=FALSE;
! 412: while (fgets(ch,MAX_IN,in)){
! 413: if(!in_ps) { /* throw away binary junk before %! */
! 414: if(!strncmp(ch,PSSTART,strlen(PSSTART))) in_ps=TRUE;
! 415: else continue;
! 416: }
! 417: if(!strncmp(ch,BEGINDOC,strlen(BEGINDOC))) depth++; /* count included documents */
! 418: if(!strncmp(ch,ENDDOC, strlen(ENDDOC) )) depth--;
! 419: if(!strncmp(ch,BBname, strlen(BBname)) && depth==0) { /* look for BB comment in main doc only */
! 420: sscanf(ch,"%*s %20s",buf);
! 421: if(!strcmp(buf,"(atend)")){ /* BB is atended */
! 422: if(filter){
! 423: fprintf(stderr,"Cannot look for BoundingBox in the trailer "
! 424: "with option --filter\n");
! 425: if(usegs) remove(tmpfile);
! 426: status=1;
! 427: goto EXIT;
! 428: }
! 429: if(debug) printf("\n (atend)! ...\n");
! 430: fgetpos(in, &fpos); /* store file position */
! 431: found=0;
! 432: while (fgets(ch,MAX_IN,in)){
! 433: if(!strncmp(ch,BEGINDOC,strlen(BEGINDOC))) depth++; /* count included documents */
! 434: if(!strncmp(ch,ENDDOC, strlen(ENDDOC) )) depth--;
! 435: if(!strncmp(ch,BBname,strlen(BBname)) && depth==0) { /* look for bounding box in main doc only */
! 436: found=1;
! 437: fsetpos(in, &fpos); /* rewind to (atend) comment */
! 438: break;
! 439: }
! 440: }
! 441: if(!found){
! 442: fprintf(stderr,"atended %s not found\n",BBname);
! 443: if(usegs && !debug) remove(tmpfile);
! 444: if(!usegs && !debug) remove(outfile);
! 445: status=1;
! 446: goto EXIT;
! 447: }
! 448: }
! 449:
! 450:
! 451: /* No Idea what ExactBoundingBox means. Hope it also works with this code */
! 452:
! 453: /* I thought Postscript says that the bounding box should be integer.
! 454: However, some applications (like Corel Draw) use floats and gs has no
! 455: problem with it. So I use floats for translate that will result in a
! 456: more exact box. Since gs seems not to be able to use floats in
! 457: setpagedevice, these values are converted to integer */
! 458:
! 459: if(!BBCorrected){ /* write Bounding box one time only! */
! 460: if(sscanf(ch,"%*s %lf %lf %lf %lf",&bbllx,&bblly,&bburx,&bbury)!=4){
! 461: fprintf(stderr,"incorrect %s \n",BBname);
! 462: if(usegs && !debug) remove(tmpfile);
! 463: status=1;
! 464: goto EXIT;
! 465: }
! 466: if(debug) printf("BoundingBox: %f %f %f %f\n",bbllx,bblly,bburx,bbury);
! 467: bblly -= enlarge;
! 468: bbllx -= enlarge;
! 469: bbury += enlarge;
! 470: bburx += enlarge;
! 471: width = ceil(bburx-bbllx); /* make papersize integer and enlarge it a little bit */
! 472: height = ceil(bbury-bblly);
! 473: xoffset =-bbllx;
! 474: yoffset =-bblly;
! 475: fprintf(out,"%s %d %d %d %d\n",BBname,0,0,width,height);
! 476: fprintf(out,"<< /PageSize [%d %d] >> setpagedevice \n",width,height);
! 477: if(isint(xoffset) && isint(yoffset)) fprintf(out,"gsave %d %d translate\n",round(xoffset),round(yoffset));
! 478: else fprintf(out,"gsave %f %f translate\n",xoffset,yoffset);
! 479: if(!filter) printf(" (%dx%d mm) ... ",(int)(25.4/72.*width),(int)(25.4/72.*height));
! 480: did_CR=1;
! 481: BBCorrected=1;
! 482: }
! 483: }else{
! 484: fputs(ch,out);
! 485: if(strpbrk(ch, "\n")) did_CR=1;
! 486: else did_CR=0;
! 487: if(!strncmp(ch,PSEOF,strlen(PSEOF)) && depth==0) break; /* end of file */
! 488: }
! 489: }
! 490: if(BBCorrected){
! 491: if(!did_CR) fprintf(out,"\ngrestore\n");
! 492: else fprintf(out, "grestore\n");
! 493: }
! 494: if(in !=stdin ) fclose(in);
! 495: if(out!=stdout) fclose(out);
! 496:
! 497: if(width && height){
! 498: if (xpix) res=(72*xpix)/width;
! 499: else if (ypix) res=(72*ypix)/height;
! 500: }
! 501:
! 502:
! 503: /******************************************************************
! 504:
! 505: do the conversion eps->pdf using gs
! 506:
! 507: ******************************************************************/
! 508:
! 509:
! 510: if(usegs){
! 511:
! 512: if(compress) copt="-dUseFlateCompression=true";
! 513: else copt="-dUseFlateCompression=false";
! 514:
! 515: if(res) sprintf(ropt,"-r%d",res);
! 516: else ropt[0]='\0';
! 517:
! 518: if(res && debug) printf(" (%d dpi) ... ",res);
! 519:
! 520: /* The shell 4nt has Problems with double quotes in the command line.
! 521: Thus use them only if it is really necessary (if there are space
! 522: characters in a filename)
! 523: */
! 524: if(strchr(outfile,' ') || strchr(tmpfile,' '))
! 525: sprintf(command,"%s -q -dNOPAUSE -dBATCH %s -sDEVICE=%s %s %s"
! 526: " \"-sOutputFile=%s\" -f \"%s\"",
! 527: gsexec,copt,device,ropt,gsopt,outfile,tmpfile);
! 528: else
! 529: sprintf(command,"%s -q -dNOPAUSE -dBATCH %s -sDEVICE=%s %s %s"
! 530: " -sOutputFile=%s -f %s",
! 531: gsexec,copt,device,ropt,gsopt,outfile,tmpfile);
! 532:
! 533:
! 534: if(debug) printf("running ghostscript ...\n");
! 535: if(debug) puts(command);
! 536: status=system(command);
! 537: if(!debug) remove(tmpfile);
! 538: else printf("keeping temporary file >>%s<<\n",tmpfile);
! 539: }
! 540:
! 541: if(!filter) printf("Done\n");
! 542:
! 543:
! 544:
! 545: EXIT:
! 546:
! 547: free(outfile);
! 548: free(tmpfile);
! 549: free(gsopt);
! 550:
! 551: if(wait){
! 552: printf("\n<Press a key> ");
! 553: getchar();
! 554: printf("\n");
! 555: }
! 556:
! 557: return status;
! 558: }
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>
![[BACK]](/icons/small/back.gif){kind=icon}
Return to epstopdf.c CVS log ![[TXT]](/icons/small/text.gif){kind=icon}
![[DIR]](/icons/small/dir.gif){kind=icon}
Up to [Local Repository] / ratfiv