Library for Bert van Dam's book "ARM MICROCONTROLLERS" For all chapters with internet.

Dependencies:   mbed

Committer:
ICTFBI
Date:
Fri Oct 16 14:28:26 2015 +0000
Revision:
0:4edb816d21e1
Pre-update 16-10-15

Who changed what in which revision?

UserRevisionLine numberNew contents of line
ICTFBI 0:4edb816d21e1 1
ICTFBI 0:4edb816d21e1 2 /*
ICTFBI 0:4edb816d21e1 3 Copyright (c) 2010 Donatien Garnier (donatiengar [at] gmail [dot] com)
ICTFBI 0:4edb816d21e1 4
ICTFBI 0:4edb816d21e1 5 Permission is hereby granted, free of charge, to any person obtaining a copy
ICTFBI 0:4edb816d21e1 6 of this software and associated documentation files (the "Software"), to deal
ICTFBI 0:4edb816d21e1 7 in the Software without restriction, including without limitation the rights
ICTFBI 0:4edb816d21e1 8 to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
ICTFBI 0:4edb816d21e1 9 copies of the Software, and to permit persons to whom the Software is
ICTFBI 0:4edb816d21e1 10 furnished to do so, subject to the following conditions:
ICTFBI 0:4edb816d21e1 11
ICTFBI 0:4edb816d21e1 12 The above copyright notice and this permission notice shall be included in
ICTFBI 0:4edb816d21e1 13 all copies or substantial portions of the Software.
ICTFBI 0:4edb816d21e1 14
ICTFBI 0:4edb816d21e1 15 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
ICTFBI 0:4edb816d21e1 16 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
ICTFBI 0:4edb816d21e1 17 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
ICTFBI 0:4edb816d21e1 18 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
ICTFBI 0:4edb816d21e1 19 LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
ICTFBI 0:4edb816d21e1 20 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
ICTFBI 0:4edb816d21e1 21 THE SOFTWARE.
ICTFBI 0:4edb816d21e1 22 */
ICTFBI 0:4edb816d21e1 23
ICTFBI 0:4edb816d21e1 24 #include "net.h"
ICTFBI 0:4edb816d21e1 25
ICTFBI 0:4edb816d21e1 26 #include "host.h"
ICTFBI 0:4edb816d21e1 27 #include "ipaddr.h"
ICTFBI 0:4edb816d21e1 28 #include "netservice.h"
ICTFBI 0:4edb816d21e1 29 #include "if/net/netif.h"
ICTFBI 0:4edb816d21e1 30 #include "if/net/nettcpsocket.h"
ICTFBI 0:4edb816d21e1 31 #include "if/net/netudpsocket.h"
ICTFBI 0:4edb816d21e1 32 #include "if/net/netdnsrequest.h"
ICTFBI 0:4edb816d21e1 33
ICTFBI 0:4edb816d21e1 34 //#define __DEBUG
ICTFBI 0:4edb816d21e1 35 #include "dbg/dbg.h"
ICTFBI 0:4edb816d21e1 36
ICTFBI 0:4edb816d21e1 37 Net::Net() : m_defaultIf(NULL), m_lpIf(), m_lpNetTcpSocket(), m_lpNetUdpSocket()
ICTFBI 0:4edb816d21e1 38 {
ICTFBI 0:4edb816d21e1 39
ICTFBI 0:4edb816d21e1 40 }
ICTFBI 0:4edb816d21e1 41
ICTFBI 0:4edb816d21e1 42 Net::~Net()
ICTFBI 0:4edb816d21e1 43 {
ICTFBI 0:4edb816d21e1 44
ICTFBI 0:4edb816d21e1 45 }
ICTFBI 0:4edb816d21e1 46
ICTFBI 0:4edb816d21e1 47
ICTFBI 0:4edb816d21e1 48 void Net::poll()
ICTFBI 0:4edb816d21e1 49 {
ICTFBI 0:4edb816d21e1 50 //DBG("\r\nNet : Services polling\r\n");
ICTFBI 0:4edb816d21e1 51
ICTFBI 0:4edb816d21e1 52 //Poll Services
ICTFBI 0:4edb816d21e1 53 NetService::servicesPoll();
ICTFBI 0:4edb816d21e1 54
ICTFBI 0:4edb816d21e1 55 //DBG("\r\nNet : Interfaces polling\r\n");
ICTFBI 0:4edb816d21e1 56
ICTFBI 0:4edb816d21e1 57 //Poll Interfaces
ICTFBI 0:4edb816d21e1 58 list<NetIf*>::iterator pIfIt;
ICTFBI 0:4edb816d21e1 59
ICTFBI 0:4edb816d21e1 60 for ( pIfIt = net().m_lpIf.begin() ; pIfIt != net().m_lpIf.end(); pIfIt++ )
ICTFBI 0:4edb816d21e1 61 {
ICTFBI 0:4edb816d21e1 62 (*pIfIt)->poll();
ICTFBI 0:4edb816d21e1 63 }
ICTFBI 0:4edb816d21e1 64
ICTFBI 0:4edb816d21e1 65 //DBG("\r\nNet : Sockets polling\r\n");
ICTFBI 0:4edb816d21e1 66
ICTFBI 0:4edb816d21e1 67 //Poll Tcp Sockets
ICTFBI 0:4edb816d21e1 68 list<NetTcpSocket*>::iterator pNetTcpSocketIt;
ICTFBI 0:4edb816d21e1 69
ICTFBI 0:4edb816d21e1 70 for ( pNetTcpSocketIt = net().m_lpNetTcpSocket.begin() ; pNetTcpSocketIt != net().m_lpNetTcpSocket.end(); )
ICTFBI 0:4edb816d21e1 71 {
ICTFBI 0:4edb816d21e1 72 (*pNetTcpSocketIt)->poll();
ICTFBI 0:4edb816d21e1 73
ICTFBI 0:4edb816d21e1 74 if( (*pNetTcpSocketIt)->m_closed && !((*pNetTcpSocketIt)->m_refs) )
ICTFBI 0:4edb816d21e1 75 {
ICTFBI 0:4edb816d21e1 76 (*pNetTcpSocketIt)->m_removed = true;
ICTFBI 0:4edb816d21e1 77 delete (*pNetTcpSocketIt);
ICTFBI 0:4edb816d21e1 78 (*pNetTcpSocketIt) = NULL;
ICTFBI 0:4edb816d21e1 79 pNetTcpSocketIt = net().m_lpNetTcpSocket.erase(pNetTcpSocketIt);
ICTFBI 0:4edb816d21e1 80 }
ICTFBI 0:4edb816d21e1 81 else
ICTFBI 0:4edb816d21e1 82 {
ICTFBI 0:4edb816d21e1 83 pNetTcpSocketIt++;
ICTFBI 0:4edb816d21e1 84 }
ICTFBI 0:4edb816d21e1 85 }
ICTFBI 0:4edb816d21e1 86
ICTFBI 0:4edb816d21e1 87 //Poll Udp Sockets
ICTFBI 0:4edb816d21e1 88 list<NetUdpSocket*>::iterator pNetUdpSocketIt;
ICTFBI 0:4edb816d21e1 89
ICTFBI 0:4edb816d21e1 90 for ( pNetUdpSocketIt = net().m_lpNetUdpSocket.begin() ; pNetUdpSocketIt != net().m_lpNetUdpSocket.end(); )
ICTFBI 0:4edb816d21e1 91 {
ICTFBI 0:4edb816d21e1 92 (*pNetUdpSocketIt)->poll();
ICTFBI 0:4edb816d21e1 93
ICTFBI 0:4edb816d21e1 94 if( (*pNetUdpSocketIt)->m_closed && !((*pNetUdpSocketIt)->m_refs) )
ICTFBI 0:4edb816d21e1 95 {
ICTFBI 0:4edb816d21e1 96 (*pNetUdpSocketIt)->m_removed = true;
ICTFBI 0:4edb816d21e1 97 delete (*pNetUdpSocketIt);
ICTFBI 0:4edb816d21e1 98 (*pNetUdpSocketIt) = NULL;
ICTFBI 0:4edb816d21e1 99 pNetUdpSocketIt = net().m_lpNetUdpSocket.erase(pNetUdpSocketIt);
ICTFBI 0:4edb816d21e1 100 }
ICTFBI 0:4edb816d21e1 101 else
ICTFBI 0:4edb816d21e1 102 {
ICTFBI 0:4edb816d21e1 103 pNetUdpSocketIt++;
ICTFBI 0:4edb816d21e1 104 }
ICTFBI 0:4edb816d21e1 105 }
ICTFBI 0:4edb816d21e1 106
ICTFBI 0:4edb816d21e1 107
ICTFBI 0:4edb816d21e1 108 }
ICTFBI 0:4edb816d21e1 109
ICTFBI 0:4edb816d21e1 110 NetTcpSocket* Net::tcpSocket(NetIf& netif) {
ICTFBI 0:4edb816d21e1 111 NetTcpSocket* pNetTcpSocket = netif.tcpSocket();
ICTFBI 0:4edb816d21e1 112 pNetTcpSocket->m_refs++;
ICTFBI 0:4edb816d21e1 113 return pNetTcpSocket;
ICTFBI 0:4edb816d21e1 114 }
ICTFBI 0:4edb816d21e1 115
ICTFBI 0:4edb816d21e1 116 NetTcpSocket* Net::tcpSocket() { //NetTcpSocket on default if
ICTFBI 0:4edb816d21e1 117 if ( net().m_defaultIf == NULL )
ICTFBI 0:4edb816d21e1 118 return NULL;
ICTFBI 0:4edb816d21e1 119 NetTcpSocket* pNetTcpSocket = net().m_defaultIf->tcpSocket();
ICTFBI 0:4edb816d21e1 120 pNetTcpSocket->m_refs++;
ICTFBI 0:4edb816d21e1 121 return pNetTcpSocket;
ICTFBI 0:4edb816d21e1 122 }
ICTFBI 0:4edb816d21e1 123
ICTFBI 0:4edb816d21e1 124 void Net::releaseTcpSocket(NetTcpSocket* pNetTcpSocket)
ICTFBI 0:4edb816d21e1 125 {
ICTFBI 0:4edb816d21e1 126 pNetTcpSocket->m_refs--;
ICTFBI 0:4edb816d21e1 127 if(!pNetTcpSocket->m_closed && !pNetTcpSocket->m_refs)
ICTFBI 0:4edb816d21e1 128 pNetTcpSocket->close();
ICTFBI 0:4edb816d21e1 129 }
ICTFBI 0:4edb816d21e1 130
ICTFBI 0:4edb816d21e1 131 NetUdpSocket* Net::udpSocket(NetIf& netif) {
ICTFBI 0:4edb816d21e1 132 NetUdpSocket* pNetUdpSocket = netif.udpSocket();
ICTFBI 0:4edb816d21e1 133 pNetUdpSocket->m_refs++;
ICTFBI 0:4edb816d21e1 134 return pNetUdpSocket;
ICTFBI 0:4edb816d21e1 135 }
ICTFBI 0:4edb816d21e1 136
ICTFBI 0:4edb816d21e1 137 NetUdpSocket* Net::udpSocket() { //NetTcpSocket on default if
ICTFBI 0:4edb816d21e1 138 if ( net().m_defaultIf == NULL )
ICTFBI 0:4edb816d21e1 139 return NULL;
ICTFBI 0:4edb816d21e1 140 NetUdpSocket* pNetUdpSocket = net().m_defaultIf->udpSocket();
ICTFBI 0:4edb816d21e1 141 pNetUdpSocket->m_refs++;
ICTFBI 0:4edb816d21e1 142 return pNetUdpSocket;
ICTFBI 0:4edb816d21e1 143 }
ICTFBI 0:4edb816d21e1 144
ICTFBI 0:4edb816d21e1 145 void Net::releaseUdpSocket(NetUdpSocket* pNetUdpSocket)
ICTFBI 0:4edb816d21e1 146 {
ICTFBI 0:4edb816d21e1 147 pNetUdpSocket->m_refs--;
ICTFBI 0:4edb816d21e1 148 if(!pNetUdpSocket->m_closed && !pNetUdpSocket->m_refs)
ICTFBI 0:4edb816d21e1 149 pNetUdpSocket->close();
ICTFBI 0:4edb816d21e1 150 }
ICTFBI 0:4edb816d21e1 151
ICTFBI 0:4edb816d21e1 152 NetDnsRequest* Net::dnsRequest(const char* hostname, NetIf& netif) {
ICTFBI 0:4edb816d21e1 153 return netif.dnsRequest(hostname);
ICTFBI 0:4edb816d21e1 154 }
ICTFBI 0:4edb816d21e1 155
ICTFBI 0:4edb816d21e1 156 NetDnsRequest* Net::dnsRequest(const char* hostname) { //Create a new NetDnsRequest object from default if
ICTFBI 0:4edb816d21e1 157 if ( net().m_defaultIf == NULL )
ICTFBI 0:4edb816d21e1 158 return NULL;
ICTFBI 0:4edb816d21e1 159 return net().m_defaultIf->dnsRequest(hostname);
ICTFBI 0:4edb816d21e1 160 }
ICTFBI 0:4edb816d21e1 161
ICTFBI 0:4edb816d21e1 162 NetDnsRequest* Net::dnsRequest(Host* pHost, NetIf& netif)
ICTFBI 0:4edb816d21e1 163 {
ICTFBI 0:4edb816d21e1 164 return netif.dnsRequest(pHost);
ICTFBI 0:4edb816d21e1 165 }
ICTFBI 0:4edb816d21e1 166
ICTFBI 0:4edb816d21e1 167 NetDnsRequest* Net::dnsRequest(Host* pHost) //Creats a new NetDnsRequest object from default if
ICTFBI 0:4edb816d21e1 168 {
ICTFBI 0:4edb816d21e1 169 if ( net().m_defaultIf == NULL )
ICTFBI 0:4edb816d21e1 170 return NULL;
ICTFBI 0:4edb816d21e1 171 return net().m_defaultIf->dnsRequest(pHost);
ICTFBI 0:4edb816d21e1 172 }
ICTFBI 0:4edb816d21e1 173
ICTFBI 0:4edb816d21e1 174 void Net::setDefaultIf(NetIf& netif) {
ICTFBI 0:4edb816d21e1 175 net().m_defaultIf = &netif;
ICTFBI 0:4edb816d21e1 176 }
ICTFBI 0:4edb816d21e1 177
ICTFBI 0:4edb816d21e1 178 void Net::setDefaultIf(NetIf* pIf)
ICTFBI 0:4edb816d21e1 179 {
ICTFBI 0:4edb816d21e1 180 net().m_defaultIf = pIf;
ICTFBI 0:4edb816d21e1 181 }
ICTFBI 0:4edb816d21e1 182
ICTFBI 0:4edb816d21e1 183 NetIf* Net::getDefaultIf() {
ICTFBI 0:4edb816d21e1 184 return net().m_defaultIf;
ICTFBI 0:4edb816d21e1 185 }
ICTFBI 0:4edb816d21e1 186
ICTFBI 0:4edb816d21e1 187 void Net::registerIf(NetIf* pIf)
ICTFBI 0:4edb816d21e1 188 {
ICTFBI 0:4edb816d21e1 189 net().m_lpIf.push_back(pIf);
ICTFBI 0:4edb816d21e1 190 }
ICTFBI 0:4edb816d21e1 191
ICTFBI 0:4edb816d21e1 192 void Net::unregisterIf(NetIf* pIf)
ICTFBI 0:4edb816d21e1 193 {
ICTFBI 0:4edb816d21e1 194 if( net().m_defaultIf == pIf )
ICTFBI 0:4edb816d21e1 195 net().m_defaultIf = NULL;
ICTFBI 0:4edb816d21e1 196 net().m_lpIf.remove(pIf);
ICTFBI 0:4edb816d21e1 197 }
ICTFBI 0:4edb816d21e1 198
ICTFBI 0:4edb816d21e1 199 void Net::registerNetTcpSocket(NetTcpSocket* pNetTcpSocket)
ICTFBI 0:4edb816d21e1 200 {
ICTFBI 0:4edb816d21e1 201 net().m_lpNetTcpSocket.push_back(pNetTcpSocket);
ICTFBI 0:4edb816d21e1 202 DBG("\r\nNetTcpSocket [ + %p ] %d\r\n", (void*)pNetTcpSocket, net().m_lpNetTcpSocket.size());
ICTFBI 0:4edb816d21e1 203 }
ICTFBI 0:4edb816d21e1 204
ICTFBI 0:4edb816d21e1 205 void Net::unregisterNetTcpSocket(NetTcpSocket* pNetTcpSocket)
ICTFBI 0:4edb816d21e1 206 {
ICTFBI 0:4edb816d21e1 207 DBG("\r\nNetTcpSocket [ - %p ] %d\r\n", (void*)pNetTcpSocket, net().m_lpNetTcpSocket.size() - 1);
ICTFBI 0:4edb816d21e1 208 if(!pNetTcpSocket->m_removed)
ICTFBI 0:4edb816d21e1 209 net().m_lpNetTcpSocket.remove(pNetTcpSocket);
ICTFBI 0:4edb816d21e1 210 }
ICTFBI 0:4edb816d21e1 211
ICTFBI 0:4edb816d21e1 212 void Net::registerNetUdpSocket(NetUdpSocket* pNetUdpSocket)
ICTFBI 0:4edb816d21e1 213 {
ICTFBI 0:4edb816d21e1 214 net().m_lpNetUdpSocket.push_back(pNetUdpSocket);
ICTFBI 0:4edb816d21e1 215 DBG("\r\nNetUdpSocket [ + %p ] %d\r\n", (void*)pNetUdpSocket, net().m_lpNetUdpSocket.size());
ICTFBI 0:4edb816d21e1 216 }
ICTFBI 0:4edb816d21e1 217
ICTFBI 0:4edb816d21e1 218 void Net::unregisterNetUdpSocket(NetUdpSocket* pNetUdpSocket)
ICTFBI 0:4edb816d21e1 219 {
ICTFBI 0:4edb816d21e1 220 DBG("\r\nNetUdpSocket [ - %p ] %d\r\n", (void*)pNetUdpSocket, net().m_lpNetUdpSocket.size() - 1);
ICTFBI 0:4edb816d21e1 221 if(!pNetUdpSocket->m_removed)
ICTFBI 0:4edb816d21e1 222 net().m_lpNetUdpSocket.remove(pNetUdpSocket);
ICTFBI 0:4edb816d21e1 223 }
ICTFBI 0:4edb816d21e1 224
ICTFBI 0:4edb816d21e1 225 Net& Net::net()
ICTFBI 0:4edb816d21e1 226 {
ICTFBI 0:4edb816d21e1 227 static Net* pInst = new Net(); //Called only once
ICTFBI 0:4edb816d21e1 228 return *pInst;
ICTFBI 0:4edb816d21e1 229 }