tumble.c

Thu, 13 Mar 2003 11:42:46 +0000

author
eric
date
Thu, 13 Mar 2003 11:42:46 +0000
changeset 127
9fca72858fcd
parent 125
e2ef1c2f9eca
child 131
4b8c80d77f76
permissions
-rw-r--r--

new URL in usage message.

eric@10 1 /*
eric@125 2 * tumble: build a PDF file from image files
eric@29 3 *
eric@10 4 * Main program
eric@127 5 * $Id: tumble.c,v 1.33 2003/03/13 03:42:46 eric Exp $
eric@49 6 * Copyright 2001, 2002, 2003 Eric Smith <eric@brouhaha.com>
eric@10 7 *
eric@10 8 * This program is free software; you can redistribute it and/or modify
eric@10 9 * it under the terms of the GNU General Public License version 2 as
eric@10 10 * published by the Free Software Foundation. Note that permission is
eric@10 11 * not granted to redistribute this program under the terms of any
eric@10 12 * other version of the General Public License.
eric@10 13 *
eric@10 14 * This program is distributed in the hope that it will be useful,
eric@10 15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
eric@10 16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
eric@10 17 * GNU General Public License for more details.
eric@10 18 *
eric@10 19 * You should have received a copy of the GNU General Public License
eric@10 20 * along with this program; if not, write to the Free Software
eric@62 21 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111 USA
eric@62 22 */
eric@10 23
eric@10 24
eric@49 25 #include <stdarg.h>
eric@48 26 #include <stdbool.h>
eric@48 27 #include <stdint.h>
eric@10 28 #include <stdio.h>
eric@28 29 #include <stdlib.h>
eric@62 30 #include <string.h>
eric@28 31 #include <unistd.h>
eric@47 32
eric@10 33 #include <tiffio.h>
eric@47 34 #define TIFF_REVERSE_BITS
eric@47 35
eric@10 36 #include "bitblt.h"
eric@18 37 #include "semantics.h"
eric@10 38 #include "parser.tab.h"
eric@125 39 #include "tumble.h"
eric@62 40 #include "pdf.h"
eric@10 41
eric@10 42
eric@49 43 #define MAX_INPUT_FILES 5000
eric@49 44
eric@28 45 #define POINTS_PER_INCH 72
eric@28 46
eric@28 47 /* page size limited by Acrobat Reader to 45 inches on a side */
eric@28 48 #define PAGE_MAX_INCHES 45
eric@28 49 #define PAGE_MAX_POINTS (PAGE_MAX_INCHES * POINTS_PER_INCH)
eric@28 50
eric@28 51
eric@26 52 typedef struct output_file_t
eric@26 53 {
eric@26 54 struct output_file_t *next;
eric@26 55 char *name;
eric@62 56 pdf_file_handle pdf;
eric@26 57 } output_file_t;
eric@26 58
eric@26 59
eric@49 60 int verbose;
eric@49 61
eric@49 62
eric@26 63 char *in_filename;
eric@10 64 TIFF *in;
eric@26 65 output_file_t *output_files;
eric@26 66 output_file_t *out;
eric@10 67
eric@10 68
eric@49 69 char *progname;
eric@49 70
eric@49 71
eric@49 72 bool close_tiff_input_file (void);
eric@49 73 bool close_pdf_output_files (void);
eric@49 74
eric@49 75
eric@49 76 void usage (void)
eric@49 77 {
eric@50 78 fprintf (stderr, "\n");
eric@125 79 fprintf (stderr, "tumble - Copyright 2001-2003 Eric Smith <eric@brouhaha.com>\n");
eric@127 80 fprintf (stderr, "http://tumble.brouhaha.com/\n");
eric@50 81 fprintf (stderr, "\n");
eric@49 82 fprintf (stderr, "usage:\n");
eric@49 83 fprintf (stderr, " %s [options] -s spec\n", progname);
eric@49 84 fprintf (stderr, " %s [options] <input.tif>... -o <output.pdf>\n", progname);
eric@49 85 fprintf (stderr, "options:\n");
eric@49 86 fprintf (stderr, " -v verbose\n");
eric@62 87 fprintf (stderr, " -b fmt create bookmarks\n");
eric@62 88 fprintf (stderr, "bookmark format:\n");
eric@74 89 fprintf (stderr, " %%F file name (sans suffix)\n");
eric@62 90 fprintf (stderr, " %%p page number\n");
eric@49 91 }
eric@49 92
eric@49 93
eric@49 94 /* generate fatal error message to stderr, doesn't return */
eric@49 95 void fatal (int ret, char *format, ...)
eric@49 96 {
eric@49 97 va_list ap;
eric@49 98
eric@49 99 fprintf (stderr, "fatal error");
eric@49 100 if (format)
eric@49 101 {
eric@49 102 fprintf (stderr, ": ");
eric@49 103 va_start (ap, format);
eric@49 104 vfprintf (stderr, format, ap);
eric@49 105 va_end (ap);
eric@49 106 }
eric@49 107 else
eric@49 108 fprintf (stderr, "\n");
eric@49 109 if (ret == 1)
eric@49 110 usage ();
eric@49 111 close_tiff_input_file ();
eric@49 112 close_pdf_output_files ();
eric@49 113 exit (ret);
eric@49 114 }
eric@49 115
eric@49 116
eric@48 117 bool close_tiff_input_file (void)
eric@10 118 {
eric@10 119 if (in)
eric@26 120 {
eric@26 121 free (in_filename);
eric@26 122 TIFFClose (in);
eric@26 123 }
eric@10 124 in = NULL;
eric@26 125 in_filename = NULL;
eric@10 126 return (1);
eric@10 127 }
eric@10 128
eric@49 129
eric@48 130 bool open_tiff_input_file (char *name)
eric@10 131 {
eric@10 132 if (in)
eric@26 133 {
eric@26 134 if (strcmp (name, in_filename) == 0)
eric@26 135 return (1);
eric@26 136 close_tiff_input_file ();
eric@26 137 }
eric@26 138 in_filename = strdup (name);
eric@26 139 if (! in_filename)
eric@26 140 {
eric@26 141 fprintf (stderr, "can't strdup input filename '%s'\n", name);
eric@26 142 return (0);
eric@26 143 }
eric@10 144 in = TIFFOpen (name, "r");
eric@10 145 if (! in)
eric@10 146 {
eric@10 147 fprintf (stderr, "can't open input file '%s'\n", name);
eric@26 148 free (in_filename);
eric@10 149 return (0);
eric@10 150 }
eric@10 151 return (1);
eric@10 152 }
eric@10 153
eric@10 154
eric@48 155 bool close_pdf_output_files (void)
eric@10 156 {
eric@26 157 output_file_t *o, *n;
eric@26 158
eric@26 159 for (o = output_files; o; o = n)
eric@26 160 {
eric@26 161 n = o->next;
eric@62 162 pdf_close (o->pdf);
eric@26 163 free (o->name);
eric@26 164 free (o);
eric@26 165 }
eric@10 166 out = NULL;
eric@26 167 output_files = NULL;
eric@10 168 return (1);
eric@10 169 }
eric@10 170
eric@48 171 bool open_pdf_output_file (char *name,
eric@48 172 pdf_file_attributes_t *attributes)
eric@10 173 {
eric@26 174 output_file_t *o;
eric@26 175
eric@26 176 if (out && (strcmp (name, out->name) == 0))
eric@26 177 return (1);
eric@26 178 for (o = output_files; o; o = o->next)
eric@26 179 if (strcmp (name, o->name) == 0)
eric@26 180 {
eric@26 181 out = o;
eric@26 182 return (1);
eric@26 183 }
eric@26 184 o = calloc (1, sizeof (output_file_t));
eric@29 185 if (! o)
eric@10 186 {
eric@26 187 fprintf (stderr, "can't calloc output file struct for '%s'\n", name);
eric@26 188 return (0);
eric@26 189 }
eric@26 190
eric@26 191 o->name = strdup (name);
eric@26 192 if (! o->name)
eric@26 193 {
eric@26 194 fprintf (stderr, "can't strdup output filename '%s'\n", name);
eric@26 195 free (o);
eric@10 196 return (0);
eric@10 197 }
eric@26 198
eric@121 199 o->pdf = pdf_create (name, (attributes->has_bookmarks ?
eric@121 200 PDF_PAGE_MODE_USE_OUTLINES :
eric@121 201 PDF_PAGE_MODE_USE_NONE));
eric@26 202 if (! o->pdf)
eric@26 203 {
eric@26 204 fprintf (stderr, "can't open output file '%s'\n", name);
eric@26 205 free (o->name);
eric@26 206 free (o);
eric@26 207 return (0);
eric@26 208 }
eric@26 209
eric@30 210 if (attributes->author)
eric@62 211 pdf_set_author (o->pdf, attributes->author);
eric@30 212 if (attributes->creator)
eric@62 213 pdf_set_creator (o->pdf, attributes->creator);
eric@30 214 if (attributes->title)
eric@62 215 pdf_set_title (o->pdf, attributes->title);
eric@30 216 if (attributes->subject)
eric@62 217 pdf_set_subject (o->pdf, attributes->subject);
eric@30 218 if (attributes->keywords)
eric@62 219 pdf_set_keywords (o->pdf, attributes->keywords);
eric@30 220
eric@26 221 /* prepend new output file onto list */
eric@26 222 o->next = output_files;
eric@26 223 output_files = o;
eric@26 224
eric@26 225 out = o;
eric@10 226 return (1);
eric@10 227 }
eric@10 228
eric@10 229
eric@25 230 void process_page_numbers (int page_index,
eric@25 231 int count,
eric@25 232 int base,
eric@25 233 page_label_t *page_label)
eric@25 234 {
eric@25 235 }
eric@25 236
eric@25 237
eric@42 238 /* frees original! */
eric@42 239 static Bitmap *resize_bitmap (Bitmap *src,
eric@92 240 double x_resolution,
eric@92 241 double y_resolution,
eric@36 242 input_attributes_t input_attributes)
eric@32 243 {
eric@32 244 Rect src_rect;
eric@42 245 Point dest_min;
eric@42 246 Bitmap *dest;
eric@32 247
eric@42 248 int width_pixels = input_attributes.page_size.width * x_resolution;
eric@42 249 int height_pixels = input_attributes.page_size.height * y_resolution;
eric@42 250
eric@42 251 src_rect.min.x = (rect_width (& src->rect) - width_pixels) / 2;
eric@42 252 src_rect.min.y = (rect_height (& src->rect) - height_pixels) / 2;
eric@42 253 src_rect.max.x = src_rect.min.x + width_pixels;
eric@42 254 src_rect.max.y = src_rect.min.y + height_pixels;
eric@36 255
eric@42 256 dest_min.x = 0;
eric@42 257 dest_min.y = 0;
eric@32 258
eric@43 259 dest = bitblt (src, & src_rect, NULL, & dest_min, TF_SRC, 0);
eric@42 260 free_bitmap (src);
eric@42 261 return (dest);
eric@42 262 }
eric@32 263
eric@42 264
eric@42 265 /* "in place" rotation */
eric@42 266 static void rotate_bitmap (Bitmap *src,
eric@42 267 input_attributes_t input_attributes)
eric@42 268 {
eric@36 269 switch (input_attributes.rotation)
eric@32 270 {
eric@42 271 case 0: break;
eric@42 272 case 90: rot_90 (src); break;
eric@42 273 case 180: rot_180 (src); break;
eric@42 274 case 270: rot_270 (src); break;
eric@32 275 default:
eric@32 276 fprintf (stderr, "rotation must be 0, 90, 180, or 270\n");
eric@32 277 }
eric@32 278 }
eric@32 279
eric@32 280
eric@32 281 #define SWAP(type,a,b) do { type temp; temp = a; a = b; b = temp; } while (0)
eric@32 282
eric@49 283
eric@49 284 bool last_tiff_page (void)
eric@49 285 {
eric@49 286 return (TIFFLastDirectory (in));
eric@49 287 }
eric@49 288
eric@49 289
eric@108 290 bool process_tiff_page (int image, /* range 1 .. n */
eric@108 291 input_attributes_t input_attributes,
eric@108 292 bookmark_t *bookmarks)
eric@10 293 {
eric@29 294 int result = 0;
eric@29 295
eric@48 296 uint32_t image_length, image_width;
eric@48 297 uint32_t dest_image_length, dest_image_width;
eric@10 298 #ifdef CHECK_DEPTH
eric@48 299 uint32_t image_depth;
eric@10 300 #endif
eric@29 301
eric@48 302 uint16_t samples_per_pixel;
eric@48 303 uint16_t bits_per_sample;
eric@48 304 uint16_t planar_config;
eric@32 305
eric@48 306 uint16_t resolution_unit;
eric@94 307 float x_resolution, y_resolution;
eric@92 308 double dest_x_resolution, dest_y_resolution;
eric@32 309
eric@62 310 double width_points, height_points; /* really 1/72 inch units rather than
eric@62 311 points */
eric@28 312
eric@42 313 Rect rect;
eric@74 314 Bitmap *bitmap = NULL;
eric@42 315
eric@32 316 int row;
eric@10 317
eric@62 318 pdf_page_handle page;
eric@28 319
eric@10 320 if (! TIFFSetDirectory (in, image - 1))
eric@10 321 {
eric@10 322 fprintf (stderr, "can't find page %d of input file\n", image);
eric@10 323 goto fail;
eric@10 324 }
eric@10 325 if (1 != TIFFGetField (in, TIFFTAG_IMAGELENGTH, & image_length))
eric@10 326 {
eric@10 327 fprintf (stderr, "can't get image length\n");
eric@10 328 goto fail;
eric@10 329 }
eric@10 330 if (1 != TIFFGetField (in, TIFFTAG_IMAGEWIDTH, & image_width))
eric@10 331 {
eric@10 332 fprintf (stderr, "can't get image width\n");
eric@10 333 goto fail;
eric@10 334 }
eric@29 335
eric@29 336 if (1 != TIFFGetField (in, TIFFTAG_SAMPLESPERPIXEL, & samples_per_pixel))
eric@29 337 {
eric@29 338 fprintf (stderr, "can't get samples per pixel\n");
eric@29 339 goto fail;
eric@29 340 }
eric@29 341
eric@10 342 #ifdef CHECK_DEPTH
eric@10 343 if (1 != TIFFGetField (in, TIFFTAG_IMAGEDEPTH, & image_depth))
eric@10 344 {
eric@10 345 fprintf (stderr, "can't get image depth\n");
eric@10 346 goto fail;
eric@10 347 }
eric@10 348 #endif
eric@10 349
eric@10 350 if (1 != TIFFGetField (in, TIFFTAG_BITSPERSAMPLE, & bits_per_sample))
eric@10 351 {
eric@10 352 fprintf (stderr, "can't get bits per sample\n");
eric@10 353 goto fail;
eric@10 354 }
eric@10 355
eric@10 356 if (1 != TIFFGetField (in, TIFFTAG_PLANARCONFIG, & planar_config))
eric@10 357 planar_config = 1;
eric@10 358
eric@10 359 if (1 != TIFFGetField (in, TIFFTAG_RESOLUTIONUNIT, & resolution_unit))
eric@10 360 resolution_unit = 2;
eric@10 361 if (1 != TIFFGetField (in, TIFFTAG_XRESOLUTION, & x_resolution))
eric@10 362 x_resolution = 300;
eric@10 363 if (1 != TIFFGetField (in, TIFFTAG_YRESOLUTION, & y_resolution))
eric@10 364 y_resolution = 300;
eric@10 365
eric@29 366 if (samples_per_pixel != 1)
eric@29 367 {
eric@29 368 fprintf (stderr, "samples per pixel %u, must be 1\n", samples_per_pixel);
eric@29 369 goto fail;
eric@29 370 }
eric@29 371
eric@10 372 #ifdef CHECK_DEPTH
eric@10 373 if (image_depth != 1)
eric@10 374 {
eric@10 375 fprintf (stderr, "image depth %u, must be 1\n", image_depth);
eric@10 376 goto fail;
eric@10 377 }
eric@10 378 #endif
eric@10 379
eric@10 380 if (bits_per_sample != 1)
eric@10 381 {
eric@10 382 fprintf (stderr, "bits per sample %u, must be 1\n", bits_per_sample);
eric@10 383 goto fail;
eric@10 384 }
eric@10 385
eric@10 386 if (planar_config != 1)
eric@10 387 {
eric@10 388 fprintf (stderr, "planar config %u, must be 1\n", planar_config);
eric@10 389 goto fail;
eric@10 390 }
eric@10 391
eric@36 392 if (input_attributes.has_resolution)
eric@32 393 {
eric@36 394 x_resolution = input_attributes.x_resolution;
eric@36 395 y_resolution = input_attributes.y_resolution;
eric@32 396 }
eric@32 397
eric@32 398 if ((input_attributes.rotation == 90) || (input_attributes.rotation == 270))
eric@32 399 {
eric@32 400 dest_image_width = image_length;
eric@32 401 dest_image_length = image_width;
eric@32 402 dest_x_resolution = y_resolution;
eric@32 403 dest_y_resolution = x_resolution;
eric@62 404 SWAP (double, width_points, height_points); /* $$$ not yet set!!! */
eric@32 405 }
eric@32 406 else
eric@32 407 {
eric@32 408 dest_image_width = image_width;
eric@32 409 dest_image_length = image_length;
eric@32 410 dest_x_resolution = x_resolution;
eric@32 411 dest_y_resolution = y_resolution;
eric@32 412 }
eric@32 413
eric@42 414 rect.min.x = 0;
eric@42 415 rect.min.y = 0;
eric@42 416 rect.max.x = image_width;
eric@42 417 rect.max.y = image_length;
eric@42 418
eric@42 419 bitmap = create_bitmap (& rect);
eric@42 420
eric@42 421 if (! bitmap)
eric@10 422 {
eric@32 423 fprintf (stderr, "can't allocate bitmap\n");
eric@10 424 goto fail;
eric@10 425 }
eric@10 426
eric@10 427 for (row = 0; row < image_length; row++)
eric@32 428 if (1 != TIFFReadScanline (in,
eric@43 429 bitmap->bits + row * bitmap->row_words,
eric@32 430 row,
eric@32 431 0))
eric@32 432 {
eric@32 433 fprintf (stderr, "can't read TIFF scanline\n");
eric@32 434 goto fail;
eric@32 435 }
eric@28 436
eric@47 437 #ifdef TIFF_REVERSE_BITS
eric@48 438 reverse_bits ((uint8_t *) bitmap->bits,
eric@108 439 image_length * bitmap->row_words * sizeof (word_t));
eric@47 440 #endif /* TIFF_REVERSE_BITS */
eric@47 441
eric@94 442 #if 0
eric@46 443 if (input_attributes.has_page_size)
eric@46 444 bitmap = resize_bitmap (bitmap,
eric@46 445 x_resolution,
eric@46 446 y_resolution,
eric@46 447 input_attributes);
eric@94 448 #endif
eric@42 449
eric@42 450 rotate_bitmap (bitmap,
eric@42 451 input_attributes);
eric@28 452
eric@42 453 width_points = (rect_width (& bitmap->rect) / dest_x_resolution) * POINTS_PER_INCH;
eric@42 454 height_points = (rect_height (& bitmap->rect) / dest_y_resolution) * POINTS_PER_INCH;
eric@36 455
eric@36 456 if ((height_points > PAGE_MAX_POINTS) || (width_points > PAGE_MAX_POINTS))
eric@36 457 {
eric@36 458 fprintf (stdout, "image too large (max %d inches on a side\n", PAGE_MAX_INCHES);
eric@36 459 goto fail;
eric@36 460 }
eric@36 461
eric@62 462 page = pdf_new_page (out->pdf, width_points, height_points);
eric@28 463
eric@121 464 #if 0
eric@121 465 pdf_write_text (page);
eric@121 466 #else
eric@62 467 pdf_write_g4_fax_image (page,
eric@66 468 0, 0, /* x, y */
eric@66 469 width_points, height_points,
eric@62 470 bitmap,
eric@62 471 0, /* ImageMask */
eric@66 472 0, 0, 0, /* r, g, b */
eric@62 473 0); /* BlackIs1 */
eric@121 474 #endif
eric@62 475
eric@74 476 while (bookmarks)
eric@74 477 {
eric@74 478 /* $$$ need to handle level here */
eric@74 479 pdf_new_bookmark (NULL, bookmarks->name, 0, page);
eric@74 480 bookmarks = bookmarks->next;
eric@74 481 }
eric@28 482
eric@29 483 result = 1;
eric@10 484
eric@10 485 fail:
eric@74 486 if (bitmap)
eric@74 487 free_bitmap (bitmap);
eric@74 488
eric@29 489 return (result);
eric@10 490 }
eric@10 491
eric@10 492
eric@108 493 #if 0
eric@108 494 bool process_jpeg_page (int image, /* range 1 .. n */
eric@108 495 input_attributes_t input_attributes,
eric@108 496 bookmark_t *bookmarks)
eric@108 497 {
eric@108 498 int result = 0;
eric@108 499 FILE *f;
eric@108 500 pdf_page_handle page;
eric@108 501
eric@108 502 f = fopen (filename, "rb");
eric@108 503 if (! f)
eric@108 504 fatal ("error opening input file '%s'\n", filename);
eric@108 505
eric@108 506 page = pdf_new_page (out->pdf, width_points, height_points);
eric@108 507
eric@108 508 pdf_write_jpeg_image (page,
eric@108 509 0, 0, /* x, y */
eric@108 510 width_points, height_points,
eric@108 511 f);
eric@108 512
eric@108 513 return (result);
eric@108 514 }
eric@108 515 #endif
eric@108 516
eric@108 517
eric@108 518 bool process_page (int image, /* range 1 .. n */
eric@108 519 input_attributes_t input_attributes,
eric@108 520 bookmark_t *bookmarks)
eric@108 521 {
eric@108 522 int result = 0;
eric@108 523
eric@108 524 result = process_tiff_page (image, input_attributes, bookmarks);
eric@108 525
eric@108 526 return (result);
eric@108 527 }
eric@108 528
eric@108 529
eric@74 530 #define MAX_BOOKMARK_NAME_LEN 500
eric@74 531
eric@74 532
eric@74 533 static int filename_length_without_suffix (char *in_fn)
eric@74 534 {
eric@74 535 char *p;
eric@74 536 int len = strlen (in_fn);
eric@74 537
eric@74 538 p = strrchr (in_fn, '.');
eric@74 539 if (p && ((strcasecmp (p, ".tif") == 0) ||
eric@74 540 (strcasecmp (p, ".tiff") == 0)))
eric@74 541 return (p - in_fn);
eric@74 542 return (len);
eric@74 543 }
eric@74 544
eric@74 545
eric@74 546 /* $$$ this function should ensure that it doesn't overflow the name string! */
eric@74 547 static void generate_bookmark_name (char *name,
eric@74 548 char *bookmark_fmt,
eric@74 549 char *in_fn,
eric@74 550 int page)
eric@74 551 {
eric@74 552 bool meta = 0;
eric@74 553 int len;
eric@74 554
eric@74 555 while (*bookmark_fmt)
eric@74 556 {
eric@74 557 if (meta)
eric@74 558 {
eric@74 559 meta = 0;
eric@74 560 switch (*bookmark_fmt)
eric@74 561 {
eric@74 562 case '%':
eric@74 563 *(name++) = '%';
eric@74 564 break;
eric@74 565 case 'F':
eric@74 566 len = filename_length_without_suffix (in_fn);
eric@74 567 strncpy (name, in_fn, len);
eric@74 568 name += len;
eric@74 569 break;
eric@74 570 case 'p':
eric@74 571 sprintf (name, "%d", page);
eric@74 572 name += strlen (name);
eric@74 573 break;
eric@74 574 default:
eric@74 575 break;
eric@74 576 }
eric@74 577 }
eric@74 578 else
eric@74 579 switch (*bookmark_fmt)
eric@74 580 {
eric@74 581 case '%':
eric@74 582 meta = 1;
eric@74 583 break;
eric@74 584 default:
eric@74 585 *(name++) = *bookmark_fmt;
eric@74 586 }
eric@74 587 bookmark_fmt++;
eric@74 588 }
eric@116 589 *name = '\0';
eric@74 590 }
eric@74 591
eric@74 592
eric@74 593 void main_args (char *out_fn,
eric@74 594 int inf_count,
eric@74 595 char **in_fn,
eric@74 596 char *bookmark_fmt)
eric@49 597 {
eric@49 598 int i, ip;
eric@49 599 input_attributes_t input_attributes;
eric@49 600 pdf_file_attributes_t output_attributes;
eric@74 601 bookmark_t bookmark;
eric@74 602 char bookmark_name [MAX_BOOKMARK_NAME_LEN];
eric@74 603
eric@74 604 bookmark.next = NULL;
eric@74 605 bookmark.level = 1;
eric@74 606 bookmark.name = & bookmark_name [0];
eric@49 607
eric@49 608 memset (& input_attributes, 0, sizeof (input_attributes));
eric@49 609 memset (& output_attributes, 0, sizeof (output_attributes));
eric@49 610
eric@121 611 output_attributes.has_bookmarks = (bookmark_fmt != NULL);
eric@121 612
eric@49 613 if (! open_pdf_output_file (out_fn, & output_attributes))
eric@49 614 fatal (3, "error opening output file \"%s\"\n", out_fn);
eric@49 615 for (i = 0; i < inf_count; i++)
eric@49 616 {
eric@49 617 if (! open_tiff_input_file (in_fn [i]))
eric@49 618 fatal (3, "error opening input file \"%s\"\n", in_fn [i]);
eric@49 619 for (ip = 1;; ip++)
eric@49 620 {
eric@62 621 fprintf (stderr, "processing page %d of file \"%s\"\r", ip, in_fn [i]);
eric@74 622 if (bookmark_fmt)
eric@74 623 generate_bookmark_name (& bookmark_name [0],
eric@74 624 bookmark_fmt,
eric@74 625 in_fn [i],
eric@74 626 ip);
eric@74 627 if (! process_page (ip, input_attributes,
eric@74 628 bookmark_fmt ? & bookmark : NULL))
eric@49 629 fatal (3, "error processing page %d of input file \"%s\"\n", ip, in_fn [i]);
eric@49 630 if (last_tiff_page ())
eric@49 631 break;
eric@49 632 }
eric@49 633 if (verbose)
eric@49 634 fprintf (stderr, "processed %d pages of input file \"%s\"\n", ip, in_fn [i]);
eric@49 635 if (! close_tiff_input_file ())
eric@49 636 fatal (3, "error closing input file \"%s\"\n", in_fn [i]);
eric@49 637 }
eric@49 638 if (! close_pdf_output_files ())
eric@49 639 fatal (3, "error closing output file \"%s\"\n", out_fn);
eric@49 640 }
eric@49 641
eric@49 642
eric@49 643 void main_spec (char *spec_fn)
eric@49 644 {
eric@49 645 if (! parse_spec_file (spec_fn))
eric@49 646 fatal (2, "error parsing spec file\n");
eric@49 647 if (! process_specs ())
eric@49 648 fatal (3, "error processing spec file\n");
eric@49 649 }
eric@49 650
eric@49 651
eric@10 652 int main (int argc, char *argv[])
eric@10 653 {
eric@49 654 char *spec_fn = NULL;
eric@49 655 char *out_fn = NULL;
eric@62 656 char *bookmark_fmt = NULL;
eric@49 657 int inf_count = 0;
eric@49 658 char *in_fn [MAX_INPUT_FILES];
eric@49 659
eric@49 660 progname = argv [0];
eric@10 661
eric@62 662 pdf_init ();
eric@10 663
eric@49 664 while (--argc)
eric@10 665 {
eric@49 666 if (argv [1][0] == '-')
eric@49 667 {
eric@49 668 if (strcmp (argv [1], "-v") == 0)
eric@49 669 verbose++;
eric@49 670 else if (strcmp (argv [1], "-o") == 0)
eric@49 671 {
eric@49 672 if (argc)
eric@49 673 {
eric@49 674 argc--;
eric@49 675 argv++;
eric@49 676 out_fn = argv [1];
eric@49 677 }
eric@49 678 else
eric@49 679 fatal (1, "missing filename after \"-o\" option\n");
eric@49 680 }
eric@49 681 else if (strcmp (argv [1], "-s") == 0)
eric@49 682 {
eric@49 683 if (argc)
eric@49 684 {
eric@49 685 argc--;
eric@49 686 argv++;
eric@49 687 spec_fn = argv [1];
eric@49 688 }
eric@49 689 else
eric@49 690 fatal (1, "missing filename after \"-s\" option\n");
eric@49 691 }
eric@62 692 else if (strcmp (argv [1], "-b") == 0)
eric@62 693 {
eric@62 694 if (argc)
eric@62 695 {
eric@62 696 argc--;
eric@62 697 argv++;
eric@62 698 bookmark_fmt = argv [1];
eric@62 699 }
eric@62 700 else
eric@62 701 fatal (1, "missing format string after \"-b\" option\n");
eric@62 702 }
eric@49 703 else
eric@49 704 fatal (1, "unrecognized option \"%s\"\n", argv [1]);
eric@49 705 }
eric@49 706 else if (inf_count < MAX_INPUT_FILES)
eric@49 707 in_fn [inf_count++] = argv [1];
eric@49 708 else
eric@49 709 fatal (1, "exceeded maximum of %d input files\n", MAX_INPUT_FILES);
eric@49 710 argv++;
eric@10 711 }
eric@10 712
eric@49 713 if (! ((! out_fn) ^ (! spec_fn)))
eric@49 714 fatal (1, "either a spec file or an output file (but not both) must be specified\n");
eric@49 715
eric@49 716 if (out_fn && ! inf_count)
eric@49 717 fatal (1, "no input files specified\n");
eric@26 718
eric@49 719 if (spec_fn && inf_count)
eric@49 720 fatal (1, "if spec file is provided, input files can't be specified as arguments\n");
eric@49 721
eric@49 722 if (spec_fn)
eric@49 723 main_spec (spec_fn);
eric@49 724 else
eric@74 725 main_args (out_fn, inf_count, in_fn, bookmark_fmt);
eric@17 726
eric@10 727 close_tiff_input_file ();
eric@26 728 close_pdf_output_files ();
eric@49 729 exit (0);
eric@10 730 }