ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/cv/mgflib/parser.c
(Generate patch)

Comparing ray/src/cv/mgflib/parser.c (file contents):
Revision 1.12 by greg, Fri Jul 22 09:58:49 1994 UTC vs.
Revision 1.15 by greg, Thu Apr 13 12:11:30 1995 UTC

# Line 59 | Line 59 | static int     e_any_toss(),           /* discard unneeded entity *
59                  e_ies(),                /* IES luminaire file */
60                  e_include(),            /* include file */
61                  e_sph(),                /* sphere */
62 +                e_cct(),                /* color temperature */
63                  e_cmix(),               /* color mixtures */
64                  e_cspec(),              /* color spectra */
65                  e_cyl(),                /* cylinder */
# Line 119 | Line 120 | mg_init()                      /* initialize alternate entity handlers */
120          if (mg_ehand[MG_E_COLOR] != NULL) {
121                  if (mg_ehand[MG_E_CMIX] == NULL) {
122                          mg_ehand[MG_E_CMIX] = e_cmix;
123 <                        ineed |= 1<<MG_E_COLOR|1<<MG_E_CXY|1<<MG_E_CSPEC|1<<MG_E_CMIX;
123 >                        ineed |= 1<<MG_E_COLOR|1<<MG_E_CXY|1<<MG_E_CSPEC|1<<MG_E_CMIX|1<<MG_E_CCT;
124                  }
125                  if (mg_ehand[MG_E_CSPEC] == NULL) {
126                          mg_ehand[MG_E_CSPEC] = e_cspec;
127 <                        ineed |= 1<<MG_E_COLOR|1<<MG_E_CXY|1<<MG_E_CSPEC|1<<MG_E_CMIX;
127 >                        ineed |= 1<<MG_E_COLOR|1<<MG_E_CXY|1<<MG_E_CSPEC|1<<MG_E_CMIX|1<<MG_E_CCT;
128                  }
129 +                if (mg_ehand[MG_E_CCT] == NULL) {
130 +                        mg_ehand[MG_E_CCT] = e_cct;
131 +                        ineed |= 1<<MG_E_COLOR|1<<MG_E_CXY|1<<MG_E_CSPEC|1<<MG_E_CMIX|1<<MG_E_CCT;
132 +                }
133          }
134                                          /* check for consistency */
135          if (mg_ehand[MG_E_FACE] != NULL)
# Line 133 | Line 138 | mg_init()                      /* initialize alternate entity handlers */
138                          mg_ehand[MG_E_CMIX] != NULL)
139                  uneed |= 1<<MG_E_COLOR;
140          if (mg_ehand[MG_E_RD] != NULL || mg_ehand[MG_E_TD] != NULL ||
141 +                        mg_ehand[MG_E_IR] != NULL ||
142                          mg_ehand[MG_E_ED] != NULL ||
143                          mg_ehand[MG_E_RS] != NULL ||
144                          mg_ehand[MG_E_TS] != NULL ||
# Line 159 | Line 165 | mg_init()                      /* initialize alternate entity handlers */
165                  e_supp[MG_E_CSPEC] = c_hcolor;
166          if (ineed & 1<<MG_E_CMIX && mg_ehand[MG_E_CMIX] != c_hcolor)
167                  e_supp[MG_E_CMIX] = c_hcolor;
168 +        if (ineed & 1<<MG_E_CCT && mg_ehand[MG_E_CCT] != c_hcolor)
169 +                e_supp[MG_E_CCT] = c_hcolor;
170                                          /* discard remaining entities */
171          for (i = 0; i < MG_NENTITIES; i++)
172                  if (mg_ehand[i] == NULL)
# Line 166 | Line 174 | mg_init()                      /* initialize alternate entity handlers */
174   }
175  
176  
169 –
177   int
178   mg_entity(name)                 /* get entity number from its name */
179   char    *name;
# Line 968 | Line 975 | char   **av;
975  
976  
977   static int
978 < e_cspec(ac, av)                 /* handle spectral color */
972 < int     ac;
973 < char    **av;
978 > put_cxy()                       /* put out current xy chromaticities */
979   {
980          static char     xbuf[24], ybuf[24];
981          static char     *ccom[4] = {mg_ename[MG_E_CXY], xbuf, ybuf};
982          int     rv;
983  
984 +        sprintf(xbuf, "%.4f", c_ccolor->cx);
985 +        sprintf(ybuf, "%.4f", c_ccolor->cy);
986 +        if ((rv = mg_handle(MG_E_CXY, 3, ccom)) != MG_OK)
987 +                return(rv);
988 +        return(MG_OK);
989 + }
990 +
991 +
992 + static int
993 + put_cspec()                     /* put out current color spectrum */
994 + {
995 +        char    wl[2][6], vbuf[C_CNSS][24];
996 +        char    *newav[C_CNSS+4];
997 +        double  sf;
998 +        register int    i;
999 +
1000 +        if (mg_ehand[MG_E_CSPEC] != c_hcolor) {
1001 +                sprintf(wl[0], "%d", C_CMINWL);
1002 +                sprintf(wl[1], "%d", C_CMAXWL);
1003 +                newav[0] = mg_ename[MG_E_CSPEC];
1004 +                newav[1] = wl[0];
1005 +                newav[2] = wl[1];
1006 +                sf = (double)C_CNSS / c_ccolor->ssum;
1007 +                for (i = 0; i < C_CNSS; i++) {
1008 +                        sprintf(vbuf[i], "%.4f", sf*c_ccolor->ssamp[i]);
1009 +                        newav[i+3] = vbuf[i];
1010 +                }
1011 +                newav[C_CNSS+3] = NULL;
1012 +                if ((i = mg_handle(MG_E_CSPEC, C_CNSS+3, newav)) != MG_OK)
1013 +                        return(i);
1014 +        }
1015 +        return(MG_OK);
1016 + }
1017 +
1018 +
1019 + static int
1020 + e_cspec(ac, av)                 /* handle spectral color */
1021 + int     ac;
1022 + char    **av;
1023 + {
1024 +                                /* convert to xy chromaticity */
1025          c_ccvt(c_ccolor, C_CSXY);
1026                                  /* if it's really their handler, use it */
1027 <        if (mg_ehand[MG_E_CXY] != c_hcolor) {
1028 <                sprintf(xbuf, "%.4f", c_ccolor->cx);
983 <                sprintf(ybuf, "%.4f", c_ccolor->cy);
984 <                if ((rv = mg_handle(MG_E_CXY, 3, ccom)) != MG_OK)
985 <                        return(rv);
986 <        }
1027 >        if (mg_ehand[MG_E_CXY] != c_hcolor)
1028 >                return(put_cxy());
1029          return(MG_OK);
1030   }
1031  
# Line 993 | Line 1035 | e_cmix(ac, av)                 /* handle mixing of colors */
1035   int     ac;
1036   char    **av;
1037   {
996 –        char    wl[2][6], vbuf[C_CNSS][24];
997 –        char    *newav[C_CNSS+4];
998 –        int     rv;
999 –        register int    i;
1038          /*
1039           * Contorted logic works as follows:
1040           *      1. the colors are already mixed in c_hcolor() support function
# Line 1007 | Line 1045 | char   **av;
1045           */
1046          if (mg_ehand[MG_E_CSPEC] == e_cspec)
1047                  c_ccvt(c_ccolor, C_CSXY);
1048 <        else if (c_ccolor->flags & C_CDSPEC) {
1049 <                if (mg_ehand[MG_E_CSPEC] != c_hcolor) {
1050 <                        sprintf(wl[0], "%d", C_CMINWL);
1051 <                        sprintf(wl[1], "%d", C_CMAXWL);
1052 <                        newav[0] = mg_ename[MG_E_CSPEC];
1053 <                        newav[1] = wl[0];
1054 <                        newav[2] = wl[1];
1055 <                        for (i = 0; i < C_CNSS; i++) {
1056 <                                sprintf(vbuf[i], "%.6f",
1057 <                                                (double)c_ccolor->ssamp[i] /
1058 <                                                c_ccolor->ssum);
1059 <                                newav[i+3] = vbuf[i];
1060 <                        }
1061 <                        newav[C_CNSS+3] = NULL;
1062 <                        if ((rv = mg_handle(MG_E_CSPEC, C_CNSS+3, newav)) != MG_OK)
1063 <                                return(rv);
1064 <                }
1065 <                return(MG_OK);
1066 <        }
1067 <        if (mg_ehand[MG_E_CXY] != c_hcolor) {
1068 <                sprintf(vbuf[0], "%.4f", c_ccolor->cx);
1069 <                sprintf(vbuf[1], "%.4f", c_ccolor->cy);
1070 <                newav[0] = mg_ename[MG_E_CXY];
1071 <                newav[1] = vbuf[0];
1034 <                newav[2] = vbuf[1];
1035 <                newav[3] = NULL;
1036 <                if ((rv = mg_handle(MG_E_CXY, 3, newav)) != MG_OK)
1037 <                        return(rv);
1038 <        }
1048 >        else if (c_ccolor->flags & C_CDSPEC)
1049 >                return(put_cspec());
1050 >        if (mg_ehand[MG_E_CXY] != c_hcolor)
1051 >                return(put_cxy());
1052 >        return(MG_OK);
1053 > }
1054 >
1055 >
1056 > static int
1057 > e_cct(ac, av)                   /* handle color temperature */
1058 > int     ac;
1059 > char    **av;
1060 > {
1061 >        /*
1062 >         * Logic is similar to e_cmix here.  Support handler has already
1063 >         * converted temperature to spectral color.  Put it out as such
1064 >         * if they support it, otherwise convert to xy chromaticity and
1065 >         * put it out if they handle it.
1066 >         */
1067 >        if (mg_ehand[MG_E_CSPEC] != e_cspec)
1068 >                return(put_cspec());
1069 >        c_ccvt(c_ccolor, C_CSXY);
1070 >        if (mg_ehand[MG_E_CXY] != c_hcolor)
1071 >                return(put_cxy());
1072          return(MG_OK);
1073   }

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines