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