This short program illustrates how to use the DS130x_I2C library. My objective is to share the same RTC with Microchip 18F MCU.

Dependencies:   mbed DebugLibrary

Committer:
Yann
Date:
Fri Feb 11 10:17:20 2011 +0000
Revision:
1:995212d326ca
Parent:
0:f30e2135b0db
V0.0.0.2

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Yann 0:f30e2135b0db 1
Yann 0:f30e2135b0db 2 /*
Yann 0:f30e2135b0db 3 Copyright (c) 2010 Donatien Garnier (donatiengar [at] gmail [dot] com)
Yann 0:f30e2135b0db 4
Yann 0:f30e2135b0db 5 Permission is hereby granted, free of charge, to any person obtaining a copy
Yann 0:f30e2135b0db 6 of this software and associated documentation files (the "Software"), to deal
Yann 0:f30e2135b0db 7 in the Software without restriction, including without limitation the rights
Yann 0:f30e2135b0db 8 to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
Yann 0:f30e2135b0db 9 copies of the Software, and to permit persons to whom the Software is
Yann 0:f30e2135b0db 10 furnished to do so, subject to the following conditions:
Yann 0:f30e2135b0db 11
Yann 0:f30e2135b0db 12 The above copyright notice and this permission notice shall be included in
Yann 0:f30e2135b0db 13 all copies or substantial portions of the Software.
Yann 0:f30e2135b0db 14
Yann 0:f30e2135b0db 15 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
Yann 0:f30e2135b0db 16 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
Yann 0:f30e2135b0db 17 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
Yann 0:f30e2135b0db 18 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
Yann 0:f30e2135b0db 19 LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
Yann 0:f30e2135b0db 20 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
Yann 0:f30e2135b0db 21 THE SOFTWARE.
Yann 0:f30e2135b0db 22 */
Yann 0:f30e2135b0db 23
Yann 0:f30e2135b0db 24 #include "core/netservice.h"
Yann 0:f30e2135b0db 25 #include "HTTPRequestHandler.h"
Yann 0:f30e2135b0db 26
Yann 0:f30e2135b0db 27 #include <string.h>
Yann 0:f30e2135b0db 28
Yann 0:f30e2135b0db 29 //#define __DEBUG
Yann 0:f30e2135b0db 30 #include "dbg/dbg.h"
Yann 0:f30e2135b0db 31
Yann 0:f30e2135b0db 32 #define HTTP_REQUEST_TIMEOUT 5000
Yann 0:f30e2135b0db 33
Yann 0:f30e2135b0db 34 HTTPRequestHandler::HTTPRequestHandler(const char* rootPath, const char* path, TCPSocket* pTCPSocket) : NetService(),
Yann 0:f30e2135b0db 35 m_pTCPSocket(pTCPSocket), m_reqHeaders(), m_respHeaders(),
Yann 0:f30e2135b0db 36 m_rootPath(rootPath), m_path(path), m_errc(200),
Yann 0:f30e2135b0db 37 m_watchdog(), m_timeout(0), m_closed(false), m_headersSent(false) //OK
Yann 0:f30e2135b0db 38 {
Yann 0:f30e2135b0db 39 //Read & parse headers
Yann 0:f30e2135b0db 40 readHeaders();
Yann 0:f30e2135b0db 41 m_pTCPSocket->setOnEvent(this, &HTTPRequestHandler::onTCPSocketEvent);
Yann 0:f30e2135b0db 42 setTimeout(HTTP_REQUEST_TIMEOUT);
Yann 0:f30e2135b0db 43 }
Yann 0:f30e2135b0db 44
Yann 0:f30e2135b0db 45 HTTPRequestHandler::~HTTPRequestHandler()
Yann 0:f30e2135b0db 46 {
Yann 0:f30e2135b0db 47 close();
Yann 0:f30e2135b0db 48 }
Yann 0:f30e2135b0db 49
Yann 0:f30e2135b0db 50 void HTTPRequestHandler::onTimeout() //Connection has timed out
Yann 0:f30e2135b0db 51 {
Yann 0:f30e2135b0db 52 close();
Yann 0:f30e2135b0db 53 }
Yann 0:f30e2135b0db 54
Yann 0:f30e2135b0db 55 void HTTPRequestHandler::close() //Close socket and destroy data
Yann 0:f30e2135b0db 56 {
Yann 0:f30e2135b0db 57 if(m_closed)
Yann 0:f30e2135b0db 58 return;
Yann 0:f30e2135b0db 59 m_closed = true; //Prevent recursive calling or calling on an object being destructed by someone else
Yann 0:f30e2135b0db 60 m_watchdog.detach();
Yann 0:f30e2135b0db 61 onClose();
Yann 0:f30e2135b0db 62 m_pTCPSocket->resetOnEvent();
Yann 0:f30e2135b0db 63 m_pTCPSocket->close();
Yann 0:f30e2135b0db 64 delete m_pTCPSocket; //Can safely destroy socket
Yann 0:f30e2135b0db 65 NetService::close();
Yann 0:f30e2135b0db 66 }
Yann 0:f30e2135b0db 67
Yann 0:f30e2135b0db 68 map<string, string>& HTTPRequestHandler::reqHeaders() //const
Yann 0:f30e2135b0db 69 {
Yann 0:f30e2135b0db 70 return m_reqHeaders;
Yann 0:f30e2135b0db 71 }
Yann 0:f30e2135b0db 72
Yann 0:f30e2135b0db 73 string& HTTPRequestHandler::path() //const
Yann 0:f30e2135b0db 74 {
Yann 0:f30e2135b0db 75 return m_path;
Yann 0:f30e2135b0db 76 }
Yann 0:f30e2135b0db 77
Yann 0:f30e2135b0db 78 int HTTPRequestHandler::dataLen() const
Yann 0:f30e2135b0db 79 {
Yann 0:f30e2135b0db 80 map<string,string>::iterator it;
Yann 0:f30e2135b0db 81 it = m_reqHeaders.find("Content-Length");
Yann 0:f30e2135b0db 82 if( it == m_reqHeaders.end() )
Yann 0:f30e2135b0db 83 {
Yann 0:f30e2135b0db 84 return 0;
Yann 0:f30e2135b0db 85 }
Yann 0:f30e2135b0db 86 return atoi((*it).second.c_str()); //return 0 if parse fails, so that's fine
Yann 0:f30e2135b0db 87 }
Yann 0:f30e2135b0db 88
Yann 0:f30e2135b0db 89 int HTTPRequestHandler::readData(char* buf, int len)
Yann 0:f30e2135b0db 90 {
Yann 0:f30e2135b0db 91 return m_pTCPSocket->recv(buf, len);
Yann 0:f30e2135b0db 92 }
Yann 0:f30e2135b0db 93
Yann 0:f30e2135b0db 94 string& HTTPRequestHandler::rootPath() //const
Yann 0:f30e2135b0db 95 {
Yann 0:f30e2135b0db 96 return m_rootPath;
Yann 0:f30e2135b0db 97 }
Yann 0:f30e2135b0db 98
Yann 0:f30e2135b0db 99 void HTTPRequestHandler::setErrCode(int errc)
Yann 0:f30e2135b0db 100 {
Yann 0:f30e2135b0db 101 m_errc = errc;
Yann 0:f30e2135b0db 102 }
Yann 0:f30e2135b0db 103
Yann 0:f30e2135b0db 104 void HTTPRequestHandler::setContentLen(int len)
Yann 0:f30e2135b0db 105 {
Yann 0:f30e2135b0db 106 char len_str[6] = {0};
Yann 0:f30e2135b0db 107 sprintf(len_str, "%d", len);
Yann 0:f30e2135b0db 108 respHeaders()["Content-Length"] = len_str;
Yann 0:f30e2135b0db 109 }
Yann 0:f30e2135b0db 110
Yann 0:f30e2135b0db 111 map<string, string>& HTTPRequestHandler::respHeaders()
Yann 0:f30e2135b0db 112 {
Yann 0:f30e2135b0db 113 return m_respHeaders;
Yann 0:f30e2135b0db 114 }
Yann 0:f30e2135b0db 115
Yann 0:f30e2135b0db 116 int HTTPRequestHandler::writeData(const char* buf, int len)
Yann 0:f30e2135b0db 117 {
Yann 0:f30e2135b0db 118 if(!m_headersSent)
Yann 0:f30e2135b0db 119 {
Yann 0:f30e2135b0db 120 m_headersSent = true;
Yann 0:f30e2135b0db 121 writeHeaders();
Yann 0:f30e2135b0db 122 }
Yann 0:f30e2135b0db 123
Yann 0:f30e2135b0db 124 return m_pTCPSocket->send(buf, len);
Yann 0:f30e2135b0db 125 }
Yann 0:f30e2135b0db 126
Yann 0:f30e2135b0db 127 void HTTPRequestHandler::setTimeout(int ms)
Yann 0:f30e2135b0db 128 {
Yann 0:f30e2135b0db 129 m_timeout = 1000*ms;
Yann 0:f30e2135b0db 130 resetTimeout();
Yann 0:f30e2135b0db 131 }
Yann 0:f30e2135b0db 132
Yann 0:f30e2135b0db 133 void HTTPRequestHandler::resetTimeout()
Yann 0:f30e2135b0db 134 {
Yann 0:f30e2135b0db 135 m_watchdog.detach();
Yann 0:f30e2135b0db 136 m_watchdog.attach_us<HTTPRequestHandler>(this, &HTTPRequestHandler::onTimeout, m_timeout);
Yann 0:f30e2135b0db 137 }
Yann 0:f30e2135b0db 138
Yann 0:f30e2135b0db 139
Yann 0:f30e2135b0db 140 void HTTPRequestHandler::readHeaders()
Yann 0:f30e2135b0db 141 {
Yann 0:f30e2135b0db 142 static char line[128];
Yann 0:f30e2135b0db 143 static char key[128];
Yann 0:f30e2135b0db 144 static char value[128];
Yann 0:f30e2135b0db 145 while( readLine(line, 128) > 0) //if == 0, it is an empty line = end of headers
Yann 0:f30e2135b0db 146 {
Yann 0:f30e2135b0db 147 int n = sscanf(line, "%[^:]: %[^\n]", key, value);
Yann 0:f30e2135b0db 148 if ( n == 2 )
Yann 0:f30e2135b0db 149 {
Yann 0:f30e2135b0db 150 DBG("\r\nRead header : %s : %s\r\n", key, value);
Yann 0:f30e2135b0db 151 m_reqHeaders[key] = value;
Yann 0:f30e2135b0db 152 }
Yann 0:f30e2135b0db 153 //TODO: Impl n==1 case (part 2 of previous header)
Yann 0:f30e2135b0db 154 }
Yann 0:f30e2135b0db 155 }
Yann 0:f30e2135b0db 156
Yann 0:f30e2135b0db 157 void HTTPRequestHandler::writeHeaders() //Called at the first writeData call
Yann 0:f30e2135b0db 158 {
Yann 0:f30e2135b0db 159 static char line[128];
Yann 0:f30e2135b0db 160
Yann 0:f30e2135b0db 161 //Response line
Yann 0:f30e2135b0db 162 sprintf(line, "HTTP/1.1 %d MbedInfo\r\n", m_errc); //Not a violation of the standard not to include the descriptive text
Yann 0:f30e2135b0db 163 m_pTCPSocket->send(line, strlen(line));
Yann 0:f30e2135b0db 164
Yann 0:f30e2135b0db 165 map<string,string>::iterator it;
Yann 0:f30e2135b0db 166 while( !m_respHeaders.empty() )
Yann 0:f30e2135b0db 167 {
Yann 0:f30e2135b0db 168 it = m_respHeaders.begin();
Yann 0:f30e2135b0db 169 sprintf(line, "%s: %s\r\n", (*it).first.c_str(), (*it).second.c_str() );
Yann 0:f30e2135b0db 170 DBG("\r\n%s", line);
Yann 0:f30e2135b0db 171 m_pTCPSocket->send(line, strlen(line));
Yann 0:f30e2135b0db 172 m_respHeaders.erase(it);
Yann 0:f30e2135b0db 173 }
Yann 0:f30e2135b0db 174 m_pTCPSocket->send("\r\n",2); //End of head
Yann 0:f30e2135b0db 175 }
Yann 0:f30e2135b0db 176
Yann 0:f30e2135b0db 177 int HTTPRequestHandler::readLine(char* str, int maxLen)
Yann 0:f30e2135b0db 178 {
Yann 0:f30e2135b0db 179 int ret;
Yann 0:f30e2135b0db 180 int len = 0;
Yann 0:f30e2135b0db 181 for(int i = 0; i < maxLen - 1; i++)
Yann 0:f30e2135b0db 182 {
Yann 0:f30e2135b0db 183 ret = m_pTCPSocket->recv(str, 1);
Yann 0:f30e2135b0db 184 if(!ret)
Yann 0:f30e2135b0db 185 {
Yann 0:f30e2135b0db 186 break;
Yann 0:f30e2135b0db 187 }
Yann 0:f30e2135b0db 188 if( (len > 1) && *(str-1)=='\r' && *str=='\n' )
Yann 0:f30e2135b0db 189 {
Yann 0:f30e2135b0db 190 str--;
Yann 0:f30e2135b0db 191 len-=2;
Yann 0:f30e2135b0db 192 break;
Yann 0:f30e2135b0db 193 }
Yann 0:f30e2135b0db 194 else if( *str=='\n' )
Yann 0:f30e2135b0db 195 {
Yann 0:f30e2135b0db 196 len--;
Yann 0:f30e2135b0db 197 break;
Yann 0:f30e2135b0db 198 }
Yann 0:f30e2135b0db 199 str++;
Yann 0:f30e2135b0db 200 len++;
Yann 0:f30e2135b0db 201 }
Yann 0:f30e2135b0db 202 *str = 0;
Yann 0:f30e2135b0db 203 return len;
Yann 0:f30e2135b0db 204 }
Yann 0:f30e2135b0db 205
Yann 0:f30e2135b0db 206 void HTTPRequestHandler::onTCPSocketEvent(TCPSocketEvent e)
Yann 0:f30e2135b0db 207 {
Yann 0:f30e2135b0db 208
Yann 0:f30e2135b0db 209 DBG("\r\nEvent %d in HTTPRequestHandler\r\n", e);
Yann 0:f30e2135b0db 210
Yann 0:f30e2135b0db 211 if(m_closed)
Yann 0:f30e2135b0db 212 {
Yann 0:f30e2135b0db 213 DBG("\r\nWARN: Discarded\r\n");
Yann 0:f30e2135b0db 214 return;
Yann 0:f30e2135b0db 215 }
Yann 0:f30e2135b0db 216
Yann 0:f30e2135b0db 217 switch(e)
Yann 0:f30e2135b0db 218 {
Yann 0:f30e2135b0db 219 case TCPSOCKET_READABLE:
Yann 0:f30e2135b0db 220 resetTimeout();
Yann 0:f30e2135b0db 221 onReadable();
Yann 0:f30e2135b0db 222 break;
Yann 0:f30e2135b0db 223 case TCPSOCKET_WRITEABLE:
Yann 0:f30e2135b0db 224 resetTimeout();
Yann 0:f30e2135b0db 225 onWriteable();
Yann 0:f30e2135b0db 226 break;
Yann 0:f30e2135b0db 227 case TCPSOCKET_CONTIMEOUT:
Yann 0:f30e2135b0db 228 case TCPSOCKET_CONRST:
Yann 0:f30e2135b0db 229 case TCPSOCKET_CONABRT:
Yann 0:f30e2135b0db 230 case TCPSOCKET_ERROR:
Yann 0:f30e2135b0db 231 case TCPSOCKET_DISCONNECTED:
Yann 0:f30e2135b0db 232 DBG("\r\nConnection error in handler\r\n");
Yann 0:f30e2135b0db 233 close();
Yann 0:f30e2135b0db 234 break;
Yann 0:f30e2135b0db 235 }
Yann 0:f30e2135b0db 236
Yann 0:f30e2135b0db 237 }