1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
|
/* Copyright(c) 1986 Association of Universities for Research in Astronomy Inc.
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include "sgiUtil.h"
/* SGI2XBM.C -- Read an IRAF SGI bitmap file on standard input and convert
* to a GIF format image on standard outout.
*
* Usage:
* sgi2xbm.e [-w N] [-h NY] [-i] [ [sgi_bitmap] [sgi_bitmap] ... ]
*
* -w N width of input bitmap and output image
* -h N height of input bitmap and output image
* -i invert the bitmap values before conversion
*
* The input file name and the switches may occur in any order. The bitmap
* may be inverted here using the -i flag.
*
* Sample graphcaps for this translator might look like:
*
* g-xbm|UNIX generic interface to multi-frame XBM file generator:\
* :DD=ugif,tmp$sgk,!{ sgidispatch sgi2xbm -w $(PX) -h $(PY) \
* $F.[1-8] > sgixbm$$; rm $F.[1-8]; }&:\
* :MF#8:NF:tc=sgi_image_format:
*
* sgi_image_format|Generic raster file format specification:\
* :kf=bin$x_sgikern.e:tn=sgikern:ar#.75:\
* :xr#640:yr#480:PX#640:PY#480:XW#640:YW#480:\
* :BI:MF#1:YF:NB#8:LO#1:LS#0:XO#0:YO#0:
*
* All bitmaps will be dumped to the file 'sgixbmXXX' in the local directory
* where XXX is a pid.
*
* To change the image size the graphcap :xr, :PX, :XW (X-dimension) and
* :yr, :PY, :XY (Y-dimension) fields all need to be changed. The -i
* flag must be specified in the graphcap DD string.
*
*/
#define NBITS_CHAR 8 /* number of bits in a char */
#define DEF_WIDTH 640 /* default image width */
#define DEF_HEIGHT 480 /* default image height */
#define MAX_INFILES 16 /* max number of input bitmaps */
#define SZ_FNAME 64 /* size of a filename */
typedef unsigned char byte;
static int px = DEF_WIDTH;
static int py = DEF_HEIGHT;
static int invert = 0;
static char *infile[] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
int
main (int argc, char *argv[])
{
FILE *fd;
byte *buffer;
int i, n, len_buf, numin = 0, cnt = 0;
int index; /* goes through all files */
/* Process the command line.
*/
for (i=1; i < argc; i++) {
if (argv[i][0] == '-') {
if (strcmp (argv[i], "-w") == 0)
px = atoi (argv[++i]);
else if (strcmp (argv[i], "-h") == 0)
py = atoi (argv[++i]);
else if (strcmp (argv[i], "-i") == 0)
invert++;
} else {
/* input sgi-bitmap file specification */
if (numin < MAX_INFILES)
infile[numin++] = argv[i];
}
}
/* Allocate some space for the working buffer. */
len_buf = px / NBITS_CHAR;
buffer = (byte *) malloc (len_buf);
/* Loop over the input bitmaps, writing the converted output to
* the stdout.
*/
for (index = 0; index == 0 || index < numin; index++) {
/* Open the input file. */
fd = (infile[index] ? fopen (infile[index], "r") : stdin);
if (index > 0) printf ("\n");
printf ("#define xbm%03d_width %d\n", index, px);
printf ("#define xbm%03d_height %d\n", index, py);
printf ("static char xbm%03d_bits[] = {\n ", index);
n = 0;
cnt = 0;
while (fread (buffer, len_buf, 1, fd)) {
/* If we're on a MSB ordered machine wordswap the bitmap so
* it's in the correct order for unpacking to be interpreted
* as an LSB-ordered image.
*/
if (!isSwapped ())
bswap4 (buffer, buffer, len_buf);
/* Write out the pixels. */
for (i=0; i < len_buf; i++, cnt++) {
printf ("0x%.2x",
(byte) (invert ? ~buffer[i]: buffer[i])), n += 4;
if (cnt < (len_buf * py - 1))
printf (","), n++;
else
printf ("};\n");
if (n > 70)
printf ("\n "), n=0;
}
}
if (fd != stdin)
fclose (fd);
fflush (fd);
}
free (buffer);
return (0);
}
|
