Rename Server -> EncodeServer, ServerFinder -> EncodeServerFinder, ServerDescription...
[dcpomatic.git] / src / lib / encode_server_finder.cc
diff --git a/src/lib/encode_server_finder.cc b/src/lib/encode_server_finder.cc
new file mode 100644 (file)
index 0000000..aa76e39
--- /dev/null
@@ -0,0 +1,240 @@
+/*
+    Copyright (C) 2013-2015 Carl Hetherington <cth@carlh.net>
+
+    This program is free software; you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation; either version 2 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program; if not, write to the Free Software
+    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+
+*/
+
+#include "encode_server_finder.h"
+#include "exceptions.h"
+#include "util.h"
+#include "config.h"
+#include "cross.h"
+#include "encode_server_description.h"
+#include "dcpomatic_socket.h"
+#include "raw_convert.h"
+#include <libcxml/cxml.h>
+#include <boost/lambda/lambda.hpp>
+#include <iostream>
+
+#include "i18n.h"
+
+using std::string;
+using std::list;
+using std::vector;
+using std::cout;
+using boost::shared_ptr;
+using boost::scoped_array;
+using boost::weak_ptr;
+
+EncodeServerFinder* EncodeServerFinder::_instance = 0;
+
+EncodeServerFinder::EncodeServerFinder ()
+       : _disabled (false)
+       , _search_thread (0)
+       , _listen_thread (0)
+       , _stop (false)
+{
+       Config::instance()->Changed.connect (boost::bind (&EncodeServerFinder::config_changed, this, _1));
+}
+
+void
+EncodeServerFinder::start ()
+{
+       _search_thread = new boost::thread (boost::bind (&EncodeServerFinder::search_thread, this));
+       _listen_thread = new boost::thread (boost::bind (&EncodeServerFinder::listen_thread, this));
+}
+
+EncodeServerFinder::~EncodeServerFinder ()
+{
+       _stop = true;
+
+       _search_condition.notify_all ();
+       if (_search_thread) {
+               DCPOMATIC_ASSERT (_search_thread->joinable ());
+               _search_thread->join ();
+       }
+
+       _listen_io_service.stop ();
+       if (_listen_thread) {
+               DCPOMATIC_ASSERT (_listen_thread->joinable ());
+               _listen_thread->join ();
+       }
+}
+
+void
+EncodeServerFinder::search_thread ()
+try
+{
+       boost::system::error_code error;
+       boost::asio::io_service io_service;
+       boost::asio::ip::udp::socket socket (io_service);
+       socket.open (boost::asio::ip::udp::v4(), error);
+       if (error) {
+               throw NetworkError ("failed to set up broadcast socket");
+       }
+
+        socket.set_option (boost::asio::ip::udp::socket::reuse_address (true));
+        socket.set_option (boost::asio::socket_base::broadcast (true));
+
+       string const data = DCPOMATIC_HELLO;
+
+       while (!_stop) {
+               if (Config::instance()->use_any_servers ()) {
+                       /* Broadcast to look for servers */
+                       try {
+                               boost::asio::ip::udp::endpoint end_point (boost::asio::ip::address_v4::broadcast(), Config::instance()->server_port_base() + 1);
+                               socket.send_to (boost::asio::buffer (data.c_str(), data.size() + 1), end_point);
+                       } catch (...) {
+
+                       }
+               }
+
+               /* Query our `definite' servers (if there are any) */
+               vector<string> servers = Config::instance()->servers ();
+               for (vector<string>::const_iterator i = servers.begin(); i != servers.end(); ++i) {
+                       if (server_found (*i)) {
+                               /* Don't bother asking a server that we already know about */
+                               continue;
+                       }
+                       try {
+                               boost::asio::ip::udp::resolver resolver (io_service);
+                               boost::asio::ip::udp::resolver::query query (*i, raw_convert<string> (Config::instance()->server_port_base() + 1));
+                               boost::asio::ip::udp::endpoint end_point (*resolver.resolve (query));
+                               socket.send_to (boost::asio::buffer (data.c_str(), data.size() + 1), end_point);
+                       } catch (...) {
+
+                       }
+               }
+
+               boost::mutex::scoped_lock lm (_search_condition_mutex);
+               _search_condition.timed_wait (lm, boost::get_system_time() + boost::posix_time::seconds (10));
+       }
+}
+catch (...)
+{
+       store_current ();
+}
+
+void
+EncodeServerFinder::listen_thread ()
+try {
+       using namespace boost::asio::ip;
+
+       try {
+               _listen_acceptor.reset (new tcp::acceptor (_listen_io_service, tcp::endpoint (tcp::v4(), Config::instance()->server_port_base() + 1)));
+       } catch (...) {
+               boost::throw_exception (NetworkError (_("Could not listen for remote encode servers.  Perhaps another instance of DCP-o-matic is running.")));
+       }
+
+       start_accept ();
+       _listen_io_service.run ();
+}
+catch (...)
+{
+       store_current ();
+}
+
+void
+EncodeServerFinder::start_accept ()
+{
+       shared_ptr<Socket> socket (new Socket ());
+       _listen_acceptor->async_accept (
+               socket->socket(),
+               boost::bind (&EncodeServerFinder::handle_accept, this, boost::asio::placeholders::error, socket)
+               );
+}
+
+void
+EncodeServerFinder::handle_accept (boost::system::error_code ec, shared_ptr<Socket> socket)
+{
+       if (ec) {
+               start_accept ();
+               return;
+       }
+
+       uint32_t length;
+       socket->read (reinterpret_cast<uint8_t*> (&length), sizeof (uint32_t));
+       length = ntohl (length);
+
+       scoped_array<char> buffer (new char[length]);
+       socket->read (reinterpret_cast<uint8_t*> (buffer.get()), length);
+
+       string s (buffer.get());
+       shared_ptr<cxml::Document> xml (new cxml::Document ("ServerAvailable"));
+       xml->read_string (s);
+
+       string const ip = socket->socket().remote_endpoint().address().to_string ();
+       if (!server_found (ip) && xml->optional_number_child<int>("Version").get_value_or (0) == SERVER_LINK_VERSION) {
+               EncodeServerDescription sd (ip, xml->number_child<int> ("Threads"));
+               {
+                       boost::mutex::scoped_lock lm (_servers_mutex);
+                       _servers.push_back (sd);
+               }
+               emit (boost::bind (boost::ref (ServersListChanged)));
+       }
+
+       start_accept ();
+}
+
+bool
+EncodeServerFinder::server_found (string ip) const
+{
+       boost::mutex::scoped_lock lm (_servers_mutex);
+       list<EncodeServerDescription>::const_iterator i = _servers.begin();
+       while (i != _servers.end() && i->host_name() != ip) {
+               ++i;
+       }
+
+       return i != _servers.end ();
+}
+
+EncodeServerFinder*
+EncodeServerFinder::instance ()
+{
+       if (!_instance) {
+               _instance = new EncodeServerFinder ();
+               _instance->start ();
+       }
+
+       return _instance;
+}
+
+void
+EncodeServerFinder::drop ()
+{
+       delete _instance;
+       _instance = 0;
+}
+
+list<EncodeServerDescription>
+EncodeServerFinder::servers () const
+{
+       boost::mutex::scoped_lock lm (_servers_mutex);
+       return _servers;
+}
+
+void
+EncodeServerFinder::config_changed (Config::Property what)
+{
+       if (what == Config::USE_ANY_SERVERS || what == Config::SERVERS) {
+               {
+                       boost::mutex::scoped_lock lm (_servers_mutex);
+                       _servers.clear ();
+               }
+               ServersListChanged ();
+               _search_condition.notify_all ();
+       }
+}