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