Michael Spencer / Mbed 2 deprecated LaOS

Dependencies:   mbed

Committer:
Michael J. Spencer
Date:
Wed Mar 05 06:14:02 2014 -0800
Revision:
1:f5ac63519541
Initial commit.

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Michael J. Spencer 1:f5ac63519541 1
Michael J. Spencer 1:f5ac63519541 2 /*
Michael J. Spencer 1:f5ac63519541 3 Copyright (c) 2010 Donatien Garnier (donatiengar [at] gmail [dot] com)
Michael J. Spencer 1:f5ac63519541 4
Michael J. Spencer 1:f5ac63519541 5 Permission is hereby granted, free of charge, to any person obtaining a copy
Michael J. Spencer 1:f5ac63519541 6 of this software and associated documentation files (the "Software"), to deal
Michael J. Spencer 1:f5ac63519541 7 in the Software without restriction, including without limitation the rights
Michael J. Spencer 1:f5ac63519541 8 to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
Michael J. Spencer 1:f5ac63519541 9 copies of the Software, and to permit persons to whom the Software is
Michael J. Spencer 1:f5ac63519541 10 furnished to do so, subject to the following conditions:
Michael J. Spencer 1:f5ac63519541 11
Michael J. Spencer 1:f5ac63519541 12 The above copyright notice and this permission notice shall be included in
Michael J. Spencer 1:f5ac63519541 13 all copies or substantial portions of the Software.
Michael J. Spencer 1:f5ac63519541 14
Michael J. Spencer 1:f5ac63519541 15 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
Michael J. Spencer 1:f5ac63519541 16 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
Michael J. Spencer 1:f5ac63519541 17 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
Michael J. Spencer 1:f5ac63519541 18 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
Michael J. Spencer 1:f5ac63519541 19 LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
Michael J. Spencer 1:f5ac63519541 20 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
Michael J. Spencer 1:f5ac63519541 21 THE SOFTWARE.
Michael J. Spencer 1:f5ac63519541 22 */
Michael J. Spencer 1:f5ac63519541 23
Michael J. Spencer 1:f5ac63519541 24 #include "lwipNetTcpSocket.h"
Michael J. Spencer 1:f5ac63519541 25 #include "lwip/tcp.h"
Michael J. Spencer 1:f5ac63519541 26
Michael J. Spencer 1:f5ac63519541 27 //#define __DEBUG
Michael J. Spencer 1:f5ac63519541 28 #include "dbg/dbg.h"
Michael J. Spencer 1:f5ac63519541 29
Michael J. Spencer 1:f5ac63519541 30 #include "netCfg.h"
Michael J. Spencer 1:f5ac63519541 31 #if NET_LWIP_STACK
Michael J. Spencer 1:f5ac63519541 32
Michael J. Spencer 1:f5ac63519541 33 LwipNetTcpSocket::LwipNetTcpSocket(tcp_pcb* pPcb /*= NULL*/) : NetTcpSocket(), m_pPcb(pPcb), m_lpInNetTcpSocket(), //Passes a pcb if already created (by an accept req for instance), in that case transfers ownership
Michael J. Spencer 1:f5ac63519541 34 m_pReadPbuf(NULL)
Michael J. Spencer 1:f5ac63519541 35 {
Michael J. Spencer 1:f5ac63519541 36 DBG("New NetTcpSocket %p\n", (void*)this);
Michael J. Spencer 1:f5ac63519541 37 if(!m_pPcb)
Michael J. Spencer 1:f5ac63519541 38 {
Michael J. Spencer 1:f5ac63519541 39 m_pPcb = tcp_new();
Michael J. Spencer 1:f5ac63519541 40 DBG("Creating new PCB %p\n", m_pPcb);
Michael J. Spencer 1:f5ac63519541 41 }
Michael J. Spencer 1:f5ac63519541 42 if(m_pPcb)
Michael J. Spencer 1:f5ac63519541 43 {
Michael J. Spencer 1:f5ac63519541 44 //Setup callbacks
Michael J. Spencer 1:f5ac63519541 45 tcp_arg( (tcp_pcb*) m_pPcb, (void*) this ); //this will be passed to each static callback
Michael J. Spencer 1:f5ac63519541 46
Michael J. Spencer 1:f5ac63519541 47 tcp_recv( (tcp_pcb*) m_pPcb, LwipNetTcpSocket::sRecvCb );
Michael J. Spencer 1:f5ac63519541 48 tcp_sent((tcp_pcb*) m_pPcb, LwipNetTcpSocket::sSentCb );
Michael J. Spencer 1:f5ac63519541 49 tcp_err( (tcp_pcb*) m_pPcb, LwipNetTcpSocket::sErrCb );
Michael J. Spencer 1:f5ac63519541 50 //Connected callback is defined in connect()
Michael J. Spencer 1:f5ac63519541 51 //Accept callback is defined in listen()
Michael J. Spencer 1:f5ac63519541 52 DBG("NetTcpSocket created.\n");
Michael J. Spencer 1:f5ac63519541 53 }
Michael J. Spencer 1:f5ac63519541 54 }
Michael J. Spencer 1:f5ac63519541 55
Michael J. Spencer 1:f5ac63519541 56 LwipNetTcpSocket::~LwipNetTcpSocket()
Michael J. Spencer 1:f5ac63519541 57 {
Michael J. Spencer 1:f5ac63519541 58 /* if(m_pPcb)
Michael J. Spencer 1:f5ac63519541 59 tcp_close( (tcp_pcb*) m_pPcb); //Disconnect & free pcb*/
Michael J. Spencer 1:f5ac63519541 60 close();
Michael J. Spencer 1:f5ac63519541 61 }
Michael J. Spencer 1:f5ac63519541 62
Michael J. Spencer 1:f5ac63519541 63 NetTcpSocketErr LwipNetTcpSocket::bind(const Host& me)
Michael J. Spencer 1:f5ac63519541 64 {
Michael J. Spencer 1:f5ac63519541 65 if(!m_pPcb)
Michael J. Spencer 1:f5ac63519541 66 return NETTCPSOCKET_MEM; //NetTcpSocket was not properly initialised, should destroy it & retry
Michael J. Spencer 1:f5ac63519541 67
Michael J. Spencer 1:f5ac63519541 68 err_t err = tcp_bind( (tcp_pcb*) m_pPcb, IP_ADDR_ANY, me.getPort()); //IP_ADDR_ANY : Bind the connection to all local addresses
Michael J. Spencer 1:f5ac63519541 69 if(err)
Michael J. Spencer 1:f5ac63519541 70 return NETTCPSOCKET_INUSE;
Michael J. Spencer 1:f5ac63519541 71
Michael J. Spencer 1:f5ac63519541 72 return NETTCPSOCKET_OK;
Michael J. Spencer 1:f5ac63519541 73 }
Michael J. Spencer 1:f5ac63519541 74
Michael J. Spencer 1:f5ac63519541 75 NetTcpSocketErr LwipNetTcpSocket::listen()
Michael J. Spencer 1:f5ac63519541 76 {
Michael J. Spencer 1:f5ac63519541 77 if(!m_pPcb)
Michael J. Spencer 1:f5ac63519541 78 return NETTCPSOCKET_MEM; //NetTcpSocket was not properly initialised, should destroy it & retry
Michael J. Spencer 1:f5ac63519541 79 /*
Michael J. Spencer 1:f5ac63519541 80 From doc/rawapi.txt :
Michael J. Spencer 1:f5ac63519541 81
Michael J. Spencer 1:f5ac63519541 82 The tcp_listen() function returns a new connection identifier, and
Michael J. Spencer 1:f5ac63519541 83 the one passed as an argument to the function will be
Michael J. Spencer 1:f5ac63519541 84 deallocated. The reason for this behavior is that less memory is
Michael J. Spencer 1:f5ac63519541 85 needed for a connection that is listening, so tcp_listen() will
Michael J. Spencer 1:f5ac63519541 86 reclaim the memory needed for the original connection and allocate a
Michael J. Spencer 1:f5ac63519541 87 new smaller memory block for the listening connection.
Michael J. Spencer 1:f5ac63519541 88 */
Michael J. Spencer 1:f5ac63519541 89
Michael J. Spencer 1:f5ac63519541 90 // tcp_pcb* pNewPcb = tcp_listen(m_pPcb);
Michael J. Spencer 1:f5ac63519541 91 tcp_pcb* pNewPcb = tcp_listen_with_backlog((tcp_pcb*)m_pPcb, 5);
Michael J. Spencer 1:f5ac63519541 92 if( !pNewPcb ) //Not enough memory to create the listening pcb
Michael J. Spencer 1:f5ac63519541 93 return NETTCPSOCKET_MEM;
Michael J. Spencer 1:f5ac63519541 94
Michael J. Spencer 1:f5ac63519541 95 m_pPcb = pNewPcb;
Michael J. Spencer 1:f5ac63519541 96
Michael J. Spencer 1:f5ac63519541 97 tcp_accept( (tcp_pcb*) m_pPcb, LwipNetTcpSocket::sAcceptCb );
Michael J. Spencer 1:f5ac63519541 98
Michael J. Spencer 1:f5ac63519541 99 return NETTCPSOCKET_OK;
Michael J. Spencer 1:f5ac63519541 100 }
Michael J. Spencer 1:f5ac63519541 101
Michael J. Spencer 1:f5ac63519541 102 NetTcpSocketErr LwipNetTcpSocket::connect(const Host& host)
Michael J. Spencer 1:f5ac63519541 103 {
Michael J. Spencer 1:f5ac63519541 104 if(!m_pPcb)
Michael J. Spencer 1:f5ac63519541 105 return NETTCPSOCKET_MEM; //NetTcpSocket was not properly initialised, should destroy it & retry
Michael J. Spencer 1:f5ac63519541 106
Michael J. Spencer 1:f5ac63519541 107 ip_addr_t ip = host.getIp().getStruct();
Michael J. Spencer 1:f5ac63519541 108 err_t err = tcp_connect( (tcp_pcb*) m_pPcb, &ip, host.getPort(), LwipNetTcpSocket::sConnectedCb );
Michael J. Spencer 1:f5ac63519541 109
Michael J. Spencer 1:f5ac63519541 110 if(err)
Michael J. Spencer 1:f5ac63519541 111 return NETTCPSOCKET_MEM;
Michael J. Spencer 1:f5ac63519541 112
Michael J. Spencer 1:f5ac63519541 113 return NETTCPSOCKET_OK;
Michael J. Spencer 1:f5ac63519541 114 }
Michael J. Spencer 1:f5ac63519541 115
Michael J. Spencer 1:f5ac63519541 116 NetTcpSocketErr LwipNetTcpSocket::accept(Host* pClient, NetTcpSocket** ppNewNetTcpSocket)
Michael J. Spencer 1:f5ac63519541 117 {
Michael J. Spencer 1:f5ac63519541 118 if( !m_pPcb ) //Pcb doesn't exist (anymore)
Michael J. Spencer 1:f5ac63519541 119 return NETTCPSOCKET_MEM;
Michael J. Spencer 1:f5ac63519541 120 //Dequeue a connection
Michael J. Spencer 1:f5ac63519541 121 //if( m_lpInPcb.empty() )
Michael J. Spencer 1:f5ac63519541 122 if( m_lpInNetTcpSocket.empty() )
Michael J. Spencer 1:f5ac63519541 123 return NETTCPSOCKET_EMPTY;
Michael J. Spencer 1:f5ac63519541 124
Michael J. Spencer 1:f5ac63519541 125 tcp_accepted( ((tcp_pcb*) m_pPcb) ); //Should fire proper events //WARN: m_pPcb is the GOOD param here (and not pInPcb)
Michael J. Spencer 1:f5ac63519541 126
Michael J. Spencer 1:f5ac63519541 127 /* tcp_pcb* pInPcb = m_lpInPcb.front();
Michael J. Spencer 1:f5ac63519541 128 m_lpInPcb.pop();*/
Michael J. Spencer 1:f5ac63519541 129
Michael J. Spencer 1:f5ac63519541 130 if( (m_lpInNetTcpSocket.front()) == NULL )
Michael J. Spencer 1:f5ac63519541 131 {
Michael J. Spencer 1:f5ac63519541 132 m_lpInNetTcpSocket.pop();
Michael J. Spencer 1:f5ac63519541 133 return NETTCPSOCKET_RST;
Michael J. Spencer 1:f5ac63519541 134 }
Michael J. Spencer 1:f5ac63519541 135
Michael J. Spencer 1:f5ac63519541 136 if( (m_lpInNetTcpSocket.front())->m_closed )
Michael J. Spencer 1:f5ac63519541 137 {
Michael J. Spencer 1:f5ac63519541 138 Net::releaseTcpSocket(m_lpInNetTcpSocket.front());
Michael J. Spencer 1:f5ac63519541 139 m_lpInNetTcpSocket.pop();
Michael J. Spencer 1:f5ac63519541 140 return NETTCPSOCKET_RST;
Michael J. Spencer 1:f5ac63519541 141 }
Michael J. Spencer 1:f5ac63519541 142
Michael J. Spencer 1:f5ac63519541 143 ip_addr_t* ip = (ip_addr_t*) &( (m_lpInNetTcpSocket.front()->m_pPcb)->remote_ip);
Michael J. Spencer 1:f5ac63519541 144
Michael J. Spencer 1:f5ac63519541 145 *ppNewNetTcpSocket = m_lpInNetTcpSocket.front();
Michael J. Spencer 1:f5ac63519541 146 *pClient = Host(
Michael J. Spencer 1:f5ac63519541 147 IpAddr(
Michael J. Spencer 1:f5ac63519541 148 ip
Michael J. Spencer 1:f5ac63519541 149 ),
Michael J. Spencer 1:f5ac63519541 150 m_lpInNetTcpSocket.front()->m_pPcb->remote_port
Michael J. Spencer 1:f5ac63519541 151 );
Michael J. Spencer 1:f5ac63519541 152 m_lpInNetTcpSocket.pop();
Michael J. Spencer 1:f5ac63519541 153 // *pClient = Host( IpAddr(pInPcb->remote_ip), pInPcb->remote_port );
Michael J. Spencer 1:f5ac63519541 154
Michael J. Spencer 1:f5ac63519541 155 //Return a new socket
Michael J. Spencer 1:f5ac63519541 156 // *ppNewNetTcpSocket = (NetTcpSocket*) new LwipNetTcpSocket(pInPcb);
Michael J. Spencer 1:f5ac63519541 157
Michael J. Spencer 1:f5ac63519541 158 //tcp_accepted( ((tcp_pcb*) m_pPcb) ); //Should fire proper events //WARN: m_pPcb is the GOOD param here (and not pInPcb)
Michael J. Spencer 1:f5ac63519541 159
Michael J. Spencer 1:f5ac63519541 160 /* if(*ppNewNetTcpSocket == NULL)
Michael J. Spencer 1:f5ac63519541 161 {
Michael J. Spencer 1:f5ac63519541 162 DBG("Not enough mem, socket dropped in LwipNetTcpSocket::accept.\n");
Michael J. Spencer 1:f5ac63519541 163 tcp_abort(pInPcb);
Michael J. Spencer 1:f5ac63519541 164 }*/
Michael J. Spencer 1:f5ac63519541 165
Michael J. Spencer 1:f5ac63519541 166 return NETTCPSOCKET_OK;
Michael J. Spencer 1:f5ac63519541 167 }
Michael J. Spencer 1:f5ac63519541 168
Michael J. Spencer 1:f5ac63519541 169 #define MAX(a,b) (((a)>(b))?(a):(b))
Michael J. Spencer 1:f5ac63519541 170 #define MIN(a,b) (((a)<(b))?(a):(b))
Michael J. Spencer 1:f5ac63519541 171
Michael J. Spencer 1:f5ac63519541 172 int /*if < 0 : NetTcpSocketErr*/ LwipNetTcpSocket::send(const char* buf, int len)
Michael J. Spencer 1:f5ac63519541 173 {
Michael J. Spencer 1:f5ac63519541 174 if( !m_pPcb ) //Pcb doesn't exist (anymore)
Michael J. Spencer 1:f5ac63519541 175 return NETTCPSOCKET_MEM;
Michael J. Spencer 1:f5ac63519541 176 int outLen = MIN( len, tcp_sndbuf( (tcp_pcb*) m_pPcb) );
Michael J. Spencer 1:f5ac63519541 177 //tcp_sndbuf() returns the number of bytes available in the output queue, so never go above it
Michael J. Spencer 1:f5ac63519541 178 err_t err = tcp_write( (tcp_pcb*) m_pPcb, (void*) buf, outLen, TCP_WRITE_FLAG_COPY );
Michael J. Spencer 1:f5ac63519541 179 //Flags are TCP_WRITE_FLAG_COPY & TCP_WRITE_FLAG_MORE (see tcp_out.c) :
Michael J. Spencer 1:f5ac63519541 180 //If TCP_WRITE_FLAG_MORE is not set ask client to push buffered data to app
Michael J. Spencer 1:f5ac63519541 181 if(err)
Michael J. Spencer 1:f5ac63519541 182 {
Michael J. Spencer 1:f5ac63519541 183 switch( err )
Michael J. Spencer 1:f5ac63519541 184 {
Michael J. Spencer 1:f5ac63519541 185 case ERR_CONN:
Michael J. Spencer 1:f5ac63519541 186 return (int) NETTCPSOCKET_SETUP; //Not connected properly
Michael J. Spencer 1:f5ac63519541 187 case ERR_ARG:
Michael J. Spencer 1:f5ac63519541 188 return (int) NETTCPSOCKET_SETUP; //Wrong args ! (like buf pointing to NULL)
Michael J. Spencer 1:f5ac63519541 189 case ERR_MEM:
Michael J. Spencer 1:f5ac63519541 190 default:
Michael J. Spencer 1:f5ac63519541 191 return (int) NETTCPSOCKET_MEM; //Not enough memory
Michael J. Spencer 1:f5ac63519541 192 }
Michael J. Spencer 1:f5ac63519541 193 }
Michael J. Spencer 1:f5ac63519541 194 return outLen;
Michael J. Spencer 1:f5ac63519541 195 }
Michael J. Spencer 1:f5ac63519541 196
Michael J. Spencer 1:f5ac63519541 197 int /*if < 0 : NetTcpSocketErr*/ LwipNetTcpSocket::recv(char* buf, int len)
Michael J. Spencer 1:f5ac63519541 198 {
Michael J. Spencer 1:f5ac63519541 199 if( !m_pPcb ) //Pcb doesn't exist (anymore)
Michael J. Spencer 1:f5ac63519541 200 return NETTCPSOCKET_MEM;
Michael J. Spencer 1:f5ac63519541 201 int inLen = 0;
Michael J. Spencer 1:f5ac63519541 202 int cpyLen = 0;
Michael J. Spencer 1:f5ac63519541 203
Michael J. Spencer 1:f5ac63519541 204 static int rmgLen = 0;
Michael J. Spencer 1:f5ac63519541 205 //Contains the remaining len in this pbuf
Michael J. Spencer 1:f5ac63519541 206
Michael J. Spencer 1:f5ac63519541 207 if( !m_pReadPbuf )
Michael J. Spencer 1:f5ac63519541 208 {
Michael J. Spencer 1:f5ac63519541 209 rmgLen = 0;
Michael J. Spencer 1:f5ac63519541 210 return 0;
Michael J. Spencer 1:f5ac63519541 211 }
Michael J. Spencer 1:f5ac63519541 212
Michael J. Spencer 1:f5ac63519541 213 if ( !rmgLen ) //We did not know m_pReadPbuf->len last time we called this fn
Michael J. Spencer 1:f5ac63519541 214 {
Michael J. Spencer 1:f5ac63519541 215 rmgLen = m_pReadPbuf->len;
Michael J. Spencer 1:f5ac63519541 216 }
Michael J. Spencer 1:f5ac63519541 217
Michael J. Spencer 1:f5ac63519541 218 while ( inLen < len )
Michael J. Spencer 1:f5ac63519541 219 {
Michael J. Spencer 1:f5ac63519541 220 cpyLen = MIN( (len - inLen), rmgLen ); //Remaining len to copy, remaining len in THIS pbuf
Michael J. Spencer 1:f5ac63519541 221 memcpy((void*)buf, (void*)((char*)(m_pReadPbuf->payload) + (m_pReadPbuf->len - rmgLen)), cpyLen);
Michael J. Spencer 1:f5ac63519541 222 inLen += cpyLen;
Michael J. Spencer 1:f5ac63519541 223 buf += cpyLen;
Michael J. Spencer 1:f5ac63519541 224
Michael J. Spencer 1:f5ac63519541 225 rmgLen = rmgLen - cpyLen; //Update rmgLen
Michael J. Spencer 1:f5ac63519541 226
Michael J. Spencer 1:f5ac63519541 227 if( rmgLen > 0 )
Michael J. Spencer 1:f5ac63519541 228 {
Michael J. Spencer 1:f5ac63519541 229 //We did not read this pbuf completely, so let's save it's pos & return
Michael J. Spencer 1:f5ac63519541 230 break;
Michael J. Spencer 1:f5ac63519541 231 }
Michael J. Spencer 1:f5ac63519541 232
Michael J. Spencer 1:f5ac63519541 233 if(m_pReadPbuf->next)
Michael J. Spencer 1:f5ac63519541 234 {
Michael J. Spencer 1:f5ac63519541 235 pbuf* pNextPBuf = m_pReadPbuf->next;
Michael J. Spencer 1:f5ac63519541 236 m_pReadPbuf->next = NULL; //So that it is not freed as well
Michael J. Spencer 1:f5ac63519541 237 //We get the reference to pNextPBuf from m_pReadPbuf
Michael J. Spencer 1:f5ac63519541 238 pbuf_free((pbuf*)m_pReadPbuf);
Michael J. Spencer 1:f5ac63519541 239 m_pReadPbuf = pNextPBuf;
Michael J. Spencer 1:f5ac63519541 240 rmgLen = m_pReadPbuf->len;
Michael J. Spencer 1:f5ac63519541 241 }
Michael J. Spencer 1:f5ac63519541 242 else
Michael J. Spencer 1:f5ac63519541 243 {
Michael J. Spencer 1:f5ac63519541 244 pbuf_free((pbuf*)m_pReadPbuf);
Michael J. Spencer 1:f5ac63519541 245 m_pReadPbuf = NULL;
Michael J. Spencer 1:f5ac63519541 246 rmgLen = 0;
Michael J. Spencer 1:f5ac63519541 247 break; //No more data to read
Michael J. Spencer 1:f5ac63519541 248 }
Michael J. Spencer 1:f5ac63519541 249
Michael J. Spencer 1:f5ac63519541 250 }
Michael J. Spencer 1:f5ac63519541 251
Michael J. Spencer 1:f5ac63519541 252 //tcp_recved(m_pPcb, inLen); //Acknowledge the reception
Michael J. Spencer 1:f5ac63519541 253
Michael J. Spencer 1:f5ac63519541 254 return inLen;
Michael J. Spencer 1:f5ac63519541 255 }
Michael J. Spencer 1:f5ac63519541 256
Michael J. Spencer 1:f5ac63519541 257 NetTcpSocketErr LwipNetTcpSocket::close()
Michael J. Spencer 1:f5ac63519541 258 {
Michael J. Spencer 1:f5ac63519541 259 //DBG("LwipNetTcpSocket::close() : Closing...\n");
Michael J. Spencer 1:f5ac63519541 260
Michael J. Spencer 1:f5ac63519541 261 if(m_closed)
Michael J. Spencer 1:f5ac63519541 262 return NETTCPSOCKET_OK; //Already being closed
Michael J. Spencer 1:f5ac63519541 263 m_closed = true;
Michael J. Spencer 1:f5ac63519541 264
Michael J. Spencer 1:f5ac63519541 265 if( !m_pPcb ) //Pcb doesn't exist (anymore)
Michael J. Spencer 1:f5ac63519541 266 return NETTCPSOCKET_MEM;
Michael J. Spencer 1:f5ac63519541 267
Michael J. Spencer 1:f5ac63519541 268 //Cleanup incoming data
Michael J. Spencer 1:f5ac63519541 269 cleanUp();
Michael J. Spencer 1:f5ac63519541 270
Michael J. Spencer 1:f5ac63519541 271 if( !!tcp_close( (tcp_pcb*) m_pPcb) )
Michael J. Spencer 1:f5ac63519541 272 {
Michael J. Spencer 1:f5ac63519541 273 DBG("LwipNetTcpSocket::close() could not close properly, abort.\n");
Michael J. Spencer 1:f5ac63519541 274 tcp_abort( (tcp_pcb*) m_pPcb);
Michael J. Spencer 1:f5ac63519541 275 m_pPcb = NULL;
Michael J. Spencer 1:f5ac63519541 276 return NETTCPSOCKET_MEM;
Michael J. Spencer 1:f5ac63519541 277 }
Michael J. Spencer 1:f5ac63519541 278
Michael J. Spencer 1:f5ac63519541 279 DBG("LwipNetTcpSocket::close() : connection closed successfully.\n");
Michael J. Spencer 1:f5ac63519541 280
Michael J. Spencer 1:f5ac63519541 281 m_pPcb = NULL;
Michael J. Spencer 1:f5ac63519541 282 return NETTCPSOCKET_OK;
Michael J. Spencer 1:f5ac63519541 283 }
Michael J. Spencer 1:f5ac63519541 284
Michael J. Spencer 1:f5ac63519541 285 NetTcpSocketErr LwipNetTcpSocket::poll()
Michael J. Spencer 1:f5ac63519541 286 {
Michael J. Spencer 1:f5ac63519541 287 NetTcpSocket::flushEvents();
Michael J. Spencer 1:f5ac63519541 288 return NETTCPSOCKET_OK;
Michael J. Spencer 1:f5ac63519541 289 }
Michael J. Spencer 1:f5ac63519541 290
Michael J. Spencer 1:f5ac63519541 291 // Callbacks events
Michael J. Spencer 1:f5ac63519541 292
Michael J. Spencer 1:f5ac63519541 293 err_t LwipNetTcpSocket::acceptCb(struct tcp_pcb *newpcb, err_t err)
Michael J. Spencer 1:f5ac63519541 294 {
Michael J. Spencer 1:f5ac63519541 295 if(err)
Michael J. Spencer 1:f5ac63519541 296 {
Michael J. Spencer 1:f5ac63519541 297 DBG("Error %d in LwipNetTcpSocket::acceptCb.\n", err);
Michael J. Spencer 1:f5ac63519541 298 return err;
Michael J. Spencer 1:f5ac63519541 299 }
Michael J. Spencer 1:f5ac63519541 300 //FIXME: MEM Errs
Michael J. Spencer 1:f5ac63519541 301 //m_lpInPcb.push(newpcb); //Add connection to the queue
Michael J. Spencer 1:f5ac63519541 302 LwipNetTcpSocket* pNewNetTcpSocket = new LwipNetTcpSocket(newpcb);
Michael J. Spencer 1:f5ac63519541 303
Michael J. Spencer 1:f5ac63519541 304 if(pNewNetTcpSocket == NULL)
Michael J. Spencer 1:f5ac63519541 305 {
Michael J. Spencer 1:f5ac63519541 306 DBG("Not enough mem, socket dropped in LwipNetTcpSocket::acceptCb.\n");
Michael J. Spencer 1:f5ac63519541 307 tcp_abort(newpcb);
Michael J. Spencer 1:f5ac63519541 308 return ERR_ABRT;
Michael J. Spencer 1:f5ac63519541 309 }
Michael J. Spencer 1:f5ac63519541 310
Michael J. Spencer 1:f5ac63519541 311 pNewNetTcpSocket->m_refs++;
Michael J. Spencer 1:f5ac63519541 312 m_lpInNetTcpSocket.push( pNewNetTcpSocket );
Michael J. Spencer 1:f5ac63519541 313
Michael J. Spencer 1:f5ac63519541 314 // tcp_accepted(newpcb);
Michael J. Spencer 1:f5ac63519541 315 // tcp_accepted( m_pPcb ); //Should fire proper events //WARN: m_pPcb is the GOOD param here (and not pInPcb)
Michael J. Spencer 1:f5ac63519541 316 queueEvent(NETTCPSOCKET_ACCEPT);
Michael J. Spencer 1:f5ac63519541 317 return ERR_OK;
Michael J. Spencer 1:f5ac63519541 318 }
Michael J. Spencer 1:f5ac63519541 319
Michael J. Spencer 1:f5ac63519541 320 err_t LwipNetTcpSocket::connectedCb(struct tcp_pcb *tpcb, err_t err)
Michael J. Spencer 1:f5ac63519541 321 {
Michael J. Spencer 1:f5ac63519541 322 queueEvent(NETTCPSOCKET_CONNECTED);
Michael J. Spencer 1:f5ac63519541 323 return ERR_OK;
Michael J. Spencer 1:f5ac63519541 324 }
Michael J. Spencer 1:f5ac63519541 325
Michael J. Spencer 1:f5ac63519541 326 void LwipNetTcpSocket::errCb(err_t err)
Michael J. Spencer 1:f5ac63519541 327 {
Michael J. Spencer 1:f5ac63519541 328 DBG("NetTcpSocket %p - Error %d in LwipNetTcpSocket::errCb.\n", (void*)this, err);
Michael J. Spencer 1:f5ac63519541 329 //WARN: At this point, m_pPcb has been freed by lwIP
Michael J. Spencer 1:f5ac63519541 330 m_pPcb = NULL;
Michael J. Spencer 1:f5ac63519541 331 //These errors are fatal, discard all events queued before so that the errors are handled first
Michael J. Spencer 1:f5ac63519541 332 discardEvents();
Michael J. Spencer 1:f5ac63519541 333 m_closed = true;
Michael J. Spencer 1:f5ac63519541 334 cleanUp();
Michael J. Spencer 1:f5ac63519541 335 if( err == ERR_ABRT)
Michael J. Spencer 1:f5ac63519541 336 queueEvent(NETTCPSOCKET_CONABRT);
Michael J. Spencer 1:f5ac63519541 337 else //if( err == ERR_RST)
Michael J. Spencer 1:f5ac63519541 338 queueEvent(NETTCPSOCKET_CONRST);
Michael J. Spencer 1:f5ac63519541 339 }
Michael J. Spencer 1:f5ac63519541 340
Michael J. Spencer 1:f5ac63519541 341 err_t LwipNetTcpSocket::sentCb(tcp_pcb* tpcb, u16_t len)
Michael J. Spencer 1:f5ac63519541 342 {
Michael J. Spencer 1:f5ac63519541 343 // DBG("%d bytes ACKed by host.\n", len);
Michael J. Spencer 1:f5ac63519541 344 queueEvent(NETTCPSOCKET_WRITEABLE);
Michael J. Spencer 1:f5ac63519541 345 return ERR_OK;
Michael J. Spencer 1:f5ac63519541 346 }
Michael J. Spencer 1:f5ac63519541 347
Michael J. Spencer 1:f5ac63519541 348 err_t LwipNetTcpSocket::recvCb(tcp_pcb* tpcb, pbuf *p, err_t err)
Michael J. Spencer 1:f5ac63519541 349 {
Michael J. Spencer 1:f5ac63519541 350 //Store pbuf ptr
Michael J. Spencer 1:f5ac63519541 351 // DBG("Receive CB with err = %d & len = %d.\n", err, p->tot_len);
Michael J. Spencer 1:f5ac63519541 352 // tcp_recved( (tcp_pcb*) m_pPcb, p->tot_len); //Acknowledge the reception
Michael J. Spencer 1:f5ac63519541 353
Michael J. Spencer 1:f5ac63519541 354 if(err)
Michael J. Spencer 1:f5ac63519541 355 {
Michael J. Spencer 1:f5ac63519541 356 queueEvent(NETTCPSOCKET_ERROR);
Michael J. Spencer 1:f5ac63519541 357 return ERR_OK; //FIXME: More robust error handling there
Michael J. Spencer 1:f5ac63519541 358 }
Michael J. Spencer 1:f5ac63519541 359 else if(!p)
Michael J. Spencer 1:f5ac63519541 360 {
Michael J. Spencer 1:f5ac63519541 361 DBG("NetTcpSocket %p - Connection closed by remote host (LwipNetTcpSocket::recvCb).\n", (void*)this);
Michael J. Spencer 1:f5ac63519541 362 //Buf is NULL, that means that the connection has been closed by remote host
Michael J. Spencer 1:f5ac63519541 363
Michael J. Spencer 1:f5ac63519541 364 //FIX: 27/05/2010: We do not want to deallocate the socket while some data might still be readable
Michael J. Spencer 1:f5ac63519541 365 //REMOVED: close();
Michael J. Spencer 1:f5ac63519541 366
Michael J. Spencer 1:f5ac63519541 367 //However we do not want to close the socket yet
Michael J. Spencer 1:f5ac63519541 368
Michael J. Spencer 1:f5ac63519541 369 queueEvent(NETTCPSOCKET_DISCONNECTED);
Michael J. Spencer 1:f5ac63519541 370 return ERR_OK;
Michael J. Spencer 1:f5ac63519541 371 }
Michael J. Spencer 1:f5ac63519541 372
Michael J. Spencer 1:f5ac63519541 373 //We asserted that p is a valid pointer
Michael J. Spencer 1:f5ac63519541 374
Michael J. Spencer 1:f5ac63519541 375 //New data processing
Michael J. Spencer 1:f5ac63519541 376 tcp_recved( tpcb, p->tot_len); //Acknowledge the reception
Michael J. Spencer 1:f5ac63519541 377 if(!m_pReadPbuf)
Michael J. Spencer 1:f5ac63519541 378 {
Michael J. Spencer 1:f5ac63519541 379 m_pReadPbuf = p;
Michael J. Spencer 1:f5ac63519541 380 queueEvent(NETTCPSOCKET_READABLE);
Michael J. Spencer 1:f5ac63519541 381 }
Michael J. Spencer 1:f5ac63519541 382 else
Michael J. Spencer 1:f5ac63519541 383 {
Michael J. Spencer 1:f5ac63519541 384 pbuf_cat((pbuf*)m_pReadPbuf, p); //m_pReadPbuf is not empty, tail p to it and drop our ref
Michael J. Spencer 1:f5ac63519541 385 //No need to queue an event in that case since the read buf has not been processed yet
Michael J. Spencer 1:f5ac63519541 386 }
Michael J. Spencer 1:f5ac63519541 387 return ERR_OK;
Michael J. Spencer 1:f5ac63519541 388 }
Michael J. Spencer 1:f5ac63519541 389
Michael J. Spencer 1:f5ac63519541 390
Michael J. Spencer 1:f5ac63519541 391 void LwipNetTcpSocket::cleanUp() //Flush input buffer
Michael J. Spencer 1:f5ac63519541 392 {
Michael J. Spencer 1:f5ac63519541 393 //Ensure that further error won't be followed to this inst (which can be destroyed)
Michael J. Spencer 1:f5ac63519541 394 if( m_pPcb )
Michael J. Spencer 1:f5ac63519541 395 {
Michael J. Spencer 1:f5ac63519541 396 tcp_arg( (tcp_pcb*) m_pPcb, (void*) NULL );
Michael J. Spencer 1:f5ac63519541 397 tcp_recv( (tcp_pcb*) m_pPcb, NULL );
Michael J. Spencer 1:f5ac63519541 398 tcp_sent((tcp_pcb*) m_pPcb, NULL );
Michael J. Spencer 1:f5ac63519541 399 tcp_err( (tcp_pcb*) m_pPcb, NULL );
Michael J. Spencer 1:f5ac63519541 400 }
Michael J. Spencer 1:f5ac63519541 401
Michael J. Spencer 1:f5ac63519541 402 if( m_pReadPbuf )
Michael J. Spencer 1:f5ac63519541 403 {
Michael J. Spencer 1:f5ac63519541 404 DBG("Deallocating unread data.\n");
Michael J. Spencer 1:f5ac63519541 405 pbuf_free((pbuf*)m_pReadPbuf); //Free all unread data
Michael J. Spencer 1:f5ac63519541 406 m_pReadPbuf = NULL;
Michael J. Spencer 1:f5ac63519541 407 recv(NULL,0); //Update recv ptr position
Michael J. Spencer 1:f5ac63519541 408 }
Michael J. Spencer 1:f5ac63519541 409 }
Michael J. Spencer 1:f5ac63519541 410
Michael J. Spencer 1:f5ac63519541 411 // Static callbacks from LwIp
Michael J. Spencer 1:f5ac63519541 412
Michael J. Spencer 1:f5ac63519541 413 err_t LwipNetTcpSocket::sAcceptCb(void *arg, struct tcp_pcb *newpcb, err_t err)
Michael J. Spencer 1:f5ac63519541 414 {
Michael J. Spencer 1:f5ac63519541 415 LwipNetTcpSocket* pMe = (LwipNetTcpSocket*) arg;
Michael J. Spencer 1:f5ac63519541 416 return pMe->acceptCb( newpcb, err );
Michael J. Spencer 1:f5ac63519541 417 }
Michael J. Spencer 1:f5ac63519541 418
Michael J. Spencer 1:f5ac63519541 419 err_t LwipNetTcpSocket::sConnectedCb(void *arg, struct tcp_pcb *tpcb, err_t err)
Michael J. Spencer 1:f5ac63519541 420 {
Michael J. Spencer 1:f5ac63519541 421 LwipNetTcpSocket* pMe = (LwipNetTcpSocket*) arg;
Michael J. Spencer 1:f5ac63519541 422 return pMe->connectedCb( tpcb, err );
Michael J. Spencer 1:f5ac63519541 423 }
Michael J. Spencer 1:f5ac63519541 424
Michael J. Spencer 1:f5ac63519541 425 void LwipNetTcpSocket::sErrCb(void *arg, err_t err)
Michael J. Spencer 1:f5ac63519541 426 {
Michael J. Spencer 1:f5ac63519541 427 if( !arg )
Michael J. Spencer 1:f5ac63519541 428 {
Michael J. Spencer 1:f5ac63519541 429 DBG("NetTcpSocket - Error %d in LwipNetTcpSocket::sErrCb.\n", err);
Michael J. Spencer 1:f5ac63519541 430 return; //The socket has been destroyed, discard error
Michael J. Spencer 1:f5ac63519541 431 }
Michael J. Spencer 1:f5ac63519541 432 LwipNetTcpSocket* pMe = (LwipNetTcpSocket*) arg;
Michael J. Spencer 1:f5ac63519541 433 return pMe->errCb( err );
Michael J. Spencer 1:f5ac63519541 434 }
Michael J. Spencer 1:f5ac63519541 435
Michael J. Spencer 1:f5ac63519541 436 err_t LwipNetTcpSocket::sSentCb(void *arg, struct tcp_pcb *tpcb, u16_t len)
Michael J. Spencer 1:f5ac63519541 437 {
Michael J. Spencer 1:f5ac63519541 438 LwipNetTcpSocket* pMe = (LwipNetTcpSocket*) arg;
Michael J. Spencer 1:f5ac63519541 439 return pMe->sentCb( tpcb, len );
Michael J. Spencer 1:f5ac63519541 440 }
Michael J. Spencer 1:f5ac63519541 441
Michael J. Spencer 1:f5ac63519541 442 err_t LwipNetTcpSocket::sRecvCb(void *arg, struct tcp_pcb *tpcb, struct pbuf *p, err_t err)
Michael J. Spencer 1:f5ac63519541 443 {
Michael J. Spencer 1:f5ac63519541 444 if( tpcb->flags & TF_RXCLOSED )
Michael J. Spencer 1:f5ac63519541 445 {
Michael J. Spencer 1:f5ac63519541 446 //The Pcb is in a closing state
Michael J. Spencer 1:f5ac63519541 447 //Discard that data here since we might have destroyed the corresponding socket object
Michael J. Spencer 1:f5ac63519541 448 tcp_recved( tpcb, p->tot_len);
Michael J. Spencer 1:f5ac63519541 449 pbuf_free( p );
Michael J. Spencer 1:f5ac63519541 450 return ERR_OK;
Michael J. Spencer 1:f5ac63519541 451 }
Michael J. Spencer 1:f5ac63519541 452 LwipNetTcpSocket* pMe = (LwipNetTcpSocket*) arg;
Michael J. Spencer 1:f5ac63519541 453 return pMe->recvCb( tpcb, p, err );
Michael J. Spencer 1:f5ac63519541 454 }
Michael J. Spencer 1:f5ac63519541 455
Michael J. Spencer 1:f5ac63519541 456 #endif