3 #include <msp/core/maputils.h>
4 #include <msp/core/refptr.h>
5 #include <msp/debug/demangle.h>
6 #include <msp/net/inet.h>
7 #include <msp/net/resolve.h>
8 #include <msp/net/streamsocket.h>
9 #include <msp/strings/format.h>
10 #include <msp/strings/utils.h>
24 Server::Server(unsigned port):
30 // Avoid emitting sigc::signal destructor in files including server.h
35 void Server::listen(unsigned port)
37 RefPtr<Net::SockAddr> addr = Net::resolve("*", format("%d", port), Net::INET6);
38 sock.listen(*addr, 8);
39 sock.signal_data_available.connect(sigc::mem_fun(this, &Server::data_available));
42 unsigned Server::get_port() const
44 const Net::SockAddr &addr = sock.get_local_address();
45 if(addr.get_family()==Net::INET)
46 return static_cast<const Net::InetAddr &>(addr).get_port();
50 void Server::use_event_dispatcher(IO::EventDispatcher *ed)
54 event_disp->remove(sock);
55 for(Client &c: clients)
56 event_disp->remove(*c.sock);
61 event_disp->add(sock);
62 for(Client &c: clients)
63 event_disp->add(*c.sock);
67 void Server::delay_response(Response &resp)
69 get_client_by_response(resp).async = true;
72 void Server::submit_response(Response &resp)
74 Client &cl = get_client_by_response(resp);
76 send_response(cl, *cl.response);
79 void Server::cancel_keepalive(Response &resp)
81 get_client_by_response(resp).keepalive = false;
84 void Server::close_connections(const Time::TimeDelta &timeout)
87 for(Client &c: clients)
89 c.sock->shutdown(IO::M_WRITE);
90 poller.set_object(*c.sock, IO::P_INPUT);
93 while(!clients.empty() && poller.poll(timeout))
95 for(const IO::Poller::PolledObject &p: poller.get_result())
96 for(auto j=clients.begin(); j!=clients.end(); ++j)
97 if(j->sock.get()==p.object)
99 poller.set_object(*j->sock, IO::P_NONE);
106 void Server::data_available()
108 Net::StreamSocket *csock = sock.accept();
109 clients.push_back(Client(csock));
110 csock->signal_data_available.connect(sigc::bind(sigc::mem_fun(this, &Server::client_data_available), sigc::ref(clients.back())));
111 csock->signal_end_of_file.connect(sigc::bind(sigc::mem_fun(this, &Server::client_end_of_file), sigc::ref(clients.back())));
113 event_disp->add(*csock);
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 RefPtr<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 = new 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 = new Response(NOT_IMPLEMENTED);
155 response->add_content("Method not implemented\n");
157 else if(cl.request->get_path()[0]!='/')
159 response = new Response(BAD_REQUEST);
160 response->add_content("Path must be absolute\n");
163 catch(const exception &e)
165 response = new 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 = new Response(NONE);
187 cl.response = response.get();
188 responses[cl.response] = &cl;
189 signal_request.emit(*cl.request, *response);
194 responses.erase(cl.response);
195 cl.response = nullptr;
196 if(response->get_status()==NONE)
198 response = new Response(NOT_FOUND);
199 response->add_content("The requested resource was not found\n");
203 catch(const exception &e)
205 responses.erase(cl.response);
206 cl.response = nullptr;
207 response = new Response(INTERNAL_ERROR);
208 response->add_content(format("An error occurred while processing the request:\ntype: %s\nwhat: %s",
209 Debug::demangle(typeid(e).name()), e.what()));
214 send_response(cl, *response);
217 void Server::send_response(Client &cl, Response &resp)
220 resp.set_header("Connection", "keep-alive");
224 cl.sock->write(resp.str());
226 catch(const exception &)
236 cl.request = nullptr;
238 cl.response = nullptr;
242 cl.sock->shutdown(IO::M_WRITE);
247 void Server::client_end_of_file(Client &cl)
252 Server::Client &Server::get_client_by_response(Response &resp)
254 return *get_item(responses, &resp);
258 Server::Client::Client(RefPtr<Net::StreamSocket> s):
262 Server::Client::~Client()