home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / unix / volume21 / rayshade / patch1 < prev    next >
Encoding:
Internet Message Format  |  1990-03-21  |  54.9 KB
  1. Subject:  v21i016:  A ray tracing program, Patch1
  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 16
  8. Archive-name: rayshade/patch1
  9.  
  10. System: rayshade version 3.0
  11. Patch #: 1
  12. Priority: MEDIUM-HIGH
  13.  
  14. Description:
  15.     Fixed calculation of field of view in Stereo mode.
  16.  
  17.     When resolution/samples/etc. is set in the input file
  18.     more than once, the last occurrence takes precedence.
  19.  
  20.     Moved atmospheric declarations to atmosphere.h to facilitate
  21.     addition of new effects.
  22.  
  23.     Atmospheric effects are applied to background rays.
  24.  
  25.     Renamed several transformation routines to avoid name clashes
  26.     when linking with external libraries.
  27.  
  28.     Statistics are now reported in Linda implementation.
  29.  
  30.     Added -w option to enable verbose worker output.
  31.  
  32.     Linda syntax is more up-to-date.
  33.  
  34.  
  35. Fix:    From rn, say "| patch -p -N -d DIR", where DIR is your rayshade source
  36.     directory.  Outside of rn, say "cd DIR; patch -p -N <thisarticle".
  37.     If you don't have the patch program, apply the following by hand,
  38.     or get patch (version 2.0, latest patchlevel).
  39.  
  40.     After patching:
  41.         make depend
  42.         make
  43.         make install
  44.  
  45.     If patch indicates that patchlevel is the wrong version, you may need
  46.     to apply one or more previous patches, or the patch may already
  47.     have been applied.  See the patchlevel.h file to find out what has or
  48.     has not been applied.  In any event, don't continue with the patch.
  49.  
  50. Index: src/patchlevel.h
  51. Prereq: 0
  52. 1c1
  53. < #define PATCHLEVEL 0
  54. ---
  55. > #define PATCHLEVEL 1
  56.  
  57. Index: README
  58. *** README.old    Mon Nov 20 13:10:11 1989
  59. --- README    Mon Nov 20 13:10:12 1989
  60. ***************
  61. *** 41,47
  62.   for image manipulation and a library for reading/reading the toolkit's
  63.   "RLE" format image files.  UTAH.BLURB is the "blurb" file from the latest
  64.   distribution of the toolkit, which can be obtained via anonymous ftp from
  65. ! cs.utah.edu (128.110.4.21), weedeater.math.yale.edu (192.26.88.42),
  66.   nl.cs.cmu.edu (128.22.222.56), and uunet.uu.net.  Also of interest is the
  67.   "fbm" library, available from nl.cs.cmu.edu:/usr/mlm/ftp/fbm.tar.Z, which
  68.   provides tools for converting Utah Raster RLE format images to/from other
  69.  
  70. --- 41,47 -----
  71.   for image manipulation and a library for reading/reading the toolkit's
  72.   "RLE" format image files.  UTAH.BLURB is the "blurb" file from the latest
  73.   distribution of the toolkit, which can be obtained via anonymous ftp from
  74. ! cs.utah.edu (128.110.4.21), weedeater.math.yale.edu (130.132.23.17),
  75.   nl.cs.cmu.edu (128.22.222.56), and uunet.uu.net.  Also of interest is the
  76.   "fbm" library, available from nl.cs.cmu.edu:/usr/mlm/ftp/fbm.tar.Z, which
  77.   provides tools for converting Utah Raster RLE format images to/from other
  78.  
  79. Index: TODO
  80. *** TODO.old    Mon Nov 20 13:10:17 1989
  81. --- TODO    Mon Nov 20 13:10:18 1989
  82. ***************
  83. *** 28,32
  84.   we test objects roughly in order.
  85.   
  86.   Improve handling of input files (error messages, #include directives, etc.).
  87. - 
  88. - Have workers pass statistics back to the supervisor.
  89.  
  90. --- 28,30 -----
  91.   we test objects roughly in order.
  92.   
  93.   Improve handling of input files (error messages, #include directives, etc.).
  94.  
  95. Index: src/atmosphere.c
  96. *** src/atmosphere.c.old    Mon Nov 20 13:10:29 1989
  97. --- src/atmosphere.c    Mon Nov 20 13:10:31 1989
  98. ***************
  99. *** 18,24
  100.    * name of the person performing the modification, the date of modification,
  101.    * and the reason for such modification.
  102.    *
  103. !  * $Id: atmosphere.c,v 3.0 89/10/27 02:05:46 craig Exp $
  104.    *
  105.    * $Log:    atmosphere.c,v $
  106.    * Revision 3.0  89/10/27  02:05:46  craig
  107.  
  108. --- 18,24 -----
  109.    * name of the person performing the modification, the date of modification,
  110.    * and the reason for such modification.
  111.    *
  112. !  * $Id: atmosphere.c,v 3.0.1.1 89/11/16 20:38:39 craig Exp Locker: craig $
  113.    *
  114.    * $Log:    atmosphere.c,v $
  115.    * Revision 3.0.1.1  89/11/16  20:38:39  craig
  116. ***************
  117. *** 21,26
  118.    * $Id: atmosphere.c,v 3.0 89/10/27 02:05:46 craig Exp $
  119.    *
  120.    * $Log:    atmosphere.c,v $
  121.    * Revision 3.0  89/10/27  02:05:46  craig
  122.    * Baseline for first official release.
  123.    * 
  124.  
  125. --- 21,29 -----
  126.    * $Id: atmosphere.c,v 3.0.1.1 89/11/16 20:38:39 craig Exp Locker: craig $
  127.    *
  128.    * $Log:    atmosphere.c,v $
  129. +  * Revision 3.0.1.1  89/11/16  20:38:39  craig
  130. +  * patch1: Changes to accommodate atmosphere.h.
  131. +  * 
  132.    * Revision 3.0  89/10/27  02:05:46  craig
  133.    * Baseline for first official release.
  134.    * 
  135. ***************
  136. *** 30,35
  137.   #include "typedefs.h"
  138.   #include "constants.h"
  139.   #include "funcdefs.h"
  140.   
  141.   Fog *GlobalFog;
  142.   Mist *GlobalMist;
  143.  
  144. --- 33,39 -----
  145.   #include "typedefs.h"
  146.   #include "constants.h"
  147.   #include "funcdefs.h"
  148. + #include "atmosphere.h"
  149.   
  150.   Fog *GlobalFog;
  151.   Mist *GlobalMist;
  152.  
  153. Index: src/cone.c
  154. *** src/cone.c.old    Mon Nov 20 13:10:36 1989
  155. --- src/cone.c    Mon Nov 20 13:10:37 1989
  156. ***************
  157. *** 18,24
  158.    * name of the person performing the modification, the date of modification,
  159.    * and the reason for such modification.
  160.    *
  161. !  * $Id: cone.c,v 3.0 89/10/27 02:05:47 craig Exp $
  162.    *
  163.    * $Log:    cone.c,v $
  164.    * Revision 3.0  89/10/27  02:05:47  craig
  165.  
  166. --- 18,24 -----
  167.    * name of the person performing the modification, the date of modification,
  168.    * and the reason for such modification.
  169.    *
  170. !  * $Id: cone.c,v 3.0.1.1 89/11/18 14:08:09 craig Exp Locker: craig $
  171.    *
  172.    * $Log:    cone.c,v $
  173.    * Revision 3.0.1.1  89/11/18  14:08:09  craig
  174. ***************
  175. *** 21,26
  176.    * $Id: cone.c,v 3.0 89/10/27 02:05:47 craig Exp $
  177.    *
  178.    * $Log:    cone.c,v $
  179.    * Revision 3.0  89/10/27  02:05:47  craig
  180.    * Baseline for first official release.
  181.    * 
  182.  
  183. --- 21,29 -----
  184.    * $Id: cone.c,v 3.0.1.1 89/11/18 14:08:09 craig Exp Locker: craig $
  185.    *
  186.    * $Log:    cone.c,v $
  187. +  * Revision 3.0.1.1  89/11/18  14:08:09  craig
  188. +  * patch1: Changes to reflect new names of transformation routines.
  189. +  * 
  190.    * Revision 3.0  89/10/27  02:05:47  craig
  191.    * Baseline for first official release.
  192.    * 
  193. ***************
  194. *** 125,141
  195.       /*
  196.        * Calculate rotation matrix to map from world space to cone space.
  197.        */
  198. ! /*    if (equal(axis.z*axis.z, 1.)) {
  199. !         tmp.x = 0.;
  200. !         tmp.y = -axis.z;
  201. !         tmp.z = 0.;
  202. !     } else { */
  203. !         tmp.x = axis.y;
  204. !         tmp.y = -axis.x;
  205. !         tmp.z = 0.;
  206. !     /*} */
  207. !     rotate(trans, &tmp, acos(axis.z));
  208. !     translate(trans, &base);
  209.       cone->tantheta *= cone->tantheta;
  210.   
  211.       return newobj;
  212.  
  213. --- 128,138 -----
  214.       /*
  215.        * Calculate rotation matrix to map from world space to cone space.
  216.        */
  217. !     tmp.x = axis.y;
  218. !     tmp.y = -axis.x;
  219. !     tmp.z = 0.;
  220. !     RS_rotate(trans, &tmp, acos(axis.z));
  221. !     RS_translate(trans, &base);
  222.       cone->tantheta *= cone->tantheta;
  223.   
  224.       return newobj;
  225.  
  226. Index: src/cylinder.c
  227. *** src/cylinder.c.old    Mon Nov 20 13:10:42 1989
  228. --- src/cylinder.c    Mon Nov 20 13:10:43 1989
  229. ***************
  230. *** 18,24
  231.    * name of the person performing the modification, the date of modification,
  232.    * and the reason for such modification.
  233.    *
  234. !  * $Id: cylinder.c,v 3.0 89/10/27 02:05:48 craig Exp $
  235.    *
  236.    * $Log:    cylinder.c,v $
  237.    * Revision 3.0  89/10/27  02:05:48  craig
  238.  
  239. --- 18,24 -----
  240.    * name of the person performing the modification, the date of modification,
  241.    * and the reason for such modification.
  242.    *
  243. !  * $Id: cylinder.c,v 3.0.1.1 89/11/18 14:07:52 craig Exp Locker: craig $
  244.    *
  245.    * $Log:    cylinder.c,v $
  246.    * Revision 3.0.1.1  89/11/18  14:07:52  craig
  247. ***************
  248. *** 21,26
  249.    * $Id: cylinder.c,v 3.0 89/10/27 02:05:48 craig Exp $
  250.    *
  251.    * $Log:    cylinder.c,v $
  252.    * Revision 3.0  89/10/27  02:05:48  craig
  253.    * Baseline for first official release.
  254.    * 
  255.  
  256. --- 21,29 -----
  257.    * $Id: cylinder.c,v 3.0.1.1 89/11/18 14:07:52 craig Exp Locker: craig $
  258.    *
  259.    * $Log:    cylinder.c,v $
  260. +  * Revision 3.0.1.1  89/11/18  14:07:52  craig
  261. +  * patch1: Changes to reflect new names of transformation routines.
  262. +  * 
  263.    * Revision 3.0  89/10/27  02:05:48  craig
  264.    * Baseline for first official release.
  265.    * 
  266. ***************
  267. *** 81,88
  268.       dir.x = axis.y;
  269.       dir.y = -axis.x;
  270.       dir.z = 0.;
  271. !     rotate(trans, &dir, acos(axis.z));
  272. !     translate(trans, cent);
  273.   
  274.       return newobj;
  275.   }
  276.  
  277. --- 84,91 -----
  278.       dir.x = axis.y;
  279.       dir.y = -axis.x;
  280.       dir.z = 0.;
  281. !     RS_rotate(trans, &dir, acos(axis.z));
  282. !     RS_translate(trans, cent);
  283.   
  284.       return newobj;
  285.   }
  286.  
  287. Index: src/datatypes.h
  288. *** src/datatypes.h.old    Mon Nov 20 13:10:46 1989
  289. --- src/datatypes.h    Mon Nov 20 13:10:47 1989
  290. ***************
  291. *** 18,24
  292.    * name of the person performing the modification, the date of modification,
  293.    * and the reason for such modification.
  294.    *
  295. !  * $Id: datatypes.h,v 3.0 89/10/27 02:05:49 craig Exp $
  296.    *
  297.    * $Log:    datatypes.h,v $
  298.    * Revision 3.0  89/10/27  02:05:49  craig
  299.  
  300. --- 18,24 -----
  301.    * name of the person performing the modification, the date of modification,
  302.    * and the reason for such modification.
  303.    *
  304. !  * $Id: datatypes.h,v 3.0.1.1 89/11/16 20:41:39 craig Exp Locker: craig $
  305.    *
  306.    * $Log:    datatypes.h,v $
  307.    * Revision 3.0.1.1  89/11/16  20:41:39  craig
  308. ***************
  309. *** 21,26
  310.    * $Id: datatypes.h,v 3.0 89/10/27 02:05:49 craig Exp $
  311.    *
  312.    * $Log:    datatypes.h,v $
  313.    * Revision 3.0  89/10/27  02:05:49  craig
  314.    * Baseline for first official release.
  315.    * 
  316.  
  317. --- 21,29 -----
  318.    * $Id: datatypes.h,v 3.0.1.1 89/11/16 20:41:39 craig Exp Locker: craig $
  319.    *
  320.    * $Log:    datatypes.h,v $
  321. +  * Revision 3.0.1.1  89/11/16  20:41:39  craig
  322. +  * patch1: Moved atmospheric declarations to atmosphere.h.
  323. +  * 
  324.    * Revision 3.0  89/10/27  02:05:49  craig
  325.    * Baseline for first official release.
  326.    * 
  327. ***************
  328. *** 129,142
  329.       Trans *trans;        /* Transformation matrices. */
  330.       struct Texture *next;    /* Pointer to next texture. */
  331.   } Texture;
  332. - 
  333. - typedef struct {
  334. -     Color color;
  335. -     double trans;
  336. - } Fog;
  337. - 
  338. - typedef struct {
  339. -     Color color;        /* Mist color */
  340. -     Color trans;        /* R, G, B trans. */
  341. -     double scale, zero;    /* Height scale, start Z */
  342. - } Mist;
  343.  
  344. --- 132,134 -----
  345.       Trans *trans;        /* Transformation matrices. */
  346.       struct Texture *next;    /* Pointer to next texture. */
  347.   } Texture;
  348.  
  349. Index: src/hf.c
  350. *** src/hf.c.old    Mon Nov 20 13:10:52 1989
  351. --- src/hf.c    Mon Nov 20 13:10:53 1989
  352. ***************
  353. *** 18,24
  354.    * name of the person performing the modification, the date of modification,
  355.    * and the reason for such modification.
  356.    *
  357. !  * $Id: hf.c,v 3.0 89/10/27 02:05:51 craig Exp $
  358.    *
  359.    * $Log:    hf.c,v $
  360.    * Revision 3.0  89/10/27  02:05:51  craig
  361.  
  362. --- 18,24 -----
  363.    * name of the person performing the modification, the date of modification,
  364.    * and the reason for such modification.
  365.    *
  366. !  * $Id: hf.c,v 3.0.1.1 89/11/16 20:44:28 craig Exp Locker: craig $
  367.    *
  368.    * $Log:    hf.c,v $
  369.    * Revision 3.0.1.1  89/11/16  20:44:28  craig
  370. ***************
  371. *** 21,26
  372.    * $Id: hf.c,v 3.0 89/10/27 02:05:51 craig Exp $
  373.    *
  374.    * $Log:    hf.c,v $
  375.    * Revision 3.0  89/10/27  02:05:51  craig
  376.    * Baseline for first official release.
  377.    * 
  378.  
  379. --- 21,29 -----
  380.    * $Id: hf.c,v 3.0.1.1 89/11/16 20:44:28 craig Exp Locker: craig $
  381.    *
  382.    * $Log:    hf.c,v $
  383. +  * Revision 3.0.1.1  89/11/16  20:44:28  craig
  384. +  * patch1: Fixed typos in code comments.
  385. +  * 
  386.    * Revision 3.0  89/10/27  02:05:51  craig
  387.    * Baseline for first official release.
  388.    * 
  389. ***************
  390. *** 58,64
  391.    *      |  \   |
  392.    *      |   \  |
  393.    *    |    \ |
  394. !  *      |TRI2 \|    TRI2 == c-->a-->b-->d
  395.    *      b------c
  396.    */
  397.   #define TRI1            1
  398.  
  399. --- 61,67 -----
  400.    *      |  \   |
  401.    *      |   \  |
  402.    *    |    \ |
  403. !  *      |TRI2 \|    TRI2 == c-->a-->b-->c
  404.    *      b------c
  405.    */
  406.   #define TRI1            1
  407. ***************
  408. *** 229,236
  409.       } else
  410.           hitpos = *pos;
  411.       /*
  412. !      * Find out which cell "hitpoint" is in.  This could be
  413. !      * causing problems!
  414.        */
  415.       if (equal(hitpos.x, 1.))
  416.           hitpos.x -= EPSILON;
  417.  
  418. --- 232,238 -----
  419.       } else
  420.           hitpos = *pos;
  421.       /*
  422. !      * Find out in which cell "hitpoint" is.
  423.        */
  424.       if (equal(hitpos.x, 1.))
  425.           hitpos.x -= EPSILON;
  426.  
  427. Index: src/input_yacc.y
  428. *** src/input_yacc.y.old    Mon Nov 20 13:10:58 1989
  429. --- src/input_yacc.y    Mon Nov 20 13:10:59 1989
  430. ***************
  431. *** 17,23
  432.   /* name of the person performing the modification, the date of modification,*/
  433.   /* and the reason for such modification.                    */
  434.   /*                                        */
  435. ! /* $Id: input_yacc.y,v 3.0 89/10/27 02:05:53 craig Exp $ */
  436.   %{
  437.   #include <stdio.h>
  438.   #include "constants.h"
  439.  
  440. --- 17,23 -----
  441.   /* name of the person performing the modification, the date of modification,*/
  442.   /* and the reason for such modification.                    */
  443.   /*                                        */
  444. ! /* $Id: input_yacc.y,v 3.0.1.3 89/11/20 13:05:33 craig Exp Locker: craig $ */
  445.   %{
  446.   #include <stdio.h>
  447.   #include "constants.h"
  448. ***************
  449. *** 24,29
  450.   #include "typedefs.h"
  451.   #include "funcdefs.h"
  452.   #include "texture.h"
  453.   
  454.   int Npoints=0, CurXSize, CurYSize, CurZSize;
  455.   Object *LastObj = (Object *)0;
  456.  
  457. --- 24,30 -----
  458.   #include "typedefs.h"
  459.   #include "funcdefs.h"
  460.   #include "texture.h"
  461. + #include "atmosphere.h"
  462.   
  463.   int Npoints=0, CurXSize, CurYSize, CurZSize;
  464.   Object *LastObj = (Object *)0;
  465. ***************
  466. *** 36,41
  467.   extern Object *World;
  468.   extern int WorldXSize, WorldYSize, WorldZSize, nlight, Xres, Yres, maxlevel;
  469.   extern int yylineno, Jittered, JitSamples, pixel_div;
  470.   extern double hfov, vfov, RedContrast, GreenContrast, BlueContrast;
  471.   extern double TreeCutoff;
  472.   extern Vector eyep, lookp, up;
  473.  
  474. --- 37,44 -----
  475.   extern Object *World;
  476.   extern int WorldXSize, WorldYSize, WorldZSize, nlight, Xres, Yres, maxlevel;
  477.   extern int yylineno, Jittered, JitSamples, pixel_div;
  478. + extern int ResolutionSet, ContrastSet, SamplesSet, CutoffSet;
  479. + extern int AdaptiveSet, JitteredSet;
  480.   extern double hfov, vfov, RedContrast, GreenContrast, BlueContrast;
  481.   extern double TreeCutoff;
  482.   extern Vector eyep, lookp, up;
  483. ***************
  484. *** 354,360
  485.           {
  486.               if (CurTrans == (TransInfo *)0)
  487.                   CurTrans = new_transinfo();
  488. !             translate(CurTrans, &($2));
  489.           }
  490.           | tROTATE Vector Fnumber
  491.           {
  492.  
  493. --- 357,363 -----
  494.           {
  495.               if (CurTrans == (TransInfo *)0)
  496.                   CurTrans = new_transinfo();
  497. !             RS_translate(CurTrans, &($2));
  498.           }
  499.           | tROTATE Vector Fnumber
  500.           {
  501. ***************
  502. *** 361,367
  503.               if (CurTrans == (TransInfo *)0)
  504.                   CurTrans = new_transinfo();
  505.   
  506. !             rotate(CurTrans, &($2), deg2rad($3));
  507.           }
  508.           | tSCALE Fnumber Fnumber Fnumber
  509.           {
  510.  
  511. --- 364,370 -----
  512.               if (CurTrans == (TransInfo *)0)
  513.                   CurTrans = new_transinfo();
  514.   
  515. !             RS_rotate(CurTrans, &($2), deg2rad($3));
  516.           }
  517.           | tSCALE Fnumber Fnumber Fnumber
  518.           {
  519. ***************
  520. *** 367,373
  521.           {
  522.               if (CurTrans == (TransInfo *)0)
  523.                   CurTrans = new_transinfo();
  524. !             scale(CurTrans, $2, $3, $4);
  525.           }
  526.           | tTRANSFORM Fnumber Fnumber Fnumber
  527.                   Fnumber Fnumber Fnumber
  528.  
  529. --- 370,376 -----
  530.           {
  531.               if (CurTrans == (TransInfo *)0)
  532.                   CurTrans = new_transinfo();
  533. !             RS_scale(CurTrans, $2, $3, $4);
  534.           }
  535.           | tTRANSFORM Fnumber Fnumber Fnumber
  536.                   Fnumber Fnumber Fnumber
  537. ***************
  538. *** 422,428
  539.           ;
  540.   Samples        : tSAMPLES tINT
  541.           {
  542. !             if (JitSamples == UNSET)
  543.                   JitSamples = $2;
  544.           }
  545.           ;
  546.  
  547. --- 425,431 -----
  548.           ;
  549.   Samples        : tSAMPLES tINT
  550.           {
  551. !             if (!SamplesSet)
  552.                   JitSamples = $2;
  553.           }
  554.           ;
  555. ***************
  556. *** 428,434
  557.           ;
  558.   Adaptive    : tADAPTIVE tINT
  559.           {
  560. !             if (pixel_div == UNSET && !Jittered)
  561.                   pixel_div = $2;
  562.           }
  563.           ;
  564.  
  565. --- 431,437 -----
  566.           ;
  567.   Adaptive    : tADAPTIVE tINT
  568.           {
  569. !             if (!AdaptiveSet && !JitteredSet)
  570.                   pixel_div = $2;
  571.           }
  572.           ;
  573. ***************
  574. *** 434,442
  575.           ;
  576.   Contrast    : tCONTRAST Fnumber Fnumber Fnumber
  577.           {
  578. !             if (RedContrast == UNSET ||
  579. !                 GreenContrast == UNSET ||
  580. !                 BlueContrast == UNSET) {
  581.                   RedContrast = $2;
  582.                   GreenContrast = $3;
  583.                   BlueContrast = $4;
  584.  
  585. --- 437,443 -----
  586.           ;
  587.   Contrast    : tCONTRAST Fnumber Fnumber Fnumber
  588.           {
  589. !             if (!ContrastSet) {
  590.                   RedContrast = $2;
  591.                   GreenContrast = $3;
  592.                   BlueContrast = $4;
  593. ***************
  594. *** 445,451
  595.           ;
  596.   Cutoff        : tCUTOFF Fnumber
  597.           {
  598. !             if (TreeCutoff == UNSET)
  599.                   TreeCutoff = $2;
  600.           }
  601.           ;
  602.  
  603. --- 446,452 -----
  604.           ;
  605.   Cutoff        : tCUTOFF Fnumber
  606.           {
  607. !             if (!CutoffSet)
  608.                   TreeCutoff = $2;
  609.           }
  610.           ;
  611. ***************
  612. *** 451,457
  613.           ;
  614.   Jittered    : tJITTERED
  615.           {
  616. !             if (pixel_div == UNSET)
  617.                   Jittered = TRUE;
  618.           }
  619.           ;
  620.  
  621. --- 452,458 -----
  622.           ;
  623.   Jittered    : tJITTERED
  624.           {
  625. !             if (!AdaptiveSet)
  626.                   Jittered = TRUE;
  627.           }
  628.           ;
  629. ***************
  630. *** 457,463
  631.           ;
  632.   Screen        : tSCREEN tINT tINT
  633.           {
  634. !             if (Xres == UNSET || Yres == UNSET) {
  635.                   Xres = $2;
  636.                   Yres = $3;
  637.               }
  638.  
  639. --- 458,464 -----
  640.           ;
  641.   Screen        : tSCREEN tINT tINT
  642.           {
  643. !             if (!ResolutionSet) {
  644.                   Xres = $2;
  645.                   Yres = $3;
  646.               }
  647. ***************
  648. *** 464,470
  649.           }
  650.           | tRESOLUTION tINT tINT
  651.           {
  652. !             if (Xres == UNSET || Yres == UNSET) {
  653.                   Xres = $2;
  654.                   Yres = $3;
  655.               }
  656.  
  657. --- 465,471 -----
  658.           }
  659.           | tRESOLUTION tINT tINT
  660.           {
  661. !             if (!ResolutionSet) {
  662.                   Xres = $2;
  663.                   Yres = $3;
  664.               }
  665.  
  666. Index: src/main.c
  667. *** src/main.c.old    Mon Nov 20 13:11:04 1989
  668. --- src/main.c    Mon Nov 20 13:11:05 1989
  669. ***************
  670. *** 1,5
  671.   char rcsid[] =
  672. !     "$Id: main.c,v 3.0 89/10/27 17:05:45 craig Exp $";
  673.   /*
  674.    * main.c
  675.    *
  676.  
  677. --- 1,5 -----
  678.   char rcsid[] =
  679. !     "$Id: main.c,v 3.0.1.1 89/11/16 18:28:21 craig Exp Locker: craig $";
  680.   /*
  681.    * main.c
  682.    *
  683. ***************
  684. *** 21,26
  685.    * and the reason for such modification.
  686.    *
  687.    * $Log:    main.c,v $
  688.    * Revision 3.0  89/10/27  17:05:45  craig
  689.    * Baseline for first official release.
  690.    * 
  691.  
  692. --- 21,29 -----
  693.    * and the reason for such modification.
  694.    *
  695.    * $Log:    main.c,v $
  696. +  * Revision 3.0.1.1  89/11/16  18:28:21  craig
  697. +  * patch1: Statistics are now reported in Linda implementation.
  698. +  * 
  699.    * Revision 3.0  89/10/27  17:05:45  craig
  700.    * Baseline for first official release.
  701.    * 
  702. ***************
  703. *** 49,54
  704.           BVTests,    /* # of bounding volume tests. */
  705.           SuperSampled;    /* # of supersampled pixels. */
  706.   double        ftmp;        /* Used by fabs() macro. */
  707.   FILE        *fstats;    /* Statistics file */
  708.   
  709.   /*
  710.  
  711. --- 52,58 -----
  712.           BVTests,    /* # of bounding volume tests. */
  713.           SuperSampled;    /* # of supersampled pixels. */
  714.   double        ftmp;        /* Used by fabs() macro. */
  715. + double        utime, stime;    /* user, system CPU time */
  716.   FILE        *fstats;    /* Statistics file */
  717.   
  718.   /*
  719. ***************
  720. *** 62,68
  721.   int argc;
  722.   char **argv;
  723.   {
  724. -     double utime, stime;
  725.       unsigned long TotalRays;
  726.       extern int Verbose, Cache;
  727.       extern unsigned long CacheWorked, CacheFailed, ShadowHits;
  728.  
  729. --- 66,71 -----
  730.   int argc;
  731.   char **argv;
  732.   {
  733.       unsigned long TotalRays;
  734.       extern int Verbose, Cache, Workers, Jittered;
  735.       extern unsigned long CacheWorked, CacheFailed, ShadowHits;
  736. ***************
  737. *** 64,70
  738.   {
  739.       double utime, stime;
  740.       unsigned long TotalRays;
  741. !     extern int Verbose, Cache;
  742.       extern unsigned long CacheWorked, CacheFailed, ShadowHits;
  743.   
  744.       /*
  745.  
  746. --- 67,73 -----
  747.   char **argv;
  748.   {
  749.       unsigned long TotalRays;
  750. !     extern int Verbose, Cache, Workers, Jittered;
  751.       extern unsigned long CacheWorked, CacheFailed, ShadowHits;
  752.   
  753.       /*
  754. ***************
  755. *** 116,122
  756.        * Close the image file.
  757.        */
  758.       endpic();
  759. ! 
  760.       get_cpu_time(&utime, &stime);
  761.   
  762.   #ifndef LINDA
  763.  
  764. --- 119,125 -----
  765.        * Close the image file.
  766.        */
  767.       endpic();
  768. ! #ifndef LINDA
  769.       get_cpu_time(&utime, &stime);
  770.   #endif
  771.   
  772. ***************
  773. *** 118,123
  774.       endpic();
  775.   
  776.       get_cpu_time(&utime, &stime);
  777.   
  778.   #ifndef LINDA
  779.       TotalRays = EyeRays + ShadowRays + ReflectRays + RefractRays;
  780.  
  781. --- 121,127 -----
  782.       endpic();
  783.   #ifndef LINDA
  784.       get_cpu_time(&utime, &stime);
  785. + #endif
  786.   
  787.       TotalRays = EyeRays + ShadowRays + ReflectRays + RefractRays;
  788.       ShadowHits += CacheWorked;
  789. ***************
  790. *** 119,125
  791.   
  792.       get_cpu_time(&utime, &stime);
  793.   
  794. - #ifndef LINDA
  795.       TotalRays = EyeRays + ShadowRays + ReflectRays + RefractRays;
  796.       ShadowHits += CacheWorked;
  797.       HitRays += ShadowHits;
  798.  
  799. --- 123,128 -----
  800.       get_cpu_time(&utime, &stime);
  801.   #endif
  802.   
  803.       TotalRays = EyeRays + ShadowRays + ReflectRays + RefractRays;
  804.       ShadowHits += CacheWorked;
  805.       HitRays += ShadowHits;
  806. ***************
  807. *** 123,128
  808.       TotalRays = EyeRays + ShadowRays + ReflectRays + RefractRays;
  809.       ShadowHits += CacheWorked;
  810.       HitRays += ShadowHits;
  811.       fprintf(fstats,"Eye rays:\t\t\t%ld\n", EyeRays);
  812.       fprintf(fstats,"Shadow rays:\t\t\t%ld\n",ShadowRays);
  813.       fprintf(fstats,"Reflected rays:\t\t\t%ld\n",ReflectRays);
  814.  
  815. --- 126,134 -----
  816.       TotalRays = EyeRays + ShadowRays + ReflectRays + RefractRays;
  817.       ShadowHits += CacheWorked;
  818.       HitRays += ShadowHits;
  819. + #ifdef LINDA
  820. +     fprintf(fstats,"Workers:\t\t\t%d\n",Workers);
  821. + #endif
  822.       fprintf(fstats,"Eye rays:\t\t\t%ld\n", EyeRays);
  823.       fprintf(fstats,"Shadow rays:\t\t\t%ld\n",ShadowRays);
  824.       fprintf(fstats,"Reflected rays:\t\t\t%ld\n",ReflectRays);
  825. ***************
  826. *** 138,144
  827.           fprintf(fstats,"Total shadow hits:\t\t%ld (%3.3f%%)\n",
  828.               ShadowHits, 100.*(float)ShadowHits / (float)ShadowRays);
  829.       }
  830. !     fprintf(fstats,"Supersampled pixels:\t\t%ld\n",SuperSampled);
  831.       fprintf(fstats,"B.V. intersection tests:\t%ld\n", BVTests);
  832.       print_prim_stats();
  833.   #endif
  834.  
  835. --- 144,151 -----
  836.           fprintf(fstats,"Total shadow hits:\t\t%ld (%3.3f%%)\n",
  837.               ShadowHits, 100.*(float)ShadowHits / (float)ShadowRays);
  838.       }
  839. !     if (!Jittered)
  840. !         fprintf(fstats,"Supersampled pixels:\t\t%ld\n",SuperSampled);
  841.       fprintf(fstats,"B.V. intersection tests:\t%ld\n", BVTests);
  842.       print_prim_stats();
  843.   #ifdef LINDA
  844. ***************
  845. *** 141,147
  846.       fprintf(fstats,"Supersampled pixels:\t\t%ld\n",SuperSampled);
  847.       fprintf(fstats,"B.V. intersection tests:\t%ld\n", BVTests);
  848.       print_prim_stats();
  849. ! #endif
  850.       fprintf(fstats,"Total CPU time (sec):\t\t");
  851.       fprintf(fstats,"%2.2lf (%2.2lfu + %2.2lfs)\n",utime+stime, utime, stime);
  852.   #ifndef LINDA
  853.  
  854. --- 148,156 -----
  855.           fprintf(fstats,"Supersampled pixels:\t\t%ld\n",SuperSampled);
  856.       fprintf(fstats,"B.V. intersection tests:\t%ld\n", BVTests);
  857.       print_prim_stats();
  858. ! #ifdef LINDA
  859. !     fprintf(fstats,"Average CPU time/processor:\t");
  860. ! #else
  861.       fprintf(fstats,"Total CPU time (sec):\t\t");
  862.   #endif
  863.       fprintf(fstats,"%2.2lf (%2.2lfu + %2.2lfs)\n",utime+stime, utime, stime);
  864. ***************
  865. *** 143,148
  866.       print_prim_stats();
  867.   #endif
  868.       fprintf(fstats,"Total CPU time (sec):\t\t");
  869.       fprintf(fstats,"%2.2lf (%2.2lfu + %2.2lfs)\n",utime+stime, utime, stime);
  870.   #ifndef LINDA
  871.       if (TotalRays != 0.)
  872.  
  873. --- 152,158 -----
  874.       fprintf(fstats,"Average CPU time/processor:\t");
  875.   #else
  876.       fprintf(fstats,"Total CPU time (sec):\t\t");
  877. + #endif
  878.       fprintf(fstats,"%2.2lf (%2.2lfu + %2.2lfs)\n",utime+stime, utime, stime);
  879.       if (TotalRays != 0.)
  880.           fprintf(fstats,"Seconds / ray:\t\t\t%4.4lf\n",
  881. ***************
  882. *** 144,150
  883.   #endif
  884.       fprintf(fstats,"Total CPU time (sec):\t\t");
  885.       fprintf(fstats,"%2.2lf (%2.2lfu + %2.2lfs)\n",utime+stime, utime, stime);
  886. - #ifndef LINDA
  887.       if (TotalRays != 0.)
  888.           fprintf(fstats,"Seconds / ray:\t\t\t%4.4lf\n",
  889.                   (utime + stime) / (double)TotalRays);
  890.  
  891. --- 154,159 -----
  892.       fprintf(fstats,"Total CPU time (sec):\t\t");
  893.   #endif
  894.       fprintf(fstats,"%2.2lf (%2.2lfu + %2.2lfs)\n",utime+stime, utime, stime);
  895.       if (TotalRays != 0.)
  896.           fprintf(fstats,"Seconds / ray:\t\t\t%4.4lf\n",
  897.                   (utime + stime) / (double)TotalRays);
  898. ***************
  899. *** 151,157
  900.       if (HitRays != 0.)
  901.           fprintf(fstats, "Seconds / intersecting ray:\t%4.4lf\n",
  902.                   (utime + stime) / (double)HitRays);
  903. - #endif
  904.       PrintMemoryStats();
  905.       exit(0);
  906.   }
  907.  
  908. --- 160,165 -----
  909.       if (HitRays != 0.)
  910.           fprintf(fstats, "Seconds / intersecting ray:\t%4.4lf\n",
  911.                   (utime + stime) / (double)HitRays);
  912.       PrintMemoryStats();
  913.       exit(0);
  914.   }
  915.  
  916. Index: src/matrix.c
  917. *** src/matrix.c.old    Mon Nov 20 13:11:10 1989
  918. --- src/matrix.c    Mon Nov 20 13:11:11 1989
  919. ***************
  920. *** 18,24
  921.    * name of the person performing the modification, the date of modification,
  922.    * and the reason for such modification.
  923.    *
  924. !  * $Id: matrix.c,v 3.0 89/10/27 02:05:56 craig Exp $
  925.    *
  926.    * $Log:    matrix.c,v $
  927.    * Revision 3.0  89/10/27  02:05:56  craig
  928.  
  929. --- 18,24 -----
  930.    * name of the person performing the modification, the date of modification,
  931.    * and the reason for such modification.
  932.    *
  933. !  * $Id: matrix.c,v 3.0.1.1 89/11/18 14:05:11 craig Exp Locker: craig $
  934.    *
  935.    * $Log:    matrix.c,v $
  936.    * Revision 3.0.1.1  89/11/18  14:05:11  craig
  937. ***************
  938. *** 21,26
  939.    * $Id: matrix.c,v 3.0 89/10/27 02:05:56 craig Exp $
  940.    *
  941.    * $Log:    matrix.c,v $
  942.    * Revision 3.0  89/10/27  02:05:56  craig
  943.    * Baseline for first official release.
  944.    * 
  945.  
  946. --- 21,30 -----
  947.    * $Id: matrix.c,v 3.0.1.1 89/11/18 14:05:11 craig Exp Locker: craig $
  948.    *
  949.    * $Log:    matrix.c,v $
  950. +  * Revision 3.0.1.1  89/11/18  14:05:11  craig
  951. +  * patch1: Renamed rotate(), translate() and scale() to avoid problems
  952. +  * patch1: with external libraries.
  953. +  * 
  954.    * Revision 3.0  89/10/27  02:05:56  craig
  955.    * Baseline for first official release.
  956.    * 
  957. ***************
  958. *** 100,106
  959.   /*
  960.    * Apply translation by (vec) to trans.
  961.    */
  962. ! translate(trans, vec)
  963.   TransInfo *trans;
  964.   Vector *vec;
  965.   {
  966.  
  967. --- 104,110 -----
  968.   /*
  969.    * Apply translation by (vec) to trans.
  970.    */
  971. ! RS_translate(trans, vec)
  972.   TransInfo *trans;
  973.   Vector *vec;
  974.   {
  975. ***************
  976. *** 112,118
  977.   /*
  978.    * Apply rotation about (dir) to matrix.
  979.    */
  980. ! rotate(trans, dir, radians)
  981.   TransInfo *trans;
  982.   double radians;
  983.   Vector *dir;
  984.  
  985. --- 116,122 -----
  986.   /*
  987.    * Apply rotation about (dir) to matrix.
  988.    */
  989. ! RS_rotate(trans, dir, radians)
  990.   TransInfo *trans;
  991.   double radians;
  992.   Vector *dir;
  993. ***************
  994. *** 126,132
  995.   /*
  996.    * Apply scale of (x, y, z) to trans.
  997.    */
  998. ! scale(trans, x, y, z)
  999.   TransInfo *trans;
  1000.   double x, y, z;
  1001.   {
  1002.  
  1003. --- 130,136 -----
  1004.   /*
  1005.    * Apply scale of (x, y, z) to trans.
  1006.    */
  1007. ! RS_scale(trans, x, y, z)
  1008.   TransInfo *trans;
  1009.   double x, y, z;
  1010.   {
  1011.  
  1012. Index: src/ray_options.c
  1013. *** src/ray_options.c.old    Mon Nov 20 13:11:22 1989
  1014. --- src/ray_options.c    Mon Nov 20 13:11:23 1989
  1015. ***************
  1016. *** 18,24
  1017.    * name of the person performing the modification, the date of modification,
  1018.    * and the reason for such modification.
  1019.    *
  1020. !  * $Id: ray_options.c,v 3.0 89/10/27 02:06:00 craig Exp $
  1021.    *
  1022.    * $Log:    ray_options.c,v $
  1023.    * Revision 3.0  89/10/27  02:06:00  craig
  1024.  
  1025. --- 18,24 -----
  1026.    * name of the person performing the modification, the date of modification,
  1027.    * and the reason for such modification.
  1028.    *
  1029. !  * $Id: ray_options.c,v 3.0.1.2 89/11/20 13:02:22 craig Exp Locker: craig $
  1030.    *
  1031.    * $Log:    ray_options.c,v $
  1032.    * Revision 3.0.1.2  89/11/20  13:02:22  craig
  1033. ***************
  1034. *** 21,26
  1035.    * $Id: ray_options.c,v 3.0 89/10/27 02:06:00 craig Exp $
  1036.    *
  1037.    * $Log:    ray_options.c,v $
  1038.    * Revision 3.0  89/10/27  02:06:00  craig
  1039.    * Baseline for first official release.
  1040.    * 
  1041.  
  1042. --- 21,32 -----
  1043.    * $Id: ray_options.c,v 3.0.1.2 89/11/20 13:02:22 craig Exp Locker: craig $
  1044.    *
  1045.    * $Log:    ray_options.c,v $
  1046. +  * Revision 3.0.1.2  89/11/20  13:02:22  craig
  1047. +  * patch1: Fixed problems involving overriding values on the command line.
  1048. +  * 
  1049. +  * Revision 3.0.1.1  89/11/16  18:28:38  craig
  1050. +  * patch1: Added -w option.
  1051. +  * 
  1052.    * Revision 3.0  89/10/27  02:06:00  craig
  1053.    * Baseline for first official release.
  1054.    * 
  1055. ***************
  1056. *** 39,44
  1057.   int Quiet;            /* Don't be so verbose flag */
  1058.   char *progname;            /* argv[0] */
  1059.   
  1060.   #ifdef LINDA
  1061.   int Workers;            /* # of workers */
  1062.   #endif
  1063.  
  1064. --- 45,55 -----
  1065.   int Quiet;            /* Don't be so verbose flag */
  1066.   char *progname;            /* argv[0] */
  1067.   
  1068. + /*
  1069. +  * Flags indicating that options were set on the command line.
  1070. +  */
  1071. + int ResolutionSet, ContrastSet, SamplesSet, CutoffSet, AdaptiveSet, JitteredSet;
  1072. + 
  1073.   #ifdef LINDA
  1074.   int Workers;            /* # of workers */
  1075.   int VerboseWorker;
  1076. ***************
  1077. *** 41,46
  1078.   
  1079.   #ifdef LINDA
  1080.   int Workers;            /* # of workers */
  1081.   #endif
  1082.   
  1083.   parse_options(argc, argv)
  1084.  
  1085. --- 52,58 -----
  1086.   
  1087.   #ifdef LINDA
  1088.   int Workers;            /* # of workers */
  1089. + int VerboseWorker;
  1090.   #endif
  1091.   
  1092.   parse_options(argc, argv)
  1093. ***************
  1094. *** 67,72
  1095.                   RedContrast = atof(argv[1]);
  1096.                   GreenContrast = atof(argv[2]);
  1097.                   BlueContrast = atof(argv[3]);
  1098.                   argv += 3;
  1099.                   argc -= 3;
  1100.                   break;
  1101.  
  1102. --- 79,85 -----
  1103.                   RedContrast = atof(argv[1]);
  1104.                   GreenContrast = atof(argv[2]);
  1105.                   BlueContrast = atof(argv[3]);
  1106. +                 ContrastSet = TRUE;
  1107.                   argv += 3;
  1108.                   argc -= 3;
  1109.                   break;
  1110. ***************
  1111. *** 83,88
  1112.                   break;
  1113.               case 'j':
  1114.                   Jittered = TRUE;
  1115.                   break;
  1116.               case 'L':
  1117.                   StartLine = atoi(argv[1]);
  1118.  
  1119. --- 96,102 -----
  1120.                   break;
  1121.               case 'j':
  1122.                   Jittered = TRUE;
  1123. +                 JitteredSet = TRUE;
  1124.                   break;
  1125.               case 'L':
  1126.                   StartLine = atoi(argv[1]);
  1127. ***************
  1128. *** 104,109
  1129.                   pixel_div = atoi(argv[1]);
  1130.                   if(pixel_div < 0)
  1131.                       pixel_div = 0;
  1132.                   argv++;
  1133.                   argc--;
  1134.                   break;
  1135.  
  1136. --- 118,124 -----
  1137.                   pixel_div = atoi(argv[1]);
  1138.                   if(pixel_div < 0)
  1139.                       pixel_div = 0;
  1140. +                 AdaptiveSet = TRUE;
  1141.                   argv++;
  1142.                   argc--;
  1143.                   break;
  1144. ***************
  1145. *** 116,121
  1146.               case 'R':
  1147.                   Xres = atoi(argv[1]);
  1148.                   Yres = atoi(argv[2]);
  1149.                   argv += 2;
  1150.                   argc -= 2;
  1151.                   break;
  1152.  
  1153. --- 131,137 -----
  1154.               case 'R':
  1155.                   Xres = atoi(argv[1]);
  1156.                   Yres = atoi(argv[2]);
  1157. +                 ResolutionSet = TRUE;
  1158.                   argv += 2;
  1159.                   argc -= 2;
  1160.                   break;
  1161. ***************
  1162. *** 126,131
  1163.                   JitSamples = atoi(argv[1]);
  1164.                   if (JitSamples < 1)
  1165.                       JitSamples = 1;
  1166.                   argv++; argc--;
  1167.                   break;
  1168.               case 's':
  1169.  
  1170. --- 142,148 -----
  1171.                   JitSamples = atoi(argv[1]);
  1172.                   if (JitSamples < 1)
  1173.                       JitSamples = 1;
  1174. +                 SamplesSet = TRUE;
  1175.                   argv++; argc--;
  1176.                   break;
  1177.               case 's':
  1178. ***************
  1179. *** 133,138
  1180.                   break;
  1181.               case 'T':
  1182.                   TreeCutoff = atof(argv[1]);
  1183.                   argv++; argc--;
  1184.                   break;
  1185.               case 'v':
  1186.  
  1187. --- 150,156 -----
  1188.                   break;
  1189.               case 'T':
  1190.                   TreeCutoff = atof(argv[1]);
  1191. +                 CutoffSet = TRUE;
  1192.                   argv++; argc--;
  1193.                   break;
  1194.               case 'v':
  1195. ***************
  1196. *** 164,169
  1197.                       exit(3);
  1198.                   }
  1199.                   argv++; argc--;
  1200.                   break;
  1201.   #endif
  1202.               default:
  1203.  
  1204. --- 182,190 -----
  1205.                       exit(3);
  1206.                   }
  1207.                   argv++; argc--;
  1208. +                 break;
  1209. +             case 'w':
  1210. +                 VerboseWorker = !VerboseWorker;
  1211.                   break;
  1212.   #endif
  1213.               default:
  1214.  
  1215. Index: doc/rayshade.1
  1216. *** doc/rayshade.1.old    Mon Nov 20 13:10:22 1989
  1217. --- doc/rayshade.1    Mon Nov 20 13:10:24 1989
  1218. ***************
  1219. *** 1,6
  1220.   .\" Manual page for rayshade, 'troff -man' format.
  1221.   .\"
  1222. ! .\" $Id: rayshade.1,v 3.0 89/10/27 16:55:22 craig Exp $
  1223.   .\"
  1224.   .\" $Log:    rayshade.1,v $
  1225.   .\" Revision 3.0  89/10/27  16:55:22  craig
  1226.  
  1227. --- 1,6 -----
  1228.   .\" Manual page for rayshade, 'troff -man' format.
  1229.   .\"
  1230. ! .\" $Id: rayshade.1,v 3.0.1.1 89/11/17 16:57:19 craig Exp Locker: craig $
  1231.   .\"
  1232.   .\" $Log:    rayshade.1,v $
  1233.   .\" Revision 3.0.1.1  89/11/17  16:57:19  craig
  1234. ***************
  1235. *** 3,8
  1236.   .\" $Id: rayshade.1,v 3.0 89/10/27 16:55:22 craig Exp $
  1237.   .\"
  1238.   .\" $Log:    rayshade.1,v $
  1239.   .\" Revision 3.0  89/10/27  16:55:22  craig
  1240.   .\" Baseline for first official release.
  1241.   .\" 
  1242.  
  1243. --- 3,11 -----
  1244.   .\" $Id: rayshade.1,v 3.0.1.1 89/11/17 16:57:19 craig Exp Locker: craig $
  1245.   .\"
  1246.   .\" $Log:    rayshade.1,v $
  1247. + .\" Revision 3.0.1.1  89/11/17  16:57:19  craig
  1248. + .\" patch1: Documented new -w option.
  1249. + .\" 
  1250.   .\" Revision 3.0  89/10/27  16:55:22  craig
  1251.   .\" Baseline for first official release.
  1252.   .\" 
  1253. ***************
  1254. *** 83,88
  1255.   .TP
  1256.   .B \-v
  1257.   Write verbose output to standard output.
  1258.   .TP
  1259.   .B \-W \fIworkers\fR
  1260.   Specify number of worker processes (Linda implementation only).
  1261.  
  1262. --- 86,94 -----
  1263.   .TP
  1264.   .B \-v
  1265.   Write verbose output to standard output.
  1266. + .TP
  1267. + .B \-w
  1268. + Write verbose worker information to the standard error.
  1269.   .TP
  1270.   .B \-W \fIworkers\fR
  1271.   Specify number of worker processes (Linda implementation only).
  1272.  
  1273. Index: src/raytrace.c
  1274. *** src/raytrace.c.old    Mon Nov 20 13:11:27 1989
  1275. --- src/raytrace.c    Mon Nov 20 13:11:28 1989
  1276. ***************
  1277. *** 18,24
  1278.    * name of the person performing the modification, the date of modification,
  1279.    * and the reason for such modification.
  1280.    *
  1281. !  * $Id: raytrace.c,v 3.0 89/10/27 02:06:02 craig Exp $
  1282.    *
  1283.    * $Log:    raytrace.c,v $
  1284.    * Revision 3.0  89/10/27  02:06:02  craig
  1285.  
  1286. --- 18,24 -----
  1287.    * name of the person performing the modification, the date of modification,
  1288.    * and the reason for such modification.
  1289.    *
  1290. !  * $Id: raytrace.c,v 3.0.1.2 89/11/16 20:35:30 craig Exp Locker: craig $
  1291.    *
  1292.    * $Log:    raytrace.c,v $
  1293.    * Revision 3.0.1.2  89/11/16  20:35:30  craig
  1294. ***************
  1295. *** 21,26
  1296.    * $Id: raytrace.c,v 3.0 89/10/27 02:06:02 craig Exp $
  1297.    *
  1298.    * $Log:    raytrace.c,v $
  1299.    * Revision 3.0  89/10/27  02:06:02  craig
  1300.    * Baseline for first official release.
  1301.    * 
  1302.  
  1303. --- 21,33 -----
  1304.    * $Id: raytrace.c,v 3.0.1.2 89/11/16 20:35:30 craig Exp Locker: craig $
  1305.    *
  1306.    * $Log:    raytrace.c,v $
  1307. +  * Revision 3.0.1.2  89/11/16  20:35:30  craig
  1308. +  * patch1: ShadeRay is now called on background rays.
  1309. +  * 
  1310. +  * Revision 3.0.1.1  89/11/16  18:27:38  craig
  1311. +  * patch1: Workers now report statistics to supervisor.
  1312. +  * patch1: Linda syntax is more up-to-date.
  1313. +  * 
  1314.    * Revision 3.0  89/10/27  02:06:02  craig
  1315.    * Baseline for first official release.
  1316.    * 
  1317. ***************
  1318. *** 83,88
  1319.   
  1320.   raytrace()
  1321.   {
  1322.       /*
  1323.        * The top-level ray TopRay always has as its origin the
  1324.        * eye position and as its medium NULL, indicating that it
  1325.  
  1326. --- 90,109 -----
  1327.   
  1328.   raytrace()
  1329.   {
  1330. + #ifdef LINDA
  1331. +     extern unsigned long primtests[], primhits[];
  1332. +     extern double utime, stime;
  1333. +     extern unsigned long EyeRays, ShadowRays, ReflectRays, RefractRays,
  1334. +             CacheWorked, CacheFailed, ShadowHits, SuperSampled,
  1335. +             BVTests, HitRays;
  1336. +     unsigned long eyerays, shadowrays, reflectrays, refractrays,
  1337. +             cacheworked, cachefailed, shadowhits, supersampled,
  1338. +             bvtests, hitrays;
  1339. +     unsigned long primtmp[PRIMTYPES], hittmp[PRIMTYPES];
  1340. +     double utmp, stmp;
  1341. +     int i, j;
  1342. +     extern FILE *fstats;
  1343. + #endif
  1344.       /*
  1345.        * The top-level ray TopRay always has as its origin the
  1346.        * eye position and as its medium NULL, indicating that it
  1347. ***************
  1348. *** 99,104
  1349.           distributed_trace();
  1350.       else
  1351.           adaptive_trace();
  1352.   }
  1353.   
  1354.   /*
  1355.  
  1356. --- 120,153 -----
  1357.           distributed_trace();
  1358.       else
  1359.           adaptive_trace();
  1360. + #ifdef LINDA
  1361. +     /*
  1362. +      * In statistics & workers.
  1363. +      */
  1364. +     for (i = 0; i < Workers; i++) {
  1365. +         in ("statistics", ? eyerays, ? shadowrays, ? reflectrays,
  1366. +             ? refractrays, ? cacheworked, ? cachefailed,
  1367. +             ? shadowhits, ? supersampled, ? bvtests, ? hitrays);
  1368. +         EyeRays += eyerays;
  1369. +         ShadowRays += shadowrays;
  1370. +         ReflectRays += reflectrays;
  1371. +         RefractRays += refractrays;
  1372. +         CacheWorked += cacheworked;
  1373. +         ShadowHits += shadowhits;
  1374. +         SuperSampled += supersampled;
  1375. +         BVTests += bvtests;
  1376. +         HitRays += hitrays;
  1377. +         in ("counts", ? primtmp, ? hittmp);
  1378. +         for (j = 0; j < PRIMTYPES; j++) {
  1379. +             primtests[j] += primtmp[j];
  1380. +             primhits[j] += hittmp[j];
  1381. +         }
  1382. +         in ("timing", ? utmp, ? stmp);
  1383. +         utime += utmp / (double)Workers;
  1384. +         stime += stmp / (double)Workers;
  1385. +         in("worker", ? int);
  1386. +     }
  1387. + #endif
  1388.   }
  1389.   
  1390.   /*
  1391. ***************
  1392. *** 109,115
  1393.       register int y;
  1394.       extern FILE *fstats;
  1395.       extern unsigned long EyeRays;
  1396. !     extern int Verbose;
  1397.   
  1398.       switch (JitSamples) {
  1399.           case 1:
  1400.  
  1401. --- 158,166 -----
  1402.       register int y;
  1403.       extern FILE *fstats;
  1404.       extern unsigned long EyeRays;
  1405. ! #ifdef LINDA
  1406. !     extern int VerboseWorker;
  1407. ! #endif
  1408.   
  1409.       switch (JitSamples) {
  1410.           case 1:
  1411. ***************
  1412. *** 146,151
  1413.        * the output file.
  1414.        */
  1415.       fprintf(fstats,"Using %d workers.\n",Workers);
  1416.       out("scaninfo", StartLine);
  1417.       for (y = 0; y < Workers; y++)
  1418.           eval("worker", dist_worker());
  1419.  
  1420. --- 197,203 -----
  1421.        * the output file.
  1422.        */
  1423.       fprintf(fstats,"Using %d workers.\n",Workers);
  1424. +     fflush(fstats);
  1425.       out("scaninfo", StartLine);
  1426.       for (y = 0; y < Workers; y++)
  1427.           eval("worker", dist_worker());
  1428. ***************
  1429. *** 150,157
  1430.       for (y = 0; y < Workers; y++)
  1431.           eval("worker", dist_worker());
  1432.       for (y = StartLine; y >= 0 ; y--) {
  1433. !         in("result", y, ? out_buf);
  1434. !         if (Verbose)
  1435.               fprintf(stderr,"Supervisor: inned %d\n",y);
  1436.           if (y % 10 == 0)
  1437.               fprintf(fstats, "Finished line %d.\n",y);
  1438.  
  1439. --- 202,209 -----
  1440.       for (y = 0; y < Workers; y++)
  1441.           eval("worker", dist_worker());
  1442.       for (y = StartLine; y >= 0 ; y--) {
  1443. !         in("result", y, ? out_buf:);
  1444. !         if (VerboseWorker)
  1445.               fprintf(stderr,"Supervisor: inned %d\n",y);
  1446.           if (y % 10 == 0)
  1447.               fprintf(fstats, "Finished line %d.\n",y);
  1448. ***************
  1449. *** 155,160
  1450.               fprintf(stderr,"Supervisor: inned %d\n",y);
  1451.           if (y % 10 == 0)
  1452.               fprintf(fstats, "Finished line %d.\n",y);
  1453.           outline(out_buf);
  1454.       }
  1455.       for (y = 0; y < Workers; y++)
  1456.  
  1457. --- 207,213 -----
  1458.               fprintf(stderr,"Supervisor: inned %d\n",y);
  1459.           if (y % 10 == 0)
  1460.               fprintf(fstats, "Finished line %d.\n",y);
  1461. +         fflush(fstats);
  1462.           outline(out_buf);
  1463.       }
  1464.   #else
  1465. ***************
  1466. *** 157,164
  1467.               fprintf(fstats, "Finished line %d.\n",y);
  1468.           outline(out_buf);
  1469.       }
  1470. -     for (y = 0; y < Workers; y++)
  1471. -         in("worker", ? int);
  1472.   #else
  1473.       /*
  1474.        * Trace each scanline, writing results to output file.
  1475.  
  1476. --- 210,215 -----
  1477.           fflush(fstats);
  1478.           outline(out_buf);
  1479.       }
  1480.   #else
  1481.       /*
  1482.        * Trace each scanline, writing results to output file.
  1483. ***************
  1484. *** 217,223
  1485.   {
  1486.       register int line;
  1487.       extern unsigned long EyeRays;
  1488. -     extern int maxlevel, Verbose;
  1489.       extern FILE *fstats;
  1490.   
  1491.       /*
  1492.  
  1493. --- 268,273 -----
  1494.   {
  1495.       register int line;
  1496.       extern unsigned long EyeRays;
  1497.       extern FILE *fstats;
  1498.   #ifdef LINDA
  1499.       extern int maxlevel, VerboseWorker;
  1500. ***************
  1501. *** 219,224
  1502.       extern unsigned long EyeRays;
  1503.       extern int maxlevel, Verbose;
  1504.       extern FILE *fstats;
  1505.   
  1506.       /*
  1507.        * In the adaptive supersampling case, Jitter, JitterWeight,
  1508.  
  1509. --- 269,277 -----
  1510.       register int line;
  1511.       extern unsigned long EyeRays;
  1512.       extern FILE *fstats;
  1513. + #ifdef LINDA
  1514. +     extern int maxlevel, VerboseWorker;
  1515. + #endif
  1516.   
  1517.       /*
  1518.        * In the adaptive supersampling case, Jitter, JitterWeight,
  1519. ***************
  1520. *** 269,274
  1521.        * is still working on it.)
  1522.        */
  1523.       fprintf(fstats,"Using %d workers.\n",Workers);
  1524.       out("scaninfo", StartLine+1, StartLine+2);
  1525.       for (line = 0; line < Workers; line++)
  1526.           eval("worker", adapt_worker());
  1527.  
  1528. --- 322,328 -----
  1529.        * is still working on it.)
  1530.        */
  1531.       fprintf(fstats,"Using %d workers.\n",Workers);
  1532. +     fflush(fstats);
  1533.       out("scaninfo", StartLine+1, StartLine+2);
  1534.       for (line = 0; line < Workers; line++)
  1535.           eval("worker", adapt_worker());
  1536. ***************
  1537. *** 281,288
  1538.       for (line = StartLine; line >= 0;) {
  1539.           if (!adapt_job(TRUE))
  1540.               sleep(5);
  1541. !         while (inp("result", line, ? out_buf)) {
  1542. !             if (Verbose)
  1543.                   fprintf(stderr,"Supervisor: inned %d\n",line);
  1544.               if (line % 10 == 0)
  1545.                   fprintf(fstats, "Finished line %d.\n",line);
  1546.  
  1547. --- 335,342 -----
  1548.       for (line = StartLine; line >= 0;) {
  1549.           if (!adapt_job(TRUE))
  1550.               sleep(5);
  1551. !         while (inp("result", line, ? out_buf:)) {
  1552. !             if (VerboseWorker)
  1553.                   fprintf(stderr,"Supervisor: inned %d\n",line);
  1554.               if (line % 10 == 0)
  1555.                   fprintf(fstats, "Finished line %d.\n",line);
  1556. ***************
  1557. *** 286,291
  1558.                   fprintf(stderr,"Supervisor: inned %d\n",line);
  1559.               if (line % 10 == 0)
  1560.                   fprintf(fstats, "Finished line %d.\n",line);
  1561.               outline(out_buf);
  1562.               if (--line < 0)
  1563.                   break;
  1564.  
  1565. --- 340,346 -----
  1566.                   fprintf(stderr,"Supervisor: inned %d\n",line);
  1567.               if (line % 10 == 0)
  1568.                   fprintf(fstats, "Finished line %d.\n",line);
  1569. +             fflush(fstats);
  1570.               outline(out_buf);
  1571.               if (--line < 0)
  1572.                   break;
  1573. ***************
  1574. *** 291,300
  1575.                   break;
  1576.           }
  1577.       }
  1578. -     if (Verbose)
  1579. -         fprintf(stderr,"Finished -- inning workers.\n");
  1580. -     for (line = 0; line < Workers; line++)
  1581. -         in("worker", ? int);
  1582.   #else
  1583.       line = StartLine + 1;
  1584.       trace_line(line, &pixel_buf[line & 01][0]);
  1585.  
  1586. --- 346,351 -----
  1587.                   break;
  1588.           }
  1589.       }
  1590.   #else
  1591.       line = StartLine + 1;
  1592.       trace_line(line, &pixel_buf[line & 01][0]);
  1593. ***************
  1594. *** 465,478
  1595.        * Do the actual ray trace.
  1596.        */
  1597.       dist = TraceRay((Primitive *)NULL, &TopRay, &hitinfo);
  1598. !     if (dist > 0.)
  1599. !         /*
  1600. !          * There was a valid intersection.
  1601. !          */
  1602. !         ShadeRay(&hitinfo, &TopRay, dist, &background, color, 1.0);
  1603. !     else
  1604. !         /* Use background color */
  1605. !         *color = background;
  1606.   }
  1607.   
  1608.   /*
  1609.  
  1610. --- 516,522 -----
  1611.        * Do the actual ray trace.
  1612.        */
  1613.       dist = TraceRay((Primitive *)NULL, &TopRay, &hitinfo);
  1614. !     ShadeRay(&hitinfo, &TopRay, dist, &background, color, 1.0);
  1615.   }
  1616.   
  1617.   /*
  1618. ***************
  1619. *** 514,519
  1620.   #ifdef LINDA
  1621.   dist_worker()
  1622.   {
  1623.       while (dist_job())
  1624.           ;
  1625.       return;
  1626.  
  1627. --- 558,571 -----
  1628.   #ifdef LINDA
  1629.   dist_worker()
  1630.   {
  1631. +     extern unsigned long EyeRays, ShadowRays, ReflectRays, RefractRays;
  1632. +     extern unsigned long CacheWorked, CacheFailed, ShadowHits;
  1633. +     extern unsigned long SuperSampled, BVTests, HitRays;
  1634. +     extern unsigned long primtests[PRIMTYPES], primhits[PRIMTYPES];
  1635. +     extern int VerboseWorker;
  1636. +     extern FILE *fstats;
  1637. +     double user, sys;
  1638. + 
  1639.       while (dist_job())
  1640.           ;
  1641.       /*
  1642. ***************
  1643. *** 516,521
  1644.   {
  1645.       while (dist_job())
  1646.           ;
  1647.       return;
  1648.   }
  1649.   
  1650.  
  1651. --- 568,588 -----
  1652.   
  1653.       while (dist_job())
  1654.           ;
  1655. +     /*
  1656. +      * Out statistics.
  1657. +      */
  1658. +     out ("statistics", EyeRays, ShadowRays, ReflectRays, RefractRays,
  1659. +         CacheWorked, CacheFailed, ShadowHits, SuperSampled, BVTests,
  1660. +         HitRays);
  1661. +     /*
  1662. +      * Out ray/primitive intersection counts.
  1663. +      */
  1664. +     out ("counts", primtests, primhits);
  1665. +     /*
  1666. +      * Compute running time.
  1667. +      */
  1668. +     get_cpu_time(&user, &sys);
  1669. +     out ("timing", user, sys);
  1670.       return;
  1671.   }
  1672.   
  1673. ***************
  1674. *** 525,531
  1675.   dist_job()
  1676.   {
  1677.       int y;
  1678. !     extern int Verbose;
  1679.   
  1680.       in("scaninfo", ? y);
  1681.       if (y < 0) {
  1682.  
  1683. --- 592,598 -----
  1684.   dist_job()
  1685.   {
  1686.       int y;
  1687. !     extern int VerboseWorker;
  1688.   
  1689.       in("scaninfo", ? y);
  1690.       if (y < 0) {
  1691. ***************
  1692. *** 532,538
  1693.           out("scaninfo", y);
  1694.           return 0;
  1695.       }
  1696. !     if (Verbose)
  1697.           fprintf(stderr,"Worker: inned %d\n",y);
  1698.       out("scaninfo", y-1);
  1699.       trace_jit_line(y, out_buf);
  1700.  
  1701. --- 599,605 -----
  1702.           out("scaninfo", y);
  1703.           return 0;
  1704.       }
  1705. !     if (VerboseWorker)
  1706.           fprintf(stderr,"Worker: inned %d\n",y);
  1707.       out("scaninfo", y-1);
  1708.       trace_jit_line(y, out_buf);
  1709. ***************
  1710. *** 536,542
  1711.           fprintf(stderr,"Worker: inned %d\n",y);
  1712.       out("scaninfo", y-1);
  1713.       trace_jit_line(y, out_buf);
  1714. !     if (Verbose)
  1715.           fprintf(stderr,"Worker: outing %d\n",y);
  1716.       out("result", y, out_buf : Xres);
  1717.       return 1;
  1718.  
  1719. --- 603,609 -----
  1720.           fprintf(stderr,"Worker: inned %d\n",y);
  1721.       out("scaninfo", y-1);
  1722.       trace_jit_line(y, out_buf);
  1723. !     if (VerboseWorker)
  1724.           fprintf(stderr,"Worker: outing %d\n",y);
  1725.       out("result", y, out_buf : Xres);
  1726.       return 1;
  1727. ***************
  1728. *** 544,549
  1729.   
  1730.   adapt_worker()
  1731.   {
  1732.       while (adapt_job(FALSE))
  1733.           ;
  1734.       return;
  1735.  
  1736. --- 611,623 -----
  1737.   
  1738.   adapt_worker()
  1739.   {
  1740. + 
  1741. +     extern unsigned long EyeRays, ShadowRays, ReflectRays, RefractRays;
  1742. +     extern unsigned long CacheWorked, CacheFailed, ShadowHits;
  1743. +     extern unsigned long SuperSampled, BVTests, HitRays;
  1744. +     extern unsigned long primtests[PRIMTYPES], primhits[PRIMTYPES];
  1745. +     double user, sys;
  1746. + 
  1747.       while (adapt_job(FALSE))
  1748.           ;
  1749.       /*
  1750. ***************
  1751. *** 546,551
  1752.   {
  1753.       while (adapt_job(FALSE))
  1754.           ;
  1755.       return;
  1756.   }
  1757.   
  1758.  
  1759. --- 620,642 -----
  1760.   
  1761.       while (adapt_job(FALSE))
  1762.           ;
  1763. +     /*
  1764. +      * Out statistics.
  1765. +      */
  1766. +     out ("statistics", EyeRays, ShadowRays, ReflectRays, RefractRays,
  1767. +         CacheWorked, CacheFailed, ShadowHits, SuperSampled, BVTests,
  1768. +         HitRays);
  1769. +     /*
  1770. +      * Out ray/primitive intersection counts.
  1771. +      */
  1772. +     out ("counts", primtests, primhits);
  1773. + 
  1774. +     /*
  1775. +      * Compute running time.
  1776. +      */
  1777. +     get_cpu_time(&user, &sys);
  1778. +     out ("timing", user, sys);
  1779. + 
  1780.       return;
  1781.   }
  1782.   
  1783. ***************
  1784. *** 553,559
  1785.   int supervisor;
  1786.   {
  1787.       int lastpix, lastscan;
  1788. !     extern int Verbose;
  1789.   
  1790.       in("scaninfo", ? lastpix, ? lastscan);
  1791.       if (lastpix <= 0) {
  1792.  
  1793. --- 644,650 -----
  1794.   int supervisor;
  1795.   {
  1796.       int lastpix, lastscan;
  1797. !     extern int VerboseWorker;
  1798.   
  1799.       in("scaninfo", ? lastpix, ? lastscan);
  1800.       if (lastpix <= 0) {
  1801. ***************
  1802. *** 558,564
  1803.       in("scaninfo", ? lastpix, ? lastscan);
  1804.       if (lastpix <= 0) {
  1805.           out("scaninfo", lastpix, lastscan);
  1806. !         if (Verbose)
  1807.               fprintf(stderr,"Worker:  all finished!\n");
  1808.           return FALSE;
  1809.       }
  1810.  
  1811. --- 649,655 -----
  1812.       in("scaninfo", ? lastpix, ? lastscan);
  1813.       if (lastpix <= 0) {
  1814.           out("scaninfo", lastpix, lastscan);
  1815. !         if (VerboseWorker)
  1816.               fprintf(stderr,"Worker:  all finished!\n");
  1817.           return FALSE;
  1818.       }
  1819. ***************
  1820. *** 563,570
  1821.           return FALSE;
  1822.       }
  1823.   
  1824. !     if (rdp("scanline", lastpix -1, ? pixel_buf[0]) &&
  1825. !         inp("scanline", lastpix, ? pixel_buf[1])) {
  1826.           lastpix--;
  1827.           out("scaninfo", lastpix, lastscan);
  1828.           if (Verbose)
  1829.  
  1830. --- 654,661 -----
  1831.           return FALSE;
  1832.       }
  1833.   
  1834. !     if (rdp("scanline", lastpix -1, ? pixel_buf[0]:) &&
  1835. !         inp("scanline", lastpix, ? pixel_buf[1]:)) {
  1836.           lastpix--;
  1837.           out("scaninfo", lastpix, lastscan);
  1838.           if (VerboseWorker)
  1839. ***************
  1840. *** 567,573
  1841.           inp("scanline", lastpix, ? pixel_buf[1])) {
  1842.           lastpix--;
  1843.           out("scaninfo", lastpix, lastscan);
  1844. !         if (Verbose)
  1845.               fprintf(stderr,"%s: doing pixline %d\n",
  1846.                   supervisor ? "Supervisor" : "Worker",
  1847.                       lastpix);
  1848.  
  1849. --- 658,664 -----
  1850.           inp("scanline", lastpix, ? pixel_buf[1]:)) {
  1851.           lastpix--;
  1852.           out("scaninfo", lastpix, lastscan);
  1853. !         if (VerboseWorker)
  1854.               fprintf(stderr,"%s: doing pixline %d\n",
  1855.                   supervisor ? "Supervisor" : "Worker",
  1856.                       lastpix);
  1857. ***************
  1858. *** 581,587
  1859.            * a long, long time, causing tuple-space to get
  1860.            * jammed with finished pixlines, and...
  1861.            */
  1862. !         if (Verbose)
  1863.               fprintf(stderr,"Supervisor: nothing to do...\n");
  1864.           out ("scaninfo", lastpix, lastscan);
  1865.           return FALSE;
  1866.  
  1867. --- 672,678 -----
  1868.            * a long, long time, causing tuple-space to get
  1869.            * jammed with finished pixlines, and...
  1870.            */
  1871. !         if (VerboseWorker)
  1872.               fprintf(stderr,"Supervisor: nothing to do...\n");
  1873.           out ("scaninfo", lastpix, lastscan);
  1874.           return FALSE;
  1875. ***************
  1876. *** 588,594
  1877.       } else if (lastscan > 0) {
  1878.           lastscan--;
  1879.           out("scaninfo", lastpix, lastscan);
  1880. !         if (Verbose)
  1881.               fprintf(stderr,"Worker: doing scan %d\n",
  1882.                       lastscan);
  1883.           trace_line(lastscan, pixel_buf[0]);
  1884.  
  1885. --- 679,685 -----
  1886.       } else if (lastscan > 0) {
  1887.           lastscan--;
  1888.           out("scaninfo", lastpix, lastscan);
  1889. !         if (VerboseWorker)
  1890.               fprintf(stderr,"Worker: doing scan %d\n",
  1891.                       lastscan);
  1892.           trace_line(lastscan, pixel_buf[0]);
  1893. ***************
  1894. *** 597,603
  1895.           /*
  1896.            * Nothing to do until somebody finishes a scanline.
  1897.            */
  1898. !         if (Verbose) {
  1899.               fprintf(stderr,"Worker idle... ");
  1900.               fprintf(stderr,"pix = %d, scan = %d\n",
  1901.                       lastpix, lastscan);
  1902.  
  1903. --- 688,694 -----
  1904.           /*
  1905.            * Nothing to do until somebody finishes a scanline.
  1906.            */
  1907. !         if (VerboseWorker) {
  1908.               fprintf(stderr,"Worker idle... ");
  1909.               fprintf(stderr,"pix = %d, scan = %d\n",
  1910.                       lastpix, lastscan);
  1911.  
  1912. Index: src/shade.c
  1913. *** src/shade.c.old    Mon Nov 20 13:11:33 1989
  1914. --- src/shade.c    Mon Nov 20 13:11:34 1989
  1915. ***************
  1916. *** 18,24
  1917.    * name of the person performing the modification, the date of modification,
  1918.    * and the reason for such modification.
  1919.    *
  1920. !  * $Id: shade.c,v 3.0 89/10/27 02:06:03 craig Exp $
  1921.    *
  1922.    * $Log:    shade.c,v $
  1923.    * Revision 3.0  89/10/27  02:06:03  craig
  1924.  
  1925. --- 18,24 -----
  1926.    * name of the person performing the modification, the date of modification,
  1927.    * and the reason for such modification.
  1928.    *
  1929. !  * $Id: shade.c,v 3.0.1.1 89/11/16 20:34:42 craig Exp Locker: craig $
  1930.    *
  1931.    * $Log:    shade.c,v $
  1932.    * Revision 3.0.1.1  89/11/16  20:34:42  craig
  1933. ***************
  1934. *** 21,26
  1935.    * $Id: shade.c,v 3.0 89/10/27 02:06:03 craig Exp $
  1936.    *
  1937.    * $Log:    shade.c,v $
  1938.    * Revision 3.0  89/10/27  02:06:03  craig
  1939.    * Baseline for first official release.
  1940.    * 
  1941.  
  1942. --- 21,29 -----
  1943.    * $Id: shade.c,v 3.0.1.1 89/11/16 20:34:42 craig Exp Locker: craig $
  1944.    *
  1945.    * $Log:    shade.c,v $
  1946. +  * Revision 3.0.1.1  89/11/16  20:34:42  craig
  1947. +  * patch1: Atmospheric effects are now applied to background rays.
  1948. +  * 
  1949.    * Revision 3.0  89/10/27  02:06:03  craig
  1950.    * Baseline for first official release.
  1951.    * 
  1952. ***************
  1953. *** 30,35
  1954.   #include "constants.h"
  1955.   #include "typedefs.h"
  1956.   #include "funcdefs.h"
  1957.   
  1958.   int    level, maxlevel;    /* Current tree depth, max depth */
  1959.   double    DefIndex = 1.0;        /* Default index of refraction. */
  1960.  
  1961. --- 33,39 -----
  1962.   #include "constants.h"
  1963.   #include "typedefs.h"
  1964.   #include "funcdefs.h"
  1965. + #include "atmosphere.h"
  1966.   
  1967.   int    level, maxlevel;    /* Current tree depth, max depth */
  1968.   double    DefIndex = 1.0;        /* Default index of refraction. */
  1969. ***************
  1970. *** 47,52
  1971.   double contrib;            /* Contribution of this ray to final color */
  1972.   {
  1973.       Vector hit;
  1974.       extern unsigned long HitRays;
  1975.       extern Fog *GlobalFog;
  1976.       extern Mist *GlobalMist;
  1977.  
  1978. --- 51,57 -----
  1979.   double contrib;            /* Contribution of this ray to final color */
  1980.   {
  1981.       Vector hit;
  1982. +     double realdist;
  1983.       extern unsigned long HitRays;
  1984.       extern Fog *GlobalFog;
  1985.       extern Mist *GlobalMist;
  1986. ***************
  1987. *** 51,60
  1988.       extern Fog *GlobalFog;
  1989.       extern Mist *GlobalMist;
  1990.   
  1991. !     /*
  1992. !      * If we got here, then a ray hit something, so...
  1993. !      */
  1994. !     HitRays++;
  1995.   
  1996.       (void)normalize(&hitinfo->norm);
  1997.       /*
  1998.  
  1999. --- 56,75 -----
  2000.       extern Fog *GlobalFog;
  2001.       extern Mist *GlobalMist;
  2002.   
  2003. !     if (dist <= 0.) {
  2004. !         /*
  2005. !          * No valid intersection.  Set distance for atmospheric
  2006. !          * effects and set color of ray to background.
  2007. !          */
  2008. !         realdist = FAR_AWAY;
  2009. !         *color = *back;
  2010. !         addscaledvec(ray->pos, realdist, ray->dir, &hit);
  2011. !     } else {
  2012. !         realdist = dist;
  2013. !         /*
  2014. !          * If we got here, then a ray hit something, so...
  2015. !          */
  2016. !         HitRays++;
  2017.   
  2018.           (void)normalize(&hitinfo->norm);
  2019.           /*
  2020. ***************
  2021. *** 56,71
  2022.        */
  2023.       HitRays++;
  2024.   
  2025. !     (void)normalize(&hitinfo->norm);
  2026. !     /*
  2027. !       * "hit" is the location of intersection in world space.
  2028. !      * hitinfo->pos is the intersection point in object space.
  2029. !      */
  2030. !     addscaledvec(ray->pos, dist, ray->dir, &hit);
  2031. !     /*
  2032. !      * Calculate ray color.
  2033. !      */
  2034. !     shade(&hit, ray, &hitinfo->norm, hitinfo->prim, &hitinfo->surf,
  2035.               back, color, contrib);
  2036.       /*
  2037.        * If fog or mist is present, modify computed color.
  2038.  
  2039. --- 71,86 -----
  2040.            */
  2041.           HitRays++;
  2042.   
  2043. !         (void)normalize(&hitinfo->norm);
  2044. !         /*
  2045. !           * "hit" is the location of intersection in world space.
  2046. !          * hitinfo->pos is the intersection point in object space.
  2047. !          */
  2048. !         addscaledvec(ray->pos, dist, ray->dir, &hit);
  2049. !         /*
  2050. !          * Calculate ray color.
  2051. !          */
  2052. !         shade(&hit, ray, &hitinfo->norm, hitinfo->prim, &hitinfo->surf,
  2053.               back, color, contrib);
  2054.       }
  2055.       /*
  2056. ***************
  2057. *** 67,72
  2058.        */
  2059.       shade(&hit, ray, &hitinfo->norm, hitinfo->prim, &hitinfo->surf,
  2060.               back, color, contrib);
  2061.       /*
  2062.        * If fog or mist is present, modify computed color.
  2063.        */
  2064.  
  2065. --- 82,88 -----
  2066.            */
  2067.           shade(&hit, ray, &hitinfo->norm, hitinfo->prim, &hitinfo->surf,
  2068.               back, color, contrib);
  2069. +     }
  2070.       /*
  2071.        * If fog or mist is present, modify computed color.
  2072.        */
  2073. ***************
  2074. *** 71,77
  2075.        * If fog or mist is present, modify computed color.
  2076.        */
  2077.       if (GlobalFog)
  2078. !         ComputeFog(GlobalFog, dist, color);
  2079.       if (GlobalMist)
  2080.           ComputeMist(GlobalMist, &ray->pos, &hit, dist, color);
  2081.   }
  2082.  
  2083. --- 87,93 -----
  2084.        * If fog or mist is present, modify computed color.
  2085.        */
  2086.       if (GlobalFog)
  2087. !         ComputeFog(GlobalFog, realdist, color);
  2088.       if (GlobalMist)
  2089.           ComputeMist(GlobalMist, &ray->pos, &hit, realdist, color);
  2090.   }
  2091. ***************
  2092. *** 73,79
  2093.       if (GlobalFog)
  2094.           ComputeFog(GlobalFog, dist, color);
  2095.       if (GlobalMist)
  2096. !         ComputeMist(GlobalMist, &ray->pos, &hit, dist, color);
  2097.   }
  2098.   
  2099.   shade(pos, ray, nrm, prim, surf, back, color, contrib)
  2100.  
  2101. --- 89,95 -----
  2102.       if (GlobalFog)
  2103.           ComputeFog(GlobalFog, realdist, color);
  2104.       if (GlobalMist)
  2105. !         ComputeMist(GlobalMist, &ray->pos, &hit, realdist, color);
  2106.   }
  2107.   
  2108.   shade(pos, ray, nrm, prim, surf, back, color, contrib)
  2109. ***************
  2110. *** 136,147
  2111.           NewRay.media = ray->media;    /* Medium == old medium */
  2112.           ReflectRays++;
  2113.           dist = TraceRay(prim, &NewRay, &hitinfo);
  2114. !         if (dist > EPSILON) {
  2115. !             ShadeRay(&hitinfo, &NewRay, dist, back, &newcol,
  2116. !                     contrib*surf->refl);
  2117. !             AddScaledColor(*color, surf->refl, newcol, color);
  2118. !         } else
  2119. !             AddScaledColor(*color, surf->refl, *back, color);
  2120.           level--;
  2121.       }
  2122.       /*
  2123.  
  2124. --- 152,160 -----
  2125.           NewRay.media = ray->media;    /* Medium == old medium */
  2126.           ReflectRays++;
  2127.           dist = TraceRay(prim, &NewRay, &hitinfo);
  2128. !         ShadeRay(&hitinfo, &NewRay, dist, back, &newcol,
  2129. !                 contrib*surf->refl);
  2130. !         AddScaledColor(*color, surf->refl, newcol, color);
  2131.           level--;
  2132.       }
  2133.       /*
  2134. ***************
  2135. *** 185,192
  2136.           level++;
  2137.           RefractRays++;
  2138.           dist = TraceRay((Primitive *)NULL, &NewRay, &hitinfo);
  2139. !         if (dist > EPSILON) {
  2140. !             ShadeRay(&hitinfo, &NewRay, dist, back, &newcol,
  2141.                   contrib * surf->transp);
  2142.               AddScaledColor(*color, surf->transp, newcol, color);
  2143.           } else
  2144.  
  2145. --- 198,204 -----
  2146.           level++;
  2147.           RefractRays++;
  2148.           dist = TraceRay((Primitive *)NULL, &NewRay, &hitinfo);
  2149. !         ShadeRay(&hitinfo, &NewRay, dist, back, &newcol,
  2150.                   contrib * surf->transp);
  2151.           AddScaledColor(*color, surf->transp, newcol, color);
  2152.           if (entering)
  2153. ***************
  2154. *** 188,196
  2155.           if (dist > EPSILON) {
  2156.               ShadeRay(&hitinfo, &NewRay, dist, back, &newcol,
  2157.                   contrib * surf->transp);
  2158. !             AddScaledColor(*color, surf->transp, newcol, color);
  2159. !         } else
  2160. !             AddScaledColor(*color, surf->transp, *back, color);
  2161.           if (entering)
  2162.               free((char *)NewRay.media);
  2163.           level--;
  2164.  
  2165. --- 200,206 -----
  2166.           dist = TraceRay((Primitive *)NULL, &NewRay, &hitinfo);
  2167.           ShadeRay(&hitinfo, &NewRay, dist, back, &newcol,
  2168.                   contrib * surf->transp);
  2169. !         AddScaledColor(*color, surf->transp, newcol, color);
  2170.           if (entering)
  2171.               free((char *)NewRay.media);
  2172.           level--;
  2173.  
  2174. Index: src/viewing.c
  2175. *** src/viewing.c.old    Mon Nov 20 13:11:42 1989
  2176. --- src/viewing.c    Mon Nov 20 13:11:43 1989
  2177. ***************
  2178. *** 18,24
  2179.    * name of the person performing the modification, the date of modification,
  2180.    * and the reason for such modification.
  2181.    *
  2182. !  * $Id: viewing.c,v 3.0 89/10/27 02:06:08 craig Exp $
  2183.    *
  2184.    * $Log:    viewing.c,v $
  2185.    * Revision 3.0  89/10/27  02:06:08  craig
  2186.  
  2187. --- 18,24 -----
  2188.    * name of the person performing the modification, the date of modification,
  2189.    * and the reason for such modification.
  2190.    *
  2191. !  * $Id: viewing.c,v 3.0.1.1 89/11/16 18:24:30 craig Exp Locker: craig $
  2192.    *
  2193.    * $Log:    viewing.c,v $
  2194.    * Revision 3.0.1.1  89/11/16  18:24:30  craig
  2195. ***************
  2196. *** 21,26
  2197.    * $Id: viewing.c,v 3.0 89/10/27 02:06:08 craig Exp $
  2198.    *
  2199.    * $Log:    viewing.c,v $
  2200.    * Revision 3.0  89/10/27  02:06:08  craig
  2201.    * Baseline for first official release.
  2202.    * 
  2203.  
  2204. --- 21,29 -----
  2205.    * $Id: viewing.c,v 3.0.1.1 89/11/16 18:24:30 craig Exp Locker: craig $
  2206.    *
  2207.    * $Log:    viewing.c,v $
  2208. +  * Revision 3.0.1.1  89/11/16  18:24:30  craig
  2209. +  * patch1: Fixed calculation of dist in Stereo mode.
  2210. +  * 
  2211.    * Revision 3.0  89/10/27  02:06:08  craig
  2212.    * Baseline for first official release.
  2213.    * 
  2214. ***************
  2215. *** 60,66
  2216.           eyep.z += magnitude * scrnx.z;
  2217.           vecsub(lookp, eyep, &firstray);
  2218.           gaze = firstray;
  2219. !         dist = normalize(&gaze);
  2220.           (void)crossp(&scrnx, &gaze, &up);
  2221.           (void)crossp(&scrny, &scrnx, &gaze);
  2222.       }
  2223.  
  2224. --- 63,69 -----
  2225.           eyep.z += magnitude * scrnx.z;
  2226.           vecsub(lookp, eyep, &firstray);
  2227.           gaze = firstray;
  2228. !         dist = 2. * normalize(&gaze);
  2229.           (void)crossp(&scrnx, &gaze, &up);
  2230.           (void)crossp(&scrny, &scrnx, &gaze);
  2231.       }
  2232.  
  2233. Index: src/atmosphere.h
  2234. *** /dev/null    Mon Nov 20 13:14:20 1989
  2235. --- src/atmosphere.h    Thu Nov 16 20:40:54 1989
  2236. ***************
  2237. *** 0 ****
  2238. --- 1,36 ----
  2239. + /*
  2240. +  * Copyright (C) 1989, Craig E. Kolb
  2241. +  *
  2242. +  * This software may be freely copied, modified, and redistributed,
  2243. +  * provided that this copyright notice is preserved on all copies.
  2244. +  * 
  2245. +  * There is no warranty or other guarantee of fitness for this software,
  2246. +  * it is provided solely "as is".  Bug reports or fixes may be sent
  2247. +  * to the author, who may or may not act on them as he desires.
  2248. +  *
  2249. +  * You may not include this software in a program or other software product
  2250. +  * without supplying the source, or without informing the end-user that the 
  2251. +  * source is available for no extra charge.
  2252. +  *
  2253. +  * If you modify this software, you should include a notice giving the
  2254. +  * name of the person performing the modification, the date of modification,
  2255. +  * and the reason for such modification.
  2256. +  *
  2257. +  * $Id: atmosphere.h,v 3.0 89/11/16 20:40:53 craig Exp Locker: craig $
  2258. +  *
  2259. +  * $Log:    atmosphere.h,v $
  2260. +  * Revision 3.0  89/11/16  20:40:53  craig
  2261. +  * Initial version.
  2262. +  * 
  2263. +  */
  2264. + 
  2265. + typedef struct {
  2266. +     Color color;        /* Fog color */
  2267. +     double trans;        /* Fog transmissivity */
  2268. + } Fog;
  2269. + 
  2270. + typedef struct {
  2271. +     Color color;        /* Mist color */
  2272. +     Color trans;        /* R, G, B transmissivity */
  2273. +     double scale, zero;    /* Height scale, start Z */
  2274. + } Mist;
  2275.  
  2276.  
  2277.