source/server.cpp

   1 /* $Id$
   2
   3 This file is part of libmsphttp
   4 Copyright © 2008  Mikkosoft Productions, Mikko Rasa
   5 Distributed under the LGPL
   6 */
   7
   8 #include <exception>
   9 #include <msp/core/refptr.h>
  10 #include <msp/net/inet.h>
  11 #include <msp/net/streamsocket.h>
  12 #include "request.h"
  13 #include "response.h"
  14 #include "server.h"
  15
  16 using namespace std;
  17
  18 namespace Msp {
  19 namespace Http {
  20
  21 Server::Server(unsigned port):
  22         sock(Net::INET),
  23         event_disp(0)
  24 {
  25         sock.signal_data_available.connect(sigc::mem_fun(this, &Server::data_available));
  26         sock.listen(Net::InetAddr(0, port), 8);
  27 }
  28
  29 unsigned Server::get_port() const
  30 {
  31         const Net::SockAddr &addr = sock.get_local_address();
  32         if(addr.get_family()==Net::INET)
  33                 return static_cast<const Net::InetAddr &>(addr).get_port();
  34         return 0;
  35 }
  36
  37 void Server::use_event_dispatcher(IO::EventDispatcher *ed)
  38 {
  39         if(event_disp)
  40         {
  41                 event_disp->remove(sock);
  42                 for(list<Client>::iterator i=clients.begin(); i!=clients.end(); ++i)
  43                         event_disp->remove(*i->sock);
  44         }
  45         event_disp = ed;
  46         if(event_disp)
  47         {
  48                 event_disp->add(sock);
  49                 for(list<Client>::iterator i=clients.begin(); i!=clients.end(); ++i)
  50                         event_disp->add(*i->sock);
  51         }
  52 }
  53
  54 void Server::delay_response(Response &resp)
  55 {
  56         get_client_by_response(resp).async = true;
  57 }
  58
  59 void Server::submit_response(Response &resp)
  60 {
  61         Client &cl = get_client_by_response(resp);
  62         if(cl.async)
  63         {
  64                 cl.sock->write(resp.str());
  65                 cl.sock->close();
  66                 cl.stale = true;
  67         }
  68 }
  69
  70 void Server::data_available()
  71 {
  72         Net::StreamSocket *csock = sock.accept();
  73         clients.push_back(Client(csock));
  74         csock->signal_data_available.connect(sigc::bind(sigc::mem_fun(this, &Server::client_data_available), sigc::ref(clients.back())));
  75         csock->signal_end_of_file.connect(sigc::bind(sigc::mem_fun(this, &Server::client_end_of_file), sigc::ref(clients.back())));
  76         if(event_disp)
  77                 event_disp->add(*csock);
  78 }
  79
  80 void Server::client_data_available(Client &cl)
  81 {
  82         for(list<Client>::iterator i=clients.begin(); i!=clients.end(); ++i)
  83                 if(i->stale && &*i!=&cl)
  84                 {
  85                         clients.erase(i);
  86                         break;
  87                 }
  88
  89         char rbuf[4096];
  90         unsigned len = cl.sock->read(rbuf, sizeof(rbuf));
  91         cl.in_buf.append(rbuf, len);
  92
  93         RefPtr<Response> response;
  94         if(!cl.request)
  95         {
  96                 if(cl.in_buf.find("\r\n\r\n")!=string::npos || cl.in_buf.find("\n\n")!=string::npos)
  97                 {
  98                         try
  99                         {
 100                                 cl.request = new Request(Request::parse(cl.in_buf));
 101
 102                                 string addr_str = cl.sock->get_peer_address().str();
 103                                 unsigned colon = addr_str.find(':');
 104                                 cl.request->set_header("-Client-Host", addr_str.substr(0, colon));
 105
 106                                 if(cl.request->get_method()!="GET" && cl.request->get_method()!="POST")
 107                                 {
 108                                         response = new Response(NOT_IMPLEMENTED);
 109                                         response->add_content("Method not implemented");
 110                                 }
 111                         }
 112                         catch(const exception &e)
 113                         {
 114                                 response = new Response(BAD_REQUEST);
 115                                 response->add_content(e.what());
 116                         }
 117                         cl.in_buf = string();
 118                 }
 119         }
 120         else
 121         {
 122                 len = cl.request->parse_content(cl.in_buf);
 123                 cl.in_buf.erase(0, len);
 124         }
 125
 126         if(cl.request && cl.request->is_complete() && !response)
 127         {
 128                 response = new Response(NONE);
 129                 try
 130                 {
 131                         cl.response = response.get();
 132                         signal_request.emit(*cl.request, *response);
 133                         if(cl.async)
 134                                 response.release();
 135                         else
 136                         {
 137                                 cl.response = 0;
 138                                 if(response->get_status()==NONE)
 139                                 {
 140                                         response = new Response(NOT_FOUND);
 141                                         response->add_content("The requested resource was not found");
 142                                 }
 143                         }
 144                 }
 145                 catch(const exception &e)
 146                 {
 147                         cl.response = 0;
 148                         response = new Response(INTERNAL_ERROR);
 149                         response->add_content(e.what());
 150                 }
 151         }
 152
 153         if(response)
 154         {
 155                 cl.sock->write(response->str());
 156                 cl.sock->close();
 157                 cl.stale = true;
 158         }
 159 }
 160
 161 void Server::client_end_of_file(Client &cl)
 162 {
 163         cl.stale = true;
 164 }
 165
 166 Server::Client &Server::get_client_by_response(Response &resp)
 167 {
 168         for(list<Client>::iterator i=clients.begin(); i!=clients.end(); ++i)
 169                 if(i->response==&resp)
 170                         return *i;
 171
 172         throw InvalidParameterValue("Response does not belong to any client");
 173 }
 174
 175
 176 Server::Client::Client(RefPtr<Net::StreamSocket> s):
 177         sock(s),
 178         request(0),
 179         response(0),
 180         async(false),
 181         stale(false)
 182 { }
 183
 184 Server::Client::~Client()
 185 {
 186         delete request;
 187         delete response;
 188 }
 189
 190 } // namespace Http
 191 } // namespace Msp