home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 4 / DATAFILE_PDCD4.iso / utilities / utilsm / netpbmsca / pbm / c / pbmtoepsi < prev    next >
Encoding:
Text File  |  1993-10-04  |  2.5 KB  |  120 lines
  1. /* pbmtoepsi.c
  2. **
  3. **    by Doug Crabill, based heavily on pbmtoascii
  4. **
  5. **    Converts a pbm file to an encapsulated PostScript style bitmap.
  6. **    Note that it does NOT covert the pbm file to PostScript, only to
  7. **    a bitmap to be added to a piece of PostScript generated elsewhere.
  8. **
  9. ** Copyright (C) 1988 by Jef Poskanzer.
  10. **
  11. ** Permission to use, copy, modify, and distribute this software and its
  12. ** documentation for any purpose and without fee is hereby granted, provided
  13. ** that the above copyright notice appear in all copies and that both that
  14. ** copyright notice and this permission notice appear in supporting
  15. ** documentation.  This software is provided "as is" without express or
  16. ** implied warranty.
  17. */
  18.  
  19. #include "pbm.h"
  20.  
  21. #if !defined(MAXINT)
  22. #define MAXINT (0x7fffffff)
  23. #endif
  24.  
  25. int
  26. main( argc, argv )
  27.     int argc;
  28.     char *argv[];
  29. {
  30.     FILE *ifd;
  31.     register bit **bits;
  32.     int argn, rows, cols, row, col, tot, count;
  33.     int top = MAXINT, bottom = -MAXINT, left = MAXINT, right = -MAXINT;
  34.     int bbonly = 0;
  35.     char *usage = "[-bbonly] [pbmfile]";
  36.     
  37.  
  38.     pbm_init( &argc, argv );
  39.     
  40.     argn = 1; 
  41.  
  42.     if ( argn < argc && argv[argn][0] == '-' && argv[argn][1] != '\0' ) {
  43.         if ( pm_keymatch( argv[argn], "-bbonly", 2 ) ) {
  44.             bbonly = 1;
  45.         } else {
  46.             pm_usage( usage );
  47.         }
  48.         ++argn;
  49.     }
  50.  
  51.     if ( argn != argc ) {
  52.         ifd = pm_openr( argv[argn] );
  53.         ++argn;
  54.     } else {
  55.         ifd = stdin;
  56.     }
  57.     
  58.     if ( argn != argc )
  59.         pm_usage( usage );
  60.  
  61.     bits = pbm_readpbm( ifd, &cols, &rows );
  62.     
  63.     pm_close( ifd );
  64.     
  65.     for (row = 0; row < rows; row++) {
  66.         for (col = 0; col < cols; col++) {
  67.             if (bits[row][col] == PBM_BLACK) {
  68.                 if (row < top) {
  69.                     top = row;
  70.                 }
  71.                 if (row > bottom) {
  72.                     bottom = row;
  73.                 }
  74.                 if (col < left) {
  75.                     left = col;
  76.                 }
  77.                 if (col > right) {
  78.                     right = col;
  79.                 }
  80.             }
  81.         }
  82.     }
  83.  
  84.     printf("%%!PS-Adobe-2.0 EPSF-1.2\n");
  85.      printf("%%%%BoundingBox: %d %d %d %d\n", left, rows - bottom, right, rows - top);
  86.  
  87.     if (bbonly) {
  88.         exit(0);
  89.     }
  90.  
  91.     printf("%%%%BeginPreview: %d %d 1 %d\n", right - left + 1, bottom - top + 1, bottom - top + 1);
  92.  
  93.     for (row = top; row <= bottom; row++) {
  94.         printf("%% ");
  95.         count = 0;
  96.         for (col = left; col <= right; col += 4) {
  97.             tot = 0;
  98.             if (bits[row][col] == PBM_BLACK) {
  99.                 tot += 8;
  100.             }
  101.             if (bits[row][col+1] == PBM_BLACK) {
  102.                 tot += 4;
  103.             }
  104.             if (bits[row][col+2] == PBM_BLACK) {
  105.                 tot += 2;
  106.             }
  107.             if (bits[row][col+3] == PBM_BLACK) {
  108.                 tot++;
  109.             }
  110.             printf("%x", tot);
  111.             count++;
  112.         }
  113.         printf((count % 2) == 0 ? "\n" : "0\n");
  114.     }
  115.     printf("%%%%EndImage\n");
  116.     printf("%%%%EndPreview\n");
  117.  
  118.     exit( 0 );
  119. }
  120.