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