src/px/ra_rgbe.c

/* Copyright (c) 1992 Regents of the University of California */

#ifndef lint
static char SCCSid[] = "$SunId$ LBL";
#endif

/*
 *  program to convert from RADIANCE RLE to flat format
 */

#include  <stdio.h>
#include  <math.h>
#include  "color.h"
#include  "resolu.h"

#ifdef MSDOS
#include  <fcntl.h>
#endif

extern char  *malloc();

int  bradj = 0;                         /* brightness adjustment */

int  doflat = 1;                        /* produce flat file */

char  *progname;


main(argc, argv)
int  argc;
char  *argv[];
{
        int  i;
#ifdef MSDOS
        extern int  _fmode;
        _fmode = O_BINARY;
        setmode(fileno(stdin), O_BINARY);
        setmode(fileno(stdout), O_BINARY);
#endif
        progname = argv[0];

        for (i = 1; i < argc; i++)
                if (argv[i][0] == '-')
                        switch (argv[i][1]) {
                        case 'r':
                                doflat = !doflat;
                                break;
                        case 'e':
                                if (argv[i+1][0] != '+' && argv[i+1][0] != '-')
                                        goto userr;
                                bradj = atoi(argv[++i]);
                                break;
                        default:
                                goto userr;
                        }
                else
                        break;

        if (i < argc-2)
                goto userr;
        if (i <= argc-1 && freopen(argv[i], "r", stdin) == NULL) {
                fprintf(stderr, "%s: can't open input \"%s\"\n",
                                progname, argv[i]);
                exit(1);
        }
        if (i == argc-2 && freopen(argv[i+1], "w", stdout) == NULL) {
                fprintf(stderr, "can't open output \"%s\"\n",
                                progname, argv[i+1]);
                exit(1);
        }
        transfer();
        exit(0);
userr:
        fprintf(stderr, "Usage: %s [-r][-e +/-stops] [input [output]]\n",
                        progname);
        exit(1);
}


quiterr(err)            /* print message and exit */
char  *err;
{
        if (err != NULL) {
                fprintf(stderr, "%s: %s\n", progname, err);
                exit(1);
        }
        exit(0);
}


transfer()              /* transfer Radiance picture */
{
        int     order;
        int     xmax, ymax;
        COLR    *scanin;
        register int    x;
        int     y;
                                /* get header info. */
        if (checkheader(stdin, COLRFMT, stdout) < 0 ||
                        (order = fgetresolu(&xmax, &ymax, stdin)) < 0)
                quiterr("bad picture format");
        fputs(progname, stdout);
        if (bradj)
                printf(" -e %+d", bradj);
        if (doflat)
                fputs("\n", stdout);
        else {
                fputs(" -r\n", stdout);
                fputformat(COLRFMT, stdout);
        }
        if (bradj)
                fputexpos(pow(2.0, (double)bradj), stdout);
        fputs("\n", stdout);
        fputresolu(order, xmax, ymax, stdout);
                                                /* allocate scanline */
        scanin = (COLR *)malloc(xmax*sizeof(COLR));
        if (scanin == NULL)
                quiterr("out of memory in transfer");
                                                /* convert image */
        for (y = ymax-1; y >= 0; y--) {
                if (freadcolrs(scanin, xmax, stdin) < 0)
                        quiterr("error reading input picture");
                if (bradj)
                        shiftcolrs(scanin, xmax, bradj);
                if (doflat)
                        fwrite((char *)scanin, sizeof(COLR), xmax, stdout);
                else
                        fwritecolrs(scanin, xmax, stdout);
                if (ferror(stdout))
                        quiterr("error writing output picture");
        }
                                                /* free scanline */
        free((char *)scanin);
}
Revision:	2.5
Committed:	Tue Apr 27 12:37:23 1993 UTC (32 years, 6 months ago) by greg
Content type:	text/plain
Branch:	MAIN
Changes since 2.4:	+1 -1 lines
Log Message:	fixed incorrect error message
#	User	Rev	Content
1	greg	2.2	/* Copyright (c) 1992 Regents of the University of California */
2	greg	1.1
3			#ifndef lint
4			static char SCCSid[] = "$SunId$ LBL";
5			#endif
6
7			/*
8			* program to convert from RADIANCE RLE to flat format
9			*/
10
11			#include <stdio.h>
12	greg	2.4	#include <math.h>
13			#include "color.h"
14			#include "resolu.h"
15
16	greg	2.3	#ifdef MSDOS
17			#include <fcntl.h>
18			#endif
19	greg	1.1
20	greg	2.3	extern char *malloc();
21
22	greg	1.1	int bradj = 0; /* brightness adjustment */
23
24			int doflat = 1; /* produce flat file */
25
26			char *progname;
27
28
29			main(argc, argv)
30			int argc;
31			char *argv[];
32			{
33			int i;
34	greg	2.3	#ifdef MSDOS
35			extern int _fmode;
36			_fmode = O_BINARY;
37			setmode(fileno(stdin), O_BINARY);
38			setmode(fileno(stdout), O_BINARY);
39			#endif
40	greg	1.1	progname = argv[0];
41
42			for (i = 1; i < argc; i++)
43			if (argv[i][0] == '-')
44			switch (argv[i][1]) {
45			case 'r':
46			doflat = !doflat;
47			break;
48			case 'e':
49			if (argv[i+1][0] != '+' && argv[i+1][0] != '-')
50			goto userr;
51			bradj = atoi(argv[++i]);
52			break;
53			default:
54			goto userr;
55			}
56			else
57			break;
58
59			if (i < argc-2)
60			goto userr;
61			if (i <= argc-1 && freopen(argv[i], "r", stdin) == NULL) {
62			fprintf(stderr, "%s: can't open input \"%s\"\n",
63			progname, argv[i]);
64			exit(1);
65			}
66			if (i == argc-2 && freopen(argv[i+1], "w", stdout) == NULL) {
67			fprintf(stderr, "can't open output \"%s\"\n",
68			progname, argv[i+1]);
69			exit(1);
70			}
71			transfer();
72			exit(0);
73			userr:
74			fprintf(stderr, "Usage: %s [-r][-e +/-stops] [input [output]]\n",
75			progname);
76			exit(1);
77			}
78
79
80			quiterr(err) /* print message and exit */
81			char *err;
82			{
83			if (err != NULL) {
84			fprintf(stderr, "%s: %s\n", progname, err);
85			exit(1);
86			}
87			exit(0);
88			}
89
90
91			transfer() /* transfer Radiance picture */
92			{
93	greg	1.2	int order;
94	greg	2.3	int xmax, ymax;
95	greg	1.1	COLR *scanin;
96			register int x;
97			int y;
98			/* get header info. */
99			if (checkheader(stdin, COLRFMT, stdout) < 0 \|\|
100	greg	1.2	(order = fgetresolu(&xmax, &ymax, stdin)) < 0)
101	greg	1.1	quiterr("bad picture format");
102	greg	2.2	fputs(progname, stdout);
103	greg	1.1	if (bradj)
104	greg	2.2	printf(" -e %+d", bradj);
105			if (doflat)
106			fputs("\n", stdout);
107			else {
108			fputs(" -r\n", stdout);
109			fputformat(COLRFMT, stdout);
110			}
111			if (bradj)
112	greg	1.1	fputexpos(pow(2.0, (double)bradj), stdout);
113	greg	2.2	fputs("\n", stdout);
114	greg	1.2	fputresolu(order, xmax, ymax, stdout);
115	greg	1.1	/* allocate scanline */
116			scanin = (COLR )malloc(xmaxsizeof(COLR));
117			if (scanin == NULL)
118			quiterr("out of memory in transfer");
119			/* convert image */
120			for (y = ymax-1; y >= 0; y--) {
121			if (freadcolrs(scanin, xmax, stdin) < 0)
122			quiterr("error reading input picture");
123			if (bradj)
124			shiftcolrs(scanin, xmax, bradj);
125			if (doflat)
126			fwrite((char *)scanin, sizeof(COLR), xmax, stdout);
127			else
128			fwritecolrs(scanin, xmax, stdout);
129			if (ferror(stdout))
130	greg	2.5	quiterr("error writing output picture");
131	greg	1.1	}
132			/* free scanline */
133			free((char *)scanin);
134			}