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>
25 Server::Server(unsigned port):
32 // Avoid emitting sigc::signal destructor in files including server.h
37 void Server::listen(unsigned port)
39 RefPtr<Net::SockAddr> addr = Net::resolve("*", format("%d", port), Net::INET6);
40 sock.listen(*addr, 8);
41 sock.signal_data_available.connect(sigc::mem_fun(this, &Server::data_available));
44 unsigned Server::get_port() const
46 const Net::SockAddr &addr = sock.get_local_address();
47 if(addr.get_family()==Net::INET)
48 return static_cast<const Net::InetAddr &>(addr).get_port();
52 void Server::use_event_dispatcher(IO::EventDispatcher *ed)
56 event_disp->remove(sock);
57 for(Client &c: clients)
58 event_disp->remove(*c.sock);
63 event_disp->add(sock);
64 for(Client &c: clients)
65 event_disp->add(*c.sock);
69 void Server::delay_response(Response &resp)
71 get_client_by_response(resp).async = true;
74 void Server::submit_response(Response &resp)
76 Client &cl = get_client_by_response(resp);
78 send_response(cl, *cl.response);
81 void Server::cancel_keepalive(Response &resp)
83 get_client_by_response(resp).keepalive = false;
86 void Server::close_connections(const Time::TimeDelta &timeout)
89 for(Client &c: clients)
91 c.sock->shutdown(IO::M_WRITE);
92 poller.set_object(*c.sock, IO::P_INPUT);
95 while(!clients.empty() && poller.poll(timeout))
97 for(const IO::Poller::PolledObject &p: poller.get_result())
98 for(auto j=clients.begin(); j!=clients.end(); ++j)
99 if(j->sock.get()==p.object)
101 poller.set_object(*j->sock, IO::P_NONE);
108 void Server::data_available()
110 Net::StreamSocket *csock = sock.accept();
111 clients.push_back(Client(csock));
112 csock->signal_data_available.connect(sigc::bind(sigc::mem_fun(this, &Server::client_data_available), sigc::ref(clients.back())));
113 csock->signal_end_of_file.connect(sigc::bind(sigc::mem_fun(this, &Server::client_end_of_file), sigc::ref(clients.back())));
115 event_disp->add(*csock);
118 void Server::client_data_available(Client &cl)
120 for(auto i=clients.begin(); i!=clients.end(); ++i)
121 if(i->stale && &*i!=&cl)
130 unsigned len = cl.sock->read(rbuf, sizeof(rbuf));
133 cl.in_buf.append(rbuf, len);
135 catch(const exception &)
141 RefPtr<Response> response;
144 if(cl.in_buf.find("\r\n\r\n")!=string::npos || cl.in_buf.find("\n\n")!=string::npos)
148 cl.request = new Request(Request::parse(cl.in_buf));
150 string addr_str = cl.sock->get_peer_address().str();
151 string::size_type colon = addr_str.find(':');
152 cl.request->set_header("-Client-Host", addr_str.substr(0, colon));
154 if(cl.request->get_method()!="GET" && cl.request->get_method()!="POST")
156 response = new Response(NOT_IMPLEMENTED);
157 response->add_content("Method not implemented\n");
159 else if(cl.request->get_path()[0]!='/')
161 response = new Response(BAD_REQUEST);
162 response->add_content("Path must be absolute\n");
165 catch(const exception &e)
167 response = new Response(BAD_REQUEST);
168 response->add_content(format("An error occurred while parsing request headers:\ntype: %s\nwhat: %s",
169 Debug::demangle(typeid(e).name()), e.what()));
171 cl.in_buf = string();
176 unsigned len = cl.request->parse_content(cl.in_buf);
177 cl.in_buf.erase(0, len);
180 if(cl.request && cl.request->is_complete() && !response)
182 cl.keepalive = false;
183 if(cl.request->has_header("Connection"))
184 cl.keepalive = !strcasecmp(cl.request->get_header("Connection"), "keep-alive");
186 response = new Response(NONE);
189 cl.response = response.get();
190 responses[cl.response] = &cl;
191 signal_request.emit(*cl.request, *response);
196 responses.erase(cl.response);
198 if(response->get_status()==NONE)
200 response = new Response(NOT_FOUND);
201 response->add_content("The requested resource was not found\n");
205 catch(const exception &e)
207 responses.erase(cl.response);
209 response = new Response(INTERNAL_ERROR);
210 response->add_content(format("An error occurred while processing the request:\ntype: %s\nwhat: %s",
211 Debug::demangle(typeid(e).name()), e.what()));
216 send_response(cl, *response);
219 void Server::send_response(Client &cl, Response &resp)
222 resp.set_header("Connection", "keep-alive");
226 cl.sock->write(resp.str());
228 catch(const exception &)
244 cl.sock->shutdown(IO::M_WRITE);
249 void Server::client_end_of_file(Client &cl)
254 Server::Client &Server::get_client_by_response(Response &resp)
256 return *get_item(responses, &resp);
260 Server::Client::Client(RefPtr<Net::StreamSocket> s):
269 Server::Client::~Client()