2 * copyright (c) 2010 Sveriges Television AB <info@casparcg.com>
\r
4 * This file is part of CasparCG.
\r
6 * CasparCG is free software: you can redistribute it and/or modify
\r
7 * it under the terms of the GNU General Public License as published by
\r
8 * the Free Software Foundation, either version 3 of the License, or
\r
9 * (at your option) any later version.
\r
11 * CasparCG is distributed in the hope that it will be useful,
\r
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
\r
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
\r
14 * GNU General Public License for more details.
\r
16 * You should have received a copy of the GNU General Public License
\r
17 * along with CasparCG. If not, see <http://www.gnu.org/licenses/>.
\r
22 #include "../../stdafx.h"
\r
24 #include "ogl_device.h"
\r
28 #include <common/exception/exceptions.h>
\r
29 #include <common/utility/assert.h>
\r
30 #include <common/gl/gl_check.h>
\r
32 #include <boost/foreach.hpp>
\r
34 #include <gl/glew.h>
\r
36 namespace caspar { namespace core {
\r
38 ogl_device::ogl_device()
\r
39 : executor_(L"ogl_device")
\r
41 , attached_texture_(0)
\r
44 std::fill(binded_textures_.begin(), binded_textures_.end(), 0);
\r
45 std::fill(viewport_.begin(), viewport_.end(), 0);
\r
46 std::fill(scissor_.begin(), scissor_.end(), 0);
\r
50 context_.reset(new sf::Context());
\r
51 context_->SetActive(true);
\r
53 if (glewInit() != GLEW_OK)
\r
54 BOOST_THROW_EXCEPTION(gl::ogl_exception() << msg_info("Failed to initialize GLEW."));
\r
56 if(!GLEW_VERSION_3_2)
\r
57 CASPAR_LOG(warning) << "Missing OpenGL 3.2 support.";
\r
59 GL(glGenFramebuffers(1, &fbo_));
\r
60 GL(glBindFramebuffer(GL_FRAMEBUFFER_EXT, fbo_));
\r
61 GL(glReadBuffer(GL_COLOR_ATTACHMENT0_EXT));
\r
62 GL(glDisable(GL_MULTISAMPLE_ARB));
\r
66 ogl_device::~ogl_device()
\r
70 BOOST_FOREACH(auto& pool, device_pools_)
\r
72 BOOST_FOREACH(auto& pool, host_pools_)
\r
74 glDeleteFramebuffersEXT(1, &fbo_);
\r
78 safe_ptr<device_buffer> ogl_device::create_device_buffer(size_t width, size_t height, size_t stride)
\r
80 CASPAR_VERIFY(stride > 0 && stride < 5);
\r
81 CASPAR_VERIFY(width > 0 && height > 0);
\r
82 auto& pool = device_pools_[stride-1][((width << 16) & 0xFFFF0000) | (height & 0x0000FFFF)];
\r
83 std::shared_ptr<device_buffer> buffer;
\r
84 if(!pool->items.try_pop(buffer))
\r
86 executor_.invoke([&]
\r
90 buffer.reset(new device_buffer(width, height, stride));
\r
100 buffer.reset(new device_buffer(width, height, stride));
\r
104 CASPAR_LOG(error) << L"ogl: create_device_buffer failed!";
\r
108 }, high_priority);
\r
111 ++pool->usage_count;
\r
113 return safe_ptr<device_buffer>(buffer.get(), [=](device_buffer*) mutable
\r
115 pool->items.push(buffer);
\r
119 safe_ptr<host_buffer> ogl_device::create_host_buffer(size_t size, host_buffer::usage_t usage)
\r
121 CASPAR_VERIFY(usage == host_buffer::write_only || usage == host_buffer::read_only);
\r
122 CASPAR_VERIFY(size > 0);
\r
123 auto& pool = host_pools_[usage][size];
\r
124 std::shared_ptr<host_buffer> buffer;
\r
125 if(!pool->items.try_pop(buffer))
\r
127 executor_.invoke([&]
\r
131 buffer.reset(new host_buffer(size, usage));
\r
132 if(usage == host_buffer::write_only)
\r
145 buffer.reset(new host_buffer(size, usage));
\r
146 if(usage == host_buffer::write_only)
\r
153 CASPAR_LOG(error) << L"ogl: create_host_buffer failed!";
\r
157 }, high_priority);
\r
160 ++pool->usage_count;
\r
162 return safe_ptr<host_buffer>(buffer.get(), [=](host_buffer*) mutable
\r
164 executor_.begin_invoke([=]() mutable
\r
166 if(usage == host_buffer::write_only)
\r
171 pool->items.push(buffer);
\r
172 }, high_priority);
\r
176 template<typename T>
\r
177 void flush_pool(buffer_pool<T>& pool)
\r
179 if(pool.flush_count.fetch_and_increment() < 16)
\r
182 if(pool.usage_count.fetch_and_store(0) < pool.items.size())
\r
184 std::shared_ptr<T> buffer;
\r
185 pool.items.try_pop(buffer);
\r
188 pool.flush_count = 0;
\r
189 pool.usage_count = 0;
\r
192 void ogl_device::flush()
\r
198 BOOST_FOREACH(auto& pools, device_pools_)
\r
200 BOOST_FOREACH(auto& pool, pools)
\r
201 flush_pool(*pool.second);
\r
203 BOOST_FOREACH(auto& pools, host_pools_)
\r
205 BOOST_FOREACH(auto& pool, pools)
\r
206 flush_pool(*pool.second);
\r
211 CASPAR_LOG_CURRENT_EXCEPTION();
\r
215 void ogl_device::yield()
\r
220 boost::unique_future<void> ogl_device::gc()
\r
222 return begin_invoke([=]
\r
224 CASPAR_LOG(info) << " ogl: Running GC.";
\r
228 BOOST_FOREACH(auto& pools, device_pools_)
\r
230 BOOST_FOREACH(auto& pool, pools)
\r
231 pool.second->items.clear();
\r
233 BOOST_FOREACH(auto& pools, host_pools_)
\r
235 BOOST_FOREACH(auto& pool, pools)
\r
236 pool.second->items.clear();
\r
241 CASPAR_LOG_CURRENT_EXCEPTION();
\r
246 std::wstring ogl_device::get_version()
\r
248 static std::wstring ver = L"Not found";
\r
252 ver = widen(tmp.invoke([]{return std::string(reinterpret_cast<const char*>(glGetString(GL_VERSION)));})
\r
253 + " " + tmp.invoke([]{return std::string(reinterpret_cast<const char*>(glGetString(GL_VENDOR)));}));
\r
261 void ogl_device::enable(GLenum cap)
\r
263 auto& val = caps_[cap];
\r
271 void ogl_device::disable(GLenum cap)
\r
273 auto& val = caps_[cap];
\r
281 void ogl_device::viewport(size_t x, size_t y, size_t width, size_t height)
\r
283 if(x != viewport_[0] || y != viewport_[1] || width != viewport_[2] || height != viewport_[3])
\r
285 glViewport(x, y, width, height);
\r
288 viewport_[2] = width;
\r
289 viewport_[3] = height;
\r
293 void ogl_device::scissor(size_t x, size_t y, size_t width, size_t height)
\r
295 if(x != scissor_[0] || y != scissor_[1] || width != scissor_[2] || height != scissor_[3])
\r
297 glScissor(x, y, width, height);
\r
300 scissor_[2] = width;
\r
301 scissor_[3] = height;
\r
305 void ogl_device::stipple_pattern(const GLubyte* pattern)
\r
307 if(pattern_ != pattern)
\r
309 glPolygonStipple(pattern);
\r
310 pattern_ = pattern;
\r
314 void ogl_device::attach(device_buffer& texture)
\r
316 if(attached_texture_ != texture.id())
\r
318 GL(glFramebufferTexture2D(GL_FRAMEBUFFER, GL_COLOR_ATTACHMENT0 + 0, GL_TEXTURE_2D, texture.id(), 0));
\r
319 attached_texture_ = texture.id();
\r
323 void ogl_device::clear(device_buffer& texture)
\r
326 GL(glClear(GL_COLOR_BUFFER_BIT));
\r
329 void ogl_device::use(shader& shader)
\r
331 if(active_shader_ != shader.id())
\r
333 GL(glUseProgramObjectARB(shader.id()));
\r
334 active_shader_ = shader.id();
\r