1d86ed7fbStbbdev /*
2*b15aabb3Stbbdev     Copyright (c) 2005-2021 Intel Corporation
3d86ed7fbStbbdev 
4d86ed7fbStbbdev     Licensed under the Apache License, Version 2.0 (the "License");
5d86ed7fbStbbdev     you may not use this file except in compliance with the License.
6d86ed7fbStbbdev     You may obtain a copy of the License at
7d86ed7fbStbbdev 
8d86ed7fbStbbdev         http://www.apache.org/licenses/LICENSE-2.0
9d86ed7fbStbbdev 
10d86ed7fbStbbdev     Unless required by applicable law or agreed to in writing, software
11d86ed7fbStbbdev     distributed under the License is distributed on an "AS IS" BASIS,
12d86ed7fbStbbdev     WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13d86ed7fbStbbdev     See the License for the specific language governing permissions and
14d86ed7fbStbbdev     limitations under the License.
15d86ed7fbStbbdev */
16d86ed7fbStbbdev 
17d86ed7fbStbbdev /*
18d86ed7fbStbbdev     The original source for this example is
19d86ed7fbStbbdev     Copyright (c) 1994-2008 John E. Stone
20d86ed7fbStbbdev     All rights reserved.
21d86ed7fbStbbdev 
22d86ed7fbStbbdev     Redistribution and use in source and binary forms, with or without
23d86ed7fbStbbdev     modification, are permitted provided that the following conditions
24d86ed7fbStbbdev     are met:
25d86ed7fbStbbdev     1. Redistributions of source code must retain the above copyright
26d86ed7fbStbbdev        notice, this list of conditions and the following disclaimer.
27d86ed7fbStbbdev     2. Redistributions in binary form must reproduce the above copyright
28d86ed7fbStbbdev        notice, this list of conditions and the following disclaimer in the
29d86ed7fbStbbdev        documentation and/or other materials provided with the distribution.
30d86ed7fbStbbdev     3. The name of the author may not be used to endorse or promote products
31d86ed7fbStbbdev        derived from this software without specific prior written permission.
32d86ed7fbStbbdev 
33d86ed7fbStbbdev     THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
34d86ed7fbStbbdev     OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
35d86ed7fbStbbdev     WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
36d86ed7fbStbbdev     ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
37d86ed7fbStbbdev     DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
38d86ed7fbStbbdev     DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
39d86ed7fbStbbdev     OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
40d86ed7fbStbbdev     HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
41d86ed7fbStbbdev     LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
42d86ed7fbStbbdev     OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
43d86ed7fbStbbdev     SUCH DAMAGE.
44d86ed7fbStbbdev */
45d86ed7fbStbbdev 
46d86ed7fbStbbdev /*
47d86ed7fbStbbdev  * light.cpp - This file contains declarations and defines for light sources.
48d86ed7fbStbbdev  */
49d86ed7fbStbbdev 
50d86ed7fbStbbdev #include "machine.hpp"
51d86ed7fbStbbdev #include "types.hpp"
52d86ed7fbStbbdev #include "macros.hpp"
53d86ed7fbStbbdev #include "vector.hpp"
54d86ed7fbStbbdev #include "intersect.hpp"
55d86ed7fbStbbdev #include "util.hpp"
56d86ed7fbStbbdev 
57d86ed7fbStbbdev #define LIGHT_PRIVATE
58d86ed7fbStbbdev #include "light.hpp"
59d86ed7fbStbbdev 
60d86ed7fbStbbdev static object_methods light_methods = { (void (*)(void *, void *))(light_intersect),
61d86ed7fbStbbdev                                         (void (*)(void *, void *, void *, void *))(light_normal),
62d86ed7fbStbbdev                                         light_bbox,
63d86ed7fbStbbdev                                         free };
64d86ed7fbStbbdev 
newlight(void * tex,vector ctr,flt rad)65d86ed7fbStbbdev point_light *newlight(void *tex, vector ctr, flt rad) {
66d86ed7fbStbbdev     point_light *l;
67d86ed7fbStbbdev 
68d86ed7fbStbbdev     l = (point_light *)rt_getmem(sizeof(point_light));
69d86ed7fbStbbdev     memset(l, 0, sizeof(point_light));
70d86ed7fbStbbdev     l->methods = &light_methods;
71d86ed7fbStbbdev 
72d86ed7fbStbbdev     l->tex = (texture *)tex;
73d86ed7fbStbbdev     l->ctr = ctr;
74d86ed7fbStbbdev     l->rad = rad;
75d86ed7fbStbbdev 
76d86ed7fbStbbdev     return l;
77d86ed7fbStbbdev }
78d86ed7fbStbbdev 
light_bbox(void * obj,vector * min,vector * max)79d86ed7fbStbbdev static int light_bbox(void *obj, vector *min, vector *max) {
80d86ed7fbStbbdev     return 0; /* lights are unbounded currently */
81d86ed7fbStbbdev }
82d86ed7fbStbbdev 
light_intersect(point_light * l,ray * ry)83d86ed7fbStbbdev static void light_intersect(point_light *l, ray *ry) {
84d86ed7fbStbbdev     flt b, disc, t1, t2, temp;
85d86ed7fbStbbdev     vector V;
86d86ed7fbStbbdev 
87d86ed7fbStbbdev     /* Lights do not cast shadows.. */
88d86ed7fbStbbdev     if (ry->flags & RT_RAY_SHADOW)
89d86ed7fbStbbdev         return;
90d86ed7fbStbbdev 
91d86ed7fbStbbdev     VSUB(l->ctr, ry->o, V);
92d86ed7fbStbbdev     VDOT(b, V, ry->d);
93d86ed7fbStbbdev     VDOT(temp, V, V);
94d86ed7fbStbbdev 
95d86ed7fbStbbdev     disc = b * b + l->rad * l->rad - temp;
96d86ed7fbStbbdev 
97d86ed7fbStbbdev     if (disc <= 0.0)
98d86ed7fbStbbdev         return;
99d86ed7fbStbbdev     disc = sqrt(disc);
100d86ed7fbStbbdev 
101d86ed7fbStbbdev     t2 = b + disc;
102d86ed7fbStbbdev     if (t2 <= SPEPSILON)
103d86ed7fbStbbdev         return;
104d86ed7fbStbbdev     add_intersection(t2, (object *)l, ry);
105d86ed7fbStbbdev 
106d86ed7fbStbbdev     t1 = b - disc;
107d86ed7fbStbbdev     if (t1 > SPEPSILON)
108d86ed7fbStbbdev         add_intersection(t1, (object *)l, ry);
109d86ed7fbStbbdev }
110d86ed7fbStbbdev 
light_normal(point_light * l,vector * pnt,ray * incident,vector * N)111d86ed7fbStbbdev static void light_normal(point_light *l, vector *pnt, ray *incident, vector *N) {
112d86ed7fbStbbdev     VSub((vector *)pnt, &(l->ctr), N);
113d86ed7fbStbbdev 
114d86ed7fbStbbdev     VNorm(N);
115d86ed7fbStbbdev 
116d86ed7fbStbbdev     if (VDot(N, &(incident->d)) > 0.0) {
117d86ed7fbStbbdev         N->x = -N->x;
118d86ed7fbStbbdev         N->y = -N->y;
119d86ed7fbStbbdev         N->z = -N->z;
120d86ed7fbStbbdev     }
121d86ed7fbStbbdev }
122