KDDI Fx0 hackathon / HTTPClient

Customized

Dependents:   SensorNodeSample

Fork of HTTPClient by ban4jp -

HTTPClient.cpp@22:d4389480e952, 2015-03-12 (annotated)

Committer:
komoritan
Date:
Thu Mar 12 12:44:17 2015 +0000
Revision:
22:d4389480e952
Parent:
21:199217e7fa41 
bug fix - Receive response

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
komoritan 22:d4389480e952 21 #if 1
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
ban4jp 19:b09072f8c133 44 #define HEADER_KEY_MAXLENGTH 34
ban4jp 20:f020c92bd1a2 45 #define HEADER_VALUE_MAXLENGTH 64
donatien 0:2ccb9960a044 46
donatien 0:2ccb9960a044 47 #include <cstring>
donatien 0:2ccb9960a044 48
donatien 11:390362de8c3f 49 #include "HTTPClient.h"
donatien 11:390362de8c3f 50
donatien 0:2ccb9960a044 51 HTTPClient::HTTPClient() :
donatien 7:4e39864f7b15 52 m_sock(), m_basicAuthUser(NULL), m_basicAuthPassword(NULL), m_httpResponseCode(0)
donatien 0:2ccb9960a044 53 {
donatien 0:2ccb9960a044 54
donatien 0:2ccb9960a044 55 }
donatien 0:2ccb9960a044 56
donatien 0:2ccb9960a044 57 HTTPClient::~HTTPClient()
donatien 0:2ccb9960a044 58 {
donatien 0:2ccb9960a044 59
donatien 0:2ccb9960a044 60 }
donatien 0:2ccb9960a044 61
donatien 0:2ccb9960a044 62 #if 0
donatien 0:2ccb9960a044 63 void HTTPClient::basicAuth(const char* user, const char* password) //Basic Authentification
donatien 0:2ccb9960a044 64 {
donatien 0:2ccb9960a044 65 m_basicAuthUser = user;
donatien 0:2ccb9960a044 66 m_basicAuthPassword = password;
donatien 0:2ccb9960a044 67 }
donatien 0:2ccb9960a044 68 #endif
donatien 0:2ccb9960a044 69
donatien 12:89d09a6db00a 70 HTTPResult HTTPClient::get(const char* url, IHTTPDataIn* pDataIn, int timeout /*= HTTP_CLIENT_DEFAULT_TIMEOUT*/) //Blocking
donatien 0:2ccb9960a044 71 {
donatien 0:2ccb9960a044 72 return connect(url, HTTP_GET, NULL, pDataIn, timeout);
donatien 0:2ccb9960a044 73 }
donatien 0:2ccb9960a044 74
donatien 12:89d09a6db00a 75 HTTPResult HTTPClient::get(const char* url, char* result, size_t maxResultLen, int timeout /*= HTTP_CLIENT_DEFAULT_TIMEOUT*/) //Blocking
donatien 0:2ccb9960a044 76 {
donatien 0:2ccb9960a044 77 HTTPText str(result, maxResultLen);
donatien 0:2ccb9960a044 78 return get(url, &str, timeout);
donatien 0:2ccb9960a044 79 }
donatien 0:2ccb9960a044 80
donatien 12:89d09a6db00a 81 HTTPResult HTTPClient::post(const char* url, const IHTTPDataOut& dataOut, IHTTPDataIn* pDataIn, int timeout /*= HTTP_CLIENT_DEFAULT_TIMEOUT*/) //Blocking
donatien 0:2ccb9960a044 82 {
donatien 0:2ccb9960a044 83 return connect(url, HTTP_POST, (IHTTPDataOut*)&dataOut, pDataIn, timeout);
donatien 0:2ccb9960a044 84 }
donatien 0:2ccb9960a044 85
donatien 16:1f743885e7de 86 HTTPResult HTTPClient::put(const char* url, const IHTTPDataOut& dataOut, IHTTPDataIn* pDataIn, int timeout /*= HTTP_CLIENT_DEFAULT_TIMEOUT*/) //Blocking
donatien 16:1f743885e7de 87 {
donatien 16:1f743885e7de 88 return connect(url, HTTP_PUT, (IHTTPDataOut*)&dataOut, pDataIn, timeout);
donatien 16:1f743885e7de 89 }
donatien 16:1f743885e7de 90
donatien 16:1f743885e7de 91 HTTPResult HTTPClient::del(const char* url, IHTTPDataIn* pDataIn, int timeout /*= HTTP_CLIENT_DEFAULT_TIMEOUT*/) //Blocking
donatien 16:1f743885e7de 92 {
donatien 16:1f743885e7de 93 return connect(url, HTTP_DELETE, NULL, pDataIn, timeout);
donatien 16:1f743885e7de 94 }
donatien 16:1f743885e7de 95
donatien 16:1f743885e7de 96
donatien 0:2ccb9960a044 97 int HTTPClient::getHTTPResponseCode()
donatien 0:2ccb9960a044 98 {
donatien 0:2ccb9960a044 99 return m_httpResponseCode;
donatien 0:2ccb9960a044 100 }
donatien 0:2ccb9960a044 101
donatien 5:791fc3dcb6c4 102 #define CHECK_CONN_ERR(ret) \
donatien 5:791fc3dcb6c4 103 do{ \
donatien 7:4e39864f7b15 104 if(ret) { \
donatien 7:4e39864f7b15 105 m_sock.close(); \
donatien 5:791fc3dcb6c4 106 ERR("Connection error (%d)", ret); \
donatien 11:390362de8c3f 107 return HTTP_CONN; \
donatien 5:791fc3dcb6c4 108 } \
donatien 5:791fc3dcb6c4 109 } while(0)
donatien 5:791fc3dcb6c4 110
donatien 5:791fc3dcb6c4 111 #define PRTCL_ERR() \
donatien 5:791fc3dcb6c4 112 do{ \
donatien 7:4e39864f7b15 113 m_sock.close(); \
donatien 5:791fc3dcb6c4 114 ERR("Protocol error"); \
donatien 11:390362de8c3f 115 return HTTP_PRTCL; \
donatien 5:791fc3dcb6c4 116 } while(0)
donatien 0:2ccb9960a044 117
donatien 12:89d09a6db00a 118 HTTPResult HTTPClient::connect(const char* url, HTTP_METH method, IHTTPDataOut* pDataOut, IHTTPDataIn* pDataIn, int timeout) //Execute request
donatien 12:89d09a6db00a 119 {
donatien 0:2ccb9960a044 120 m_httpResponseCode = 0; //Invalidate code
donatien 0:2ccb9960a044 121 m_timeout = timeout;
donatien 16:1f743885e7de 122
donatien 16:1f743885e7de 123 pDataIn->writeReset();
donatien 16:1f743885e7de 124 if( pDataOut )
donatien 16:1f743885e7de 125 {
donatien 16:1f743885e7de 126 pDataOut->readReset();
donatien 16:1f743885e7de 127 }
donatien 0:2ccb9960a044 128
donatien 0:2ccb9960a044 129 char scheme[8];
donatien 0:2ccb9960a044 130 uint16_t port;
donatien 0:2ccb9960a044 131 char host[32];
donatien 0:2ccb9960a044 132 char path[64];
donatien 0:2ccb9960a044 133 //First we need to parse the url (http[s]://host[:port][/[path]]) -- HTTPS not supported (yet?)
donatien 11:390362de8c3f 134 HTTPResult res = parseURL(url, scheme, sizeof(scheme), host, sizeof(host), &port, path, sizeof(path));
donatien 11:390362de8c3f 135 if(res != HTTP_OK)
donatien 0:2ccb9960a044 136 {
donatien 11:390362de8c3f 137 ERR("parseURL returned %d", res);
donatien 11:390362de8c3f 138 return res;
donatien 0:2ccb9960a044 139 }
donatien 0:2ccb9960a044 140
donatien 0:2ccb9960a044 141 if(port == 0) //TODO do handle HTTPS->443
donatien 0:2ccb9960a044 142 {
donatien 0:2ccb9960a044 143 port = 80;
donatien 0:2ccb9960a044 144 }
donatien 0:2ccb9960a044 145
donatien 0:2ccb9960a044 146 DBG("Scheme: %s", scheme);
donatien 0:2ccb9960a044 147 DBG("Host: %s", host);
donatien 0:2ccb9960a044 148 DBG("Port: %d", port);
donatien 0:2ccb9960a044 149 DBG("Path: %s", path);
donatien 0:2ccb9960a044 150
donatien 7:4e39864f7b15 151 //Connect
donatien 7:4e39864f7b15 152 DBG("Connecting socket to server");
donatien 11:390362de8c3f 153 int ret = m_sock.connect(host, port);
donatien 0:2ccb9960a044 154 if (ret < 0)
donatien 0:2ccb9960a044 155 {
donatien 7:4e39864f7b15 156 m_sock.close();
donatien 0:2ccb9960a044 157 ERR("Could not connect");
donatien 11:390362de8c3f 158 return HTTP_CONN;
donatien 0:2ccb9960a044 159 }
donatien 0:2ccb9960a044 160
donatien 0:2ccb9960a044 161 //Send request
donatien 0:2ccb9960a044 162 DBG("Sending request");
donatien 9:ff30cc189191 163 char buf[CHUNK_SIZE];
komoritan 21:199217e7fa41 164 char data[CHUNK_SIZE] = "";
donatien 16:1f743885e7de 165 const char* meth = (method==HTTP_GET)?"GET":(method==HTTP_POST)?"POST":(method==HTTP_PUT)?"PUT":(method==HTTP_DELETE)?"DELETE":"";
komoritan 21:199217e7fa41 166 //snprintf(buf, sizeof(buf), "%s %s HTTP/1.1\r\nHost: %s\r\n", meth, path, host); //Write request
komoritan 21:199217e7fa41 167 snprintf(buf, sizeof(buf), "%s %s HTTP/1.1\r\nHost: %s:%d\r\n", meth, path, host, port); //Write request
komoritan 21:199217e7fa41 168 /** buffer to 'data'
donatien 9:ff30cc189191 169 ret = send(buf);
donatien 0:2ccb9960a044 170 if(ret)
donatien 0:2ccb9960a044 171 {
donatien 7:4e39864f7b15 172 m_sock.close();
donatien 0:2ccb9960a044 173 ERR("Could not write request");
donatien 11:390362de8c3f 174 return HTTP_CONN;
donatien 0:2ccb9960a044 175 }
komoritan 21:199217e7fa41 176 */
komoritan 21:199217e7fa41 177 strcat(data, buf);
donatien 0:2ccb9960a044 178
donatien 0:2ccb9960a044 179 //Send all headers
donatien 0:2ccb9960a044 180
donatien 0:2ccb9960a044 181 //Send default headers
donatien 0:2ccb9960a044 182 DBG("Sending headers");
donatien 16:1f743885e7de 183 if( pDataOut != NULL )
donatien 0:2ccb9960a044 184 {
donatien 0:2ccb9960a044 185 if( pDataOut->getIsChunked() )
donatien 0:2ccb9960a044 186 {
komoritan 21:199217e7fa41 187 /** buffer to data
donatien 0:2ccb9960a044 188 ret = send("Transfer-Encoding: chunked\r\n");
donatien 5:791fc3dcb6c4 189 CHECK_CONN_ERR(ret);
komoritan 21:199217e7fa41 190 */
komoritan 21:199217e7fa41 191 strcat(data, "Transfer-Encoding: chunked\r\n");
donatien 0:2ccb9960a044 192 }
donatien 0:2ccb9960a044 193 else
donatien 0:2ccb9960a044 194 {
donatien 9:ff30cc189191 195 snprintf(buf, sizeof(buf), "Content-Length: %d\r\n", pDataOut->getDataLen());
komoritan 21:199217e7fa41 196 /** buffer to data
komoritan 21:199217e7fa41 197 ret = send(buf);
donatien 5:791fc3dcb6c4 198 CHECK_CONN_ERR(ret);
komoritan 21:199217e7fa41 199 */
komoritan 21:199217e7fa41 200 strcat(data, buf);
donatien 0:2ccb9960a044 201 }
donatien 0:2ccb9960a044 202 char type[48];
donatien 11:390362de8c3f 203 if( pDataOut->getDataType(type, 48) == HTTP_OK )
donatien 0:2ccb9960a044 204 {
donatien 9:ff30cc189191 205 snprintf(buf, sizeof(buf), "Content-Type: %s\r\n", type);
komoritan 21:199217e7fa41 206
komoritan 21:199217e7fa41 207 /** buffer to data
donatien 9:ff30cc189191 208 ret = send(buf);
donatien 5:791fc3dcb6c4 209 CHECK_CONN_ERR(ret);
komoritan 21:199217e7fa41 210 */
komoritan 21:199217e7fa41 211 // strcat(data, buf);
donatien 0:2ccb9960a044 212 }
donatien 17:679e15a3d3db 213
donatien 17:679e15a3d3db 214 //Send specific headers
donatien 17:679e15a3d3db 215 while( pDataOut->getHeader(buf, sizeof(buf) - 3) ) //must have space left for CRLF + 0 terminating char
donatien 17:679e15a3d3db 216 {
donatien 17:679e15a3d3db 217 size_t headerlen = strlen(buf);
donatien 17:679e15a3d3db 218 snprintf(buf + headerlen, sizeof(buf) - headerlen, "\r\n");
komoritan 21:199217e7fa41 219 /** buffer to data
donatien 17:679e15a3d3db 220 ret = send(buf);
donatien 17:679e15a3d3db 221 CHECK_CONN_ERR(ret);
komoritan 21:199217e7fa41 222 */
komoritan 21:199217e7fa41 223 strcat(data, buf);
komoritan 21:199217e7fa41 224 }
donatien 17:679e15a3d3db 225 }
donatien 17:679e15a3d3db 226
donatien 17:679e15a3d3db 227 //Send specific headers
donatien 17:679e15a3d3db 228 while( pDataIn->getHeader(buf, sizeof(buf) - 3) )
donatien 17:679e15a3d3db 229 {
donatien 17:679e15a3d3db 230 size_t headerlen = strlen(buf);
donatien 17:679e15a3d3db 231 snprintf(buf + headerlen, sizeof(buf) - headerlen, "\r\n");
komoritan 21:199217e7fa41 232 /** buffer to data
donatien 17:679e15a3d3db 233 ret = send(buf);
donatien 17:679e15a3d3db 234 CHECK_CONN_ERR(ret);
komoritan 21:199217e7fa41 235 */
komoritan 21:199217e7fa41 236 strcat(data, buf);
donatien 0:2ccb9960a044 237 }
donatien 9:ff30cc189191 238
komoritan 21:199217e7fa41 239
komoritan 21:199217e7fa41 240
donatien 0:2ccb9960a044 241 //Close headers
donatien 0:2ccb9960a044 242 DBG("Headers sent");
komoritan 21:199217e7fa41 243 /** buffer to data
donatien 0:2ccb9960a044 244 ret = send("\r\n");
donatien 5:791fc3dcb6c4 245 CHECK_CONN_ERR(ret);
komoritan 21:199217e7fa41 246 */
komoritan 21:199217e7fa41 247 strcat(data,"\r\n" );
donatien 0:2ccb9960a044 248
donatien 4:c071b05ac026 249 size_t trfLen;
donatien 9:ff30cc189191 250
donatien 16:1f743885e7de 251 //Send data (if available)
donatien 16:1f743885e7de 252 if( pDataOut != NULL )
donatien 0:2ccb9960a044 253 {
donatien 0:2ccb9960a044 254 DBG("Sending data");
donatien 0:2ccb9960a044 255 while(true)
donatien 0:2ccb9960a044 256 {
donatien 0:2ccb9960a044 257 size_t writtenLen = 0;
donatien 0:2ccb9960a044 258 pDataOut->read(buf, CHUNK_SIZE, &trfLen);
komoritan 21:199217e7fa41 259 buf[trfLen] = '\0';
komoritan 21:199217e7fa41 260
donatien 0:2ccb9960a044 261 if( pDataOut->getIsChunked() )
donatien 0:2ccb9960a044 262 {
donatien 0:2ccb9960a044 263 //Write chunk header
donatien 9:ff30cc189191 264 char chunkHeader[16];
donatien 9:ff30cc189191 265 snprintf(chunkHeader, sizeof(chunkHeader), "%X\r\n", trfLen); //In hex encoding
komoritan 21:199217e7fa41 266 /** buffer to data
donatien 9:ff30cc189191 267 ret = send(chunkHeader);
donatien 5:791fc3dcb6c4 268 CHECK_CONN_ERR(ret);
komoritan 21:199217e7fa41 269 */
komoritan 21:199217e7fa41 270 strcat(data, chunkHeader);
donatien 0:2ccb9960a044 271 }
donatien 0:2ccb9960a044 272 else if( trfLen == 0 )
donatien 0:2ccb9960a044 273 {
donatien 0:2ccb9960a044 274 break;
donatien 0:2ccb9960a044 275 }
donatien 0:2ccb9960a044 276 if( trfLen != 0 )
donatien 0:2ccb9960a044 277 {
komoritan 21:199217e7fa41 278 /** buffer to data
donatien 0:2ccb9960a044 279 ret = send(buf, trfLen);
donatien 5:791fc3dcb6c4 280 CHECK_CONN_ERR(ret);
komoritan 21:199217e7fa41 281 */
komoritan 21:199217e7fa41 282 strcat(data, buf);
donatien 0:2ccb9960a044 283 }
donatien 0:2ccb9960a044 284
donatien 0:2ccb9960a044 285 if( pDataOut->getIsChunked() )
donatien 0:2ccb9960a044 286 {
komoritan 21:199217e7fa41 287 /** buffer to data
komoritan 21:199217e7fa41 288 ret = send("\r\n"); //Chunk-terminating CRLF
donatien 5:791fc3dcb6c4 289 CHECK_CONN_ERR(ret);
komoritan 21:199217e7fa41 290 */
komoritan 21:199217e7fa41 291 strcat(data, "\r\n");
donatien 0:2ccb9960a044 292 }
donatien 0:2ccb9960a044 293 else
donatien 0:2ccb9960a044 294 {
donatien 0:2ccb9960a044 295 writtenLen += trfLen;
donatien 0:2ccb9960a044 296 if( writtenLen >= pDataOut->getDataLen() )
donatien 0:2ccb9960a044 297 {
donatien 0:2ccb9960a044 298 break;
donatien 0:2ccb9960a044 299 }
donatien 0:2ccb9960a044 300 }
donatien 0:2ccb9960a044 301
donatien 0:2ccb9960a044 302 if( trfLen == 0 )
donatien 0:2ccb9960a044 303 {
donatien 0:2ccb9960a044 304 break;
donatien 0:2ccb9960a044 305 }
donatien 0:2ccb9960a044 306 }
donatien 0:2ccb9960a044 307 }
komoritan 21:199217e7fa41 308
komoritan 21:199217e7fa41 309 /* send buffered data */
komoritan 21:199217e7fa41 310 ret = send(data, strlen(data));
komoritan 21:199217e7fa41 311 CHECK_CONN_ERR(ret);
komoritan 21:199217e7fa41 312
komoritan 22:d4389480e952 313 #if 1
donatien 9:ff30cc189191 314
donatien 0:2ccb9960a044 315 //Receive response
komoritan 21:199217e7fa41 316 printf("\n Receiving response");
donatien 0:2ccb9960a044 317 DBG("Receiving response");
donatien 17:679e15a3d3db 318 ret = recv(buf, 1, CHUNK_SIZE - 1, &trfLen); //Read n bytes
donatien 5:791fc3dcb6c4 319 CHECK_CONN_ERR(ret);
donatien 0:2ccb9960a044 320
donatien 0:2ccb9960a044 321 buf[trfLen] = '\0';
donatien 0:2ccb9960a044 322
donatien 17:679e15a3d3db 323 //Make sure we got the first response line
donatien 17:679e15a3d3db 324 char* crlfPtr = NULL;
donatien 17:679e15a3d3db 325 while( true )
donatien 17:679e15a3d3db 326 {
donatien 17:679e15a3d3db 327 crlfPtr = strstr(buf, "\r\n");
ban4jp 20:f020c92bd1a2 328 if(crlfPtr == NULL)
ban4jp 20:f020c92bd1a2 329 {
donatien 17:679e15a3d3db 330 if( trfLen < CHUNK_SIZE - 1 )
donatien 17:679e15a3d3db 331 {
donatien 17:679e15a3d3db 332 size_t newTrfLen;
donatien 17:679e15a3d3db 333 ret = recv(buf + trfLen, 1, CHUNK_SIZE - trfLen - 1, &newTrfLen);
donatien 17:679e15a3d3db 334 trfLen += newTrfLen;
donatien 17:679e15a3d3db 335 buf[trfLen] = '\0';
donatien 17:679e15a3d3db 336 DBG("Read %d chars; In buf: [%s]", newTrfLen, buf);
donatien 17:679e15a3d3db 337 CHECK_CONN_ERR(ret);
donatien 17:679e15a3d3db 338 continue;
donatien 17:679e15a3d3db 339 }
donatien 17:679e15a3d3db 340 else
donatien 17:679e15a3d3db 341 {
ban4jp 20:f020c92bd1a2 342 PRTCL_ERR();
ban4jp 20:f020c92bd1a2 343 }
donatien 17:679e15a3d3db 344 }
donatien 17:679e15a3d3db 345 break;
donatien 17:679e15a3d3db 346 }
donatien 0:2ccb9960a044 347
donatien 4:c071b05ac026 348 int crlfPos = crlfPtr - buf;
donatien 0:2ccb9960a044 349 buf[crlfPos] = '\0';
donatien 0:2ccb9960a044 350
donatien 0:2ccb9960a044 351 //Parse HTTP response
donatien 17:679e15a3d3db 352 //if( sscanf(buf, "HTTP/%*d.%*d %d %*[^\r\n]", &m_httpResponseCode) != 1 )
donatien 17:679e15a3d3db 353 if(crlfPos > 13)
donatien 17:679e15a3d3db 354 {
donatien 17:679e15a3d3db 355 buf[13] = '\0';
donatien 17:679e15a3d3db 356 }
donatien 17:679e15a3d3db 357 if( sscanf(buf, "HTTP/%*d.%*d %d", &m_httpResponseCode) != 1 ) //Kludge for newlib nano
donatien 0:2ccb9960a044 358 {
donatien 0:2ccb9960a044 359 //Cannot match string, error
komoritan 21:199217e7fa41 360 printf("Not a correct HTTP answer : %s", buf);
ban4jp 20:f020c92bd1a2 361 ERR("Not a correct HTTP answer : %s", buf);
donatien 5:791fc3dcb6c4 362 PRTCL_ERR();
donatien 0:2ccb9960a044 363 }
donatien 0:2ccb9960a044 364
donatien 16:1f743885e7de 365 if( (m_httpResponseCode < 200) || (m_httpResponseCode >= 300) )
donatien 0:2ccb9960a044 366 {
donatien 16:1f743885e7de 367 //Did not return a 2xx code; TODO fetch headers/(&data?) anyway and implement a mean of writing/reading headers
donatien 0:2ccb9960a044 368 WARN("Response code %d", m_httpResponseCode);
donatien 5:791fc3dcb6c4 369 PRTCL_ERR();
donatien 0:2ccb9960a044 370 }
donatien 0:2ccb9960a044 371
donatien 0:2ccb9960a044 372 DBG("Reading headers");
donatien 0:2ccb9960a044 373
donatien 4:c071b05ac026 374 memmove(buf, &buf[crlfPos+2], trfLen - (crlfPos + 2) + 1); //Be sure to move NULL-terminating char as well
donatien 0:2ccb9960a044 375 trfLen -= (crlfPos + 2);
donatien 0:2ccb9960a044 376
donatien 4:c071b05ac026 377 size_t recvContentLength = 0;
donatien 4:c071b05ac026 378 bool recvChunked = false;
donatien 17:679e15a3d3db 379 bool recvLengthUnknown = true;
donatien 0:2ccb9960a044 380 //Now get headers
donatien 0:2ccb9960a044 381 while( true )
donatien 0:2ccb9960a044 382 {
donatien 0:2ccb9960a044 383 crlfPtr = strstr(buf, "\r\n");
donatien 0:2ccb9960a044 384 if(crlfPtr == NULL)
donatien 0:2ccb9960a044 385 {
donatien 4:c071b05ac026 386 if( trfLen < CHUNK_SIZE - 1 )
donatien 0:2ccb9960a044 387 {
donatien 0:2ccb9960a044 388 size_t newTrfLen;
donatien 0:2ccb9960a044 389 ret = recv(buf + trfLen, 1, CHUNK_SIZE - trfLen - 1, &newTrfLen);
donatien 0:2ccb9960a044 390 trfLen += newTrfLen;
donatien 0:2ccb9960a044 391 buf[trfLen] = '\0';
donatien 4:c071b05ac026 392 DBG("Read %d chars; In buf: [%s]", newTrfLen, buf);
donatien 5:791fc3dcb6c4 393 CHECK_CONN_ERR(ret);
donatien 0:2ccb9960a044 394 continue;
donatien 0:2ccb9960a044 395 }
donatien 0:2ccb9960a044 396 else
donatien 0:2ccb9960a044 397 {
donatien 5:791fc3dcb6c4 398 PRTCL_ERR();
donatien 0:2ccb9960a044 399 }
donatien 0:2ccb9960a044 400 }
donatien 0:2ccb9960a044 401
donatien 0:2ccb9960a044 402 crlfPos = crlfPtr - buf;
donatien 0:2ccb9960a044 403
donatien 0:2ccb9960a044 404 if(crlfPos == 0) //End of headers
donatien 0:2ccb9960a044 405 {
donatien 0:2ccb9960a044 406 DBG("Headers read");
donatien 4:c071b05ac026 407 memmove(buf, &buf[2], trfLen - 2 + 1); //Be sure to move NULL-terminating char as well
donatien 0:2ccb9960a044 408 trfLen -= 2;
donatien 0:2ccb9960a044 409 break;
donatien 0:2ccb9960a044 410 }
donatien 0:2ccb9960a044 411
donatien 0:2ccb9960a044 412 buf[crlfPos] = '\0';
donatien 0:2ccb9960a044 413
ban4jp 19:b09072f8c133 414 char key[HEADER_KEY_MAXLENGTH];
ban4jp 19:b09072f8c133 415 char value[HEADER_VALUE_MAXLENGTH];
donatien 0:2ccb9960a044 416
donatien 17:679e15a3d3db 417 //key[31] = '\0';
donatien 17:679e15a3d3db 418 //value[31] = '\0';
donatien 17:679e15a3d3db 419
ban4jp 19:b09072f8c133 420 memset(key, 0, HEADER_KEY_MAXLENGTH);
ban4jp 19:b09072f8c133 421 memset(value, 0, HEADER_VALUE_MAXLENGTH);
donatien 4:c071b05ac026 422
donatien 17:679e15a3d3db 423 //int n = sscanf(buf, "%31[^:]: %31[^\r\n]", key, value);
donatien 17:679e15a3d3db 424
donatien 17:679e15a3d3db 425 int n = 0;
donatien 17:679e15a3d3db 426
donatien 17:679e15a3d3db 427 char* keyEnd = strchr(buf, ':');
donatien 17:679e15a3d3db 428 if(keyEnd != NULL)
donatien 17:679e15a3d3db 429 {
donatien 17:679e15a3d3db 430 *keyEnd = '\0';
ban4jp 19:b09072f8c133 431 if(strlen(buf) < HEADER_KEY_MAXLENGTH)
donatien 17:679e15a3d3db 432 {
donatien 18:277279a1891e 433 strcpy(key, buf);
donatien 17:679e15a3d3db 434 n++;
donatien 17:679e15a3d3db 435 char* valueStart = keyEnd + 2;
donatien 17:679e15a3d3db 436 if( (valueStart - buf) < crlfPos )
donatien 17:679e15a3d3db 437 {
ban4jp 19:b09072f8c133 438 if(strlen(valueStart) < HEADER_VALUE_MAXLENGTH)
donatien 18:277279a1891e 439 {
donatien 18:277279a1891e 440 strcpy(value, valueStart);
donatien 17:679e15a3d3db 441 n++;
donatien 17:679e15a3d3db 442 }
donatien 17:679e15a3d3db 443 }
donatien 17:679e15a3d3db 444 }
donatien 17:679e15a3d3db 445 }
donatien 0:2ccb9960a044 446 if ( n == 2 )
donatien 0:2ccb9960a044 447 {
ban4jp 20:f020c92bd1a2 448 DBG("Read header : %s: %s", key, value);
donatien 0:2ccb9960a044 449 if( !strcmp(key, "Content-Length") )
donatien 0:2ccb9960a044 450 {
donatien 0:2ccb9960a044 451 sscanf(value, "%d", &recvContentLength);
donatien 17:679e15a3d3db 452 recvLengthUnknown = false;
donatien 0:2ccb9960a044 453 pDataIn->setDataLen(recvContentLength);
donatien 0:2ccb9960a044 454 }
donatien 0:2ccb9960a044 455 else if( !strcmp(key, "Transfer-Encoding") )
donatien 0:2ccb9960a044 456 {
donatien 0:2ccb9960a044 457 if( !strcmp(value, "Chunked") || !strcmp(value, "chunked") )
donatien 0:2ccb9960a044 458 {
donatien 0:2ccb9960a044 459 recvChunked = true;
donatien 17:679e15a3d3db 460 recvLengthUnknown = false;
donatien 0:2ccb9960a044 461 pDataIn->setIsChunked(true);
donatien 0:2ccb9960a044 462 }
donatien 0:2ccb9960a044 463 }
donatien 0:2ccb9960a044 464 else if( !strcmp(key, "Content-Type") )
donatien 0:2ccb9960a044 465 {
donatien 0:2ccb9960a044 466 pDataIn->setDataType(value);
donatien 0:2ccb9960a044 467 }
donatien 0:2ccb9960a044 468
donatien 4:c071b05ac026 469 memmove(buf, &buf[crlfPos+2], trfLen - (crlfPos + 2) + 1); //Be sure to move NULL-terminating char as well
donatien 0:2ccb9960a044 470 trfLen -= (crlfPos + 2);
donatien 0:2ccb9960a044 471
donatien 0:2ccb9960a044 472 }
donatien 0:2ccb9960a044 473 else
donatien 0:2ccb9960a044 474 {
donatien 0:2ccb9960a044 475 ERR("Could not parse header");
donatien 5:791fc3dcb6c4 476 PRTCL_ERR();
donatien 0:2ccb9960a044 477 }
donatien 0:2ccb9960a044 478
donatien 0:2ccb9960a044 479 }
donatien 0:2ccb9960a044 480
donatien 0:2ccb9960a044 481 //Receive data
donatien 0:2ccb9960a044 482 DBG("Receiving data");
donatien 0:2ccb9960a044 483 while(true)
donatien 0:2ccb9960a044 484 {
donatien 0:2ccb9960a044 485 size_t readLen = 0;
donatien 0:2ccb9960a044 486
donatien 0:2ccb9960a044 487 if( recvChunked )
donatien 0:2ccb9960a044 488 {
donatien 0:2ccb9960a044 489 //Read chunk header
donatien 14:2744e0c0e527 490 bool foundCrlf;
donatien 14:2744e0c0e527 491 do
donatien 0:2ccb9960a044 492 {
donatien 14:2744e0c0e527 493 foundCrlf = false;
donatien 14:2744e0c0e527 494 crlfPos=0;
donatien 14:2744e0c0e527 495 buf[trfLen]=0;
donatien 14:2744e0c0e527 496 if(trfLen >= 2)
donatien 0:2ccb9960a044 497 {
donatien 14:2744e0c0e527 498 for(; crlfPos < trfLen - 2; crlfPos++)
donatien 14:2744e0c0e527 499 {
donatien 14:2744e0c0e527 500 if( buf[crlfPos] == '\r' && buf[crlfPos + 1] == '\n' )
donatien 14:2744e0c0e527 501 {
donatien 14:2744e0c0e527 502 foundCrlf = true;
donatien 14:2744e0c0e527 503 break;
donatien 14:2744e0c0e527 504 }
donatien 14:2744e0c0e527 505 }
donatien 0:2ccb9960a044 506 }
donatien 14:2744e0c0e527 507 if(!foundCrlf) //Try to read more
donatien 0:2ccb9960a044 508 {
donatien 14:2744e0c0e527 509 if( trfLen < CHUNK_SIZE )
donatien 14:2744e0c0e527 510 {
donatien 14:2744e0c0e527 511 size_t newTrfLen;
donatien 14:2744e0c0e527 512 ret = recv(buf + trfLen, 0, CHUNK_SIZE - trfLen - 1, &newTrfLen);
donatien 14:2744e0c0e527 513 trfLen += newTrfLen;
donatien 14:2744e0c0e527 514 CHECK_CONN_ERR(ret);
donatien 14:2744e0c0e527 515 continue;
donatien 14:2744e0c0e527 516 }
donatien 14:2744e0c0e527 517 else
donatien 14:2744e0c0e527 518 {
donatien 14:2744e0c0e527 519 PRTCL_ERR();
donatien 14:2744e0c0e527 520 }
donatien 0:2ccb9960a044 521 }
donatien 14:2744e0c0e527 522 } while(!foundCrlf);
donatien 0:2ccb9960a044 523 buf[crlfPos] = '\0';
donatien 0:2ccb9960a044 524 int n = sscanf(buf, "%x", &readLen);
donatien 0:2ccb9960a044 525 if(n!=1)
donatien 0:2ccb9960a044 526 {
donatien 15:5ad07f90e895 527 ERR("Could not read chunk length");
donatien 5:791fc3dcb6c4 528 PRTCL_ERR();
donatien 0:2ccb9960a044 529 }
donatien 0:2ccb9960a044 530
donatien 4:c071b05ac026 531 memmove(buf, &buf[crlfPos+2], trfLen - (crlfPos + 2)); //Not need to move NULL-terminating char any more
donatien 0:2ccb9960a044 532 trfLen -= (crlfPos + 2);
donatien 0:2ccb9960a044 533
donatien 0:2ccb9960a044 534 if( readLen == 0 )
donatien 0:2ccb9960a044 535 {
donatien 0:2ccb9960a044 536 //Last chunk
donatien 0:2ccb9960a044 537 break;
donatien 0:2ccb9960a044 538 }
donatien 0:2ccb9960a044 539 }
donatien 0:2ccb9960a044 540 else
donatien 0:2ccb9960a044 541 {
donatien 0:2ccb9960a044 542 readLen = recvContentLength;
donatien 0:2ccb9960a044 543 }
donatien 0:2ccb9960a044 544
donatien 17:679e15a3d3db 545 DBG("Retrieving %d bytes (%d bytes in buffer)", readLen, trfLen);
donatien 0:2ccb9960a044 546
donatien 0:2ccb9960a044 547 do
donatien 0:2ccb9960a044 548 {
donatien 17:679e15a3d3db 549 if(recvLengthUnknown )
donatien 17:679e15a3d3db 550 {
donatien 17:679e15a3d3db 551 readLen = trfLen;
donatien 17:679e15a3d3db 552 }
donatien 0:2ccb9960a044 553 pDataIn->write(buf, MIN(trfLen, readLen));
donatien 17:679e15a3d3db 554 if(!recvLengthUnknown)
donatien 0:2ccb9960a044 555 {
donatien 17:679e15a3d3db 556 if( trfLen > readLen )
donatien 17:679e15a3d3db 557 {
donatien 17:679e15a3d3db 558 memmove(buf, &buf[readLen], trfLen - readLen);
donatien 17:679e15a3d3db 559 trfLen -= readLen;
donatien 17:679e15a3d3db 560 readLen = 0;
donatien 17:679e15a3d3db 561 }
donatien 17:679e15a3d3db 562 else
donatien 17:679e15a3d3db 563 {
donatien 17:679e15a3d3db 564 readLen -= trfLen;
donatien 17:679e15a3d3db 565 }
donatien 0:2ccb9960a044 566 }
donatien 0:2ccb9960a044 567 else
donatien 0:2ccb9960a044 568 {
donatien 17:679e15a3d3db 569 trfLen = 0;
donatien 0:2ccb9960a044 570 }
donatien 0:2ccb9960a044 571
donatien 17:679e15a3d3db 572 if(readLen || recvLengthUnknown)
donatien 0:2ccb9960a044 573 {
donatien 0:2ccb9960a044 574 ret = recv(buf, 1, CHUNK_SIZE - trfLen - 1, &trfLen);
donatien 17:679e15a3d3db 575 if(recvLengthUnknown && (ret == HTTP_CLOSED))
donatien 17:679e15a3d3db 576 {
donatien 17:679e15a3d3db 577 //Write and exit
donatien 17:679e15a3d3db 578 pDataIn->write(buf, trfLen);
donatien 17:679e15a3d3db 579 break;
donatien 17:679e15a3d3db 580 }
donatien 5:791fc3dcb6c4 581 CHECK_CONN_ERR(ret);
donatien 17:679e15a3d3db 582 if(recvLengthUnknown && (trfLen == 0))
donatien 17:679e15a3d3db 583 {
donatien 17:679e15a3d3db 584 break;
donatien 17:679e15a3d3db 585 }
donatien 0:2ccb9960a044 586 }
donatien 17:679e15a3d3db 587 } while(readLen || recvLengthUnknown);
donatien 0:2ccb9960a044 588
donatien 0:2ccb9960a044 589 if( recvChunked )
donatien 0:2ccb9960a044 590 {
donatien 0:2ccb9960a044 591 if(trfLen < 2)
donatien 0:2ccb9960a044 592 {
donatien 0:2ccb9960a044 593 size_t newTrfLen;
donatien 0:2ccb9960a044 594 //Read missing chars to find end of chunk
donatien 14:2744e0c0e527 595 ret = recv(buf + trfLen, 2 - trfLen, CHUNK_SIZE - trfLen - 1, &newTrfLen);
donatien 5:791fc3dcb6c4 596 CHECK_CONN_ERR(ret);
donatien 0:2ccb9960a044 597 trfLen += newTrfLen;
donatien 0:2ccb9960a044 598 }
donatien 0:2ccb9960a044 599 if( (buf[0] != '\r') || (buf[1] != '\n') )
donatien 0:2ccb9960a044 600 {
donatien 0:2ccb9960a044 601 ERR("Format error");
donatien 5:791fc3dcb6c4 602 PRTCL_ERR();
donatien 0:2ccb9960a044 603 }
donatien 0:2ccb9960a044 604 memmove(buf, &buf[2], trfLen - 2);
donatien 0:2ccb9960a044 605 trfLen -= 2;
donatien 0:2ccb9960a044 606 }
donatien 0:2ccb9960a044 607 else
donatien 0:2ccb9960a044 608 {
donatien 0:2ccb9960a044 609 break;
donatien 0:2ccb9960a044 610 }
donatien 0:2ccb9960a044 611
donatien 0:2ccb9960a044 612 }
komoritan 22:d4389480e952 613 #endif
donatien 0:2ccb9960a044 614
donatien 7:4e39864f7b15 615 m_sock.close();
donatien 0:2ccb9960a044 616 DBG("Completed HTTP transaction");
donatien 0:2ccb9960a044 617
donatien 11:390362de8c3f 618 return HTTP_OK;
donatien 0:2ccb9960a044 619 }
donatien 0:2ccb9960a044 620
donatien 11:390362de8c3f 621 HTTPResult HTTPClient::recv(char* buf, size_t minLen, size_t maxLen, size_t* pReadLen) //0 on success, err code on failure
donatien 0:2ccb9960a044 622 {
donatien 0:2ccb9960a044 623 DBG("Trying to read between %d and %d bytes", minLen, maxLen);
donatien 0:2ccb9960a044 624 size_t readLen = 0;
donatien 12:89d09a6db00a 625
donatien 12:89d09a6db00a 626 if(!m_sock.is_connected())
donatien 12:89d09a6db00a 627 {
donatien 12:89d09a6db00a 628 WARN("Connection was closed by server");
donatien 12:89d09a6db00a 629 return HTTP_CLOSED; //Connection was closed by server
donatien 12:89d09a6db00a 630 }
donatien 12:89d09a6db00a 631
donatien 7:4e39864f7b15 632 int ret;
donatien 7:4e39864f7b15 633 while(readLen < maxLen)
donatien 0:2ccb9960a044 634 {
donatien 7:4e39864f7b15 635 if(readLen < minLen)
donatien 0:2ccb9960a044 636 {
donatien 12:89d09a6db00a 637 DBG("Trying to read at most %d bytes [Blocking]", minLen - readLen);
donatien 13:be61104f4e91 638 m_sock.set_blocking(false, m_timeout);
donatien 12:89d09a6db00a 639 ret = m_sock.receive_all(buf + readLen, minLen - readLen);
donatien 0:2ccb9960a044 640 }
donatien 7:4e39864f7b15 641 else
donatien 7:4e39864f7b15 642 {
donatien 12:89d09a6db00a 643 DBG("Trying to read at most %d bytes [Not blocking]", maxLen - readLen);
donatien 13:be61104f4e91 644 m_sock.set_blocking(false, 0);
donatien 12:89d09a6db00a 645 ret = m_sock.receive(buf + readLen, maxLen - readLen);
donatien 7:4e39864f7b15 646 }
donatien 7:4e39864f7b15 647
donatien 0:2ccb9960a044 648 if( ret > 0)
donatien 0:2ccb9960a044 649 {
donatien 0:2ccb9960a044 650 readLen += ret;
donatien 0:2ccb9960a044 651 }
donatien 0:2ccb9960a044 652 else if( ret == 0 )
donatien 0:2ccb9960a044 653 {
donatien 7:4e39864f7b15 654 break;
donatien 7:4e39864f7b15 655 }
donatien 7:4e39864f7b15 656 else
donatien 7:4e39864f7b15 657 {
donatien 12:89d09a6db00a 658 if(!m_sock.is_connected())
donatien 12:89d09a6db00a 659 {
donatien 12:89d09a6db00a 660 ERR("Connection error (recv returned %d)", ret);
donatien 12:89d09a6db00a 661 *pReadLen = readLen;
donatien 12:89d09a6db00a 662 return HTTP_CONN;
donatien 12:89d09a6db00a 663 }
donatien 12:89d09a6db00a 664 else
donatien 12:89d09a6db00a 665 {
donatien 12:89d09a6db00a 666 break;
donatien 12:89d09a6db00a 667 }
donatien 12:89d09a6db00a 668 }
donatien 12:89d09a6db00a 669
donatien 12:89d09a6db00a 670 if(!m_sock.is_connected())
donatien 12:89d09a6db00a 671 {
donatien 12:89d09a6db00a 672 break;
donatien 7:4e39864f7b15 673 }
donatien 7:4e39864f7b15 674 }
donatien 7:4e39864f7b15 675 DBG("Read %d bytes", readLen);
donatien 7:4e39864f7b15 676 *pReadLen = readLen;
donatien 11:390362de8c3f 677 return HTTP_OK;
donatien 7:4e39864f7b15 678 }
donatien 7:4e39864f7b15 679
donatien 11:390362de8c3f 680 HTTPResult HTTPClient::send(char* buf, size_t len) //0 on success, err code on failure
donatien 7:4e39864f7b15 681 {
donatien 7:4e39864f7b15 682 if(len == 0)
donatien 7:4e39864f7b15 683 {
donatien 7:4e39864f7b15 684 len = strlen(buf);
donatien 7:4e39864f7b15 685 }
donatien 7:4e39864f7b15 686 DBG("Trying to write %d bytes", len);
donatien 7:4e39864f7b15 687 size_t writtenLen = 0;
donatien 12:89d09a6db00a 688
donatien 12:89d09a6db00a 689 if(!m_sock.is_connected())
donatien 12:89d09a6db00a 690 {
donatien 12:89d09a6db00a 691 WARN("Connection was closed by server");
donatien 12:89d09a6db00a 692 return HTTP_CLOSED; //Connection was closed by server
donatien 12:89d09a6db00a 693 }
donatien 7:4e39864f7b15 694
donatien 13:be61104f4e91 695 m_sock.set_blocking(false, m_timeout);
komoritan 21:199217e7fa41 696 printf("(%s)", buf);
donatien 12:89d09a6db00a 697 int ret = m_sock.send_all(buf, len);
donatien 12:89d09a6db00a 698 if(ret > 0)
donatien 7:4e39864f7b15 699 {
donatien 12:89d09a6db00a 700 writtenLen += ret;
donatien 12:89d09a6db00a 701 }
donatien 12:89d09a6db00a 702 else if( ret == 0 )
donatien 12:89d09a6db00a 703 {
donatien 12:89d09a6db00a 704 WARN("Connection was closed by server");
donatien 12:89d09a6db00a 705 return HTTP_CLOSED; //Connection was closed by server
donatien 12:89d09a6db00a 706 }
donatien 12:89d09a6db00a 707 else
donatien 12:89d09a6db00a 708 {
donatien 12:89d09a6db00a 709 ERR("Connection error (send returned %d)", ret);
donatien 12:89d09a6db00a 710 return HTTP_CONN;
donatien 12:89d09a6db00a 711 }
donatien 7:4e39864f7b15 712
donatien 0:2ccb9960a044 713 DBG("Written %d bytes", writtenLen);
donatien 11:390362de8c3f 714 return HTTP_OK;
donatien 0:2ccb9960a044 715 }
donatien 0:2ccb9960a044 716
donatien 11:390362de8c3f 717 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 718 {
donatien 0:2ccb9960a044 719 char* schemePtr = (char*) url;
donatien 0:2ccb9960a044 720 char* hostPtr = (char*) strstr(url, "://");
donatien 0:2ccb9960a044 721 if(hostPtr == NULL)
donatien 0:2ccb9960a044 722 {
donatien 0:2ccb9960a044 723 WARN("Could not find host");
donatien 11:390362de8c3f 724 return HTTP_PARSE; //URL is invalid
donatien 0:2ccb9960a044 725 }
donatien 0:2ccb9960a044 726
donatien 0:2ccb9960a044 727 if( maxSchemeLen < hostPtr - schemePtr + 1 ) //including NULL-terminating char
donatien 0:2ccb9960a044 728 {
donatien 0:2ccb9960a044 729 WARN("Scheme str is too small (%d >= %d)", maxSchemeLen, hostPtr - schemePtr + 1);
donatien 11:390362de8c3f 730 return HTTP_PARSE;
donatien 0:2ccb9960a044 731 }
donatien 0:2ccb9960a044 732 memcpy(scheme, schemePtr, hostPtr - schemePtr);
donatien 0:2ccb9960a044 733 scheme[hostPtr - schemePtr] = '\0';
donatien 0:2ccb9960a044 734
donatien 0:2ccb9960a044 735 hostPtr+=3;
donatien 0:2ccb9960a044 736
donatien 0:2ccb9960a044 737 size_t hostLen = 0;
donatien 0:2ccb9960a044 738
donatien 0:2ccb9960a044 739 char* portPtr = strchr(hostPtr, ':');
donatien 0:2ccb9960a044 740 if( portPtr != NULL )
donatien 0:2ccb9960a044 741 {
donatien 0:2ccb9960a044 742 hostLen = portPtr - hostPtr;
donatien 0:2ccb9960a044 743 portPtr++;
donatien 8:45c8da29a1cf 744 if( sscanf(portPtr, "%hu", port) != 1)
donatien 0:2ccb9960a044 745 {
donatien 0:2ccb9960a044 746 WARN("Could not find port");
donatien 11:390362de8c3f 747 return HTTP_PARSE;
donatien 0:2ccb9960a044 748 }
donatien 0:2ccb9960a044 749 }
donatien 0:2ccb9960a044 750 else
donatien 0:2ccb9960a044 751 {
donatien 0:2ccb9960a044 752 *port=0;
donatien 0:2ccb9960a044 753 }
donatien 0:2ccb9960a044 754 char* pathPtr = strchr(hostPtr, '/');
donatien 0:2ccb9960a044 755 if( hostLen == 0 )
donatien 0:2ccb9960a044 756 {
donatien 0:2ccb9960a044 757 hostLen = pathPtr - hostPtr;
donatien 0:2ccb9960a044 758 }
donatien 0:2ccb9960a044 759
donatien 0:2ccb9960a044 760 if( maxHostLen < hostLen + 1 ) //including NULL-terminating char
donatien 0:2ccb9960a044 761 {
donatien 0:2ccb9960a044 762 WARN("Host str is too small (%d >= %d)", maxHostLen, hostLen + 1);
donatien 11:390362de8c3f 763 return HTTP_PARSE;
donatien 0:2ccb9960a044 764 }
donatien 0:2ccb9960a044 765 memcpy(host, hostPtr, hostLen);
donatien 0:2ccb9960a044 766 host[hostLen] = '\0';
donatien 0:2ccb9960a044 767
donatien 0:2ccb9960a044 768 size_t pathLen;
donatien 0:2ccb9960a044 769 char* fragmentPtr = strchr(hostPtr, '#');
donatien 0:2ccb9960a044 770 if(fragmentPtr != NULL)
donatien 0:2ccb9960a044 771 {
donatien 0:2ccb9960a044 772 pathLen = fragmentPtr - pathPtr;
donatien 0:2ccb9960a044 773 }
donatien 0:2ccb9960a044 774 else
donatien 0:2ccb9960a044 775 {
donatien 0:2ccb9960a044 776 pathLen = strlen(pathPtr);
donatien 0:2ccb9960a044 777 }
donatien 0:2ccb9960a044 778
donatien 0:2ccb9960a044 779 if( maxPathLen < pathLen + 1 ) //including NULL-terminating char
donatien 0:2ccb9960a044 780 {
donatien 0:2ccb9960a044 781 WARN("Path str is too small (%d >= %d)", maxPathLen, pathLen + 1);
donatien 11:390362de8c3f 782 return HTTP_PARSE;
donatien 0:2ccb9960a044 783 }
donatien 0:2ccb9960a044 784 memcpy(path, pathPtr, pathLen);
donatien 0:2ccb9960a044 785 path[pathLen] = '\0';
donatien 0:2ccb9960a044 786
donatien 11:390362de8c3f 787 return HTTP_OK;
donatien 0:2ccb9960a044 788 }