source/http/server.cpp

   1 #include <exception>
   2 #include <typeinfo>
   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>
  11 #include "request.h"
  12 #include "response.h"
  13 #include "server.h"
  14
  15 using namespace std;
  16
  17 namespace Msp {
  18 namespace Http {
  19
  20 Server::Server():
  21         sock(Net::INET6)
  22 { }
  23
  24 Server::Server(unsigned port):
  25         sock(Net::INET6)
  26 {
  27         listen(port);
  28 }
  29
  30 // Avoid emitting sigc::signal destructor in files including server.h
  31 Server::~Server()
  32 {
  33 }
  34
  35 void Server::listen(unsigned port)
  36 {
  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));
  40 }
  41
  42 unsigned Server::get_port() const
  43 {
  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();
  47         return 0;
  48 }
  49
  50 void Server::use_event_dispatcher(IO::EventDispatcher *ed)
  51 {
  52         if(event_disp)
  53         {
  54                 event_disp->remove(sock);
  55                 for(Client &c: clients)
  56                         event_disp->remove(*c.sock);
  57         }
  58         event_disp = ed;
  59         if(event_disp)
  60         {
  61                 event_disp->add(sock);
  62                 for(Client &c: clients)
  63                         event_disp->add(*c.sock);
  64         }
  65 }
  66
  67 void Server::delay_response(Response &resp)
  68 {
  69         get_client_by_response(resp).async = true;
  70 }
  71
  72 void Server::submit_response(Response &resp)
  73 {
  74         Client &cl = get_client_by_response(resp);
  75         if(cl.async)
  76                 send_response(cl, *cl.response);
  77 }
  78
  79 void Server::cancel_keepalive(Response &resp)
  80 {
  81         get_client_by_response(resp).keepalive = false;
  82 }
  83
  84 void Server::close_connections(const Time::TimeDelta &timeout)
  85 {
  86         IO::Poller poller;
  87         for(Client &c: clients)
  88         {
  89                 c.sock->shutdown(IO::M_WRITE);
  90                 poller.set_object(*c.sock, IO::P_INPUT);
  91         }
  92
  93         while(!clients.empty() && poller.poll(timeout))
  94         {
  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)
  98                                 {
  99                                         poller.set_object(*j->sock, IO::P_NONE);
 100                                         clients.erase(j);
 101                                         break;
 102                                 }
 103         }
 104 }
 105
 106 void Server::data_available()
 107 {
 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())));
 112         if(event_disp)
 113                 event_disp->add(*csock);
 114 }
 115
 116 void Server::client_data_available(Client &cl)
 117 {
 118         for(auto i=clients.begin(); i!=clients.end(); ++i)
 119                 if(i->stale && &*i!=&cl)
 120                 {
 121                         clients.erase(i);
 122                         break;
 123                 }
 124
 125         try
 126         {
 127                 char rbuf[4096];
 128                 unsigned len = cl.sock->read(rbuf, sizeof(rbuf));
 129                 if(cl.stale)
 130                         return;
 131                 cl.in_buf.append(rbuf, len);
 132         }
 133         catch(const exception &)
 134         {
 135                 cl.stale = true;
 136                 return;
 137         }
 138
 139         RefPtr<Response> response;
 140         if(!cl.request)
 141         {
 142                 if(cl.in_buf.find("\r\n\r\n")!=string::npos || cl.in_buf.find("\n\n")!=string::npos)
 143                 {
 144                         try
 145                         {
 146                                 cl.request = new Request(Request::parse(cl.in_buf));
 147
 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));
 151
 152                                 if(cl.request->get_method()!="GET" && cl.request->get_method()!="POST")
 153                                 {
 154                                         response = new Response(NOT_IMPLEMENTED);
 155                                         response->add_content("Method not implemented\n");
 156                                 }
 157                                 else if(cl.request->get_path()[0]!='/')
 158                                 {
 159                                         response = new Response(BAD_REQUEST);
 160                                         response->add_content("Path must be absolute\n");
 161                                 }
 162                         }
 163                         catch(const exception &e)
 164                         {
 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()));
 168                         }
 169                         cl.in_buf = string();
 170                 }
 171         }
 172         else
 173         {
 174                 unsigned len = cl.request->parse_content(cl.in_buf);
 175                 cl.in_buf.erase(0, len);
 176         }
 177
 178         if(cl.request && cl.request->is_complete() && !response)
 179         {
 180                 cl.keepalive = false;
 181                 if(cl.request->has_header("Connection"))
 182                         cl.keepalive = !strcasecmp(cl.request->get_header("Connection"), "keep-alive");
 183
 184                 response = new Response(NONE);
 185                 try
 186                 {
 187                         cl.response = response.get();
 188                         responses[cl.response] = &cl;
 189                         signal_request.emit(*cl.request, *response);
 190                         if(cl.async)
 191                                 response.release();
 192                         else
 193                         {
 194                                 responses.erase(cl.response);
 195                                 cl.response = 0;
 196                                 if(response->get_status()==NONE)
 197                                 {
 198                                         response = new Response(NOT_FOUND);
 199                                         response->add_content("The requested resource was not found\n");
 200                                 }
 201                         }
 202                 }
 203                 catch(const exception &e)
 204                 {
 205                         responses.erase(cl.response);
 206                         cl.response = 0;
 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()));
 210                 }
 211         }
 212
 213         if(response)
 214                 send_response(cl, *response);
 215 }
 216
 217 void Server::send_response(Client &cl, Response &resp)
 218 {
 219         if(cl.keepalive)
 220                 resp.set_header("Connection", "keep-alive");
 221
 222         try
 223         {
 224                 cl.sock->write(resp.str());
 225         }
 226         catch(const exception &)
 227         {
 228                 cl.stale = true;
 229                 return;
 230         }
 231
 232         cl.async = false;
 233         if(cl.keepalive)
 234         {
 235                 delete cl.request;
 236                 cl.request = 0;
 237                 delete cl.response;
 238                 cl.response = 0;
 239         }
 240         else
 241         {
 242                 cl.sock->shutdown(IO::M_WRITE);
 243                 cl.stale = true;
 244         }
 245 }
 246
 247 void Server::client_end_of_file(Client &cl)
 248 {
 249         cl.stale = true;
 250 }
 251
 252 Server::Client &Server::get_client_by_response(Response &resp)
 253 {
 254         return *get_item(responses, &resp);
 255 }
 256
 257
 258 Server::Client::Client(RefPtr<Net::StreamSocket> s):
 259         sock(s)
 260 { }
 261
 262 Server::Client::~Client()
 263 {
 264         delete request;
 265         delete response;
 266 }
 267
 268 } // namespace Http
 269 } // namespace Msp