home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / unix / volume21 / rayshade / patch2 < prev    next >
Encoding:
Internet Message Format  |  1990-03-21  |  54.4 KB
  1. Subject:  v21i017:  A ray tracing program, Patch2
  2. Newsgroups: comp.sources.unix
  3. Sender: sources
  4. Approved: rsalz@uunet.UU.NET
  5.  
  6. Submitted-by: Craig Kolb <craig@weedeater.math.yale.edu>
  7. Posting-number: Volume 21, Issue 17
  8. Archive-name: rayshade/patch2
  9.  
  10. System: rayshade version 3.0
  11. Patch #: 2
  12. Priority: MEDIUM
  13. Subject: New depth of field code.
  14. Subject: Minor changes to texturing functions.
  15. Subject: Changed direction of rendering when NORLE is defined.
  16. Subject: General documentation cleanup.
  17. Subject: New -F option, reporting of total CPU & split times.
  18. Subject: Added handling of cpp-generated '#n "filename"' lines.
  19. Subject: Removed #include handling.
  20. Subject: Suggest using cpp to process input files.
  21. Subject: Improved error/warning message reporting.
  22. Subject: Renamed utime and stime to avoid name clashes.
  23.  
  24. Description:
  25.  
  26.     Cleaned up, improved, and expanded documentation.
  27.     In particular, the height field documentation is a bit more
  28.     complete, the handling of colormaps is more fully explained,
  29.     and low-altitude mist is now documented.
  30.  
  31.     Added new depth of field code, courtesy of Rodney G. Bogart.
  32.     See documentation of the "aperture" and "focaldist" keywords for
  33.     details.
  34.  
  35.     Removed hard coded constants in calculation of ambient
  36.     component in several textures.  In all textures, computed
  37.     color values are now used to scale a surface's ambient and diffuse
  38.     colors.
  39.  
  40.     When NORLE is defined, images will now be rendered top-to-bottom
  41.     to provide complete compatibility with the output of Mark
  42.     VandeWettering's "mtv" ray tracer.
  43.  
  44.     Rayshade no longer processes #include directives.  Instead, you
  45.     are encouraged to make use of cpp (the C pre-processor) to aid
  46.     in the writing of input files.  Rayshade will make use of
  47.     cpp-generated line numbering to perform reasonable error reporting.
  48.     The example input file Examples/planet.ray shows how one might
  49.     use cpp to one's advantage.
  50.  
  51.     A new '-F' option can be used to set the frequency, in lines,
  52.     of status reports.  When in Verbose mode, rayshade will now
  53.     include the total and split CPU times with each status report.
  54.  
  55.     The format of error and warning messages should now be relatively
  56.     standard.
  57.  
  58.     Renamed utime and stime variables to avoid clashing with the
  59.     functions of the same name.
  60.  
  61.     The source comes a bit closer to passing lint.
  62.  
  63. Fix:    From rn, say "| patch -p -N -d DIR", where DIR is your rayshade source
  64.     directory.  Outside of rn, say "cd DIR; patch -p -N <thisarticle".
  65.     If you don't have the patch program, apply the following by hand,
  66.     or get patch (version 2.0, latest patchlevel).
  67.  
  68.     After patching:
  69.         Do *NOT* recompile.  Apply patch #3 immediately.
  70.  
  71.     If patch indicates that patchlevel is the wrong version, you may need
  72.     to apply one or more previous patches, or the patch may already
  73.     have been applied.  See the patchlevel.h file to find out what has or
  74.     has not been applied.  In any event, don't continue with the patch.
  75.  
  76.  
  77. Index: src/patchlevel.h
  78. Prereq: 1
  79. 1c1
  80. < #define PATCHLEVEL 1
  81. ---
  82. > #define PATCHLEVEL 2
  83.  
  84. Index: Changes
  85. *** Changes.old    Thu Dec  7 23:18:29 1989
  86. --- Changes    Thu Dec  7 23:18:29 1989
  87. ***************
  88. *** 1,3 ****
  89. --- 1,34 ----
  90. + Patch #2/3:
  91. + -----------
  92. + 
  93. + Added depth of field code, courtesy of Rodney G. Bogart.
  94. + Added -F option to allow selection of frequency of status reports.
  95. + Added reporting of total and split CPU times during verbose status reports.
  96. + Removed hard-coded constants in several of the textures.
  97. + All textures that use colormaps now use the computed colormap entry
  98. + to scale the ambient and diffuse components of a surface's color.
  99. + Documented low-altitude mist.
  100. + General cleanup of documentation.
  101. + If NORLE is defined, images will be rendered top-to-bottom
  102. + to be compatible with the output of Mark VandeWettering's ray tracer.
  103. + 
  104. + Patch #1:
  105. + ---------
  106. + 
  107. + Corrected computation of field of view when in Stereo mode.
  108. + Atmospheric effects are now applied to background rays.
  109. + Statistics are returned to supervisor and reported when using Linda.
  110. + Created atmosphere.h to facilitate addition of new atmospheric effects.
  111. + Renamed rotate(), translate() and scale() to avoid name clashes when
  112. + linking with external libraries.
  113. + Updated Linda syntax.
  114. + Fixed typos in code comments in hf.c.
  115. + Added -w option.
  116. + 
  117. + ---------
  118. + 
  119. + Version 3.0:
  120. + 
  121.   Bugfixes
  122.   --------
  123.   
  124. ***************
  125. *** 28,34 ****
  126.   Merged int_grid() and DDA().
  127.   Added "samples", "jittered", "cutoff", "contrast" and "adaptive" keywords.
  128.   Flat-shaded triangles now require less storage space.
  129. ! Shadow caching is now the default.
  130.   The number of shadow cache hits are reported.
  131.   Shadow cache hits are counted as "shadow rays".
  132.   Shadow hits are counted as "intersecting rays".
  133. --- 59,65 ----
  134.   Merged int_grid() and DDA().
  135.   Added "samples", "jittered", "cutoff", "contrast" and "adaptive" keywords.
  136.   Flat-shaded triangles now require less storage space.
  137. ! Shadow cacheing is now the default.
  138.   The number of shadow cache hits are reported.
  139.   Shadow cache hits are counted as "shadow rays".
  140.   Shadow hits are counted as "intersecting rays".
  141.  
  142. Index: README
  143. *** README.old    Thu Dec  7 23:18:43 1989
  144. --- README    Thu Dec  7 23:18:45 1989
  145. ***************
  146. *** 1,11 ****
  147. ! This is version 3.0 of rayshade, a raytracing program.  Rayshade reads
  148.   a multi-line ASCII file describing a scene to be rendered and produces
  149. ! a Utah Raster RLE format file of the raytraced image.
  150.   
  151.   Rayshade features:
  152.   
  153. !     Eight types of primitives (box, cone, cylinder, height field,
  154. !     polygon, sphere, superquadric, flat- and Phong-shaded triangle)
  155.   
  156.       Composite objects
  157.   
  158. --- 1,11 ----
  159. ! This is version 3.0 of rayshade, a ray tracing program.  Rayshade reads
  160.   a multi-line ASCII file describing a scene to be rendered and produces
  161. ! a Utah Raster RLE format file of the ray-traced image.
  162.   
  163.   Rayshade features:
  164.   
  165. !     Nine types of primitives (box, cone, cylinder, height field,
  166. !     plane, polygon, sphere, superquadric, flat- and Phong-shaded triangle)
  167.   
  168.       Composite objects
  169.   
  170. ***************
  171. *** 48,56 ****
  172.   formats.
  173.   
  174.   If you do not want to or cannot use the Utah Raster toolkit, compile-time
  175. ! switches are provided to create image files using a generic format very
  176. ! similar to that used by Mark VandeWettering's raytracer.  See the Makefile
  177. ! and src/outputp.c for details.
  178.   
  179.   The directory "src" contains the source to rayshade.  To compile, edit the
  180.   Makefile in that directory and change include file and library paths and set
  181. --- 48,56 ----
  182.   formats.
  183.   
  184.   If you do not want to or cannot use the Utah Raster toolkit, compile-time
  185. ! switches are provided to create image files using a generic format
  186. ! identical to that used by Mark VandeWettering's "mtv" ray tracer.  See the
  187. ! Makefile and src/outputp.c for details.
  188.   
  189.   The directory "src" contains the source to rayshade.  To compile, edit the
  190.   Makefile in that directory and change include file and library paths and set
  191. ***************
  192. *** 58,64 ****
  193.   software configuration.
  194.   
  195.   The file doc/rayshade.1 contains a brief manual page which covers most things
  196. ! a casual user will need to know in order to produce raytraced images.
  197.   A tutorial on adding new textures on rayshade is included in doc/texture.ms.
  198.   A similar document on adding new primitives to rayshade is in
  199.   doc/primitive.ms.  Unfortunately, there is as yet no technical documentation.
  200. --- 58,64 ----
  201.   software configuration.
  202.   
  203.   The file doc/rayshade.1 contains a brief manual page which covers most things
  204. ! a casual user will need to know in order to produce ray-traced images.
  205.   A tutorial on adding new textures on rayshade is included in doc/texture.ms.
  206.   A similar document on adding new primitives to rayshade is in
  207.   doc/primitive.ms.  Unfortunately, there is as yet no technical documentation.
  208. ***************
  209. *** 70,77 ****
  210.   several of the databases, you will need to tweak the data a bit to achieve
  211.   optimal runtimes.  See nff2shade.awk for details.
  212.   
  213.   Rayshade was not designed to be, nor is it, the be-all and end-all of
  214. ! raytracers.  It was meant to be reasonably fast, portable, and easy to 
  215.   modify.  It has some nice features which allow you to produce
  216.   pretty pictures, but there are countless extensions, modifications,
  217.   and improvements which could be made.  There are many routines which may be
  218. --- 70,83 ----
  219.   several of the databases, you will need to tweak the data a bit to achieve
  220.   optimal runtimes.  See nff2shade.awk for details.
  221.   
  222. + As of patch #2, rayshade no longer processes #include directives in the
  223. + input file.  Instead, you are encouraged to make use of cpp in the
  224. + design of your input files.  Rayshade will use cpp-generated lines
  225. + of the form '#n "filename"' to perform meaningful error reporting.
  226. + See Examples/planet.ray for more details.
  227. + 
  228.   Rayshade was not designed to be, nor is it, the be-all and end-all of
  229. ! ray tracers.  It was meant to be reasonably fast, portable, and easy to 
  230.   modify.  It has some nice features which allow you to produce
  231.   pretty pictures, but there are countless extensions, modifications,
  232.   and improvements which could be made.  There are many routines which may be
  233. ***************
  234. *** 79,85 ****
  235.   improvements and projects see "TODO".  You are encouraged to modify the
  236.   source code left and right.
  237.   
  238. ! Rayshade had its start as an "introductory" public domain raytracer written
  239.   by Roman Kuchkuda.  During 1987-88 the first version of rayshade was written
  240.   by Craig Kolb, David P. Dobkin (the original cylinder, cone and extinct torus-
  241.   tracing code), and David C. Hoffman (the original octree code).  Craig Kolb
  242. --- 85,91 ----
  243.   improvements and projects see "TODO".  You are encouraged to modify the
  244.   source code left and right.
  245.   
  246. ! Rayshade had its start as an "introductory" public domain ray tracer written
  247.   by Roman Kuchkuda.  During 1987-88 the first version of rayshade was written
  248.   by Craig Kolb, David P. Dobkin (the original cylinder, cone and extinct torus-
  249.   tracing code), and David C. Hoffman (the original octree code).  Craig Kolb
  250. ***************
  251. *** 93,99 ****
  252.   comments, and willingness to be on the Front Lines.  Thanks also to Roman
  253.   Kuchkuda for providing a base upon which to build.  Special thanks to Robert
  254.   Skinner for providing the Noise(), DNoise(), and other texturing functions
  255. ! and allowing them to be redistributed.
  256.   
  257.   If you find any bugs, make any useful extensions, have a nice input
  258.   file, port rayshade to a new environment, or need assistance understanding a
  259. --- 99,106 ----
  260.   comments, and willingness to be on the Front Lines.  Thanks also to Roman
  261.   Kuchkuda for providing a base upon which to build.  Special thanks to Robert
  262.   Skinner for providing the Noise(), DNoise(), and other texturing functions
  263. ! and allowing them to be redistributed.  Thanks also to Rodney G. Bogart for
  264. ! providing the depth of field code.
  265.   
  266.   If you find any bugs, make any useful extensions, have a nice input
  267.   file, port rayshade to a new environment, or need assistance understanding a
  268. ***************
  269. *** 100,106 ****
  270.   particularly braindamaged section of code, please let me know.  I can be most
  271.   easily reached by email.
  272.   
  273. ! Craig Kolb 10/27/89
  274.   kolb@yale.edu
  275.   
  276.   Yale University Dept. of Mathematics
  277. --- 107,113 ----
  278.   particularly braindamaged section of code, please let me know.  I can be most
  279.   easily reached by email.
  280.   
  281. ! Craig Kolb 7 Dec 89
  282.   kolb@yale.edu
  283.   
  284.   Yale University Dept. of Mathematics
  285.  
  286. Index: src/box.c
  287. *** src/box.c.old    Thu Dec  7 23:19:17 1989
  288. --- src/box.c    Thu Dec  7 23:19:19 1989
  289. ***************
  290. *** 18,26 ****
  291.    * name of the person performing the modification, the date of modification,
  292.    * and the reason for such modification.
  293.    *
  294. !  * $Id: box.c,v 3.0 89/10/27 02:05:47 craig Exp $
  295.    *
  296.    * $Log:    box.c,v $
  297.    * Revision 3.0  89/10/27  02:05:47  craig
  298.    * Baseline for first official release.
  299.    * 
  300. --- 18,29 ----
  301.    * name of the person performing the modification, the date of modification,
  302.    * and the reason for such modification.
  303.    *
  304. !  * $Id: box.c,v 3.0.1.1 89/12/06 16:33:48 craig Exp $
  305.    *
  306.    * $Log:    box.c,v $
  307. +  * Revision 3.0.1.1  89/12/06  16:33:48  craig
  308. +  * patch2: Added calls to new error/warning routines.
  309. +  * 
  310.    * Revision 3.0  89/10/27  02:05:47  craig
  311.    * Baseline for first official release.
  312.    * 
  313. ***************
  314. *** 39,49 ****
  315.       Box          *box;
  316.       Primitive *prim;
  317.       Object *newobj;
  318. -     extern int Quiet, yylineno;
  319.   
  320.       if (xs < EPSILON || ys < EPSILON || zs < EPSILON) {
  321. !         if (!Quiet)
  322. !             fprintf(stderr,"Degenerate box (line %d)\n",yylineno);
  323.           return (Object *)0;
  324.       }
  325.       prim = mallocprim();
  326. --- 42,50 ----
  327.       Box          *box;
  328.       Primitive *prim;
  329.       Object *newobj;
  330.   
  331.       if (xs < EPSILON || ys < EPSILON || zs < EPSILON) {
  332. !         yywarning("Degenerate box.\n");
  333.           return (Object *)0;
  334.       }
  335.       prim = mallocprim();
  336.  
  337. Index: src/cone.c
  338. *** src/cone.c.old    Thu Dec  7 23:19:24 1989
  339. --- src/cone.c    Thu Dec  7 23:19:25 1989
  340. ***************
  341. *** 18,26 ****
  342.    * name of the person performing the modification, the date of modification,
  343.    * and the reason for such modification.
  344.    *
  345. !  * $Id: cone.c,v 3.0.1.1 89/11/18 14:08:09 craig Exp Locker: craig $
  346.    *
  347.    * $Log:    cone.c,v $
  348.    * Revision 3.0.1.1  89/11/18  14:08:09  craig
  349.    * patch1: Changes to reflect new names of transformation routines.
  350.    * 
  351. --- 18,29 ----
  352.    * name of the person performing the modification, the date of modification,
  353.    * and the reason for such modification.
  354.    *
  355. !  * $Id: cone.c,v 3.0.1.2 89/12/06 16:33:44 craig Exp $
  356.    *
  357.    * $Log:    cone.c,v $
  358. +  * Revision 3.0.1.2  89/12/06  16:33:44  craig
  359. +  * patch2: Added calls to new error/warning routines.
  360. +  * 
  361.    * Revision 3.0.1.1  89/11/18  14:08:09  craig
  362.    * patch1: Changes to reflect new names of transformation routines.
  363.    * 
  364. ***************
  365. *** 44,50 ****
  366.       Cone *cone;
  367.       Primitive *prim;
  368.       Object *newobj;
  369. -     extern int yylineno, Quiet;
  370.       double len, dtmp;
  371.       Vector axis, base, tmp;
  372.   
  373. --- 47,52 ----
  374. ***************
  375. *** 96,104 ****
  376.       vecsub(*ax, *cent, &axis);
  377.       len = normalize(&axis);
  378.       if (len < EPSILON) {
  379. !         if (!Quiet)
  380. !             fprintf(stderr,"Degenerate cone (line %d).\n",
  381. !                             yylineno);
  382.           free((char *)cone);
  383.           free((char *)prim);
  384.           free((char *)newobj);
  385. --- 98,104 ----
  386.       vecsub(*ax, *cent, &axis);
  387.       len = normalize(&axis);
  388.       if (len < EPSILON) {
  389. !         yywarning("Degenerate cone.\n");
  390.           free((char *)cone);
  391.           free((char *)prim);
  392.           free((char *)newobj);
  393.  
  394. Index: src/cylinder.c
  395. *** src/cylinder.c.old    Thu Dec  7 23:19:30 1989
  396. --- src/cylinder.c    Thu Dec  7 23:19:32 1989
  397. ***************
  398. *** 18,26 ****
  399.    * name of the person performing the modification, the date of modification,
  400.    * and the reason for such modification.
  401.    *
  402. !  * $Id: cylinder.c,v 3.0.1.1 89/11/18 14:07:52 craig Exp Locker: craig $
  403.    *
  404.    * $Log:    cylinder.c,v $
  405.    * Revision 3.0.1.1  89/11/18  14:07:52  craig
  406.    * patch1: Changes to reflect new names of transformation routines.
  407.    * 
  408. --- 18,29 ----
  409.    * name of the person performing the modification, the date of modification,
  410.    * and the reason for such modification.
  411.    *
  412. !  * $Id: cylinder.c,v 3.0.1.2 89/12/06 16:33:41 craig Exp $
  413.    *
  414.    * $Log:    cylinder.c,v $
  415. +  * Revision 3.0.1.2  89/12/06  16:33:41  craig
  416. +  * patch2: Added calls to new error/warning routines.
  417. +  * 
  418.    * Revision 3.0.1.1  89/11/18  14:07:52  craig
  419.    * patch1: Changes to reflect new names of transformation routines.
  420.    * 
  421. ***************
  422. *** 45,57 ****
  423.       Primitive *prim;
  424.       Object *newobj;
  425.       double len;
  426. -     extern int yylineno, Quiet;
  427.       Vector axis, dir;
  428.   
  429.       if (r <= 0.) {
  430. !         if (!Quiet)
  431. !             fprintf(stderr,"Invalid cylinder radius (line %d)\n",
  432. !                 yylineno);
  433.           return (Object *)0;
  434.       }
  435.   
  436. --- 48,57 ----
  437.       Primitive *prim;
  438.       Object *newobj;
  439.       double len;
  440.       Vector axis, dir;
  441.   
  442.       if (r <= 0.) {
  443. !         yywarning("Invalid cylinder radius.\n");
  444.           return (Object *)0;
  445.       }
  446.   
  447. ***************
  448. *** 68,76 ****
  449.   
  450.       len = normalize(&axis);
  451.       if(len < EPSILON) {
  452. !         if (!Quiet)
  453. !             fprintf(stderr,"Degenerate cylinder (line %d).\n",
  454. !                             yylineno);
  455.           free((char *)cyl);
  456.           free((char *)prim);
  457.           return (Object *)0;
  458. --- 68,74 ----
  459.   
  460.       len = normalize(&axis);
  461.       if(len < EPSILON) {
  462. !         yywarning("Degenerate cylinder.\n");
  463.           free((char *)cyl);
  464.           free((char *)prim);
  465.           return (Object *)0;
  466.  
  467. Index: src/defaults.h
  468. *** src/defaults.h.old    Thu Dec  7 23:19:37 1989
  469. --- src/defaults.h    Thu Dec  7 23:19:38 1989
  470. ***************
  471. *** 18,26 ****
  472.    * name of the person performing the modification, the date of modification,
  473.    * and the reason for such modification.
  474.    *
  475. !  * $Id: defaults.h,v 3.0 89/10/27 02:05:49 craig Exp $
  476.    *
  477.    * $Log:    defaults.h,v $
  478.    * Revision 3.0  89/10/27  02:05:49  craig
  479.    * Baseline for first official release.
  480.    * 
  481. --- 18,29 ----
  482.    * name of the person performing the modification, the date of modification,
  483.    * and the reason for such modification.
  484.    *
  485. !  * $Id: defaults.h,v 3.0.1.1 89/12/02 16:50:42 craig Exp $
  486.    *
  487.    * $Log:    defaults.h,v $
  488. +  * Revision 3.0.1.1  89/12/02  16:50:42  craig
  489. +  * patch2: Added default value for ReportFreq.
  490. +  * 
  491.    * Revision 3.0  89/10/27  02:05:49  craig
  492.    * Baseline for first official release.
  493.    * 
  494. ***************
  495. *** 43,48 ****
  496. --- 46,52 ----
  497.   #define UPX        0        /* Up vector */
  498.   #define UPY        0
  499.   #define UPZ        1
  500. + #define REPORTFREQ    10        /* Frequency of status report */
  501.   
  502.   #define DEFREDCONT    0.25        /* Default contrast threshold values. */
  503.   #define DEFGREENCONT    0.2
  504.  
  505. Index: src/hf.c
  506. *** src/hf.c.old    Thu Dec  7 23:19:44 1989
  507. --- src/hf.c    Thu Dec  7 23:19:45 1989
  508. ***************
  509. *** 18,26 ****
  510.    * name of the person performing the modification, the date of modification,
  511.    * and the reason for such modification.
  512.    *
  513. !  * $Id: hf.c,v 3.0.1.1 89/11/16 20:44:28 craig Exp Locker: craig $
  514.    *
  515.    * $Log:    hf.c,v $
  516.    * Revision 3.0.1.1  89/11/16  20:44:28  craig
  517.    * patch1: Fixed typos in code comments.
  518.    * 
  519. --- 18,29 ----
  520.    * name of the person performing the modification, the date of modification,
  521.    * and the reason for such modification.
  522.    *
  523. !  * $Id: hf.c,v 3.0.1.2 89/12/06 16:33:23 craig Exp $
  524.    *
  525.    * $Log:    hf.c,v $
  526. +  * Revision 3.0.1.2  89/12/06  16:33:23  craig
  527. +  * patch2: Added calls to new error/warning routines.
  528. +  * 
  529.    * Revision 3.0.1.1  89/11/16  20:44:28  craig
  530.    * patch1: Fixed typos in code comments.
  531.    * 
  532. ***************
  533. *** 57,67 ****
  534.    * Used to differentiate between the two triangles used to represent a cell:
  535.    *    a------d
  536.    *      |\     |
  537. !  *      | \TRI1|    TRI1 == c-->d-->a-->c
  538.    *      |  \   |
  539.    *      |   \  |
  540.    *    |    \ |
  541. !  *      |TRI2 \|    TRI2 == c-->a-->b-->c
  542.    *      b------c
  543.    */
  544.   #define TRI1            1
  545. --- 60,70 ----
  546.    * Used to differentiate between the two triangles used to represent a cell:
  547.    *    a------d
  548.    *      |\     |
  549. !  *      | \TRI2|    TRI2 == c-->d-->a-->c
  550.    *      |  \   |
  551.    *      |   \  |
  552.    *    |    \ |
  553. !  *      |TRI1 \|    TRI1 == c-->a-->b-->c
  554.    *      b------c
  555.    */
  556.   #define TRI1            1
  557. ***************
  558. *** 93,99 ****
  559.   
  560.       fp = fopen(filename, "r");
  561.       if (fp == (FILE *)NULL)
  562. !         yyerror("Cannot open heightfield file");
  563.   
  564.       prim = mallocprim();
  565.       newobj = new_object(NULL, HF, (char *)prim, (Trans *)NULL);
  566. --- 96,102 ----
  567.   
  568.       fp = fopen(filename, "r");
  569.       if (fp == (FILE *)NULL)
  570. !         yyerror("Cannot open heightfield file \"%s\".", filename);
  571.   
  572.       prim = mallocprim();
  573.       newobj = new_object(NULL, HF, (char *)prim, (Trans *)NULL);
  574.  
  575. Index: src/input.c
  576. *** src/input.c.old    Thu Dec  7 23:19:52 1989
  577. --- src/input.c    Thu Dec  7 23:19:53 1989
  578. ***************
  579. *** 18,141 ****
  580.    * name of the person performing the modification, the date of modification,
  581.    * and the reason for such modification.
  582.    *
  583. !  * $Id: input.c,v 3.0 89/10/27 02:05:51 craig Exp $
  584.    *
  585.    * $Log:    input.c,v $
  586.    * Revision 3.0  89/10/27  02:05:51  craig
  587.    * Baseline for first official release.
  588.    * 
  589.    */
  590.   #include <stdio.h>
  591. - #ifdef SYSV
  592. - #include <string.h>
  593. - #else
  594. - #ifndef AZTEC_C
  595. - #include <strings.h>
  596. - #else /* AZTEC_C */
  597. - 
  598. - getpid()
  599. - {
  600. -     return 123;
  601. - }
  602. - #endif
  603. - #endif
  604. - #include "constants.h"
  605. - #include "typedefs.h"
  606. - 
  607. - #define INCLUDE_STR    "#include "
  608.   
  609.   char *infilename;    /* Name of input file.  NULL signifies stdin. */
  610. - char tmpname[BUFSIZ];    /* name of temporary file */
  611. - extern FILE *yyin;    /* lex/yacc file pointer */
  612.   
  613.   read_input_file()
  614.   {
  615. !     extern char *infilename;
  616. ! 
  617. !     /*
  618. !      * Open temporary file.
  619. !      */
  620. !     sprintf(tmpname,"%s/raytmp.%d",TMPDIR, getpid());
  621. !     yyin = fopen(tmpname, "w");
  622.   
  623. !     if (yyin == (FILE *)NULL) {
  624. !         fprintf(stderr,"Cannot write to temp file %s\n",tmpname);
  625. !         exit(1);
  626.       }
  627. - 
  628. -     if (!process_file(infilename)) {
  629. -         /*
  630. -          * Some kind of error occurred -- unlink
  631. -          * temporary file and exit.
  632. -          */
  633. -         fclose(yyin);
  634. -         unlink(tmpname);
  635. -         exit(1);
  636. -     }
  637. -     /*
  638. -      * File processed okay.  Close the file, open it again for
  639. -      * reading, and call lex/yacc.
  640. -      */
  641. -     fclose(yyin);
  642. -     yyin = fopen(tmpname, "r");
  643.       yyparse();
  644. -     /*
  645. -      * All done -- unlink temporary file.
  646. -      */
  647. -     unlink(tmpname);
  648.   }
  649.   
  650.   /*
  651. !  * Open the named file and copy its contents into the temporary file.
  652. !  * If we run across a #include directive, recurse on the desired
  653. !  * file.  Note that *no checking is performed* -- a file could,
  654. !  * for example, include itself.  Rayshade will happily go on
  655. !  * copying data into the temporary file until it runs out
  656. !  * of file pointers (an fopen will fail), or you run out of disk space...
  657.    */
  658. ! process_file(filename)
  659. ! char *filename;
  660.   {
  661. !     FILE *fp;
  662. !     char buf[BUFSIZ], *name, *np;
  663. !     extern int yylineno;
  664.   
  665. !     if (filename == (char *)NULL)
  666. !         fp = stdin;
  667. !     else {
  668. !         fp = fopen(filename, "r");
  669. !         if (fp == (FILE *)NULL) {
  670. !             fprintf(stderr,"Cannot open %s for reading.\n",filename);
  671. !             return FALSE;
  672. !         }
  673. !     }
  674.   
  675. !     while(fgets(buf, BUFSIZ, fp) != NULL) {
  676. !         if (strncmp(buf, INCLUDE_STR, strlen(INCLUDE_STR)) == 0) {
  677. !             /*
  678. !              * Got an "#include "...
  679. !              */
  680. ! #ifdef SYSV
  681. !             name = strchr(buf, '"');
  682. !             np = strrchr(buf, '"');
  683. ! #else
  684. !             name = index(buf, '"');
  685. !             np = rindex(buf, '"');
  686. ! #endif
  687. !             /*
  688. !              * Get name between quotes.  If no or
  689. !              * one quote, complain.
  690. !              */
  691. !             if (name == (char *)0 || name == np) {
  692. !                 fprintf(stderr,"Invalid include directive (line %d)\n", yylineno);
  693. !                 return FALSE;
  694. !             }
  695. !             name++;
  696. !             *np = (char)NULL;
  697. !             if (process_file(name) == FALSE)
  698. !                 return FALSE;
  699. !         } else
  700. !             fputs(buf, yyin);
  701. !     }
  702. !     return TRUE;
  703.   }
  704. --- 18,96 ----
  705.    * name of the person performing the modification, the date of modification,
  706.    * and the reason for such modification.
  707.    *
  708. !  * $Id: input.c,v 3.0.1.2 89/12/07 22:53:32 craig Exp $
  709.    *
  710.    * $Log:    input.c,v $
  711. +  * Revision 3.0.1.2  89/12/07  22:53:32  craig
  712. +  * patch2: Added comments, lint-related goofiness.
  713. +  * 
  714. +  * Revision 3.0.1.1  89/12/06  16:08:43  craig
  715. +  * patch2: Removed #include handling.  Added RSmessage(), RSwarning(),
  716. +  * patch2: and RSerror().
  717. +  * 
  718.    * Revision 3.0  89/10/27  02:05:51  craig
  719.    * Baseline for first official release.
  720.    * 
  721.    */
  722.   #include <stdio.h>
  723.   
  724.   char *infilename;    /* Name of input file.  NULL signifies stdin. */
  725.   
  726. + /*
  727. +  * Open input file and call yyparse().
  728. +  */
  729.   read_input_file()
  730.   {
  731. !     extern FILE *yyin;    /* lex/yacc file pointer */
  732. !     extern char yyfilename[];
  733.   
  734. !     if (infilename == (char *)NULL) {
  735. !         yyin = stdin;
  736. !         strcpy(yyfilename, "stdin");
  737. !     } else {
  738. !         yyin = fopen(infilename, "r");
  739. !         if (yyin == (FILE *)NULL)
  740. !             RSerror("Cannot open %s.\n",infilename);
  741. !         strcpy(yyfilename, infilename);
  742.       }
  743.       yyparse();
  744.   }
  745.   
  746.   /*
  747. !  * Print message to standard output with format:
  748. !  * program_name: message_type: message
  749.    */
  750. ! /*VARARGS2*/
  751. ! RSmessage(type, str, pat1, pat2, pat3)
  752. ! char *type, *str, *pat1, *pat2, *pat3;
  753.   {
  754. !     extern char *progname;
  755.   
  756. !     fprintf(stderr,"%s: %s: ",progname, type);
  757. !     fprintf(stderr, str, pat1, pat2, pat3);
  758. !     fflush(stderr);
  759. ! }
  760.   
  761. ! /*
  762. !  * Issue warning message if not in Quiet mode.
  763. !  */
  764. ! /*VARARGS1*/
  765. ! RSwarning(str, pat1, pat2, pat3)
  766. ! char *str, *pat1, *pat2, *pat3;
  767. ! {
  768. !     extern int Quiet;
  769. ! 
  770. !     if (!Quiet)
  771. !         RSmessage("Warning", str, pat1, pat2, pat3);
  772. ! }
  773. ! 
  774. ! /*
  775. !  * Issue error message and exit.
  776. !  */
  777. ! /*VARARGS1*/
  778. ! RSerror(str, pat1, pat2, pat3)
  779. ! char *str, *pat1, *pat2, *pat3;
  780. ! {
  781. !     RSmessage("Error", str, pat1, pat2, pat3);
  782. !     exit(1);
  783.   }
  784.  
  785. Index: src/input_lex.l
  786. *** src/input_lex.l.old    Thu Dec  7 23:20:09 1989
  787. --- src/input_lex.l    Thu Dec  7 23:20:10 1989
  788. ***************
  789. *** 13,19 ****
  790.   /* without supplying the source, or without informing the end-user that the */
  791.   /* source is available for no extra charge.                    */
  792.   /*                                        */
  793. ! /* $Id: input_lex.l,v 3.0 89/10/27 02:05:52 craig Exp $ */
  794.   %{
  795.   #include <stdio.h>
  796.   #ifdef SYSV
  797. --- 13,19 ----
  798.   /* without supplying the source, or without informing the end-user that the */
  799.   /* source is available for no extra charge.                    */
  800.   /*                                        */
  801. ! /* $Id: input_lex.l,v 3.0.1.3 89/12/07 23:00:54 craig Exp $ */
  802.   %{
  803.   #include <stdio.h>
  804.   #ifdef SYSV
  805. ***************
  806. *** 33,43 ****
  807.   string    ({alpha}|"/")({alpha}|{digit}|{special}|"/")*
  808.   %p 3000
  809.   %%
  810. ! " "            ;
  811. ! \t            ;
  812. ! \n            ;
  813.   "/*"            {skipcomments();}
  814.   adaptive        {return(tADAPTIVE);}
  815.   background        {return(tBACKGROUND);}
  816.   blotch            {return(tBLOTCH);}
  817.   box            {return(tBOX);}
  818. --- 33,43 ----
  819.   string    ({alpha}|"/")({alpha}|{digit}|{special}|"/")*
  820.   %p 3000
  821.   %%
  822. ! [ \t\n]            ;
  823. ! ^#            {handlehash();}
  824.   "/*"            {skipcomments();}
  825.   adaptive        {return(tADAPTIVE);}
  826. + aperture        {return(tAPERTURE);}
  827.   background        {return(tBACKGROUND);}
  828.   blotch            {return(tBLOTCH);}
  829.   box            {return(tBOX);}
  830. ***************
  831. *** 55,60 ****
  832. --- 55,61 ----
  833.   eyep            {return(tEYEP);}
  834.   fbm            {return(tFBM);}
  835.   fbmbump            {return(tFBMBUMP);}
  836. + focaldist        {return(tFOCALDIST);}
  837.   fog            {return(tFOG);}
  838.   fov            {return(tFOV);}
  839.   grid            {return(tGRID);}
  840. ***************
  841. *** 111,115 ****
  842. --- 112,159 ----
  843.           if ((c = input()) == '/')
  844.               return;
  845.           unput(c);
  846. +     }
  847. + }
  848. + /*
  849. +  * Deal with ccp-produced lines of the form:
  850. +  * # n "filename"
  851. +  * and
  852. +  * # n
  853. +  * Where filename is the name of the file being processed, and n is
  854. +  * the current line number in that file.
  855. +  */
  856. + handlehash()
  857. + {
  858. +     char buf[BUFSIZ];
  859. +     int i;
  860. +     extern int yylineno;
  861. +     extern char yyfilename[];
  862. + 
  863. +     /*
  864. +      * Read the entire line into buf.
  865. +      */
  866. +     for (i = 0; (buf[i] = input()) != '\n'; i++)
  867. +             ;
  868. +     unput(buf[i]);        /* To make sure consecutive # lines work. */
  869. +     buf[i] = (char)NULL;    /* Replace newline with NULL. */
  870. + 
  871. +     /*
  872. +      * Complain if the line was not of the form #n "filename"
  873. +      */
  874. +     if ((i = sscanf(buf, "%d \"%[^\"]s\"", &yylineno, yyfilename)) == 0) {
  875. +         yyerror("Unknown '#' control.");
  876. +         exit(1);
  877. +     }
  878. +     if (i == 1) {
  879. + #ifdef SYSV
  880. +         if (strchr(buf, '"') != (char *)0) {
  881. + #else
  882. +         if (index(buf, '"') != (char *)0) {
  883. + #endif
  884. +             /*
  885. +              * Filename was "", which means stdin.
  886. +              */
  887. +             strcpy(yyfilename, "stdin");
  888. +         }
  889.       }
  890.   }
  891.  
  892. Index: src/input_yacc.y
  893. *** src/input_yacc.y.old    Thu Dec  7 23:20:17 1989
  894. --- src/input_yacc.y    Thu Dec  7 23:20:19 1989
  895. ***************
  896. *** 17,23 ****
  897.   /* name of the person performing the modification, the date of modification,*/
  898.   /* and the reason for such modification.                    */
  899.   /*                                        */
  900. ! /* $Id: input_yacc.y,v 3.0.1.3 89/11/20 13:05:33 craig Exp Locker: craig $ */
  901.   %{
  902.   #include <stdio.h>
  903.   #include "constants.h"
  904. --- 17,23 ----
  905.   /* name of the person performing the modification, the date of modification,*/
  906.   /* and the reason for such modification.                    */
  907.   /*                                        */
  908. ! /* $Id: input_yacc.y,v 3.0.1.6 89/12/07 22:55:53 craig Exp $ */
  909.   %{
  910.   #include <stdio.h>
  911.   #include "constants.h"
  912. ***************
  913. *** 26,33 ****
  914.   #include "texture.h"
  915.   #include "atmosphere.h"
  916.   
  917.   int Npoints=0, CurXSize, CurYSize, CurZSize;
  918. ! Object *LastObj = (Object *)0;
  919.   ObjList *CurObj, *ListTmp;
  920.   Surface *stmp;
  921.   Texture *CurText;
  922. --- 26,34 ----
  923.   #include "texture.h"
  924.   #include "atmosphere.h"
  925.   
  926. + char yyfilename[BUFSIZ];
  927.   int Npoints=0, CurXSize, CurYSize, CurZSize;
  928. ! Object    *LastObj = (Object *)0;
  929.   ObjList *CurObj, *ListTmp;
  930.   Surface *stmp;
  931.   Texture *CurText;
  932. ***************
  933. *** 40,46 ****
  934.   extern int ResolutionSet, ContrastSet, SamplesSet, CutoffSet;
  935.   extern int AdaptiveSet, JitteredSet;
  936.   extern double hfov, vfov, RedContrast, GreenContrast, BlueContrast;
  937. ! extern double TreeCutoff;
  938.   extern Vector eyep, lookp, up;
  939.   extern char outfilename[];
  940.   extern Color background;
  941. --- 41,47 ----
  942.   extern int ResolutionSet, ContrastSet, SamplesSet, CutoffSet;
  943.   extern int AdaptiveSet, JitteredSet;
  944.   extern double hfov, vfov, RedContrast, GreenContrast, BlueContrast;
  945. ! extern double TreeCutoff, aperture, focaldist;
  946.   extern Vector eyep, lookp, up;
  947.   extern char outfilename[];
  948.   extern Color background;
  949. ***************
  950. *** 60,67 ****
  951.   %token <i> tINT
  952.   %token <d> tFLOAT
  953.   %token <c> tSTRING
  954. ! %token tADAPTIVE tBACKGROUND tBLOTCH tBOX tBUMP tCONE tCYL tDIRECTIONAL
  955. ! %token tENDDEF tEXTENDED tEYEP tFBM tFBMBUMP tFOG tFOV tGRID
  956.   %token tHEIGHTFIELD tJITTERED tLIGHT tLIST tLOOKP tMARBLE tMAXDEPTH tMIST
  957.   %token tOBJECT tOUTFILE
  958.   %token tPLANE tPOINT tPOLY tROTATE tSAMPLES
  959. --- 61,69 ----
  960.   %token <i> tINT
  961.   %token <d> tFLOAT
  962.   %token <c> tSTRING
  963. ! %token tADAPTIVE tAPERTURE 
  964. ! %token tBACKGROUND tBLOTCH tBOX tBUMP tCONE tCYL tDIRECTIONAL
  965. ! %token tENDDEF tEXTENDED tEYEP tFBM tFBMBUMP tFOCALDIST tFOG tFOV tGRID
  966.   %token tHEIGHTFIELD tJITTERED tLIGHT tLIST tLOOKP tMARBLE tMAXDEPTH tMIST
  967.   %token tOBJECT tOUTFILE
  968.   %token tPLANE tPOINT tPOLY tROTATE tSAMPLES
  969. ***************
  970. *** 82,87 ****
  971. --- 84,91 ----
  972.           | Up
  973.           | Fov
  974.           | Screen
  975. +         | Aperture
  976. +         | Focaldist
  977.           | Maxdepth
  978.           | Samples
  979.           | Jittered
  980. ***************
  981. *** 198,205 ****
  982.                */
  983.               LastObj = (Object *)NULL;
  984.               if (CurObj->data->data == (char *)0) {
  985. !                 fprintf(stderr,"Warning: null object defined");
  986. !                 fprintf(stderr," (line %d)\n",yylineno);
  987.               } else {
  988.                   if (CurObj->data->type == GRID) {
  989.                       list2grid(CurObj->data, CurXSize,
  990. --- 202,209 ----
  991.                */
  992.               LastObj = (Object *)NULL;
  993.               if (CurObj->data->data == (char *)0) {
  994. !                 yywarning("Null object \"%s\" defined.\n",
  995. !                     CurObj->data->name);
  996.               } else {
  997.                   if (CurObj->data->type == GRID) {
  998.                       list2grid(CurObj->data, CurXSize,
  999. ***************
  1000. *** 471,476 ****
  1001. --- 475,490 ----
  1002.               }
  1003.           }
  1004.           ;
  1005. + Aperture    : tAPERTURE Fnumber
  1006. +         {
  1007. +             aperture = $2;
  1008. +         }
  1009. +         ;
  1010. + Focaldist    : tFOCALDIST Fnumber
  1011. +         {
  1012. +             focaldist = $2;
  1013. +         }
  1014. +         ;
  1015.   Maxdepth    : tMAXDEPTH tINT
  1016.           {
  1017.               maxlevel = $2;
  1018. ***************
  1019. *** 505,511 ****
  1020.   Lightdef    : tLIGHT Fnumber
  1021.           {
  1022.               if (nlight == LIGHTS)
  1023. !                 yyerror("Too many lights.");
  1024.               light[nlight].color.r = $2;
  1025.               light[nlight].color.g = $2;
  1026.               light[nlight].color.b = $2;
  1027. --- 519,525 ----
  1028.   Lightdef    : tLIGHT Fnumber
  1029.           {
  1030.               if (nlight == LIGHTS)
  1031. !                 yyerror("Too many lights.\n");
  1032.               light[nlight].color.r = $2;
  1033.               light[nlight].color.g = $2;
  1034.               light[nlight].color.b = $2;
  1035. ***************
  1036. *** 626,633 ****
  1037.   Outfile        : tOUTFILE String
  1038.           {
  1039.               if (*outfilename != (char)NULL)
  1040. !                 fprintf(stderr,"Ignoring output name \"%s\"\n",
  1041. !                     $2);
  1042.               else
  1043.                   strcpy(outfilename, $2);
  1044.           }
  1045. --- 640,647 ----
  1046.   Outfile        : tOUTFILE String
  1047.           {
  1048.               if (*outfilename != (char)NULL)
  1049. !                 yywarning("Ignoring output file name \"%s\".\n",
  1050. !                             $2);
  1051.               else
  1052.                   strcpy(outfilename, $2);
  1053.           }
  1054. ***************
  1055. *** 670,682 ****
  1056.   String        : tSTRING
  1057.           { $$ = $1;}
  1058.   %%
  1059. ! yyerror(s)
  1060. ! char *s;
  1061.   {
  1062. !     extern char tmpname[];
  1063. ! 
  1064. !     fprintf(stderr,"rayshade: line %d: %s\n", yylineno, s);
  1065. !     unlink(tmpname);
  1066. !     exit(2);
  1067.   }
  1068.   
  1069. --- 684,714 ----
  1070.   String        : tSTRING
  1071.           { $$ = $1;}
  1072.   %%
  1073. ! /*
  1074. !  * Issue error message containing filename and line number, and exit.
  1075. !  */
  1076. ! /*VARARGS1*/
  1077. ! yyerror(s, pat1, pat2)
  1078. ! char *s, *pat1, *pat2;
  1079.   {
  1080. !     RSmessage("Error", "%s, line %d: ", yyfilename, yylineno);
  1081. !     fprintf(stderr, s, pat1, pat2);
  1082. !     fprintf(stderr,"\n");    /* yacc doesn't use newlines on syntax errors */
  1083. !     exit(1);
  1084.   }
  1085.   
  1086. + /*
  1087. +  * Issue warning message containing filename and line number if not in
  1088. +  * Quiet mode.
  1089. +  */
  1090. + /*VARARGS1*/
  1091. + yywarning(s, pat1, pat2)
  1092. + char *s, *pat1, *pat2;
  1093. + {
  1094. +     extern int Quiet;
  1095. + 
  1096. +     if (!Quiet) {
  1097. +         RSmessage("Warning", "%s, line %d: ",yyfilename, yylineno);
  1098. +         fprintf(stderr, s, pat1, pat2);
  1099. +     }
  1100. + }
  1101.  
  1102. Index: src/main.c
  1103. *** src/main.c.old    Thu Dec  7 23:20:27 1989
  1104. --- src/main.c    Thu Dec  7 23:20:28 1989
  1105. ***************
  1106. *** 1,5 ****
  1107.   char rcsid[] =
  1108. !     "$Id: main.c,v 3.0.1.1 89/11/16 18:28:21 craig Exp Locker: craig $";
  1109.   /*
  1110.    * main.c
  1111.    *
  1112. --- 1,5 ----
  1113.   char rcsid[] =
  1114. !     "$Id: main.c,v 3.0.1.2 89/12/07 22:54:39 craig Exp $";
  1115.   /*
  1116.    * main.c
  1117.    *
  1118. ***************
  1119. *** 21,26 ****
  1120. --- 21,29 ----
  1121.    * and the reason for such modification.
  1122.    *
  1123.    * $Log:    main.c,v $
  1124. +  * Revision 3.0.1.2  89/12/07  22:54:39  craig
  1125. +  * patch2: Renamed utime and stime to avoid name clashes.
  1126. +  * 
  1127.    * Revision 3.0.1.1  89/11/16  18:28:21  craig
  1128.    * patch1: Statistics are now reported in Linda implementation.
  1129.    * 
  1130. ***************
  1131. *** 52,58 ****
  1132.           BVTests,    /* # of bounding volume tests. */
  1133.           SuperSampled;    /* # of supersampled pixels. */
  1134.   double        ftmp;        /* Used by fabs() macro. */
  1135. ! double        utime, stime;    /* user, system CPU time */
  1136.   FILE        *fstats;    /* Statistics file */
  1137.   
  1138.   /*
  1139. --- 55,61 ----
  1140.           BVTests,    /* # of bounding volume tests. */
  1141.           SuperSampled;    /* # of supersampled pixels. */
  1142.   double        ftmp;        /* Used by fabs() macro. */
  1143. ! double        Utime, Stime;    /* user, system CPU time */
  1144.   FILE        *fstats;    /* Statistics file */
  1145.   
  1146.   /*
  1147. ***************
  1148. *** 106,114 ****
  1149.       if (Verbose)
  1150.           fprintf(fstats,"Setting up voxels...\n");
  1151.       SetupWorld();
  1152. !     get_cpu_time(&utime, &stime);
  1153.       fprintf(fstats,"Preprocessing time:\t");
  1154. !     fprintf(fstats,"%2.2lfu  %2.2lfs\n",utime, stime);
  1155.       fprintf(fstats,"Starting trace.\n");
  1156.       fflush(fstats);
  1157.       /*
  1158. --- 109,117 ----
  1159.       if (Verbose)
  1160.           fprintf(fstats,"Setting up voxels...\n");
  1161.       SetupWorld();
  1162. !     get_cpu_time(&Utime, &Stime);
  1163.       fprintf(fstats,"Preprocessing time:\t");
  1164. !     fprintf(fstats,"%2.2lfu  %2.2lfs\n",Utime, Stime);
  1165.       fprintf(fstats,"Starting trace.\n");
  1166.       fflush(fstats);
  1167.       /*
  1168. ***************
  1169. *** 120,126 ****
  1170.        */
  1171.       endpic();
  1172.   #ifndef LINDA
  1173. !     get_cpu_time(&utime, &stime);
  1174.   #endif
  1175.   
  1176.       TotalRays = EyeRays + ShadowRays + ReflectRays + RefractRays;
  1177. --- 123,129 ----
  1178.        */
  1179.       endpic();
  1180.   #ifndef LINDA
  1181. !     get_cpu_time(&Utime, &Stime);
  1182.   #endif
  1183.   
  1184.       TotalRays = EyeRays + ShadowRays + ReflectRays + RefractRays;
  1185. ***************
  1186. *** 153,179 ****
  1187.   #else
  1188.       fprintf(fstats,"Total CPU time (sec):\t\t");
  1189.   #endif
  1190. !     fprintf(fstats,"%2.2lf (%2.2lfu + %2.2lfs)\n",utime+stime, utime, stime);
  1191.       if (TotalRays != 0.)
  1192.           fprintf(fstats,"Seconds / ray:\t\t\t%4.4lf\n",
  1193. !                 (utime + stime) / (double)TotalRays);
  1194.       if (HitRays != 0.)
  1195.           fprintf(fstats, "Seconds / intersecting ray:\t%4.4lf\n",
  1196. !                 (utime + stime) / (double)HitRays);
  1197.       PrintMemoryStats();
  1198.       exit(0);
  1199.   }
  1200.   
  1201.   #ifdef SYSV
  1202. ! get_cpu_time(utime, stime)
  1203. ! double *utime, *stime;
  1204.   {
  1205.       struct tms time;
  1206.       long times();
  1207.   
  1208.       (void)times(&time);
  1209. !     *utime = (double)time.tms_utime / (double)HZ;
  1210. !     *stime = (double)time.tms_stime / (double)HZ;
  1211.   }
  1212.   #else
  1213.   #ifdef AZTEC_C
  1214. --- 156,182 ----
  1215.   #else
  1216.       fprintf(fstats,"Total CPU time (sec):\t\t");
  1217.   #endif
  1218. !     fprintf(fstats,"%2.2lf (%2.2lfu + %2.2lfs)\n",Utime+Stime, Utime, Stime);
  1219.       if (TotalRays != 0.)
  1220.           fprintf(fstats,"Seconds / ray:\t\t\t%4.4lf\n",
  1221. !                 (Utime + Stime) / (double)TotalRays);
  1222.       if (HitRays != 0.)
  1223.           fprintf(fstats, "Seconds / intersecting ray:\t%4.4lf\n",
  1224. !                 (Utime + Stime) / (double)HitRays);
  1225.       PrintMemoryStats();
  1226.       exit(0);
  1227.   }
  1228.   
  1229.   #ifdef SYSV
  1230. ! get_cpu_time(usertime, systime)
  1231. ! double *usertime, *systime;
  1232.   {
  1233.       struct tms time;
  1234.       long times();
  1235.   
  1236.       (void)times(&time);
  1237. !     *usertime = (double)time.tms_utime / (double)HZ;
  1238. !     *systime = (double)time.tms_stime / (double)HZ;
  1239.   }
  1240.   #else
  1241.   #ifdef AZTEC_C
  1242. ***************
  1243. *** 181,196 ****
  1244.   {
  1245.   }
  1246.   #else    /* !SYSV && !AZTEC_C */
  1247. ! get_cpu_time(utime, stime)
  1248. ! double *utime, *stime;
  1249.   {
  1250.       struct rusage usage;
  1251.   
  1252.       getrusage(RUSAGE_SELF, &usage);
  1253.   
  1254. !     *utime = (double)usage.ru_utime.tv_sec +
  1255.               (double)usage.ru_utime.tv_usec / 1000000.;
  1256. !     *stime = (double)usage.ru_stime.tv_sec +
  1257.               (double)usage.ru_stime.tv_usec / 1000000.;
  1258.   }
  1259.   #endif
  1260. --- 184,199 ----
  1261.   {
  1262.   }
  1263.   #else    /* !SYSV && !AZTEC_C */
  1264. ! get_cpu_time(usertime, systime)
  1265. ! double *usertime, *systime;
  1266.   {
  1267.       struct rusage usage;
  1268.   
  1269.       getrusage(RUSAGE_SELF, &usage);
  1270.   
  1271. !     *usertime = (double)usage.ru_utime.tv_sec +
  1272.               (double)usage.ru_utime.tv_usec / 1000000.;
  1273. !     *systime = (double)usage.ru_stime.tv_sec +
  1274.               (double)usage.ru_stime.tv_usec / 1000000.;
  1275.   }
  1276.   #endif
  1277.  
  1278. Index: src/memory.c
  1279. *** src/memory.c.old    Thu Dec  7 23:20:32 1989
  1280. --- src/memory.c    Thu Dec  7 23:20:33 1989
  1281. ***************
  1282. *** 18,26 ****
  1283.    * name of the person performing the modification, the date of modification,
  1284.    * and the reason for such modification.
  1285.    *
  1286. !  * $Id: memory.c,v 3.0 89/10/27 02:05:56 craig Exp $
  1287.    *
  1288.    * $Log:    memory.c,v $
  1289.    * Revision 3.0  89/10/27  02:05:56  craig
  1290.    * Baseline for first official release.
  1291.    * 
  1292. --- 18,29 ----
  1293.    * name of the person performing the modification, the date of modification,
  1294.    * and the reason for such modification.
  1295.    *
  1296. !  * $Id: memory.c,v 3.0.1.1 89/12/06 16:33:59 craig Exp $
  1297.    *
  1298.    * $Log:    memory.c,v $
  1299. +  * Revision 3.0.1.1  89/12/06  16:33:59  craig
  1300. +  * patch2: Added calls to new error/warning routines.
  1301. +  * 
  1302.    * Revision 3.0  89/10/27  02:05:56  craig
  1303.    * Baseline for first official release.
  1304.    * 
  1305. ***************
  1306. *** 40,49 ****
  1307.       TotalAllocated += bytes;
  1308.   
  1309.       res = malloc(bytes);
  1310. !     if (res == (char *)0) {
  1311. !         fprintf(stderr,"Out of memory trying to allocate %d bytes.\n");
  1312. !         exit(0);
  1313. !     }
  1314.       return res;
  1315.   }
  1316.   
  1317. --- 43,50 ----
  1318.       TotalAllocated += bytes;
  1319.   
  1320.       res = malloc(bytes);
  1321. !     if (res == (char *)0)
  1322. !         RSerror("Out of memory trying to allocate %d bytes.\n",bytes);
  1323.       return res;
  1324.   }
  1325.   
  1326.  
  1327. Index: src/object.c
  1328. *** src/object.c.old    Thu Dec  7 23:20:38 1989
  1329. --- src/object.c    Thu Dec  7 23:20:39 1989
  1330. ***************
  1331. *** 18,26 ****
  1332.    * name of the person performing the modification, the date of modification,
  1333.    * and the reason for such modification.
  1334.    *
  1335. !  * $Id: object.c,v 3.0 89/10/27 02:05:58 craig Exp $
  1336.    *
  1337.    * $Log:    object.c,v $
  1338.    * Revision 3.0  89/10/27  02:05:58  craig
  1339.    * Baseline for first official release.
  1340.    * 
  1341. --- 18,29 ----
  1342.    * name of the person performing the modification, the date of modification,
  1343.    * and the reason for such modification.
  1344.    *
  1345. !  * $Id: object.c,v 3.0.1.1 89/12/06 16:33:20 craig Exp $
  1346.    *
  1347.    * $Log:    object.c,v $
  1348. +  * Revision 3.0.1.1  89/12/06  16:33:20  craig
  1349. +  * patch2: Added calls to new error/warning routines.
  1350. +  * 
  1351.    * Revision 3.0  89/10/27  02:05:58  craig
  1352.    * Baseline for first official release.
  1353.    * 
  1354. ***************
  1355. *** 83,92 ****
  1356.       int i;
  1357.   
  1358.       child = get_object_named(name);
  1359. !     if (child == (Object *)0) {
  1360. !         fprintf(stderr,"There is no object named \"%s\".\n",name);
  1361. !         exit(1);
  1362. !     }
  1363.       /*
  1364.        * Create new object that points to child
  1365.        * and add to 'parent' list.
  1366. --- 86,93 ----
  1367.       int i;
  1368.   
  1369.       child = get_object_named(name);
  1370. !     if (child == (Object *)0)
  1371. !         yyerror("There is no object named \"%s\".", name);
  1372.       /*
  1373.        * Create new object that points to child
  1374.        * and add to 'parent' list.
  1375.  
  1376. Index: src/outputp.c
  1377. *** src/outputp.c.old    Thu Dec  7 23:20:43 1989
  1378. --- src/outputp.c    Thu Dec  7 23:20:43 1989
  1379. ***************
  1380. *** 18,26 ****
  1381.    * name of the person performing the modification, the date of modification,
  1382.    * and the reason for such modification.
  1383.    *
  1384. !  * $Id: outputp.c,v 3.0 89/10/27 02:05:58 craig Exp $
  1385.    *
  1386.    * $Log:    outputp.c,v $
  1387.    * Revision 3.0  89/10/27  02:05:58  craig
  1388.    * Baseline for first official release.
  1389.    * 
  1390. --- 18,29 ----
  1391.    * name of the person performing the modification, the date of modification,
  1392.    * and the reason for such modification.
  1393.    *
  1394. !  * $Id: outputp.c,v 3.0.1.1 89/12/06 16:33:17 craig Exp $
  1395.    *
  1396.    * $Log:    outputp.c,v $
  1397. +  * Revision 3.0.1.1  89/12/06  16:33:17  craig
  1398. +  * patch2: Added calls to new error/warning routines.
  1399. +  * 
  1400.    * Revision 3.0  89/10/27  02:05:58  craig
  1401.    * Baseline for first official release.
  1402.    * 
  1403. ***************
  1404. *** 73,83 ****
  1405.               imgfile = fopen(outfilename, "r+");
  1406.           } else
  1407.               imgfile = fopen(outfilename, "w");
  1408. !         if (imgfile == (FILE *)NULL) {
  1409. !             fprintf(stderr,"Cannot open %s for writing.\n",
  1410. !                             outfilename);
  1411. !             exit(2);
  1412. !         }
  1413.       } else
  1414.           imgfile = stdout;
  1415.       sv_globals.svfb_fd = imgfile;
  1416. --- 76,83 ----
  1417.               imgfile = fopen(outfilename, "r+");
  1418.           } else
  1419.               imgfile = fopen(outfilename, "w");
  1420. !         if (imgfile == (FILE *)NULL)
  1421. !             yyerror("Cannot open %s for writing.", outfilename);
  1422.       } else
  1423.           imgfile = stdout;
  1424.       sv_globals.svfb_fd = imgfile;
  1425. ***************
  1426. *** 145,155 ****
  1427.               imgfile = fopen(outfilename, "a");
  1428.           else
  1429.               imgfile = fopen(outfilename, "w");
  1430. !         if (imgfile == (FILE *)NULL) {
  1431. !             fprintf(stderr,"Cannot open %s for writing.\n",
  1432. !                             outfilename);
  1433. !             exit(2);
  1434. !         }
  1435.       } else
  1436.           imgfile = stdout;
  1437.   
  1438. --- 145,152 ----
  1439.               imgfile = fopen(outfilename, "a");
  1440.           else
  1441.               imgfile = fopen(outfilename, "w");
  1442. !         if (imgfile == (FILE *)NULL)
  1443. !             RSerror("Cannot open %s for writing.", outfilename);
  1444.       } else
  1445.           imgfile = stdout;
  1446.   
  1447.  
  1448. Index: src/plane.c
  1449. *** src/plane.c.old    Thu Dec  7 23:20:47 1989
  1450. --- src/plane.c    Thu Dec  7 23:20:48 1989
  1451. ***************
  1452. *** 18,26 ****
  1453.    * name of the person performing the modification, the date of modification,
  1454.    * and the reason for such modification.
  1455.    *
  1456. !  * $Id: plane.c,v 3.0 89/10/27 02:05:59 craig Exp $
  1457.    *
  1458.    * $Log:    plane.c,v $
  1459.    * Revision 3.0  89/10/27  02:05:59  craig
  1460.    * Baseline for first official release.
  1461.    * 
  1462. --- 18,29 ----
  1463.    * name of the person performing the modification, the date of modification,
  1464.    * and the reason for such modification.
  1465.    *
  1466. !  * $Id: plane.c,v 3.0.1.1 89/12/06 16:34:03 craig Exp $
  1467.    *
  1468.    * $Log:    plane.c,v $
  1469. +  * Revision 3.0.1.1  89/12/06  16:34:03  craig
  1470. +  * patch2: Added calls to new error/warning routines.
  1471. +  * 
  1472.    * Revision 3.0  89/10/27  02:05:59  craig
  1473.    * Baseline for first official release.
  1474.    * 
  1475. ***************
  1476. *** 42,54 ****
  1477.       Vector tmpnrm;
  1478.       Object *newobj;
  1479.       Primitive *prim;
  1480. -     extern int Quiet, yylineno;
  1481.   
  1482.       tmpnrm = *norm;
  1483.       if (normalize(&tmpnrm) == 0.) {
  1484. !         if (!Quiet)
  1485. !             fprintf(stderr, "Degenerate plane normal (line %d)\n",
  1486. !                             yylineno);
  1487.           return (Object *)0;
  1488.       }
  1489.       prim = mallocprim();
  1490. --- 45,54 ----
  1491.       Vector tmpnrm;
  1492.       Object *newobj;
  1493.       Primitive *prim;
  1494.   
  1495.       tmpnrm = *norm;
  1496.       if (normalize(&tmpnrm) == 0.) {
  1497. !         yywarning("Degenerate plane normal.");
  1498.           return (Object *)0;
  1499.       }
  1500.       prim = mallocprim();
  1501.  
  1502. Index: Examples/planet.ray
  1503. *** Examples/planet.ray.old    Thu Dec  7 23:18:35 1989
  1504. --- Examples/planet.ray    Thu Dec  7 23:18:36 1989
  1505. ***************
  1506. *** 1,18 ****
  1507.   /*
  1508.    * Example rayshade input file describing a single texture-mapped sphere.
  1509.    *
  1510.    * C. Kolb 9/89
  1511.    */
  1512.   screen 256 256
  1513.   light 1.0 0.9 0.8 directional 1. -1. 1.
  1514.   eyep 0. -4. 0.
  1515. ! surface basesurf .16 .15 .14 .8 .75 .7 0 0 0 0 0 0 0
  1516.   sphere basesurf 1.0 0 0 0
  1517.       texture fbm     0.        /* offset */
  1518.               1.        /* scale */
  1519.               0.3        /* h */
  1520. !             2.0        /* lambda */
  1521. !             6        /* octaves */
  1522.               -.2        /* thresh */
  1523.               planet.map     /* mapname */
  1524. !         scale 0.7 0.7 0.7 
  1525. --- 1,44 ----
  1526.   /*
  1527.    * Example rayshade input file describing a single texture-mapped sphere.
  1528. +  * To use, feed to the C pre-processor, and then to rayshade.  Depending
  1529. +  * on your system type, this probably means doing something like:
  1530.    *
  1531. +  *        cpp thisfile | rayshade <options>
  1532. +  * or
  1533. +  *
  1534. +  *        cc -E thisfile | rayshade <options>
  1535. +  * 
  1536. +  * Note that using cpp means that, in addition to macros, you can use #include,
  1537. +  * #define, #ifdef, etc. in your input files.
  1538. +  *
  1539.    * C. Kolb 9/89
  1540. +  *
  1541. +  * $Id: planet.ray,v 3.0.1.2 89/12/06 17:06:49 craig Exp $
  1542. +  *
  1543. +  * $Log:    planet.ray,v $
  1544. +  * Revision 3.0.1.2  89/12/06  17:06:49  craig
  1545. +  * patch2: Changes to show use of cpp.
  1546. +  * 
  1547. +  * Revision 3.0.1.1  89/11/28  13:57:21  craig
  1548. +  * patch2: Decreased intensity of planet's ambient color.
  1549. +  * 
  1550.    */
  1551. + #define EXPAND(x)    scale x x x
  1552. + 
  1553. + #define BLACK        0 0 0
  1554. + #define LACUNARITY    2.
  1555. + #define OCTAVES        6
  1556. + 
  1557.   screen 256 256
  1558.   light 1.0 0.9 0.8 directional 1. -1. 1.
  1559.   eyep 0. -4. 0.
  1560. ! surface basesurf .06 .05 .04 .9 .85 .8 BLACK 0 0 0 0
  1561.   sphere basesurf 1.0 0 0 0
  1562.       texture fbm     0.        /* offset */
  1563.               1.        /* scale */
  1564.               0.3        /* h */
  1565. !             LACUNARITY    /* lambda */
  1566. !             OCTAVES        /* octaves */
  1567.               -.2        /* thresh */
  1568.               planet.map     /* mapname */
  1569. !         EXPAND(0.7)
  1570.  
  1571. Index: src/poly.c
  1572. *** src/poly.c.old    Thu Dec  7 23:20:52 1989
  1573. --- src/poly.c    Thu Dec  7 23:20:53 1989
  1574. ***************
  1575. *** 18,26 ****
  1576.    * name of the person performing the modification, the date of modification,
  1577.    * and the reason for such modification.
  1578.    *
  1579. !  * $Id: poly.c,v 3.0 89/10/27 02:05:59 craig Exp $
  1580.    *
  1581.    * $Log:    poly.c,v $
  1582.    * Revision 3.0  89/10/27  02:05:59  craig
  1583.    * Baseline for first official release.
  1584.    * 
  1585. --- 18,29 ----
  1586.    * name of the person performing the modification, the date of modification,
  1587.    * and the reason for such modification.
  1588.    *
  1589. !  * $Id: poly.c,v 3.0.1.1 89/12/06 16:33:38 craig Exp $
  1590.    *
  1591.    * $Log:    poly.c,v $
  1592. +  * Revision 3.0.1.1  89/12/06  16:33:38  craig
  1593. +  * patch2: Added calls to new error/warning routines.
  1594. +  * 
  1595.    * Revision 3.0  89/10/27  02:05:59  craig
  1596.    * Baseline for first official release.
  1597.    * 
  1598. ***************
  1599. *** 48,54 ****
  1600.       Vector edge1, edge2, anorm;
  1601.       PointList *cur;
  1602.       int i;
  1603. !     extern int yylineno, TrashBadPoly, Quiet;
  1604.   
  1605.       prim = mallocprim();
  1606.       prim->type = POLY;
  1607. --- 51,57 ----
  1608.       Vector edge1, edge2, anorm;
  1609.       PointList *cur;
  1610.       int i;
  1611. !     extern int TrashBadPoly;
  1612.   
  1613.       prim = mallocprim();
  1614.       prim->type = POLY;
  1615. ***************
  1616. *** 101,107 ****
  1617.            * then we didn't find a valid normal vector -- we
  1618.            * must have a degenerate polygon of some sort.
  1619.            */
  1620. !         fprintf(stderr,"Degenerate polygon (line %d).\n", yylineno);
  1621.           free((char *)poly->points);
  1622.           free((char *)poly);
  1623.           free((char *)prim);
  1624. --- 104,110 ----
  1625.            * then we didn't find a valid normal vector -- we
  1626.            * must have a degenerate polygon of some sort.
  1627.            */
  1628. !         yywarning("Degenerate polygon.\n");
  1629.           free((char *)poly->points);
  1630.           free((char *)poly);
  1631.           free((char *)prim);
  1632.  
  1633. Index: src/ray_options.c
  1634. *** src/ray_options.c.old    Thu Dec  7 23:20:57 1989
  1635. --- src/ray_options.c    Thu Dec  7 23:20:58 1989
  1636. ***************
  1637. *** 18,26 ****
  1638.    * name of the person performing the modification, the date of modification,
  1639.    * and the reason for such modification.
  1640.    *
  1641. !  * $Id: ray_options.c,v 3.0.1.2 89/11/20 13:02:22 craig Exp Locker: craig $
  1642.    *
  1643.    * $Log:    ray_options.c,v $
  1644.    * Revision 3.0.1.2  89/11/20  13:02:22  craig
  1645.    * patch1: Fixed problems involving overriding values on the command line.
  1646.    * 
  1647. --- 18,32 ----
  1648.    * name of the person performing the modification, the date of modification,
  1649.    * and the reason for such modification.
  1650.    *
  1651. !  * $Id: ray_options.c,v 3.0.1.4 89/12/06 16:33:55 craig Exp $
  1652.    *
  1653.    * $Log:    ray_options.c,v $
  1654. +  * Revision 3.0.1.4  89/12/06  16:33:55  craig
  1655. +  * patch2: Added calls to new error/warning routines.
  1656. +  * 
  1657. +  * Revision 3.0.1.3  89/12/02  16:42:16  craig
  1658. +  * patch2: Added -F option.
  1659. +  * 
  1660.    * Revision 3.0.1.2  89/11/20  13:02:22  craig
  1661.    * patch1: Fixed problems involving overriding values on the command line.
  1662.    * 
  1663. ***************
  1664. *** 63,68 ****
  1665. --- 69,75 ----
  1666.       extern double RedContrast, GreenContrast, BlueContrast, atof();
  1667.       extern int pixel_div, JitSamples, Xres, Yres, Jittered, Cache;
  1668.       extern int Stereo, StartLine, Appending, NoShadows, ClearShadows;
  1669. +     extern int ReportFreq;
  1670.       extern double Separation, TreeCutoff;
  1671.       extern char outfilename[];
  1672.       extern FILE *fstats;
  1673. ***************
  1674. *** 90,95 ****
  1675. --- 97,108 ----
  1676.                   Separation = atof(argv[1]);
  1677.                   argc--; argv++;
  1678.                   break;
  1679. +             case 'F':
  1680. +                 ReportFreq = atoi(argv[1]);
  1681. +                 if (ReportFreq < 1)
  1682. +                     ReportFreq = 1;
  1683. +                 argv++; argc--;
  1684. +                 break;
  1685.               case 'h':
  1686.                   usage();
  1687.                   exit(0);
  1688. ***************
  1689. *** 168,175 ****
  1690.                   }
  1691.                   fstats = fopen(argv[1], "w");
  1692.                   if (fstats == (FILE *)0) {
  1693. !                     fprintf(stderr,"Cannot write to stats file %s\n",argv[0]);
  1694. !                     exit(2);
  1695.                   }
  1696.                   argv++; argc--;
  1697.                   break;
  1698. --- 181,188 ----
  1699.                   }
  1700.                   fstats = fopen(argv[1], "w");
  1701.                   if (fstats == (FILE *)0) {
  1702. !                     RSerror("Cannot open stats file %s.\n",
  1703. !                             argv[0]);
  1704.                   }
  1705.                   argv++; argc--;
  1706.                   break;
  1707. ***************
  1708. *** 177,185 ****
  1709.               case 'W':
  1710.                   Workers = atoi(argv[1]);
  1711.                   if (Workers < 0 || Workers > 17) {
  1712. !                     fprintf(stderr,"%d workers?!?\n",
  1713. !                             Workers);
  1714. !                     exit(3);
  1715.                   }
  1716.                   argv++; argc--;
  1717.                   break;
  1718. --- 190,196 ----
  1719.               case 'W':
  1720.                   Workers = atoi(argv[1]);
  1721.                   if (Workers < 0 || Workers > 17) {
  1722. !                     RSerror("%d workers?\n",workers);
  1723.                   }
  1724.                   argv++; argc--;
  1725.                   break;
  1726. ***************
  1727. *** 188,196 ****
  1728.                   break;
  1729.   #endif
  1730.               default:
  1731. !                 fprintf(stderr,"Bad argument: \"%s\"\n",argv[0]);
  1732. !                 usage();
  1733. !                 exit(1);
  1734.           }
  1735.       }
  1736.   
  1737. --- 199,205 ----
  1738.                   break;
  1739.   #endif
  1740.               default:
  1741. !                 RSerror("Bad argument: %s\n", argv[0]);
  1742.           }
  1743.       }
  1744.   
  1745. ***************
  1746. *** 211,224 ****
  1747.        * entire input file is read).
  1748.        */
  1749.       if (Appending && *outfilename == (char)NULL) {
  1750. !         fprintf(stderr,"The -L option requires the -O option.\n");
  1751. !         exit(4);
  1752.       }
  1753.   
  1754.       if (Stereo && Separation == 0.) {
  1755. !         fprintf(stderr,"You must specify eye separation (-E) in order ");
  1756. !         fprintf(stderr,"to enable Stereo mode.\n");
  1757. !         exit(4);
  1758.       }
  1759.   }
  1760.   
  1761. --- 220,230 ----
  1762.        * entire input file is read).
  1763.        */
  1764.       if (Appending && *outfilename == (char)NULL) {
  1765. !         RSerror("The -L option requires the -O option.\n");
  1766.       }
  1767.   
  1768.       if (Stereo && Separation == 0.) {
  1769. !         RSerror("Stereo mode requires use of -E option.\n");
  1770.       }
  1771.   }
  1772.   
  1773. ***************
  1774. *** 229,234 ****
  1775. --- 235,241 ----
  1776.       fprintf(stderr,"\t-C r g b\t(Set contrast threshold (0. - 1.).)\n");
  1777.       fprintf(stderr,"\t-c \t\t(Trace shadow rays through clear objects.)\n");
  1778.       fprintf(stderr,"\t-E eye_sep\t(Set eye separation.)\n");
  1779. +     fprintf(stderr,"\t-F freq\t\t(Frequency, in lines, of status report.)\n");
  1780.       fprintf(stderr,"\t-h \t\t(Print this message.)\n");
  1781.       fprintf(stderr,"\t-j \t\t(Antialias using jittered sampling.)\n");
  1782.       fprintf(stderr,"\t-L line#\t(Begin rendering at specified line.)\n");
  1783. ***************
  1784. *** 247,251 ****
  1785. --- 254,259 ----
  1786.       fprintf(stderr,"\t-v \t\t(Verbose output.)\n");
  1787.   #ifdef LINDA
  1788.       fprintf(stderr,"\t-W workers (Specify number of worker processes.)\n");
  1789. +     fprintf(stderr,"\t-w \t\t(Verbose worker output.)\n");
  1790.   #endif
  1791.   }
  1792.  
  1793. Index: src/triangle.c
  1794. *** src/triangle.c.old    Thu Dec  7 23:21:47 1989
  1795. --- src/triangle.c    Thu Dec  7 23:21:48 1989
  1796. ***************
  1797. *** 18,26 ****
  1798.    * name of the person performing the modification, the date of modification,
  1799.    * and the reason for such modification.
  1800.    *
  1801. !  * $Id: triangle.c,v 3.0 89/10/27 02:06:07 craig Exp $
  1802.    *
  1803.    * $Log:    triangle.c,v $
  1804.    * Revision 3.0  89/10/27  02:06:07  craig
  1805.    * Baseline for first official release.
  1806.    * 
  1807. --- 18,29 ----
  1808.    * name of the person performing the modification, the date of modification,
  1809.    * and the reason for such modification.
  1810.    *
  1811. !  * $Id: triangle.c,v 3.0.1.1 89/12/06 16:33:32 craig Exp $
  1812.    *
  1813.    * $Log:    triangle.c,v $
  1814. +  * Revision 3.0.1.1  89/12/06  16:33:32  craig
  1815. +  * patch2: Added calls to new error/warning routines.
  1816. +  * 
  1817.    * Revision 3.0  89/10/27  02:06:07  craig
  1818.    * Baseline for first official release.
  1819.    * 
  1820. ***************
  1821. *** 47,53 ****
  1822.       Vector vc1, vc2, vc3, ptmp, anorm;
  1823.       Object *newobj;
  1824.       double indexval;
  1825. -     extern int yylineno, Quiet;
  1826.   
  1827.       prim = mallocprim();
  1828.       triangle = (Triangle *)Malloc(sizeof(Triangle));
  1829. --- 50,55 ----
  1830. ***************
  1831. *** 77,85 ****
  1832.       rawcrossp(&triangle->nrm, &vc1, &vc2);
  1833.       ptmp = triangle->nrm;
  1834.       if (normalize(&ptmp) == 0.) {
  1835. !         if (!Quiet)
  1836. !             fprintf(stderr,"Degenerate triangle (line %d).\n",
  1837. !                             yylineno);
  1838.           free((char *)prim);
  1839.           free((char *)triangle);
  1840.           free((char *)newobj);
  1841. --- 79,85 ----
  1842.       rawcrossp(&triangle->nrm, &vc1, &vc2);
  1843.       ptmp = triangle->nrm;
  1844.       if (normalize(&ptmp) == 0.) {
  1845. !         yywarning("Degenerate triangle.\n");
  1846.           free((char *)prim);
  1847.           free((char *)triangle);
  1848.           free((char *)newobj);
  1849.  
  1850. Index: doc/texture.ms
  1851. *** doc/texture.ms.old    Thu Dec  7 23:19:09 1989
  1852. --- doc/texture.ms    Thu Dec  7 23:19:09 1989
  1853. ***************
  1854. *** 2,10 ****
  1855.   .\" Brief tutorial on adding textures to rayshade.
  1856.   .\" Craig Kolb 10/89
  1857.   .\"
  1858. ! .\" $Id: texture.ms,v 3.0 89/10/23 16:42:57 craig Exp $
  1859.   .\"
  1860.   .\" $Log:    texture.ms,v $
  1861.   .\" Revision 3.0  89/10/23  16:42:57  craig
  1862.   .\" Baseline for first official release.
  1863.   .\" 
  1864. --- 2,14 ----
  1865.   .\" Brief tutorial on adding textures to rayshade.
  1866.   .\" Craig Kolb 10/89
  1867.   .\"
  1868. ! .\" $Id: texture.ms,v 3.0.1.1 89/11/27 18:49:26 craig Exp $
  1869.   .\"
  1870.   .\" $Log:    texture.ms,v $
  1871. + .\" Revision 3.0.1.1  89/11/27  18:49:26  craig
  1872. + .\" patch2: Example texture now uses colormap to scale ambient & diffuse
  1873. + .\" patch2: components of surface color.
  1874. + .\" 
  1875.   .\" Revision 3.0  89/10/23  16:42:57  craig
  1876.   .\" Baseline for first official release.
  1877.   .\" 
  1878. ***************
  1879. *** 99,107 ****
  1880.   texture will modify the diffuse component of a surface as a function of the
  1881.   Z component of the point of intersection.  If the name of a colormap
  1882.   is given, an index into
  1883. ! the colormap is used to a color to be used as the diffuse component the
  1884. ! surface.
  1885. ! Otherwise, the diffuse component of the surface is simply scaled.
  1886. ! To avoid strictly horizontal boundries
  1887.   between colors when using a colormap, we add a bit of "noise" to the
  1888.   Z component of the point of intersection.  The magnitude and nature of the
  1889. --- 103,111 ----
  1890.   texture will modify the diffuse component of a surface as a function of the
  1891.   Z component of the point of intersection.  If the name of a colormap
  1892.   is given, an index into
  1893. ! the colormap is computed and the corresponding color is used to scale
  1894. ! the ambient and diffuse components of the surface.
  1895. ! Otherwise, the ambient and diffuse components of the surface are simply scaled.
  1896. ! To avoid strictly horizontal boundaries
  1897.   between colors when using a colormap, we add a bit of "noise" to the
  1898.   Z component of the point of intersection.  The magnitude and nature of the
  1899. ***************
  1900. *** 317,329 ****
  1901.                           index = 255;
  1902.                   if (index < 0)
  1903.                           index = 0;
  1904. !                 surf->diff = text->colormap[index];
  1905.           } else {
  1906.                   /*
  1907.                    * If there's no colormap, simply scale the diffuse
  1908.                    * component. 
  1909.                    */
  1910. !                 surf->diff = ScaleColor(val, surf->diff);
  1911.           }
  1912.   }
  1913.   .D)
  1914. --- 321,339 ----
  1915.                           index = 255;
  1916.                   if (index < 0)
  1917.                           index = 0;
  1918. !                 surf->diff.r *= text->colormap[index].r;
  1919. !                 surf->diff.g *= text->colormap[index].g;
  1920. !                 surf->diff.b *= text->colormap[index].b;
  1921. !                 surf->amb.r *= text->colormap[index].r;
  1922. !                 surf->amb.g *= text->colormap[index].g;
  1923. !                 surf->amb.b *= text->colormap[index].b;
  1924.           } else {
  1925.                   /*
  1926.                    * If there's no colormap, simply scale the diffuse
  1927.                    * component. 
  1928.                    */
  1929. !                 ScaleColor(val, surf->diff, &surf->diff);
  1930. !         ScaleColor(val, surf->amb, &surf->amb);
  1931.           }
  1932.   }
  1933.   .D)
  1934.  
  1935.  
  1936.  
  1937.