]> git.sesse.net Git - movit/blob - util.cpp
e266fb813921e606abd95a374f0a5772c0fd1edb
[movit] / util.cpp
1 #include <epoxy/gl.h>
2 #include <assert.h>
3 #include <math.h>
4 #include <stdio.h>
5 #include <stdlib.h>
6 #include <string.h>
7 #include <locale>
8 #include <sstream>
9 #include <string>
10 #include <Eigen/Core>
11
12 #include "fp16.h"
13 #include "init.h"
14 #include "util.h"
15
16 #if defined(__APPLE__)
17 #include <OpenGL/OpenGL.h>
18 #elif defined(WIN32)
19 #include <epoxy/wgl.h>
20 #else
21 #include <epoxy/glx.h>
22 #endif
23
24 using namespace std;
25
26 namespace movit {
27
28 extern string *movit_data_directory;
29
30 void hsv2rgb(float h, float s, float v, float *r, float *g, float *b)
31 {
32         if (h < 0.0f) {
33                 h += 2.0f * M_PI;
34         }
35         float c = v * s;
36         float hp = (h * 180.0 / M_PI) / 60.0;
37         float x = c * (1 - fabs(fmod(hp, 2.0f) - 1.0f));
38
39         if (hp >= 0 && hp < 1) {
40                 *r = c;
41                 *g = x;
42                 *b = 0.0f;
43         } else if (hp >= 1 && hp < 2) {
44                 *r = x;
45                 *g = c;
46                 *b = 0.0f;
47         } else if (hp >= 2 && hp < 3) {
48                 *r = 0.0f;
49                 *g = c;
50                 *b = x;
51         } else if (hp >= 3 && hp < 4) {
52                 *r = 0.0f;
53                 *g = x;
54                 *b = c;
55         } else if (hp >= 4 && hp < 5) {
56                 *r = x;
57                 *g = 0.0f;
58                 *b = c;
59         } else {
60                 *r = c;
61                 *g = 0.0f;
62                 *b = x;
63         }
64
65         float m = v - c;
66         *r += m;
67         *g += m;
68         *b += m;
69 }
70
71 void hsv2rgb_normalized(float h, float s, float v, float *r, float *g, float *b)
72 {
73         float ref_r, ref_g, ref_b;
74         hsv2rgb(h, s, v, r, g, b);
75         hsv2rgb(h, 0.0f, v, &ref_r, &ref_g, &ref_b);
76         float lum = 0.2126 * *r + 0.7152 * *g + 0.0722 * *b;
77         float ref_lum = 0.2126 * ref_r + 0.7152 * ref_g + 0.0722 * ref_b;
78         if (lum > 1e-3) {
79                 float fac = ref_lum / lum;
80                 *r *= fac;
81                 *g *= fac;
82                 *b *= fac;
83         }
84 }
85
86 string read_file(const string &filename)
87 {
88         const string full_pathname = *movit_data_directory + "/" + filename;
89
90         FILE *fp = fopen(full_pathname.c_str(), "r");
91         if (fp == NULL) {
92                 perror(full_pathname.c_str());
93                 exit(1);
94         }
95
96         int ret = fseek(fp, 0, SEEK_END);
97         if (ret == -1) {
98                 perror("fseek(SEEK_END)");
99                 exit(1);
100         }
101
102         int size = ftell(fp);
103
104         ret = fseek(fp, 0, SEEK_SET);
105         if (ret == -1) {
106                 perror("fseek(SEEK_SET)");
107                 exit(1);
108         }
109
110         string str;
111         str.resize(size);
112         ret = fread(&str[0], size, 1, fp);
113         if (ret == -1) {
114                 perror("fread");
115                 exit(1);
116         }
117         if (ret == 0) {
118                 fprintf(stderr, "Short read when trying to read %d bytes from %s\n",
119                         size, full_pathname.c_str());
120                 exit(1);
121         }
122         fclose(fp);
123
124         return str;
125 }
126
127 string read_version_dependent_file(const string &base, const string &extension)
128 {
129         if (movit_shader_model == MOVIT_GLSL_110) {
130                 return read_file(base + "." + extension);
131         } else if (movit_shader_model == MOVIT_GLSL_130) {
132                 return read_file(base + ".130." + extension);
133         } else if (movit_shader_model == MOVIT_ESSL_300) {
134                 return read_file(base + ".300es." + extension);
135         } else {
136                 assert(false);
137         }
138 }
139
140 GLuint compile_shader(const string &shader_src, GLenum type)
141 {
142         GLuint obj = glCreateShader(type);
143         const GLchar* source[] = { shader_src.data() };
144         const GLint length[] = { (GLint)shader_src.size() };
145         glShaderSource(obj, 1, source, length);
146         glCompileShader(obj);
147
148         GLchar info_log[4096];
149         GLsizei log_length = sizeof(info_log) - 1;
150         glGetShaderInfoLog(obj, log_length, &log_length, info_log);
151         info_log[log_length] = 0; 
152         if (strlen(info_log) > 0) {
153                 fprintf(stderr, "Shader compile log: %s\n", info_log);
154         }
155
156         GLint status;
157         glGetShaderiv(obj, GL_COMPILE_STATUS, &status);
158         if (status == GL_FALSE) {
159                 fprintf(stderr, "Failed to compile shader: %s\n", shader_src.c_str());
160                 exit(1);
161         }
162
163         return obj;
164 }
165
166 void print_3x3_matrix(const Eigen::Matrix3d& m)
167 {
168         printf("%6.4f %6.4f %6.4f\n", m(0,0), m(0,1), m(0,2));
169         printf("%6.4f %6.4f %6.4f\n", m(1,0), m(1,1), m(1,2));
170         printf("%6.4f %6.4f %6.4f\n", m(2,0), m(2,1), m(2,2));
171         printf("\n");
172 }
173
174 string output_glsl_mat3(const string &name, const Eigen::Matrix3d &m)
175 {
176         // Use stringstream to be independent of the current locale in a thread-safe manner.
177         stringstream ss;
178         ss.imbue(locale("C"));
179         ss.precision(8);
180         ss << scientific;
181         ss << "const mat3 " << name << " = mat3(\n";
182         ss << "    " << m(0,0) << ", " << m(1,0) << ", " << m(2,0) << ",\n";
183         ss << "    " << m(0,1) << ", " << m(1,1) << ", " << m(2,1) << ",\n";
184         ss << "    " << m(0,2) << ", " << m(1,2) << ", " << m(2,2) << ");\n\n";
185         return ss.str();
186 }
187
188 string output_glsl_float(const string &name, float x)
189 {
190         // Use stringstream to be independent of the current locale in a thread-safe manner.
191         stringstream ss;
192         ss.imbue(locale("C"));
193         ss.precision(8);
194         ss << scientific;
195         ss << "const float " << name << " = " << x << ";\n";
196         return ss.str();
197 }
198
199 string output_glsl_vec2(const string &name, float x, float y)
200 {
201         // Use stringstream to be independent of the current locale in a thread-safe manner.
202         stringstream ss;
203         ss.imbue(locale("C"));
204         ss.precision(8);
205         ss << scientific;
206         ss << "const vec2 " << name << " = vec2(" << x << ", " << y << ");\n";
207         return ss.str();
208 }
209
210 string output_glsl_vec3(const string &name, float x, float y, float z)
211 {
212         // Use stringstream to be independent of the current locale in a thread-safe manner.
213         stringstream ss;
214         ss.imbue(locale("C"));
215         ss.precision(8);
216         ss << scientific;
217         ss << "const vec3 " << name << " = vec3(" << x << ", " << y << ", " << z << ");\n";
218         return ss.str();
219 }
220
221 template<class DestFloat>
222 void combine_two_samples(float w1, float w2, float pos1, float pos2, unsigned size,
223                          DestFloat *offset, DestFloat *total_weight, float *sum_sq_error)
224 {
225         assert(movit_initialized);
226         assert(w1 * w2 >= 0.0f);  // Should not have differing signs.
227         float z;  // Normalized 0..1 between pos1 and pos2.
228         if (fabs(w1 + w2) < 1e-6) {
229                 z = 0.5f;
230         } else {
231                 z = w2 / (w1 + w2);
232         }
233
234         // Round to the desired precision. Note that this might take z outside the 0..1 range.
235         *offset = from_fp64<DestFloat>(pos1 + z * (pos2 - pos1));
236         z = (to_fp64(*offset) - pos1) / (pos2 - pos1);
237
238         // Round to the minimum number of bits we have measured earlier.
239         // The card will do this for us anyway, but if we know what the real z
240         // is, we can pick a better total_weight below.
241         z *= size;  // Move to pixel coordinates,
242         z = lrintf(z / movit_texel_subpixel_precision) * movit_texel_subpixel_precision;  // Round.
243         z /= size;  // Move back to normalized coordinates.
244         
245         // Choose total weight w so that we minimize total squared error
246         // for the effective weights:
247         //
248         //   e = (w(1-z) - a)² + (wz - b)²
249         //
250         // Differentiating by w and setting equal to zero:
251         //
252         //   2(w(1-z) - a)(1-z) + 2(wz - b)z = 0
253         //   w(1-z)² - a(1-z) + wz² - bz = 0
254         //   w((1-z)² + z²) = a(1-z) + bz
255         //   w = (a(1-z) + bz) / ((1-z)² + z²)
256         //
257         // If z had infinite precision, this would simply reduce to w = w1 + w2.
258         *total_weight = (w1 * (1 - z) + w2 * z) / (z * z + (1 - z) * (1 - z));
259
260         if (sum_sq_error != NULL) {
261                 float err1 = *total_weight * (1 - z) - w1;
262                 float err2 = *total_weight * z - w2;
263                 *sum_sq_error = err1 * err1 + err2 * err2;
264         }
265 }
266
267 // Explicit instantiations.
268 template
269 void combine_two_samples<float>(float w1, float w2, float pos1, float pos2, unsigned size,
270                                 float *offset, float *total_weight, float *sum_sq_error);
271
272 template
273 void combine_two_samples<fp16_int_t>(float w1, float w2, float pos1, float pos2, unsigned size,
274                                      fp16_int_t *offset, fp16_int_t *total_weight, float *sum_sq_error);
275
276 GLuint fill_vertex_attribute(GLuint glsl_program_num, const string &attribute_name, GLint size, GLenum type, GLsizeiptr data_size, const GLvoid *data)
277 {
278         int attrib = glGetAttribLocation(glsl_program_num, attribute_name.c_str());
279         if (attrib == -1) {
280                 return -1;
281         }
282
283         GLuint vbo;
284         glGenBuffers(1, &vbo);
285         check_error();
286         glBindBuffer(GL_ARRAY_BUFFER, vbo);
287         check_error();
288         glBufferData(GL_ARRAY_BUFFER, data_size, data, GL_STATIC_DRAW);
289         check_error();
290         glEnableVertexAttribArray(attrib);
291         check_error();
292         glVertexAttribPointer(attrib, size, type, GL_FALSE, 0, BUFFER_OFFSET(0));
293         check_error();
294         glBindBuffer(GL_ARRAY_BUFFER, 0);
295         check_error();
296
297         return vbo;
298 }
299
300 void cleanup_vertex_attribute(GLuint glsl_program_num, const string &attribute_name, GLuint vbo)
301 {
302         int attrib = glGetAttribLocation(glsl_program_num, attribute_name.c_str());
303         if (attrib == -1) {
304                 return;
305         }
306
307         glDisableVertexAttribArray(attrib);
308         check_error();
309         glDeleteBuffers(1, &vbo);
310         check_error();
311 }
312
313 unsigned div_round_up(unsigned a, unsigned b)
314 {
315         return (a + b - 1) / b;
316 }
317
318 // Algorithm from http://graphics.stanford.edu/~seander/bithacks.html#RoundUpPowerOf2.
319 unsigned next_power_of_two(unsigned v)
320 {
321         v--;
322         v |= v >> 1;
323         v |= v >> 2;
324         v |= v >> 4;
325         v |= v >> 8;
326         v |= v >> 16;
327         v++;
328         return v;
329 }
330
331 void *get_gl_context_identifier()
332 {
333 #if defined(__APPLE__)
334         return (void *)CGLGetCurrentContext();
335 #elif defined(WIN32)
336         return (void *)wglGetCurrentContext();
337 #else
338         return (void *)glXGetCurrentContext();
339 #endif
340 }
341
342 }  // namespace movit