Yann Garcia / Mbed 2 deprecated DS130x_I2CApp

This short program illustrates how to use the DS130x_I2C library. My objective is to share the same RTC with Microchip 18F MCU.

Dependencies:   mbed DebugLibrary

NetServices/if/lwip/lwipNetDnsRequest.cpp@1:995212d326ca, 2011-02-11 (annotated)

Committer:
Yann
Date:
Fri Feb 11 10:17:20 2011 +0000
Revision:
1:995212d326ca
Parent:
0:f30e2135b0db 
V0.0.0.2

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Yann 0:f30e2135b0db 1
Yann 0:f30e2135b0db 2 /*
Yann 0:f30e2135b0db 3 Copyright (c) 2010 Donatien Garnier (donatiengar [at] gmail [dot] com)
Yann 0:f30e2135b0db 4
Yann 0:f30e2135b0db 5 Permission is hereby granted, free of charge, to any person obtaining a copy
Yann 0:f30e2135b0db 6 of this software and associated documentation files (the "Software"), to deal
Yann 0:f30e2135b0db 7 in the Software without restriction, including without limitation the rights
Yann 0:f30e2135b0db 8 to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
Yann 0:f30e2135b0db 9 copies of the Software, and to permit persons to whom the Software is
Yann 0:f30e2135b0db 10 furnished to do so, subject to the following conditions:
Yann 0:f30e2135b0db 11
Yann 0:f30e2135b0db 12 The above copyright notice and this permission notice shall be included in
Yann 0:f30e2135b0db 13 all copies or substantial portions of the Software.
Yann 0:f30e2135b0db 14
Yann 0:f30e2135b0db 15 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
Yann 0:f30e2135b0db 16 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
Yann 0:f30e2135b0db 17 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
Yann 0:f30e2135b0db 18 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
Yann 0:f30e2135b0db 19 LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
Yann 0:f30e2135b0db 20 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
Yann 0:f30e2135b0db 21 THE SOFTWARE.
Yann 0:f30e2135b0db 22 */
Yann 0:f30e2135b0db 23
Yann 0:f30e2135b0db 24 #include "lwipNetDnsRequest.h"
Yann 0:f30e2135b0db 25 #include "lwip/err.h" //err_t, ERR_xxx
Yann 0:f30e2135b0db 26 #include "lwip/dns.h"
Yann 0:f30e2135b0db 27
Yann 0:f30e2135b0db 28 #include "netCfg.h"
Yann 0:f30e2135b0db 29 #if NET_LWIP_STACK
Yann 0:f30e2135b0db 30
Yann 0:f30e2135b0db 31 //#define __DEBUG
Yann 0:f30e2135b0db 32 #include "dbg/dbg.h"
Yann 0:f30e2135b0db 33
Yann 0:f30e2135b0db 34 LwipNetDnsRequest::LwipNetDnsRequest(const char* hostname) : NetDnsRequest(hostname), m_state(LWIPNETDNS_START), m_cbFired(false), m_closing(false)
Yann 0:f30e2135b0db 35 {
Yann 0:f30e2135b0db 36 DBG("New LwipNetDnsRequest %p\n", this);
Yann 0:f30e2135b0db 37 }
Yann 0:f30e2135b0db 38
Yann 0:f30e2135b0db 39 LwipNetDnsRequest::LwipNetDnsRequest(Host* pHost) : NetDnsRequest(pHost), m_state(LWIPNETDNS_START), m_cbFired(false), m_closing(false)
Yann 0:f30e2135b0db 40 {
Yann 0:f30e2135b0db 41 DBG("New LwipNetDnsRequest %p\n", this);
Yann 0:f30e2135b0db 42 }
Yann 0:f30e2135b0db 43
Yann 0:f30e2135b0db 44 LwipNetDnsRequest::~LwipNetDnsRequest()
Yann 0:f30e2135b0db 45 {
Yann 0:f30e2135b0db 46 DBG("LwipNetDnsRequest %p destroyed\n", this);
Yann 0:f30e2135b0db 47 }
Yann 0:f30e2135b0db 48
Yann 0:f30e2135b0db 49 /*
Yann 0:f30e2135b0db 50 Main useful function here (see lwip/dns.h):
Yann 0:f30e2135b0db 51 err_t dns_gethostbyname(const char *hostname, ip_addr_t *addr,
Yann 0:f30e2135b0db 52 dns_found_callback found, void *callback_arg);
Yann 0:f30e2135b0db 53 */
Yann 0:f30e2135b0db 54
Yann 0:f30e2135b0db 55 //Execute request & return OK if found, NOTFOUND or ERROR on error, or PROCESSING if the request has not completed yet
Yann 0:f30e2135b0db 56 void LwipNetDnsRequest::poll()
Yann 0:f30e2135b0db 57 {
Yann 0:f30e2135b0db 58 err_t err;
Yann 0:f30e2135b0db 59 switch(m_state)
Yann 0:f30e2135b0db 60 {
Yann 0:f30e2135b0db 61 case LWIPNETDNS_START: //First req, let's call dns_gethostbyname
Yann 0:f30e2135b0db 62 ip_addr_t ipStruct;
Yann 0:f30e2135b0db 63 err = dns_gethostbyname(m_hostname, &ipStruct, LwipNetDnsRequest::sFoundCb, (void*) this );
Yann 0:f30e2135b0db 64 if( err == ERR_OK )
Yann 0:f30e2135b0db 65 {
Yann 0:f30e2135b0db 66 m_ip = IpAddr(&ipStruct);
Yann 0:f30e2135b0db 67 m_state = LWIPNETDNS_OK;
Yann 0:f30e2135b0db 68 DBG("DNS: Ip found in cache.\n");
Yann 0:f30e2135b0db 69 }
Yann 0:f30e2135b0db 70 else if( err == ERR_INPROGRESS)
Yann 0:f30e2135b0db 71 {
Yann 0:f30e2135b0db 72 DBG("DNS: Processing.\n");
Yann 0:f30e2135b0db 73 m_state = LWIPNETDNS_PROCESSING;
Yann 0:f30e2135b0db 74 }
Yann 0:f30e2135b0db 75 else //Likely ERR_VAL
Yann 0:f30e2135b0db 76 {
Yann 0:f30e2135b0db 77 DBG("DNS: Error on init.\n");
Yann 0:f30e2135b0db 78 m_state = LWIPNETDNS_ERROR;
Yann 0:f30e2135b0db 79 }
Yann 0:f30e2135b0db 80 break;
Yann 0:f30e2135b0db 81 case LWIPNETDNS_PROCESSING:
Yann 0:f30e2135b0db 82 break; //Nothing to do, DNS is polled on interrupt
Yann 0:f30e2135b0db 83 case LWIPNETDNS_OK:
Yann 0:f30e2135b0db 84 if(!m_cbFired)
Yann 0:f30e2135b0db 85 {
Yann 0:f30e2135b0db 86 DBG("DNS: Ip found.\n");
Yann 0:f30e2135b0db 87 m_cbFired = true;
Yann 0:f30e2135b0db 88 onReply(NETDNS_FOUND); //Raise callback
Yann 0:f30e2135b0db 89 }
Yann 0:f30e2135b0db 90 break;
Yann 0:f30e2135b0db 91 case LWIPNETDNS_NOTFOUND:
Yann 0:f30e2135b0db 92 if(!m_cbFired)
Yann 0:f30e2135b0db 93 {
Yann 0:f30e2135b0db 94 DBG("DNS: could not be resolved.\n");
Yann 0:f30e2135b0db 95 m_cbFired = true;
Yann 0:f30e2135b0db 96 onReply(NETDNS_NOTFOUND); //Raise callback
Yann 0:f30e2135b0db 97 }
Yann 0:f30e2135b0db 98 break;
Yann 0:f30e2135b0db 99 case LWIPNETDNS_ERROR:
Yann 0:f30e2135b0db 100 default:
Yann 0:f30e2135b0db 101 if(!m_cbFired)
Yann 0:f30e2135b0db 102 {
Yann 0:f30e2135b0db 103 DBG("DNS: Error.\n");
Yann 0:f30e2135b0db 104 m_cbFired = true;
Yann 0:f30e2135b0db 105 onReply(NETDNS_ERROR); //Raise callback
Yann 0:f30e2135b0db 106 }
Yann 0:f30e2135b0db 107 break;
Yann 0:f30e2135b0db 108 }
Yann 0:f30e2135b0db 109 if(m_closing && (m_state!=LWIPNETDNS_PROCESSING)) //Check wether the closure has been reqd
Yann 0:f30e2135b0db 110 {
Yann 0:f30e2135b0db 111 DBG("LwipNetDnsRequest: Closing in poll()\n");
Yann 0:f30e2135b0db 112 NetDnsRequest::close();
Yann 0:f30e2135b0db 113 }
Yann 0:f30e2135b0db 114 }
Yann 0:f30e2135b0db 115
Yann 0:f30e2135b0db 116 void LwipNetDnsRequest::close()
Yann 0:f30e2135b0db 117 {
Yann 0:f30e2135b0db 118 DBG("LwipNetDnsRequest: Close req\n");
Yann 0:f30e2135b0db 119 if(m_state!=LWIPNETDNS_PROCESSING)
Yann 0:f30e2135b0db 120 {
Yann 0:f30e2135b0db 121 DBG("LwipNetDnsRequest: Closing in close()\n");
Yann 0:f30e2135b0db 122 NetDnsRequest::close();
Yann 0:f30e2135b0db 123 }
Yann 0:f30e2135b0db 124 else //Cannot close rightaway, waiting for callback from underlying layer
Yann 0:f30e2135b0db 125 {
Yann 0:f30e2135b0db 126 m_closing = true;
Yann 0:f30e2135b0db 127 }
Yann 0:f30e2135b0db 128 }
Yann 0:f30e2135b0db 129
Yann 0:f30e2135b0db 130 void LwipNetDnsRequest::foundCb(const char *name, ip_addr_t *ipaddr)
Yann 0:f30e2135b0db 131 {
Yann 0:f30e2135b0db 132 if( ipaddr == NULL )
Yann 0:f30e2135b0db 133 {
Yann 0:f30e2135b0db 134 DBG("LwipNetDnsRequest: Callback: Name not found\n");
Yann 0:f30e2135b0db 135 m_state = LWIPNETDNS_NOTFOUND;
Yann 0:f30e2135b0db 136 return;
Yann 0:f30e2135b0db 137 }
Yann 0:f30e2135b0db 138 DBG("LwipNetDnsRequest: Callback: Resolved\n");
Yann 0:f30e2135b0db 139 m_ip = IpAddr(ipaddr);
Yann 0:f30e2135b0db 140 m_state = LWIPNETDNS_OK;
Yann 0:f30e2135b0db 141 }
Yann 0:f30e2135b0db 142
Yann 0:f30e2135b0db 143
Yann 0:f30e2135b0db 144 void LwipNetDnsRequest::sFoundCb(const char *name, ip_addr_t *ipaddr, void *arg)
Yann 0:f30e2135b0db 145 {
Yann 0:f30e2135b0db 146 DBG("LwipNetDnsRequest: Static callback\n");
Yann 0:f30e2135b0db 147 LwipNetDnsRequest* pMe = (LwipNetDnsRequest*) arg;
Yann 0:f30e2135b0db 148 return pMe->foundCb( name, ipaddr );
Yann 0:f30e2135b0db 149 }
Yann 0:f30e2135b0db 150
Yann 0:f30e2135b0db 151 #endif
Yann 0:f30e2135b0db 152