3 #include <msp/core/maputils.h>
4 #include <msp/debug/demangle.h>
5 #include <msp/net/inet.h>
6 #include <msp/net/resolve.h>
7 #include <msp/net/streamsocket.h>
8 #include <msp/strings/format.h>
9 #include <msp/strings/utils.h>
23 Server::Server(unsigned port):
29 // Avoid emitting sigc::signal destructor in files including server.h
34 void Server::listen(unsigned port)
36 unique_ptr<Net::SockAddr> addr(Net::resolve("*", format("%d", port), Net::INET6));
37 sock.listen(*addr, 8);
38 sock.signal_data_available.connect(sigc::mem_fun(this, &Server::data_available));
41 unsigned Server::get_port() const
43 const Net::SockAddr &addr = sock.get_local_address();
44 if(addr.get_family()==Net::INET)
45 return static_cast<const Net::InetAddr &>(addr).get_port();
49 void Server::use_event_dispatcher(IO::EventDispatcher *ed)
53 event_disp->remove(sock);
54 for(Client &c: clients)
55 event_disp->remove(*c.sock);
60 event_disp->add(sock);
61 for(Client &c: clients)
62 event_disp->add(*c.sock);
66 void Server::delay_response(Response &resp)
68 get_client_by_response(resp).async = true;
71 void Server::submit_response(Response &resp)
73 Client &cl = get_client_by_response(resp);
75 send_response(cl, *cl.response);
78 void Server::cancel_keepalive(Response &resp)
80 get_client_by_response(resp).keepalive = false;
83 void Server::close_connections(const Time::TimeDelta &timeout)
86 for(Client &c: clients)
88 c.sock->shutdown(IO::M_WRITE);
89 poller.set_object(*c.sock, IO::P_INPUT);
92 while(!clients.empty() && poller.poll(timeout))
94 for(const IO::Poller::PolledObject &p: poller.get_result())
95 for(auto j=clients.begin(); j!=clients.end(); ++j)
96 if(j->sock.get()==p.object)
98 poller.set_object(*j->sock, IO::P_NONE);
105 void Server::data_available()
107 unique_ptr<Net::StreamSocket> csock(sock.accept());
108 clients.emplace_back(move(csock));
109 Client &cl = clients.back();
110 cl.sock->signal_data_available.connect(sigc::bind(sigc::mem_fun(this, &Server::client_data_available), sigc::ref(clients.back())));
111 cl.sock->signal_end_of_file.connect(sigc::bind(sigc::mem_fun(this, &Server::client_end_of_file), sigc::ref(clients.back())));
113 event_disp->add(*cl.sock);
116 void Server::client_data_available(Client &cl)
118 for(auto i=clients.begin(); i!=clients.end(); ++i)
119 if(i->stale && &*i!=&cl)
128 unsigned len = cl.sock->read(rbuf, sizeof(rbuf));
131 cl.in_buf.append(rbuf, len);
133 catch(const exception &)
139 unique_ptr<Response> response;
142 if(cl.in_buf.find("\r\n\r\n")!=string::npos || cl.in_buf.find("\n\n")!=string::npos)
146 cl.request = make_unique<Request>(Request::parse(cl.in_buf));
148 string addr_str = cl.sock->get_peer_address().str();
149 string::size_type colon = addr_str.find(':');
150 cl.request->set_header("-Client-Host", addr_str.substr(0, colon));
152 if(cl.request->get_method()!="GET" && cl.request->get_method()!="POST")
154 response = make_unique<Response>(NOT_IMPLEMENTED);
155 response->add_content("Method not implemented\n");
157 else if(cl.request->get_path()[0]!='/')
159 response = make_unique<Response>(BAD_REQUEST);
160 response->add_content("Path must be absolute\n");
163 catch(const exception &e)
165 response = make_unique<Response>(BAD_REQUEST);
166 response->add_content(format("An error occurred while parsing request headers:\ntype: %s\nwhat: %s",
167 Debug::demangle(typeid(e).name()), e.what()));
169 cl.in_buf = string();
174 unsigned len = cl.request->parse_content(cl.in_buf);
175 cl.in_buf.erase(0, len);
178 if(cl.request && cl.request->is_complete() && !response)
180 cl.keepalive = false;
181 if(cl.request->has_header("Connection"))
182 cl.keepalive = !strcasecmp(cl.request->get_header("Connection"), "keep-alive");
184 response = make_unique<Response>(NONE);
187 cl.response = move(response);
188 responses[cl.response.get()] = &cl;
189 signal_request.emit(*cl.request, *cl.response);
192 responses.erase(cl.response.get());
193 response = move(cl.response);
194 if(response->get_status()==NONE)
196 response = make_unique<Response>(NOT_FOUND);
197 response->add_content("The requested resource was not found\n");
201 catch(const exception &e)
203 responses.erase(cl.response.get());
205 response = make_unique<Response>(INTERNAL_ERROR);
206 response->add_content(format("An error occurred while processing the request:\ntype: %s\nwhat: %s",
207 Debug::demangle(typeid(e).name()), e.what()));
212 send_response(cl, *response);
215 void Server::send_response(Client &cl, Response &resp)
218 resp.set_header("Connection", "keep-alive");
222 cl.sock->write(resp.str());
224 catch(const exception &)
238 cl.sock->shutdown(IO::M_WRITE);
243 void Server::client_end_of_file(Client &cl)
248 Server::Client &Server::get_client_by_response(Response &resp)
250 return *get_item(responses, &resp);
254 Server::Client::Client(unique_ptr<Net::StreamSocket> s):