Alcatel-Lucent IoT Development / HTTPClient

Modified HTTPClient to fit lwip changes.

Fork of HTTPClient by David Smart

HTTPClient.cpp@26:58b6fe9f596b, 2014-04-20 (annotated)

Committer:
WiredHome
Date:
Sun Apr 20 17:05:27 2014 +0000
Revision:
26:58b6fe9f596b
Parent:
25:76084defa790
Child:
28:c0c7a6321f84
Minor tweak to the debug interface - with debug enabled.

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