2 Copyright (C) 2018-2019 Carl Hetherington <cth@carlh.net>
4 This file is part of DCP-o-matic.
6 DCP-o-matic is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2 of the License, or
9 (at your option) any later version.
11 DCP-o-matic is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with DCP-o-matic. If not, see <http://www.gnu.org/licenses/>.
21 #include "gl_video_view.h"
22 #include "film_viewer.h"
24 #include "lib/image.h"
25 #include "lib/dcpomatic_assert.h"
26 #include "lib/exceptions.h"
27 #include "lib/cross.h"
28 #include "lib/player_video.h"
29 #include "lib/butler.h"
30 #include <boost/bind/bind.hpp>
34 #include <OpenGL/glu.h>
35 #include <OpenGL/glext.h>
36 #include <OpenGL/CGLTypes.h>
37 #include <OpenGL/OpenGL.h>
40 #ifdef DCPOMATIC_LINUX
45 #ifdef DCPOMATIC_WINDOWS
48 #include <GL/wglext.h>
52 using std::shared_ptr;
53 using boost::optional;
54 #if BOOST_VERSION >= 106100
55 using namespace boost::placeholders;
60 check_gl_error (char const * last)
62 GLenum const e = glGetError ();
63 if (e != GL_NO_ERROR) {
64 throw GLError (last, e);
69 GLVideoView::GLVideoView (FilmViewer* viewer, wxWindow *parent)
72 , _have_storage (false)
73 , _vsync_enabled (false)
77 _canvas = new wxGLCanvas (parent, wxID_ANY, 0, wxDefaultPosition, wxDefaultSize, wxFULL_REPAINT_ON_RESIZE);
78 _canvas->Bind (wxEVT_PAINT, boost::bind(&GLVideoView::update, this));
79 _canvas->Bind (wxEVT_SIZE, boost::bind(&GLVideoView::size_changed, this, _1));
81 _canvas->Bind (wxEVT_TIMER, boost::bind(&GLVideoView::check_for_butler_errors, this));
82 _timer.reset (new wxTimer(_canvas));
88 GLVideoView::size_changed (wxSizeEvent const& ev)
90 _canvas_size = ev.GetSize ();
96 GLVideoView::~GLVideoView ()
98 boost::this_thread::disable_interruption dis;
101 _thread.interrupt ();
105 glDeleteTextures (1, &_id);
109 GLVideoView::check_for_butler_errors ()
111 if (!_viewer->butler()) {
116 _viewer->butler()->rethrow ();
117 } catch (DecodeError& e) {
118 error_dialog (get(), e.what());
119 } catch (dcp::ReadError& e) {
120 error_dialog (get(), wxString::Format(_("Could not read DCP: %s"), std_to_wx(e.what())));
126 GLVideoView::update ()
129 boost::mutex::scoped_lock lm (_canvas_mutex);
130 if (!_canvas->IsShownOnScreen()) {
135 /* macOS gives errors if we don't do this (and therefore [NSOpenGLContext setView:]) from the main thread */
140 if (!_thread.joinable()) {
141 _thread = boost::thread (boost::bind(&GLVideoView::thread, this));
149 GLVideoView::ensure_context ()
152 _context = new wxGLContext (_canvas);
153 _canvas->SetCurrent (*_context);
158 GLVideoView::draw (Position<int> inter_position, dcp::Size inter_size)
160 glClear (GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT);
161 check_gl_error ("glClear");
163 glClearColor (0.0f, 0.0f, 0.0f, 1.0f);
164 check_gl_error ("glClearColor");
165 glEnable (GL_TEXTURE_2D);
166 check_gl_error ("glEnable GL_TEXTURE_2D");
168 check_gl_error ("glEnable GL_BLEND");
169 glDisable (GL_DEPTH_TEST);
170 check_gl_error ("glDisable GL_DEPTH_TEST");
171 glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
173 auto const size = _canvas_size.load();
174 int const width = size.GetWidth();
175 int const height = size.GetHeight();
177 if (width < 64 || height < 0) {
181 glViewport (0, 0, width, height);
182 check_gl_error ("glViewport");
183 glMatrixMode (GL_PROJECTION);
186 DCPOMATIC_DISABLE_WARNINGS
187 gluOrtho2D (0, width, height, 0);
188 DCPOMATIC_ENABLE_WARNINGS
189 check_gl_error ("gluOrtho2d");
190 glMatrixMode (GL_MODELVIEW);
193 glTranslatef (0, 0, 0);
195 dcp::Size const out_size = _viewer->out_size ();
198 /* Render our image (texture) */
201 glVertex2f (0, _size->height);
203 glVertex2f (_size->width, _size->height);
205 glVertex2f (_size->width, 0);
210 /* No image, so just fill with black */
212 glColor3ub (0, 0, 0);
214 glVertex2f (out_size.width, 0);
215 glVertex2f (out_size.width, out_size.height);
216 glVertex2f (0, out_size.height);
221 if (!_viewer->pad_black() && out_size.width < width) {
223 /* XXX: these colours are right for GNOME; may need adjusting for other OS */
224 glColor3ub (240, 240, 240);
225 glVertex2f (out_size.width, 0);
226 glVertex2f (width, 0);
227 glVertex2f (width, height);
228 glVertex2f (out_size.width, height);
230 glColor3ub (255, 255, 255);
233 if (!_viewer->pad_black() && out_size.height < height) {
234 glColor3ub (240, 240, 240);
235 int const gap = (height - out_size.height) / 2;
238 glVertex2f (width, 0);
239 glVertex2f (width, gap);
243 glVertex2f (0, gap + out_size.height + 1);
244 glVertex2f (width, gap + out_size.height + 1);
245 glVertex2f (width, 2 * gap + out_size.height + 2);
246 glVertex2f (0, 2 * gap + out_size.height + 2);
248 glColor3ub (255, 255, 255);
251 if (_viewer->outline_content()) {
252 glColor3ub (255, 0, 0);
253 glBegin (GL_LINE_LOOP);
254 glVertex2f (inter_position.x, inter_position.y + (height - out_size.height) / 2);
255 glVertex2f (inter_position.x + inter_size.width, inter_position.y + (height - out_size.height) / 2);
256 glVertex2f (inter_position.x + inter_size.width, inter_position.y + (height - out_size.height) / 2 + inter_size.height);
257 glVertex2f (inter_position.x, inter_position.y + (height - out_size.height) / 2 + inter_size.height);
259 glColor3ub (255, 255, 255);
263 check_gl_error ("glFlush");
265 boost::mutex::scoped_lock lm (_canvas_mutex);
266 _canvas->SwapBuffers();
270 GLVideoView::set_image (shared_ptr<const Image> image)
273 _size = optional<dcp::Size>();
277 DCPOMATIC_ASSERT (image->pixel_format() == AV_PIX_FMT_RGB24);
278 DCPOMATIC_ASSERT (!image->aligned());
280 if (image->size() != _size) {
281 _have_storage = false;
284 _size = image->size ();
285 glPixelStorei (GL_UNPACK_ALIGNMENT, 1);
286 check_gl_error ("glPixelStorei");
288 glTexSubImage2D (GL_TEXTURE_2D, 0, 0, 0, _size->width, _size->height, GL_RGB, GL_UNSIGNED_BYTE, image->data()[0]);
289 check_gl_error ("glTexSubImage2D");
291 glTexImage2D (GL_TEXTURE_2D, 0, GL_RGB8, _size->width, _size->height, 0, GL_RGB, GL_UNSIGNED_BYTE, image->data()[0]);
292 _have_storage = true;
293 check_gl_error ("glTexImage2D");
296 glTexParameteri (GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
297 glTexParameteri (GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
298 check_gl_error ("glTexParameteri");
300 glTexParameterf (GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP_TO_EDGE);
301 glTexParameterf (GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP_TO_EDGE);
302 check_gl_error ("glTexParameterf");
306 GLVideoView::start ()
310 boost::mutex::scoped_lock lm (_playing_mutex);
312 _thread_work_condition.notify_all ();
318 boost::mutex::scoped_lock lm (_playing_mutex);
324 GLVideoView::thread_playing ()
326 if (length() != dcpomatic::DCPTime()) {
327 dcpomatic::DCPTime const next = position() + one_video_frame();
329 if (next >= length()) {
330 _viewer->finished ();
334 get_next_frame (false);
335 set_image_and_draw ();
339 optional<int> n = time_until_next_frame();
343 get_next_frame (true);
350 GLVideoView::set_image_and_draw ()
352 shared_ptr<PlayerVideo> pv = player_video().first;
354 set_image (pv->image(bind(&PlayerVideo::force, _1, AV_PIX_FMT_RGB24), VideoRange::FULL, false, true));
355 draw (pv->inter_position(), pv->inter_size());
356 _viewer->image_changed (pv);
362 GLVideoView::thread ()
365 start_of_thread ("GLVideoView");
368 boost::mutex::scoped_lock lm (_canvas_mutex);
370 #if defined(DCPOMATIC_OSX)
371 /* Without this we see errors like
372 * ../src/osx/cocoa/glcanvas.mm(194): assert ""context"" failed in SwapBuffers(): should have current context [in thread 700006970000]
374 WXGLSetCurrentContext (_context->GetWXGLContext());
376 /* We must call this here on Linux otherwise we get no image (for reasons
377 * that aren't clear). However, doing ensure_context() from this thread
379 * "[NSOpenGLContext setView:] must be called from the main thread".
385 #if defined(DCPOMATIC_LINUX) && defined(DCPOMATIC_HAVE_GLX_SWAP_INTERVAL_EXT)
386 if (_canvas->IsExtensionSupported("GLX_EXT_swap_control")) {
388 Display* dpy = wxGetX11Display();
389 glXSwapIntervalEXT (dpy, DefaultScreen(dpy), 1);
390 _vsync_enabled = true;
394 #ifdef DCPOMATIC_WINDOWS
395 if (_canvas->IsExtensionSupported("WGL_EXT_swap_control")) {
397 PFNWGLSWAPINTERVALEXTPROC swap = (PFNWGLSWAPINTERVALEXTPROC) wglGetProcAddress("wglSwapIntervalEXT");
400 _vsync_enabled = true;
408 GLint swapInterval = 1;
409 CGLSetParameter (CGLGetCurrentContext(), kCGLCPSwapInterval, &swapInterval);
410 _vsync_enabled = true;
413 glGenTextures (1, &_id);
414 check_gl_error ("glGenTextures");
415 glBindTexture (GL_TEXTURE_2D, _id);
416 check_gl_error ("glBindTexture");
417 glPixelStorei (GL_UNPACK_ALIGNMENT, 1);
418 check_gl_error ("glPixelStorei");
421 boost::mutex::scoped_lock lm (_playing_mutex);
422 while (!_playing && !_one_shot) {
423 _thread_work_condition.wait (lm);
429 } else if (_one_shot) {
431 set_image_and_draw ();
434 boost::this_thread::interruption_point ();
435 dcpomatic_sleep_milliseconds (time_until_next_frame().get_value_or(0));
438 /* XXX: leaks _context, but that seems preferable to deleting it here
439 * without also deleting the wxGLCanvas.
442 catch (boost::thread_interrupted& e)
448 VideoView::NextFrameResult
449 GLVideoView::display_next_frame (bool non_blocking)
451 NextFrameResult const r = get_next_frame (non_blocking);
458 GLVideoView::request_one_shot ()
460 boost::mutex::scoped_lock lm (_playing_mutex);
462 _thread_work_condition.notify_all ();