A modified version of http://mbed.org/users/segundo/libraries/NetServices/ljhqix to add HTTP proxy feature (based on http://mbed.org/users/igorsk/programs/NetServicesSource/ltjpag)

Dependents:   SenseClient

Committer:
mimil
Date:
Tue Sep 06 13:26:45 2011 +0000
Revision:
0:308f83189a3f

        

Who changed what in which revision?

UserRevisionLine numberNew contents of line
mimil 0:308f83189a3f 1
mimil 0:308f83189a3f 2 /*
mimil 0:308f83189a3f 3 Copyright (c) 2010 Donatien Garnier (donatiengar [at] gmail [dot] com)
mimil 0:308f83189a3f 4
mimil 0:308f83189a3f 5 Permission is hereby granted, free of charge, to any person obtaining a copy
mimil 0:308f83189a3f 6 of this software and associated documentation files (the "Software"), to deal
mimil 0:308f83189a3f 7 in the Software without restriction, including without limitation the rights
mimil 0:308f83189a3f 8 to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
mimil 0:308f83189a3f 9 copies of the Software, and to permit persons to whom the Software is
mimil 0:308f83189a3f 10 furnished to do so, subject to the following conditions:
mimil 0:308f83189a3f 11
mimil 0:308f83189a3f 12 The above copyright notice and this permission notice shall be included in
mimil 0:308f83189a3f 13 all copies or substantial portions of the Software.
mimil 0:308f83189a3f 14
mimil 0:308f83189a3f 15 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
mimil 0:308f83189a3f 16 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
mimil 0:308f83189a3f 17 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
mimil 0:308f83189a3f 18 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
mimil 0:308f83189a3f 19 LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
mimil 0:308f83189a3f 20 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
mimil 0:308f83189a3f 21 THE SOFTWARE.
mimil 0:308f83189a3f 22 */
mimil 0:308f83189a3f 23
mimil 0:308f83189a3f 24 #include "TCPSocket.h"
mimil 0:308f83189a3f 25 #include "if/net/nettcpsocket.h"
mimil 0:308f83189a3f 26
mimil 0:308f83189a3f 27 TCPSocket::TCPSocket() : m_pNetTcpSocket(NULL), m_pCbItem(NULL), m_pCbMeth(NULL), m_pCb(NULL)
mimil 0:308f83189a3f 28 {
mimil 0:308f83189a3f 29
mimil 0:308f83189a3f 30 }
mimil 0:308f83189a3f 31
mimil 0:308f83189a3f 32 TCPSocket::TCPSocket(NetTcpSocket* pNetTcpSocket) : m_pNetTcpSocket(pNetTcpSocket), m_pCbItem(NULL), m_pCbMeth(NULL), m_pCb(NULL)
mimil 0:308f83189a3f 33 {
mimil 0:308f83189a3f 34 m_pNetTcpSocket->setOnEvent(this, &TCPSocket::onNetTcpSocketEvent);
mimil 0:308f83189a3f 35 }
mimil 0:308f83189a3f 36
mimil 0:308f83189a3f 37 TCPSocket::~TCPSocket() //close()
mimil 0:308f83189a3f 38 {
mimil 0:308f83189a3f 39 close();
mimil 0:308f83189a3f 40 }
mimil 0:308f83189a3f 41
mimil 0:308f83189a3f 42 TCPSocketErr TCPSocket::bind(const Host& me)
mimil 0:308f83189a3f 43 {
mimil 0:308f83189a3f 44 TCPSocketErr tcpSocketErr = checkInst();
mimil 0:308f83189a3f 45 if(tcpSocketErr)
mimil 0:308f83189a3f 46 return tcpSocketErr;
mimil 0:308f83189a3f 47 return (TCPSocketErr) m_pNetTcpSocket->bind(me);
mimil 0:308f83189a3f 48 }
mimil 0:308f83189a3f 49
mimil 0:308f83189a3f 50 TCPSocketErr TCPSocket::listen()
mimil 0:308f83189a3f 51 {
mimil 0:308f83189a3f 52 TCPSocketErr tcpSocketErr = checkInst();
mimil 0:308f83189a3f 53 if(tcpSocketErr)
mimil 0:308f83189a3f 54 return tcpSocketErr;
mimil 0:308f83189a3f 55 return (TCPSocketErr) m_pNetTcpSocket->listen();
mimil 0:308f83189a3f 56 }
mimil 0:308f83189a3f 57
mimil 0:308f83189a3f 58 TCPSocketErr TCPSocket::connect(const Host& host)
mimil 0:308f83189a3f 59 {
mimil 0:308f83189a3f 60 TCPSocketErr tcpSocketErr = checkInst();
mimil 0:308f83189a3f 61 if(tcpSocketErr)
mimil 0:308f83189a3f 62 return tcpSocketErr;
mimil 0:308f83189a3f 63 return (TCPSocketErr) m_pNetTcpSocket->connect(host);
mimil 0:308f83189a3f 64 }
mimil 0:308f83189a3f 65
mimil 0:308f83189a3f 66 TCPSocketErr TCPSocket::accept(Host* pClient, TCPSocket** ppNewTCPSocket)
mimil 0:308f83189a3f 67 {
mimil 0:308f83189a3f 68 TCPSocketErr tcpSocketErr = checkInst();
mimil 0:308f83189a3f 69 if(tcpSocketErr)
mimil 0:308f83189a3f 70 return tcpSocketErr;
mimil 0:308f83189a3f 71 NetTcpSocket* pNewNetTcpSocket;
mimil 0:308f83189a3f 72 tcpSocketErr = (TCPSocketErr) m_pNetTcpSocket->accept(pClient, &pNewNetTcpSocket);
mimil 0:308f83189a3f 73 if(pNewNetTcpSocket)
mimil 0:308f83189a3f 74 *ppNewTCPSocket = new TCPSocket(pNewNetTcpSocket);
mimil 0:308f83189a3f 75 return tcpSocketErr;
mimil 0:308f83189a3f 76 }
mimil 0:308f83189a3f 77
mimil 0:308f83189a3f 78 int /*if < 0 : TCPSocketErr*/ TCPSocket::send(const char* buf, int len)
mimil 0:308f83189a3f 79 {
mimil 0:308f83189a3f 80 TCPSocketErr tcpSocketErr = checkInst();
mimil 0:308f83189a3f 81 if(tcpSocketErr)
mimil 0:308f83189a3f 82 return tcpSocketErr;
mimil 0:308f83189a3f 83 return m_pNetTcpSocket->send(buf, len);
mimil 0:308f83189a3f 84 }
mimil 0:308f83189a3f 85
mimil 0:308f83189a3f 86 int /*if < 0 : TCPSocketErr*/ TCPSocket::recv(char* buf, int len)
mimil 0:308f83189a3f 87 {
mimil 0:308f83189a3f 88 TCPSocketErr tcpSocketErr = checkInst();
mimil 0:308f83189a3f 89 if(tcpSocketErr)
mimil 0:308f83189a3f 90 return tcpSocketErr;
mimil 0:308f83189a3f 91 return m_pNetTcpSocket->recv(buf, len);
mimil 0:308f83189a3f 92 }
mimil 0:308f83189a3f 93
mimil 0:308f83189a3f 94 TCPSocketErr TCPSocket::close()
mimil 0:308f83189a3f 95 {
mimil 0:308f83189a3f 96 if(!m_pNetTcpSocket)
mimil 0:308f83189a3f 97 return TCPSOCKET_SETUP;
mimil 0:308f83189a3f 98 m_pNetTcpSocket->resetOnEvent();
mimil 0:308f83189a3f 99 TCPSocketErr tcpSocketErr = (TCPSocketErr) m_pNetTcpSocket->close(); //Close (can already be closed)
mimil 0:308f83189a3f 100 Net::releaseTcpSocket(m_pNetTcpSocket); //And release it so it can be freed when properly removed
mimil 0:308f83189a3f 101 m_pNetTcpSocket = NULL;
mimil 0:308f83189a3f 102 return tcpSocketErr;
mimil 0:308f83189a3f 103 }
mimil 0:308f83189a3f 104
mimil 0:308f83189a3f 105 //Callbacks
mimil 0:308f83189a3f 106 void TCPSocket::setOnEvent( void (*pMethod)(TCPSocketEvent) )
mimil 0:308f83189a3f 107 {
mimil 0:308f83189a3f 108 m_pCb = pMethod;
mimil 0:308f83189a3f 109 }
mimil 0:308f83189a3f 110
mimil 0:308f83189a3f 111 #if 0 //For info only
mimil 0:308f83189a3f 112 template<class T>
mimil 0:308f83189a3f 113 void TCPSocket::setOnEvent( T* pItem, void (T::*pMethod)(TCPSocketEvent) )
mimil 0:308f83189a3f 114 {
mimil 0:308f83189a3f 115 m_pCbItem = (CDummy*) pItem;
mimil 0:308f83189a3f 116 m_pCbMeth = (void (CDummy::*)(TCPSocketEvent)) pMethod;
mimil 0:308f83189a3f 117 }
mimil 0:308f83189a3f 118 #endif
mimil 0:308f83189a3f 119
mimil 0:308f83189a3f 120 void TCPSocket::resetOnEvent() //Disable callback
mimil 0:308f83189a3f 121 {
mimil 0:308f83189a3f 122 m_pCb = NULL;
mimil 0:308f83189a3f 123 m_pCbItem = NULL;
mimil 0:308f83189a3f 124 m_pCbMeth = NULL;
mimil 0:308f83189a3f 125 }
mimil 0:308f83189a3f 126
mimil 0:308f83189a3f 127 void TCPSocket::onNetTcpSocketEvent(NetTcpSocketEvent e)
mimil 0:308f83189a3f 128 {
mimil 0:308f83189a3f 129 if(m_pCbItem && m_pCbMeth)
mimil 0:308f83189a3f 130 (m_pCbItem->*m_pCbMeth)((TCPSocketEvent) e);
mimil 0:308f83189a3f 131 else if(m_pCb)
mimil 0:308f83189a3f 132 m_pCb((TCPSocketEvent) e);
mimil 0:308f83189a3f 133 }
mimil 0:308f83189a3f 134
mimil 0:308f83189a3f 135 TCPSocketErr TCPSocket::checkInst()
mimil 0:308f83189a3f 136 {
mimil 0:308f83189a3f 137 if(!m_pNetTcpSocket)
mimil 0:308f83189a3f 138 {
mimil 0:308f83189a3f 139 m_pNetTcpSocket = Net::tcpSocket();
mimil 0:308f83189a3f 140 if(!m_pNetTcpSocket)
mimil 0:308f83189a3f 141 {
mimil 0:308f83189a3f 142 return TCPSOCKET_IF; //Interface did not return a socket (usually because a default interface does not exist)
mimil 0:308f83189a3f 143 }
mimil 0:308f83189a3f 144 m_pNetTcpSocket->setOnEvent(this, &TCPSocket::onNetTcpSocketEvent);
mimil 0:308f83189a3f 145 }
mimil 0:308f83189a3f 146 return TCPSOCKET_OK;
mimil 0:308f83189a3f 147 }