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/services/ntp/NTPClient.cpp@0:f30e2135b0db, 2011-02-09 (annotated)
- Committer:
- Yann
- Date:
- Wed Feb 09 13:57:49 2011 +0000
- Revision:
- 0:f30e2135b0db
V0.0.0.1
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
Yann | 0:f30e2135b0db | 1 | #pragma diag_remark 1293 |
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 "NTPClient.h" |
Yann | 0:f30e2135b0db | 25 | |
Yann | 0:f30e2135b0db | 26 | #include <stdio.h> |
Yann | 0:f30e2135b0db | 27 | |
Yann | 0:f30e2135b0db | 28 | //#define __DEBUG |
Yann | 0:f30e2135b0db | 29 | #include "dbg/dbg.h" |
Yann | 0:f30e2135b0db | 30 | |
Yann | 0:f30e2135b0db | 31 | #define NTP_PORT 123 |
Yann | 0:f30e2135b0db | 32 | #define NTP_CLIENT_PORT 0//50420 //Random port |
Yann | 0:f30e2135b0db | 33 | #define NTP_REQUEST_TIMEOUT 15000 |
Yann | 0:f30e2135b0db | 34 | #define NTP_TIMESTAMP_DELTA 2208988800ull //Diff btw a UNIX timestamp (Starting Jan, 1st 1970) and a NTP timestamp (Starting Jan, 1st 1900) |
Yann | 0:f30e2135b0db | 35 | |
Yann | 0:f30e2135b0db | 36 | #define htons( x ) ( (( x << 8 ) & 0xFF00) | (( x >> 8 ) & 0x00FF) ) |
Yann | 0:f30e2135b0db | 37 | #define ntohs( x ) (htons(x)) |
Yann | 0:f30e2135b0db | 38 | |
Yann | 0:f30e2135b0db | 39 | #define htonl( x ) ( (( x << 24 ) & 0xFF000000) \ |
Yann | 0:f30e2135b0db | 40 | | (( x << 8 ) & 0x00FF0000) \ |
Yann | 0:f30e2135b0db | 41 | | (( x >> 8 ) & 0x0000FF00) \ |
Yann | 0:f30e2135b0db | 42 | | (( x >> 24 ) & 0x000000FF) ) |
Yann | 0:f30e2135b0db | 43 | #define ntohl( x ) (htonl(x)) |
Yann | 0:f30e2135b0db | 44 | |
Yann | 0:f30e2135b0db | 45 | NTPClient::NTPClient() : NetService(false), m_state(NTP_PING), m_pCbItem(NULL), m_pCbMeth(NULL), m_pCb(NULL), |
Yann | 0:f30e2135b0db | 46 | m_watchdog(), m_timeout(0), m_closed(true), m_host(), m_pDnsReq(NULL), m_blockingResult(NTP_PROCESSING) |
Yann | 0:f30e2135b0db | 47 | { |
Yann | 0:f30e2135b0db | 48 | setTimeout(NTP_REQUEST_TIMEOUT); |
Yann | 0:f30e2135b0db | 49 | DBG("\r\nNew NTPClient %p\r\n",this); |
Yann | 0:f30e2135b0db | 50 | } |
Yann | 0:f30e2135b0db | 51 | |
Yann | 0:f30e2135b0db | 52 | NTPClient::~NTPClient() |
Yann | 0:f30e2135b0db | 53 | { |
Yann | 0:f30e2135b0db | 54 | close(); |
Yann | 0:f30e2135b0db | 55 | } |
Yann | 0:f30e2135b0db | 56 | |
Yann | 0:f30e2135b0db | 57 | //High level setup functions |
Yann | 0:f30e2135b0db | 58 | NTPResult NTPClient::setTime(const Host& host) //Blocking |
Yann | 0:f30e2135b0db | 59 | { |
Yann | 0:f30e2135b0db | 60 | doSetTime(host); |
Yann | 0:f30e2135b0db | 61 | return blockingProcess(); |
Yann | 0:f30e2135b0db | 62 | } |
Yann | 0:f30e2135b0db | 63 | |
Yann | 0:f30e2135b0db | 64 | NTPResult NTPClient::setTime(const Host& host, void (*pMethod)(NTPResult)) //Non blocking |
Yann | 0:f30e2135b0db | 65 | { |
Yann | 0:f30e2135b0db | 66 | setOnResult(pMethod); |
Yann | 0:f30e2135b0db | 67 | doSetTime(host); |
Yann | 0:f30e2135b0db | 68 | return NTP_PROCESSING; |
Yann | 0:f30e2135b0db | 69 | } |
Yann | 0:f30e2135b0db | 70 | |
Yann | 0:f30e2135b0db | 71 | #if 0 //For doc only |
Yann | 0:f30e2135b0db | 72 | template<class T> |
Yann | 0:f30e2135b0db | 73 | NTPResult NTPClient::setTime(const Host& host, T* pItem, void (T::*pMethod)(NTPResult)) //Non blocking |
Yann | 0:f30e2135b0db | 74 | { |
Yann | 0:f30e2135b0db | 75 | setOnResult(pItem, pMethod); |
Yann | 0:f30e2135b0db | 76 | doSetTime(host); |
Yann | 0:f30e2135b0db | 77 | return NTP_PROCESSING; |
Yann | 0:f30e2135b0db | 78 | } |
Yann | 0:f30e2135b0db | 79 | #endif |
Yann | 0:f30e2135b0db | 80 | |
Yann | 0:f30e2135b0db | 81 | void NTPClient::doSetTime(const Host& host) |
Yann | 0:f30e2135b0db | 82 | { |
Yann | 0:f30e2135b0db | 83 | init(); |
Yann | 0:f30e2135b0db | 84 | resetTimeout(); |
Yann | 0:f30e2135b0db | 85 | m_host = host; |
Yann | 0:f30e2135b0db | 86 | if(!m_host.getPort()) |
Yann | 0:f30e2135b0db | 87 | { |
Yann | 0:f30e2135b0db | 88 | m_host.setPort(NTP_PORT); |
Yann | 0:f30e2135b0db | 89 | } |
Yann | 0:f30e2135b0db | 90 | if(m_host.getIp().isNull()) |
Yann | 0:f30e2135b0db | 91 | { |
Yann | 0:f30e2135b0db | 92 | //DNS query required |
Yann | 0:f30e2135b0db | 93 | m_pDnsReq = new DNSRequest(); |
Yann | 0:f30e2135b0db | 94 | DBG("\r\nNTPClient : DNSRequest %p\r\n", m_pDnsReq); |
Yann | 0:f30e2135b0db | 95 | m_pDnsReq->setOnReply(this, &NTPClient::onDNSReply); |
Yann | 0:f30e2135b0db | 96 | m_pDnsReq->resolve(&m_host); |
Yann | 0:f30e2135b0db | 97 | return; |
Yann | 0:f30e2135b0db | 98 | } |
Yann | 0:f30e2135b0db | 99 | open(); |
Yann | 0:f30e2135b0db | 100 | } |
Yann | 0:f30e2135b0db | 101 | |
Yann | 0:f30e2135b0db | 102 | void NTPClient::setOnResult( void (*pMethod)(NTPResult) ) |
Yann | 0:f30e2135b0db | 103 | { |
Yann | 0:f30e2135b0db | 104 | m_pCb = pMethod; |
Yann | 0:f30e2135b0db | 105 | } |
Yann | 0:f30e2135b0db | 106 | |
Yann | 0:f30e2135b0db | 107 | void NTPClient::close() |
Yann | 0:f30e2135b0db | 108 | { |
Yann | 0:f30e2135b0db | 109 | if(m_closed) |
Yann | 0:f30e2135b0db | 110 | return; |
Yann | 0:f30e2135b0db | 111 | m_closed = true; //Prevent recursive calling or calling on an object being destructed by someone else |
Yann | 0:f30e2135b0db | 112 | m_watchdog.stop(); |
Yann | 0:f30e2135b0db | 113 | m_pUDPSocket->resetOnEvent(); |
Yann | 0:f30e2135b0db | 114 | m_pUDPSocket->close(); |
Yann | 0:f30e2135b0db | 115 | delete m_pUDPSocket; |
Yann | 0:f30e2135b0db | 116 | if( m_pDnsReq ) |
Yann | 0:f30e2135b0db | 117 | { |
Yann | 0:f30e2135b0db | 118 | m_pDnsReq->close(); |
Yann | 0:f30e2135b0db | 119 | delete m_pDnsReq; |
Yann | 0:f30e2135b0db | 120 | m_pDnsReq = NULL; |
Yann | 0:f30e2135b0db | 121 | } |
Yann | 0:f30e2135b0db | 122 | } |
Yann | 0:f30e2135b0db | 123 | |
Yann | 0:f30e2135b0db | 124 | void NTPClient::poll() //Called by NetServices |
Yann | 0:f30e2135b0db | 125 | { |
Yann | 0:f30e2135b0db | 126 | if( (!m_closed) && (m_watchdog.read_ms() >= m_timeout) ) |
Yann | 0:f30e2135b0db | 127 | { |
Yann | 0:f30e2135b0db | 128 | onTimeout(); |
Yann | 0:f30e2135b0db | 129 | } |
Yann | 0:f30e2135b0db | 130 | } |
Yann | 0:f30e2135b0db | 131 | |
Yann | 0:f30e2135b0db | 132 | void NTPClient::init() //Create and setup socket if needed |
Yann | 0:f30e2135b0db | 133 | { |
Yann | 0:f30e2135b0db | 134 | if(!m_closed) //Already opened |
Yann | 0:f30e2135b0db | 135 | return; |
Yann | 0:f30e2135b0db | 136 | m_state = NTP_PING; |
Yann | 0:f30e2135b0db | 137 | m_pUDPSocket = new UDPSocket; |
Yann | 0:f30e2135b0db | 138 | m_pUDPSocket->setOnEvent(this, &NTPClient::onUDPSocketEvent); |
Yann | 0:f30e2135b0db | 139 | m_closed = false; |
Yann | 0:f30e2135b0db | 140 | DBG("NTPClient: Init OK\n"); |
Yann | 0:f30e2135b0db | 141 | } |
Yann | 0:f30e2135b0db | 142 | |
Yann | 0:f30e2135b0db | 143 | void NTPClient::open() |
Yann | 0:f30e2135b0db | 144 | { |
Yann | 0:f30e2135b0db | 145 | resetTimeout(); |
Yann | 0:f30e2135b0db | 146 | DBG("Opening connection\n"); |
Yann | 0:f30e2135b0db | 147 | m_state = NTP_PING; |
Yann | 0:f30e2135b0db | 148 | Host localhost(IpAddr(), NTP_CLIENT_PORT, "localhost"); //Any local address |
Yann | 0:f30e2135b0db | 149 | m_pUDPSocket->bind(localhost); |
Yann | 0:f30e2135b0db | 150 | if ((int)time(NULL) < 1280000000) set_time( 1280000000 ); //End of July 2010... just there to limit offset range |
Yann | 0:f30e2135b0db | 151 | process(); |
Yann | 0:f30e2135b0db | 152 | } |
Yann | 0:f30e2135b0db | 153 | |
Yann | 0:f30e2135b0db | 154 | #define MIN(a,b) ((a)<(b))?(a):(b) |
Yann | 0:f30e2135b0db | 155 | void NTPClient::process() //Main state-machine |
Yann | 0:f30e2135b0db | 156 | { |
Yann | 0:f30e2135b0db | 157 | int len; |
Yann | 0:f30e2135b0db | 158 | Host host; |
Yann | 0:f30e2135b0db | 159 | |
Yann | 0:f30e2135b0db | 160 | switch(m_state) |
Yann | 0:f30e2135b0db | 161 | { |
Yann | 0:f30e2135b0db | 162 | case NTP_PING: |
Yann | 0:f30e2135b0db | 163 | DBG("\r\nPing\r\n"); |
Yann | 0:f30e2135b0db | 164 | //Prepare NTP Packet: |
Yann | 0:f30e2135b0db | 165 | m_pkt.li = 0; //Leap Indicator : No warning |
Yann | 0:f30e2135b0db | 166 | m_pkt.vn = 4; //Version Number : 4 |
Yann | 0:f30e2135b0db | 167 | m_pkt.mode = 3; //Client mode |
Yann | 0:f30e2135b0db | 168 | m_pkt.stratum = 0; //Not relevant here |
Yann | 0:f30e2135b0db | 169 | m_pkt.poll = 0; //Not significant as well |
Yann | 0:f30e2135b0db | 170 | m_pkt.precision = 0; //Neither this one is |
Yann | 0:f30e2135b0db | 171 | |
Yann | 0:f30e2135b0db | 172 | m_pkt.rootDelay = 0; //Or this one |
Yann | 0:f30e2135b0db | 173 | m_pkt.rootDispersion = 0; //Or that one |
Yann | 0:f30e2135b0db | 174 | m_pkt.refId = 0; //... |
Yann | 0:f30e2135b0db | 175 | |
Yann | 0:f30e2135b0db | 176 | m_pkt.refTm_s = 0; |
Yann | 0:f30e2135b0db | 177 | m_pkt.origTm_s = 0; |
Yann | 0:f30e2135b0db | 178 | m_pkt.rxTm_s = 0; |
Yann | 0:f30e2135b0db | 179 | m_pkt.txTm_s = htonl( NTP_TIMESTAMP_DELTA + time(NULL) ); //WARN: We are in LE format, network byte order is BE |
Yann | 0:f30e2135b0db | 180 | |
Yann | 0:f30e2135b0db | 181 | m_pkt.refTm_f = m_pkt.origTm_f = m_pkt.rxTm_f = m_pkt.txTm_f = 0; |
Yann | 0:f30e2135b0db | 182 | |
Yann | 0:f30e2135b0db | 183 | #ifdef __DEBUG |
Yann | 0:f30e2135b0db | 184 | //Hex Dump: |
Yann | 0:f30e2135b0db | 185 | DBG("\r\nDump Tx:\r\n"); |
Yann | 0:f30e2135b0db | 186 | for(int i = 0; i< sizeof(NTPPacket); i++) |
Yann | 0:f30e2135b0db | 187 | { |
Yann | 0:f30e2135b0db | 188 | DBG("%02x ", *((char*)&m_pkt + i)); |
Yann | 0:f30e2135b0db | 189 | } |
Yann | 0:f30e2135b0db | 190 | DBG("\r\n\r\n"); |
Yann | 0:f30e2135b0db | 191 | #endif |
Yann | 0:f30e2135b0db | 192 | |
Yann | 0:f30e2135b0db | 193 | len = m_pUDPSocket->sendto( (char*)&m_pkt, sizeof(NTPPacket), &m_host ); |
Yann | 0:f30e2135b0db | 194 | if(len < sizeof(NTPPacket)) |
Yann | 0:f30e2135b0db | 195 | { onResult(NTP_PRTCL); close(); return; } |
Yann | 0:f30e2135b0db | 196 | |
Yann | 0:f30e2135b0db | 197 | m_state = NTP_PONG; |
Yann | 0:f30e2135b0db | 198 | |
Yann | 0:f30e2135b0db | 199 | break; |
Yann | 0:f30e2135b0db | 200 | |
Yann | 0:f30e2135b0db | 201 | case NTP_PONG: |
Yann | 0:f30e2135b0db | 202 | DBG("\r\nPong\r\n"); |
Yann | 0:f30e2135b0db | 203 | while( len = m_pUDPSocket->recvfrom( (char*)&m_pkt, sizeof(NTPPacket), &host ) ) |
Yann | 0:f30e2135b0db | 204 | { |
Yann | 0:f30e2135b0db | 205 | if( len <= 0 ) |
Yann | 0:f30e2135b0db | 206 | break; |
Yann | 0:f30e2135b0db | 207 | if( !host.getIp().isEq(m_host.getIp()) ) |
Yann | 0:f30e2135b0db | 208 | continue; //Not our packet |
Yann | 0:f30e2135b0db | 209 | if( len > 0 ) |
Yann | 0:f30e2135b0db | 210 | break; |
Yann | 0:f30e2135b0db | 211 | } |
Yann | 0:f30e2135b0db | 212 | |
Yann | 0:f30e2135b0db | 213 | if(len == 0) |
Yann | 0:f30e2135b0db | 214 | return; //Wait for the next packet |
Yann | 0:f30e2135b0db | 215 | |
Yann | 0:f30e2135b0db | 216 | if(len < 0) |
Yann | 0:f30e2135b0db | 217 | { onResult(NTP_PRTCL); close(); return; } |
Yann | 0:f30e2135b0db | 218 | |
Yann | 0:f30e2135b0db | 219 | if(len < sizeof(NTPPacket)) //TODO: Accept chunks |
Yann | 0:f30e2135b0db | 220 | { onResult(NTP_PRTCL); close(); return; } |
Yann | 0:f30e2135b0db | 221 | |
Yann | 0:f30e2135b0db | 222 | #ifdef __DEBUG |
Yann | 0:f30e2135b0db | 223 | //Hex Dump: |
Yann | 0:f30e2135b0db | 224 | DBG("\r\nDump Rx:\r\n"); |
Yann | 0:f30e2135b0db | 225 | for(int i = 0; i< sizeof(NTPPacket); i++) |
Yann | 0:f30e2135b0db | 226 | { |
Yann | 0:f30e2135b0db | 227 | DBG("%02x ", *((char*)&m_pkt + i)); |
Yann | 0:f30e2135b0db | 228 | } |
Yann | 0:f30e2135b0db | 229 | DBG("\r\n\r\n"); |
Yann | 0:f30e2135b0db | 230 | #endif |
Yann | 0:f30e2135b0db | 231 | |
Yann | 0:f30e2135b0db | 232 | if( m_pkt.stratum == 0) //Kiss of death message : Not good ! |
Yann | 0:f30e2135b0db | 233 | { |
Yann | 0:f30e2135b0db | 234 | onResult(NTP_PRTCL); close(); return; |
Yann | 0:f30e2135b0db | 235 | } |
Yann | 0:f30e2135b0db | 236 | |
Yann | 0:f30e2135b0db | 237 | //Correct Endianness |
Yann | 0:f30e2135b0db | 238 | m_pkt.refTm_s = ntohl( m_pkt.refTm_s ); |
Yann | 0:f30e2135b0db | 239 | m_pkt.refTm_f = ntohl( m_pkt.refTm_f ); |
Yann | 0:f30e2135b0db | 240 | m_pkt.origTm_s = ntohl( m_pkt.origTm_s ); |
Yann | 0:f30e2135b0db | 241 | m_pkt.origTm_f = ntohl( m_pkt.origTm_f ); |
Yann | 0:f30e2135b0db | 242 | m_pkt.rxTm_s = ntohl( m_pkt.rxTm_s ); |
Yann | 0:f30e2135b0db | 243 | m_pkt.rxTm_f = ntohl( m_pkt.rxTm_f ); |
Yann | 0:f30e2135b0db | 244 | m_pkt.txTm_s = ntohl( m_pkt.txTm_s ); |
Yann | 0:f30e2135b0db | 245 | m_pkt.txTm_f = ntohl( m_pkt.txTm_f ); |
Yann | 0:f30e2135b0db | 246 | |
Yann | 0:f30e2135b0db | 247 | //Compute offset, see RFC 4330 p.13 |
Yann | 0:f30e2135b0db | 248 | uint32_t destTm_s = (NTP_TIMESTAMP_DELTA + time(NULL)); |
Yann | 0:f30e2135b0db | 249 | //int32_t origTm = (int32_t) ((uint64_t) m_pkt.origTm - NTP_TIMESTAMP_DELTA); //Convert in local 32 bits timestamps |
Yann | 0:f30e2135b0db | 250 | //int32_t rxTm = (int32_t) ((uint64_t) m_pkt.rxTm - NTP_TIMESTAMP_DELTA); //Convert in local 32 bits timestamps |
Yann | 0:f30e2135b0db | 251 | //int32_t txTm = (int32_t) ((uint64_t) m_pkt.txTm - NTP_TIMESTAMP_DELTA); //Convert in local 32 bits timestamps |
Yann | 0:f30e2135b0db | 252 | // int64_t offset = ( ( ( m_pkt.rxTm_s - m_pkt.origTm_s ) + ( m_pkt.txTm_s - destTm_s ) ) << 32 + ( ( m_pkt.rxTm_f - m_pkt.origTm_f ) + ( m_pkt.txTm_f - 0 ) ) ) / 2; |
Yann | 0:f30e2135b0db | 253 | int64_t offset = ( (int64_t)( m_pkt.rxTm_s - m_pkt.origTm_s ) + (int64_t) ( m_pkt.txTm_s - destTm_s ) ) / 2; //Avoid overflow |
Yann | 0:f30e2135b0db | 254 | DBG("\r\nSent @%d\r\n", m_pkt.txTm_s); |
Yann | 0:f30e2135b0db | 255 | DBG("\r\nOffset: %d\r\n", offset); |
Yann | 0:f30e2135b0db | 256 | //Set time accordingly |
Yann | 0:f30e2135b0db | 257 | set_time( time(NULL) + (offset /*>> 32*/) ); |
Yann | 0:f30e2135b0db | 258 | |
Yann | 0:f30e2135b0db | 259 | onResult(NTP_OK); |
Yann | 0:f30e2135b0db | 260 | close(); |
Yann | 0:f30e2135b0db | 261 | |
Yann | 0:f30e2135b0db | 262 | break; |
Yann | 0:f30e2135b0db | 263 | } |
Yann | 0:f30e2135b0db | 264 | } |
Yann | 0:f30e2135b0db | 265 | |
Yann | 0:f30e2135b0db | 266 | void NTPClient::setTimeout(int ms) |
Yann | 0:f30e2135b0db | 267 | { |
Yann | 0:f30e2135b0db | 268 | m_timeout = ms; |
Yann | 0:f30e2135b0db | 269 | } |
Yann | 0:f30e2135b0db | 270 | |
Yann | 0:f30e2135b0db | 271 | void NTPClient::resetTimeout() |
Yann | 0:f30e2135b0db | 272 | { |
Yann | 0:f30e2135b0db | 273 | m_watchdog.reset(); |
Yann | 0:f30e2135b0db | 274 | m_watchdog.start(); |
Yann | 0:f30e2135b0db | 275 | } |
Yann | 0:f30e2135b0db | 276 | |
Yann | 0:f30e2135b0db | 277 | void NTPClient::onTimeout() //Connection has timed out |
Yann | 0:f30e2135b0db | 278 | { |
Yann | 0:f30e2135b0db | 279 | close(); |
Yann | 0:f30e2135b0db | 280 | onResult(NTP_TIMEOUT); |
Yann | 0:f30e2135b0db | 281 | } |
Yann | 0:f30e2135b0db | 282 | |
Yann | 0:f30e2135b0db | 283 | void NTPClient::onDNSReply(DNSReply r) |
Yann | 0:f30e2135b0db | 284 | { |
Yann | 0:f30e2135b0db | 285 | if(m_closed) |
Yann | 0:f30e2135b0db | 286 | { |
Yann | 0:f30e2135b0db | 287 | DBG("\r\nWARN: Discarded\r\n"); |
Yann | 0:f30e2135b0db | 288 | return; |
Yann | 0:f30e2135b0db | 289 | } |
Yann | 0:f30e2135b0db | 290 | |
Yann | 0:f30e2135b0db | 291 | if( r != DNS_FOUND ) |
Yann | 0:f30e2135b0db | 292 | { |
Yann | 0:f30e2135b0db | 293 | DBG("\r\nCould not resolve hostname.\r\n"); |
Yann | 0:f30e2135b0db | 294 | onResult(NTP_DNS); |
Yann | 0:f30e2135b0db | 295 | close(); |
Yann | 0:f30e2135b0db | 296 | return; |
Yann | 0:f30e2135b0db | 297 | } |
Yann | 0:f30e2135b0db | 298 | DBG("\r\nDNS resolved.\r\n"); |
Yann | 0:f30e2135b0db | 299 | m_pDnsReq->close(); |
Yann | 0:f30e2135b0db | 300 | delete m_pDnsReq; |
Yann | 0:f30e2135b0db | 301 | m_pDnsReq=NULL; |
Yann | 0:f30e2135b0db | 302 | open(); |
Yann | 0:f30e2135b0db | 303 | } |
Yann | 0:f30e2135b0db | 304 | |
Yann | 0:f30e2135b0db | 305 | void NTPClient::onUDPSocketEvent(UDPSocketEvent e) |
Yann | 0:f30e2135b0db | 306 | { |
Yann | 0:f30e2135b0db | 307 | resetTimeout(); |
Yann | 0:f30e2135b0db | 308 | switch(e) |
Yann | 0:f30e2135b0db | 309 | { |
Yann | 0:f30e2135b0db | 310 | case UDPSOCKET_READABLE: //The only event for now |
Yann | 0:f30e2135b0db | 311 | resetTimeout(); |
Yann | 0:f30e2135b0db | 312 | process(); |
Yann | 0:f30e2135b0db | 313 | break; |
Yann | 0:f30e2135b0db | 314 | } |
Yann | 0:f30e2135b0db | 315 | } |
Yann | 0:f30e2135b0db | 316 | |
Yann | 0:f30e2135b0db | 317 | void NTPClient::onResult(NTPResult r) //Must be called by impl when the request completes |
Yann | 0:f30e2135b0db | 318 | { |
Yann | 0:f30e2135b0db | 319 | if(m_pCbItem && m_pCbMeth) |
Yann | 0:f30e2135b0db | 320 | (m_pCbItem->*m_pCbMeth)(r); |
Yann | 0:f30e2135b0db | 321 | else if(m_pCb) |
Yann | 0:f30e2135b0db | 322 | m_pCb(r); |
Yann | 0:f30e2135b0db | 323 | m_blockingResult = r; //Blocking mode |
Yann | 0:f30e2135b0db | 324 | } |
Yann | 0:f30e2135b0db | 325 | |
Yann | 0:f30e2135b0db | 326 | NTPResult NTPClient::blockingProcess() //Called in blocking mode, calls Net::poll() until return code is available |
Yann | 0:f30e2135b0db | 327 | { |
Yann | 0:f30e2135b0db | 328 | m_blockingResult = NTP_PROCESSING; |
Yann | 0:f30e2135b0db | 329 | do |
Yann | 0:f30e2135b0db | 330 | { |
Yann | 0:f30e2135b0db | 331 | Net::poll(); |
Yann | 0:f30e2135b0db | 332 | } while(m_blockingResult == NTP_PROCESSING); |
Yann | 0:f30e2135b0db | 333 | Net::poll(); //Necessary for cleanup |
Yann | 0:f30e2135b0db | 334 | return m_blockingResult; |
Yann | 0:f30e2135b0db | 335 | } |