src/lib/server.cc

   1 /*
   2     Copyright (C) 2012-2015 Carl Hetherington <cth@carlh.net>
   3
   4     This program is free software; you can redistribute it and/or modify
   5     it under the terms of the GNU General Public License as published by
   6     the Free Software Foundation; either version 2 of the License, or
   7     (at your option) any later version.
   8
   9     This program is distributed in the hope that it will be useful,
  10     but WITHOUT ANY WARRANTY; without even the implied warranty of
  11     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12     GNU General Public License for more details.
  13
  14     You should have received a copy of the GNU General Public License
  15     along with this program; if not, write to the Free Software
  16     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  17
  18 */
  19
  20 /** @file src/server.cc
  21  *  @brief Class to describe a server to which we can send
  22  *  encoding work, and a class to implement such a server.
  23  */
  24
  25 #include "server.h"
  26 #include "util.h"
  27 #include "dcpomatic_socket.h"
  28 #include "image.h"
  29 #include "dcp_video.h"
  30 #include "config.h"
  31 #include "cross.h"
  32 #include "player_video.h"
  33 #include "data.h"
  34 #include "safe_stringstream.h"
  35 #include "raw_convert.h"
  36 #include "compose.hpp"
  37 #include "log.h"
  38 #include <libcxml/cxml.h>
  39 #include <libxml++/libxml++.h>
  40 #include <boost/algorithm/string.hpp>
  41 #include <boost/scoped_array.hpp>
  42 #include <boost/foreach.hpp>
  43 #include <string>
  44 #include <vector>
  45 #include <iostream>
  46
  47 #include "i18n.h"
  48
  49 #define LOG_GENERAL(...)    _log->log (String::compose (__VA_ARGS__), Log::TYPE_GENERAL);
  50 #define LOG_GENERAL_NC(...) _log->log (__VA_ARGS__, Log::TYPE_GENERAL);
  51 #define LOG_ERROR(...)      _log->log (String::compose (__VA_ARGS__), Log::TYPE_ERROR);
  52 #define LOG_ERROR_NC(...)   _log->log (__VA_ARGS__, Log::TYPE_ERROR);
  53
  54 using std::string;
  55 using std::vector;
  56 using std::list;
  57 using std::cout;
  58 using std::cerr;
  59 using std::fixed;
  60 using boost::shared_ptr;
  61 using boost::thread;
  62 using boost::bind;
  63 using boost::scoped_array;
  64 using boost::optional;
  65 using dcp::Size;
  66
  67 Server::Server (shared_ptr<Log> log, bool verbose)
  68         : _terminate (false)
  69         , _log (log)
  70         , _verbose (verbose)
  71         , _acceptor (_io_service, boost::asio::ip::tcp::endpoint (boost::asio::ip::tcp::v4(), Config::instance()->server_port_base()))
  72 {
  73
  74 }
  75
  76 Server::~Server ()
  77 {
  78         {
  79                 boost::mutex::scoped_lock lm (_worker_mutex);
  80                 _terminate = true;
  81                 _empty_condition.notify_all ();
  82                 _full_condition.notify_all ();
  83         }
  84
  85         BOOST_FOREACH (boost::thread* i, _worker_threads) {
  86                 DCPOMATIC_ASSERT (i->joinable ());
  87                 i->join ();
  88                 delete i;
  89         }
  90
  91         _io_service.stop ();
  92
  93         _broadcast.io_service.stop ();
  94         if (_broadcast.thread) {
  95                 DCPOMATIC_ASSERT (_broadcast.thread->joinable ());
  96                 _broadcast.thread->join ();
  97         }
  98 }
  99
 100 /** @param after_read Filled in with gettimeofday() after reading the input from the network.
 101  *  @param after_encode Filled in with gettimeofday() after encoding the image.
 102  */
 103 int
 104 Server::process (shared_ptr<Socket> socket, struct timeval& after_read, struct timeval& after_encode)
 105 {
 106         uint32_t length = socket->read_uint32 ();
 107         scoped_array<char> buffer (new char[length]);
 108         socket->read (reinterpret_cast<uint8_t*> (buffer.get()), length);
 109
 110         string s (buffer.get());
 111         shared_ptr<cxml::Document> xml (new cxml::Document ("EncodingRequest"));
 112         xml->read_string (s);
 113         /* This is a double-check; the server shouldn't even be on the candidate list
 114            if it is the wrong version, but it doesn't hurt to make sure here.
 115         */
 116         if (xml->number_child<int> ("Version") != SERVER_LINK_VERSION) {
 117                 cerr << "Mismatched server/client versions\n";
 118                 LOG_ERROR_NC ("Mismatched server/client versions");
 119                 return -1;
 120         }
 121
 122         shared_ptr<PlayerVideo> pvf (new PlayerVideo (xml, socket));
 123
 124         DCPVideo dcp_video_frame (pvf, xml, _log);
 125
 126         gettimeofday (&after_read, 0);
 127
 128         Data encoded = dcp_video_frame.encode_locally (boost::bind (&Log::dcp_log, _log.get(), _1, _2));
 129
 130         gettimeofday (&after_encode, 0);
 131
 132         try {
 133                 socket->write (encoded.size ());
 134                 socket->write (encoded.data ().get (), encoded.size ());
 135         } catch (std::exception& e) {
 136                 cerr << "Send failed; frame " << dcp_video_frame.index() << "\n";
 137                 LOG_ERROR ("Send failed; frame %1", dcp_video_frame.index());
 138                 throw;
 139         }
 140
 141         return dcp_video_frame.index ();
 142 }
 143
 144 void
 145 Server::worker_thread ()
 146 {
 147         while (true) {
 148                 boost::mutex::scoped_lock lock (_worker_mutex);
 149                 while (_queue.empty () && !_terminate) {
 150                         _empty_condition.wait (lock);
 151                 }
 152
 153                 if (_terminate) {
 154                         return;
 155                 }
 156
 157                 shared_ptr<Socket> socket = _queue.front ();
 158                 _queue.pop_front ();
 159
 160                 lock.unlock ();
 161
 162                 int frame = -1;
 163                 string ip;
 164
 165                 struct timeval start;
 166                 struct timeval after_read;
 167                 struct timeval after_encode;
 168                 struct timeval end;
 169
 170                 gettimeofday (&start, 0);
 171
 172                 try {
 173                         frame = process (socket, after_read, after_encode);
 174                         ip = socket->socket().remote_endpoint().address().to_string();
 175                 } catch (std::exception& e) {
 176                         cerr << "Error: " << e.what() << "\n";
 177                         LOG_ERROR ("Error: %1", e.what());
 178                 }
 179
 180                 gettimeofday (&end, 0);
 181
 182                 socket.reset ();
 183
 184                 lock.lock ();
 185
 186                 if (frame >= 0) {
 187                         struct timeval end;
 188                         gettimeofday (&end, 0);
 189
 190                         SafeStringStream message;
 191                         message.precision (2);
 192                         message << fixed
 193                                 << "Encoded frame " << frame << " from " << ip << ": "
 194                                 << "receive " << (seconds(after_read) - seconds(start)) << "s "
 195                                 << "encode " << (seconds(after_encode) - seconds(after_read)) << "s "
 196                                 << "send " << (seconds(end) - seconds(after_encode)) << "s.";
 197
 198                         if (_verbose) {
 199                                 cout << message.str() << "\n";
 200                         }
 201
 202                         LOG_GENERAL_NC (message.str ());
 203                 }
 204
 205                 _full_condition.notify_all ();
 206         }
 207 }
 208
 209 void
 210 Server::run (int num_threads)
 211 {
 212         LOG_GENERAL ("Server starting with %1 threads", num_threads);
 213         if (_verbose) {
 214                 cout << "DCP-o-matic server starting with " << num_threads << " threads.\n";
 215         }
 216
 217         for (int i = 0; i < num_threads; ++i) {
 218                 _worker_threads.push_back (new thread (bind (&Server::worker_thread, this)));
 219         }
 220
 221         _broadcast.thread = new thread (bind (&Server::broadcast_thread, this));
 222
 223         start_accept ();
 224         _io_service.run ();
 225 }
 226
 227 void
 228 Server::broadcast_thread ()
 229 try
 230 {
 231         boost::asio::ip::address address = boost::asio::ip::address_v4::any ();
 232         boost::asio::ip::udp::endpoint listen_endpoint (address, Config::instance()->server_port_base() + 1);
 233
 234         _broadcast.socket = new boost::asio::ip::udp::socket (_broadcast.io_service);
 235         _broadcast.socket->open (listen_endpoint.protocol ());
 236         _broadcast.socket->bind (listen_endpoint);
 237
 238         _broadcast.socket->async_receive_from (
 239                 boost::asio::buffer (_broadcast.buffer, sizeof (_broadcast.buffer)),
 240                 _broadcast.send_endpoint,
 241                 boost::bind (&Server::broadcast_received, this)
 242                 );
 243
 244         _broadcast.io_service.run ();
 245 }
 246 catch (...)
 247 {
 248         store_current ();
 249 }
 250
 251 void
 252 Server::broadcast_received ()
 253 {
 254         _broadcast.buffer[sizeof(_broadcast.buffer) - 1] = '\0';
 255
 256         if (strcmp (_broadcast.buffer, DCPOMATIC_HELLO) == 0) {
 257                 /* Reply to the client saying what we can do */
 258                 xmlpp::Document doc;
 259                 xmlpp::Element* root = doc.create_root_node ("ServerAvailable");
 260                 root->add_child("Threads")->add_child_text (raw_convert<string> (_worker_threads.size ()));
 261                 root->add_child("Version")->add_child_text (raw_convert<string> (SERVER_LINK_VERSION));
 262                 string xml = doc.write_to_string ("UTF-8");
 263
 264                 if (_verbose) {
 265                         cout << "Offering services to master " << _broadcast.send_endpoint.address().to_string () << "\n";
 266                 }
 267                 shared_ptr<Socket> socket (new Socket);
 268                 try {
 269                         socket->connect (boost::asio::ip::tcp::endpoint (_broadcast.send_endpoint.address(), Config::instance()->server_port_base() + 1));
 270                         socket->write (xml.length() + 1);
 271                         socket->write ((uint8_t *) xml.c_str(), xml.length() + 1);
 272                 } catch (...) {
 273
 274                 }
 275         }
 276
 277         _broadcast.socket->async_receive_from (
 278                 boost::asio::buffer (_broadcast.buffer, sizeof (_broadcast.buffer)),
 279                 _broadcast.send_endpoint, boost::bind (&Server::broadcast_received, this)
 280                 );
 281 }
 282
 283 void
 284 Server::start_accept ()
 285 {
 286         if (_terminate) {
 287                 return;
 288         }
 289
 290         shared_ptr<Socket> socket (new Socket);
 291         _acceptor.async_accept (socket->socket (), boost::bind (&Server::handle_accept, this, socket, boost::asio::placeholders::error));
 292 }
 293
 294 void
 295 Server::handle_accept (shared_ptr<Socket> socket, boost::system::error_code const & error)
 296 {
 297         if (error) {
 298                 return;
 299         }
 300
 301         boost::mutex::scoped_lock lock (_worker_mutex);
 302
 303         /* Wait until the queue has gone down a bit */
 304         while (_queue.size() >= _worker_threads.size() * 2 && !_terminate) {
 305                 _full_condition.wait (lock);
 306         }
 307
 308         _queue.push_back (socket);
 309         _empty_condition.notify_all ();
 310
 311         start_accept ();
 312 }