premiere-libtorrent/src/upnp.cpp

1036 lines
25 KiB
C++
Raw Normal View History

/*
Copyright (c) 2007, Arvid Norberg
All rights reserved.
Redistribution and use in source and binary forms, with or without
modification, are permitted provided that the following conditions
are met:
* Redistributions of source code must retain the above copyright
notice, this list of conditions and the following disclaimer.
* Redistributions in binary form must reproduce the above copyright
notice, this list of conditions and the following disclaimer in
the documentation and/or other materials provided with the distribution.
* Neither the name of the author nor the names of its
contributors may be used to endorse or promote products derived
from this software without specific prior written permission.
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
POSSIBILITY OF SUCH DAMAGE.
*/
#include "libtorrent/pch.hpp"
#include "libtorrent/socket.hpp"
#include "libtorrent/upnp.hpp"
#include "libtorrent/io.hpp"
#include "libtorrent/http_tracker_connection.hpp"
#include "libtorrent/xml_parse.hpp"
#include "libtorrent/connection_queue.hpp"
#include <boost/bind.hpp>
#include <boost/ref.hpp>
#include <asio/ip/host_name.hpp>
#include <asio/ip/multicast.hpp>
#include <boost/thread/mutex.hpp>
#include <cstdlib>
#if defined(TORRENT_LOGGING) || defined(TORRENT_VERBOSE_LOGGING)
#define TORRENT_UPNP_LOGGING
#endif
using boost::bind;
using namespace libtorrent;
address_v4 upnp::upnp_multicast_address;
udp::endpoint upnp::upnp_multicast_endpoint;
2007-05-16 23:36:27 +02:00
namespace libtorrent
{
bool is_local(address const& a)
{
if (a.is_v6()) return false;
address_v4 a4 = a.to_v4();
return ((a4.to_ulong() & 0xff000000) == 0x0a000000
|| (a4.to_ulong() & 0xfff00000) == 0xac100000
|| (a4.to_ulong() & 0xffff0000) == 0xc0a80000);
}
address_v4 guess_local_address(asio::io_service& ios)
{
// make a best guess of the interface we're using and its IP
udp::resolver r(ios);
udp::resolver::iterator i = r.resolve(udp::resolver::query(asio::ip::host_name(), "0"));
for (;i != udp::resolver_iterator(); ++i)
{
// ignore the loopback
if (i->endpoint().address() == address_v4((127 << 24) + 1)) continue;
// ignore addresses that are not on a local network
if (!is_local(i->endpoint().address())) continue;
// ignore non-IPv4 addresses
if (i->endpoint().address().is_v4()) break;
}
if (i == udp::resolver_iterator()) return address_v4::any();
return i->endpoint().address().to_v4();
}
2007-05-16 23:36:27 +02:00
}
upnp::upnp(io_service& ios, connection_queue& cc
, address const& listen_interface, std::string const& user_agent
, portmap_callback_t const& cb)
2007-04-01 03:18:10 +02:00
: m_udp_local_port(0)
, m_tcp_local_port(0)
, m_user_agent(user_agent)
, m_callback(cb)
, m_retry_count(0)
, m_socket(ios)
, m_broadcast_timer(ios)
, m_refresh_timer(ios)
2007-04-10 07:14:37 +02:00
, m_strand(ios)
, m_disabled(false)
, m_closing(false)
, m_cc(cc)
{
// UPnP multicast address and port
upnp_multicast_address = address_v4::from_string("239.255.255.250");
upnp_multicast_endpoint = udp::endpoint(upnp_multicast_address, 1900);
#ifdef TORRENT_UPNP_LOGGING
m_log.open("upnp.log", std::ios::in | std::ios::out | std::ios::trunc);
#endif
rebind(listen_interface);
}
upnp::~upnp()
{
}
void upnp::rebind(address const& listen_interface) try
{
m_local_ip = address_v4::any();
2007-05-16 23:36:27 +02:00
if (listen_interface.is_v4() && listen_interface != address_v4::any())
{
m_local_ip = listen_interface.to_v4();
if (!is_local(m_local_ip))
{
// the local address seems to be an external
// internet address. Assume it is not behind a NAT
throw std::runtime_error("local IP is not on a local network");
}
}
else
{
address_v4 local_ip = guess_local_address(m_socket.io_service());
if (local_ip == address_v4::any())
{
2007-05-16 23:36:27 +02:00
throw std::runtime_error("local host is probably not on a NATed "
"network. disabling UPnP");
}
}
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
<< " local ip: " << m_local_ip.to_string() << std::endl;
#endif
// the local interface hasn't changed
if (m_socket.is_open()
&& m_socket.local_endpoint().address() == m_local_ip)
return;
m_socket.close();
using namespace asio::ip::multicast;
m_socket.open(udp::v4());
m_socket.set_option(datagram_socket::reuse_address(true));
m_socket.bind(udp::endpoint(m_local_ip, 0));
m_socket.set_option(join_group(upnp_multicast_address));
m_socket.set_option(outbound_interface(m_local_ip));
m_socket.set_option(hops(255));
m_disabled = false;
m_retry_count = 0;
discover_device();
}
catch (std::exception& e)
{
2007-05-14 09:31:01 +02:00
disable();
std::stringstream msg;
msg << "UPnP portmapping disabled: " << e.what();
m_callback(0, 0, msg.str());
};
2007-05-10 20:00:10 +02:00
void upnp::discover_device() try
{
const char msearch[] =
"M-SEARCH * HTTP/1.1\r\n"
"HOST: 239.255.255.250:1900\r\n"
"ST:upnp:rootdevice\r\n"
"MAN:\"ssdp:discover\"\r\n"
"MX:3\r\n"
"\r\n\r\n";
m_socket.async_receive_from(asio::buffer(m_receive_buffer
2007-04-10 07:14:37 +02:00
, sizeof(m_receive_buffer)), m_remote, m_strand.wrap(bind(
&upnp::on_reply, this, _1, _2)));
2007-05-14 09:31:01 +02:00
asio::error_code ec;
#ifdef TORRENT_DEBUG_UPNP
// simulate packet loss
if (m_retry_count & 1)
#endif
m_socket.send_to(asio::buffer(msearch, sizeof(msearch) - 1)
2007-05-14 09:31:01 +02:00
, upnp_multicast_endpoint, 0, ec);
if (ec)
{
disable();
return;
}
++m_retry_count;
m_broadcast_timer.expires_from_now(milliseconds(250 * m_retry_count));
2007-04-10 07:14:37 +02:00
m_broadcast_timer.async_wait(m_strand.wrap(bind(&upnp::resend_request
, this, _1)));
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
2007-04-01 03:18:10 +02:00
<< " ==> Broadcasting search for rootdevice" << std::endl;
#endif
}
2007-05-10 20:00:10 +02:00
catch (std::exception&)
{
2007-05-14 09:31:01 +02:00
disable();
2007-05-10 20:00:10 +02:00
}
void upnp::set_mappings(int tcp, int udp)
{
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
<< " *** set mappings " << tcp << " " << udp;
if (m_disabled) m_log << " DISABLED";
m_log << std::endl;
#endif
if (m_disabled) return;
if (udp != 0) m_udp_local_port = udp;
if (tcp != 0) m_tcp_local_port = tcp;
2007-04-01 03:18:10 +02:00
for (std::set<rootdevice>::iterator i = m_devices.begin()
, end(m_devices.end()); i != end; ++i)
{
rootdevice& d = const_cast<rootdevice&>(*i);
if (d.mapping[0].local_port != m_tcp_local_port)
{
if (d.mapping[0].external_port == 0)
d.mapping[0].external_port = m_tcp_local_port;
d.mapping[0].local_port = m_tcp_local_port;
d.mapping[0].need_update = true;
}
if (d.mapping[1].local_port != m_udp_local_port)
{
if (d.mapping[1].external_port == 0)
2007-04-01 17:39:08 +02:00
d.mapping[1].external_port = m_udp_local_port;
d.mapping[1].local_port = m_udp_local_port;
2007-04-01 03:18:10 +02:00
d.mapping[1].need_update = true;
}
2007-05-08 13:10:05 +02:00
if (d.service_namespace
&& (d.mapping[0].need_update || d.mapping[1].need_update))
2007-04-01 03:18:10 +02:00
map_port(d, 0);
}
}
2007-05-14 09:31:01 +02:00
void upnp::resend_request(asio::error_code const& e)
#ifndef NDEBUG
try
#endif
{
if (e) return;
if (m_retry_count < 9
&& (m_devices.empty() || m_retry_count < 4))
{
discover_device();
2007-05-04 19:39:44 +02:00
return;
}
if (m_devices.empty())
{
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
<< " *** Got no response in 9 retries. Giving up, "
"disabling UPnP." << std::endl;
#endif
2007-05-14 09:31:01 +02:00
disable();
return;
}
for (std::set<rootdevice>::iterator i = m_devices.begin()
, end(m_devices.end()); i != end; ++i)
{
2007-05-14 09:31:01 +02:00
if (i->control_url.empty() && !i->upnp_connection && !i->disabled)
{
// we don't have a WANIP or WANPPP url for this device,
// ask for it
rootdevice& d = const_cast<rootdevice&>(*i);
2007-05-14 09:31:01 +02:00
try
{
d.upnp_connection.reset(new http_connection(m_socket.io_service()
, m_cc, m_strand.wrap(bind(&upnp::on_upnp_xml, this, _1, _2
, boost::ref(d)))));
d.upnp_connection->get(d.url);
}
catch (std::exception& e)
{
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
<< " *** Connection failed to: " << d.url
<< " " << e.what() << std::endl;
#endif
d.disabled = true;
}
}
}
}
2007-05-14 09:31:01 +02:00
#ifndef NDEBUG
2007-05-10 20:00:10 +02:00
catch (std::exception&)
{
2007-05-14 09:31:01 +02:00
assert(false);
2007-05-10 20:00:10 +02:00
}
2007-05-14 09:31:01 +02:00
#endif
void upnp::on_reply(asio::error_code const& e
2007-05-14 09:31:01 +02:00
, std::size_t bytes_transferred)
#ifndef NDEBUG
try
#endif
{
using namespace libtorrent::detail;
if (e) return;
// parse out the url for the device
/*
the response looks like this:
HTTP/1.1 200 OK
ST:upnp:rootdevice
USN:uuid:000f-66d6-7296000099dc::upnp:rootdevice
Location: http://192.168.1.1:5431/dyndev/uuid:000f-66d6-7296000099dc
Server: Custom/1.0 UPnP/1.0 Proc/Ver
EXT:
Cache-Control:max-age=180
DATE: Fri, 02 Jan 1970 08:10:38 GMT
*/
http_parser p;
try
{
p.incoming(buffer::const_interval(m_receive_buffer
, m_receive_buffer + bytes_transferred));
}
catch (std::exception& e)
{
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
<< " <== Rootdevice responded with incorrect HTTP packet: "
<< e.what() << ". Ignoring device" << std::endl;
#endif
return;
}
if (p.status_code() != 200)
{
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
<< " <== Rootdevice responded with HTTP status: " << p.status_code()
<< ". Ignoring device" << std::endl;
#endif
return;
}
if (!p.header_finished())
{
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
<< " <== Rootdevice responded with incomplete HTTP "
"packet. Ignoring device" << std::endl;
#endif
return;
}
std::string url = p.header<std::string>("location");
if (url.empty())
{
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
<< " <== Rootdevice response is missing a location header. "
"Ignoring device" << std::endl;
#endif
return;
}
rootdevice d;
d.url = url;
std::set<rootdevice>::iterator i = m_devices.find(d);
if (i == m_devices.end())
{
std::string protocol;
std::string auth;
// we don't have this device in our list. Add it
boost::tie(protocol, auth, d.hostname, d.port, d.path)
= parse_url_components(d.url);
// ignore the auth here. It will be re-parsed
// by the http connection later
if (protocol != "http")
{
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
<< " <== Rootdevice uses unsupported protocol: '" << protocol
<< "'. Ignoring device" << std::endl;
#endif
return;
}
if (d.port == 0)
{
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
<< " <== Rootdevice responded with a url with port 0. "
"Ignoring device" << std::endl;
#endif
return;
}
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
<< " <== Found rootdevice: " << d.url << std::endl;
#endif
2007-04-01 03:18:10 +02:00
if (m_tcp_local_port != 0)
{
d.mapping[0].need_update = true;
d.mapping[0].local_port = m_tcp_local_port;
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string() << " *** Mapping 0 will be updated" << std::endl;
#endif
2007-04-01 03:18:10 +02:00
}
if (m_udp_local_port != 0)
{
d.mapping[1].need_update = true;
d.mapping[1].local_port = m_udp_local_port;
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string() << " *** Mapping 1 will be updated" << std::endl;
#endif
2007-04-01 03:18:10 +02:00
}
boost::tie(i, boost::tuples::ignore) = m_devices.insert(d);
}
2007-05-08 20:02:10 +02:00
// since we're using udp, send the query 4 times
// just to make sure we find all devices
2007-05-09 01:22:57 +02:00
if (m_retry_count >= 4 && !m_devices.empty())
2007-05-08 20:02:10 +02:00
{
m_broadcast_timer.cancel();
for (std::set<rootdevice>::iterator i = m_devices.begin()
, end(m_devices.end()); i != end; ++i)
{
2007-05-14 09:31:01 +02:00
if (i->control_url.empty() && !i->upnp_connection && !i->disabled)
2007-05-08 20:02:10 +02:00
{
// we don't have a WANIP or WANPPP url for this device,
// ask for it
rootdevice& d = const_cast<rootdevice&>(*i);
2007-05-14 09:31:01 +02:00
try
{
d.upnp_connection.reset(new http_connection(m_socket.io_service()
, m_cc, m_strand.wrap(bind(&upnp::on_upnp_xml, this, _1, _2
, boost::ref(d)))));
d.upnp_connection->get(d.url);
}
catch (std::exception& e)
{
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
<< " *** Connection failed to: " << d.url
<< " " << e.what() << std::endl;
#endif
d.disabled = true;
}
2007-05-08 20:02:10 +02:00
}
}
}
}
2007-05-14 09:31:01 +02:00
#ifndef NDEBUG
2007-05-10 20:00:10 +02:00
catch (std::exception&)
{
2007-05-14 09:31:01 +02:00
assert(false);
};
2007-05-14 09:31:01 +02:00
#endif
void upnp::post(rootdevice& d, std::stringstream const& soap
, std::string const& soap_action)
{
std::stringstream header;
header << "POST " << d.control_url << " HTTP/1.1\r\n"
"Host: " << d.hostname << ":" << d.port << "\r\n"
"Content-Type: text/xml; charset=\"utf-8\"\r\n"
"Content-Length: " << soap.str().size() << "\r\n"
"Soapaction: \"" << d.service_namespace << "#" << soap_action << "\"\r\n\r\n" << soap.str();
d.upnp_connection->sendbuffer = header.str();
d.upnp_connection->start(d.hostname, boost::lexical_cast<std::string>(d.port)
, seconds(10));
}
void upnp::map_port(rootdevice& d, int i)
{
if (d.upnp_connection) return;
2007-04-01 03:18:10 +02:00
if (!d.mapping[i].need_update)
{
2007-05-08 20:02:10 +02:00
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string() << " *** mapping (" << i
<< ") does not need update, skipping" << std::endl;
#endif
2007-04-01 03:18:10 +02:00
if (i < num_mappings - 1)
map_port(d, i + 1);
return;
}
d.mapping[i].need_update = false;
2007-04-01 17:39:08 +02:00
assert(!d.upnp_connection);
2007-05-06 00:06:26 +02:00
assert(d.service_namespace);
d.upnp_connection.reset(new http_connection(m_socket.io_service()
, m_cc, m_strand.wrap(bind(&upnp::on_upnp_map_response, this, _1, _2
2007-04-10 07:14:37 +02:00
, boost::ref(d), i))));
std::string soap_action = "AddPortMapping";
std::stringstream soap;
soap << "<?xml version=\"1.0\"?>\n"
"<s:Envelope xmlns:s=\"http://schemas.xmlsoap.org/soap/envelope/\" "
"s:encodingStyle=\"http://schemas.xmlsoap.org/soap/encoding/\">"
"<s:Body><u:" << soap_action << " xmlns:u=\"" << d.service_namespace << "\">";
soap << "<NewRemoteHost></NewRemoteHost>"
"<NewExternalPort>" << d.mapping[i].external_port << "</NewExternalPort>"
"<NewProtocol>" << (d.mapping[i].protocol ? "UDP" : "TCP") << "</NewProtocol>"
"<NewInternalPort>" << d.mapping[i].local_port << "</NewInternalPort>"
"<NewInternalClient>" << m_local_ip.to_string() << "</NewInternalClient>"
"<NewEnabled>1</NewEnabled>"
"<NewPortMappingDescription>" << m_user_agent << "</NewPortMappingDescription>"
"<NewLeaseDuration>" << d.lease_duration << "</NewLeaseDuration>";
soap << "</u:" << soap_action << "></s:Body></s:Envelope>";
post(d, soap, soap_action);
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
<< " ==> AddPortMapping: " << soap.str() << std::endl;
#endif
}
2007-04-01 17:39:08 +02:00
// requires the mutex to be locked
void upnp::unmap_port(rootdevice& d, int i)
{
2007-04-01 17:39:08 +02:00
if (d.mapping[i].external_port == 0)
{
if (i < num_mappings - 1)
{
unmap_port(d, i + 1);
}
else
{
m_devices.erase(d);
}
return;
}
d.upnp_connection.reset(new http_connection(m_socket.io_service()
, m_cc, m_strand.wrap(bind(&upnp::on_upnp_unmap_response, this, _1, _2
2007-04-10 07:14:37 +02:00
, boost::ref(d), i))));
std::string soap_action = "DeletePortMapping";
std::stringstream soap;
soap << "<?xml version=\"1.0\"?>\n"
"<s:Envelope xmlns:s=\"http://schemas.xmlsoap.org/soap/envelope/\" "
"s:encodingStyle=\"http://schemas.xmlsoap.org/soap/encoding/\">"
"<s:Body><u:" << soap_action << " xmlns:u=\"" << d.service_namespace << "\">";
soap << "<NewRemoteHost></NewRemoteHost>"
"<NewExternalPort>" << d.mapping[i].external_port << "</NewExternalPort>"
"<NewProtocol>" << (d.mapping[i].protocol ? "UDP" : "TCP") << "</NewProtocol>";
soap << "</u:" << soap_action << "></s:Body></s:Envelope>";
post(d, soap, soap_action);
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
<< " ==> DeletePortMapping: " << soap.str() << std::endl;
#endif
}
namespace
{
struct parse_state
{
parse_state(): found_service(false), exit(false) {}
void reset(char const* st)
{
found_service = false;
exit = false;
service_type = st;
}
bool found_service;
bool exit;
std::string top_tag;
std::string control_url;
char const* service_type;
};
void find_control_url(int type, char const* string, parse_state& state)
{
if (state.exit) return;
if (type == xml_start_tag)
{
if ((!state.top_tag.empty() && state.top_tag == "service")
|| !strcmp(string, "service"))
{
state.top_tag = string;
}
}
else if (type == xml_end_tag)
{
if (!strcmp(string, "service"))
{
state.top_tag.clear();
if (state.found_service) state.exit = true;
}
else if (!state.top_tag.empty() && state.top_tag != "service")
state.top_tag = "service";
}
else if (type == xml_string)
{
if (state.top_tag == "serviceType")
{
if (!strcmp(string, state.service_type))
state.found_service = true;
}
else if (state.top_tag == "controlURL")
{
state.control_url = string;
if (state.found_service) state.exit = true;
}
}
}
}
void upnp::on_upnp_xml(asio::error_code const& e
2007-05-10 20:00:10 +02:00
, libtorrent::http_parser const& p, rootdevice& d) try
{
2007-04-01 17:39:08 +02:00
if (d.upnp_connection)
{
d.upnp_connection->close();
d.upnp_connection.reset();
}
2007-03-30 18:57:55 +02:00
if (e)
{
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
2007-04-01 03:18:10 +02:00
<< " <== error while fetching control url: " << e.message() << std::endl;
2007-03-30 18:57:55 +02:00
#endif
return;
}
2007-04-01 17:39:08 +02:00
if (!p.header_finished())
{
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
2007-04-01 17:39:08 +02:00
<< " <== incomplete http message" << std::endl;
#endif
return;
}
parse_state s;
s.reset("urn:schemas-upnp-org:service:WANIPConnection:1");
xml_parse((char*)p.get_body().begin, (char*)p.get_body().end
2007-04-10 07:14:37 +02:00
, m_strand.wrap(bind(&find_control_url, _1, _2, boost::ref(s))));
2007-05-06 00:06:26 +02:00
if (s.found_service)
{
d.service_namespace = s.service_type;
}
else
{
// we didn't find the WAN IP connection, look for
2007-05-06 00:06:26 +02:00
// a PPP connection
s.reset("urn:schemas-upnp-org:service:WANPPPConnection:1");
xml_parse((char*)p.get_body().begin, (char*)p.get_body().end
2007-04-10 07:14:37 +02:00
, m_strand.wrap(bind(&find_control_url, _1, _2, boost::ref(s))));
2007-05-06 00:06:26 +02:00
if (s.found_service)
{
d.service_namespace = s.service_type;
}
else
{
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
<< " <== Rootdevice response, did not find a port mapping interface" << std::endl;
#endif
return;
}
}
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
<< " <== Rootdevice response, found control URL: " << s.control_url
<< " namespace: " << d.service_namespace << std::endl;
#endif
d.control_url = s.control_url;
map_port(d, 0);
}
2007-05-10 20:00:10 +02:00
catch (std::exception&)
2007-05-14 09:31:01 +02:00
{
disable();
};
2007-05-14 09:31:01 +02:00
void upnp::disable()
2007-05-10 20:00:10 +02:00
{
m_disabled = true;
2007-05-14 09:31:01 +02:00
m_devices.clear();
m_broadcast_timer.cancel();
m_refresh_timer.cancel();
m_socket.close();
2007-05-10 20:00:10 +02:00
}
namespace
{
struct error_code_parse_state
{
error_code_parse_state(): in_error_code(false), exit(false), error_code(-1) {}
bool in_error_code;
bool exit;
int error_code;
};
void find_error_code(int type, char const* string, error_code_parse_state& state)
{
if (state.exit) return;
if (type == xml_start_tag && !strcmp("errorCode", string))
{
state.in_error_code = true;
}
else if (type == xml_string && state.in_error_code)
{
state.error_code = std::atoi(string);
state.exit = true;
}
}
}
2007-05-07 02:12:33 +02:00
namespace
{
struct error_code_t
{
int code;
char const* msg;
};
error_code_t error_codes[] =
{
{402, "Invalid Arguments"}
, {501, "Action Failed"}
, {714, "The specified value does not exist in the array"}
, {715, "The source IP address cannot be wild-carded"}
, {716, "The external port cannot be wild-carded"}
, {718, "The port mapping entry specified conflicts with "
"a mapping assigned previously to another client"}
, {724, "Internal and External port values must be the same"}
, {725, "The NAT implementation only supports permanent "
"lease times on port mappings"}
, {726, "RemoteHost must be a wildcard and cannot be a "
"specific IP address or DNS name"}
, {727, "ExternalPort must be a wildcard and cannot be a specific port "}
};
}
void upnp::on_upnp_map_response(asio::error_code const& e
2007-05-10 20:00:10 +02:00
, libtorrent::http_parser const& p, rootdevice& d, int mapping) try
{
2007-04-01 17:39:08 +02:00
if (d.upnp_connection)
{
d.upnp_connection->close();
d.upnp_connection.reset();
}
2007-03-30 18:57:55 +02:00
if (e)
{
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
2007-04-01 03:18:10 +02:00
<< " <== error while adding portmap: " << e.message() << std::endl;
#endif
2007-04-01 03:18:10 +02:00
m_devices.erase(d);
return;
}
if (m_closing) return;
// error code response may look like this:
// <s:Envelope xmlns:s="http://schemas.xmlsoap.org/soap/envelope/"
// s:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/">
// <s:Body>
// <s:Fault>
// <faultcode>s:Client</faultcode>
// <faultstring>UPnPError</faultstring>
// <detail>
// <UPnPErrorxmlns="urn:schemas-upnp-org:control-1-0">
// <errorCode>402</errorCode>
// <errorDescription>Invalid Args</errorDescription>
// </UPnPError>
// </detail>
// </s:Fault>
// </s:Body>
// </s:Envelope>
2007-04-01 17:39:08 +02:00
if (!p.header_finished())
{
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
2007-04-01 17:39:08 +02:00
<< " <== incomplete http message" << std::endl;
#endif
m_devices.erase(d);
2007-04-01 17:39:08 +02:00
return;
}
error_code_parse_state s;
xml_parse((char*)p.get_body().begin, (char*)p.get_body().end
2007-04-10 07:14:37 +02:00
, m_strand.wrap(bind(&find_error_code, _1, _2, boost::ref(s))));
#ifdef TORRENT_UPNP_LOGGING
if (s.error_code != -1)
{
m_log << time_now_string()
<< " <== got error message: " << s.error_code << std::endl;
}
#endif
if (s.error_code == 725)
{
2007-03-30 18:57:55 +02:00
// only permanent leases supported
d.lease_duration = 0;
2007-04-01 17:39:08 +02:00
d.mapping[mapping].need_update = true;
2007-03-30 18:57:55 +02:00
map_port(d, mapping);
2007-04-01 17:39:08 +02:00
return;
2007-03-30 18:57:55 +02:00
}
else if (s.error_code == 718)
{
// conflict in mapping, try next external port
2007-04-01 17:39:08 +02:00
++d.mapping[mapping].external_port;
d.mapping[mapping].need_update = true;
2007-03-30 18:57:55 +02:00
map_port(d, mapping);
2007-04-01 17:39:08 +02:00
return;
2007-03-30 18:57:55 +02:00
}
else if (s.error_code != -1)
{
2007-05-07 02:12:33 +02:00
int num_errors = sizeof(error_codes) / sizeof(error_codes[0]);
error_code_t* end = error_codes + num_errors;
error_code_t tmp = {s.error_code, 0};
error_code_t* e = std::lower_bound(error_codes, end, tmp
, bind(&error_code_t::code, _1) < bind(&error_code_t::code, _2));
std::string error_string = "UPnP mapping error ";
error_string += boost::lexical_cast<std::string>(s.error_code);
if (e != end && e->code == s.error_code)
{
error_string += ": ";
error_string += e->msg;
}
m_callback(0, 0, error_string);
}
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
<< " <== map response: " << std::string(p.get_body().begin, p.get_body().end)
<< std::endl;
#endif
2007-03-30 18:57:55 +02:00
if (s.error_code == -1)
{
int tcp = 0;
int udp = 0;
if (mapping == 0)
tcp = d.mapping[mapping].external_port;
else
udp = d.mapping[mapping].external_port;
m_callback(tcp, udp, "");
if (d.lease_duration > 0)
{
d.mapping[mapping].expires = time_now()
2007-04-01 17:39:08 +02:00
+ seconds(int(d.lease_duration * 0.75f));
ptime next_expire = m_refresh_timer.expires_at();
if (next_expire < time_now()
|| next_expire > d.mapping[mapping].expires)
{
m_refresh_timer.expires_at(d.mapping[mapping].expires);
2007-04-10 07:14:37 +02:00
m_refresh_timer.async_wait(m_strand.wrap(bind(&upnp::on_expire, this, _1)));
}
}
else
{
d.mapping[mapping].expires = max_time();
}
2007-03-30 18:57:55 +02:00
}
for (int i = 0; i < num_mappings; ++i)
{
if (d.mapping[i].need_update)
{
map_port(d, i);
return;
}
}
}
2007-05-10 20:00:10 +02:00
catch (std::exception&)
{
2007-05-14 09:31:01 +02:00
disable();
};
void upnp::on_upnp_unmap_response(asio::error_code const& e
2007-05-10 20:00:10 +02:00
, libtorrent::http_parser const& p, rootdevice& d, int mapping) try
{
2007-04-01 17:39:08 +02:00
if (d.upnp_connection)
{
d.upnp_connection->close();
d.upnp_connection.reset();
}
if (e)
{
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
2007-04-01 03:18:10 +02:00
<< " <== error while deleting portmap: " << e.message() << std::endl;
#endif
}
2007-04-01 17:39:08 +02:00
if (!p.header_finished())
{
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
2007-04-01 17:39:08 +02:00
<< " <== incomplete http message" << std::endl;
#endif
return;
}
#ifdef TORRENT_UPNP_LOGGING
m_log << time_now_string()
<< " <== unmap response: " << std::string(p.get_body().begin, p.get_body().end)
<< std::endl;
#endif
// ignore errors and continue with the next mapping for this device
if (mapping < num_mappings - 1)
{
unmap_port(d, mapping + 1);
2007-04-01 17:39:08 +02:00
return;
}
2007-04-01 17:39:08 +02:00
// the main thread is likely to be waiting for
// all the unmap operations to complete
m_devices.erase(d);
}
2007-05-10 20:00:10 +02:00
catch (std::exception&)
{
2007-05-14 09:31:01 +02:00
disable();
};
2007-05-10 20:00:10 +02:00
void upnp::on_expire(asio::error_code const& e) try
{
if (e) return;
ptime now = time_now();
ptime next_expire = max_time();
for (std::set<rootdevice>::iterator i = m_devices.begin()
, end(m_devices.end()); i != end; ++i)
{
rootdevice& d = const_cast<rootdevice&>(*i);
for (int m = 0; m < num_mappings; ++m)
{
if (d.mapping[m].expires != max_time())
continue;
if (d.mapping[m].expires < now)
{
d.mapping[m].expires = max_time();
map_port(d, m);
}
else if (d.mapping[m].expires < next_expire)
{
next_expire = d.mapping[m].expires;
}
}
}
if (next_expire != max_time())
{
m_refresh_timer.expires_at(next_expire);
2007-04-10 07:14:37 +02:00
m_refresh_timer.async_wait(m_strand.wrap(bind(&upnp::on_expire, this, _1)));
}
}
2007-05-10 20:00:10 +02:00
catch (std::exception&)
{
2007-05-14 09:31:01 +02:00
disable();
};
void upnp::close()
{
2007-04-09 02:26:00 +02:00
m_refresh_timer.cancel();
m_broadcast_timer.cancel();
m_closing = true;
m_socket.close();
if (m_disabled)
{
m_devices.clear();
return;
}
for (std::set<rootdevice>::iterator i = m_devices.begin()
2007-04-01 03:18:10 +02:00
, end(m_devices.end()); i != end;)
{
rootdevice& d = const_cast<rootdevice&>(*i);
2007-04-01 03:18:10 +02:00
if (d.control_url.empty())
2007-04-01 17:39:08 +02:00
{
2007-04-01 03:18:10 +02:00
m_devices.erase(i++);
2007-04-01 17:39:08 +02:00
continue;
}
2007-04-01 03:18:10 +02:00
++i;
2007-04-05 19:53:42 +02:00
unmap_port(d, 0);
}
}