Cycles: OpenCL tweaks
[blender.git] / intern / cycles / kernel / kernel_compat_cpu.h
1 /*
2  * Copyright 2011, Blender Foundation.
3  *
4  * This program is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU General Public License
6  * as published by the Free Software Foundation; either version 2
7  * of the License, or (at your option) any later version.
8  *
9  * This program is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  * GNU General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License
15  * along with this program; if not, write to the Free Software Foundation,
16  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
17  */
18
19 #ifndef __KERNEL_COMPAT_CPU_H__
20 #define __KERNEL_COMPAT_CPU_H__
21
22 #define __KERNEL_CPU__
23
24 #include "util_debug.h"
25 #include "util_math.h"
26 #include "util_types.h"
27
28 CCL_NAMESPACE_BEGIN
29
30 /* Assertions inside the kernel only work for the CPU device, so we wrap it in
31    a macro which is empty for other devices */
32
33 #define kernel_assert(cond) assert(cond)
34
35 /* Texture types to be compatible with CUDA textures. These are really just
36    simple arrays and after inlining fetch hopefully revert to being a simple
37    pointer lookup. */
38
39 template<typename T> struct texture  {
40         T fetch(int index)
41         {
42                 kernel_assert(index >= 0 && index < width);
43                 return data[index];
44         }
45
46         /*__m128 fetch_m128(int index)
47         {
48                 kernel_assert(index >= 0 && index < width);
49                 return ((__m128*)data)[index];
50         }
51
52         __m128i fetch_m128i(int index)
53         {
54                 kernel_assert(index >= 0 && index < width);
55                 return ((__m128i*)data)[index];
56         }*/
57
58         float interp(float x, int size)
59         {
60                 kernel_assert(size == width);
61
62                 x = clamp(x, 0.0f, 1.0f)*width;
63
64                 int index = min((int)x, width-1);
65                 int nindex = min(index+1, width-1);
66                 float t = x - index;
67
68                 return (1.0f - t)*data[index] + t*data[nindex];
69         }
70
71         T *data;
72         int width;
73 };
74
75 template<typename T> struct texture_image  {
76         float4 read(float4 r)
77         {
78                 return r;
79         }
80
81         float4 read(uchar4 r)
82         {
83                 float f = 1.0f/255.0f;
84                 return make_float4(r.x*f, r.y*f, r.z*f, r.w*f);
85         }
86
87         int wrap_periodic(int x, int width)
88         {
89                 x %= width;
90                 if(x < 0)
91                         x += width;
92                 return x;
93         }
94
95         int wrap_clamp(int x, int width)
96         {
97                 return clamp(x, 0, width-1);
98         }
99
100         float frac(float x, int *ix)
101         {
102                 int i = (int)x - ((x < 0.0f)? 1: 0);
103                 *ix = i;
104                 return x - (float)i;
105         }
106
107         float4 interp(float x, float y, bool periodic = true)
108         {
109                 if(!data)
110                         return make_float4(0.0f, 0.0f, 0.0f, 0.0f);
111
112                 int ix, iy, nix, niy;
113                 float tx = frac(x*width, &ix);
114                 float ty = frac(y*height, &iy);
115
116                 if(periodic) {
117                         ix = wrap_periodic(ix, width);
118                         iy = wrap_periodic(iy, height);
119
120                         nix = wrap_periodic(ix+1, width);
121                         niy = wrap_periodic(iy+1, height);
122                 }
123                 else {
124                         ix = wrap_clamp(ix, width);
125                         iy = wrap_clamp(iy, height);
126
127                         nix = wrap_clamp(ix+1, width);
128                         niy = wrap_clamp(iy+1, height);
129                 }
130
131                 float4 r = (1.0f - ty)*(1.0f - tx)*read(data[ix + iy*width]);
132                 r += (1.0f - ty)*tx*read(data[nix + iy*width]);
133                 r += ty*(1.0f - tx)*read(data[ix + niy*width]);
134                 r += ty*tx*read(data[nix + niy*width]);
135
136                 return r;
137         }
138
139         T *data;
140         int width, height;
141 };
142
143 typedef texture<float4> texture_float4;
144 typedef texture<float> texture_float;
145 typedef texture<uint> texture_uint;
146 typedef texture<int> texture_int;
147 typedef texture<uint4> texture_uint4;
148 typedef texture_image<float4> texture_image_float4;
149 typedef texture_image<uchar4> texture_image_uchar4;
150
151 /* Macros to handle different memory storage on different devices */
152
153 #define kernel_tex_fetch(tex, index) (kg->tex.fetch(index))
154 #define kernel_tex_fetch_m128(tex, index) (kg->tex.fetch_m128(index))
155 #define kernel_tex_fetch_m128i(tex, index) (kg->tex.fetch_m128i(index))
156 #define kernel_tex_interp(tex, t, size) (kg->tex.interp(t, size))
157 #define kernel_tex_image_interp(tex, x, y) (kg->tex.interp(x, y))
158
159 #define kernel_data (kg->__data)
160
161 CCL_NAMESPACE_END
162
163 #endif /* __KERNEL_COMPAT_CPU_H__ */
164