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(unsigned port):
  21         sock(Net::INET6),
  22         event_disp(0)
  23 {
  24         sock.signal_data_available.connect(sigc::mem_fun(this, &Server::data_available));
  25         RefPtr<Net::SockAddr> addr = Net::resolve("*", format("%d", port), Net::INET6);
  26         sock.listen(*addr, 8);
  27 }
  28
  29 // Avoid emitting sigc::signal destructor in files including server.h
  30 Server::~Server()
  31 {
  32 }
  33
  34 unsigned Server::get_port() const
  35 {
  36         const Net::SockAddr &addr = sock.get_local_address();
  37         if(addr.get_family()==Net::INET)
  38                 return static_cast<const Net::InetAddr &>(addr).get_port();
  39         return 0;
  40 }
  41
  42 void Server::use_event_dispatcher(IO::EventDispatcher *ed)
  43 {
  44         if(event_disp)
  45         {
  46                 event_disp->remove(sock);
  47                 for(list<Client>::iterator i=clients.begin(); i!=clients.end(); ++i)
  48                         event_disp->remove(*i->sock);
  49         }
  50         event_disp = ed;
  51         if(event_disp)
  52         {
  53                 event_disp->add(sock);
  54                 for(list<Client>::iterator i=clients.begin(); i!=clients.end(); ++i)
  55                         event_disp->add(*i->sock);
  56         }
  57 }
  58
  59 void Server::delay_response(Response &resp)
  60 {
  61         get_client_by_response(resp).async = true;
  62 }
  63
  64 void Server::submit_response(Response &resp)
  65 {
  66         Client &cl = get_client_by_response(resp);
  67         if(cl.async)
  68                 send_response(cl, *cl.response);
  69 }
  70
  71 void Server::cancel_keepalive(Response &resp)
  72 {
  73         get_client_by_response(resp).keepalive = false;
  74 }
  75
  76 void Server::data_available()
  77 {
  78         Net::StreamSocket *csock = sock.accept();
  79         clients.push_back(Client(csock));
  80         csock->signal_data_available.connect(sigc::bind(sigc::mem_fun(this, &Server::client_data_available), sigc::ref(clients.back())));
  81         csock->signal_end_of_file.connect(sigc::bind(sigc::mem_fun(this, &Server::client_end_of_file), sigc::ref(clients.back())));
  82         if(event_disp)
  83                 event_disp->add(*csock);
  84 }
  85
  86 void Server::client_data_available(Client &cl)
  87 {
  88         for(list<Client>::iterator i=clients.begin(); i!=clients.end(); ++i)
  89                 if(i->stale && &*i!=&cl)
  90                 {
  91                         clients.erase(i);
  92                         break;
  93                 }
  94
  95         try
  96         {
  97                 char rbuf[4096];
  98                 unsigned len = cl.sock->read(rbuf, sizeof(rbuf));
  99                 if(cl.stale)
 100                         return;
 101                 cl.in_buf.append(rbuf, len);
 102         }
 103         catch(const exception &)
 104         {
 105                 cl.stale = true;
 106                 return;
 107         }
 108
 109         RefPtr<Response> response;
 110         if(!cl.request)
 111         {
 112                 if(cl.in_buf.find("\r\n\r\n")!=string::npos || cl.in_buf.find("\n\n")!=string::npos)
 113                 {
 114                         try
 115                         {
 116                                 cl.request = new Request(Request::parse(cl.in_buf));
 117
 118                                 string addr_str = cl.sock->get_peer_address().str();
 119                                 string::size_type colon = addr_str.find(':');
 120                                 cl.request->set_header("-Client-Host", addr_str.substr(0, colon));
 121
 122                                 if(cl.request->get_method()!="GET" && cl.request->get_method()!="POST")
 123                                 {
 124                                         response = new Response(NOT_IMPLEMENTED);
 125                                         response->add_content("Method not implemented\n");
 126                                 }
 127                                 else if(cl.request->get_path()[0]!='/')
 128                                 {
 129                                         response = new Response(BAD_REQUEST);
 130                                         response->add_content("Path must be absolute\n");
 131                                 }
 132                         }
 133                         catch(const exception &e)
 134                         {
 135                                 response = new Response(BAD_REQUEST);
 136                                 response->add_content(format("An error occurred while parsing request headers:\ntype: %s\nwhat: %s",
 137                                         Debug::demangle(typeid(e).name()), e.what()));
 138                         }
 139                         cl.in_buf = string();
 140                 }
 141         }
 142         else
 143         {
 144                 unsigned len = cl.request->parse_content(cl.in_buf);
 145                 cl.in_buf.erase(0, len);
 146         }
 147
 148         if(cl.request && cl.request->is_complete() && !response)
 149         {
 150                 cl.keepalive = false;
 151                 if(cl.request->has_header("Connection"))
 152                         cl.keepalive = !strcasecmp(cl.request->get_header("Connection"), "keep-alive");
 153
 154                 response = new Response(NONE);
 155                 try
 156                 {
 157                         cl.response = response.get();
 158                         responses[cl.response] = &cl;
 159                         signal_request.emit(*cl.request, *response);
 160                         if(cl.async)
 161                                 response.release();
 162                         else
 163                         {
 164                                 responses.erase(cl.response);
 165                                 cl.response = 0;
 166                                 if(response->get_status()==NONE)
 167                                 {
 168                                         response = new Response(NOT_FOUND);
 169                                         response->add_content("The requested resource was not found\n");
 170                                 }
 171                         }
 172                 }
 173                 catch(const exception &e)
 174                 {
 175                         responses.erase(cl.response);
 176                         cl.response = 0;
 177                         response = new Response(INTERNAL_ERROR);
 178                         response->add_content(format("An error occurred while processing the request:\ntype: %s\nwhat: %s",
 179                                 Debug::demangle(typeid(e).name()), e.what()));
 180                 }
 181         }
 182
 183         if(response)
 184                 send_response(cl, *response);
 185 }
 186
 187 void Server::send_response(Client &cl, Response &resp)
 188 {
 189         if(cl.keepalive)
 190                 resp.set_header("Connection", "keep-alive");
 191
 192         try
 193         {
 194                 cl.sock->write(resp.str());
 195         }
 196         catch(const exception &)
 197         {
 198                 cl.stale = true;
 199                 return;
 200         }
 201
 202         cl.async = false;
 203         if(cl.keepalive)
 204         {
 205                 delete cl.request;
 206                 cl.request = 0;
 207                 delete cl.response;
 208                 cl.response = 0;
 209         }
 210         else
 211         {
 212                 cl.sock->shutdown(IO::M_WRITE);
 213                 cl.stale = true;
 214         }
 215 }
 216
 217 void Server::client_end_of_file(Client &cl)
 218 {
 219         cl.stale = true;
 220 }
 221
 222 Server::Client &Server::get_client_by_response(Response &resp)
 223 {
 224         return *get_item(responses, &resp);
 225 }
 226
 227
 228 Server::Client::Client(RefPtr<Net::StreamSocket> s):
 229         sock(s),
 230         request(0),
 231         response(0),
 232         keepalive(false),
 233         async(false),
 234         stale(false)
 235 { }
 236
 237 Server::Client::~Client()
 238 {
 239         delete request;
 240         delete response;
 241 }
 242
 243 } // namespace Http
 244 } // namespace Msp