src/lib/server_finder.cc

   1 /*
   2     Copyright (C) 2013-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 #include "server_finder.h"
  21 #include "exceptions.h"
  22 #include "util.h"
  23 #include "config.h"
  24 #include "cross.h"
  25 #include "server_description.h"
  26 #include "dcpomatic_socket.h"
  27 #include "raw_convert.h"
  28 #include <libcxml/cxml.h>
  29 #include <boost/lambda/lambda.hpp>
  30
  31 #include "i18n.h"
  32
  33 using std::string;
  34 using std::list;
  35 using std::vector;
  36 using std::cout;
  37 using boost::shared_ptr;
  38 using boost::scoped_array;
  39 using boost::weak_ptr;
  40
  41 ServerFinder* ServerFinder::_instance = 0;
  42
  43 ServerFinder::ServerFinder ()
  44         : _disabled (false)
  45         , _search_thread (0)
  46         , _listen_thread (0)
  47         , _stop (false)
  48 {
  49         Config::instance()->Changed.connect (boost::bind (&ServerFinder::config_changed, this, _1));
  50 }
  51
  52 void
  53 ServerFinder::start ()
  54 {
  55         _search_thread = new boost::thread (boost::bind (&ServerFinder::search_thread, this));
  56         _listen_thread = new boost::thread (boost::bind (&ServerFinder::listen_thread, this));
  57 }
  58
  59 ServerFinder::~ServerFinder ()
  60 {
  61         _stop = true;
  62
  63         _search_condition.notify_all ();
  64         if (_search_thread) {
  65                 _search_thread->join ();
  66         }
  67
  68         _listen_io_service.stop ();
  69         if (_listen_thread) {
  70                 _listen_thread->join ();
  71         }
  72 }
  73
  74 void
  75 ServerFinder::search_thread ()
  76 try
  77 {
  78         boost::system::error_code error;
  79         boost::asio::io_service io_service;
  80         boost::asio::ip::udp::socket socket (io_service);
  81         socket.open (boost::asio::ip::udp::v4(), error);
  82         if (error) {
  83                 throw NetworkError ("failed to set up broadcast socket");
  84         }
  85
  86         socket.set_option (boost::asio::ip::udp::socket::reuse_address (true));
  87         socket.set_option (boost::asio::socket_base::broadcast (true));
  88
  89         string const data = DCPOMATIC_HELLO;
  90
  91         while (!_stop) {
  92                 if (Config::instance()->use_any_servers ()) {
  93                         /* Broadcast to look for servers */
  94                         try {
  95                                 boost::asio::ip::udp::endpoint end_point (boost::asio::ip::address_v4::broadcast(), Config::instance()->server_port_base() + 1);
  96                                 socket.send_to (boost::asio::buffer (data.c_str(), data.size() + 1), end_point);
  97                         } catch (...) {
  98
  99                         }
 100                 }
 101
 102                 /* Query our `definite' servers (if there are any) */
 103                 vector<string> servers = Config::instance()->servers ();
 104                 for (vector<string>::const_iterator i = servers.begin(); i != servers.end(); ++i) {
 105                         if (server_found (*i)) {
 106                                 /* Don't bother asking a server that we already know about */
 107                                 continue;
 108                         }
 109                         try {
 110                                 boost::asio::ip::udp::resolver resolver (io_service);
 111                                 boost::asio::ip::udp::resolver::query query (*i, raw_convert<string> (Config::instance()->server_port_base() + 1));
 112                                 boost::asio::ip::udp::endpoint end_point (*resolver.resolve (query));
 113                                 socket.send_to (boost::asio::buffer (data.c_str(), data.size() + 1), end_point);
 114                         } catch (...) {
 115
 116                         }
 117                 }
 118
 119                 boost::mutex::scoped_lock lm (_search_condition_mutex);
 120                 _search_condition.timed_wait (lm, boost::get_system_time() + boost::posix_time::seconds (10));
 121         }
 122 }
 123 catch (...)
 124 {
 125         store_current ();
 126 }
 127
 128 void
 129 ServerFinder::listen_thread ()
 130 try {
 131         using namespace boost::asio::ip;
 132
 133         try {
 134                 _listen_acceptor.reset (new tcp::acceptor (_listen_io_service, tcp::endpoint (tcp::v4(), Config::instance()->server_port_base() + 1)));
 135         } catch (...) {
 136                 boost::throw_exception (NetworkError (_("Could not listen for remote encode servers.  Perhaps another instance of DCP-o-matic is running.")));
 137         }
 138
 139         start_accept ();
 140         _listen_io_service.run ();
 141 }
 142 catch (...)
 143 {
 144         store_current ();
 145 }
 146
 147 void
 148 ServerFinder::start_accept ()
 149 {
 150         shared_ptr<Socket> socket (new Socket ());
 151         _listen_acceptor->async_accept (
 152                 socket->socket(),
 153                 boost::bind (&ServerFinder::handle_accept, this, boost::asio::placeholders::error, socket)
 154                 );
 155 }
 156
 157 void
 158 ServerFinder::handle_accept (boost::system::error_code ec, shared_ptr<Socket> socket)
 159 {
 160         if (ec) {
 161                 start_accept ();
 162                 return;
 163         }
 164
 165         uint32_t length;
 166         socket->read (reinterpret_cast<uint8_t*> (&length), sizeof (uint32_t));
 167         length = ntohl (length);
 168
 169         scoped_array<char> buffer (new char[length]);
 170         socket->read (reinterpret_cast<uint8_t*> (buffer.get()), length);
 171
 172         string s (buffer.get());
 173         shared_ptr<cxml::Document> xml (new cxml::Document ("ServerAvailable"));
 174         xml->read_string (s);
 175
 176         string const ip = socket->socket().remote_endpoint().address().to_string ();
 177         if (!server_found (ip) && xml->optional_number_child<int>("Version").get_value_or (0) == SERVER_LINK_VERSION) {
 178                 ServerDescription sd (ip, xml->number_child<int> ("Threads"));
 179                 {
 180                         boost::mutex::scoped_lock lm (_servers_mutex);
 181                         _servers.push_back (sd);
 182                 }
 183                 emit (boost::bind (boost::ref (ServersListChanged)));
 184         }
 185
 186         start_accept ();
 187 }
 188
 189 bool
 190 ServerFinder::server_found (string ip) const
 191 {
 192         boost::mutex::scoped_lock lm (_servers_mutex);
 193         list<ServerDescription>::const_iterator i = _servers.begin();
 194         while (i != _servers.end() && i->host_name() != ip) {
 195                 ++i;
 196         }
 197
 198         return i != _servers.end ();
 199 }
 200
 201 ServerFinder*
 202 ServerFinder::instance ()
 203 {
 204         if (!_instance) {
 205                 _instance = new ServerFinder ();
 206                 _instance->start ();
 207         }
 208
 209         return _instance;
 210 }
 211
 212 void
 213 ServerFinder::drop ()
 214 {
 215         delete _instance;
 216         _instance = 0;
 217 }
 218
 219 list<ServerDescription>
 220 ServerFinder::servers () const
 221 {
 222         boost::mutex::scoped_lock lm (_servers_mutex);
 223         return _servers;
 224 }
 225
 226 void
 227 ServerFinder::config_changed (Config::Property what)
 228 {
 229         if (what == Config::USE_ANY_SERVERS || what == Config::SERVERS) {
 230                 {
 231                         boost::mutex::scoped_lock lm (_servers_mutex);
 232                         _servers.clear ();
 233                 }
 234                 ServersListChanged ();
 235                 search_now ();
 236         }
 237 }
 238
 239 void
 240 ServerFinder::search_now ()
 241 {
 242         _search_condition.notify_all ();
 243 }