home *** CD-ROM | disk | FTP | other *** search
- /*****************************************************************
- * raw2fbm.c: FBM Release 1.0 25-Feb-90 Michael Mauldin
- *
- * Copyright (C) 1989,1990 by Michael Mauldin. Permission is granted
- * to use this file in whole or in part for any purpose, educational,
- * recreational or commercial, provided that this copyright notice
- * is retained unchanged. This software is available to all free of
- * charge by anonymous FTP and in the UUNET archives.
- *
- * raw2fbm.c: Convert raw format (for example Amiga rasters)
- *
- * USAGE
- * % raw2fbm -t'title'
- * -c'credits'
- * -a<aspect>
- * -w<width>
- * -h<height>
- * -d'<planes> < rawfile > fbm
- *
- * EDITLOG
- * LastEditDate = Mon Jun 25 00:18:39 1990 - Michael Mauldin
- * LastFileName = /usr2/mlm/src/misc/fbm/raw2fbm.c
- *
- * HISTORY
- * 25-Jun-90 Michael Mauldin (mlm@cs.cmu.edu) Carnegie Mellon
- * Package for Release 1.0
- *
- * 20-May-89 Michael Mauldin (mlm) at Carnegie Mellon University
- * Bug fix from Dave Cohrs <dave@cs.wisc.edu>
- *
- * 07-Mar-89 Michael Mauldin (mlm) at Carnegie Mellon University
- * Beta release (version 0.9) mlm@cs.cmu.edu
- *
- * 20-Aug-88 Michael Mauldin (mlm) at Carnegie-Mellon University
- * Created.
- *****************************************************************/
-
- # include <stdio.h>
- # include "fbm.h"
-
- # define USAGE \
- "Usage: raw2fbm [ -t'title' -c'credits' -a<aspect>\n\
- -w<width> -h<height> -d'<planes> ] < rawfile > fbm"
-
- #ifndef lint
- static char *fbmid =
- "$FBM raw2fbm.c <1.0> 25-Jun-90 (C) 1989,1990 by Michael Mauldin, source \
- code available free from MLM@CS.CMU.EDU and from UUNET archives$";
- #endif
-
- main (argc, argv)
- char *argv[];
- { register int j, k, rowlen;
- double aspect = 1.2; /* Default for Digiview 640x400 bitmaps */
- int rows = 400, cols = 640, planes = 1;
- FBMHDR hdr;
- unsigned char *buf;
- char title[FBM_MAX_TITLE], credits[FBM_MAX_TITLE];
-
- title[0] = '\0';
- credits[0] = '\0';
-
- /* Get the options */
- while (--argc > 0 && (*++argv)[0] == '-')
- { while (*++(*argv))
- { switch (**argv)
- { case 'a': aspect = atof (*argv+1); SKIPARG; break;
- case 'w': cols = atoi (*argv+1); SKIPARG; break;
- case 'h': rows = atoi (*argv+1); SKIPARG; break;
- case 'd': planes = atoi (*argv+1); SKIPARG; break;
- case 't': strncpy (title, *argv+1, FBM_MAX_TITLE);
- title[FBM_MAX_TITLE-1] = '\0';
- CLRARG; break;
- case 'c': strncpy (credits, *argv+1, FBM_MAX_TITLE);
- credits[FBM_MAX_TITLE-1] = '\0';
- CLRARG; break;
- default: fprintf (stderr, "%s\n", USAGE);
- exit (1);
- }
- }
- }
-
- if (argc > 0) cols = atoi (argv[0]);
- if (argc > 1) rows = atoi (argv[1]);
- if (argc > 2) planes = atoi (argv[2]);
- if (argc > 3) aspect = atof (argv[3]);
-
- if (cols < 1 || rows < 1)
- { fprintf (stderr, "Both width (%d) and height (%d) must be positive\n",
- cols, rows);
- exit (1);
- }
-
- if (planes != 1 && planes != 3)
- { fprintf (stderr, "Depth must be 1 for B+W or 3 for RGB color\n");
- exit (1);
- }
-
- if (aspect < 0.01 || aspect > 100.0)
- { fprintf (stderr, "Pixel aspect ratio (%lg) must be in [0.01 to 100.0]\n",
- aspect);
- exit (1);
- }
-
- rowlen = 2 * ((cols * 8 + 15) / 16);
-
- /* Build header */
- hdr.rows = rows;
- hdr.cols = cols;
- hdr.planes = planes;
- hdr.bits = 8;
- hdr.physbits = 8;
- hdr.rowlen = rowlen;
- hdr.plnlen = hdr.rowlen * rows;
- hdr.clrlen = 0;
- hdr.aspect = aspect;
- strcpy (hdr.title, title);
- strcpy (hdr.credits, credits);
-
- write_hdr_fbm (&hdr, stdout);
-
- buf = (unsigned char *) malloc (cols);
-
- for (k=0; k<planes; k++)
- { for (j=0; j<rows; j++)
- { if (! fread (buf, cols, 1, stdin))
- { fprintf (stdout, "premature end of file on input\n");
- exit (1);
- }
-
- if (! fwrite (buf, rowlen, 1, stdout))
- { perror ("raw2fbm"); exit (1); }
- }
- }
-
- exit (0);
- }
-