1 /****************************************************************************
4 * This module implements the code pertaining to rays.
6 * from Persistence of Vision(tm) Ray Tracer
7 * Copyright 1996,1999 Persistence of Vision Team
8 *---------------------------------------------------------------------------
9 * NOTICE: This source code file is provided so that users may experiment
10 * with enhancements to POV-Ray and to port the software to platforms other
11 * than those supported by the POV-Ray Team. There are strict rules under
12 * which you are permitted to use this file. The rules are in the file
13 * named POVLEGAL.DOC which should be distributed with this file.
14 * If POVLEGAL.DOC is not available or for more info please contact the POV-Ray
15 * Team Coordinator by email to team-coord@povray.org or visit us on the web at
16 * http://www.povray.org. The latest version of POV-Ray may be found at this site.
18 * This program is based on the popular DKB raytracer version 2.12.
19 * DKBTrace was originally written by David K. Buck.
20 * DKBTrace Ver 2.0-2.12 were written by David K. Buck & Aaron A. Collins.
22 *****************************************************************************/
34 /*****************************************************************************
35 * Local preprocessor defines
36 ******************************************************************************/
40 /*****************************************************************************
42 ******************************************************************************/
46 /*****************************************************************************
48 ******************************************************************************/
52 /*****************************************************************************
54 ******************************************************************************/
58 /*****************************************************************************
62 * Initialize_Ray_Containers
82 ******************************************************************************/
84 void Initialize_Ray_Containers(RAY
*Ray
)
91 /*****************************************************************************
115 ******************************************************************************/
117 void Copy_Ray_Containers(RAY
*Dest_Ray
, RAY
*Source_Ray
)
121 if ((Dest_Ray
->Index
= Source_Ray
->Index
) >= MAX_CONTAINING_OBJECTS
)
123 Error("ERROR - Containing Index too high.\n");
126 for (i
= 0 ; i
<= Source_Ray
->Index
; i
++)
128 Dest_Ray
->Interiors
[i
] = Source_Ray
->Interiors
[i
];
134 /*****************************************************************************
156 * Oct 1995 : Fixed bug with IOR assignment (only valid for plain textures) [DB]
158 ******************************************************************************/
160 void Ray_Enter(RAY
*Ray
, INTERIOR
*interior
)
164 if ((index
= ++(Ray
->Index
)) >= MAX_CONTAINING_OBJECTS
)
166 Error("Too many nested refracting objects.");
169 Ray
->Interiors
[index
] = interior
;
174 /*****************************************************************************
192 * Remove given entry from given ray's container.
198 ******************************************************************************/
200 void Ray_Exit(RAY
*Ray
, int nr
)
204 for (i
= nr
; i
< Ray
->Index
; i
++)
206 Ray
->Interiors
[i
] = Ray
->Interiors
[i
+1];
209 if (--(Ray
->Index
) < - 1)
211 Error("Too many exits from refractions.");
217 /*****************************************************************************
221 * Interior_In_Ray_Container
235 * Test if a given interior is in the container of a given ray.
239 * Mar 1996 : Creation.
241 ******************************************************************************/
243 int Interior_In_Ray_Container(RAY
*ray
, INTERIOR
*interior
)
249 for (i
= 0; i
<= ray
->Index
; i
++)
251 if (interior
== ray
->Interiors
[i
])