summaryrefslogtreecommitdiffstatshomepage
path: root/src/lib/util
diff options
context:
space:
mode:
Diffstat (limited to 'src/lib/util')
-rw-r--r--src/lib/util/server_http.hpp493
-rw-r--r--src/lib/util/server_http_impl.hpp482
-rw-r--r--src/lib/util/server_ws.hpp703
-rw-r--r--src/lib/util/server_ws_impl.hpp717
4 files changed, 1238 insertions, 1157 deletions
diff --git a/src/lib/util/server_http.hpp b/src/lib/util/server_http.hpp
index b50161b1e3b..b822daecfc8 100644
--- a/src/lib/util/server_http.hpp
+++ b/src/lib/util/server_http.hpp
@@ -1,14 +1,8 @@
// license:MIT
// copyright-holders:Ole Christian Eidheim, Miodrag Milanovic
-#ifndef SERVER_HTTP_HPP
-#define SERVER_HTTP_HPP
+#ifndef MAME_LIB_UTIL_SERVER_HTTP_HPP
+#define MAME_LIB_UTIL_SERVER_HTTP_HPP
-#if defined(_MSC_VER)
-#pragma warning(disable:4503)
-#endif
-
-#include "asio.h"
-#include "asio/system_timer.hpp"
#include "path_to_regex.hpp"
#include <map>
@@ -41,471 +35,32 @@ public:
return seed;
}
};
-#endif
-namespace webpp {
- template <class socket_type>
- class Server;
-
- template <class socket_type>
- class ServerBase {
- public:
- virtual ~ServerBase() {}
-
- class Response {
- friend class ServerBase<socket_type>;
-
- asio::streambuf m_streambuf;
-
- std::shared_ptr<socket_type> m_socket;
- std::ostream m_ostream;
- std::stringstream m_header;
- explicit Response(const std::shared_ptr<socket_type> &socket) : m_socket(socket), m_ostream(&m_streambuf) {}
-
- static std::string statusToString(int status)
- {
- switch (status) {
- default:
- case 200: return "HTTP/1.0 200 OK\r\n";
- case 201: return "HTTP/1.0 201 Created\r\n";
- case 202: return "HTTP/1.0 202 Accepted\r\n";
- case 204: return "HTTP/1.0 204 No Content\r\n";
- case 300: return "HTTP/1.0 300 Multiple Choices\r\n";
- case 301: return "HTTP/1.0 301 Moved Permanently\r\n";
- case 302: return "HTTP/1.0 302 Moved Temporarily\r\n";
- case 304: return "HTTP/1.0 304 Not Modified\r\n";
- case 400: return "HTTP/1.0 400 Bad Request\r\n";
- case 401: return "HTTP/1.0 401 Unauthorized\r\n";
- case 403: return "HTTP/1.0 403 Forbidden\r\n";
- case 404: return "HTTP/1.0 404 Not Found\r\n";
- case 500: return "HTTP/1.0 500 Internal Server Error\r\n";
- case 501: return "HTTP/1.0 501 Not Implemented\r\n";
- case 502: return "HTTP/1.0 502 Bad Gateway\r\n";
- case 504: return "HTTP/1.0 503 Service Unavailable\r\n";
- }
- }
- public:
- Response& status(int number) { m_ostream << statusToString(number); return *this; }
- void type(std::string str) { m_header << "Content-Type: "<< str << "\r\n"; }
- void send(std::string str) { m_ostream << m_header.str() << "Content-Length: " << str.length() << "\r\n\r\n" << str; }
- size_t size() const { return m_streambuf.size(); }
- std::shared_ptr<socket_type> socket() { return m_socket; }
-
- /// If true, force server to close the connection after the response have been sent.
- ///
- /// This is useful when implementing a HTTP/1.0-server sending content
- /// without specifying the content length.
- bool close_connection_after_response = false;
- };
-
- class Content : public std::istream {
- friend class ServerBase<socket_type>;
- public:
- size_t size() const {
- return streambuf.size();
- }
- std::string string() const {
- std::stringstream ss;
- ss << rdbuf();
- return ss.str();
- }
- private:
- asio::streambuf &streambuf;
- explicit Content(asio::streambuf &streambuf): std::istream(&streambuf), streambuf(streambuf) {}
- };
-
- class Request {
- friend class ServerBase<socket_type>;
- friend class Server<socket_type>;
- public:
- std::string method, path, http_version;
-
- Content content;
-
- std::unordered_multimap<std::string, std::string, case_insensitive_hash, case_insensitive_equals> header;
-
- path2regex::Keys keys;
- std::map<std::string, std::string> params;
-
- std::string remote_endpoint_address;
- unsigned short remote_endpoint_port;
-
- private:
- Request(const socket_type &socket): content(streambuf) {
- try {
- remote_endpoint_address=socket.lowest_layer().remote_endpoint().address().to_string();
- remote_endpoint_port=socket.lowest_layer().remote_endpoint().port();
- }
- catch(...) {}
- }
- asio::streambuf streambuf;
- };
-
- class Config {
- friend class ServerBase<socket_type>;
-
- Config(unsigned short port) : port(port) {}
- public:
- /// Port number to use. Defaults to 80 for HTTP and 443 for HTTPS.
- unsigned short port;
- /// Number of threads that the server will use when start() is called. Defaults to 1 thread.
- size_t thread_pool_size=1;
- /// Timeout on request handling. Defaults to 5 seconds.
- size_t timeout_request=5;
- /// Timeout on content handling. Defaults to 300 seconds.
- size_t timeout_content=300;
- /// IPv4 address in dotted decimal form or IPv6 address in hexadecimal notation.
- /// If empty, the address will be any address.
- std::string address;
- /// Set to false to avoid binding the socket to an address that is already in use. Defaults to true.
- bool reuse_address=true;
- };
- ///Set before calling start().
- Config m_config;
- private:
- class regex_orderable : public std::regex {
- std::string str;
- public:
- regex_orderable(std::regex reg, const std::string &regex_str) : std::regex(reg), str(regex_str) {}
- bool operator<(const regex_orderable &rhs) const {
- return str<rhs.str;
- }
- std::string getstr() const { return str; }
- };
- using http_handler = std::function<void(std::shared_ptr<Response>, std::shared_ptr<Request>)>;
-
- public:
- template<class T> void on_get(std::string regex, T&& func) { std::lock_guard<std::mutex> lock(m_resource_mutex); path2regex::Keys keys; auto reg = path2regex::path_to_regex(regex, keys); m_resource[regex_orderable(reg,regex)]["GET"] = std::make_tuple(std::move(keys), func); }
- template<class T> void on_get(T&& func) { std::lock_guard<std::mutex> lock(m_resource_mutex); m_default_resource["GET"] = func; }
- template<class T> void on_post(std::string regex, T&& func) { std::lock_guard<std::mutex> lock(m_resource_mutex); path2regex::Keys keys; auto reg = path2regex::path_to_regex(regex, keys); m_resource[regex_orderable(reg, regex)]["POST"] = std::make_tuple(std::move(keys), func); }
- template<class T> void on_post(T&& func) { std::lock_guard<std::mutex> lock(m_resource_mutex); m_default_resource["POST"] = func; }
- template<class T> void on_put(std::string regex, T&& func) { std::lock_guard<std::mutex> lock(m_resource_mutex); path2regex::Keys keys; auto reg = path2regex::path_to_regex(regex, keys); m_resource[regex_orderable(reg, regex)]["PUT"] = std::make_tuple(std::move(keys), func); }
- template<class T> void on_put(T&& func) { std::lock_guard<std::mutex> lock(m_resource_mutex); m_default_resource["PUT"] = func; }
- template<class T> void on_patch(std::string regex, T&& func) { std::lock_guard<std::mutex> lock(m_resource_mutex); path2regex::Keys keys; auto reg = path2regex::path_to_regex(regex, keys); m_resource[regex_orderable(reg, regex)]["PATCH"] = std::make_tuple(std::move(keys), func); }
- template<class T> void on_patch(T&& func) { std::lock_guard<std::mutex> lock(m_resource_mutex); m_default_resource["PATCH"] = func; }
- template<class T> void on_delete(std::string regex, T&& func) { std::lock_guard<std::mutex> lock(m_resource_mutex); path2regex::Keys keys; auto reg = path2regex::path_to_regex(regex, keys); m_resource[regex_orderable(reg, regex)]["DELETE"] = std::make_tuple(std::move(keys), func); }
- template<class T> void on_delete(T&& func) { std::lock_guard<std::mutex> lock(m_resource_mutex); m_default_resource["DELETE"] = func; }
-
- void remove_handler(std::string regex)
- {
- std::lock_guard<std::mutex> lock(m_resource_mutex);
- for (auto it = m_resource.begin(); it != m_resource.end(); ++it)
- {
- if (it->first.getstr() == regex)
- {
- m_resource.erase(it);
- break;
- }
- }
- }
- void clear()
- {
- std::lock_guard<std::mutex> lock(m_resource_mutex);
- m_resource.clear();
- }
-
- std::function<void(std::shared_ptr<typename ServerBase<socket_type>::Request>, const std::error_code&)> on_error;
-
- std::function<void(std::shared_ptr<socket_type> socket, std::shared_ptr<typename ServerBase<socket_type>::Request>)> on_upgrade;
- private:
- /// Warning: do not access (red or write) m_resources without holding m_resource_mutex
- std::map<regex_orderable, std::map<std::string, std::tuple<path2regex::Keys, http_handler>>> m_resource;
- std::mutex m_resource_mutex;
-
- std::map<std::string, http_handler> m_default_resource;
-
- public:
- virtual void start() {
- if(!m_io_context)
- m_io_context=std::make_shared<asio::io_context>();
-
- if(m_io_context->stopped())
- m_io_context.reset();
-
- asio::ip::tcp::endpoint endpoint;
- if(m_config.address.size()>0)
- endpoint=asio::ip::tcp::endpoint(asio::ip::make_address(m_config.address), m_config.port);
- else
- endpoint=asio::ip::tcp::endpoint(asio::ip::tcp::v4(), m_config.port);
-
- if(!acceptor)
- acceptor= std::make_unique<asio::ip::tcp::acceptor>(*m_io_context);
- acceptor->open(endpoint.protocol());
- acceptor->set_option(asio::socket_base::reuse_address(m_config.reuse_address));
- acceptor->bind(endpoint);
- acceptor->listen();
-
- accept();
-
- if (!m_external_context)
- m_io_context->run();
- }
-
- void stop() const
- {
- acceptor->close();
- if (!m_external_context)
- m_io_context->stop();
- }
-
- ///Use this function if you need to recursively send parts of a longer message
- void send(const std::shared_ptr<Response> &response, const std::function<void(const std::error_code&)>& callback=nullptr) const {
- asio::async_write(*response->socket(), response->m_streambuf, [this, response, callback](const std::error_code& ec, size_t /*bytes_transferred*/) {
- if(callback)
- callback(ec);
- });
- }
-
- void set_io_context(std::shared_ptr<asio::io_context> new_io_context)
- {
- m_io_context = new_io_context;
- m_external_context = true;
- }
- protected:
- std::shared_ptr<asio::io_context> m_io_context;
- bool m_external_context;
- std::unique_ptr<asio::ip::tcp::acceptor> acceptor;
- std::vector<std::thread> threads;
-
- ServerBase(unsigned short port) : m_config(port), m_external_context(false) {}
-
- virtual void accept()=0;
-
- std::shared_ptr<asio::system_timer> get_timeout_timer(const std::shared_ptr<socket_type> &socket, long seconds) {
- if(seconds==0)
- return nullptr;
- auto timer = std::make_shared<asio::system_timer>(*m_io_context);
- timer->expires_at(std::chrono::system_clock::now() + std::chrono::seconds(seconds));
- timer->async_wait([socket](const std::error_code& ec){
- if(!ec) {
- std::error_code newec = ec;
- socket->lowest_layer().shutdown(asio::ip::tcp::socket::shutdown_both, newec);
- socket->lowest_layer().close();
- }
- });
- return timer;
- }
-
- void read_request_and_content(const std::shared_ptr<socket_type> &socket) {
- //Create new streambuf (Request::streambuf) for async_read_until()
- //shared_ptr is used to pass temporary objects to the asynchronous functions
- std::shared_ptr<Request> request(new Request(*socket));
-
- //Set timeout on the following asio::async-read or write function
- auto timer = get_timeout_timer(socket, m_config.timeout_request);
-
- asio::async_read_until(*socket, request->streambuf, "\r\n\r\n",
- [this, socket, request, timer](const std::error_code& ec, size_t bytes_transferred) {
- if(timer)
- timer->cancel();
- if(!ec) {
- //request->streambuf.size() is not necessarily the same as bytes_transferred, from Boost-docs:
- //"After a successful async_read_until operation, the streambuf may contain additional data beyond the delimiter"
- //The chosen solution is to extract lines from the stream directly when parsing the header. What is left of the
- //streambuf (maybe some bytes of the content) is appended to in the async_read-function below (for retrieving content).
- size_t num_additional_bytes=request->streambuf.size()-bytes_transferred;
-
- if (!parse_request(request))
- return;
-
- //If content, read that as well
- auto it = request->header.find("Content-Length");
- if (it != request->header.end()) {
- unsigned long long content_length;
- try {
- content_length = stoull(it->second);
- }
- catch (const std::exception &) {
- if (on_error)
- on_error(request, std::error_code(EPROTO, std::generic_category()));
- return;
- }
- if (content_length > num_additional_bytes) {
- //Set timeout on the following asio::async-read or write function
- auto timer2 = get_timeout_timer(socket, m_config.timeout_content);
- asio::async_read(*socket, request->streambuf,
- asio::transfer_exactly(size_t(content_length) - num_additional_bytes),
- [this, socket, request, timer2]
- (const std::error_code& ec, size_t /*bytes_transferred*/) {
- if (timer2)
- timer2->cancel();
- if (!ec)
- find_resource(socket, request);
- else if (on_error)
- on_error(request, ec);
- });
- }
- else {
- find_resource(socket, request);
- }
- }
- else {
- find_resource(socket, request);
- }
- }
- else if (on_error)
- on_error(request, ec);
- });
- }
-
- bool parse_request(const std::shared_ptr<Request> &request) const {
- std::string line;
- getline(request->content, line);
- size_t method_end;
- if((method_end=line.find(' '))!=std::string::npos) {
- size_t path_end;
- if((path_end=line.find(' ', method_end+1))!=std::string::npos) {
- request->method=line.substr(0, method_end);
- request->path=line.substr(method_end+1, path_end-method_end-1);
-
- size_t protocol_end;
- if((protocol_end=line.find('/', path_end+1))!=std::string::npos) {
- if(line.compare(path_end+1, protocol_end-path_end-1, "HTTP")!=0)
- return false;
- request->http_version=line.substr(protocol_end+1, line.size()-protocol_end-2);
- }
- else
- return false;
-
- getline(request->content, line);
- size_t param_end;
- while((param_end=line.find(':'))!=std::string::npos) {
- size_t value_start=param_end+1;
- if((value_start)<line.size()) {
- if(line[value_start]==' ')
- value_start++;
- if(value_start<line.size())
- request->header.emplace(line.substr(0, param_end), line.substr(value_start, line.size() - value_start - 1));
- }
-
- getline(request->content, line);
- }
- }
- else
- return false;
- }
- else
- return false;
- return true;
- }
-
- void find_resource(const std::shared_ptr<socket_type> &socket, const std::shared_ptr<Request> &request) {
- std::lock_guard<std::mutex> lock(m_resource_mutex);
- //Upgrade connection
- if(on_upgrade) {
- auto it=request->header.find("Upgrade");
- if(it!=request->header.end()) {
- on_upgrade(socket, request);
- return;
- }
- }
- //Find path- and method-match, and call write_response
- for(auto& regex_method : m_resource) {
- auto it = regex_method.second.find(request->method);
- if (it != regex_method.second.end()) {
- std::smatch sm_res;
- if (std::regex_match(request->path, sm_res, regex_method.first)) {
- request->keys = std::get<0>(it->second);
- for (size_t i = 0; i < request->keys.size(); i++) {
- request->params.insert(std::pair<std::string, std::string>(request->keys[i].name, sm_res[i + 1]));
- }
- write_response(socket, request, std::get<1>(it->second));
- return;
- }
- }
- }
- auto it=m_default_resource.find(request->method);
- if(it!=m_default_resource.end()) {
- write_response(socket, request, it->second);
- }
- }
-
- void write_response(const std::shared_ptr<socket_type> &socket, const std::shared_ptr<Request> &request, http_handler& resource_function) {
- //Set timeout on the following asio::async-read or write function
- auto timer = get_timeout_timer(socket, m_config.timeout_content);
-
- auto response=std::shared_ptr<Response>(new Response(socket), [this, request, timer](Response *response_ptr) {
- auto response=std::shared_ptr<Response>(response_ptr);
- send(response, [this, response, request, timer](const std::error_code& ec) {
- if (timer)
- timer->cancel();
- if (!ec) {
- float http_version;
- try {
- http_version = stof(request->http_version);
- }
- catch (const std::exception &) {
- if (on_error)
- on_error(request, std::error_code(EPROTO, std::generic_category()));
- return;
- }
+#endif /* CASE_INSENSITIVE_EQUALS_AND_HASH */
- if (response->close_connection_after_response)
- return;
-
- auto range = request->header.equal_range("Connection");
- case_insensitive_equals check;
- for (auto it = range.first; it != range.second; ++it) {
- if (check(it->second, "close"))
- return;
- }
- if (http_version > 1.05)
- read_request_and_content(response->socket());
- }
- else if (on_error)
- on_error(request, ec);
- });
- });
-
- try {
- resource_function(response, request);
- }
- catch(const std::exception &) {
- if (on_error)
- on_error(request, std::error_code(EPROTO, std::generic_category()));
- }
- }
- };
-
- template<class socket_type>
- class Server : public ServerBase<socket_type> {
- public:
- Server(unsigned short port, size_t num_threads, long timeout_request, long timeout_send_or_receive)
- : ServerBase<socket_type>(port, num_threads, timeout_request, timeout_send_or_receive)
- {
- }
- };
-
- using HTTP = asio::ip::tcp::socket;
-
- template<>
- class Server<HTTP> : public ServerBase<HTTP> {
- public:
- Server() : ServerBase<HTTP>::ServerBase(80) {}
- protected:
- void accept() override {
- //Create new socket for this connection
- //Shared_ptr is used to pass temporary objects to the asynchronous functions
- auto socket = std::make_shared<HTTP>(*m_io_context);
+namespace webpp {
+ struct Request {
+ std::string method, path, http_version;
- acceptor->async_accept(*socket, [this, socket](const std::error_code& ec){
- //Immediately start accepting a new connection (if io_context hasn't been stopped)
- if (ec != asio::error::operation_aborted)
- accept();
+ std::unordered_multimap<std::string, std::string, case_insensitive_hash, case_insensitive_equals> header;
- if(!ec) {
- asio::ip::tcp::no_delay option(true);
- socket->set_option(option);
+ path2regex::Keys keys;
+ std::map<std::string, std::string> params;
- read_request_and_content(socket);
- } else if (on_error)
- on_error(std::shared_ptr<Request>(new Request(*socket)), ec);
- });
- }
+ std::string remote_endpoint_address;
+ unsigned short remote_endpoint_port;
+
+ virtual ~Request() {}
};
-
- class http_server : public Server<HTTP> {
- public:
- http_server() : Server<HTTP>::Server() {}
+
+ struct Response {
+ virtual Response& status(int number) = 0;
+ virtual void type(std::string str) = 0;
+ virtual void send(std::string str) = 0;
+ virtual size_t size() const = 0;
+
+ virtual ~Response() {}
};
+
+ class http_server;
}
-#endif /* SERVER_HTTP_HPP */
+#endif /* MAME_LIB_UTIL_SERVER_HTTP_HPP */
diff --git a/src/lib/util/server_http_impl.hpp b/src/lib/util/server_http_impl.hpp
new file mode 100644
index 00000000000..e8b76ad2f74
--- /dev/null
+++ b/src/lib/util/server_http_impl.hpp
@@ -0,0 +1,482 @@
+// license:MIT
+// copyright-holders:Ole Christian Eidheim, Miodrag Milanovic
+#ifndef MAME_LIB_UTIL_SERVER_HTTP_IMPL_HPP
+#define MAME_LIB_UTIL_SERVER_HTTP_IMPL_HPP
+
+#if defined(_MSC_VER)
+#pragma warning(disable:4503)
+#endif
+
+#include "server_http.hpp"
+#include "asio.h"
+#include "asio/system_timer.hpp"
+#include "path_to_regex.hpp"
+
+#include <map>
+#include <unordered_map>
+#include <thread>
+#include <functional>
+#include <iostream>
+#include <sstream>
+#include <regex>
+
+namespace webpp {
+ template <class socket_type>
+ class Server;
+
+ template <class socket_type>
+ class ServerBase {
+ public:
+ virtual ~ServerBase() {}
+
+ class Response : public webpp::Response {
+ friend class ServerBase<socket_type>;
+
+ asio::streambuf m_streambuf;
+ std::shared_ptr<socket_type> m_socket;
+
+ std::ostream m_ostream;
+ std::stringstream m_header;
+
+ explicit Response(const std::shared_ptr<socket_type> &socket) : m_socket(socket), m_ostream(&m_streambuf) {}
+
+ static std::string statusToString(int status)
+ {
+ switch (status) {
+ default:
+ case 200: return "HTTP/1.0 200 OK\r\n";
+ case 201: return "HTTP/1.0 201 Created\r\n";
+ case 202: return "HTTP/1.0 202 Accepted\r\n";
+ case 204: return "HTTP/1.0 204 No Content\r\n";
+ case 300: return "HTTP/1.0 300 Multiple Choices\r\n";
+ case 301: return "HTTP/1.0 301 Moved Permanently\r\n";
+ case 302: return "HTTP/1.0 302 Moved Temporarily\r\n";
+ case 304: return "HTTP/1.0 304 Not Modified\r\n";
+ case 400: return "HTTP/1.0 400 Bad Request\r\n";
+ case 401: return "HTTP/1.0 401 Unauthorized\r\n";
+ case 403: return "HTTP/1.0 403 Forbidden\r\n";
+ case 404: return "HTTP/1.0 404 Not Found\r\n";
+ case 500: return "HTTP/1.0 500 Internal Server Error\r\n";
+ case 501: return "HTTP/1.0 501 Not Implemented\r\n";
+ case 502: return "HTTP/1.0 502 Bad Gateway\r\n";
+ case 504: return "HTTP/1.0 503 Service Unavailable\r\n";
+ }
+ }
+ public:
+ virtual Response& status(int number) { m_ostream << statusToString(number); return *this; }
+ virtual void type(std::string str) { m_header << "Content-Type: "<< str << "\r\n"; }
+ virtual void send(std::string str) { m_ostream << m_header.str() << "Content-Length: " << str.length() << "\r\n\r\n" << str; }
+ virtual size_t size() const { return m_streambuf.size(); }
+ std::shared_ptr<socket_type> socket() { return m_socket; }
+
+ /// If true, force server to close the connection after the response have been sent.
+ ///
+ /// This is useful when implementing a HTTP/1.0-server sending content
+ /// without specifying the content length.
+ bool close_connection_after_response = false;
+ virtual ~Response() {}
+ };
+
+ class Content : public std::istream {
+ friend class ServerBase<socket_type>;
+ public:
+ size_t size() const {
+ return streambuf.size();
+ }
+ std::string string() const {
+ std::stringstream ss;
+ ss << rdbuf();
+ return ss.str();
+ }
+ private:
+ asio::streambuf &streambuf;
+ explicit Content(asio::streambuf &streambuf): std::istream(&streambuf), streambuf(streambuf) {}
+ };
+
+ class Request : public webpp::Request {
+ friend class ServerBase<socket_type>;
+ friend class Server<socket_type>;
+ public:
+ Content content;
+
+ virtual ~Request() {}
+ private:
+ Request(const socket_type &socket): content(streambuf) {
+ try {
+ remote_endpoint_address=socket.lowest_layer().remote_endpoint().address().to_string();
+ remote_endpoint_port=socket.lowest_layer().remote_endpoint().port();
+ }
+ catch(...) {}
+ }
+ asio::streambuf streambuf;
+ };
+
+ class Config {
+ friend class ServerBase<socket_type>;
+
+ Config(unsigned short port) : port(port) {}
+ public:
+ /// Port number to use. Defaults to 80 for HTTP and 443 for HTTPS.
+ unsigned short port;
+ /// Number of threads that the server will use when start() is called. Defaults to 1 thread.
+ size_t thread_pool_size=1;
+ /// Timeout on request handling. Defaults to 5 seconds.
+ size_t timeout_request=5;
+ /// Timeout on content handling. Defaults to 300 seconds.
+ size_t timeout_content=300;
+ /// IPv4 address in dotted decimal form or IPv6 address in hexadecimal notation.
+ /// If empty, the address will be any address.
+ std::string address;
+ /// Set to false to avoid binding the socket to an address that is already in use. Defaults to true.
+ bool reuse_address=true;
+ };
+ ///Set before calling start().
+ Config m_config;
+ private:
+ class regex_orderable : public std::regex {
+ std::string str;
+ public:
+ regex_orderable(std::regex reg, const std::string &regex_str) : std::regex(reg), str(regex_str) {}
+ bool operator<(const regex_orderable &rhs) const {
+ return str<rhs.str;
+ }
+ std::string getstr() const { return str; }
+ };
+ using http_handler = std::function<void(std::shared_ptr<Response>, std::shared_ptr<Request>)>;
+
+ public:
+ template<class T> void on_get(std::string regex, T&& func) { std::lock_guard<std::mutex> lock(m_resource_mutex); path2regex::Keys keys; auto reg = path2regex::path_to_regex(regex, keys); m_resource[regex_orderable(reg,regex)]["GET"] = std::make_tuple(std::move(keys), func); }
+ template<class T> void on_get(T&& func) { std::lock_guard<std::mutex> lock(m_resource_mutex); m_default_resource["GET"] = func; }
+ template<class T> void on_post(std::string regex, T&& func) { std::lock_guard<std::mutex> lock(m_resource_mutex); path2regex::Keys keys; auto reg = path2regex::path_to_regex(regex, keys); m_resource[regex_orderable(reg, regex)]["POST"] = std::make_tuple(std::move(keys), func); }
+ template<class T> void on_post(T&& func) { std::lock_guard<std::mutex> lock(m_resource_mutex); m_default_resource["POST"] = func; }
+ template<class T> void on_put(std::string regex, T&& func) { std::lock_guard<std::mutex> lock(m_resource_mutex); path2regex::Keys keys; auto reg = path2regex::path_to_regex(regex, keys); m_resource[regex_orderable(reg, regex)]["PUT"] = std::make_tuple(std::move(keys), func); }
+ template<class T> void on_put(T&& func) { std::lock_guard<std::mutex> lock(m_resource_mutex); m_default_resource["PUT"] = func; }
+ template<class T> void on_patch(std::string regex, T&& func) { std::lock_guard<std::mutex> lock(m_resource_mutex); path2regex::Keys keys; auto reg = path2regex::path_to_regex(regex, keys); m_resource[regex_orderable(reg, regex)]["PATCH"] = std::make_tuple(std::move(keys), func); }
+ template<class T> void on_patch(T&& func) { std::lock_guard<std::mutex> lock(m_resource_mutex); m_default_resource["PATCH"] = func; }
+ template<class T> void on_delete(std::string regex, T&& func) { std::lock_guard<std::mutex> lock(m_resource_mutex); path2regex::Keys keys; auto reg = path2regex::path_to_regex(regex, keys); m_resource[regex_orderable(reg, regex)]["DELETE"] = std::make_tuple(std::move(keys), func); }
+ template<class T> void on_delete(T&& func) { std::lock_guard<std::mutex> lock(m_resource_mutex); m_default_resource["DELETE"] = func; }
+
+ void remove_handler(std::string regex)
+ {
+ std::lock_guard<std::mutex> lock(m_resource_mutex);
+ for (auto it = m_resource.begin(); it != m_resource.end(); ++it)
+ {
+ if (it->first.getstr() == regex)
+ {
+ m_resource.erase(it);
+ break;
+ }
+ }
+ }
+ void clear()
+ {
+ std::lock_guard<std::mutex> lock(m_resource_mutex);
+ m_resource.clear();
+ }
+
+ std::function<void(std::shared_ptr<typename ServerBase<socket_type>::Request>, const std::error_code&)> on_error;
+
+ std::function<void(std::shared_ptr<socket_type> socket, std::shared_ptr<typename ServerBase<socket_type>::Request>)> on_upgrade;
+ private:
+ /// Warning: do not access (red or write) m_resources without holding m_resource_mutex
+ std::map<regex_orderable, std::map<std::string, std::tuple<path2regex::Keys, http_handler>>> m_resource;
+ std::mutex m_resource_mutex;
+
+ std::map<std::string, http_handler> m_default_resource;
+
+ public:
+ virtual void start() {
+ if(!m_io_context)
+ m_io_context=std::make_shared<asio::io_context>();
+
+ if(m_io_context->stopped())
+ m_io_context.reset();
+
+ asio::ip::tcp::endpoint endpoint;
+ if(m_config.address.size()>0)
+ endpoint=asio::ip::tcp::endpoint(asio::ip::make_address(m_config.address), m_config.port);
+ else
+ endpoint=asio::ip::tcp::endpoint(asio::ip::tcp::v4(), m_config.port);
+
+ if(!acceptor)
+ acceptor= std::make_unique<asio::ip::tcp::acceptor>(*m_io_context);
+ acceptor->open(endpoint.protocol());
+ acceptor->set_option(asio::socket_base::reuse_address(m_config.reuse_address));
+ acceptor->bind(endpoint);
+ acceptor->listen();
+
+ accept();
+
+ if (!m_external_context)
+ m_io_context->run();
+ }
+
+ void stop() const
+ {
+ acceptor->close();
+ if (!m_external_context)
+ m_io_context->stop();
+ }
+
+ ///Use this function if you need to recursively send parts of a longer message
+ void send(const std::shared_ptr<Response> &response, const std::function<void(const std::error_code&)>& callback=nullptr) const {
+ asio::async_write(*response->socket(), response->m_streambuf, [this, response, callback](const std::error_code& ec, size_t /*bytes_transferred*/) {
+ if(callback)
+ callback(ec);
+ });
+ }
+
+ void set_io_context(std::shared_ptr<asio::io_context> new_io_context)
+ {
+ m_io_context = new_io_context;
+ m_external_context = true;
+ }
+ protected:
+ std::shared_ptr<asio::io_context> m_io_context;
+ bool m_external_context;
+ std::unique_ptr<asio::ip::tcp::acceptor> acceptor;
+ std::vector<std::thread> threads;
+
+ ServerBase(unsigned short port) : m_config(port), m_external_context(false) {}
+
+ virtual void accept()=0;
+
+ std::shared_ptr<asio::system_timer> get_timeout_timer(const std::shared_ptr<socket_type> &socket, long seconds) {
+ if(seconds==0)
+ return nullptr;
+ auto timer = std::make_shared<asio::system_timer>(*m_io_context);
+ timer->expires_at(std::chrono::system_clock::now() + std::chrono::seconds(seconds));
+ timer->async_wait([socket](const std::error_code& ec){
+ if(!ec) {
+ std::error_code newec = ec;
+ socket->lowest_layer().shutdown(asio::ip::tcp::socket::shutdown_both, newec);
+ socket->lowest_layer().close();
+ }
+ });
+ return timer;
+ }
+
+ void read_request_and_content(const std::shared_ptr<socket_type> &socket) {
+ //Create new streambuf (Request::streambuf) for async_read_until()
+ //shared_ptr is used to pass temporary objects to the asynchronous functions
+ std::shared_ptr<Request> request(new Request(*socket));
+
+ //Set timeout on the following asio::async-read or write function
+ auto timer = get_timeout_timer(socket, m_config.timeout_request);
+
+ asio::async_read_until(*socket, request->streambuf, "\r\n\r\n",
+ [this, socket, request, timer](const std::error_code& ec, size_t bytes_transferred) {
+ if(timer)
+ timer->cancel();
+ if(!ec) {
+ //request->streambuf.size() is not necessarily the same as bytes_transferred, from Boost-docs:
+ //"After a successful async_read_until operation, the streambuf may contain additional data beyond the delimiter"
+ //The chosen solution is to extract lines from the stream directly when parsing the header. What is left of the
+ //streambuf (maybe some bytes of the content) is appended to in the async_read-function below (for retrieving content).
+ size_t num_additional_bytes=request->streambuf.size()-bytes_transferred;
+
+ if (!parse_request(request))
+ return;
+
+ //If content, read that as well
+ auto it = request->header.find("Content-Length");
+ if (it != request->header.end()) {
+ unsigned long long content_length;
+ try {
+ content_length = stoull(it->second);
+ }
+ catch (const std::exception &) {
+ if (on_error)
+ on_error(request, std::error_code(EPROTO, std::generic_category()));
+ return;
+ }
+ if (content_length > num_additional_bytes) {
+ //Set timeout on the following asio::async-read or write function
+ auto timer2 = get_timeout_timer(socket, m_config.timeout_content);
+ asio::async_read(*socket, request->streambuf,
+ asio::transfer_exactly(size_t(content_length) - num_additional_bytes),
+ [this, socket, request, timer2]
+ (const std::error_code& ec, size_t /*bytes_transferred*/) {
+ if (timer2)
+ timer2->cancel();
+ if (!ec)
+ find_resource(socket, request);
+ else if (on_error)
+ on_error(request, ec);
+ });
+ }
+ else {
+ find_resource(socket, request);
+ }
+ }
+ else {
+ find_resource(socket, request);
+ }
+ }
+ else if (on_error)
+ on_error(request, ec);
+ });
+ }
+
+ bool parse_request(const std::shared_ptr<Request> &request) const {
+ std::string line;
+ getline(request->content, line);
+ size_t method_end;
+ if((method_end=line.find(' '))!=std::string::npos) {
+ size_t path_end;
+ if((path_end=line.find(' ', method_end+1))!=std::string::npos) {
+ request->method=line.substr(0, method_end);
+ request->path=line.substr(method_end+1, path_end-method_end-1);
+
+ size_t protocol_end;
+ if((protocol_end=line.find('/', path_end+1))!=std::string::npos) {
+ if(line.compare(path_end+1, protocol_end-path_end-1, "HTTP")!=0)
+ return false;
+ request->http_version=line.substr(protocol_end+1, line.size()-protocol_end-2);
+ }
+ else
+ return false;
+
+ getline(request->content, line);
+ size_t param_end;
+ while((param_end=line.find(':'))!=std::string::npos) {
+ size_t value_start=param_end+1;
+ if((value_start)<line.size()) {
+ if(line[value_start]==' ')
+ value_start++;
+ if(value_start<line.size())
+ request->header.emplace(line.substr(0, param_end), line.substr(value_start, line.size() - value_start - 1));
+ }
+
+ getline(request->content, line);
+ }
+ }
+ else
+ return false;
+ }
+ else
+ return false;
+ return true;
+ }
+
+ void find_resource(const std::shared_ptr<socket_type> &socket, const std::shared_ptr<Request> &request) {
+ std::lock_guard<std::mutex> lock(m_resource_mutex);
+ //Upgrade connection
+ if(on_upgrade) {
+ auto it=request->header.find("Upgrade");
+ if(it!=request->header.end()) {
+ on_upgrade(socket, request);
+ return;
+ }
+ }
+ //Find path- and method-match, and call write_response
+ for(auto& regex_method : m_resource) {
+ auto it = regex_method.second.find(request->method);
+ if (it != regex_method.second.end()) {
+ std::smatch sm_res;
+ if (std::regex_match(request->path, sm_res, regex_method.first)) {
+ request->keys = std::get<0>(it->second);
+ for (size_t i = 0; i < request->keys.size(); i++) {
+ request->params.insert(std::pair<std::string, std::string>(request->keys[i].name, sm_res[i + 1]));
+ }
+ write_response(socket, request, std::get<1>(it->second));
+ return;
+ }
+ }
+ }
+ auto it=m_default_resource.find(request->method);
+ if(it!=m_default_resource.end()) {
+ write_response(socket, request, it->second);
+ }
+ }
+
+ void write_response(const std::shared_ptr<socket_type> &socket, const std::shared_ptr<Request> &request, http_handler& resource_function) {
+ //Set timeout on the following asio::async-read or write function
+ auto timer = get_timeout_timer(socket, m_config.timeout_content);
+
+ auto response=std::shared_ptr<Response>(new Response(socket), [this, request, timer](Response *response_ptr) {
+ auto response=std::shared_ptr<Response>(response_ptr);
+ send(response, [this, response, request, timer](const std::error_code& ec) {
+ if (timer)
+ timer->cancel();
+ if (!ec) {
+ float http_version;
+ try {
+ http_version = stof(request->http_version);
+ }
+ catch (const std::exception &) {
+ if (on_error)
+ on_error(request, std::error_code(EPROTO, std::generic_category()));
+ return;
+ }
+
+ if (response->close_connection_after_response)
+ return;
+
+ auto range = request->header.equal_range("Connection");
+ case_insensitive_equals check;
+ for (auto it = range.first; it != range.second; ++it) {
+ if (check(it->second, "close"))
+ return;
+ }
+ if (http_version > 1.05)
+ read_request_and_content(response->socket());
+ }
+ else if (on_error)
+ on_error(request, ec);
+ });
+ });
+
+ try {
+ resource_function(response, request);
+ }
+ catch(const std::exception &) {
+ if (on_error)
+ on_error(request, std::error_code(EPROTO, std::generic_category()));
+ }
+ }
+ };
+
+ template<class socket_type>
+ class Server : public ServerBase<socket_type> {
+ public:
+ Server(unsigned short port, size_t num_threads, long timeout_request, long timeout_send_or_receive)
+ : ServerBase<socket_type>(port, num_threads, timeout_request, timeout_send_or_receive)
+ {
+ }
+ };
+
+ using HTTP = asio::ip::tcp::socket;
+
+ template<>
+ class Server<HTTP> : public ServerBase<HTTP> {
+ public:
+ Server() : ServerBase<HTTP>::ServerBase(80) {}
+ protected:
+ void accept() override {
+ //Create new socket for this connection
+ //Shared_ptr is used to pass temporary objects to the asynchronous functions
+ auto socket = std::make_shared<HTTP>(*m_io_context);
+
+ acceptor->async_accept(*socket, [this, socket](const std::error_code& ec){
+ //Immediately start accepting a new connection (if io_context hasn't been stopped)
+ if (ec != asio::error::operation_aborted)
+ accept();
+
+ if(!ec) {
+ asio::ip::tcp::no_delay option(true);
+ socket->set_option(option);
+
+ read_request_and_content(socket);
+ } else if (on_error)
+ on_error(std::shared_ptr<Request>(new Request(*socket)), ec);
+ });
+ }
+ };
+
+ class http_server : public Server<HTTP> {
+ public:
+ http_server() : Server<HTTP>::Server() {}
+ };
+}
+#endif /* MAME_LIB_UTIL_SERVER_HTTP_IMPL_HPP */
diff --git a/src/lib/util/server_ws.hpp b/src/lib/util/server_ws.hpp
index ad9887c38dd..563bd473b6d 100644
--- a/src/lib/util/server_ws.hpp
+++ b/src/lib/util/server_ws.hpp
@@ -1,24 +1,9 @@
// license:MIT
// copyright-holders:Ole Christian Eidheim, Miodrag Milanovic
-#ifndef SERVER_WS_HPP
-#define SERVER_WS_HPP
-#include "path_to_regex.hpp"
-#include "crypto.hpp"
-
-#include "asio.h"
-#include "asio/system_timer.hpp"
-
-#include <unordered_map>
-#include <thread>
-#include <mutex>
-#include <unordered_set>
-#include <list>
+#ifndef MAME_LIB_UTIL_SERVER_WS_HPP
+#define MAME_LIB_UTIL_SERVER_WS_HPP
#include <memory>
#include <atomic>
-#include <iostream>
-#include <map>
-#include <chrono>
-#include <regex>
#ifndef CASE_INSENSITIVE_EQUALS_AND_HASH
#define CASE_INSENSITIVE_EQUALS_AND_HASH
@@ -42,681 +27,23 @@ public:
return seed;
}
};
-#endif
+#endif /* CASE_INSENSITIVE_EQUALS_AND_HASH */
namespace webpp {
- template <class socket_type>
- class SocketServer;
-
- template <class socket_type>
- class SocketServerBase {
- public:
- virtual ~SocketServerBase() {}
-
- class SendStream : public std::ostream, public std::enable_shared_from_this<SendStream> {
- friend class SocketServerBase<socket_type>;
-
- asio::streambuf streambuf;
- public:
- SendStream(): std::ostream(&streambuf) {}
- size_t size() const {
- return streambuf.size();
- }
- };
-
-
- class Connection : public std::enable_shared_from_this<Connection> {
- friend class SocketServerBase<socket_type>;
- friend class SocketServer<socket_type>;
-
- public:
- explicit Connection(const std::shared_ptr<socket_type> &socket) : remote_endpoint_port(0), socket(socket), strand(socket->get_io_service()), closed(false) { }
-
- std::string method, path, http_version;
-
- std::unordered_multimap<std::string, std::string, case_insensitive_hash, case_insensitive_equals> header;
-
- std::smatch path_match;
-
- std::string remote_endpoint_address;
- unsigned short remote_endpoint_port;
-
- std::shared_ptr<Connection> ptr() {
- return this->shared_from_this();
- }
-
- private:
- explicit Connection(socket_type *socket): remote_endpoint_port(0), socket(socket), strand(socket->get_io_service()), closed(false) { }
-
- class SendData {
- public:
- SendData(const std::shared_ptr<SendStream> &header_stream, const std::shared_ptr<SendStream> &message_stream,
- const std::function<void(const std::error_code)> &callback) :
- header_stream(header_stream), message_stream(message_stream), callback(callback) {}
- std::shared_ptr<SendStream> header_stream;
- std::shared_ptr<SendStream> message_stream;
- std::function<void(const std::error_code)> callback;
- };
-
- std::shared_ptr<socket_type> socket;
-
- asio::io_context::strand strand;
-
- std::list<SendData> send_queue;
-
- void send_from_queue(const std::shared_ptr<Connection> &connection) {
- strand.post([this, connection]() {
- asio::async_write(*socket, send_queue.begin()->header_stream->streambuf,
- strand.wrap([this, connection](const std::error_code& ec, size_t /*bytes_transferred*/) {
- if(!ec) {
- asio::async_write(*socket, send_queue.begin()->message_stream->streambuf,
- strand.wrap([this, connection]
- (const std::error_code& ec, size_t /*bytes_transferred*/) {
- auto send_queued=send_queue.begin();
- if(send_queued->callback)
- send_queued->callback(ec);
- if(!ec) {
- send_queue.erase(send_queued);
- if(send_queue.size()>0)
- send_from_queue(connection);
- }
- else
- send_queue.clear();
- }));
- }
- else {
- auto send_queued=send_queue.begin();
- if(send_queued->callback)
- send_queued->callback(ec);
- send_queue.clear();
- }
- }));
- });
- }
-
- std::atomic<bool> closed;
-
- std::unique_ptr<asio::system_timer> timer_idle;
-
- void read_remote_endpoint_data() {
- try {
- remote_endpoint_address=socket->lowest_layer().remote_endpoint().address().to_string();
- remote_endpoint_port=socket->lowest_layer().remote_endpoint().port();
- }
- catch (...) {}
- }
- };
-
- class Message : public std::istream, public std::enable_shared_from_this<Message> {
- friend class SocketServerBase<socket_type>;
-
- public:
- unsigned char fin_rsv_opcode;
- size_t size() const {
- return length;
- }
- std::string string() const {
- std::stringstream ss;
- ss << rdbuf();
- return ss.str();
- }
- private:
- Message(): std::istream(&streambuf), fin_rsv_opcode(0), length(0) {}
-
- size_t length;
- asio::streambuf streambuf;
- };
-
- class Endpoint : public std::enable_shared_from_this<Endpoint> {
- friend class SocketServerBase<socket_type>;
- std::unordered_set<std::shared_ptr<Connection> > connections;
- std::mutex connections_mutex;
-
- public:
- std::function<void(std::shared_ptr<Connection>)> on_open;
- std::function<void(std::shared_ptr<Connection>, std::shared_ptr<Message>)> on_message;
- std::function<void(std::shared_ptr<Connection>, int, const std::string&)> on_close;
- std::function<void(std::shared_ptr<Connection>, const std::error_code&)> on_error;
-
- std::unordered_set<std::shared_ptr<Connection> > get_connections() {
- std::lock_guard<std::mutex> lock(connections_mutex);
- auto copy=connections;
- return copy;
- }
- };
-
- class Config {
- friend class SocketServerBase<socket_type>;
-
- Config(unsigned short port) : port(port) {}
- public:
- /// Port number to use. Defaults to 80 for HTTP and 443 for HTTPS.
- unsigned short port;
- /// Number of threads that the server will use when start() is called. Defaults to 1 thread.
- size_t thread_pool_size=1;
- /// Timeout on request handling. Defaults to 5 seconds.
- size_t timeout_request=5;
- /// Idle timeout. Defaults to no timeout.
- size_t timeout_idle=0;
- /// IPv4 address in dotted decimal form or IPv6 address in hexadecimal notation.
- /// If empty, the address will be any address.
- std::string address;
- /// Set to false to avoid binding the socket to an address that is already in use. Defaults to true.
- bool reuse_address=true;
- };
- ///Set before calling start().
- Config config;
-
- private:
- class regex_orderable : public std::regex {
- std::string str;
- path2regex::Keys keys;
- public:
- regex_orderable(const char *regex_cstr) : std::regex(path2regex::path_to_regex(regex_cstr, keys)), str(regex_cstr) {}
- regex_orderable(const std::string &regex_cstr) : std::regex(path2regex::path_to_regex(regex_cstr, keys)), str(regex_cstr) {}
- bool operator<(const regex_orderable &rhs) const {
- return str<rhs.str;
- }
- };
- public:
- /// Warning: do not access (red or write) m_endpoint without holding m_endpoint_mutex
- std::map<regex_orderable, Endpoint> m_endpoint;
- std::mutex m_endpoint_mutex;
-
- virtual void start() {
- if(!io_context)
- io_context=std::make_shared<asio::io_context>();
-
- if(io_context->stopped())
- io_context->reset();
-
- asio::ip::tcp::endpoint endpoint;
- if(config.address.size()>0)
- endpoint=asio::ip::tcp::endpoint(asio::ip::address::from_string(config.address), config.port);
- else
- endpoint=asio::ip::tcp::endpoint(asio::ip::tcp::v4(), config.port);
-
- if(!acceptor)
- acceptor= std::make_unique<asio::ip::tcp::acceptor>(*io_context);
- acceptor->open(endpoint.protocol());
- acceptor->set_option(asio::socket_base::reuse_address(config.reuse_address));
- acceptor->bind(endpoint);
- acceptor->listen();
-
- accept();
-
- io_context->run();
- }
-
- void stop() {
- acceptor->close();
- io_context->stop();
-
- std::lock_guard<std::mutex> lock(m_endpoint_mutex);
- for(auto& p: m_endpoint)
- p.second.connections.clear();
- }
-
- ///fin_rsv_opcode: 129=one fragment, text, 130=one fragment, binary, 136=close connection.
- ///See http://tools.ietf.org/html/rfc6455#section-5.2 for more information
- void send(const std::shared_ptr<Connection> &connection, const std::shared_ptr<SendStream> &message_stream,
- const std::function<void(const std::error_code&)>& callback=nullptr,
- unsigned char fin_rsv_opcode=129) const {
- if(fin_rsv_opcode!=136)
- timer_idle_reset(connection);
-
- auto header_stream = std::make_shared<SendStream>();
-
- size_t length=message_stream->size();
-
- header_stream->put(fin_rsv_opcode);
- //unmasked (first length byte<128)
- if(length>=126) {
- int num_bytes;
- if(length>0xffff) {
- num_bytes=8;
- header_stream->put(127);
- }
- else {
- num_bytes=2;
- header_stream->put(126);
- }
-
- for(int c=num_bytes-1;c>=0;c--) {
- header_stream->put((static_cast<unsigned long long>(length) >> (8 * c)) % 256);
- }
- }
- else
- header_stream->put(static_cast<unsigned char>(length));
-
- connection->strand.post([this, connection, header_stream, message_stream, callback]() {
- connection->send_queue.emplace_back(header_stream, message_stream, callback);
- if(connection->send_queue.size()==1)
- connection->send_from_queue(connection);
- });
- }
-
- void send_close(const std::shared_ptr<Connection> &connection, int status, const std::string& reason="",
- const std::function<void(const std::error_code&)>& callback=nullptr) const {
- //Send close only once (in case close is initiated by server)
- if(connection->closed)
- return;
- connection->closed=true;
-
- auto send_stream=std::make_shared<SendStream>();
-
- send_stream->put(status>>8);
- send_stream->put(status%256);
-
- *send_stream << reason;
-
- //fin_rsv_opcode=136: message close
- send(connection, send_stream, callback, 136);
- }
-
- std::unordered_set<std::shared_ptr<Connection> > get_connections() {
- std::unordered_set<std::shared_ptr<Connection> > all_connections;
- std::lock_guard<std::mutex> lock(m_endpoint_mutex);
- for(auto& e: m_endpoint) {
- std::lock_guard<std::mutex> lock(e.second.connections_mutex);
- all_connections.insert(e.second.connections.begin(), e.second.connections.end());
- }
- return all_connections;
- }
-
- /**
- * Upgrades a request, from for instance Simple-Web-Server, to a WebSocket connection.
- * The parameters are moved to the Connection object.
- * See also Server::on_upgrade in the Simple-Web-Server project.
- * The socket's io_service is used, thus running start() is not needed.
- *
- * Example use:
- * server.on_upgrade=[&socket_server] (auto socket, auto request) {
- * auto connection=std::make_shared<SimpleWeb::SocketServer<SimpleWeb::WS>::Connection>(socket);
- * connection->method=std::move(request->method);
- * connection->path=std::move(request->path);
- * connection->http_version=std::move(request->http_version);
- * connection->header=std::move(request->header);
- * connection->remote_endpoint_address=std::move(request->remote_endpoint_address);
- * connection->remote_endpoint_port=request->remote_endpoint_port;
- * socket_server.upgrade(connection);
- * }
- */
- void upgrade(const std::shared_ptr<Connection> &connection) {
- auto read_buffer=std::make_shared<asio::streambuf>();
- write_handshake(connection, read_buffer);
- }
-
- /// If you have your own asio::io_context, store its pointer here before running start().
- /// You might also want to set config.num_threads to 0.
- std::shared_ptr<asio::io_context> io_context;
- protected:
- const std::string ws_magic_string="258EAFA5-E914-47DA-95CA-C5AB0DC85B11";
-
- std::unique_ptr<asio::ip::tcp::acceptor> acceptor;
-
- std::vector<std::thread> threads;
-
- SocketServerBase(unsigned short port) :
- config(port) {}
-
- virtual void accept()=0;
-
- std::shared_ptr<asio::system_timer> get_timeout_timer(const std::shared_ptr<Connection> &connection, size_t seconds) {
- if (seconds == 0)
- return nullptr;
- auto timer = std::make_shared<asio::system_timer>(connection->socket->get_io_service());
- timer->expires_at(std::chrono::system_clock::now() + std::chrono::seconds(static_cast<long>(seconds)));
- timer->async_wait([connection](const std::error_code& ec){
- if(!ec) {
- connection->socket->lowest_layer().shutdown(asio::ip::tcp::socket::shutdown_both);
- connection->socket->lowest_layer().close();
- }
- });
- return timer;
- }
-
- void read_handshake(const std::shared_ptr<Connection> &connection) {
- connection->read_remote_endpoint_data();
+ struct Connection {
+ std::string method, path, http_version;
- //Create new read_buffer for async_read_until()
- //Shared_ptr is used to pass temporary objects to the asynchronous functions
- auto read_buffer = std::make_shared<asio::streambuf>();
+ std::unordered_multimap<std::string, std::string, case_insensitive_hash, case_insensitive_equals> header;
- //Set timeout on the following asio::async-read or write function
- auto timer = get_timeout_timer(connection, config.timeout_request);
-
- asio::async_read_until(*connection->socket, *read_buffer, "\r\n\r\n",
- [this, connection, read_buffer, timer]
- (const std::error_code& ec, size_t /*bytes_transferred*/) {
- if(timer)
- timer->cancel();
- if(!ec) {
- //Convert to istream to extract string-lines
- std::istream stream(read_buffer.get());
-
- parse_handshake(connection, stream);
-
- write_handshake(connection, read_buffer);
- }
- });
- }
-
- void parse_handshake(const std::shared_ptr<Connection> &connection, std::istream& stream) const {
- std::string line;
- getline(stream, line);
- size_t method_end;
- if((method_end=line.find(' '))!=std::string::npos) {
- size_t path_end;
- if((path_end=line.find(' ', method_end+1))!=std::string::npos) {
- connection->method=line.substr(0, method_end);
- connection->path=line.substr(method_end+1, path_end-method_end-1);
- if((path_end+6)<line.size())
- connection->http_version=line.substr(path_end+6, line.size()-(path_end+6)-1);
- else
- connection->http_version="1.1";
-
- getline(stream, line);
- size_t param_end;
- while((param_end=line.find(':'))!=std::string::npos) {
- size_t value_start=param_end+1;
- if((value_start)<line.size()) {
- if(line[value_start]==' ')
- value_start++;
- if(value_start<line.size())
- connection->header.emplace(line.substr(0, param_end), line.substr(value_start, line.size()-value_start-1));
- }
-
- getline(stream, line);
- }
- }
- }
- }
-
- void write_handshake(const std::shared_ptr<Connection> &connection, const std::shared_ptr<asio::streambuf> &read_buffer) {
- //Find path- and method-match, and generate response
- std::lock_guard<std::mutex> lock(m_endpoint_mutex);
- for (auto &regex_endpoint : m_endpoint) {
- std::smatch path_match;
- if(std::regex_match(connection->path, path_match, regex_endpoint.first)) {
- auto write_buffer = std::make_shared<asio::streambuf>();
- std::ostream handshake(write_buffer.get());
-
- if(generate_handshake(connection, handshake)) {
- connection->path_match=std::move(path_match);
- //Capture write_buffer in lambda so it is not destroyed before async_write is finished
- asio::async_write(*connection->socket, *write_buffer,
- [this, connection, write_buffer, read_buffer, &regex_endpoint]
- (const std::error_code& ec, size_t /*bytes_transferred*/) {
- if(!ec) {
- connection_open(connection, regex_endpoint.second);
- read_message(connection, read_buffer, regex_endpoint.second);
- }
- else
- connection_error(connection, regex_endpoint.second, ec);
- });
- }
- return;
- }
- }
- }
-
- bool generate_handshake(const std::shared_ptr<Connection> &connection, std::ostream& handshake) const {
- auto header_it = connection->header.find("Sec-WebSocket-Key");
- if (header_it == connection->header.end())
- return false;
-
- auto sha1=sha1_encode(header_it->second + ws_magic_string);
-
- handshake << "HTTP/1.1 101 Web Socket Protocol Handshake\r\n";
- handshake << "Upgrade: websocket\r\n";
- handshake << "Connection: Upgrade\r\n";
- handshake << "Sec-WebSocket-Accept: " << base64_encode(sha1) << "\r\n";
- handshake << "\r\n";
-
- return true;
- }
-
- void read_message(const std::shared_ptr<Connection> &connection,
- const std::shared_ptr<asio::streambuf> &read_buffer, Endpoint& endpoint) const {
- asio::async_read(*connection->socket, *read_buffer, asio::transfer_exactly(2),
- [this, connection, read_buffer, &endpoint]
- (const std::error_code& ec, size_t bytes_transferred) {
- if(!ec) {
- if(bytes_transferred==0) { //TODO: why does this happen sometimes?
- read_message(connection, read_buffer, endpoint);
- return;
- }
- std::istream stream(read_buffer.get());
-
- std::vector<unsigned char> first_bytes;
- first_bytes.resize(2);
- stream.read(reinterpret_cast<char*>(&first_bytes[0]), 2);
-
- unsigned char fin_rsv_opcode=first_bytes[0];
-
- //Close connection if unmasked message from client (protocol error)
- if(first_bytes[1]<128) {
- const std::string reason("message from client not masked");
- send_close(connection, 1002, reason, [this, connection](const std::error_code& /*ec*/) {});
- connection_close(connection, endpoint, 1002, reason);
- return;
- }
-
- size_t length=(first_bytes[1]&127);
-
- if(length==126) {
- //2 next bytes is the size of content
- asio::async_read(*connection->socket, *read_buffer, asio::transfer_exactly(2),
- [this, connection, read_buffer, &endpoint, fin_rsv_opcode]
- (const std::error_code& ec, size_t /*bytes_transferred*/) {
- if(!ec) {
- std::istream stream(read_buffer.get());
-
- std::vector<unsigned char> length_bytes;
- length_bytes.resize(2);
- stream.read(reinterpret_cast<char*>(&length_bytes[0]), 2);
-
- size_t length=0;
- int num_bytes=2;
- for(int c=0;c<num_bytes;c++)
- length+=length_bytes[c]<<(8*(num_bytes-1-c));
-
- read_message_content(connection, read_buffer, length, endpoint, fin_rsv_opcode);
- }
- else
- connection_error(connection, endpoint, ec);
- });
- }
- else if(length==127) {
- //8 next bytes is the size of content
- asio::async_read(*connection->socket, *read_buffer, asio::transfer_exactly(8),
- [this, connection, read_buffer, &endpoint, fin_rsv_opcode]
- (const std::error_code& ec, size_t /*bytes_transferred*/) {
- if(!ec) {
- std::istream stream(read_buffer.get());
-
- std::vector<unsigned char> length_bytes;
- length_bytes.resize(8);
- stream.read(reinterpret_cast<char*>(&length_bytes[0]), 8);
-
- size_t length=0;
- int num_bytes=8;
- for(int c=0;c<num_bytes;c++)
- length+=length_bytes[c]<<(8*(num_bytes-1-c));
-
- read_message_content(connection, read_buffer, length, endpoint, fin_rsv_opcode);
- }
- else
- connection_error(connection, endpoint, ec);
- });
- }
- else
- read_message_content(connection, read_buffer, length, endpoint, fin_rsv_opcode);
- }
- else
- connection_error(connection, endpoint, ec);
- });
- }
-
- void read_message_content(const std::shared_ptr<Connection> &connection, const std::shared_ptr<asio::streambuf> &read_buffer,
- size_t length, Endpoint& endpoint, unsigned char fin_rsv_opcode) const {
- asio::async_read(*connection->socket, *read_buffer, asio::transfer_exactly(4+length),
- [this, connection, read_buffer, length, &endpoint, fin_rsv_opcode]
- (const std::error_code& ec, size_t /*bytes_transferred*/) {
- if(!ec) {
- std::istream raw_message_data(read_buffer.get());
-
- //Read mask
- std::vector<unsigned char> mask;
- mask.resize(4);
- raw_message_data.read(reinterpret_cast<char*>(&mask[0]), 4);
-
- std::shared_ptr<Message> message(new Message());
- message->length=length;
- message->fin_rsv_opcode=fin_rsv_opcode;
-
- std::ostream message_data_out_stream(&message->streambuf);
- for(size_t c=0;c<length;c++) {
- message_data_out_stream.put(raw_message_data.get()^mask[c%4]);
- }
-
- //If connection close
- if((fin_rsv_opcode&0x0f)==8) {
- int status=0;
- if(length>=2) {
- unsigned char byte1=message->get();
- unsigned char byte2=message->get();
- status=(byte1<<8)+byte2;
- }
-
- auto reason=message->string();
- send_close(connection, status, reason, [this, connection](const std::error_code& /*ec*/) {});
- connection_close(connection, endpoint, status, reason);
- return;
- }
- else {
- //If ping
- if((fin_rsv_opcode&0x0f)==9) {
- //send pong
- auto empty_send_stream=std::make_shared<SendStream>();
- send(connection, empty_send_stream, nullptr, fin_rsv_opcode+1);
- }
- else if(endpoint.on_message) {
- timer_idle_reset(connection);
- endpoint.on_message(connection, message);
- }
-
- //Next message
- read_message(connection, read_buffer, endpoint);
- }
- }
- else
- connection_error(connection, endpoint, ec);
- });
- }
-
- void connection_open(const std::shared_ptr<Connection> &connection, Endpoint& endpoint) {
- timer_idle_init(connection);
-
- {
- std::lock_guard<std::mutex> lock(endpoint.connections_mutex);
- endpoint.connections.insert(connection);
- }
-
- if(endpoint.on_open)
- endpoint.on_open(connection);
- }
-
- void connection_close(const std::shared_ptr<Connection> &connection, Endpoint& endpoint, int status, const std::string& reason) const {
- timer_idle_cancel(connection);
-
- {
- std::lock_guard<std::mutex> lock(endpoint.connections_mutex);
- endpoint.connections.erase(connection);
- }
-
- if(endpoint.on_close)
- endpoint.on_close(connection, status, reason);
- }
-
- void connection_error(const std::shared_ptr<Connection> &connection, Endpoint& endpoint, const std::error_code& ec) const {
- timer_idle_cancel(connection);
-
- {
- std::lock_guard<std::mutex> lock(endpoint.connections_mutex);
- endpoint.connections.erase(connection);
- }
-
- if(endpoint.on_error) {
- std::error_code ec_tmp=ec;
- endpoint.on_error(connection, ec_tmp);
- }
- }
-
- void timer_idle_init(const std::shared_ptr<Connection> &connection) {
- if(config.timeout_idle>0) {
- connection->timer_idle= std::make_unique<asio::system_timer>(connection->socket->get_io_service());
- connection->timer_idle->expires_from_now(std::chrono::seconds(static_cast<unsigned long>(config.timeout_idle)));
- timer_idle_expired_function(connection);
- }
- }
- void timer_idle_reset(const std::shared_ptr<Connection> &connection) const {
- if(config.timeout_idle>0 && connection->timer_idle->expires_from_now(std::chrono::seconds(static_cast<unsigned long>(config.timeout_idle)))>0)
- timer_idle_expired_function(connection);
- }
- void timer_idle_cancel(const std::shared_ptr<Connection> &connection) const {
- if(config.timeout_idle>0)
- connection->timer_idle->cancel();
- }
-
- void timer_idle_expired_function(const std::shared_ptr<Connection> &connection) const {
- connection->timer_idle->async_wait([this, connection](const std::error_code& ec){
- if(!ec)
- send_close(connection, 1000, "idle timeout"); //1000=normal closure
- });
- }
- };
-
- template<class socket_type>
- class SocketServer : public SocketServerBase<socket_type> {
- public:
- SocketServer(unsigned short port, size_t timeout_request, size_t timeout_idle)
- : SocketServerBase<socket_type>(port, timeout_request, timeout_idle)
- {
- }
- };
-
- using WS = asio::ip::tcp::socket;
-
- template<>
- class SocketServer<WS> : public SocketServerBase<WS> {
- public:
- SocketServer() : SocketServerBase<WS>(80) {}
- protected:
- void accept() override {
- //Create new socket for this connection (stored in Connection::socket)
- //Shared_ptr is used to pass temporary objects to the asynchronous functions
- std::shared_ptr<Connection> connection(new Connection(new WS(*io_context)));
-
- acceptor->async_accept(*connection->socket, [this, connection](const std::error_code& ec) {
- //Immediately start accepting a new connection (if io_context hasn't been stopped)
- if (ec != asio::error::operation_aborted)
- accept();
-
- if(!ec) {
- asio::ip::tcp::no_delay option(true);
- connection->socket->set_option(option);
-
- read_handshake(connection);
- }
- });
- }
- };
+ std::smatch path_match;
- class ws_server : public SocketServer<WS> {
- public:
- ws_server() : SocketServer<WS>::SocketServer() {}
+ std::string remote_endpoint_address;
+ unsigned short remote_endpoint_port;
+
+ Connection(unsigned short remote_endpoint_port) : remote_endpoint_port(remote_endpoint_port) {}
+ virtual ~Connection() {}
};
+
+ class ws_server;
}
-#endif /* SERVER_WS_HPP */
+#endif /* MAME_LIB_UTIL_SERVER_WS_HPP */
diff --git a/src/lib/util/server_ws_impl.hpp b/src/lib/util/server_ws_impl.hpp
new file mode 100644
index 00000000000..90f1a4a1385
--- /dev/null
+++ b/src/lib/util/server_ws_impl.hpp
@@ -0,0 +1,717 @@
+// license:MIT
+// copyright-holders:Ole Christian Eidheim, Miodrag Milanovic
+#ifndef MAME_LIB_UTIL_SERVER_WS_IMPL_HPP
+#define MAME_LIB_UTIL_SERVER_WS_IMPL_HPP
+#include "path_to_regex.hpp"
+#include "crypto.hpp"
+
+#include "asio.h"
+#include "asio/system_timer.hpp"
+
+#include "server_ws.hpp"
+#include <unordered_map>
+#include <thread>
+#include <mutex>
+#include <unordered_set>
+#include <list>
+#include <memory>
+#include <atomic>
+#include <iostream>
+#include <map>
+#include <chrono>
+#include <regex>
+
+#ifndef CASE_INSENSITIVE_EQUALS_AND_HASH
+#define CASE_INSENSITIVE_EQUALS_AND_HASH
+class case_insensitive_equals {
+public:
+ bool operator()(const std::string &key1, const std::string &key2) const {
+ return key1.size() == key2.size()
+ && equal(key1.cbegin(), key1.cend(), key2.cbegin(),
+ [](std::string::value_type key1v, std::string::value_type key2v)
+ { return tolower(key1v) == tolower(key2v); });
+ }
+};
+class case_insensitive_hash {
+public:
+ size_t operator()(const std::string &key) const {
+ size_t seed = 0;
+ for (auto &c : key) {
+ std::hash<char> hasher;
+ seed ^= hasher(std::tolower(c)) + 0x9e3779b9 + (seed << 6) + (seed >> 2);
+ }
+ return seed;
+ }
+};
+#endif
+
+namespace webpp {
+ template <class socket_type>
+ class SocketServer;
+
+ template <class socket_type>
+ class SocketServerBase {
+ public:
+ virtual ~SocketServerBase() {}
+
+ class SendStream : public std::ostream, public std::enable_shared_from_this<SendStream> {
+ friend class SocketServerBase<socket_type>;
+
+ asio::streambuf streambuf;
+ public:
+ SendStream(): std::ostream(&streambuf) {}
+ size_t size() const {
+ return streambuf.size();
+ }
+ };
+
+
+ class Connection : public webpp::Connection {
+ friend class SocketServerBase<socket_type>;
+ friend class SocketServer<socket_type>;
+ using super = webpp::Connection;
+
+ public:
+ virtual ~Connection() {}
+ explicit Connection(const std::shared_ptr<socket_type> &socket) : super(0), socket(socket), strand(socket->get_io_service()), closed(false) { }
+
+ private:
+ explicit Connection(socket_type *socket): super(0), socket(socket), strand(socket->get_io_service()), closed(false) { }
+
+ class SendData {
+ public:
+ SendData(const std::shared_ptr<SendStream> &header_stream, const std::shared_ptr<SendStream> &message_stream,
+ const std::function<void(const std::error_code)> &callback) :
+ header_stream(header_stream), message_stream(message_stream), callback(callback) {}
+ std::shared_ptr<SendStream> header_stream;
+ std::shared_ptr<SendStream> message_stream;
+ std::function<void(const std::error_code)> callback;
+ };
+
+ std::shared_ptr<socket_type> socket;
+
+ asio::io_context::strand strand;
+
+ std::list<SendData> send_queue;
+
+ void send_from_queue(const std::shared_ptr<Connection> &connection) {
+ strand.post([this, connection]() {
+ asio::async_write(*socket, send_queue.begin()->header_stream->streambuf,
+ strand.wrap([this, connection](const std::error_code& ec, size_t /*bytes_transferred*/) {
+ if(!ec) {
+ asio::async_write(*socket, send_queue.begin()->message_stream->streambuf,
+ strand.wrap([this, connection]
+ (const std::error_code& ec, size_t /*bytes_transferred*/) {
+ auto send_queued=send_queue.begin();
+ if(send_queued->callback)
+ send_queued->callback(ec);
+ if(!ec) {
+ send_queue.erase(send_queued);
+ if(send_queue.size()>0)
+ send_from_queue(connection);
+ }
+ else
+ send_queue.clear();
+ }));
+ }
+ else {
+ auto send_queued=send_queue.begin();
+ if(send_queued->callback)
+ send_queued->callback(ec);
+ send_queue.clear();
+ }
+ }));
+ });
+ }
+
+ std::atomic<bool> closed;
+
+ std::unique_ptr<asio::system_timer> timer_idle;
+
+ void read_remote_endpoint_data() {
+ try {
+ remote_endpoint_address=socket->lowest_layer().remote_endpoint().address().to_string();
+ remote_endpoint_port=socket->lowest_layer().remote_endpoint().port();
+ }
+ catch (...) {}
+ }
+ };
+
+ class Message : public std::istream, public std::enable_shared_from_this<Message> {
+ friend class SocketServerBase<socket_type>;
+
+ public:
+ unsigned char fin_rsv_opcode;
+ size_t size() const {
+ return length;
+ }
+ std::string string() const {
+ std::stringstream ss;
+ ss << rdbuf();
+ return ss.str();
+ }
+ private:
+ Message(): std::istream(&streambuf), fin_rsv_opcode(0), length(0) {}
+
+ size_t length;
+ asio::streambuf streambuf;
+ };
+
+ class Endpoint : public std::enable_shared_from_this<Endpoint> {
+ friend class SocketServerBase<socket_type>;
+ std::unordered_set<std::shared_ptr<Connection> > connections;
+ std::mutex connections_mutex;
+
+ public:
+ std::function<void(std::shared_ptr<Connection>)> on_open;
+ std::function<void(std::shared_ptr<Connection>, std::shared_ptr<Message>)> on_message;
+ std::function<void(std::shared_ptr<Connection>, int, const std::string&)> on_close;
+ std::function<void(std::shared_ptr<Connection>, const std::error_code&)> on_error;
+
+ std::unordered_set<std::shared_ptr<Connection> > get_connections() {
+ std::lock_guard<std::mutex> lock(connections_mutex);
+ auto copy=connections;
+ return copy;
+ }
+ };
+
+ class Config {
+ friend class SocketServerBase<socket_type>;
+
+ Config(unsigned short port) : port(port) {}
+ public:
+ /// Port number to use. Defaults to 80 for HTTP and 443 for HTTPS.
+ unsigned short port;
+ /// Number of threads that the server will use when start() is called. Defaults to 1 thread.
+ size_t thread_pool_size=1;
+ /// Timeout on request handling. Defaults to 5 seconds.
+ size_t timeout_request=5;
+ /// Idle timeout. Defaults to no timeout.
+ size_t timeout_idle=0;
+ /// IPv4 address in dotted decimal form or IPv6 address in hexadecimal notation.
+ /// If empty, the address will be any address.
+ std::string address;
+ /// Set to false to avoid binding the socket to an address that is already in use. Defaults to true.
+ bool reuse_address=true;
+ };
+ ///Set before calling start().
+ Config config;
+
+ private:
+ class regex_orderable : public std::regex {
+ std::string str;
+ path2regex::Keys keys;
+ public:
+ regex_orderable(const char *regex_cstr) : std::regex(path2regex::path_to_regex(regex_cstr, keys)), str(regex_cstr) {}
+ regex_orderable(const std::string &regex_cstr) : std::regex(path2regex::path_to_regex(regex_cstr, keys)), str(regex_cstr) {}
+ bool operator<(const regex_orderable &rhs) const {
+ return str<rhs.str;
+ }
+ };
+ public:
+ /// Warning: do not access (red or write) m_endpoint without holding m_endpoint_mutex
+ std::map<regex_orderable, Endpoint> m_endpoint;
+ std::mutex m_endpoint_mutex;
+
+ virtual void start() {
+ if(!io_context)
+ io_context=std::make_shared<asio::io_context>();
+
+ if(io_context->stopped())
+ io_context->reset();
+
+ asio::ip::tcp::endpoint endpoint;
+ if(config.address.size()>0)
+ endpoint=asio::ip::tcp::endpoint(asio::ip::address::from_string(config.address), config.port);
+ else
+ endpoint=asio::ip::tcp::endpoint(asio::ip::tcp::v4(), config.port);
+
+ if(!acceptor)
+ acceptor= std::make_unique<asio::ip::tcp::acceptor>(*io_context);
+ acceptor->open(endpoint.protocol());
+ acceptor->set_option(asio::socket_base::reuse_address(config.reuse_address));
+ acceptor->bind(endpoint);
+ acceptor->listen();
+
+ accept();
+
+ io_context->run();
+ }
+
+ void stop() {
+ acceptor->close();
+ io_context->stop();
+
+ std::lock_guard<std::mutex> lock(m_endpoint_mutex);
+ for(auto& p: m_endpoint)
+ p.second.connections.clear();
+ }
+
+ ///fin_rsv_opcode: 129=one fragment, text, 130=one fragment, binary, 136=close connection.
+ ///See http://tools.ietf.org/html/rfc6455#section-5.2 for more information
+ void send(std::shared_ptr<webpp::Connection> conn, const std::shared_ptr<SendStream> &message_stream,
+ const std::function<void(const std::error_code&)>& callback=nullptr,
+ unsigned char fin_rsv_opcode=129) const {
+ std::shared_ptr<Connection> connection = std::dynamic_pointer_cast<Connection> (conn);
+ if (!connection) return;
+
+ if(fin_rsv_opcode!=136)
+ timer_idle_reset(connection);
+
+ auto header_stream = std::make_shared<SendStream>();
+
+ size_t length=message_stream->size();
+
+ header_stream->put(fin_rsv_opcode);
+ //unmasked (first length byte<128)
+ if(length>=126) {
+ int num_bytes;
+ if(length>0xffff) {
+ num_bytes=8;
+ header_stream->put(127);
+ }
+ else {
+ num_bytes=2;
+ header_stream->put(126);
+ }
+
+ for(int c=num_bytes-1;c>=0;c--) {
+ header_stream->put((static_cast<unsigned long long>(length) >> (8 * c)) % 256);
+ }
+ }
+ else
+ header_stream->put(static_cast<unsigned char>(length));
+
+ connection->strand.post([this, connection, header_stream, message_stream, callback]() {
+ connection->send_queue.emplace_back(header_stream, message_stream, callback);
+ if(connection->send_queue.size()==1)
+ connection->send_from_queue(connection);
+ });
+ }
+
+ void send_close(std::shared_ptr<webpp::Connection> conn, int status, const std::string& reason="",
+ const std::function<void(const std::error_code&)>& callback=nullptr) const {
+ std::shared_ptr<Connection> connection = std::dynamic_pointer_cast<Connection> (conn);
+ if (!connection) return;
+ //Send close only once (in case close is initiated by server)
+ if(connection->closed)
+ return;
+ connection->closed=true;
+
+ auto send_stream=std::make_shared<SendStream>();
+
+ send_stream->put(status>>8);
+ send_stream->put(status%256);
+
+ *send_stream << reason;
+
+ //fin_rsv_opcode=136: message close
+ send(connection, send_stream, callback, 136);
+ }
+
+ std::unordered_set<std::shared_ptr<Connection> > get_connections() {
+ std::unordered_set<std::shared_ptr<Connection> > all_connections;
+ std::lock_guard<std::mutex> lock(m_endpoint_mutex);
+ for(auto& e: m_endpoint) {
+ std::lock_guard<std::mutex> lock(e.second.connections_mutex);
+ all_connections.insert(e.second.connections.begin(), e.second.connections.end());
+ }
+ return all_connections;
+ }
+
+ /**
+ * Upgrades a request, from for instance Simple-Web-Server, to a WebSocket connection.
+ * The parameters are moved to the Connection object.
+ * See also Server::on_upgrade in the Simple-Web-Server project.
+ * The socket's io_service is used, thus running start() is not needed.
+ *
+ * Example use:
+ * server.on_upgrade=[&socket_server] (auto socket, auto request) {
+ * auto connection=std::make_shared<SimpleWeb::SocketServer<SimpleWeb::WS>::Connection>(socket);
+ * connection->method=std::move(request->method);
+ * connection->path=std::move(request->path);
+ * connection->http_version=std::move(request->http_version);
+ * connection->header=std::move(request->header);
+ * connection->remote_endpoint_address=std::move(request->remote_endpoint_address);
+ * connection->remote_endpoint_port=request->remote_endpoint_port;
+ * socket_server.upgrade(connection);
+ * }
+ */
+ void upgrade(const std::shared_ptr<Connection> &connection) {
+ auto read_buffer=std::make_shared<asio::streambuf>();
+ write_handshake(connection, read_buffer);
+ }
+
+ /// If you have your own asio::io_context, store its pointer here before running start().
+ /// You might also want to set config.num_threads to 0.
+ std::shared_ptr<asio::io_context> io_context;
+ protected:
+ const std::string ws_magic_string="258EAFA5-E914-47DA-95CA-C5AB0DC85B11";
+
+ std::unique_ptr<asio::ip::tcp::acceptor> acceptor;
+
+ std::vector<std::thread> threads;
+
+ SocketServerBase(unsigned short port) :
+ config(port) {}
+
+ virtual void accept()=0;
+
+ std::shared_ptr<asio::system_timer> get_timeout_timer(const std::shared_ptr<Connection> &connection, size_t seconds) {
+ if (seconds == 0)
+ return nullptr;
+ auto timer = std::make_shared<asio::system_timer>(connection->socket->get_io_service());
+ timer->expires_at(std::chrono::system_clock::now() + std::chrono::seconds(static_cast<long>(seconds)));
+ timer->async_wait([connection](const std::error_code& ec){
+ if(!ec) {
+ connection->socket->lowest_layer().shutdown(asio::ip::tcp::socket::shutdown_both);
+ connection->socket->lowest_layer().close();
+ }
+ });
+ return timer;
+ }
+
+ void read_handshake(const std::shared_ptr<Connection> &connection) {
+ connection->read_remote_endpoint_data();
+
+ //Create new read_buffer for async_read_until()
+ //Shared_ptr is used to pass temporary objects to the asynchronous functions
+ auto read_buffer = std::make_shared<asio::streambuf>();
+
+ //Set timeout on the following asio::async-read or write function
+ auto timer = get_timeout_timer(connection, config.timeout_request);
+
+ asio::async_read_until(*connection->socket, *read_buffer, "\r\n\r\n",
+ [this, connection, read_buffer, timer]
+ (const std::error_code& ec, size_t /*bytes_transferred*/) {
+ if(timer)
+ timer->cancel();
+ if(!ec) {
+ //Convert to istream to extract string-lines
+ std::istream stream(read_buffer.get());
+
+ parse_handshake(connection, stream);
+
+ write_handshake(connection, read_buffer);
+ }
+ });
+ }
+
+ void parse_handshake(const std::shared_ptr<Connection> &connection, std::istream& stream) const {
+ std::string line;
+ getline(stream, line);
+ size_t method_end;
+ if((method_end=line.find(' '))!=std::string::npos) {
+ size_t path_end;
+ if((path_end=line.find(' ', method_end+1))!=std::string::npos) {
+ connection->method=line.substr(0, method_end);
+ connection->path=line.substr(method_end+1, path_end-method_end-1);
+ if((path_end+6)<line.size())
+ connection->http_version=line.substr(path_end+6, line.size()-(path_end+6)-1);
+ else
+ connection->http_version="1.1";
+
+ getline(stream, line);
+ size_t param_end;
+ while((param_end=line.find(':'))!=std::string::npos) {
+ size_t value_start=param_end+1;
+ if((value_start)<line.size()) {
+ if(line[value_start]==' ')
+ value_start++;
+ if(value_start<line.size())
+ connection->header.emplace(line.substr(0, param_end), line.substr(value_start, line.size()-value_start-1));
+ }
+
+ getline(stream, line);
+ }
+ }
+ }
+ }
+
+ void write_handshake(const std::shared_ptr<Connection> &connection, const std::shared_ptr<asio::streambuf> &read_buffer) {
+ //Find path- and method-match, and generate response
+ std::lock_guard<std::mutex> lock(m_endpoint_mutex);
+ for (auto &regex_endpoint : m_endpoint) {
+ std::smatch path_match;
+ if(std::regex_match(connection->path, path_match, regex_endpoint.first)) {
+ auto write_buffer = std::make_shared<asio::streambuf>();
+ std::ostream handshake(write_buffer.get());
+
+ if(generate_handshake(connection, handshake)) {
+ connection->path_match=std::move(path_match);
+ //Capture write_buffer in lambda so it is not destroyed before async_write is finished
+ asio::async_write(*connection->socket, *write_buffer,
+ [this, connection, write_buffer, read_buffer, &regex_endpoint]
+ (const std::error_code& ec, size_t /*bytes_transferred*/) {
+ if(!ec) {
+ connection_open(connection, regex_endpoint.second);
+ read_message(connection, read_buffer, regex_endpoint.second);
+ }
+ else
+ connection_error(connection, regex_endpoint.second, ec);
+ });
+ }
+ return;
+ }
+ }
+ }
+
+ bool generate_handshake(const std::shared_ptr<Connection> &connection, std::ostream& handshake) const {
+ auto header_it = connection->header.find("Sec-WebSocket-Key");
+ if (header_it == connection->header.end())
+ return false;
+
+ auto sha1=sha1_encode(header_it->second + ws_magic_string);
+
+ handshake << "HTTP/1.1 101 Web Socket Protocol Handshake\r\n";
+ handshake << "Upgrade: websocket\r\n";
+ handshake << "Connection: Upgrade\r\n";
+ handshake << "Sec-WebSocket-Accept: " << base64_encode(sha1) << "\r\n";
+ handshake << "\r\n";
+
+ return true;
+ }
+
+ void read_message(const std::shared_ptr<Connection> &connection,
+ const std::shared_ptr<asio::streambuf> &read_buffer, Endpoint& endpoint) const {
+ asio::async_read(*connection->socket, *read_buffer, asio::transfer_exactly(2),
+ [this, connection, read_buffer, &endpoint]
+ (const std::error_code& ec, size_t bytes_transferred) {
+ if(!ec) {
+ if(bytes_transferred==0) { //TODO: why does this happen sometimes?
+ read_message(connection, read_buffer, endpoint);
+ return;
+ }
+ std::istream stream(read_buffer.get());
+
+ std::vector<unsigned char> first_bytes;
+ first_bytes.resize(2);
+ stream.read(reinterpret_cast<char*>(&first_bytes[0]), 2);
+
+ unsigned char fin_rsv_opcode=first_bytes[0];
+
+ //Close connection if unmasked message from client (protocol error)
+ if(first_bytes[1]<128) {
+ const std::string reason("message from client not masked");
+ send_close(connection, 1002, reason, [this, connection](const std::error_code& /*ec*/) {});
+ connection_close(connection, endpoint, 1002, reason);
+ return;
+ }
+
+ size_t length=(first_bytes[1]&127);
+
+ if(length==126) {
+ //2 next bytes is the size of content
+ asio::async_read(*connection->socket, *read_buffer, asio::transfer_exactly(2),
+ [this, connection, read_buffer, &endpoint, fin_rsv_opcode]
+ (const std::error_code& ec, size_t /*bytes_transferred*/) {
+ if(!ec) {
+ std::istream stream(read_buffer.get());
+
+ std::vector<unsigned char> length_bytes;
+ length_bytes.resize(2);
+ stream.read(reinterpret_cast<char*>(&length_bytes[0]), 2);
+
+ size_t length=0;
+ int num_bytes=2;
+ for(int c=0;c<num_bytes;c++)
+ length+=length_bytes[c]<<(8*(num_bytes-1-c));
+
+ read_message_content(connection, read_buffer, length, endpoint, fin_rsv_opcode);
+ }
+ else
+ connection_error(connection, endpoint, ec);
+ });
+ }
+ else if(length==127) {
+ //8 next bytes is the size of content
+ asio::async_read(*connection->socket, *read_buffer, asio::transfer_exactly(8),
+ [this, connection, read_buffer, &endpoint, fin_rsv_opcode]
+ (const std::error_code& ec, size_t /*bytes_transferred*/) {
+ if(!ec) {
+ std::istream stream(read_buffer.get());
+
+ std::vector<unsigned char> length_bytes;
+ length_bytes.resize(8);
+ stream.read(reinterpret_cast<char*>(&length_bytes[0]), 8);
+
+ size_t length=0;
+ int num_bytes=8;
+ for(int c=0;c<num_bytes;c++)
+ length+=length_bytes[c]<<(8*(num_bytes-1-c));
+
+ read_message_content(connection, read_buffer, length, endpoint, fin_rsv_opcode);
+ }
+ else
+ connection_error(connection, endpoint, ec);
+ });
+ }
+ else
+ read_message_content(connection, read_buffer, length, endpoint, fin_rsv_opcode);
+ }
+ else
+ connection_error(connection, endpoint, ec);
+ });
+ }
+
+ void read_message_content(const std::shared_ptr<Connection> &connection, const std::shared_ptr<asio::streambuf> &read_buffer,
+ size_t length, Endpoint& endpoint, unsigned char fin_rsv_opcode) const {
+ asio::async_read(*connection->socket, *read_buffer, asio::transfer_exactly(4+length),
+ [this, connection, read_buffer, length, &endpoint, fin_rsv_opcode]
+ (const std::error_code& ec, size_t /*bytes_transferred*/) {
+ if(!ec) {
+ std::istream raw_message_data(read_buffer.get());
+
+ //Read mask
+ std::vector<unsigned char> mask;
+ mask.resize(4);
+ raw_message_data.read(reinterpret_cast<char*>(&mask[0]), 4);
+
+ std::shared_ptr<Message> message(new Message());
+ message->length=length;
+ message->fin_rsv_opcode=fin_rsv_opcode;
+
+ std::ostream message_data_out_stream(&message->streambuf);
+ for(size_t c=0;c<length;c++) {
+ message_data_out_stream.put(raw_message_data.get()^mask[c%4]);
+ }
+
+ //If connection close
+ if((fin_rsv_opcode&0x0f)==8) {
+ int status=0;
+ if(length>=2) {
+ unsigned char byte1=message->get();
+ unsigned char byte2=message->get();
+ status=(byte1<<8)+byte2;
+ }
+
+ auto reason=message->string();
+ send_close(connection, status, reason, [this, connection](const std::error_code& /*ec*/) {});
+ connection_close(connection, endpoint, status, reason);
+ return;
+ }
+ else {
+ //If ping
+ if((fin_rsv_opcode&0x0f)==9) {
+ //send pong
+ auto empty_send_stream=std::make_shared<SendStream>();
+ send(connection, empty_send_stream, nullptr, fin_rsv_opcode+1);
+ }
+ else if(endpoint.on_message) {
+ timer_idle_reset(connection);
+ endpoint.on_message(connection, message);
+ }
+
+ //Next message
+ read_message(connection, read_buffer, endpoint);
+ }
+ }
+ else
+ connection_error(connection, endpoint, ec);
+ });
+ }
+
+ void connection_open(const std::shared_ptr<Connection> &connection, Endpoint& endpoint) {
+ timer_idle_init(connection);
+
+ {
+ std::lock_guard<std::mutex> lock(endpoint.connections_mutex);
+ endpoint.connections.insert(connection);
+ }
+
+ if(endpoint.on_open)
+ endpoint.on_open(connection);
+ }
+
+ void connection_close(const std::shared_ptr<Connection> &connection, Endpoint& endpoint, int status, const std::string& reason) const {
+ timer_idle_cancel(connection);
+
+ {
+ std::lock_guard<std::mutex> lock(endpoint.connections_mutex);
+ endpoint.connections.erase(connection);
+ }
+
+ if(endpoint.on_close)
+ endpoint.on_close(connection, status, reason);
+ }
+
+ void connection_error(const std::shared_ptr<Connection> &connection, Endpoint& endpoint, const std::error_code& ec) const {
+ timer_idle_cancel(connection);
+
+ {
+ std::lock_guard<std::mutex> lock(endpoint.connections_mutex);
+ endpoint.connections.erase(connection);
+ }
+
+ if(endpoint.on_error) {
+ std::error_code ec_tmp=ec;
+ endpoint.on_error(connection, ec_tmp);
+ }
+ }
+
+ void timer_idle_init(const std::shared_ptr<Connection> &connection) {
+ if(config.timeout_idle>0) {
+ connection->timer_idle= std::make_unique<asio::system_timer>(connection->socket->get_io_service());
+ connection->timer_idle->expires_from_now(std::chrono::seconds(static_cast<unsigned long>(config.timeout_idle)));
+ timer_idle_expired_function(connection);
+ }
+ }
+ void timer_idle_reset(const std::shared_ptr<Connection> &connection) const {
+ if(config.timeout_idle>0 && connection->timer_idle->expires_from_now(std::chrono::seconds(static_cast<unsigned long>(config.timeout_idle)))>0)
+ timer_idle_expired_function(connection);
+ }
+ void timer_idle_cancel(const std::shared_ptr<Connection> &connection) const {
+ if(config.timeout_idle>0)
+ connection->timer_idle->cancel();
+ }
+
+ void timer_idle_expired_function(const std::shared_ptr<Connection> &connection) const {
+ connection->timer_idle->async_wait([this, connection](const std::error_code& ec){
+ if(!ec)
+ send_close(connection, 1000, "idle timeout"); //1000=normal closure
+ });
+ }
+ };
+
+ template<class socket_type>
+ class SocketServer : public SocketServerBase<socket_type> {
+ public:
+ SocketServer(unsigned short port, size_t timeout_request, size_t timeout_idle)
+ : SocketServerBase<socket_type>(port, timeout_request, timeout_idle)
+ {
+ }
+ };
+
+ using WS = asio::ip::tcp::socket;
+
+ template<>
+ class SocketServer<WS> : public SocketServerBase<WS> {
+ public:
+ SocketServer() : SocketServerBase<WS>(80) {}
+ protected:
+ void accept() override {
+ //Create new socket for this connection (stored in Connection::socket)
+ //Shared_ptr is used to pass temporary objects to the asynchronous functions
+ std::shared_ptr<Connection> connection(new Connection(new WS(*io_context)));
+
+ acceptor->async_accept(*connection->socket, [this, connection](const std::error_code& ec) {
+ //Immediately start accepting a new connection (if io_context hasn't been stopped)
+ if (ec != asio::error::operation_aborted)
+ accept();
+
+ if(!ec) {
+ asio::ip::tcp::no_delay option(true);
+ connection->socket->set_option(option);
+
+ read_handshake(connection);
+ }
+ });
+ }
+ };
+
+ class ws_server : public SocketServer<WS> {
+ public:
+ ws_server() : SocketServer<WS>::SocketServer() {}
+ };
+}
+#endif /* MAME_LIB_UTIL_SERVER_WS_IMPL_HPP */