src/rt/lookamb.c

#ifndef lint
static const char       RCSid[] = "$Id: lookamb.c,v 2.9 2003/06/05 19:29:34 schorsch Exp $";
#endif
/*
 *  lookamb.c - program to examine ambient components.
 */

#include "copyright.h"

#include  "platform.h"
#include  "ray.h"
#include  "ambient.h"
#include  "resolu.h"


int  dataonly = 0;
int  header = 1;
int  reverse = 0;

AMBVAL  av;


int
main(           /* load ambient values from a file */
        int  argc,
        char  *argv[]
)
{
        FILE  *fp;
        int  i;

        for (i = 1; i < argc; i++)
                if (argv[i][0] == '-')
                        switch (argv[i][1]) {
                        case 'd':
                                dataonly = 1;
                                break;
                        case 'r':
                                reverse = 1;
                                break;
                        case 'h':
                                header = 0;
                                break;
                        default:
                                fprintf(stderr, "%s: unknown option '%s'\n",
                                                argv[0], argv[i]);
                                return(1);
                        }
                else
                        break;

        if (i >= argc)
                fp = stdin;
        else if ((fp = fopen(argv[i], "r")) == NULL) {
                fprintf(stderr, "%s: file not found\n", argv[i]);
                return(1);
        }
        if (reverse) {
                if (header) {
                        if (checkheader(fp, "ascii", stdout) < 0)
                                goto formaterr;
                } else {
                        newheader("RADIANCE", stdout);
                        printargs(argc, argv, stdout);
                }
                fputformat(AMBFMT, stdout);
                putchar('\n');
                SET_FILE_BINARY(stdout);
                putambmagic(stdout);
                writamb(fp);
        } else {
                SET_FILE_BINARY(fp);
                if (checkheader(fp, AMBFMT, header ? stdout : (FILE *)NULL) < 0)
                        goto formaterr;
                if (!hasambmagic(fp))
                        goto formaterr;
                if (header) {
                        fputformat("ascii", stdout);
                        putchar('\n');
                }
                lookamb(fp);
        }
        fclose(fp);
        return(0);
formaterr:
        fprintf(stderr, "%s: format error on input\n", argv[0]);
        exit(1);
}


extern void
lookamb(                        /* get ambient values from a file */
        FILE  *fp
)
{
        while (readambval(&av, fp)) {
                if (dataonly) {
                        printf("%f\t%f\t%f\t", av.pos[0], av.pos[1], av.pos[2]);
                        printf("%f\t%f\t%f\t", av.dir[0], av.dir[1], av.dir[2]);
                        printf("%d\t%f\t%f\t", av.lvl, av.weight, av.rad);
                        printf("%e\t%e\t%e\t", colval(av.val,RED),
                                                colval(av.val,GRN),
                                                colval(av.val,BLU));
                        printf("%f\t%f\t%f\t", av.gpos[0],
                                        av.gpos[1], av.gpos[2]);
                        printf("%f\t%f\t%f\n", av.gdir[0],
                                        av.gdir[1], av.gdir[2]);
                } else {
                        printf("\nPosition:\t%f\t%f\t%f\n", av.pos[0],
                                        av.pos[1], av.pos[2]);
                        printf("Direction:\t%f\t%f\t%f\n", av.dir[0],
                                        av.dir[1], av.dir[2]);
                        printf("Lvl,Wt,Rad:\t%d\t\t%f\t%f\n", av.lvl,
                                        av.weight, av.rad);
                        printf("Value:\t\t%e\t%e\t%e\n", colval(av.val,RED),
                                        colval(av.val,GRN), colval(av.val,BLU));
                        printf("Pos.Grad:\t%f\t%f\t%f\n", av.gpos[0],
                                        av.gpos[1], av.gpos[2]);
                        printf("Dir.Grad:\t%f\t%f\t%f\n", av.gdir[0],
                                        av.gdir[1], av.gdir[2]);
                }
                if (ferror(stdout))
                        exit(1);
        }
}


extern void
writamb(                        /* write binary ambient values */
        FILE  *fp
)
{
        for ( ; ; ) {
                if (!dataonly)
                        fscanf(fp, "%*s");
                if (fscanf(fp, "%f %f %f",
                                &av.pos[0], &av.pos[1], &av.pos[2]) != 3)
                        return;
                if (!dataonly)
                        fscanf(fp, "%*s");
                if (fscanf(fp, "%f %f %f",
                                &av.dir[0], &av.dir[1], &av.dir[2]) != 3)
                        return;
                if (!dataonly)
                        fscanf(fp, "%*s");
                if (fscanf(fp, "%d %f %f",
                                &av.lvl, &av.weight, &av.rad) != 3)
                        return;
                if (!dataonly)
                        fscanf(fp, "%*s");
                if (fscanf(fp, "%f %f %f",
                                &av.val[RED], &av.val[GRN], &av.val[BLU]) != 3)
                        return;
                if (!dataonly)
                        fscanf(fp, "%*s");
                if (fscanf(fp, "%f %f %f",
                                &av.gpos[0], &av.gpos[1], &av.gpos[2]) != 3)
                        return;
                if (!dataonly)
                        fscanf(fp, "%*s");
                if (fscanf(fp, "%f %f %f",
                                &av.gdir[0], &av.gdir[1], &av.gdir[2]) != 3)
                        return;
                av.next = NULL;
                writambval(&av, stdout);
                if (ferror(stdout))
                        exit(1);
        }
}
Revision:	2.10
Committed:	Tue Mar 30 16:13:01 2004 UTC (20 years, 1 month ago) by schorsch
Content type:	text/plain
Branch:	MAIN
CVS Tags:	rad3R7P2, rad3R7P1, rad4R1, rad4R0, rad3R6, rad3R6P1, rad3R8, rad3R9
Changes since 2.9:	+15 -10 lines
Log Message:	Continued ANSIfication. There are only bits and pieces left now.
#	User	Rev	Content
1	greg	1.1	#ifndef lint
2	schorsch	2.10	static const char RCSid[] = "$Id: lookamb.c,v 2.9 2003/06/05 19:29:34 schorsch Exp $";
3	greg	1.1	#endif
4			/*
5			* lookamb.c - program to examine ambient components.
6	greg	2.7	*/
7
8	greg	2.8	#include "copyright.h"
9	greg	1.1
10	schorsch	2.9	#include "platform.h"
11	greg	2.7	#include "ray.h"
12	greg	1.4	#include "ambient.h"
13	schorsch	2.10	#include "resolu.h"
14	greg	1.1
15
16			int dataonly = 0;
17	greg	2.3	int header = 1;
18	greg	1.1	int reverse = 0;
19
20			AMBVAL av;
21
22
23	schorsch	2.10	int
24			main( /* load ambient values from a file */
25			int argc,
26			char *argv[]
27			)
28	greg	1.1	{
29			FILE *fp;
30			int i;
31
32			for (i = 1; i < argc; i++)
33			if (argv[i][0] == '-')
34			switch (argv[i][1]) {
35			case 'd':
36			dataonly = 1;
37			break;
38			case 'r':
39			reverse = 1;
40			break;
41	greg	2.3	case 'h':
42			header = 0;
43			break;
44	greg	1.1	default:
45			fprintf(stderr, "%s: unknown option '%s'\n",
46			argv[0], argv[i]);
47			return(1);
48			}
49			else
50			break;
51
52			if (i >= argc)
53			fp = stdin;
54			else if ((fp = fopen(argv[i], "r")) == NULL) {
55			fprintf(stderr, "%s: file not found\n", argv[i]);
56			return(1);
57			}
58	greg	2.3	if (reverse) {
59			if (header) {
60			if (checkheader(fp, "ascii", stdout) < 0)
61			goto formaterr;
62	greg	2.6	} else {
63			newheader("RADIANCE", stdout);
64	greg	2.3	printargs(argc, argv, stdout);
65	greg	2.6	}
66	greg	2.3	fputformat(AMBFMT, stdout);
67			putchar('\n');
68	schorsch	2.9	SET_FILE_BINARY(stdout);
69	greg	2.3	putambmagic(stdout);
70	greg	1.1	writamb(fp);
71	greg	2.3	} else {
72	schorsch	2.9	SET_FILE_BINARY(fp);
73	greg	2.3	if (checkheader(fp, AMBFMT, header ? stdout : (FILE *)NULL) < 0)
74			goto formaterr;
75			if (!hasambmagic(fp))
76			goto formaterr;
77			if (header) {
78			fputformat("ascii", stdout);
79			putchar('\n');
80			}
81	greg	1.1	lookamb(fp);
82	greg	2.3	}
83	greg	1.1	fclose(fp);
84			return(0);
85	greg	2.3	formaterr:
86			fprintf(stderr, "%s: format error on input\n", argv[0]);
87			exit(1);
88	greg	1.1	}
89
90
91	schorsch	2.10	extern void
92			lookamb( /* get ambient values from a file */
93			FILE *fp
94			)
95	greg	1.1	{
96	greg	2.2	while (readambval(&av, fp)) {
97	greg	1.1	if (dataonly) {
98			printf("%f\t%f\t%f\t", av.pos[0], av.pos[1], av.pos[2]);
99			printf("%f\t%f\t%f\t", av.dir[0], av.dir[1], av.dir[2]);
100			printf("%d\t%f\t%f\t", av.lvl, av.weight, av.rad);
101	greg	1.5	printf("%e\t%e\t%e\t", colval(av.val,RED),
102	greg	1.1	colval(av.val,GRN),
103			colval(av.val,BLU));
104	greg	1.4	printf("%f\t%f\t%f\t", av.gpos[0],
105			av.gpos[1], av.gpos[2]);
106	greg	1.5	printf("%f\t%f\t%f\n", av.gdir[0],
107	greg	1.4	av.gdir[1], av.gdir[2]);
108	greg	1.1	} else {
109			printf("\nPosition:\t%f\t%f\t%f\n", av.pos[0],
110			av.pos[1], av.pos[2]);
111			printf("Direction:\t%f\t%f\t%f\n", av.dir[0],
112			av.dir[1], av.dir[2]);
113			printf("Lvl,Wt,Rad:\t%d\t\t%f\t%f\n", av.lvl,
114			av.weight, av.rad);
115			printf("Value:\t\t%e\t%e\t%e\n", colval(av.val,RED),
116			colval(av.val,GRN), colval(av.val,BLU));
117	greg	1.4	printf("Pos.Grad:\t%f\t%f\t%f\n", av.gpos[0],
118			av.gpos[1], av.gpos[2]);
119			printf("Dir.Grad:\t%f\t%f\t%f\n", av.gdir[0],
120			av.gdir[1], av.gdir[2]);
121	greg	1.1	}
122			if (ferror(stdout))
123			exit(1);
124			}
125			}
126
127
128	schorsch	2.10	extern void
129			writamb( /* write binary ambient values */
130			FILE *fp
131			)
132	greg	1.1	{
133			for ( ; ; ) {
134			if (!dataonly)
135			fscanf(fp, "%*s");
136	greg	1.3	if (fscanf(fp, "%f %f %f",
137	greg	1.1	&av.pos[0], &av.pos[1], &av.pos[2]) != 3)
138			return;
139			if (!dataonly)
140			fscanf(fp, "%*s");
141	greg	1.3	if (fscanf(fp, "%f %f %f",
142	greg	1.1	&av.dir[0], &av.dir[1], &av.dir[2]) != 3)
143			return;
144			if (!dataonly)
145			fscanf(fp, "%*s");
146			if (fscanf(fp, "%d %f %f",
147			&av.lvl, &av.weight, &av.rad) != 3)
148			return;
149			if (!dataonly)
150			fscanf(fp, "%*s");
151			if (fscanf(fp, "%f %f %f",
152			&av.val[RED], &av.val[GRN], &av.val[BLU]) != 3)
153			return;
154	greg	1.4	if (!dataonly)
155			fscanf(fp, "%*s");
156			if (fscanf(fp, "%f %f %f",
157			&av.gpos[0], &av.gpos[1], &av.gpos[2]) != 3)
158			return;
159			if (!dataonly)
160			fscanf(fp, "%*s");
161			if (fscanf(fp, "%f %f %f",
162			&av.gdir[0], &av.gdir[1], &av.gdir[2]) != 3)
163			return;
164			av.next = NULL;
165	greg	2.2	writambval(&av, stdout);
166	greg	1.1	if (ferror(stdout))
167			exit(1);
168			}
169			}