src/common/http.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        http.cpp
   3 // Purpose:     HTTP protocol
   4 // Author:      Guilhem Lavaux
   5 // Modified by:
   6 // Created:     August 1997
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) 1997, 1998 Guilhem Lavaux
   9 // Licence:     wxWindows license
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 #ifdef __GNUG__
  13   #pragma implementation "http.h"
  14 #endif
  15
  16 // For compilers that support precompilation, includes "wx.h".
  17 #include "wx/wxprec.h"
  18
  19 #ifdef __BORLANDC__
  20   #pragma hdrstop
  21 #endif
  22
  23 #if wxUSE_SOCKETS
  24
  25 #include <stdio.h>
  26 #include <stdlib.h>
  27 #include "wx/string.h"
  28 #include "wx/tokenzr.h"
  29 #include "wx/socket.h"
  30 #include "wx/protocol/protocol.h"
  31 #include "wx/url.h"
  32 #include "wx/protocol/http.h"
  33 #include "wx/sckstrm.h"
  34
  35 #if !USE_SHARED_LIBRARY
  36 IMPLEMENT_DYNAMIC_CLASS(wxHTTP, wxProtocol)
  37 IMPLEMENT_PROTOCOL(wxHTTP, _T("http"), _T("80"), TRUE)
  38 #endif
  39
  40 #define HTTP_BSIZE 2048
  41
  42 wxHTTP::wxHTTP()
  43   : wxProtocol(),
  44     m_headers(wxKEY_STRING)
  45 {
  46   m_addr = NULL;
  47   m_read = FALSE;
  48
  49   SetNotify(GSOCK_LOST_FLAG);
  50 }
  51
  52 wxHTTP::~wxHTTP()
  53 {
  54   // wxString isn't a wxObject
  55   wxNode *node = m_headers.First();
  56   wxString *string;
  57
  58   while (node) {
  59     string = (wxString *)node->Data();
  60     delete string;
  61     node = node->Next();
  62   }
  63 }
  64
  65 wxString wxHTTP::GetContentType()
  66 {
  67   return GetHeader(_T("Content-Type"));
  68 }
  69
  70 void wxHTTP::SetHeader(const wxString& header, const wxString& h_data)
  71 {
  72   if (m_read) {
  73     m_headers.Clear();
  74     m_read = FALSE;
  75   }
  76
  77   wxNode *node = m_headers.Find(header);
  78
  79   if (!node)
  80     m_headers.Append(header, (wxObject *)(new wxString(h_data)));
  81   else {
  82     wxString *str = (wxString *)node->Data();
  83     (*str) = h_data;
  84   }
  85 }
  86
  87 wxString wxHTTP::GetHeader(const wxString& header)
  88 {
  89   wxNode *node = m_headers.Find(header);
  90   if (!node)
  91     return wxEmptyString;
  92
  93   return *((wxString *)node->Data());
  94 }
  95
  96 void wxHTTP::SendHeaders()
  97 {
  98   wxNode *head = m_headers.First();
  99
 100   while (head)
 101   {
 102     wxString *str = (wxString *)head->Data();
 103
 104     wxString buf;
 105     buf.Printf(_T("%s: %s\n\r"), head->GetKeyString(), str->GetData());
 106
 107     const wxWX2MBbuf cbuf = buf.mb_str();
 108     Write(cbuf, strlen(cbuf));
 109
 110     head = head->Next();
 111   }
 112 }
 113
 114 bool wxHTTP::ParseHeaders()
 115 {
 116   wxString line;
 117   wxStringTokenizer tokenzr;
 118
 119   m_headers.Clear();
 120   m_read = TRUE;
 121
 122   while (1) {
 123     m_perr = GetLine(this, line);
 124     if (m_perr != wxPROTO_NOERR)
 125       return FALSE;
 126
 127     if (line.Length() == 0)
 128       break;
 129
 130     tokenzr.SetString(line, " :\t\n\r");
 131     if (!tokenzr.HasMoreTokens())
 132       return FALSE;
 133
 134     wxString left_str = tokenzr.GetNextToken();
 135     wxString *str = new wxString(tokenzr.GetNextToken());
 136
 137     m_headers.Append(left_str, (wxObject *) str);
 138   }
 139   return TRUE;
 140 }
 141
 142 bool wxHTTP::Connect(const wxString& host)
 143 {
 144   wxIPV4address *addr;
 145
 146   if (m_connected) {
 147     delete m_addr;
 148     m_addr = NULL;
 149     Close();
 150   }
 151
 152   m_addr = addr = new wxIPV4address();
 153
 154   if (!addr->Hostname(host)) {
 155     delete m_addr;
 156     m_addr = NULL;
 157     m_perr = wxPROTO_NETERR;
 158     return FALSE;
 159   }
 160
 161   if (!addr->Service(_T("http")))
 162     addr->Service(80);
 163
 164   return TRUE;
 165 }
 166
 167 bool wxHTTP::Connect(wxSockAddress& addr, bool WXUNUSED(wait))
 168 {
 169   if (m_addr) {
 170     delete m_addr;
 171     m_addr = NULL;
 172     Close();
 173   }
 174
 175   m_addr = (wxSockAddress *) addr.Clone();
 176   return TRUE;
 177 }
 178
 179 bool wxHTTP::BuildRequest(const wxString& path, wxHTTP_Req req)
 180 {
 181   wxChar *tmp_buf;
 182   wxChar buf[200]; // 200 is arbitrary.
 183   wxString tmp_str;
 184
 185   switch (req) {
 186   case wxHTTP_GET:
 187     tmp_buf = _T("GET");
 188     break;
 189   default:
 190     return FALSE;
 191   }
 192
 193   SaveState();
 194   SetFlags(NONE);
 195   Notify(FALSE);
 196
 197   tmp_str = wxURL::ConvertToValidURI(path);
 198   wxSprintf(buf, _T("%s %s HTTP/1.0\n\r"), tmp_buf, tmp_str.GetData());
 199   const wxWX2MBbuf pathbuf = wxConvLibc.cWX2MB(buf);
 200   Write(pathbuf, strlen(MBSTRINGCAST pathbuf));
 201   SendHeaders();
 202   Write("\n\r", 2);
 203
 204   m_perr = GetLine(this, tmp_str);
 205   if (m_perr != wxPROTO_NOERR) {
 206     RestoreState();
 207     return FALSE;
 208   }
 209
 210   if (!tmp_str.Contains(_T("HTTP/"))) {
 211     // TODO: support HTTP v0.9 which can have no header.
 212     SetHeader(_T("Content-Length"), _T("-1"));
 213     SetHeader(_T("Content-Type"), _T("none/none"));
 214     RestoreState();
 215     return TRUE;
 216   }
 217
 218   wxStringTokenizer token(tmp_str,_T(' '));
 219   wxString tmp_str2;
 220   bool ret_value;
 221
 222   token.NextToken();
 223   tmp_str2 = token.NextToken();
 224
 225   switch (wxAtoi(tmp_str2)) {
 226   case 200:
 227     break;
 228   default:
 229     m_perr = wxPROTO_NOFILE;
 230     RestoreState();
 231     return FALSE;
 232   }
 233
 234   ret_value = ParseHeaders();
 235   RestoreState();
 236   return ret_value;
 237 }
 238
 239 class wxHTTPStream : public wxSocketInputStream {
 240 public:
 241   wxHTTP *m_http;
 242   size_t m_httpsize;
 243   unsigned long m_read_bytes;
 244
 245   wxHTTPStream(wxHTTP *http) : wxSocketInputStream(*http), m_http(http) {}
 246   size_t StreamSize() const { return m_httpsize; }
 247   virtual ~wxHTTPStream(void) { m_http->Abort(); }
 248
 249 protected:
 250   size_t OnSysRead(void *buffer, size_t bufsize);
 251 };
 252
 253 size_t wxHTTPStream::OnSysRead(void *buffer, size_t bufsize)
 254 {
 255   size_t ret;
 256
 257   if (m_httpsize > 0 && m_read_bytes >= m_httpsize)
 258     return 0;
 259
 260   ret = wxSocketInputStream::OnSysRead(buffer, bufsize);
 261   m_read_bytes += ret;
 262
 263   return ret;
 264 }
 265
 266 bool wxHTTP::Abort(void)
 267 {
 268   return wxSocketClient::Close();
 269 }
 270
 271 wxInputStream *wxHTTP::GetInputStream(const wxString& path)
 272 {
 273   wxHTTPStream *inp_stream = new wxHTTPStream(this);
 274
 275   if (!m_addr || m_connected) {
 276     m_perr = wxPROTO_CONNERR;
 277     return NULL;
 278   }
 279
 280   if (!wxProtocol::Connect(*m_addr))
 281     return NULL;
 282
 283   if (!BuildRequest(path, wxHTTP_GET))
 284     return NULL;
 285
 286   if (!GetHeader(_T("Content-Length")).IsEmpty())
 287     inp_stream->m_httpsize = wxAtoi(WXSTRINGCAST GetHeader(_T("Content-Length")));
 288   else
 289     inp_stream->m_httpsize = (size_t)-1;
 290
 291   inp_stream->m_read_bytes = 0;
 292
 293   Notify(FALSE);
 294
 295   return inp_stream;
 296 }
 297
 298 #endif
 299    // wxUSE_SOCKETS