]> git.sesse.net Git - casparcg/blob - modules/ogl/consumer/ogl_consumer.cpp
313991c5f7e0d6219fc3d8f06d4d8955625bebf1
[casparcg] / modules / ogl / consumer / ogl_consumer.cpp
1 /*\r
2 * copyright (c) 2010 Sveriges Television AB <info@casparcg.com>\r
3 *\r
4 *  This file is part of CasparCG.\r
5 *\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
10 *\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
15 \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
18 *\r
19 */\r
20 \r
21 #define NOMINMAX\r
22 #define WIN32_LEAN_AND_MEAN\r
23 \r
24 #include <windows.h>\r
25 #include <GL/glew.h>\r
26 #include <SFML/Window.hpp>\r
27 \r
28 #include "ogl_consumer.h"\r
29 \r
30 #include <common/gl/gl_check.h>\r
31 #include <common/concurrency/executor.h>\r
32 #include <common/memory/safe_ptr.h>\r
33 #include <common/memory/memcpy.h>\r
34 #include <common/diagnostics/graph.h>\r
35 #include <common/utility/timer.h>\r
36 \r
37 #include <core/video_format.h>\r
38 #include <core/mixer/read_frame.h>\r
39 #include <core/consumer/frame_consumer.h>\r
40 \r
41 #include <boost/timer.hpp>\r
42 #include <boost/circular_buffer.hpp>\r
43 \r
44 #include <algorithm>\r
45 #include <array>\r
46 \r
47 namespace caspar {\r
48                 \r
49 enum stretch\r
50 {\r
51         none,\r
52         uniform,\r
53         fill,\r
54         uniform_to_fill\r
55 };\r
56 \r
57 struct ogl_consumer : boost::noncopyable\r
58 {               \r
59         float                                   width_;\r
60         float                                   height_;\r
61 \r
62         GLuint                                  texture_;\r
63         std::array<GLuint, 2>   pbos_;\r
64 \r
65         const bool                              windowed_;\r
66         unsigned int                    screen_width_;\r
67         unsigned int                    screen_height_;\r
68         const unsigned int              screen_index_;\r
69                                 \r
70         const stretch                   stretch_;\r
71         core::video_format_desc format_desc_;\r
72         \r
73         sf::Window                              window_;\r
74         \r
75         safe_ptr<diagnostics::graph> graph_;\r
76         boost::timer                    perf_timer_;\r
77 \r
78         size_t                                  square_width_;\r
79         size_t                                  square_height_;\r
80 \r
81         boost::circular_buffer<safe_ptr<core::read_frame>> frame_buffer_;\r
82 \r
83         executor                                executor_;\r
84 public:\r
85         ogl_consumer(unsigned int screen_index, stretch stretch, bool windowed, const core::video_format_desc& format_desc) \r
86                 : stretch_(stretch)\r
87                 , windowed_(windowed)\r
88                 , texture_(0)\r
89                 , screen_index_(screen_index)\r
90                 , format_desc_(format_desc_)\r
91                 , graph_(diagnostics::create_graph(narrow(print())))\r
92                 , frame_buffer_(core::consumer_buffer_depth())\r
93                 , executor_(print())\r
94         {               \r
95                 graph_->add_guide("frame-time", 0.5);\r
96                 graph_->set_color("frame-time", diagnostics::color(1.0f, 0.0f, 0.0f));\r
97                 \r
98                 format_desc_ = format_desc;\r
99 \r
100                 square_width_ = format_desc_.width;\r
101                 square_height_ = format_desc_.height;\r
102                                                 \r
103                 if(format_desc_.format == core::video_format::pal)\r
104                 {\r
105                         square_width_ = 768;\r
106                         square_height_ = 576;\r
107                 }\r
108                 else if(format_desc_.format == core::video_format::ntsc)\r
109                 {\r
110                         square_width_ = 720;\r
111                         square_height_ = 547;\r
112                 }\r
113 \r
114                 screen_width_ = format_desc.width;\r
115                 screen_height_ = format_desc.height;\r
116 #ifdef _WIN32\r
117                 DISPLAY_DEVICE d_device;                        \r
118                 memset(&d_device, 0, sizeof(d_device));\r
119                 d_device.cb = sizeof(d_device);\r
120 \r
121                 std::vector<DISPLAY_DEVICE> displayDevices;\r
122                 for(int n = 0; EnumDisplayDevices(NULL, n, &d_device, NULL); ++n)\r
123                 {\r
124                         displayDevices.push_back(d_device);\r
125                         memset(&d_device, 0, sizeof(d_device));\r
126                         d_device.cb = sizeof(d_device);\r
127                 }\r
128 \r
129                 if(screen_index_ >= displayDevices.size())\r
130                         BOOST_THROW_EXCEPTION(out_of_range() << arg_name_info("screen_index_") << msg_info(narrow(print())));\r
131                 \r
132                 DEVMODE devmode;\r
133                 memset(&devmode, 0, sizeof(devmode));\r
134                 \r
135                 if(!EnumDisplaySettings(displayDevices[screen_index_].DeviceName, ENUM_CURRENT_SETTINGS, &devmode))\r
136                         BOOST_THROW_EXCEPTION(invalid_operation() << arg_name_info("screen_index") << msg_info(narrow(print()) + " EnumDisplaySettings"));\r
137                 \r
138                 screen_width_ = windowed_ ? square_width_ : devmode.dmPelsWidth;\r
139                 screen_height_ = windowed_ ? square_height_ : devmode.dmPelsHeight;\r
140 #else\r
141                 if(!windowed)\r
142                         BOOST_THROW_EXCEPTION(not_supported() << msg_info(narrow(print() + " doesn't support non-Win32 fullscreen"));\r
143 \r
144                 if(screen_index != 0)\r
145                         CASPAR_LOG(warning) << print() << " only supports screen_index=0 for non-Win32";\r
146 #endif          \r
147                 executor_.invoke([=]\r
148                 {\r
149                         if(!GLEW_VERSION_2_1)\r
150                                 BOOST_THROW_EXCEPTION(not_supported() << msg_info("Missing OpenGL 2.1 support."));\r
151 \r
152                         window_.Create(sf::VideoMode(screen_width_, screen_height_, 32), narrow(print()), windowed_ ? sf::Style::Resize : sf::Style::Fullscreen);\r
153                         window_.ShowMouseCursor(false);\r
154                         window_.SetPosition(devmode.dmPosition.x, devmode.dmPosition.y);\r
155                         window_.SetSize(screen_width_, screen_height_);\r
156                         window_.SetActive();\r
157                         GL(glEnable(GL_TEXTURE_2D));\r
158                         GL(glDisable(GL_DEPTH_TEST));           \r
159                         GL(glClearColor(0.0, 0.0, 0.0, 0.0));\r
160                         GL(glViewport(0, 0, format_desc_.width, format_desc_.height));\r
161                         glLoadIdentity();\r
162                                 \r
163                         calculate_aspect();\r
164                         \r
165                         glGenTextures(1, &texture_);\r
166                         glBindTexture(GL_TEXTURE_2D, texture_);\r
167                         glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);\r
168                         glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);\r
169                         glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP);\r
170                         glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP);\r
171                         glTexImage2D(GL_TEXTURE_2D, 0, GL_RGBA8, format_desc_.width, format_desc_.height, 0, GL_BGRA, GL_UNSIGNED_BYTE, 0);\r
172                         glBindTexture(GL_TEXTURE_2D, 0);\r
173                         \r
174                         GL(glGenBuffers(2, pbos_.data()));\r
175                         \r
176                         glBindBufferARB(GL_PIXEL_UNPACK_BUFFER_ARB, pbos_[0]);\r
177                         glBufferDataARB(GL_PIXEL_UNPACK_BUFFER_ARB, format_desc_.size, 0, GL_STREAM_DRAW_ARB);\r
178                         glBindBufferARB(GL_PIXEL_UNPACK_BUFFER_ARB, pbos_[1]);\r
179                         glBufferDataARB(GL_PIXEL_UNPACK_BUFFER_ARB, format_desc_.size, 0, GL_STREAM_DRAW_ARB);\r
180                         glBindBufferARB(GL_PIXEL_UNPACK_BUFFER_ARB, 0);\r
181                 });\r
182                 CASPAR_LOG(info) << print() << " Sucessfully Initialized.";\r
183         }\r
184         \r
185         const core::video_format_desc& get_video_format_desc() const\r
186         {\r
187                 return format_desc_;\r
188         }\r
189 \r
190         void calculate_aspect()\r
191         {\r
192                 if(windowed_)\r
193                 {\r
194                         screen_height_ = window_.GetHeight();\r
195                         screen_width_ = window_.GetWidth();\r
196                 }\r
197                 \r
198                 GL(glViewport(0, 0, screen_width_, screen_height_));\r
199 \r
200                 std::pair<float, float> target_ratio = None();\r
201                 if(stretch_ == fill)\r
202                         target_ratio = Fill();\r
203                 else if(stretch_ == uniform)\r
204                         target_ratio = Uniform();\r
205                 else if(stretch_ == uniform_to_fill)\r
206                         target_ratio = UniformToFill();\r
207 \r
208                 width_ = target_ratio.first;\r
209                 height_ = target_ratio.second;\r
210         }\r
211                 \r
212         std::pair<float, float> None()\r
213         {\r
214                 float width = static_cast<float>(square_width_)/static_cast<float>(screen_width_);\r
215                 float height = static_cast<float>(square_height_)/static_cast<float>(screen_height_);\r
216 \r
217                 return std::make_pair(width, height);\r
218         }\r
219 \r
220         std::pair<float, float> Uniform()\r
221         {\r
222                 float aspect = static_cast<float>(square_width_)/static_cast<float>(square_height_);\r
223                 float width = std::min(1.0f, static_cast<float>(screen_height_)*aspect/static_cast<float>(screen_width_));\r
224                 float height = static_cast<float>(screen_width_*width)/static_cast<float>(screen_height_*aspect);\r
225 \r
226                 return std::make_pair(width, height);\r
227         }\r
228 \r
229         std::pair<float, float> Fill()\r
230         {\r
231                 return std::make_pair(1.0f, 1.0f);\r
232         }\r
233 \r
234         std::pair<float, float> UniformToFill()\r
235         {\r
236                 float wr = static_cast<float>(square_width_)/static_cast<float>(screen_width_);\r
237                 float hr = static_cast<float>(square_height_)/static_cast<float>(screen_height_);\r
238                 float r_inv = 1.0f/std::min(wr, hr);\r
239 \r
240                 float width = wr*r_inv;\r
241                 float height = hr*r_inv;\r
242 \r
243                 return std::make_pair(width, height);\r
244         }\r
245 \r
246         void render(const safe_ptr<core::read_frame>& frame)\r
247         {                       \r
248                 glBindTexture(GL_TEXTURE_2D, texture_);\r
249 \r
250                 glBindBuffer(GL_PIXEL_UNPACK_BUFFER, pbos_[0]);\r
251                 glTexSubImage2D(GL_TEXTURE_2D, 0, 0, 0, format_desc_.width, format_desc_.height, GL_BGRA, GL_UNSIGNED_BYTE, 0);\r
252 \r
253                 glBindBuffer(GL_PIXEL_UNPACK_BUFFER, pbos_[1]);\r
254                 glBufferData(GL_PIXEL_UNPACK_BUFFER, format_desc_.size, 0, GL_STREAM_DRAW);\r
255 \r
256                 auto ptr = glMapBuffer(GL_PIXEL_UNPACK_BUFFER, GL_WRITE_ONLY);\r
257                 if(ptr)\r
258                 {\r
259                         fast_memcpy(reinterpret_cast<char*>(ptr), frame->image_data().begin(), frame->image_data().size());\r
260                         glUnmapBuffer(GL_PIXEL_UNPACK_BUFFER); // release the mapped buffer\r
261                 }\r
262 \r
263                 glBindBuffer(GL_PIXEL_UNPACK_BUFFER, 0);\r
264                                 \r
265                 GL(glClear(GL_COLOR_BUFFER_BIT));                       \r
266                 glBegin(GL_QUADS);\r
267                                 glTexCoord2f(0.0f,        1.0f);        glVertex2f(-width_, -height_);\r
268                                 glTexCoord2f(1.0f,        1.0f);        glVertex2f( width_, -height_);\r
269                                 glTexCoord2f(1.0f,        0.0f);        glVertex2f( width_,  height_);\r
270                                 glTexCoord2f(0.0f,        0.0f);        glVertex2f(-width_,  height_);\r
271                 glEnd();\r
272                 \r
273                 glBindTexture(GL_TEXTURE_2D, 0);\r
274 \r
275                 std::rotate(pbos_.begin(), pbos_.begin() + 1, pbos_.end());\r
276         }\r
277 \r
278         void send(const safe_ptr<core::read_frame>& frame)\r
279         {\r
280                 frame_buffer_.push_back(frame);\r
281 \r
282                 if(frame_buffer_.full())\r
283                         do_send(frame_buffer_.front());\r
284         }\r
285                 \r
286         void do_send(const safe_ptr<core::read_frame>& frame)\r
287         {               \r
288                 executor_.try_begin_invoke([=]\r
289                 {\r
290                         perf_timer_.restart();\r
291                         sf::Event e;\r
292                         while(window_.GetEvent(e))\r
293                         {\r
294                                 if(e.Type == sf::Event::Resized)\r
295                                          calculate_aspect();\r
296                         }\r
297                         render(frame);\r
298                         window_.Display();\r
299                         graph_->update_value("frame-time", static_cast<float>(perf_timer_.elapsed()*format_desc_.fps*0.5));\r
300                 });\r
301         }\r
302 \r
303         std::wstring print() const\r
304         {       \r
305                 return  L"ogl[" + boost::lexical_cast<std::wstring>(screen_index_) + L"|" + format_desc_.name + L"]";\r
306         }\r
307 \r
308         size_t buffer_depth() const{return 2;}\r
309 };\r
310 \r
311 \r
312 struct ogl_consumer_proxy : public core::frame_consumer\r
313 {\r
314         size_t screen_index_;\r
315         caspar::stretch stretch_;\r
316         bool windowed_;\r
317         bool key_only_;\r
318 \r
319         std::unique_ptr<ogl_consumer> consumer_;\r
320 \r
321 public:\r
322 \r
323         ogl_consumer_proxy(size_t screen_index, stretch stretch, bool windowed, bool key_only)\r
324                 : screen_index_(screen_index)\r
325                 , stretch_(stretch)\r
326                 , windowed_(windowed)\r
327                 , key_only_(key_only){}\r
328         \r
329         virtual void initialize(const core::video_format_desc& format_desc)\r
330         {\r
331                 consumer_.reset(new ogl_consumer(screen_index_, stretch_, windowed_, format_desc));\r
332         }\r
333         \r
334         virtual bool send(const safe_ptr<core::read_frame>& frame)\r
335         {\r
336                 consumer_->send(frame);\r
337                 return true;\r
338         }\r
339         \r
340         virtual std::wstring print() const\r
341         {\r
342                 return consumer_->print();\r
343         }\r
344 \r
345         virtual bool key_only() const\r
346         {\r
347                 return key_only_;\r
348         }\r
349 \r
350         virtual bool has_synchronization_clock() const \r
351         {\r
352                 return false;\r
353         }\r
354 \r
355         virtual const core::video_format_desc& get_video_format_desc() const\r
356         {\r
357                 return consumer_->get_video_format_desc();\r
358         }\r
359 };      \r
360 \r
361 safe_ptr<core::frame_consumer> create_ogl_consumer(const std::vector<std::wstring>& params)\r
362 {\r
363         if(params.size() < 1 || params[0] != L"SCREEN")\r
364                 return core::frame_consumer::empty();\r
365         \r
366         size_t screen_index = 0;\r
367         stretch stretch = stretch::fill;\r
368         bool windowed = true;\r
369         \r
370         if(params.size() > 1) \r
371                 screen_index = lexical_cast_or_default<int>(params[2], screen_index);\r
372 \r
373         if(params.size() > 2) \r
374                 windowed = lexical_cast_or_default<bool>(params[3], windowed);\r
375 \r
376         bool key_only = std::find(params.begin(), params.end(), L"KEY_ONLY") != params.end();\r
377 \r
378         return make_safe<ogl_consumer_proxy>(screen_index, stretch, windowed, key_only);\r
379 }\r
380 \r
381 safe_ptr<core::frame_consumer> create_ogl_consumer(const boost::property_tree::ptree& ptree) \r
382 {\r
383         size_t screen_index = ptree.get("device", 0);\r
384         bool windowed =ptree.get("windowed", true);\r
385         \r
386         stretch stretch = stretch::fill;\r
387         auto key_str = ptree.get("stretch", "default");\r
388         if(key_str == "uniform")\r
389                 stretch = stretch::uniform;\r
390         else if(key_str == "uniform_to_fill")\r
391                 stretch = stretch::uniform_to_fill;\r
392 \r
393         bool key_only = ptree.get("key-only", false);\r
394 \r
395         return make_safe<ogl_consumer_proxy>(screen_index, stretch, windowed, key_only);\r
396 }\r
397 \r
398 }