b515769e4e8d49a6664e418d02745a171df1fb86
[movit] / resource_pool.cpp
1 #include <assert.h>
2 #include <pthread.h>
3 #include <stdio.h>
4 #include <stdlib.h>
5 #include <algorithm>
6 #include <map>
7 #include <string>
8 #include <utility>
9 #include <epoxy/gl.h>
10
11 #include "init.h"
12 #include "resource_pool.h"
13 #include "util.h"
14
15 using namespace std;
16
17 namespace movit {
18
19 ResourcePool::ResourcePool(size_t program_freelist_max_length,
20                            size_t texture_freelist_max_bytes)
21         : program_freelist_max_length(program_freelist_max_length),
22           texture_freelist_max_bytes(texture_freelist_max_bytes),
23           texture_freelist_bytes(0) {
24         pthread_mutex_init(&lock, NULL);
25 }
26
27 ResourcePool::~ResourcePool()
28 {
29         assert(program_refcount.empty());
30
31         for (list<GLuint>::const_iterator freelist_it = program_freelist.begin();
32              freelist_it != program_freelist.end();
33              ++freelist_it) {
34                 delete_program(*freelist_it);
35         }
36         assert(programs.empty());
37         assert(program_shaders.empty());
38
39         for (list<GLuint>::const_iterator freelist_it = texture_freelist.begin();
40              freelist_it != texture_freelist.end();
41              ++freelist_it) {
42                 GLuint free_texture_num = *freelist_it;
43                 assert(texture_formats.count(free_texture_num) != 0);
44                 texture_freelist_bytes -= estimate_texture_size(texture_formats[free_texture_num]);
45                 texture_formats.erase(free_texture_num);
46                 glDeleteTextures(1, &free_texture_num);
47                 check_error();
48         }
49         assert(texture_formats.empty());
50         assert(texture_freelist_bytes == 0);
51 }
52
53 void ResourcePool::delete_program(GLuint glsl_program_num)
54 {
55         bool found_program = false;
56         for (map<pair<string, string>, GLuint>::iterator program_it = programs.begin();
57              program_it != programs.end();
58              ++program_it) {
59                 if (program_it->second == glsl_program_num) {
60                         programs.erase(program_it);
61                         found_program = true;
62                         break;
63                 }
64         }
65         assert(found_program);
66         glDeleteProgram(glsl_program_num);
67
68         map<GLuint, pair<GLuint, GLuint> >::iterator shader_it =
69                 program_shaders.find(glsl_program_num);
70         assert(shader_it != program_shaders.end());
71
72         glDeleteShader(shader_it->second.first);
73         glDeleteShader(shader_it->second.second);
74         program_shaders.erase(shader_it);
75 }
76
77 GLuint ResourcePool::compile_glsl_program(const string& vertex_shader, const string& fragment_shader)
78 {
79         GLuint glsl_program_num;
80         pthread_mutex_lock(&lock);
81         const pair<string, string> key(vertex_shader, fragment_shader);
82         if (programs.count(key)) {
83                 // Already in the cache. Increment the refcount, or take it off the freelist
84                 // if it's zero.
85                 glsl_program_num = programs[key];
86                 map<GLuint, int>::iterator refcount_it = program_refcount.find(glsl_program_num);
87                 if (refcount_it != program_refcount.end()) {
88                         ++refcount_it->second;
89                 } else {
90                         list<GLuint>::iterator freelist_it =
91                                 find(program_freelist.begin(), program_freelist.end(), glsl_program_num);
92                         assert(freelist_it != program_freelist.end());
93                         program_freelist.erase(freelist_it);
94                         program_refcount.insert(make_pair(glsl_program_num, 1));
95                 }
96         } else {
97                 // Not in the cache. Compile the shaders.
98                 glsl_program_num = glCreateProgram();
99                 GLuint vs_obj = compile_shader(vertex_shader, GL_VERTEX_SHADER);
100                 GLuint fs_obj = compile_shader(fragment_shader, GL_FRAGMENT_SHADER);
101                 glAttachShader(glsl_program_num, vs_obj);
102                 check_error();
103                 glAttachShader(glsl_program_num, fs_obj);
104                 check_error();
105                 glLinkProgram(glsl_program_num);
106                 check_error();
107
108                 GLint success;
109                 glGetProgramiv(glsl_program_num, GL_LINK_STATUS, &success);
110                 if (success == GL_FALSE) {
111                         GLchar error_log[1024] = {0};
112                         glGetProgramInfoLog(glsl_program_num, 1024, NULL, error_log);
113                         fprintf(stderr, "Error linking program: %s\n", error_log);
114                         exit(1);
115                 }
116
117                 if (movit_debug_level == MOVIT_DEBUG_ON) {
118                         // Output shader to a temporary file, for easier debugging.
119                         static int compiled_shader_num = 0;
120                         char filename[256];
121                         sprintf(filename, "chain-%03d.frag", compiled_shader_num++);
122                         FILE *fp = fopen(filename, "w");
123                         if (fp == NULL) {
124                                 perror(filename);
125                                 exit(1);
126                         }
127                         fprintf(fp, "%s\n", fragment_shader.c_str());
128                         fclose(fp);
129                 }
130
131                 programs.insert(make_pair(key, glsl_program_num));
132                 program_refcount.insert(make_pair(glsl_program_num, 1));
133                 program_shaders.insert(make_pair(glsl_program_num, make_pair(vs_obj, fs_obj)));
134         }
135         pthread_mutex_unlock(&lock);
136         return glsl_program_num;
137 }
138
139 void ResourcePool::release_glsl_program(GLuint glsl_program_num)
140 {
141         pthread_mutex_lock(&lock);
142         map<GLuint, int>::iterator refcount_it = program_refcount.find(glsl_program_num);
143         assert(refcount_it != program_refcount.end());
144
145         if (--refcount_it->second == 0) {
146                 program_refcount.erase(refcount_it);
147                 assert(find(program_freelist.begin(), program_freelist.end(), glsl_program_num)
148                         == program_freelist.end());
149                 program_freelist.push_front(glsl_program_num);
150                 if (program_freelist.size() > program_freelist_max_length) {
151                         delete_program(program_freelist.back());
152                         program_freelist.pop_back();
153                 }
154         }
155
156         pthread_mutex_unlock(&lock);
157 }
158
159 GLuint ResourcePool::create_2d_texture(GLint internal_format, GLsizei width, GLsizei height)
160 {
161         pthread_mutex_lock(&lock);
162         // See if there's a texture on the freelist we can use.
163         for (list<GLuint>::iterator freelist_it = texture_freelist.begin();
164              freelist_it != texture_freelist.end();
165              ++freelist_it) {
166                 GLuint texture_num = *freelist_it;
167                 map<GLuint, Texture2D>::const_iterator format_it = texture_formats.find(texture_num);
168                 assert(format_it != texture_formats.end());
169                 if (format_it->second.internal_format == internal_format &&
170                     format_it->second.width == width &&
171                     format_it->second.height == height) {
172                         texture_freelist_bytes -= estimate_texture_size(format_it->second);
173                         texture_freelist.erase(freelist_it);
174                         pthread_mutex_unlock(&lock);
175                         return texture_num;
176                 }
177         }
178
179         // Find any reasonable format given the internal format; OpenGL validates it
180         // even though we give NULL as pointer.
181         GLenum format;
182         switch (internal_format) {
183         case GL_RGBA32F_ARB:
184         case GL_RGBA16F_ARB:
185         case GL_RGBA8:
186         case GL_SRGB8_ALPHA8:
187                 format = GL_RGBA;
188                 break;
189         case GL_RG32F:
190         case GL_RG16F:
191                 format = GL_RG;
192                 break;
193         case GL_R8:
194                 format = GL_RED;
195                 break;
196         default:
197                 // TODO: Add more here as needed.
198                 assert(false);
199         }
200
201         GLuint texture_num;
202         glGenTextures(1, &texture_num);
203         check_error();
204         glBindTexture(GL_TEXTURE_2D, texture_num);
205         check_error();
206         glTexImage2D(GL_TEXTURE_2D, 0, internal_format, width, height, 0, format, GL_UNSIGNED_BYTE, NULL);
207         check_error();
208         glBindTexture(GL_TEXTURE_2D, 0);
209         check_error();
210
211         Texture2D texture_format;
212         texture_format.internal_format = internal_format;
213         texture_format.width = width;
214         texture_format.height = height;
215         assert(texture_formats.count(texture_num) == 0);
216         texture_formats.insert(make_pair(texture_num, texture_format));
217
218         pthread_mutex_unlock(&lock);
219         return texture_num;
220 }
221
222 void ResourcePool::release_2d_texture(GLuint texture_num)
223 {
224         pthread_mutex_lock(&lock);
225         texture_freelist.push_front(texture_num);
226         assert(texture_formats.count(texture_num) != 0);
227         texture_freelist_bytes += estimate_texture_size(texture_formats[texture_num]);
228
229         while (texture_freelist_bytes > texture_freelist_max_bytes) {
230                 GLuint free_texture_num = texture_freelist.front();
231                 texture_freelist.pop_front();
232                 assert(texture_formats.count(free_texture_num) != 0);
233                 texture_freelist_bytes -= estimate_texture_size(texture_formats[free_texture_num]);
234                 texture_formats.erase(free_texture_num);
235                 glDeleteTextures(1, &free_texture_num);
236                 check_error();
237         }
238         pthread_mutex_unlock(&lock);
239 }
240
241 size_t ResourcePool::estimate_texture_size(const Texture2D &texture_format)
242 {
243         size_t bytes_per_pixel;
244
245         switch (texture_format.internal_format) {
246         case GL_RGBA32F_ARB:
247                 bytes_per_pixel = 16;
248                 break;
249         case GL_RGBA16F_ARB:
250                 bytes_per_pixel = 8;
251                 break;
252         case GL_RGBA8:
253         case GL_SRGB8_ALPHA8:
254                 bytes_per_pixel = 4;
255                 break;
256         case GL_RG32F:
257                 bytes_per_pixel = 8;
258                 break;
259         case GL_RG16F:
260                 bytes_per_pixel = 4;
261                 break;
262         case GL_R8:
263                 bytes_per_pixel = 1;
264                 break;
265         default:
266                 // TODO: Add more here as needed.
267                 assert(false);
268         }
269
270         return texture_format.width * texture_format.height * bytes_per_pixel;
271 }
272
273 }  // namespace movit