--- ray/src/rt/lookamb.c 2003/02/22 02:07:28 2.7 +++ ray/src/rt/lookamb.c 2023/11/15 18:02:52 2.18 @@ -1,69 +1,14 @@ #ifndef lint -static const char RCSid[] = "$Id: lookamb.c,v 2.7 2003/02/22 02:07:28 greg Exp $"; +static const char RCSid[] = "$Id: lookamb.c,v 2.18 2023/11/15 18:02:52 greg Exp $"; #endif /* * lookamb.c - program to examine ambient components. */ -/* ==================================================================== - * The Radiance Software License, Version 1.0 - * - * Copyright (c) 1990 - 2002 The Regents of the University of California, - * through Lawrence Berkeley National Laboratory. All rights reserved. - * - * Redistribution and use in source and binary forms, with or without - * modification, are permitted provided that the following conditions - * are met: - * - * 1. Redistributions of source code must retain the above copyright - * notice, this list of conditions and the following disclaimer. - * - * 2. Redistributions in binary form must reproduce the above copyright - * notice, this list of conditions and the following disclaimer in - * the documentation and/or other materials provided with the - * distribution. - * - * 3. The end-user documentation included with the redistribution, - * if any, must include the following acknowledgment: - * "This product includes Radiance software - * (http://radsite.lbl.gov/) - * developed by the Lawrence Berkeley National Laboratory - * (http://www.lbl.gov/)." - * Alternately, this acknowledgment may appear in the software itself, - * if and wherever such third-party acknowledgments normally appear. - * - * 4. The names "Radiance," "Lawrence Berkeley National Laboratory" - * and "The Regents of the University of California" must - * not be used to endorse or promote products derived from this - * software without prior written permission. For written - * permission, please contact radiance@radsite.lbl.gov. - * - * 5. Products derived from this software may not be called "Radiance", - * nor may "Radiance" appear in their name, without prior written - * permission of Lawrence Berkeley National Laboratory. - * - * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED OR IMPLIED - * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES - * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE - * DISCLAIMED. IN NO EVENT SHALL Lawrence Berkeley National Laboratory OR - * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, - * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT - * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF - * USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND - * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, - * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT - * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF - * SUCH DAMAGE. - * ==================================================================== - * - * This software consists of voluntary contributions made by many - * individuals on behalf of Lawrence Berkeley National Laboratory. For more - * information on Lawrence Berkeley National Laboratory, please see - * . - */ +#include "copyright.h" +#include "platform.h" #include "ray.h" - #include "ambient.h" @@ -74,10 +19,112 @@ int reverse = 0; AMBVAL av; -main(argc, argv) /* load ambient values from a file */ -int argc; -char *argv[]; +static void +lookamb( /* load & convert ambient values from a file */ + FILE *fp +) { + FVECT norm, uvec; + COLOR avcol; + + while (readambval(&av, fp)) { + decodedir(norm, av.ndir); + decodedir(uvec, av.udir); + scolor2rgb(avcol, av.val, AMB_CNDX[3], AMB_WLPART); + 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", norm[0], norm[1], norm[2]); + printf("%f\t%f\t%f\t", uvec[0], uvec[1], uvec[2]); + printf("%d\t%f\t%f\t%f\t", av.lvl, av.weight, + av.rad[0], av.rad[1]); + printf("%e\t%e\t%e\t", colval(avcol,RED), + colval(avcol,GRN), + colval(avcol,BLU)); + printf("%f\t%f\t", av.gpos[0], av.gpos[1]); + printf("%f\t%f\t", av.gdir[0], av.gdir[1]); + printf("%u\n", av.corral); + } else { + printf("Position:\t%f\t%f\t%f\n", av.pos[0], + av.pos[1], av.pos[2]); + printf("Normal:\t\t%f\t%f\t%f\n", + norm[0], norm[1], norm[2]); + printf("Uvector:\t%f\t%f\t%f\n", + uvec[0], uvec[1], uvec[2]); + printf("Lvl,Wt,UVrad:\t%d\t\t%f\t%f\t%f\n", av.lvl, + av.weight, av.rad[0], av.rad[1]); + printf("Value:\t\t%e\t%e\t%e\n", colval(avcol,RED), + colval(avcol,GRN), colval(avcol,BLU)); + printf("Pos.Grad:\t%f\t%f\n", av.gpos[0], av.gpos[1]); + printf("Dir.Grad:\t%f\t%f\n", av.gdir[0], av.gdir[1]); + printf("Corral:\t\t%8X\n\n", av.corral); + } + if (ferror(stdout)) + exit(1); + } +} + + +static void +writamb( /* write binary ambient values to stdout */ + FILE *fp +) +{ + FVECT norm; + COLOR avcol; + + 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, FVFORMAT, &norm[0], &norm[1], &norm[2]) != 3) + return; + av.ndir = encodedir(norm); + if (!dataonly) + fscanf(fp, "%*s"); + if (fscanf(fp, FVFORMAT, &norm[0], &norm[1], &norm[2]) != 3) + return; + av.udir = encodedir(norm); + if (!dataonly) + fscanf(fp, "%*s"); + if (fscanf(fp, "%hd %f %f %f", &av.lvl, &av.weight, + &av.rad[0], &av.rad[1]) != 4) + return; + if (!dataonly) + fscanf(fp, "%*s"); + if (fscanf(fp, "%f %f %f", + &avcol[RED], &avcol[GRN], &avcol[BLU]) != 3) + return; + setscolor(av.val, avcol[RED], avcol[GRN], avcol[BLU]); + if (!dataonly) + fscanf(fp, "%*s"); + if (fscanf(fp, "%f %f", &av.gpos[0], &av.gpos[1]) != 2) + return; + if (!dataonly) + fscanf(fp, "%*s"); + if (fscanf(fp, "%f %f", &av.gdir[0], &av.gdir[1]) != 2) + return; + if (dataonly) { + if (fscanf(fp, "%u", &av.corral) != 1) + return; + } else if (fscanf(fp, "%*s %X", &av.corral) != 1) + return; + av.next = NULL; + if (writambval(&av, stdout) < 0) + exit(1); + } +} + + +int +main( /* load ambient values from a file */ + int argc, + char *argv[] +) +{ FILE *fp; int i; @@ -108,6 +155,7 @@ char *argv[]; return(1); } if (reverse) { + SET_FILE_BINARY(stdout); if (header) { if (checkheader(fp, "ascii", stdout) < 0) goto formaterr; @@ -115,24 +163,20 @@ char *argv[]; newheader("RADIANCE", stdout); printargs(argc, argv, stdout); } + fputncomp(3, stdout); fputformat(AMBFMT, stdout); - putchar('\n'); -#ifdef MSDOS - setmode(fileno(stdout), O_BINARY); -#endif + fputc('\n', stdout); putambmagic(stdout); writamb(fp); } else { -#ifdef MSDOS - setmode(fileno(fp), O_BINARY); -#endif - if (checkheader(fp, AMBFMT, header ? stdout : (FILE *)NULL) < 0) + SET_FILE_BINARY(fp); + if (getheader(fp, amb_headline, header ? stdout : (FILE *)NULL) < 0) goto formaterr; if (!hasambmagic(fp)) goto formaterr; if (header) { fputformat("ascii", stdout); - putchar('\n'); + fputc('\n', stdout); } lookamb(fp); } @@ -141,83 +185,4 @@ char *argv[]; formaterr: fprintf(stderr, "%s: format error on input\n", argv[0]); exit(1); -} - - -void -lookamb(fp) /* 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); - } -} - - -void -writamb(fp) /* 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); - } }