Kazuhiro Ouchi / HTTPClient

Change path size.

Fork of HTTPClient by Donatien Garnier

Change path size 64byte to 128byte.

HTTPClient.cpp@17:c1bc4b97bddc, 2013-01-05 (annotated)

Committer:
kanpapa
Date:
Sat Jan 05 14:25:48 2013 +0000
Revision:
17:c1bc4b97bddc
Parent:
16:1f743885e7de 
?????????

Who changed what in which revision?

UserRevisionLine numberNew contents of line
donatien 0:2ccb9960a044 1 /* HTTPClient.cpp */
donatien 10:e1351de84c16 2 /* Copyright (C) 2012 mbed.org, MIT License
donatien 10:e1351de84c16 3 *
donatien 10:e1351de84c16 4 * Permission is hereby granted, free of charge, to any person obtaining a copy of this software
donatien 10:e1351de84c16 5 * and associated documentation files (the "Software"), to deal in the Software without restriction,
donatien 10:e1351de84c16 6 * including without limitation the rights to use, copy, modify, merge, publish, distribute,
donatien 10:e1351de84c16 7 * sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is
donatien 10:e1351de84c16 8 * furnished to do so, subject to the following conditions:
donatien 10:e1351de84c16 9 *
donatien 10:e1351de84c16 10 * The above copyright notice and this permission notice shall be included in all copies or
donatien 10:e1351de84c16 11 * substantial portions of the Software.
donatien 10:e1351de84c16 12 *
donatien 10:e1351de84c16 13 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING
donatien 10:e1351de84c16 14 * BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
donatien 10:e1351de84c16 15 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,
donatien 10:e1351de84c16 16 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
donatien 10:e1351de84c16 17 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
donatien 10:e1351de84c16 18 */
donatien 0:2ccb9960a044 19
donatien 7:4e39864f7b15 20 //Debug is disabled by default
donatien 16:1f743885e7de 21 #if 0
donatien 12:89d09a6db00a 22 //Enable debug
donatien 11:390362de8c3f 23 #include <cstdio>
donatien 16:1f743885e7de 24 #define DBG(x, ...) std::printf("[HTTPClient : DBG]"x"\r\n", ##__VA_ARGS__);
donatien 11:390362de8c3f 25 #define WARN(x, ...) std::printf("[HTTPClient : WARN]"x"\r\n", ##__VA_ARGS__);
donatien 11:390362de8c3f 26 #define ERR(x, ...) std::printf("[HTTPClient : ERR]"x"\r\n", ##__VA_ARGS__);
donatien 12:89d09a6db00a 27
donatien 12:89d09a6db00a 28 #else
donatien 12:89d09a6db00a 29 //Disable debug
donatien 12:89d09a6db00a 30 #define DBG(x, ...)
donatien 12:89d09a6db00a 31 #define WARN(x, ...)
donatien 12:89d09a6db00a 32 #define ERR(x, ...)
donatien 12:89d09a6db00a 33
donatien 7:4e39864f7b15 34 #endif
donatien 0:2ccb9960a044 35
donatien 0:2ccb9960a044 36 #define HTTP_PORT 80
donatien 0:2ccb9960a044 37
donatien 11:390362de8c3f 38 #define OK 0
donatien 11:390362de8c3f 39
donatien 11:390362de8c3f 40 #define MIN(x,y) (((x)<(y))?(x):(y))
donatien 11:390362de8c3f 41 #define MAX(x,y) (((x)>(y))?(x):(y))
donatien 11:390362de8c3f 42
donatien 0:2ccb9960a044 43 #define CHUNK_SIZE 256
donatien 0:2ccb9960a044 44
donatien 0:2ccb9960a044 45 #include <cstring>
donatien 0:2ccb9960a044 46
donatien 11:390362de8c3f 47 #include "HTTPClient.h"
donatien 11:390362de8c3f 48
donatien 0:2ccb9960a044 49 HTTPClient::HTTPClient() :
donatien 7:4e39864f7b15 50 m_sock(), m_basicAuthUser(NULL), m_basicAuthPassword(NULL), m_httpResponseCode(0)
donatien 0:2ccb9960a044 51 {
donatien 0:2ccb9960a044 52
donatien 0:2ccb9960a044 53 }
donatien 0:2ccb9960a044 54
donatien 0:2ccb9960a044 55 HTTPClient::~HTTPClient()
donatien 0:2ccb9960a044 56 {
donatien 0:2ccb9960a044 57
donatien 0:2ccb9960a044 58 }
donatien 0:2ccb9960a044 59
donatien 0:2ccb9960a044 60 #if 0
donatien 0:2ccb9960a044 61 void HTTPClient::basicAuth(const char* user, const char* password) //Basic Authentification
donatien 0:2ccb9960a044 62 {
donatien 0:2ccb9960a044 63 m_basicAuthUser = user;
donatien 0:2ccb9960a044 64 m_basicAuthPassword = password;
donatien 0:2ccb9960a044 65 }
donatien 0:2ccb9960a044 66 #endif
donatien 0:2ccb9960a044 67
donatien 12:89d09a6db00a 68 HTTPResult HTTPClient::get(const char* url, IHTTPDataIn* pDataIn, int timeout /*= HTTP_CLIENT_DEFAULT_TIMEOUT*/) //Blocking
donatien 0:2ccb9960a044 69 {
donatien 0:2ccb9960a044 70 return connect(url, HTTP_GET, NULL, pDataIn, timeout);
donatien 0:2ccb9960a044 71 }
donatien 0:2ccb9960a044 72
donatien 12:89d09a6db00a 73 HTTPResult HTTPClient::get(const char* url, char* result, size_t maxResultLen, int timeout /*= HTTP_CLIENT_DEFAULT_TIMEOUT*/) //Blocking
donatien 0:2ccb9960a044 74 {
donatien 0:2ccb9960a044 75 HTTPText str(result, maxResultLen);
donatien 0:2ccb9960a044 76 return get(url, &str, timeout);
donatien 0:2ccb9960a044 77 }
donatien 0:2ccb9960a044 78
donatien 12:89d09a6db00a 79 HTTPResult HTTPClient::post(const char* url, const IHTTPDataOut& dataOut, IHTTPDataIn* pDataIn, int timeout /*= HTTP_CLIENT_DEFAULT_TIMEOUT*/) //Blocking
donatien 0:2ccb9960a044 80 {
donatien 0:2ccb9960a044 81 return connect(url, HTTP_POST, (IHTTPDataOut*)&dataOut, pDataIn, timeout);
donatien 0:2ccb9960a044 82 }
donatien 0:2ccb9960a044 83
donatien 16:1f743885e7de 84 HTTPResult HTTPClient::put(const char* url, const IHTTPDataOut& dataOut, IHTTPDataIn* pDataIn, int timeout /*= HTTP_CLIENT_DEFAULT_TIMEOUT*/) //Blocking
donatien 16:1f743885e7de 85 {
donatien 16:1f743885e7de 86 return connect(url, HTTP_PUT, (IHTTPDataOut*)&dataOut, pDataIn, timeout);
donatien 16:1f743885e7de 87 }
donatien 16:1f743885e7de 88
donatien 16:1f743885e7de 89 HTTPResult HTTPClient::del(const char* url, IHTTPDataIn* pDataIn, int timeout /*= HTTP_CLIENT_DEFAULT_TIMEOUT*/) //Blocking
donatien 16:1f743885e7de 90 {
donatien 16:1f743885e7de 91 return connect(url, HTTP_DELETE, NULL, pDataIn, timeout);
donatien 16:1f743885e7de 92 }
donatien 16:1f743885e7de 93
donatien 16:1f743885e7de 94
donatien 0:2ccb9960a044 95 int HTTPClient::getHTTPResponseCode()
donatien 0:2ccb9960a044 96 {
donatien 0:2ccb9960a044 97 return m_httpResponseCode;
donatien 0:2ccb9960a044 98 }
donatien 0:2ccb9960a044 99
donatien 5:791fc3dcb6c4 100 #define CHECK_CONN_ERR(ret) \
donatien 5:791fc3dcb6c4 101 do{ \
donatien 7:4e39864f7b15 102 if(ret) { \
donatien 7:4e39864f7b15 103 m_sock.close(); \
donatien 5:791fc3dcb6c4 104 ERR("Connection error (%d)", ret); \
donatien 11:390362de8c3f 105 return HTTP_CONN; \
donatien 5:791fc3dcb6c4 106 } \
donatien 5:791fc3dcb6c4 107 } while(0)
donatien 5:791fc3dcb6c4 108
donatien 5:791fc3dcb6c4 109 #define PRTCL_ERR() \
donatien 5:791fc3dcb6c4 110 do{ \
donatien 7:4e39864f7b15 111 m_sock.close(); \
donatien 5:791fc3dcb6c4 112 ERR("Protocol error"); \
donatien 11:390362de8c3f 113 return HTTP_PRTCL; \
donatien 5:791fc3dcb6c4 114 } while(0)
donatien 0:2ccb9960a044 115
donatien 12:89d09a6db00a 116 HTTPResult HTTPClient::connect(const char* url, HTTP_METH method, IHTTPDataOut* pDataOut, IHTTPDataIn* pDataIn, int timeout) //Execute request
donatien 12:89d09a6db00a 117 {
donatien 0:2ccb9960a044 118 m_httpResponseCode = 0; //Invalidate code
donatien 0:2ccb9960a044 119 m_timeout = timeout;
donatien 16:1f743885e7de 120
donatien 16:1f743885e7de 121 pDataIn->writeReset();
donatien 16:1f743885e7de 122 if( pDataOut )
donatien 16:1f743885e7de 123 {
donatien 16:1f743885e7de 124 pDataOut->readReset();
donatien 16:1f743885e7de 125 }
donatien 0:2ccb9960a044 126
donatien 0:2ccb9960a044 127 char scheme[8];
donatien 0:2ccb9960a044 128 uint16_t port;
donatien 0:2ccb9960a044 129 char host[32];
kanpapa 17:c1bc4b97bddc 130 //char path[64];
kanpapa 17:c1bc4b97bddc 131 char path[128];
donatien 0:2ccb9960a044 132 //First we need to parse the url (http[s]://host[:port][/[path]]) -- HTTPS not supported (yet?)
donatien 11:390362de8c3f 133 HTTPResult res = parseURL(url, scheme, sizeof(scheme), host, sizeof(host), &port, path, sizeof(path));
donatien 11:390362de8c3f 134 if(res != HTTP_OK)
donatien 0:2ccb9960a044 135 {
donatien 11:390362de8c3f 136 ERR("parseURL returned %d", res);
donatien 11:390362de8c3f 137 return res;
donatien 0:2ccb9960a044 138 }
donatien 0:2ccb9960a044 139
donatien 0:2ccb9960a044 140 if(port == 0) //TODO do handle HTTPS->443
donatien 0:2ccb9960a044 141 {
donatien 0:2ccb9960a044 142 port = 80;
donatien 0:2ccb9960a044 143 }
donatien 0:2ccb9960a044 144
donatien 0:2ccb9960a044 145 DBG("Scheme: %s", scheme);
donatien 0:2ccb9960a044 146 DBG("Host: %s", host);
donatien 0:2ccb9960a044 147 DBG("Port: %d", port);
donatien 0:2ccb9960a044 148 DBG("Path: %s", path);
donatien 0:2ccb9960a044 149
donatien 7:4e39864f7b15 150 //Connect
donatien 7:4e39864f7b15 151 DBG("Connecting socket to server");
donatien 11:390362de8c3f 152 int ret = m_sock.connect(host, port);
donatien 0:2ccb9960a044 153 if (ret < 0)
donatien 0:2ccb9960a044 154 {
donatien 7:4e39864f7b15 155 m_sock.close();
donatien 0:2ccb9960a044 156 ERR("Could not connect");
donatien 11:390362de8c3f 157 return HTTP_CONN;
donatien 0:2ccb9960a044 158 }
donatien 0:2ccb9960a044 159
donatien 0:2ccb9960a044 160 //Send request
donatien 0:2ccb9960a044 161 DBG("Sending request");
donatien 9:ff30cc189191 162 char buf[CHUNK_SIZE];
donatien 16:1f743885e7de 163 const char* meth = (method==HTTP_GET)?"GET":(method==HTTP_POST)?"POST":(method==HTTP_PUT)?"PUT":(method==HTTP_DELETE)?"DELETE":"";
donatien 9:ff30cc189191 164 snprintf(buf, sizeof(buf), "%s %s HTTP/1.1\r\nHost: %s\r\n", meth, path, host); //Write request
donatien 9:ff30cc189191 165 ret = send(buf);
donatien 0:2ccb9960a044 166 if(ret)
donatien 0:2ccb9960a044 167 {
donatien 7:4e39864f7b15 168 m_sock.close();
donatien 0:2ccb9960a044 169 ERR("Could not write request");
donatien 11:390362de8c3f 170 return HTTP_CONN;
donatien 0:2ccb9960a044 171 }
donatien 0:2ccb9960a044 172
donatien 0:2ccb9960a044 173 //Send all headers
donatien 0:2ccb9960a044 174
donatien 0:2ccb9960a044 175 //Send default headers
donatien 0:2ccb9960a044 176 DBG("Sending headers");
donatien 16:1f743885e7de 177 if( pDataOut != NULL )
donatien 0:2ccb9960a044 178 {
donatien 0:2ccb9960a044 179 if( pDataOut->getIsChunked() )
donatien 0:2ccb9960a044 180 {
donatien 0:2ccb9960a044 181 ret = send("Transfer-Encoding: chunked\r\n");
donatien 5:791fc3dcb6c4 182 CHECK_CONN_ERR(ret);
donatien 0:2ccb9960a044 183 }
donatien 0:2ccb9960a044 184 else
donatien 0:2ccb9960a044 185 {
donatien 9:ff30cc189191 186 snprintf(buf, sizeof(buf), "Content-Length: %d\r\n", pDataOut->getDataLen());
donatien 9:ff30cc189191 187 ret = send(buf);
donatien 5:791fc3dcb6c4 188 CHECK_CONN_ERR(ret);
donatien 0:2ccb9960a044 189 }
donatien 0:2ccb9960a044 190 char type[48];
donatien 11:390362de8c3f 191 if( pDataOut->getDataType(type, 48) == HTTP_OK )
donatien 0:2ccb9960a044 192 {
donatien 9:ff30cc189191 193 snprintf(buf, sizeof(buf), "Content-Type: %s\r\n", type);
donatien 9:ff30cc189191 194 ret = send(buf);
donatien 5:791fc3dcb6c4 195 CHECK_CONN_ERR(ret);
donatien 0:2ccb9960a044 196 }
donatien 0:2ccb9960a044 197 }
donatien 9:ff30cc189191 198
donatien 0:2ccb9960a044 199 //Close headers
donatien 0:2ccb9960a044 200 DBG("Headers sent");
donatien 0:2ccb9960a044 201 ret = send("\r\n");
donatien 5:791fc3dcb6c4 202 CHECK_CONN_ERR(ret);
donatien 0:2ccb9960a044 203
donatien 4:c071b05ac026 204 size_t trfLen;
donatien 9:ff30cc189191 205
donatien 16:1f743885e7de 206 //Send data (if available)
donatien 16:1f743885e7de 207 if( pDataOut != NULL )
donatien 0:2ccb9960a044 208 {
donatien 0:2ccb9960a044 209 DBG("Sending data");
donatien 0:2ccb9960a044 210 while(true)
donatien 0:2ccb9960a044 211 {
donatien 0:2ccb9960a044 212 size_t writtenLen = 0;
donatien 0:2ccb9960a044 213 pDataOut->read(buf, CHUNK_SIZE, &trfLen);
donatien 0:2ccb9960a044 214 if( pDataOut->getIsChunked() )
donatien 0:2ccb9960a044 215 {
donatien 0:2ccb9960a044 216 //Write chunk header
donatien 9:ff30cc189191 217 char chunkHeader[16];
donatien 9:ff30cc189191 218 snprintf(chunkHeader, sizeof(chunkHeader), "%X\r\n", trfLen); //In hex encoding
donatien 9:ff30cc189191 219 ret = send(chunkHeader);
donatien 5:791fc3dcb6c4 220 CHECK_CONN_ERR(ret);
donatien 0:2ccb9960a044 221 }
donatien 0:2ccb9960a044 222 else if( trfLen == 0 )
donatien 0:2ccb9960a044 223 {
donatien 0:2ccb9960a044 224 break;
donatien 0:2ccb9960a044 225 }
donatien 0:2ccb9960a044 226 if( trfLen != 0 )
donatien 0:2ccb9960a044 227 {
donatien 0:2ccb9960a044 228 ret = send(buf, trfLen);
donatien 5:791fc3dcb6c4 229 CHECK_CONN_ERR(ret);
donatien 0:2ccb9960a044 230 }
donatien 0:2ccb9960a044 231
donatien 0:2ccb9960a044 232 if( pDataOut->getIsChunked() )
donatien 0:2ccb9960a044 233 {
donatien 0:2ccb9960a044 234 ret = send("\r\n"); //Chunk-terminating CRLF
donatien 5:791fc3dcb6c4 235 CHECK_CONN_ERR(ret);
donatien 0:2ccb9960a044 236 }
donatien 0:2ccb9960a044 237 else
donatien 0:2ccb9960a044 238 {
donatien 0:2ccb9960a044 239 writtenLen += trfLen;
donatien 0:2ccb9960a044 240 if( writtenLen >= pDataOut->getDataLen() )
donatien 0:2ccb9960a044 241 {
donatien 0:2ccb9960a044 242 break;
donatien 0:2ccb9960a044 243 }
donatien 0:2ccb9960a044 244 }
donatien 0:2ccb9960a044 245
donatien 0:2ccb9960a044 246 if( trfLen == 0 )
donatien 0:2ccb9960a044 247 {
donatien 0:2ccb9960a044 248 break;
donatien 0:2ccb9960a044 249 }
donatien 0:2ccb9960a044 250 }
donatien 0:2ccb9960a044 251
donatien 0:2ccb9960a044 252 }
donatien 9:ff30cc189191 253
donatien 0:2ccb9960a044 254 //Receive response
donatien 0:2ccb9960a044 255 DBG("Receiving response");
donatien 4:c071b05ac026 256 ret = recv(buf, CHUNK_SIZE - 1, CHUNK_SIZE - 1, &trfLen); //Read n bytes
donatien 5:791fc3dcb6c4 257 CHECK_CONN_ERR(ret);
donatien 0:2ccb9960a044 258
donatien 0:2ccb9960a044 259 buf[trfLen] = '\0';
donatien 0:2ccb9960a044 260
donatien 0:2ccb9960a044 261 char* crlfPtr = strstr(buf, "\r\n");
donatien 0:2ccb9960a044 262 if(crlfPtr == NULL)
donatien 0:2ccb9960a044 263 {
donatien 5:791fc3dcb6c4 264 PRTCL_ERR();
donatien 0:2ccb9960a044 265 }
donatien 0:2ccb9960a044 266
donatien 4:c071b05ac026 267 int crlfPos = crlfPtr - buf;
donatien 0:2ccb9960a044 268 buf[crlfPos] = '\0';
donatien 0:2ccb9960a044 269
donatien 0:2ccb9960a044 270 //Parse HTTP response
donatien 0:2ccb9960a044 271 if( sscanf(buf, "HTTP/%*d.%*d %d %*[^\r\n]", &m_httpResponseCode) != 1 )
donatien 0:2ccb9960a044 272 {
donatien 0:2ccb9960a044 273 //Cannot match string, error
donatien 0:2ccb9960a044 274 ERR("Not a correct HTTP answer : %s\n", buf);
donatien 5:791fc3dcb6c4 275 PRTCL_ERR();
donatien 0:2ccb9960a044 276 }
donatien 0:2ccb9960a044 277
donatien 16:1f743885e7de 278 if( (m_httpResponseCode < 200) || (m_httpResponseCode >= 300) )
donatien 0:2ccb9960a044 279 {
donatien 16:1f743885e7de 280 //Did not return a 2xx code; TODO fetch headers/(&data?) anyway and implement a mean of writing/reading headers
donatien 0:2ccb9960a044 281 WARN("Response code %d", m_httpResponseCode);
donatien 5:791fc3dcb6c4 282 PRTCL_ERR();
donatien 0:2ccb9960a044 283 }
donatien 0:2ccb9960a044 284
donatien 0:2ccb9960a044 285 DBG("Reading headers");
donatien 0:2ccb9960a044 286
donatien 4:c071b05ac026 287 memmove(buf, &buf[crlfPos+2], trfLen - (crlfPos + 2) + 1); //Be sure to move NULL-terminating char as well
donatien 0:2ccb9960a044 288 trfLen -= (crlfPos + 2);
donatien 0:2ccb9960a044 289
donatien 4:c071b05ac026 290 size_t recvContentLength = 0;
donatien 4:c071b05ac026 291 bool recvChunked = false;
donatien 0:2ccb9960a044 292 //Now get headers
donatien 0:2ccb9960a044 293 while( true )
donatien 0:2ccb9960a044 294 {
donatien 0:2ccb9960a044 295 crlfPtr = strstr(buf, "\r\n");
donatien 0:2ccb9960a044 296 if(crlfPtr == NULL)
donatien 0:2ccb9960a044 297 {
donatien 4:c071b05ac026 298 if( trfLen < CHUNK_SIZE - 1 )
donatien 0:2ccb9960a044 299 {
donatien 0:2ccb9960a044 300 size_t newTrfLen;
donatien 0:2ccb9960a044 301 ret = recv(buf + trfLen, 1, CHUNK_SIZE - trfLen - 1, &newTrfLen);
donatien 0:2ccb9960a044 302 trfLen += newTrfLen;
donatien 0:2ccb9960a044 303 buf[trfLen] = '\0';
donatien 4:c071b05ac026 304 DBG("Read %d chars; In buf: [%s]", newTrfLen, buf);
donatien 5:791fc3dcb6c4 305 CHECK_CONN_ERR(ret);
donatien 0:2ccb9960a044 306 continue;
donatien 0:2ccb9960a044 307 }
donatien 0:2ccb9960a044 308 else
donatien 0:2ccb9960a044 309 {
donatien 5:791fc3dcb6c4 310 PRTCL_ERR();
donatien 0:2ccb9960a044 311 }
donatien 0:2ccb9960a044 312 }
donatien 0:2ccb9960a044 313
donatien 0:2ccb9960a044 314 crlfPos = crlfPtr - buf;
donatien 0:2ccb9960a044 315
donatien 0:2ccb9960a044 316 if(crlfPos == 0) //End of headers
donatien 0:2ccb9960a044 317 {
donatien 0:2ccb9960a044 318 DBG("Headers read");
donatien 4:c071b05ac026 319 memmove(buf, &buf[2], trfLen - 2 + 1); //Be sure to move NULL-terminating char as well
donatien 0:2ccb9960a044 320 trfLen -= 2;
donatien 0:2ccb9960a044 321 break;
donatien 0:2ccb9960a044 322 }
donatien 0:2ccb9960a044 323
donatien 0:2ccb9960a044 324 buf[crlfPos] = '\0';
donatien 0:2ccb9960a044 325
donatien 4:c071b05ac026 326 char key[32];
donatien 4:c071b05ac026 327 char value[32];
donatien 0:2ccb9960a044 328
donatien 4:c071b05ac026 329 key[31] = '\0';
donatien 4:c071b05ac026 330 value[31] = '\0';
donatien 4:c071b05ac026 331
donatien 4:c071b05ac026 332 int n = sscanf(buf, "%31[^:]: %31[^\r\n]", key, value);
donatien 0:2ccb9960a044 333 if ( n == 2 )
donatien 0:2ccb9960a044 334 {
donatien 0:2ccb9960a044 335 DBG("Read header : %s: %s\n", key, value);
donatien 0:2ccb9960a044 336 if( !strcmp(key, "Content-Length") )
donatien 0:2ccb9960a044 337 {
donatien 0:2ccb9960a044 338 sscanf(value, "%d", &recvContentLength);
donatien 0:2ccb9960a044 339 pDataIn->setDataLen(recvContentLength);
donatien 0:2ccb9960a044 340 }
donatien 0:2ccb9960a044 341 else if( !strcmp(key, "Transfer-Encoding") )
donatien 0:2ccb9960a044 342 {
donatien 0:2ccb9960a044 343 if( !strcmp(value, "Chunked") || !strcmp(value, "chunked") )
donatien 0:2ccb9960a044 344 {
donatien 0:2ccb9960a044 345 recvChunked = true;
donatien 0:2ccb9960a044 346 pDataIn->setIsChunked(true);
donatien 0:2ccb9960a044 347 }
donatien 0:2ccb9960a044 348 }
donatien 0:2ccb9960a044 349 else if( !strcmp(key, "Content-Type") )
donatien 0:2ccb9960a044 350 {
donatien 0:2ccb9960a044 351 pDataIn->setDataType(value);
donatien 0:2ccb9960a044 352 }
donatien 0:2ccb9960a044 353
donatien 4:c071b05ac026 354 memmove(buf, &buf[crlfPos+2], trfLen - (crlfPos + 2) + 1); //Be sure to move NULL-terminating char as well
donatien 0:2ccb9960a044 355 trfLen -= (crlfPos + 2);
donatien 0:2ccb9960a044 356
donatien 0:2ccb9960a044 357 }
donatien 0:2ccb9960a044 358 else
donatien 0:2ccb9960a044 359 {
donatien 0:2ccb9960a044 360 ERR("Could not parse header");
donatien 5:791fc3dcb6c4 361 PRTCL_ERR();
donatien 0:2ccb9960a044 362 }
donatien 0:2ccb9960a044 363
donatien 0:2ccb9960a044 364 }
donatien 0:2ccb9960a044 365
donatien 0:2ccb9960a044 366 //Receive data
donatien 0:2ccb9960a044 367 DBG("Receiving data");
donatien 0:2ccb9960a044 368 while(true)
donatien 0:2ccb9960a044 369 {
donatien 0:2ccb9960a044 370 size_t readLen = 0;
donatien 0:2ccb9960a044 371
donatien 0:2ccb9960a044 372 if( recvChunked )
donatien 0:2ccb9960a044 373 {
donatien 0:2ccb9960a044 374 //Read chunk header
donatien 14:2744e0c0e527 375 bool foundCrlf;
donatien 14:2744e0c0e527 376 do
donatien 0:2ccb9960a044 377 {
donatien 14:2744e0c0e527 378 foundCrlf = false;
donatien 14:2744e0c0e527 379 crlfPos=0;
donatien 14:2744e0c0e527 380 buf[trfLen]=0;
donatien 14:2744e0c0e527 381 if(trfLen >= 2)
donatien 0:2ccb9960a044 382 {
donatien 14:2744e0c0e527 383 for(; crlfPos < trfLen - 2; crlfPos++)
donatien 14:2744e0c0e527 384 {
donatien 14:2744e0c0e527 385 if( buf[crlfPos] == '\r' && buf[crlfPos + 1] == '\n' )
donatien 14:2744e0c0e527 386 {
donatien 14:2744e0c0e527 387 foundCrlf = true;
donatien 14:2744e0c0e527 388 break;
donatien 14:2744e0c0e527 389 }
donatien 14:2744e0c0e527 390 }
donatien 0:2ccb9960a044 391 }
donatien 14:2744e0c0e527 392 if(!foundCrlf) //Try to read more
donatien 0:2ccb9960a044 393 {
donatien 14:2744e0c0e527 394 if( trfLen < CHUNK_SIZE )
donatien 14:2744e0c0e527 395 {
donatien 14:2744e0c0e527 396 size_t newTrfLen;
donatien 14:2744e0c0e527 397 ret = recv(buf + trfLen, 0, CHUNK_SIZE - trfLen - 1, &newTrfLen);
donatien 14:2744e0c0e527 398 trfLen += newTrfLen;
donatien 14:2744e0c0e527 399 CHECK_CONN_ERR(ret);
donatien 14:2744e0c0e527 400 continue;
donatien 14:2744e0c0e527 401 }
donatien 14:2744e0c0e527 402 else
donatien 14:2744e0c0e527 403 {
donatien 14:2744e0c0e527 404 PRTCL_ERR();
donatien 14:2744e0c0e527 405 }
donatien 0:2ccb9960a044 406 }
donatien 14:2744e0c0e527 407 } while(!foundCrlf);
donatien 0:2ccb9960a044 408 buf[crlfPos] = '\0';
donatien 0:2ccb9960a044 409 int n = sscanf(buf, "%x", &readLen);
donatien 0:2ccb9960a044 410 if(n!=1)
donatien 0:2ccb9960a044 411 {
donatien 15:5ad07f90e895 412 ERR("Could not read chunk length");
donatien 5:791fc3dcb6c4 413 PRTCL_ERR();
donatien 0:2ccb9960a044 414 }
donatien 0:2ccb9960a044 415
donatien 4:c071b05ac026 416 memmove(buf, &buf[crlfPos+2], trfLen - (crlfPos + 2)); //Not need to move NULL-terminating char any more
donatien 0:2ccb9960a044 417 trfLen -= (crlfPos + 2);
donatien 0:2ccb9960a044 418
donatien 0:2ccb9960a044 419 if( readLen == 0 )
donatien 0:2ccb9960a044 420 {
donatien 0:2ccb9960a044 421 //Last chunk
donatien 0:2ccb9960a044 422 break;
donatien 0:2ccb9960a044 423 }
donatien 0:2ccb9960a044 424 }
donatien 0:2ccb9960a044 425 else
donatien 0:2ccb9960a044 426 {
donatien 0:2ccb9960a044 427 readLen = recvContentLength;
donatien 0:2ccb9960a044 428 }
donatien 0:2ccb9960a044 429
donatien 0:2ccb9960a044 430 DBG("Retrieving %d bytes", readLen);
donatien 0:2ccb9960a044 431
donatien 0:2ccb9960a044 432 do
donatien 0:2ccb9960a044 433 {
donatien 0:2ccb9960a044 434 pDataIn->write(buf, MIN(trfLen, readLen));
donatien 0:2ccb9960a044 435 if( trfLen > readLen )
donatien 0:2ccb9960a044 436 {
donatien 0:2ccb9960a044 437 memmove(buf, &buf[readLen], trfLen - readLen);
donatien 0:2ccb9960a044 438 trfLen -= readLen;
donatien 0:2ccb9960a044 439 readLen = 0;
donatien 0:2ccb9960a044 440 }
donatien 0:2ccb9960a044 441 else
donatien 0:2ccb9960a044 442 {
donatien 0:2ccb9960a044 443 readLen -= trfLen;
donatien 0:2ccb9960a044 444 }
donatien 0:2ccb9960a044 445
donatien 0:2ccb9960a044 446 if(readLen)
donatien 0:2ccb9960a044 447 {
donatien 0:2ccb9960a044 448 ret = recv(buf, 1, CHUNK_SIZE - trfLen - 1, &trfLen);
donatien 5:791fc3dcb6c4 449 CHECK_CONN_ERR(ret);
donatien 0:2ccb9960a044 450 }
donatien 0:2ccb9960a044 451 } while(readLen);
donatien 0:2ccb9960a044 452
donatien 0:2ccb9960a044 453 if( recvChunked )
donatien 0:2ccb9960a044 454 {
donatien 0:2ccb9960a044 455 if(trfLen < 2)
donatien 0:2ccb9960a044 456 {
donatien 0:2ccb9960a044 457 size_t newTrfLen;
donatien 0:2ccb9960a044 458 //Read missing chars to find end of chunk
donatien 14:2744e0c0e527 459 ret = recv(buf + trfLen, 2 - trfLen, CHUNK_SIZE - trfLen - 1, &newTrfLen);
donatien 5:791fc3dcb6c4 460 CHECK_CONN_ERR(ret);
donatien 0:2ccb9960a044 461 trfLen += newTrfLen;
donatien 0:2ccb9960a044 462 }
donatien 0:2ccb9960a044 463 if( (buf[0] != '\r') || (buf[1] != '\n') )
donatien 0:2ccb9960a044 464 {
donatien 0:2ccb9960a044 465 ERR("Format error");
donatien 5:791fc3dcb6c4 466 PRTCL_ERR();
donatien 0:2ccb9960a044 467 }
donatien 0:2ccb9960a044 468 memmove(buf, &buf[2], trfLen - 2);
donatien 0:2ccb9960a044 469 trfLen -= 2;
donatien 0:2ccb9960a044 470 }
donatien 0:2ccb9960a044 471 else
donatien 0:2ccb9960a044 472 {
donatien 0:2ccb9960a044 473 break;
donatien 0:2ccb9960a044 474 }
donatien 0:2ccb9960a044 475
donatien 0:2ccb9960a044 476 }
donatien 0:2ccb9960a044 477
donatien 7:4e39864f7b15 478 m_sock.close();
donatien 0:2ccb9960a044 479 DBG("Completed HTTP transaction");
donatien 0:2ccb9960a044 480
donatien 11:390362de8c3f 481 return HTTP_OK;
donatien 0:2ccb9960a044 482 }
donatien 0:2ccb9960a044 483
donatien 11:390362de8c3f 484 HTTPResult HTTPClient::recv(char* buf, size_t minLen, size_t maxLen, size_t* pReadLen) //0 on success, err code on failure
donatien 0:2ccb9960a044 485 {
donatien 0:2ccb9960a044 486 DBG("Trying to read between %d and %d bytes", minLen, maxLen);
donatien 0:2ccb9960a044 487 size_t readLen = 0;
donatien 12:89d09a6db00a 488
donatien 12:89d09a6db00a 489 if(!m_sock.is_connected())
donatien 12:89d09a6db00a 490 {
donatien 12:89d09a6db00a 491 WARN("Connection was closed by server");
donatien 12:89d09a6db00a 492 return HTTP_CLOSED; //Connection was closed by server
donatien 12:89d09a6db00a 493 }
donatien 12:89d09a6db00a 494
donatien 7:4e39864f7b15 495 int ret;
donatien 7:4e39864f7b15 496 while(readLen < maxLen)
donatien 0:2ccb9960a044 497 {
donatien 7:4e39864f7b15 498 if(readLen < minLen)
donatien 0:2ccb9960a044 499 {
donatien 12:89d09a6db00a 500 DBG("Trying to read at most %d bytes [Blocking]", minLen - readLen);
donatien 13:be61104f4e91 501 m_sock.set_blocking(false, m_timeout);
donatien 12:89d09a6db00a 502 ret = m_sock.receive_all(buf + readLen, minLen - readLen);
donatien 0:2ccb9960a044 503 }
donatien 7:4e39864f7b15 504 else
donatien 7:4e39864f7b15 505 {
donatien 12:89d09a6db00a 506 DBG("Trying to read at most %d bytes [Not blocking]", maxLen - readLen);
donatien 13:be61104f4e91 507 m_sock.set_blocking(false, 0);
donatien 12:89d09a6db00a 508 ret = m_sock.receive(buf + readLen, maxLen - readLen);
donatien 7:4e39864f7b15 509 }
donatien 7:4e39864f7b15 510
donatien 0:2ccb9960a044 511 if( ret > 0)
donatien 0:2ccb9960a044 512 {
donatien 0:2ccb9960a044 513 readLen += ret;
donatien 0:2ccb9960a044 514 }
donatien 0:2ccb9960a044 515 else if( ret == 0 )
donatien 0:2ccb9960a044 516 {
donatien 7:4e39864f7b15 517 break;
donatien 7:4e39864f7b15 518 }
donatien 7:4e39864f7b15 519 else
donatien 7:4e39864f7b15 520 {
donatien 12:89d09a6db00a 521 if(!m_sock.is_connected())
donatien 12:89d09a6db00a 522 {
donatien 12:89d09a6db00a 523 ERR("Connection error (recv returned %d)", ret);
donatien 12:89d09a6db00a 524 *pReadLen = readLen;
donatien 12:89d09a6db00a 525 return HTTP_CONN;
donatien 12:89d09a6db00a 526 }
donatien 12:89d09a6db00a 527 else
donatien 12:89d09a6db00a 528 {
donatien 12:89d09a6db00a 529 break;
donatien 12:89d09a6db00a 530 }
donatien 12:89d09a6db00a 531 }
donatien 12:89d09a6db00a 532
donatien 12:89d09a6db00a 533 if(!m_sock.is_connected())
donatien 12:89d09a6db00a 534 {
donatien 12:89d09a6db00a 535 break;
donatien 7:4e39864f7b15 536 }
donatien 7:4e39864f7b15 537 }
donatien 7:4e39864f7b15 538 DBG("Read %d bytes", readLen);
donatien 7:4e39864f7b15 539 *pReadLen = readLen;
donatien 11:390362de8c3f 540 return HTTP_OK;
donatien 7:4e39864f7b15 541 }
donatien 7:4e39864f7b15 542
donatien 11:390362de8c3f 543 HTTPResult HTTPClient::send(char* buf, size_t len) //0 on success, err code on failure
donatien 7:4e39864f7b15 544 {
donatien 7:4e39864f7b15 545 if(len == 0)
donatien 7:4e39864f7b15 546 {
donatien 7:4e39864f7b15 547 len = strlen(buf);
donatien 7:4e39864f7b15 548 }
donatien 7:4e39864f7b15 549 DBG("Trying to write %d bytes", len);
donatien 7:4e39864f7b15 550 size_t writtenLen = 0;
donatien 12:89d09a6db00a 551
donatien 12:89d09a6db00a 552 if(!m_sock.is_connected())
donatien 12:89d09a6db00a 553 {
donatien 12:89d09a6db00a 554 WARN("Connection was closed by server");
donatien 12:89d09a6db00a 555 return HTTP_CLOSED; //Connection was closed by server
donatien 12:89d09a6db00a 556 }
donatien 7:4e39864f7b15 557
donatien 13:be61104f4e91 558 m_sock.set_blocking(false, m_timeout);
donatien 12:89d09a6db00a 559 int ret = m_sock.send_all(buf, len);
donatien 12:89d09a6db00a 560 if(ret > 0)
donatien 7:4e39864f7b15 561 {
donatien 12:89d09a6db00a 562 writtenLen += ret;
donatien 12:89d09a6db00a 563 }
donatien 12:89d09a6db00a 564 else if( ret == 0 )
donatien 12:89d09a6db00a 565 {
donatien 12:89d09a6db00a 566 WARN("Connection was closed by server");
donatien 12:89d09a6db00a 567 return HTTP_CLOSED; //Connection was closed by server
donatien 12:89d09a6db00a 568 }
donatien 12:89d09a6db00a 569 else
donatien 12:89d09a6db00a 570 {
donatien 12:89d09a6db00a 571 ERR("Connection error (send returned %d)", ret);
donatien 12:89d09a6db00a 572 return HTTP_CONN;
donatien 12:89d09a6db00a 573 }
donatien 7:4e39864f7b15 574
donatien 0:2ccb9960a044 575 DBG("Written %d bytes", writtenLen);
donatien 11:390362de8c3f 576 return HTTP_OK;
donatien 0:2ccb9960a044 577 }
donatien 0:2ccb9960a044 578
donatien 11:390362de8c3f 579 HTTPResult HTTPClient::parseURL(const char* url, char* scheme, size_t maxSchemeLen, char* host, size_t maxHostLen, uint16_t* port, char* path, size_t maxPathLen) //Parse URL
donatien 0:2ccb9960a044 580 {
donatien 0:2ccb9960a044 581 char* schemePtr = (char*) url;
donatien 0:2ccb9960a044 582 char* hostPtr = (char*) strstr(url, "://");
donatien 0:2ccb9960a044 583 if(hostPtr == NULL)
donatien 0:2ccb9960a044 584 {
donatien 0:2ccb9960a044 585 WARN("Could not find host");
donatien 11:390362de8c3f 586 return HTTP_PARSE; //URL is invalid
donatien 0:2ccb9960a044 587 }
donatien 0:2ccb9960a044 588
donatien 0:2ccb9960a044 589 if( maxSchemeLen < hostPtr - schemePtr + 1 ) //including NULL-terminating char
donatien 0:2ccb9960a044 590 {
donatien 0:2ccb9960a044 591 WARN("Scheme str is too small (%d >= %d)", maxSchemeLen, hostPtr - schemePtr + 1);
donatien 11:390362de8c3f 592 return HTTP_PARSE;
donatien 0:2ccb9960a044 593 }
donatien 0:2ccb9960a044 594 memcpy(scheme, schemePtr, hostPtr - schemePtr);
donatien 0:2ccb9960a044 595 scheme[hostPtr - schemePtr] = '\0';
donatien 0:2ccb9960a044 596
donatien 0:2ccb9960a044 597 hostPtr+=3;
donatien 0:2ccb9960a044 598
donatien 0:2ccb9960a044 599 size_t hostLen = 0;
donatien 0:2ccb9960a044 600
donatien 0:2ccb9960a044 601 char* portPtr = strchr(hostPtr, ':');
donatien 0:2ccb9960a044 602 if( portPtr != NULL )
donatien 0:2ccb9960a044 603 {
donatien 0:2ccb9960a044 604 hostLen = portPtr - hostPtr;
donatien 0:2ccb9960a044 605 portPtr++;
donatien 8:45c8da29a1cf 606 if( sscanf(portPtr, "%hu", port) != 1)
donatien 0:2ccb9960a044 607 {
donatien 0:2ccb9960a044 608 WARN("Could not find port");
donatien 11:390362de8c3f 609 return HTTP_PARSE;
donatien 0:2ccb9960a044 610 }
donatien 0:2ccb9960a044 611 }
donatien 0:2ccb9960a044 612 else
donatien 0:2ccb9960a044 613 {
donatien 0:2ccb9960a044 614 *port=0;
donatien 0:2ccb9960a044 615 }
donatien 0:2ccb9960a044 616 char* pathPtr = strchr(hostPtr, '/');
donatien 0:2ccb9960a044 617 if( hostLen == 0 )
donatien 0:2ccb9960a044 618 {
donatien 0:2ccb9960a044 619 hostLen = pathPtr - hostPtr;
donatien 0:2ccb9960a044 620 }
donatien 0:2ccb9960a044 621
donatien 0:2ccb9960a044 622 if( maxHostLen < hostLen + 1 ) //including NULL-terminating char
donatien 0:2ccb9960a044 623 {
donatien 0:2ccb9960a044 624 WARN("Host str is too small (%d >= %d)", maxHostLen, hostLen + 1);
donatien 11:390362de8c3f 625 return HTTP_PARSE;
donatien 0:2ccb9960a044 626 }
donatien 0:2ccb9960a044 627 memcpy(host, hostPtr, hostLen);
donatien 0:2ccb9960a044 628 host[hostLen] = '\0';
donatien 0:2ccb9960a044 629
donatien 0:2ccb9960a044 630 size_t pathLen;
donatien 0:2ccb9960a044 631 char* fragmentPtr = strchr(hostPtr, '#');
donatien 0:2ccb9960a044 632 if(fragmentPtr != NULL)
donatien 0:2ccb9960a044 633 {
donatien 0:2ccb9960a044 634 pathLen = fragmentPtr - pathPtr;
donatien 0:2ccb9960a044 635 }
donatien 0:2ccb9960a044 636 else
donatien 0:2ccb9960a044 637 {
donatien 0:2ccb9960a044 638 pathLen = strlen(pathPtr);
donatien 0:2ccb9960a044 639 }
donatien 0:2ccb9960a044 640
donatien 0:2ccb9960a044 641 if( maxPathLen < pathLen + 1 ) //including NULL-terminating char
donatien 0:2ccb9960a044 642 {
donatien 0:2ccb9960a044 643 WARN("Path str is too small (%d >= %d)", maxPathLen, pathLen + 1);
donatien 11:390362de8c3f 644 return HTTP_PARSE;
donatien 0:2ccb9960a044 645 }
donatien 0:2ccb9960a044 646 memcpy(path, pathPtr, pathLen);
donatien 0:2ccb9960a044 647 path[pathLen] = '\0';
donatien 0:2ccb9960a044 648
donatien 11:390362de8c3f 649 return HTTP_OK;
donatien 0:2ccb9960a044 650 }