home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 4 / DATAFILE_PDCD4.iso / utilities / utilsm / netpbmsca / pgm / c / pgmbentley < prev    next >
Encoding:
Text File  |  1993-10-04  |  1.4 KB  |  65 lines
  1. /* pgmbentley.c - read a portable graymap and smear it according to brightness
  2. **
  3. ** Copyright (C) 1990 by Wilson Bent (whb@hoh-2.att.com)
  4. **
  5. ** Permission to use, copy, modify, and distribute this software and its
  6. ** documentation for any purpose and without fee is hereby granted, provided
  7. ** that the above copyright notice appear in all copies and that both that
  8. ** copyright notice and this permission notice appear in supporting
  9. ** documentation.  This software is provided "as is" without express or
  10. ** implied warranty.
  11. */
  12.  
  13. #include <stdio.h>
  14. #include "pgm.h"
  15.  
  16. int
  17. main( argc, argv )
  18.     int argc;
  19.     char* argv[];
  20.     {
  21.     FILE* ifp;
  22.     gray maxval;
  23.     gray** gin;
  24.     gray** gout;
  25.     int argn, rows, cols, row;
  26.     register int brow, col;
  27.     char* usage = "[pgmfile]";
  28.  
  29.  
  30.     pgm_init( &argc, argv );
  31.  
  32.     argn = 1;
  33.  
  34.     if ( argn < argc )
  35.     {
  36.     ifp = pm_openr( argv[argn] );
  37.     ++argn;
  38.     }
  39.     else
  40.     ifp = stdin;
  41.  
  42.     if ( argn != argc )
  43.     pm_usage( usage );
  44.  
  45.     gin = pgm_readpgm( ifp, &cols, &rows, &maxval );
  46.     pm_close( ifp );
  47.     gout = pgm_allocarray( cols, rows );
  48.  
  49. #define N 4
  50.     for ( row = 0; row < rows; ++row )
  51.     for ( col = 0; col < cols; ++col )
  52.         {
  53.         brow = row + (int) (gin[row][col]) / N;
  54.         if ( brow >= rows )
  55.         brow = rows - 1;
  56.         gout[brow][col] = gin[row][col];
  57.         }
  58.  
  59.     pgm_writepgm( stdout, gout, cols, rows, maxval, 0 );
  60.     pm_close( stdout );
  61.     pgm_freearray( gout, rows );
  62.  
  63.     exit( 0 );
  64.     }
  65.