Donatien Garnier / ZG2100NetIfSource
Committer:
donatien
Date:
Fri Jul 09 15:37:23 2010 +0000
Revision:
0:b802fc31f1db
Child:
1:3a7c15057192

        

Who changed what in which revision?

UserRevisionLine numberNew contents of line
donatien 0:b802fc31f1db 1
donatien 0:b802fc31f1db 2 /*
donatien 0:b802fc31f1db 3 Copyright (c) 2010 Donatien Garnier (donatiengar [at] gmail [dot] com)
donatien 0:b802fc31f1db 4
donatien 0:b802fc31f1db 5 Permission is hereby granted, free of charge, to any person obtaining a copy
donatien 0:b802fc31f1db 6 of this software and associated documentation files (the "Software"), to deal
donatien 0:b802fc31f1db 7 in the Software without restriction, including without limitation the rights
donatien 0:b802fc31f1db 8 to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
donatien 0:b802fc31f1db 9 copies of the Software, and to permit persons to whom the Software is
donatien 0:b802fc31f1db 10 furnished to do so, subject to the following conditions:
donatien 0:b802fc31f1db 11
donatien 0:b802fc31f1db 12 The above copyright notice and this permission notice shall be included in
donatien 0:b802fc31f1db 13 all copies or substantial portions of the Software.
donatien 0:b802fc31f1db 14
donatien 0:b802fc31f1db 15 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
donatien 0:b802fc31f1db 16 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
donatien 0:b802fc31f1db 17 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
donatien 0:b802fc31f1db 18 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
donatien 0:b802fc31f1db 19 LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
donatien 0:b802fc31f1db 20 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
donatien 0:b802fc31f1db 21 THE SOFTWARE.
donatien 0:b802fc31f1db 22 */
donatien 0:b802fc31f1db 23
donatien 0:b802fc31f1db 24 #include "lwipNetUdpSocket.h"
donatien 0:b802fc31f1db 25 #include "lwip/udp.h"
donatien 0:b802fc31f1db 26
donatien 0:b802fc31f1db 27 //#define __DEBUG
donatien 0:b802fc31f1db 28 #include "dbg/dbg.h"
donatien 0:b802fc31f1db 29
donatien 0:b802fc31f1db 30 #include "netCfg.h"
donatien 0:b802fc31f1db 31 #if NET_LWIP_STACK
donatien 0:b802fc31f1db 32
donatien 0:b802fc31f1db 33 LwipNetUdpSocket::LwipNetUdpSocket(udp_pcb* pPcb /*= NULL*/) : NetUdpSocket(), m_pPcb(pPcb), m_lInPkt() //Passes a pcb if already created (by an accept req for instance), in that case transfers ownership
donatien 0:b802fc31f1db 34 {
donatien 0:b802fc31f1db 35 DBG("\r\nNew LwipNetUdpSocket %p (pPCb=%p)\r\n", (void*)this, (void*) pPcb);
donatien 0:b802fc31f1db 36 if(!m_pPcb)
donatien 0:b802fc31f1db 37 m_pPcb = udp_new();
donatien 0:b802fc31f1db 38 if(m_pPcb)
donatien 0:b802fc31f1db 39 {
donatien 0:b802fc31f1db 40 //Setup callback
donatien 0:b802fc31f1db 41 udp_recv( (udp_pcb*) m_pPcb, LwipNetUdpSocket::sRecvCb, (void*) this );
donatien 0:b802fc31f1db 42 }
donatien 0:b802fc31f1db 43 }
donatien 0:b802fc31f1db 44
donatien 0:b802fc31f1db 45 LwipNetUdpSocket::~LwipNetUdpSocket()
donatien 0:b802fc31f1db 46 {
donatien 0:b802fc31f1db 47 close();
donatien 0:b802fc31f1db 48 }
donatien 0:b802fc31f1db 49
donatien 0:b802fc31f1db 50 NetUdpSocketErr LwipNetUdpSocket::bind(const Host& me)
donatien 0:b802fc31f1db 51 {
donatien 0:b802fc31f1db 52 if(!m_pPcb)
donatien 0:b802fc31f1db 53 return NETUDPSOCKET_MEM; //NetUdpSocket was not properly initialised, should destroy it & retry
donatien 0:b802fc31f1db 54
donatien 0:b802fc31f1db 55 err_t err = udp_bind( (udp_pcb*) m_pPcb, IP_ADDR_ANY, me.getPort()); //IP_ADDR_ANY : Bind the connection to all local addresses
donatien 0:b802fc31f1db 56 if(err)
donatien 0:b802fc31f1db 57 return NETUDPSOCKET_INUSE;
donatien 0:b802fc31f1db 58
donatien 0:b802fc31f1db 59 //Setup callback
donatien 0:b802fc31f1db 60 udp_recv( (udp_pcb*) m_pPcb, LwipNetUdpSocket::sRecvCb, (void*) this );
donatien 0:b802fc31f1db 61
donatien 0:b802fc31f1db 62 return NETUDPSOCKET_OK;
donatien 0:b802fc31f1db 63 }
donatien 0:b802fc31f1db 64
donatien 0:b802fc31f1db 65 #define MAX(a,b) ((a>b)?a:b)
donatien 0:b802fc31f1db 66 #define MIN(a,b) ((a<b)?a:b)
donatien 0:b802fc31f1db 67
donatien 0:b802fc31f1db 68 int /*if < 0 : NetUdpSocketErr*/ LwipNetUdpSocket::sendto(const char* buf, int len, Host* pHost)
donatien 0:b802fc31f1db 69 {
donatien 0:b802fc31f1db 70 if( !m_pPcb ) //Pcb doesn't exist (anymore)
donatien 0:b802fc31f1db 71 return NETUDPSOCKET_MEM;
donatien 0:b802fc31f1db 72 pbuf* p = pbuf_alloc(PBUF_TRANSPORT, len, PBUF_POOL);
donatien 0:b802fc31f1db 73 if( !p )
donatien 0:b802fc31f1db 74 return NETUDPSOCKET_MEM;
donatien 0:b802fc31f1db 75 char* pBuf = (char*) buf;
donatien 0:b802fc31f1db 76 pbuf* q = p;
donatien 0:b802fc31f1db 77 do
donatien 0:b802fc31f1db 78 {
donatien 0:b802fc31f1db 79 memcpy (q->payload, (void*)pBuf, q->len);
donatien 0:b802fc31f1db 80 pBuf += q->len;
donatien 0:b802fc31f1db 81 q = q->next;
donatien 0:b802fc31f1db 82 } while(q != NULL);
donatien 0:b802fc31f1db 83
donatien 0:b802fc31f1db 84 err_t err = udp_sendto( (udp_pcb*) m_pPcb, p, &(pHost->getIp().getStruct()), pHost->getPort() );
donatien 0:b802fc31f1db 85 pbuf_free( p );
donatien 0:b802fc31f1db 86 if(err)
donatien 0:b802fc31f1db 87 return NETUDPSOCKET_SETUP; //Connection problem
donatien 0:b802fc31f1db 88 DBG("\r\n%d bytes sent in UDP Socket.\r\n", len);
donatien 0:b802fc31f1db 89 return len;
donatien 0:b802fc31f1db 90 }
donatien 0:b802fc31f1db 91
donatien 0:b802fc31f1db 92 int /*if < 0 : NetUdpSocketErr*/ LwipNetUdpSocket::recvfrom(char* buf, int len, Host* pHost)
donatien 0:b802fc31f1db 93 {
donatien 0:b802fc31f1db 94 if( !m_pPcb ) //Pcb doesn't exist (anymore)
donatien 0:b802fc31f1db 95 return NETUDPSOCKET_MEM;
donatien 0:b802fc31f1db 96 int inLen = 0;
donatien 0:b802fc31f1db 97 int cpyLen = 0;
donatien 0:b802fc31f1db 98
donatien 0:b802fc31f1db 99 static int rmgLen = 0;
donatien 0:b802fc31f1db 100 //Contains the remaining len in this pbuf
donatien 0:b802fc31f1db 101
donatien 0:b802fc31f1db 102 if( m_lInPkt.empty() )
donatien 0:b802fc31f1db 103 return 0;
donatien 0:b802fc31f1db 104
donatien 0:b802fc31f1db 105 pbuf* pBuf = (pbuf*) m_lInPkt.front().pBuf;
donatien 0:b802fc31f1db 106
donatien 0:b802fc31f1db 107 if(pHost)
donatien 0:b802fc31f1db 108 *pHost = Host( IpAddr(&m_lInPkt.front().addr), m_lInPkt.front().port );
donatien 0:b802fc31f1db 109
donatien 0:b802fc31f1db 110 if( !pBuf )
donatien 0:b802fc31f1db 111 {
donatien 0:b802fc31f1db 112 rmgLen = 0;
donatien 0:b802fc31f1db 113 return 0;
donatien 0:b802fc31f1db 114 }
donatien 0:b802fc31f1db 115
donatien 0:b802fc31f1db 116 if ( !rmgLen ) //We did not know m_pReadPbuf->len last time we called this fn
donatien 0:b802fc31f1db 117 {
donatien 0:b802fc31f1db 118 rmgLen = pBuf->len;
donatien 0:b802fc31f1db 119 }
donatien 0:b802fc31f1db 120
donatien 0:b802fc31f1db 121 while ( inLen < len )
donatien 0:b802fc31f1db 122 {
donatien 0:b802fc31f1db 123 cpyLen = MIN( (len - inLen), rmgLen ); //Remaining len to copy, remaining len in THIS pbuf
donatien 0:b802fc31f1db 124 memcpy((void*)buf, (void*)((char*)(pBuf->payload) + (pBuf->len - rmgLen)), cpyLen);
donatien 0:b802fc31f1db 125 inLen += cpyLen;
donatien 0:b802fc31f1db 126 buf += cpyLen;
donatien 0:b802fc31f1db 127
donatien 0:b802fc31f1db 128 rmgLen = rmgLen - cpyLen; //Update rmgLen
donatien 0:b802fc31f1db 129
donatien 0:b802fc31f1db 130 if( rmgLen > 0 )
donatien 0:b802fc31f1db 131 {
donatien 0:b802fc31f1db 132 //We did not read this pbuf completely, so let's save it's pos & return
donatien 0:b802fc31f1db 133 break;
donatien 0:b802fc31f1db 134 }
donatien 0:b802fc31f1db 135
donatien 0:b802fc31f1db 136 if(pBuf->next)
donatien 0:b802fc31f1db 137 {
donatien 0:b802fc31f1db 138 pbuf* pNextPBuf = pBuf->next;
donatien 0:b802fc31f1db 139 pBuf->next = NULL; //So that it is not freed as well
donatien 0:b802fc31f1db 140 //We get the reference to pNextPBuf from m_pReadPbuf
donatien 0:b802fc31f1db 141 pbuf_free((pbuf*)pBuf);
donatien 0:b802fc31f1db 142 pBuf = pNextPBuf;
donatien 0:b802fc31f1db 143 rmgLen = pBuf->len;
donatien 0:b802fc31f1db 144 }
donatien 0:b802fc31f1db 145 else
donatien 0:b802fc31f1db 146 {
donatien 0:b802fc31f1db 147 pbuf_free((pbuf*)pBuf);
donatien 0:b802fc31f1db 148 pBuf = NULL;
donatien 0:b802fc31f1db 149 rmgLen = 0;
donatien 0:b802fc31f1db 150 m_lInPkt.pop_front();
donatien 0:b802fc31f1db 151 break; //No more data to read
donatien 0:b802fc31f1db 152 }
donatien 0:b802fc31f1db 153 }
donatien 0:b802fc31f1db 154
donatien 0:b802fc31f1db 155 return inLen;
donatien 0:b802fc31f1db 156 }
donatien 0:b802fc31f1db 157
donatien 0:b802fc31f1db 158 NetUdpSocketErr LwipNetUdpSocket::close()
donatien 0:b802fc31f1db 159 {
donatien 0:b802fc31f1db 160 DBG("\r\nLwipNetUdpSocket::close() : Closing...\r\n");
donatien 0:b802fc31f1db 161
donatien 0:b802fc31f1db 162 if(m_closed)
donatien 0:b802fc31f1db 163 return NETUDPSOCKET_OK; //Already being closed
donatien 0:b802fc31f1db 164 m_closed = true;
donatien 0:b802fc31f1db 165
donatien 0:b802fc31f1db 166 if( !m_pPcb ) //Pcb doesn't exist (anymore)
donatien 0:b802fc31f1db 167 return NETUDPSOCKET_MEM;
donatien 0:b802fc31f1db 168
donatien 0:b802fc31f1db 169 DBG("\r\nLwipNetUdpSocket::close() : Cleanup...\r\n");
donatien 0:b802fc31f1db 170
donatien 0:b802fc31f1db 171 //Cleanup incoming data
donatien 0:b802fc31f1db 172 cleanUp();
donatien 0:b802fc31f1db 173
donatien 0:b802fc31f1db 174 DBG("\r\nLwipNetUdpSocket::close() : removing m_pPcb...\r\n");
donatien 0:b802fc31f1db 175 udp_remove( (udp_pcb*) m_pPcb);
donatien 0:b802fc31f1db 176
donatien 0:b802fc31f1db 177 m_pPcb = NULL;
donatien 0:b802fc31f1db 178 return NETUDPSOCKET_OK;
donatien 0:b802fc31f1db 179 }
donatien 0:b802fc31f1db 180
donatien 0:b802fc31f1db 181 NetUdpSocketErr LwipNetUdpSocket::poll()
donatien 0:b802fc31f1db 182 {
donatien 0:b802fc31f1db 183 NetUdpSocket::flushEvents();
donatien 0:b802fc31f1db 184 return NETUDPSOCKET_OK;
donatien 0:b802fc31f1db 185 }
donatien 0:b802fc31f1db 186
donatien 0:b802fc31f1db 187 // Callbacks events
donatien 0:b802fc31f1db 188
donatien 0:b802fc31f1db 189 void LwipNetUdpSocket::recvCb(udp_pcb* pcb, struct pbuf* p, ip_addr_t* addr, u16_t port)
donatien 0:b802fc31f1db 190 {
donatien 0:b802fc31f1db 191 DBG("\r\n Packet of length %d arrived in UDP Socket.\r\n", p->tot_len);
donatien 0:b802fc31f1db 192 list<InPacket>::iterator it;
donatien 0:b802fc31f1db 193 for ( it = m_lInPkt.begin(); it != m_lInPkt.end(); it++ )
donatien 0:b802fc31f1db 194 {
donatien 0:b802fc31f1db 195 if( ip_addr_cmp((&((*it).addr)), addr) && ((*it).port == port) )
donatien 0:b802fc31f1db 196 {
donatien 0:b802fc31f1db 197 //Let's tail this packet to the previous one
donatien 0:b802fc31f1db 198 pbuf_cat((pbuf*)((*it).pBuf), p);
donatien 0:b802fc31f1db 199 //No need to queue an event in that case since the read buf has not been processed yet
donatien 0:b802fc31f1db 200 return;
donatien 0:b802fc31f1db 201 }
donatien 0:b802fc31f1db 202 }
donatien 0:b802fc31f1db 203
donatien 0:b802fc31f1db 204 //New host, add a packet to the queue
donatien 0:b802fc31f1db 205 InPacket pkt;
donatien 0:b802fc31f1db 206 pkt.pBuf = p;
donatien 0:b802fc31f1db 207 pkt.addr = *addr;
donatien 0:b802fc31f1db 208 pkt.port = port;
donatien 0:b802fc31f1db 209 m_lInPkt.push_back(pkt);
donatien 0:b802fc31f1db 210
donatien 0:b802fc31f1db 211 queueEvent(NETUDPSOCKET_READABLE);
donatien 0:b802fc31f1db 212 }
donatien 0:b802fc31f1db 213
donatien 0:b802fc31f1db 214 void LwipNetUdpSocket::cleanUp() //Flush input buffer
donatien 0:b802fc31f1db 215 {
donatien 0:b802fc31f1db 216 //Ensure that further error won't be followed to this inst (which can be destroyed)
donatien 0:b802fc31f1db 217 if( m_pPcb )
donatien 0:b802fc31f1db 218 {
donatien 0:b802fc31f1db 219 udp_recv( (udp_pcb*) m_pPcb, NULL, (void*) NULL );
donatien 0:b802fc31f1db 220 }
donatien 0:b802fc31f1db 221
donatien 0:b802fc31f1db 222 list<InPacket>::iterator it;
donatien 0:b802fc31f1db 223 for ( it = m_lInPkt.begin(); it != m_lInPkt.end(); it++ )
donatien 0:b802fc31f1db 224 {
donatien 0:b802fc31f1db 225 //Free buf
donatien 0:b802fc31f1db 226 pbuf_free((pbuf*)((*it).pBuf));
donatien 0:b802fc31f1db 227 }
donatien 0:b802fc31f1db 228 m_lInPkt.clear();
donatien 0:b802fc31f1db 229 }
donatien 0:b802fc31f1db 230
donatien 0:b802fc31f1db 231 // Static callback from LwIp
donatien 0:b802fc31f1db 232
donatien 0:b802fc31f1db 233 void LwipNetUdpSocket::sRecvCb(void *arg, struct udp_pcb *pcb, struct pbuf *p, ip_addr_t *addr, u16_t port)
donatien 0:b802fc31f1db 234 {
donatien 0:b802fc31f1db 235 LwipNetUdpSocket* pMe = (LwipNetUdpSocket*) arg;
donatien 0:b802fc31f1db 236 return pMe->recvCb( pcb, p, addr, port );
donatien 0:b802fc31f1db 237 }
donatien 0:b802fc31f1db 238
donatien 0:b802fc31f1db 239 #endif