Michiel Berckvens / Mbed 2 deprecated ProjectHTTP

Important changes to repositories hosted on mbed.com

Mbed hosted mercurial repositories are deprecated and are due to be permanently deleted in July 2026.

To keep a copy of this software download the repository Zip archive or clone locally using Mercurial.

It is also possible to export all your personal repositories from the account settings page.

Dependencies:   DS1307 TextLCD mbed

NetServices/services/http/client/HTTPClient.cpp@0:f615d151a72c, 2014-12-04 (annotated)

Committer:
Michielber
Date:
Thu Dec 04 10:36:40 2014 +0000
Revision:
0:f615d151a72c
Berckvens Michiel & Basteyns Jonas 4/12/2014

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Michielber 0:f615d151a72c 1
Michielber 0:f615d151a72c 2 /*
Michielber 0:f615d151a72c 3 Copyright (c) 2010 Donatien Garnier (donatiengar [at] gmail [dot] com)
Michielber 0:f615d151a72c 4
Michielber 0:f615d151a72c 5 Permission is hereby granted, free of charge, to any person obtaining a copy
Michielber 0:f615d151a72c 6 of this software and associated documentation files (the "Software"), to deal
Michielber 0:f615d151a72c 7 in the Software without restriction, including without limitation the rights
Michielber 0:f615d151a72c 8 to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
Michielber 0:f615d151a72c 9 copies of the Software, and to permit persons to whom the Software is
Michielber 0:f615d151a72c 10 furnished to do so, subject to the following conditions:
Michielber 0:f615d151a72c 11
Michielber 0:f615d151a72c 12 The above copyright notice and this permission notice shall be included in
Michielber 0:f615d151a72c 13 all copies or substantial portions of the Software.
Michielber 0:f615d151a72c 14
Michielber 0:f615d151a72c 15 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
Michielber 0:f615d151a72c 16 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
Michielber 0:f615d151a72c 17 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
Michielber 0:f615d151a72c 18 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
Michielber 0:f615d151a72c 19 LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
Michielber 0:f615d151a72c 20 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
Michielber 0:f615d151a72c 21 THE SOFTWARE.
Michielber 0:f615d151a72c 22 */
Michielber 0:f615d151a72c 23
Michielber 0:f615d151a72c 24 #include "core/netservice.h"
Michielber 0:f615d151a72c 25 #include "HTTPClient.h"
Michielber 0:f615d151a72c 26 #include "../util/base64.h"
Michielber 0:f615d151a72c 27 #include "../util/url.h"
Michielber 0:f615d151a72c 28
Michielber 0:f615d151a72c 29 //#define __DEBUG
Michielber 0:f615d151a72c 30 #include "dbg/dbg.h"
Michielber 0:f615d151a72c 31
Michielber 0:f615d151a72c 32 #define HTTP_REQUEST_TIMEOUT 30000//15000
Michielber 0:f615d151a72c 33 #define HTTP_PORT 80
Michielber 0:f615d151a72c 34
Michielber 0:f615d151a72c 35 #define CHUNK_SIZE 256
Michielber 0:f615d151a72c 36
Michielber 0:f615d151a72c 37 HTTPClient::HTTPClient() : NetService(false) /*Not owned by the pool*/, m_meth(HTTP_GET), m_pCbItem(NULL), m_pCbMeth(NULL), m_pCb(NULL),
Michielber 0:f615d151a72c 38 m_watchdog(), m_timeout(0), m_pDnsReq(NULL), m_server(), m_path(),
Michielber 0:f615d151a72c 39 m_closed(true), m_state(HTTP_CLOSED),
Michielber 0:f615d151a72c 40 m_pDataOut(NULL), m_pDataIn(NULL), m_dataChunked(false), m_dataPos(0), m_dataLen(0), m_httpResponseCode(0), m_blockingResult(HTTP_PROCESSING)
Michielber 0:f615d151a72c 41
Michielber 0:f615d151a72c 42 {
Michielber 0:f615d151a72c 43 setTimeout(HTTP_REQUEST_TIMEOUT);
Michielber 0:f615d151a72c 44 m_buf = new char[CHUNK_SIZE];
Michielber 0:f615d151a72c 45 DBG("New HTTPClient %p\n",this);
Michielber 0:f615d151a72c 46 }
Michielber 0:f615d151a72c 47
Michielber 0:f615d151a72c 48 HTTPClient::~HTTPClient()
Michielber 0:f615d151a72c 49 {
Michielber 0:f615d151a72c 50 close();
Michielber 0:f615d151a72c 51 delete[] m_buf;
Michielber 0:f615d151a72c 52 }
Michielber 0:f615d151a72c 53
Michielber 0:f615d151a72c 54 void HTTPClient::basicAuth(const char* user, const char* password) //Basic Authentification
Michielber 0:f615d151a72c 55 {
Michielber 0:f615d151a72c 56 if(user==NULL)
Michielber 0:f615d151a72c 57 {
Michielber 0:f615d151a72c 58 m_reqHeaders.erase("Authorization"); //Remove auth str
Michielber 0:f615d151a72c 59 return;
Michielber 0:f615d151a72c 60 }
Michielber 0:f615d151a72c 61 string auth = "Basic ";
Michielber 0:f615d151a72c 62 string decStr = user;
Michielber 0:f615d151a72c 63 decStr += ":";
Michielber 0:f615d151a72c 64 decStr += password;
Michielber 0:f615d151a72c 65 auth.append( Base64::encode(decStr) );
Michielber 0:f615d151a72c 66 DBG("Auth str is %s\n", auth.c_str());
Michielber 0:f615d151a72c 67 m_reqHeaders["Authorization"] = auth;
Michielber 0:f615d151a72c 68 }
Michielber 0:f615d151a72c 69
Michielber 0:f615d151a72c 70 //High Level setup functions
Michielber 0:f615d151a72c 71 HTTPResult HTTPClient::get(const char* uri, HTTPData* pDataIn) //Blocking
Michielber 0:f615d151a72c 72 {
Michielber 0:f615d151a72c 73 doGet(uri, pDataIn);
Michielber 0:f615d151a72c 74 return blockingProcess();
Michielber 0:f615d151a72c 75 }
Michielber 0:f615d151a72c 76
Michielber 0:f615d151a72c 77 HTTPResult HTTPClient::get(const char* uri, HTTPData* pDataIn, void (*pMethod)(HTTPResult)) //Non blocking
Michielber 0:f615d151a72c 78 {
Michielber 0:f615d151a72c 79 setOnResult(pMethod);
Michielber 0:f615d151a72c 80 doGet(uri, pDataIn);
Michielber 0:f615d151a72c 81 return HTTP_PROCESSING;
Michielber 0:f615d151a72c 82 }
Michielber 0:f615d151a72c 83
Michielber 0:f615d151a72c 84 #if 0 //For info only
Michielber 0:f615d151a72c 85 template<class T>
Michielber 0:f615d151a72c 86 HTTPResult HTTPClient::get(const char* uri, HTTPData* pDataIn, T* pItem, void (T::*pMethod)(HTTPResult)) //Non blocking
Michielber 0:f615d151a72c 87 {
Michielber 0:f615d151a72c 88 setOnResult(pItem, pMethod);
Michielber 0:f615d151a72c 89 doGet(uri, pDataIn);
Michielber 0:f615d151a72c 90 return HTTP_PROCESSING;
Michielber 0:f615d151a72c 91 }
Michielber 0:f615d151a72c 92 #endif
Michielber 0:f615d151a72c 93
Michielber 0:f615d151a72c 94 HTTPResult HTTPClient::post(const char* uri, const HTTPData& dataOut, HTTPData* pDataIn) //Blocking
Michielber 0:f615d151a72c 95 {
Michielber 0:f615d151a72c 96 doPost(uri, dataOut, pDataIn);
Michielber 0:f615d151a72c 97 return blockingProcess();
Michielber 0:f615d151a72c 98 }
Michielber 0:f615d151a72c 99
Michielber 0:f615d151a72c 100 HTTPResult HTTPClient::post(const char* uri, const HTTPData& dataOut, HTTPData* pDataIn, void (*pMethod)(HTTPResult)) //Non blocking
Michielber 0:f615d151a72c 101 {
Michielber 0:f615d151a72c 102 setOnResult(pMethod);
Michielber 0:f615d151a72c 103 doPost(uri, dataOut, pDataIn);
Michielber 0:f615d151a72c 104 return HTTP_PROCESSING;
Michielber 0:f615d151a72c 105 }
Michielber 0:f615d151a72c 106
Michielber 0:f615d151a72c 107 #if 0 //For info only
Michielber 0:f615d151a72c 108 template<class T>
Michielber 0:f615d151a72c 109 HTTPResult HTTPClient::post(const char* uri, const HTTPData& dataOut, HTTPData* pDataIn, T* pItem, void (T::*pMethod)(HTTPResult)) //Non blocking
Michielber 0:f615d151a72c 110 {
Michielber 0:f615d151a72c 111 setOnResult(pItem, pMethod);
Michielber 0:f615d151a72c 112 doPost(uri, dataOut, pDataIn);
Michielber 0:f615d151a72c 113 return HTTP_PROCESSING;
Michielber 0:f615d151a72c 114 }
Michielber 0:f615d151a72c 115 #endif
Michielber 0:f615d151a72c 116
Michielber 0:f615d151a72c 117 void HTTPClient::doGet(const char* uri, HTTPData* pDataIn)
Michielber 0:f615d151a72c 118 {
Michielber 0:f615d151a72c 119 m_meth = HTTP_GET;
Michielber 0:f615d151a72c 120 setup(uri, NULL, pDataIn);
Michielber 0:f615d151a72c 121 }
Michielber 0:f615d151a72c 122
Michielber 0:f615d151a72c 123 void HTTPClient::doPost(const char* uri, const HTTPData& dataOut, HTTPData* pDataIn)
Michielber 0:f615d151a72c 124 {
Michielber 0:f615d151a72c 125 m_meth = HTTP_POST;
Michielber 0:f615d151a72c 126 setup(uri, (HTTPData*) &dataOut, pDataIn);
Michielber 0:f615d151a72c 127 }
Michielber 0:f615d151a72c 128
Michielber 0:f615d151a72c 129 void HTTPClient::setOnResult( void (*pMethod)(HTTPResult) )
Michielber 0:f615d151a72c 130 {
Michielber 0:f615d151a72c 131 m_pCb = pMethod;
Michielber 0:f615d151a72c 132 m_pCbItem = NULL;
Michielber 0:f615d151a72c 133 m_pCbMeth = NULL;
Michielber 0:f615d151a72c 134 }
Michielber 0:f615d151a72c 135
Michielber 0:f615d151a72c 136 #if 0 //For info only
Michielber 0:f615d151a72c 137 template<class T>
Michielber 0:f615d151a72c 138 void HTTPClient::setOnResult( T* pItem, void (T::*pMethod)(NtpResult) )
Michielber 0:f615d151a72c 139 {
Michielber 0:f615d151a72c 140 m_pCb = NULL;
Michielber 0:f615d151a72c 141 m_pCbItem = (CDummy*) pItem;
Michielber 0:f615d151a72c 142 m_pCbMeth = (void (CDummy::*)(NtpResult)) pMethod;
Michielber 0:f615d151a72c 143 }
Michielber 0:f615d151a72c 144 #endif
Michielber 0:f615d151a72c 145
Michielber 0:f615d151a72c 146 void HTTPClient::setTimeout(int ms)
Michielber 0:f615d151a72c 147 {
Michielber 0:f615d151a72c 148 m_timeout = ms;
Michielber 0:f615d151a72c 149 //resetTimeout();
Michielber 0:f615d151a72c 150 }
Michielber 0:f615d151a72c 151
Michielber 0:f615d151a72c 152 void HTTPClient::poll() //Called by NetServices
Michielber 0:f615d151a72c 153 {
Michielber 0:f615d151a72c 154 if(m_closed)
Michielber 0:f615d151a72c 155 {
Michielber 0:f615d151a72c 156 return;
Michielber 0:f615d151a72c 157 }
Michielber 0:f615d151a72c 158 if(m_watchdog.read_ms()>m_timeout)
Michielber 0:f615d151a72c 159 {
Michielber 0:f615d151a72c 160 onTimeout();
Michielber 0:f615d151a72c 161 }
Michielber 0:f615d151a72c 162 else if(m_state == HTTP_READ_DATA_INCOMPLETE)
Michielber 0:f615d151a72c 163 {
Michielber 0:f615d151a72c 164 readData(); //Try to read more data
Michielber 0:f615d151a72c 165 if( m_state == HTTP_DONE )
Michielber 0:f615d151a72c 166 {
Michielber 0:f615d151a72c 167 //All data has been read, close w/ success :)
Michielber 0:f615d151a72c 168 DBG("Done :)!\n");
Michielber 0:f615d151a72c 169 onResult(HTTP_OK);
Michielber 0:f615d151a72c 170 close();
Michielber 0:f615d151a72c 171 }
Michielber 0:f615d151a72c 172 }
Michielber 0:f615d151a72c 173
Michielber 0:f615d151a72c 174 }
Michielber 0:f615d151a72c 175
Michielber 0:f615d151a72c 176 int HTTPClient::getHTTPResponseCode()
Michielber 0:f615d151a72c 177 {
Michielber 0:f615d151a72c 178 return m_httpResponseCode;
Michielber 0:f615d151a72c 179 }
Michielber 0:f615d151a72c 180
Michielber 0:f615d151a72c 181 void HTTPClient::setRequestHeader(const string& header, const string& value)
Michielber 0:f615d151a72c 182 {
Michielber 0:f615d151a72c 183 m_reqHeaders[header] = value;
Michielber 0:f615d151a72c 184 }
Michielber 0:f615d151a72c 185
Michielber 0:f615d151a72c 186 string& HTTPClient::getResponseHeader(const string& header)
Michielber 0:f615d151a72c 187 {
Michielber 0:f615d151a72c 188 return m_respHeaders[header];
Michielber 0:f615d151a72c 189 }
Michielber 0:f615d151a72c 190
Michielber 0:f615d151a72c 191 void HTTPClient::resetRequestHeaders()
Michielber 0:f615d151a72c 192 {
Michielber 0:f615d151a72c 193 m_reqHeaders.clear();
Michielber 0:f615d151a72c 194 }
Michielber 0:f615d151a72c 195
Michielber 0:f615d151a72c 196 void HTTPClient::resetTimeout()
Michielber 0:f615d151a72c 197 {
Michielber 0:f615d151a72c 198 m_watchdog.reset();
Michielber 0:f615d151a72c 199 m_watchdog.start();
Michielber 0:f615d151a72c 200 }
Michielber 0:f615d151a72c 201
Michielber 0:f615d151a72c 202 void HTTPClient::init() //Create and setup socket if needed
Michielber 0:f615d151a72c 203 {
Michielber 0:f615d151a72c 204 close(); //Remove previous elements
Michielber 0:f615d151a72c 205 if(!m_closed) //Already opened
Michielber 0:f615d151a72c 206 return;
Michielber 0:f615d151a72c 207 m_state = HTTP_WRITE_HEADERS;
Michielber 0:f615d151a72c 208 m_pTCPSocket = new TCPSocket;
Michielber 0:f615d151a72c 209 m_pTCPSocket->setOnEvent(this, &HTTPClient::onTCPSocketEvent);
Michielber 0:f615d151a72c 210 m_closed = false;
Michielber 0:f615d151a72c 211 m_httpResponseCode = 0;
Michielber 0:f615d151a72c 212 }
Michielber 0:f615d151a72c 213
Michielber 0:f615d151a72c 214 void HTTPClient::close()
Michielber 0:f615d151a72c 215 {
Michielber 0:f615d151a72c 216 if(m_closed)
Michielber 0:f615d151a72c 217 return;
Michielber 0:f615d151a72c 218 m_state = HTTP_CLOSED;
Michielber 0:f615d151a72c 219 //Now Request headers are kept btw requests unless resetRequestHeaders() is called
Michielber 0:f615d151a72c 220 //m_reqHeaders.clear(); //Clear headers for next requests
Michielber 0:f615d151a72c 221 m_closed = true; //Prevent recursive calling or calling on an object being destructed by someone else
Michielber 0:f615d151a72c 222 m_watchdog.stop(); //Stop timeout
Michielber 0:f615d151a72c 223 m_watchdog.reset();
Michielber 0:f615d151a72c 224 m_pTCPSocket->resetOnEvent();
Michielber 0:f615d151a72c 225 m_pTCPSocket->close();
Michielber 0:f615d151a72c 226 delete m_pTCPSocket;
Michielber 0:f615d151a72c 227 m_pTCPSocket = NULL;
Michielber 0:f615d151a72c 228 if( m_pDnsReq )
Michielber 0:f615d151a72c 229 {
Michielber 0:f615d151a72c 230 m_pDnsReq->close();
Michielber 0:f615d151a72c 231 delete m_pDnsReq;
Michielber 0:f615d151a72c 232 m_pDnsReq = NULL;
Michielber 0:f615d151a72c 233 }
Michielber 0:f615d151a72c 234 }
Michielber 0:f615d151a72c 235
Michielber 0:f615d151a72c 236 void HTTPClient::setup(const char* uri, HTTPData* pDataOut, HTTPData* pDataIn) //Setup request, make DNS Req if necessary
Michielber 0:f615d151a72c 237 {
Michielber 0:f615d151a72c 238 init(); //Initialize client in known state, create socket
Michielber 0:f615d151a72c 239 m_pDataOut = pDataOut;
Michielber 0:f615d151a72c 240 m_pDataIn = pDataIn;
Michielber 0:f615d151a72c 241 resetTimeout();
Michielber 0:f615d151a72c 242
Michielber 0:f615d151a72c 243 //Erase previous headers
Michielber 0:f615d151a72c 244 //Do NOT clear m_reqHeaders as they might have already set before connecting
Michielber 0:f615d151a72c 245 m_respHeaders.clear();
Michielber 0:f615d151a72c 246
Michielber 0:f615d151a72c 247 //Erase response buffer
Michielber 0:f615d151a72c 248 if(m_pDataIn)
Michielber 0:f615d151a72c 249 m_pDataIn->clear();
Michielber 0:f615d151a72c 250
Michielber 0:f615d151a72c 251 //Assert that buffers are initialized properly
Michielber 0:f615d151a72c 252 m_dataLen = 0;
Michielber 0:f615d151a72c 253 m_bufRemainingLen = 0;
Michielber 0:f615d151a72c 254
Michielber 0:f615d151a72c 255 Url url;
Michielber 0:f615d151a72c 256 url.fromString(uri);
Michielber 0:f615d151a72c 257
Michielber 0:f615d151a72c 258 m_path = url.getPath();
Michielber 0:f615d151a72c 259
Michielber 0:f615d151a72c 260 m_server.setName(url.getHost().c_str());
Michielber 0:f615d151a72c 261
Michielber 0:f615d151a72c 262 if( url.getPort() > 0 )
Michielber 0:f615d151a72c 263 {
Michielber 0:f615d151a72c 264 m_server.setPort( url.getPort() );
Michielber 0:f615d151a72c 265 }
Michielber 0:f615d151a72c 266 else
Michielber 0:f615d151a72c 267 {
Michielber 0:f615d151a72c 268 m_server.setPort( HTTP_PORT );
Michielber 0:f615d151a72c 269 }
Michielber 0:f615d151a72c 270
Michielber 0:f615d151a72c 271 DBG("URL parsed,\r\nHost: %s\r\nPort: %d\r\nPath: %s\n", url.getHost().c_str(), url.getPort(), url.getPath().c_str());
Michielber 0:f615d151a72c 272
Michielber 0:f615d151a72c 273 IpAddr ip;
Michielber 0:f615d151a72c 274 if( url.getHostIp(&ip) )
Michielber 0:f615d151a72c 275 {
Michielber 0:f615d151a72c 276 m_server.setIp(ip);
Michielber 0:f615d151a72c 277 connect();
Michielber 0:f615d151a72c 278 }
Michielber 0:f615d151a72c 279 else
Michielber 0:f615d151a72c 280 {
Michielber 0:f615d151a72c 281 DBG("DNS Query...\n");
Michielber 0:f615d151a72c 282 m_pDnsReq = new DNSRequest();
Michielber 0:f615d151a72c 283 m_pDnsReq->setOnReply(this, &HTTPClient::onDNSReply);
Michielber 0:f615d151a72c 284 m_pDnsReq->resolve(&m_server);
Michielber 0:f615d151a72c 285 DBG("HTTPClient : DNSRequest %p\n", m_pDnsReq);
Michielber 0:f615d151a72c 286 }
Michielber 0:f615d151a72c 287
Michielber 0:f615d151a72c 288 }
Michielber 0:f615d151a72c 289
Michielber 0:f615d151a72c 290 void HTTPClient::connect() //Start Connection
Michielber 0:f615d151a72c 291 {
Michielber 0:f615d151a72c 292 resetTimeout();
Michielber 0:f615d151a72c 293 DBG("Connecting...\n");
Michielber 0:f615d151a72c 294 m_pTCPSocket->connect(m_server);
Michielber 0:f615d151a72c 295 }
Michielber 0:f615d151a72c 296
Michielber 0:f615d151a72c 297 #define MIN(a,b) ((a)<(b)?(a):(b))
Michielber 0:f615d151a72c 298 #define ABS(a) (((a)>0)?(a):0)
Michielber 0:f615d151a72c 299 int HTTPClient::tryRead() //Try to read data from tcp packet and put in the HTTPData object
Michielber 0:f615d151a72c 300 {
Michielber 0:f615d151a72c 301 int len = 0;
Michielber 0:f615d151a72c 302 int readLen;
Michielber 0:f615d151a72c 303 do
Michielber 0:f615d151a72c 304 {
Michielber 0:f615d151a72c 305 if(m_state == HTTP_READ_DATA_INCOMPLETE) //First try to complete buffer copy
Michielber 0:f615d151a72c 306 {
Michielber 0:f615d151a72c 307 readLen = m_bufRemainingLen;
Michielber 0:f615d151a72c 308 /* if (readLen == 0)
Michielber 0:f615d151a72c 309 {
Michielber 0:f615d151a72c 310 m_state = HTTP_READ_DATA;
Michielber 0:f615d151a72c 311 continue;
Michielber 0:f615d151a72c 312 }*/
Michielber 0:f615d151a72c 313 }
Michielber 0:f615d151a72c 314 else
Michielber 0:f615d151a72c 315 {
Michielber 0:f615d151a72c 316 readLen = m_pTCPSocket->recv(m_buf, MIN(ABS(m_dataLen-m_dataPos),CHUNK_SIZE));
Michielber 0:f615d151a72c 317 if(readLen < 0) //Error
Michielber 0:f615d151a72c 318 {
Michielber 0:f615d151a72c 319 return readLen;
Michielber 0:f615d151a72c 320 }
Michielber 0:f615d151a72c 321
Michielber 0:f615d151a72c 322 DBG("%d bytes read\n", readLen);
Michielber 0:f615d151a72c 323
Michielber 0:f615d151a72c 324 m_pBufRemaining = m_buf;
Michielber 0:f615d151a72c 325 }
Michielber 0:f615d151a72c 326 if (readLen == 0)
Michielber 0:f615d151a72c 327 {
Michielber 0:f615d151a72c 328 m_state = HTTP_READ_DATA;
Michielber 0:f615d151a72c 329 return len;
Michielber 0:f615d151a72c 330 }
Michielber 0:f615d151a72c 331
Michielber 0:f615d151a72c 332 DBG("Trying to write %d bytes\n", readLen);
Michielber 0:f615d151a72c 333
Michielber 0:f615d151a72c 334 int writtenLen = m_pDataIn->write(m_pBufRemaining, readLen);
Michielber 0:f615d151a72c 335 m_dataPos += writtenLen;
Michielber 0:f615d151a72c 336
Michielber 0:f615d151a72c 337 DBG("%d bytes written\n", writtenLen);
Michielber 0:f615d151a72c 338
Michielber 0:f615d151a72c 339 if(writtenLen<readLen) //Data was not completely written
Michielber 0:f615d151a72c 340 {
Michielber 0:f615d151a72c 341 m_pBufRemaining += writtenLen;
Michielber 0:f615d151a72c 342 m_bufRemainingLen = readLen - writtenLen;
Michielber 0:f615d151a72c 343 m_state = HTTP_READ_DATA_INCOMPLETE;
Michielber 0:f615d151a72c 344 return len + writtenLen;
Michielber 0:f615d151a72c 345 }
Michielber 0:f615d151a72c 346 else
Michielber 0:f615d151a72c 347 {
Michielber 0:f615d151a72c 348 m_state = HTTP_READ_DATA;
Michielber 0:f615d151a72c 349 }
Michielber 0:f615d151a72c 350 len += readLen;
Michielber 0:f615d151a72c 351 } while(readLen>0);
Michielber 0:f615d151a72c 352
Michielber 0:f615d151a72c 353 return len;
Michielber 0:f615d151a72c 354 }
Michielber 0:f615d151a72c 355
Michielber 0:f615d151a72c 356 void HTTPClient::readData() //Data has been read
Michielber 0:f615d151a72c 357 {
Michielber 0:f615d151a72c 358 if(m_pDataIn == NULL) //Nothing to read (in HEAD for instance, not supported now)
Michielber 0:f615d151a72c 359 {
Michielber 0:f615d151a72c 360 m_state = HTTP_DONE;
Michielber 0:f615d151a72c 361 return;
Michielber 0:f615d151a72c 362 }
Michielber 0:f615d151a72c 363 DBG("Reading response...\n");
Michielber 0:f615d151a72c 364 int len = 0;
Michielber 0:f615d151a72c 365 do
Michielber 0:f615d151a72c 366 {
Michielber 0:f615d151a72c 367 if(m_dataChunked && (m_state != HTTP_READ_DATA_INCOMPLETE))
Michielber 0:f615d151a72c 368 {
Michielber 0:f615d151a72c 369 if(m_dataLen==0)
Michielber 0:f615d151a72c 370 {
Michielber 0:f615d151a72c 371 DBG("Reading chunk length...\n");
Michielber 0:f615d151a72c 372 //New block
Michielber 0:f615d151a72c 373 static char chunkHeader[16];
Michielber 0:f615d151a72c 374 //We use m_dataPos to retain the read position in chunkHeader, it has been set to 0 before the first call of readData()
Michielber 0:f615d151a72c 375 m_dataPos += readLine(chunkHeader + m_dataPos, ABS(16 - m_dataPos));
Michielber 0:f615d151a72c 376 if( m_dataPos > 0 )
Michielber 0:f615d151a72c 377 {
Michielber 0:f615d151a72c 378 if( chunkHeader[strlen(chunkHeader)-1] == 0x0d )
Michielber 0:f615d151a72c 379 {
Michielber 0:f615d151a72c 380 sscanf(chunkHeader, "%x%*[^\r\n]", &m_dataLen);
Michielber 0:f615d151a72c 381 DBG("Chunk length is %d\n", m_dataLen);
Michielber 0:f615d151a72c 382 m_dataPos = 0;
Michielber 0:f615d151a72c 383 }
Michielber 0:f615d151a72c 384 else
Michielber 0:f615d151a72c 385 {
Michielber 0:f615d151a72c 386 //Wait for end of line
Michielber 0:f615d151a72c 387 DBG("Wait for CRLF\n");
Michielber 0:f615d151a72c 388 return;
Michielber 0:f615d151a72c 389 }
Michielber 0:f615d151a72c 390 }
Michielber 0:f615d151a72c 391 else
Michielber 0:f615d151a72c 392 {
Michielber 0:f615d151a72c 393 DBG("Wait for data\n");
Michielber 0:f615d151a72c 394 //Wait for data
Michielber 0:f615d151a72c 395 return;
Michielber 0:f615d151a72c 396 }
Michielber 0:f615d151a72c 397 }
Michielber 0:f615d151a72c 398 }
Michielber 0:f615d151a72c 399
Michielber 0:f615d151a72c 400 //Proper data recovery
Michielber 0:f615d151a72c 401 len = tryRead();
Michielber 0:f615d151a72c 402 if(len<0) //Error
Michielber 0:f615d151a72c 403 {
Michielber 0:f615d151a72c 404 onResult(HTTP_CONN);
Michielber 0:f615d151a72c 405 return;
Michielber 0:f615d151a72c 406 }
Michielber 0:f615d151a72c 407
Michielber 0:f615d151a72c 408 if(len>0)
Michielber 0:f615d151a72c 409 resetTimeout();
Michielber 0:f615d151a72c 410
Michielber 0:f615d151a72c 411 if(m_state == HTTP_READ_DATA_INCOMPLETE)
Michielber 0:f615d151a72c 412 return;
Michielber 0:f615d151a72c 413
Michielber 0:f615d151a72c 414 //Chunk Tail
Michielber 0:f615d151a72c 415 if(m_dataChunked)
Michielber 0:f615d151a72c 416 {
Michielber 0:f615d151a72c 417 if(m_dataPos >= m_dataLen)
Michielber 0:f615d151a72c 418 {
Michielber 0:f615d151a72c 419 DBG("Chunk read, wait for CRLF\n");
Michielber 0:f615d151a72c 420 char chunkTail[3];
Michielber 0:f615d151a72c 421 m_dataPos += readLine(chunkTail, 3);
Michielber 0:f615d151a72c 422 }
Michielber 0:f615d151a72c 423
Michielber 0:f615d151a72c 424 if(m_dataPos >= m_dataLen + 1) //1 == strlen("\n"),
Michielber 0:f615d151a72c 425 {
Michielber 0:f615d151a72c 426 DBG("End of chunk\n");
Michielber 0:f615d151a72c 427 if(m_dataLen==0)
Michielber 0:f615d151a72c 428 {
Michielber 0:f615d151a72c 429 DBG("End of file\n");
Michielber 0:f615d151a72c 430 //End of file
Michielber 0:f615d151a72c 431 m_state = HTTP_DONE; //Done
Michielber 0:f615d151a72c 432 }
Michielber 0:f615d151a72c 433 m_dataLen = 0;
Michielber 0:f615d151a72c 434 m_dataPos = 0;
Michielber 0:f615d151a72c 435 }
Michielber 0:f615d151a72c 436 }
Michielber 0:f615d151a72c 437
Michielber 0:f615d151a72c 438 } while(len>0);
Michielber 0:f615d151a72c 439
Michielber 0:f615d151a72c 440
Michielber 0:f615d151a72c 441 if(!m_dataChunked && (m_dataPos >= m_dataLen)) //All Data has been received
Michielber 0:f615d151a72c 442 {
Michielber 0:f615d151a72c 443 DBG("End of file\n");
Michielber 0:f615d151a72c 444 m_state = HTTP_DONE; //Done
Michielber 0:f615d151a72c 445 }
Michielber 0:f615d151a72c 446 }
Michielber 0:f615d151a72c 447
Michielber 0:f615d151a72c 448 void HTTPClient::writeData() //Data has been written & buf is free
Michielber 0:f615d151a72c 449 {
Michielber 0:f615d151a72c 450 if(m_pDataOut == NULL) //Nothing to write (in POST for instance)
Michielber 0:f615d151a72c 451 {
Michielber 0:f615d151a72c 452 m_dataLen = 0; //Reset Data Length
Michielber 0:f615d151a72c 453 m_state = HTTP_READ_HEADERS;
Michielber 0:f615d151a72c 454 return;
Michielber 0:f615d151a72c 455 }
Michielber 0:f615d151a72c 456 int len = m_pDataOut->read(m_buf, CHUNK_SIZE);
Michielber 0:f615d151a72c 457 if( m_dataChunked )
Michielber 0:f615d151a72c 458 {
Michielber 0:f615d151a72c 459 //Write chunk header
Michielber 0:f615d151a72c 460 char chunkHeader[16];
Michielber 0:f615d151a72c 461 sprintf(chunkHeader, "%d\r\n", len);
Michielber 0:f615d151a72c 462 int ret = m_pTCPSocket->send(chunkHeader, strlen(chunkHeader));
Michielber 0:f615d151a72c 463 if(ret < 0)//Error
Michielber 0:f615d151a72c 464 {
Michielber 0:f615d151a72c 465 onResult(HTTP_CONN);
Michielber 0:f615d151a72c 466 return;
Michielber 0:f615d151a72c 467 }
Michielber 0:f615d151a72c 468 }
Michielber 0:f615d151a72c 469 m_pTCPSocket->send(m_buf, len);
Michielber 0:f615d151a72c 470 m_dataPos+=len;
Michielber 0:f615d151a72c 471 if( m_dataChunked )
Michielber 0:f615d151a72c 472 {
Michielber 0:f615d151a72c 473 m_pTCPSocket->send("\r\n", 2); //Chunk-terminating CRLF
Michielber 0:f615d151a72c 474 }
Michielber 0:f615d151a72c 475 if( ( !m_dataChunked && (m_dataPos >= m_dataLen) )
Michielber 0:f615d151a72c 476 || ( m_dataChunked && !len ) ) //All Data has been sent
Michielber 0:f615d151a72c 477 {
Michielber 0:f615d151a72c 478 m_dataLen = 0; //Reset Data Length
Michielber 0:f615d151a72c 479 m_state = HTTP_READ_HEADERS; //Wait for resp
Michielber 0:f615d151a72c 480 }
Michielber 0:f615d151a72c 481 }
Michielber 0:f615d151a72c 482
Michielber 0:f615d151a72c 483 void HTTPClient::onTCPSocketEvent(TCPSocketEvent e)
Michielber 0:f615d151a72c 484 {
Michielber 0:f615d151a72c 485 DBG("Event %d in HTTPClient::onTCPSocketEvent()\n", e);
Michielber 0:f615d151a72c 486
Michielber 0:f615d151a72c 487 if(m_closed)
Michielber 0:f615d151a72c 488 {
Michielber 0:f615d151a72c 489 DBG("WARN: Discarded\n");
Michielber 0:f615d151a72c 490 return;
Michielber 0:f615d151a72c 491 }
Michielber 0:f615d151a72c 492
Michielber 0:f615d151a72c 493 switch(e)
Michielber 0:f615d151a72c 494 {
Michielber 0:f615d151a72c 495 case TCPSOCKET_READABLE: //Incoming data
Michielber 0:f615d151a72c 496 resetTimeout();
Michielber 0:f615d151a72c 497 switch(m_state)
Michielber 0:f615d151a72c 498 {
Michielber 0:f615d151a72c 499 case HTTP_READ_HEADERS:
Michielber 0:f615d151a72c 500 if( !readHeaders() )
Michielber 0:f615d151a72c 501 {
Michielber 0:f615d151a72c 502 return; //Connection has been closed or incomplete data
Michielber 0:f615d151a72c 503 }
Michielber 0:f615d151a72c 504 if( m_pDataIn )
Michielber 0:f615d151a72c 505 {
Michielber 0:f615d151a72c 506 //Data chunked?
Michielber 0:f615d151a72c 507 if(m_respHeaders["Transfer-Encoding"].find("chunked")!=string::npos)
Michielber 0:f615d151a72c 508 {
Michielber 0:f615d151a72c 509 m_dataChunked = true;
Michielber 0:f615d151a72c 510 m_dataPos = 0;
Michielber 0:f615d151a72c 511 m_dataLen = 0;
Michielber 0:f615d151a72c 512 DBG("Encoding is chunked, Content-Type is %s\n", m_respHeaders["Content-Type"].c_str() );
Michielber 0:f615d151a72c 513 }
Michielber 0:f615d151a72c 514 else
Michielber 0:f615d151a72c 515 {
Michielber 0:f615d151a72c 516 m_dataChunked = false;
Michielber 0:f615d151a72c 517 int len = 0;
Michielber 0:f615d151a72c 518 //DBG("Preparing read... len = %s\n", m_respHeaders["Content-Length"].c_str());
Michielber 0:f615d151a72c 519 sscanf(m_respHeaders["Content-Length"].c_str(), "%d", &len);
Michielber 0:f615d151a72c 520 m_pDataIn->setDataLen( len );
Michielber 0:f615d151a72c 521 m_dataPos = 0;
Michielber 0:f615d151a72c 522 m_dataLen = len;
Michielber 0:f615d151a72c 523 DBG("Content-Length is %d, Content-Type is %s\n", len, m_respHeaders["Content-Type"].c_str() );
Michielber 0:f615d151a72c 524 }
Michielber 0:f615d151a72c 525 m_pDataIn->setDataType( m_respHeaders["Content-Type"] );
Michielber 0:f615d151a72c 526 }
Michielber 0:f615d151a72c 527 case HTTP_READ_DATA:
Michielber 0:f615d151a72c 528 readData();
Michielber 0:f615d151a72c 529 break;
Michielber 0:f615d151a72c 530 case HTTP_READ_DATA_INCOMPLETE:
Michielber 0:f615d151a72c 531 break; //We need to handle previously received data first
Michielber 0:f615d151a72c 532 default:
Michielber 0:f615d151a72c 533 //Should not receive data now, req is not complete
Michielber 0:f615d151a72c 534 onResult(HTTP_PRTCL);
Michielber 0:f615d151a72c 535 }
Michielber 0:f615d151a72c 536 //All data has been read, close w/ success :)
Michielber 0:f615d151a72c 537 if( m_state == HTTP_DONE )
Michielber 0:f615d151a72c 538 {
Michielber 0:f615d151a72c 539 DBG("Done :)!\n");
Michielber 0:f615d151a72c 540 onResult(HTTP_OK);
Michielber 0:f615d151a72c 541 }
Michielber 0:f615d151a72c 542 break;
Michielber 0:f615d151a72c 543 case TCPSOCKET_CONNECTED:
Michielber 0:f615d151a72c 544 case TCPSOCKET_WRITEABLE: //We can send data
Michielber 0:f615d151a72c 545 resetTimeout();
Michielber 0:f615d151a72c 546 switch(m_state)
Michielber 0:f615d151a72c 547 {
Michielber 0:f615d151a72c 548 case HTTP_WRITE_HEADERS:
Michielber 0:f615d151a72c 549 //Update headers fields according to m_pDataOut
Michielber 0:f615d151a72c 550 if( m_pDataOut )
Michielber 0:f615d151a72c 551 {
Michielber 0:f615d151a72c 552 //Data is chunked?
Michielber 0:f615d151a72c 553 if(m_pDataOut->getIsChunked())
Michielber 0:f615d151a72c 554 {
Michielber 0:f615d151a72c 555 m_dataChunked = true;
Michielber 0:f615d151a72c 556 m_reqHeaders.erase("Content-Length");
Michielber 0:f615d151a72c 557 m_reqHeaders["Transfer-Encoding"] = "chunked";
Michielber 0:f615d151a72c 558 }
Michielber 0:f615d151a72c 559 else
Michielber 0:f615d151a72c 560 {
Michielber 0:f615d151a72c 561 m_dataChunked = false;
Michielber 0:f615d151a72c 562 char c_len[16] = "0";
Michielber 0:f615d151a72c 563 int len = m_pDataOut->getDataLen();
Michielber 0:f615d151a72c 564 sprintf(c_len, "%d", len);
Michielber 0:f615d151a72c 565 m_dataPos = 0;
Michielber 0:f615d151a72c 566 m_dataLen = len;
Michielber 0:f615d151a72c 567 m_reqHeaders.erase("Transfer-Encoding");
Michielber 0:f615d151a72c 568 m_reqHeaders["Content-Length"] = string(c_len);
Michielber 0:f615d151a72c 569 }
Michielber 0:f615d151a72c 570 string type = m_pDataOut->getDataType();
Michielber 0:f615d151a72c 571 if(!type.empty())
Michielber 0:f615d151a72c 572 {
Michielber 0:f615d151a72c 573 m_reqHeaders["Content-Type"] = type;
Michielber 0:f615d151a72c 574 }
Michielber 0:f615d151a72c 575 else
Michielber 0:f615d151a72c 576 {
Michielber 0:f615d151a72c 577 m_reqHeaders.erase("Content-Type");
Michielber 0:f615d151a72c 578 }
Michielber 0:f615d151a72c 579 }
Michielber 0:f615d151a72c 580 if( !writeHeaders() )
Michielber 0:f615d151a72c 581 {
Michielber 0:f615d151a72c 582 return; //Connection has been closed
Michielber 0:f615d151a72c 583 }
Michielber 0:f615d151a72c 584 break; //Wait for writeable event before sending payload
Michielber 0:f615d151a72c 585 case HTTP_WRITE_DATA:
Michielber 0:f615d151a72c 586 writeData();
Michielber 0:f615d151a72c 587 break;
Michielber 0:f615d151a72c 588 }
Michielber 0:f615d151a72c 589 //Otherwise request has been sent, now wait for resp
Michielber 0:f615d151a72c 590 break;
Michielber 0:f615d151a72c 591 case TCPSOCKET_CONTIMEOUT:
Michielber 0:f615d151a72c 592 case TCPSOCKET_CONRST:
Michielber 0:f615d151a72c 593 case TCPSOCKET_CONABRT:
Michielber 0:f615d151a72c 594 case TCPSOCKET_ERROR:
Michielber 0:f615d151a72c 595 DBG("Connection error.\n");
Michielber 0:f615d151a72c 596 onResult(HTTP_CONN);
Michielber 0:f615d151a72c 597 case TCPSOCKET_DISCONNECTED:
Michielber 0:f615d151a72c 598 //There might still be some data available for reading
Michielber 0:f615d151a72c 599 //So if we are in a reading state, do not close the socket yet
Michielber 0:f615d151a72c 600 if( (m_state != HTTP_READ_DATA_INCOMPLETE) && (m_state != HTTP_DONE) && (m_state != HTTP_CLOSED) )
Michielber 0:f615d151a72c 601 {
Michielber 0:f615d151a72c 602 onResult(HTTP_CONN);
Michielber 0:f615d151a72c 603 }
Michielber 0:f615d151a72c 604 DBG("Connection closed by remote host.\n");
Michielber 0:f615d151a72c 605 break;
Michielber 0:f615d151a72c 606 }
Michielber 0:f615d151a72c 607 }
Michielber 0:f615d151a72c 608
Michielber 0:f615d151a72c 609 void HTTPClient::onDNSReply(DNSReply r)
Michielber 0:f615d151a72c 610 {
Michielber 0:f615d151a72c 611 if(m_closed)
Michielber 0:f615d151a72c 612 {
Michielber 0:f615d151a72c 613 DBG("WARN: Discarded\n");
Michielber 0:f615d151a72c 614 return;
Michielber 0:f615d151a72c 615 }
Michielber 0:f615d151a72c 616
Michielber 0:f615d151a72c 617 if( r != DNS_FOUND )
Michielber 0:f615d151a72c 618 {
Michielber 0:f615d151a72c 619 DBG("Could not resolve hostname.\n");
Michielber 0:f615d151a72c 620 onResult(HTTP_DNS);
Michielber 0:f615d151a72c 621 return;
Michielber 0:f615d151a72c 622 }
Michielber 0:f615d151a72c 623
Michielber 0:f615d151a72c 624 DBG("DNS Resolved to %d.%d.%d.%d.\n",m_server.getIp()[0],m_server.getIp()[1],m_server.getIp()[2],m_server.getIp()[3]);
Michielber 0:f615d151a72c 625 //If no error, m_server has been updated by m_pDnsReq so we're set to go !
Michielber 0:f615d151a72c 626 m_pDnsReq->close();
Michielber 0:f615d151a72c 627 delete m_pDnsReq;
Michielber 0:f615d151a72c 628 m_pDnsReq = NULL;
Michielber 0:f615d151a72c 629 connect();
Michielber 0:f615d151a72c 630 }
Michielber 0:f615d151a72c 631
Michielber 0:f615d151a72c 632 void HTTPClient::onResult(HTTPResult r) //Called when exchange completed or on failure
Michielber 0:f615d151a72c 633 {
Michielber 0:f615d151a72c 634 if(m_pCbItem && m_pCbMeth)
Michielber 0:f615d151a72c 635 (m_pCbItem->*m_pCbMeth)(r);
Michielber 0:f615d151a72c 636 else if(m_pCb)
Michielber 0:f615d151a72c 637 m_pCb(r);
Michielber 0:f615d151a72c 638 m_blockingResult = r; //Blocking mode
Michielber 0:f615d151a72c 639 close(); //FIXME:Remove suppl. close() calls
Michielber 0:f615d151a72c 640 }
Michielber 0:f615d151a72c 641
Michielber 0:f615d151a72c 642 void HTTPClient::onTimeout() //Connection has timed out
Michielber 0:f615d151a72c 643 {
Michielber 0:f615d151a72c 644 DBG("Timed out.\n");
Michielber 0:f615d151a72c 645 onResult(HTTP_TIMEOUT);
Michielber 0:f615d151a72c 646 close();
Michielber 0:f615d151a72c 647 }
Michielber 0:f615d151a72c 648
Michielber 0:f615d151a72c 649 //Headers
Michielber 0:f615d151a72c 650
Michielber 0:f615d151a72c 651 //TODO: Factorize w/ HTTPRequestHandler in a single HTTPHeader class
Michielber 0:f615d151a72c 652
Michielber 0:f615d151a72c 653 HTTPResult HTTPClient::blockingProcess() //Called in blocking mode, calls Net::poll() until return code is available
Michielber 0:f615d151a72c 654 {
Michielber 0:f615d151a72c 655 //Disable callbacks
Michielber 0:f615d151a72c 656 m_pCb = NULL;
Michielber 0:f615d151a72c 657 m_pCbItem = NULL;
Michielber 0:f615d151a72c 658 m_pCbMeth = NULL;
Michielber 0:f615d151a72c 659 m_blockingResult = HTTP_PROCESSING;
Michielber 0:f615d151a72c 660 do
Michielber 0:f615d151a72c 661 {
Michielber 0:f615d151a72c 662 Net::poll();
Michielber 0:f615d151a72c 663 } while(m_blockingResult == HTTP_PROCESSING);
Michielber 0:f615d151a72c 664 Net::poll(); //Necessary for cleanup
Michielber 0:f615d151a72c 665 return m_blockingResult;
Michielber 0:f615d151a72c 666 }
Michielber 0:f615d151a72c 667
Michielber 0:f615d151a72c 668 bool HTTPClient::readHeaders()
Michielber 0:f615d151a72c 669 {
Michielber 0:f615d151a72c 670 static char* line = m_buf;
Michielber 0:f615d151a72c 671 static char key[128];
Michielber 0:f615d151a72c 672 static char value[128];
Michielber 0:f615d151a72c 673 if(!m_dataLen) //No incomplete header in buffer, this is the first time we read data
Michielber 0:f615d151a72c 674 {
Michielber 0:f615d151a72c 675 if( readLine(line, 128) > 0 )
Michielber 0:f615d151a72c 676 {
Michielber 0:f615d151a72c 677 //Check RC
Michielber 0:f615d151a72c 678 m_httpResponseCode = 0;
Michielber 0:f615d151a72c 679 if( sscanf(line, "HTTP/%*d.%*d %d %*[^\r\n]", &m_httpResponseCode) != 1 )
Michielber 0:f615d151a72c 680 {
Michielber 0:f615d151a72c 681 //Cannot match string, error
Michielber 0:f615d151a72c 682 DBG("Not a correct HTTP answer : %s\n", line);
Michielber 0:f615d151a72c 683 onResult(HTTP_PRTCL);
Michielber 0:f615d151a72c 684 close();
Michielber 0:f615d151a72c 685 return false;
Michielber 0:f615d151a72c 686 }
Michielber 0:f615d151a72c 687
Michielber 0:f615d151a72c 688 if(m_httpResponseCode != 200)
Michielber 0:f615d151a72c 689 {
Michielber 0:f615d151a72c 690 DBG("Response: error code %d\n", m_httpResponseCode);
Michielber 0:f615d151a72c 691 HTTPResult res = HTTP_ERROR;
Michielber 0:f615d151a72c 692 switch(m_httpResponseCode)
Michielber 0:f615d151a72c 693 {
Michielber 0:f615d151a72c 694 case 404:
Michielber 0:f615d151a72c 695 res = HTTP_NOTFOUND;
Michielber 0:f615d151a72c 696 break;
Michielber 0:f615d151a72c 697 case 403:
Michielber 0:f615d151a72c 698 res = HTTP_REFUSED;
Michielber 0:f615d151a72c 699 break;
Michielber 0:f615d151a72c 700 default:
Michielber 0:f615d151a72c 701 res = HTTP_ERROR;
Michielber 0:f615d151a72c 702 }
Michielber 0:f615d151a72c 703 onResult(res);
Michielber 0:f615d151a72c 704 close();
Michielber 0:f615d151a72c 705 return false;
Michielber 0:f615d151a72c 706 }
Michielber 0:f615d151a72c 707 DBG("Response OK\n");
Michielber 0:f615d151a72c 708 }
Michielber 0:f615d151a72c 709 else
Michielber 0:f615d151a72c 710 {
Michielber 0:f615d151a72c 711 //Empty packet, weird!
Michielber 0:f615d151a72c 712 DBG("Empty packet!\n");
Michielber 0:f615d151a72c 713 onResult(HTTP_PRTCL);
Michielber 0:f615d151a72c 714 close();
Michielber 0:f615d151a72c 715 return false;
Michielber 0:f615d151a72c 716 }
Michielber 0:f615d151a72c 717 }
Michielber 0:f615d151a72c 718 bool incomplete = false;
Michielber 0:f615d151a72c 719 while( true )
Michielber 0:f615d151a72c 720 {
Michielber 0:f615d151a72c 721 int readLen = readLine(line + m_dataLen, 128 - m_dataLen, &incomplete);
Michielber 0:f615d151a72c 722 m_dataLen = 0;
Michielber 0:f615d151a72c 723 if( readLen <= 2 ) //if == 1 or 2, it is an empty line = end of headers
Michielber 0:f615d151a72c 724 {
Michielber 0:f615d151a72c 725 DBG("All headers read.\n");
Michielber 0:f615d151a72c 726 m_state = HTTP_READ_DATA;
Michielber 0:f615d151a72c 727 break;
Michielber 0:f615d151a72c 728 }
Michielber 0:f615d151a72c 729 else if( incomplete == true )
Michielber 0:f615d151a72c 730 {
Michielber 0:f615d151a72c 731 m_dataLen = readLen;//Sets data length available in buffer
Michielber 0:f615d151a72c 732 return false;
Michielber 0:f615d151a72c 733 }
Michielber 0:f615d151a72c 734 //DBG("Header : %s\n", line);
Michielber 0:f615d151a72c 735 int n = sscanf(line, "%[^:] : %[^\r\n]", key, value);
Michielber 0:f615d151a72c 736 if ( n == 2 )
Michielber 0:f615d151a72c 737 {
Michielber 0:f615d151a72c 738 DBG("Read header : %s: %s\n", key, value);
Michielber 0:f615d151a72c 739 m_respHeaders[key] = value;
Michielber 0:f615d151a72c 740 }
Michielber 0:f615d151a72c 741 //TODO: Impl n==1 case (part 2 of previous header)
Michielber 0:f615d151a72c 742 }
Michielber 0:f615d151a72c 743
Michielber 0:f615d151a72c 744 return true;
Michielber 0:f615d151a72c 745 }
Michielber 0:f615d151a72c 746
Michielber 0:f615d151a72c 747 bool HTTPClient::writeHeaders() //Called at the first writeData call
Michielber 0:f615d151a72c 748 {
Michielber 0:f615d151a72c 749 static char* line = m_buf;
Michielber 0:f615d151a72c 750 const char* HTTP_METH_STR[] = {"GET", "POST", "HEAD"};
Michielber 0:f615d151a72c 751
Michielber 0:f615d151a72c 752 //Req
Michielber 0:f615d151a72c 753 sprintf(line, "%s %s HTTP/1.1\r\nHost: %s\r\n", HTTP_METH_STR[m_meth], m_path.c_str(), m_server.getName()); //Write request
Michielber 0:f615d151a72c 754 m_pTCPSocket->send(line, strlen(line));
Michielber 0:f615d151a72c 755 DBG("Request: %s\n", line);
Michielber 0:f615d151a72c 756
Michielber 0:f615d151a72c 757 DBG("Writing headers:\n");
Michielber 0:f615d151a72c 758 map<string,string>::iterator it;
Michielber 0:f615d151a72c 759 for( it = m_reqHeaders.begin(); it != m_reqHeaders.end(); it++ )
Michielber 0:f615d151a72c 760 {
Michielber 0:f615d151a72c 761 sprintf(line, "%s: %s\r\n", (*it).first.c_str(), (*it).second.c_str() );
Michielber 0:f615d151a72c 762 DBG("\r\n%s", line);
Michielber 0:f615d151a72c 763 m_pTCPSocket->send(line, strlen(line));
Michielber 0:f615d151a72c 764 }
Michielber 0:f615d151a72c 765 m_pTCPSocket->send("\r\n",2); //End of head
Michielber 0:f615d151a72c 766 m_state = HTTP_WRITE_DATA;
Michielber 0:f615d151a72c 767 return true;
Michielber 0:f615d151a72c 768 }
Michielber 0:f615d151a72c 769
Michielber 0:f615d151a72c 770 int HTTPClient::readLine(char* str, int maxLen, bool* pIncomplete /* = NULL*/)
Michielber 0:f615d151a72c 771 {
Michielber 0:f615d151a72c 772 int ret;
Michielber 0:f615d151a72c 773 int len = 0;
Michielber 0:f615d151a72c 774 if(pIncomplete)
Michielber 0:f615d151a72c 775 *pIncomplete = false;
Michielber 0:f615d151a72c 776 for(int i = 0; i < maxLen - 1; i++)
Michielber 0:f615d151a72c 777 {
Michielber 0:f615d151a72c 778 ret = m_pTCPSocket->recv(str, 1);
Michielber 0:f615d151a72c 779 if(ret != 1)
Michielber 0:f615d151a72c 780 {
Michielber 0:f615d151a72c 781 if(pIncomplete)
Michielber 0:f615d151a72c 782 *pIncomplete = true;
Michielber 0:f615d151a72c 783 break;
Michielber 0:f615d151a72c 784 }
Michielber 0:f615d151a72c 785 if( (len > 1) && *(str-1)=='\r' && *str=='\n' )
Michielber 0:f615d151a72c 786 {
Michielber 0:f615d151a72c 787 break;
Michielber 0:f615d151a72c 788 }
Michielber 0:f615d151a72c 789 else if( *str=='\n' )
Michielber 0:f615d151a72c 790 {
Michielber 0:f615d151a72c 791 break;
Michielber 0:f615d151a72c 792 }
Michielber 0:f615d151a72c 793 str++;
Michielber 0:f615d151a72c 794 len++;
Michielber 0:f615d151a72c 795 }
Michielber 0:f615d151a72c 796 *str = 0;
Michielber 0:f615d151a72c 797 return len;
Michielber 0:f615d151a72c 798 }