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
|
/* ----------------------------- MNI Header -----------------------------------
@NAME : invert_raw_image.c
@INPUT : argc - number of arguments
argv - arguments
1 - image size in x (-ve means invert)
2 - image size in y (-ve means invert)
3 - number of bytes per pixel (optional - default = 1)
@OUTPUT : (none)
@DESCRIPTION: Reads an image from standard input and copies it to standard
output, inverting along either or both dimensions according
to the arguments
@METHOD :
@GLOBALS :
@CALLS :
@CREATED : December 3,1991 (Peter Neelin)
@MODIFIED :
---------------------------------------------------------------------------- */
#include <stdlib.h>
#include <stdio.h>
#include <ParseArgv.h>
#define ABS( x ) ( ((x) > (0)) ? (x) : (-(x)) )
#define MAX( x, y ) ( ((x) >= (y)) ? (x) : (y) )
#define SIGN( x ) ( ((x) > (0)) ? (1) : (-1) )
#define ERROR_STATUS -1
#define NORMAL_STATUS 0
/* Argument table */
ArgvInfo argTable[] = {
{NULL, ARGV_END, NULL, NULL, NULL}
};
int main(int argc, char *argv[])
{
int i,j,k,oi,image_size,offset,bytes_per_pixel,row_size,nread,nwritten;
int xsize,ysize,xstart,ystart,xstop,ystop,xstep,ystep;
char *pname;
char *buffer,*outbuf;
/* Check arguments */
pname=argv[0];
if (ParseArgv(&argc, argv, argTable, 0) || (argc < 3) || (argc > 4)) {
(void) fprintf(stderr,"Usage : %s xsize ysize <bytesperpixel>\n",pname);
exit(ERROR_STATUS);
}
xsize = atol(argv[1]);
ysize = atol(argv[2]);
if (argc == 4) {
bytes_per_pixel = atol(argv[3]);
if (bytes_per_pixel <=0) {
(void) fprintf(stderr,"%s : Negative bytes per pixel\n",pname);
}
}
else {
bytes_per_pixel = 1;
}
if ((xsize == 0) || (ysize == 0)) {
(void) fprintf(stderr,"%s : Illegal image size\n",pname);
exit(ERROR_STATUS);
}
image_size = ABS(xsize*ysize);
row_size = ABS(xsize);
if (((buffer=malloc(image_size*bytes_per_pixel)) == NULL) ||
((outbuf=malloc(row_size*bytes_per_pixel)) == NULL)){
(void) fprintf(stderr,"%s : Image too large\n",pname);
exit(ERROR_STATUS);
}
/* Get range of loop */
xstart = MAX(0,-xsize-1);
xstop = MAX(0,xsize-1);
xstep = SIGN(xsize);
ystart = MAX(0,-ysize-1);
ystop = MAX(0,ysize-1);
ystep = SIGN(ysize);
/* Loop through images */
while ((nread=fread(buffer, bytes_per_pixel, image_size, stdin))
== image_size) {
/* Write out inverted image */
for (j=ystart; ystep*j <= ystop; j += ystep) {
offset=j*ABS(xsize);
for (i=xstart, oi=0; xstep*i <= xstop; i += xstep, oi++) {
for (k=0; k<bytes_per_pixel; k++) {
outbuf[oi*bytes_per_pixel+k]=
buffer[(offset+i)*bytes_per_pixel+k];
}
}
nwritten = fwrite(outbuf, bytes_per_pixel, row_size, stdout);
if(nwritten != row_size){
(void) fprintf(stderr, "%s : Not enough data written (%d) should be: %d\n",
pname, nwritten, row_size);
}
}
}
/* Check that input corresponds to complete images */
if (nread>0) {
(void) fprintf(stderr,"%s : Insufficient data\n", pname);
exit(ERROR_STATUS);
}
return NORMAL_STATUS;
}
|
