Brandon Fictorie
/
BF_Websocket
Important changes to repositories hosted on mbed.com
Mbed hosted mercurial repositories are deprecated and are due to be permanently deleted in July 2026.
To keep a copy of this software download the repository Zip archive or clone locally using Mercurial.
It is also possible to export all your personal repositories from the account settings page.
NetServices/services/ntp/NTPClient.cpp@0:8cdad1c73e8e, 2012-03-25 (annotated)
- Committer:
- bfictorie
- Date:
- Sun Mar 25 17:26:30 2012 +0000
- Revision:
- 0:8cdad1c73e8e
Who changed what in which revision?
| User | Revision | Line number | New contents of line |
|---|---|---|---|
| bfictorie | 0:8cdad1c73e8e | 1 | #pragma diag_remark 1293 |
| bfictorie | 0:8cdad1c73e8e | 2 | /* |
| bfictorie | 0:8cdad1c73e8e | 3 | Copyright (c) 2010 Donatien Garnier (donatiengar [at] gmail [dot] com) |
| bfictorie | 0:8cdad1c73e8e | 4 | |
| bfictorie | 0:8cdad1c73e8e | 5 | Permission is hereby granted, free of charge, to any person obtaining a copy |
| bfictorie | 0:8cdad1c73e8e | 6 | of this software and associated documentation files (the "Software"), to deal |
| bfictorie | 0:8cdad1c73e8e | 7 | in the Software without restriction, including without limitation the rights |
| bfictorie | 0:8cdad1c73e8e | 8 | to use, copy, modify, merge, publish, distribute, sublicense, and/or sell |
| bfictorie | 0:8cdad1c73e8e | 9 | copies of the Software, and to permit persons to whom the Software is |
| bfictorie | 0:8cdad1c73e8e | 10 | furnished to do so, subject to the following conditions: |
| bfictorie | 0:8cdad1c73e8e | 11 | |
| bfictorie | 0:8cdad1c73e8e | 12 | The above copyright notice and this permission notice shall be included in |
| bfictorie | 0:8cdad1c73e8e | 13 | all copies or substantial portions of the Software. |
| bfictorie | 0:8cdad1c73e8e | 14 | |
| bfictorie | 0:8cdad1c73e8e | 15 | THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
| bfictorie | 0:8cdad1c73e8e | 16 | IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
| bfictorie | 0:8cdad1c73e8e | 17 | FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE |
| bfictorie | 0:8cdad1c73e8e | 18 | AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER |
| bfictorie | 0:8cdad1c73e8e | 19 | LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, |
| bfictorie | 0:8cdad1c73e8e | 20 | OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN |
| bfictorie | 0:8cdad1c73e8e | 21 | THE SOFTWARE. |
| bfictorie | 0:8cdad1c73e8e | 22 | */ |
| bfictorie | 0:8cdad1c73e8e | 23 | |
| bfictorie | 0:8cdad1c73e8e | 24 | #include "NTPClient.h" |
| bfictorie | 0:8cdad1c73e8e | 25 | |
| bfictorie | 0:8cdad1c73e8e | 26 | #include <stdio.h> |
| bfictorie | 0:8cdad1c73e8e | 27 | |
| bfictorie | 0:8cdad1c73e8e | 28 | //#define __DEBUG |
| bfictorie | 0:8cdad1c73e8e | 29 | #include "dbg/dbg.h" |
| bfictorie | 0:8cdad1c73e8e | 30 | |
| bfictorie | 0:8cdad1c73e8e | 31 | #define NTP_PORT 123 |
| bfictorie | 0:8cdad1c73e8e | 32 | #define NTP_CLIENT_PORT 0//50420 //Random port |
| bfictorie | 0:8cdad1c73e8e | 33 | #define NTP_REQUEST_TIMEOUT 15000 |
| bfictorie | 0:8cdad1c73e8e | 34 | #define NTP_TIMESTAMP_DELTA 2208988800ull //Diff btw a UNIX timestamp (Starting Jan, 1st 1970) and a NTP timestamp (Starting Jan, 1st 1900) |
| bfictorie | 0:8cdad1c73e8e | 35 | |
| bfictorie | 0:8cdad1c73e8e | 36 | #define htons( x ) ( (( x << 8 ) & 0xFF00) | (( x >> 8 ) & 0x00FF) ) |
| bfictorie | 0:8cdad1c73e8e | 37 | #define ntohs( x ) (htons(x)) |
| bfictorie | 0:8cdad1c73e8e | 38 | |
| bfictorie | 0:8cdad1c73e8e | 39 | #define htonl( x ) ( (( x << 24 ) & 0xFF000000) \ |
| bfictorie | 0:8cdad1c73e8e | 40 | | (( x << 8 ) & 0x00FF0000) \ |
| bfictorie | 0:8cdad1c73e8e | 41 | | (( x >> 8 ) & 0x0000FF00) \ |
| bfictorie | 0:8cdad1c73e8e | 42 | | (( x >> 24 ) & 0x000000FF) ) |
| bfictorie | 0:8cdad1c73e8e | 43 | #define ntohl( x ) (htonl(x)) |
| bfictorie | 0:8cdad1c73e8e | 44 | |
| bfictorie | 0:8cdad1c73e8e | 45 | NTPClient::NTPClient() : NetService(false), m_state(NTP_PING), m_pCbItem(NULL), m_pCbMeth(NULL), m_pCb(NULL), |
| bfictorie | 0:8cdad1c73e8e | 46 | m_watchdog(), m_timeout(0), m_closed(true), m_host(), m_pDnsReq(NULL), m_blockingResult(NTP_PROCESSING) |
| bfictorie | 0:8cdad1c73e8e | 47 | { |
| bfictorie | 0:8cdad1c73e8e | 48 | setTimeout(NTP_REQUEST_TIMEOUT); |
| bfictorie | 0:8cdad1c73e8e | 49 | DBG("\r\nNew NTPClient %p\r\n",this); |
| bfictorie | 0:8cdad1c73e8e | 50 | } |
| bfictorie | 0:8cdad1c73e8e | 51 | |
| bfictorie | 0:8cdad1c73e8e | 52 | NTPClient::~NTPClient() |
| bfictorie | 0:8cdad1c73e8e | 53 | { |
| bfictorie | 0:8cdad1c73e8e | 54 | close(); |
| bfictorie | 0:8cdad1c73e8e | 55 | } |
| bfictorie | 0:8cdad1c73e8e | 56 | |
| bfictorie | 0:8cdad1c73e8e | 57 | //High level setup functions |
| bfictorie | 0:8cdad1c73e8e | 58 | NTPResult NTPClient::setTime(const Host& host) //Blocking |
| bfictorie | 0:8cdad1c73e8e | 59 | { |
| bfictorie | 0:8cdad1c73e8e | 60 | doSetTime(host); |
| bfictorie | 0:8cdad1c73e8e | 61 | return blockingProcess(); |
| bfictorie | 0:8cdad1c73e8e | 62 | } |
| bfictorie | 0:8cdad1c73e8e | 63 | |
| bfictorie | 0:8cdad1c73e8e | 64 | NTPResult NTPClient::setTime(const Host& host, void (*pMethod)(NTPResult)) //Non blocking |
| bfictorie | 0:8cdad1c73e8e | 65 | { |
| bfictorie | 0:8cdad1c73e8e | 66 | setOnResult(pMethod); |
| bfictorie | 0:8cdad1c73e8e | 67 | doSetTime(host); |
| bfictorie | 0:8cdad1c73e8e | 68 | return NTP_PROCESSING; |
| bfictorie | 0:8cdad1c73e8e | 69 | } |
| bfictorie | 0:8cdad1c73e8e | 70 | |
| bfictorie | 0:8cdad1c73e8e | 71 | #if 0 //For doc only |
| bfictorie | 0:8cdad1c73e8e | 72 | template<class T> |
| bfictorie | 0:8cdad1c73e8e | 73 | NTPResult NTPClient::setTime(const Host& host, T* pItem, void (T::*pMethod)(NTPResult)) //Non blocking |
| bfictorie | 0:8cdad1c73e8e | 74 | { |
| bfictorie | 0:8cdad1c73e8e | 75 | setOnResult(pItem, pMethod); |
| bfictorie | 0:8cdad1c73e8e | 76 | doSetTime(host); |
| bfictorie | 0:8cdad1c73e8e | 77 | return NTP_PROCESSING; |
| bfictorie | 0:8cdad1c73e8e | 78 | } |
| bfictorie | 0:8cdad1c73e8e | 79 | #endif |
| bfictorie | 0:8cdad1c73e8e | 80 | |
| bfictorie | 0:8cdad1c73e8e | 81 | void NTPClient::doSetTime(const Host& host) |
| bfictorie | 0:8cdad1c73e8e | 82 | { |
| bfictorie | 0:8cdad1c73e8e | 83 | init(); |
| bfictorie | 0:8cdad1c73e8e | 84 | resetTimeout(); |
| bfictorie | 0:8cdad1c73e8e | 85 | m_host = host; |
| bfictorie | 0:8cdad1c73e8e | 86 | if(!m_host.getPort()) |
| bfictorie | 0:8cdad1c73e8e | 87 | { |
| bfictorie | 0:8cdad1c73e8e | 88 | m_host.setPort(NTP_PORT); |
| bfictorie | 0:8cdad1c73e8e | 89 | } |
| bfictorie | 0:8cdad1c73e8e | 90 | if(m_host.getIp().isNull()) |
| bfictorie | 0:8cdad1c73e8e | 91 | { |
| bfictorie | 0:8cdad1c73e8e | 92 | //DNS query required |
| bfictorie | 0:8cdad1c73e8e | 93 | m_pDnsReq = new DNSRequest(); |
| bfictorie | 0:8cdad1c73e8e | 94 | DBG("\r\nNTPClient : DNSRequest %p\r\n", m_pDnsReq); |
| bfictorie | 0:8cdad1c73e8e | 95 | m_pDnsReq->setOnReply(this, &NTPClient::onDNSReply); |
| bfictorie | 0:8cdad1c73e8e | 96 | m_pDnsReq->resolve(&m_host); |
| bfictorie | 0:8cdad1c73e8e | 97 | return; |
| bfictorie | 0:8cdad1c73e8e | 98 | } |
| bfictorie | 0:8cdad1c73e8e | 99 | open(); |
| bfictorie | 0:8cdad1c73e8e | 100 | } |
| bfictorie | 0:8cdad1c73e8e | 101 | |
| bfictorie | 0:8cdad1c73e8e | 102 | void NTPClient::setOnResult( void (*pMethod)(NTPResult) ) |
| bfictorie | 0:8cdad1c73e8e | 103 | { |
| bfictorie | 0:8cdad1c73e8e | 104 | m_pCb = pMethod; |
| bfictorie | 0:8cdad1c73e8e | 105 | } |
| bfictorie | 0:8cdad1c73e8e | 106 | |
| bfictorie | 0:8cdad1c73e8e | 107 | void NTPClient::close() |
| bfictorie | 0:8cdad1c73e8e | 108 | { |
| bfictorie | 0:8cdad1c73e8e | 109 | if(m_closed) |
| bfictorie | 0:8cdad1c73e8e | 110 | return; |
| bfictorie | 0:8cdad1c73e8e | 111 | m_closed = true; //Prevent recursive calling or calling on an object being destructed by someone else |
| bfictorie | 0:8cdad1c73e8e | 112 | m_watchdog.stop(); |
| bfictorie | 0:8cdad1c73e8e | 113 | m_pUDPSocket->resetOnEvent(); |
| bfictorie | 0:8cdad1c73e8e | 114 | m_pUDPSocket->close(); |
| bfictorie | 0:8cdad1c73e8e | 115 | delete m_pUDPSocket; |
| bfictorie | 0:8cdad1c73e8e | 116 | if( m_pDnsReq ) |
| bfictorie | 0:8cdad1c73e8e | 117 | { |
| bfictorie | 0:8cdad1c73e8e | 118 | m_pDnsReq->close(); |
| bfictorie | 0:8cdad1c73e8e | 119 | delete m_pDnsReq; |
| bfictorie | 0:8cdad1c73e8e | 120 | m_pDnsReq = NULL; |
| bfictorie | 0:8cdad1c73e8e | 121 | } |
| bfictorie | 0:8cdad1c73e8e | 122 | } |
| bfictorie | 0:8cdad1c73e8e | 123 | |
| bfictorie | 0:8cdad1c73e8e | 124 | void NTPClient::poll() //Called by NetServices |
| bfictorie | 0:8cdad1c73e8e | 125 | { |
| bfictorie | 0:8cdad1c73e8e | 126 | if( (!m_closed) && (m_watchdog.read_ms() >= m_timeout) ) |
| bfictorie | 0:8cdad1c73e8e | 127 | { |
| bfictorie | 0:8cdad1c73e8e | 128 | onTimeout(); |
| bfictorie | 0:8cdad1c73e8e | 129 | } |
| bfictorie | 0:8cdad1c73e8e | 130 | } |
| bfictorie | 0:8cdad1c73e8e | 131 | |
| bfictorie | 0:8cdad1c73e8e | 132 | void NTPClient::init() //Create and setup socket if needed |
| bfictorie | 0:8cdad1c73e8e | 133 | { |
| bfictorie | 0:8cdad1c73e8e | 134 | if(!m_closed) //Already opened |
| bfictorie | 0:8cdad1c73e8e | 135 | return; |
| bfictorie | 0:8cdad1c73e8e | 136 | m_state = NTP_PING; |
| bfictorie | 0:8cdad1c73e8e | 137 | m_pUDPSocket = new UDPSocket; |
| bfictorie | 0:8cdad1c73e8e | 138 | m_pUDPSocket->setOnEvent(this, &NTPClient::onUDPSocketEvent); |
| bfictorie | 0:8cdad1c73e8e | 139 | m_closed = false; |
| bfictorie | 0:8cdad1c73e8e | 140 | DBG("NTPClient: Init OK\n"); |
| bfictorie | 0:8cdad1c73e8e | 141 | } |
| bfictorie | 0:8cdad1c73e8e | 142 | |
| bfictorie | 0:8cdad1c73e8e | 143 | void NTPClient::open() |
| bfictorie | 0:8cdad1c73e8e | 144 | { |
| bfictorie | 0:8cdad1c73e8e | 145 | resetTimeout(); |
| bfictorie | 0:8cdad1c73e8e | 146 | DBG("Opening connection\n"); |
| bfictorie | 0:8cdad1c73e8e | 147 | m_state = NTP_PING; |
| bfictorie | 0:8cdad1c73e8e | 148 | Host localhost(IpAddr(), NTP_CLIENT_PORT, "localhost"); //Any local address |
| bfictorie | 0:8cdad1c73e8e | 149 | m_pUDPSocket->bind(localhost); |
| bfictorie | 0:8cdad1c73e8e | 150 | if ((int)time(NULL) < 1280000000) set_time( 1280000000 ); //End of July 2010... just there to limit offset range |
| bfictorie | 0:8cdad1c73e8e | 151 | process(); |
| bfictorie | 0:8cdad1c73e8e | 152 | } |
| bfictorie | 0:8cdad1c73e8e | 153 | |
| bfictorie | 0:8cdad1c73e8e | 154 | #define MIN(a,b) ((a)<(b))?(a):(b) |
| bfictorie | 0:8cdad1c73e8e | 155 | void NTPClient::process() //Main state-machine |
| bfictorie | 0:8cdad1c73e8e | 156 | { |
| bfictorie | 0:8cdad1c73e8e | 157 | int len; |
| bfictorie | 0:8cdad1c73e8e | 158 | Host host; |
| bfictorie | 0:8cdad1c73e8e | 159 | |
| bfictorie | 0:8cdad1c73e8e | 160 | switch(m_state) |
| bfictorie | 0:8cdad1c73e8e | 161 | { |
| bfictorie | 0:8cdad1c73e8e | 162 | case NTP_PING: |
| bfictorie | 0:8cdad1c73e8e | 163 | DBG("\r\nPing\r\n"); |
| bfictorie | 0:8cdad1c73e8e | 164 | //Prepare NTP Packet: |
| bfictorie | 0:8cdad1c73e8e | 165 | m_pkt.li = 0; //Leap Indicator : No warning |
| bfictorie | 0:8cdad1c73e8e | 166 | m_pkt.vn = 4; //Version Number : 4 |
| bfictorie | 0:8cdad1c73e8e | 167 | m_pkt.mode = 3; //Client mode |
| bfictorie | 0:8cdad1c73e8e | 168 | m_pkt.stratum = 0; //Not relevant here |
| bfictorie | 0:8cdad1c73e8e | 169 | m_pkt.poll = 0; //Not significant as well |
| bfictorie | 0:8cdad1c73e8e | 170 | m_pkt.precision = 0; //Neither this one is |
| bfictorie | 0:8cdad1c73e8e | 171 | |
| bfictorie | 0:8cdad1c73e8e | 172 | m_pkt.rootDelay = 0; //Or this one |
| bfictorie | 0:8cdad1c73e8e | 173 | m_pkt.rootDispersion = 0; //Or that one |
| bfictorie | 0:8cdad1c73e8e | 174 | m_pkt.refId = 0; //... |
| bfictorie | 0:8cdad1c73e8e | 175 | |
| bfictorie | 0:8cdad1c73e8e | 176 | m_pkt.refTm_s = 0; |
| bfictorie | 0:8cdad1c73e8e | 177 | m_pkt.origTm_s = 0; |
| bfictorie | 0:8cdad1c73e8e | 178 | m_pkt.rxTm_s = 0; |
| bfictorie | 0:8cdad1c73e8e | 179 | m_pkt.txTm_s = htonl( NTP_TIMESTAMP_DELTA + time(NULL) ); //WARN: We are in LE format, network byte order is BE |
| bfictorie | 0:8cdad1c73e8e | 180 | |
| bfictorie | 0:8cdad1c73e8e | 181 | m_pkt.refTm_f = m_pkt.origTm_f = m_pkt.rxTm_f = m_pkt.txTm_f = 0; |
| bfictorie | 0:8cdad1c73e8e | 182 | |
| bfictorie | 0:8cdad1c73e8e | 183 | #ifdef __DEBUG |
| bfictorie | 0:8cdad1c73e8e | 184 | //Hex Dump: |
| bfictorie | 0:8cdad1c73e8e | 185 | DBG("\r\nDump Tx:\r\n"); |
| bfictorie | 0:8cdad1c73e8e | 186 | for(int i = 0; i< sizeof(NTPPacket); i++) |
| bfictorie | 0:8cdad1c73e8e | 187 | { |
| bfictorie | 0:8cdad1c73e8e | 188 | DBG("%02x ", *((char*)&m_pkt + i)); |
| bfictorie | 0:8cdad1c73e8e | 189 | } |
| bfictorie | 0:8cdad1c73e8e | 190 | DBG("\r\n\r\n"); |
| bfictorie | 0:8cdad1c73e8e | 191 | #endif |
| bfictorie | 0:8cdad1c73e8e | 192 | |
| bfictorie | 0:8cdad1c73e8e | 193 | len = m_pUDPSocket->sendto( (char*)&m_pkt, sizeof(NTPPacket), &m_host ); |
| bfictorie | 0:8cdad1c73e8e | 194 | if(len < sizeof(NTPPacket)) |
| bfictorie | 0:8cdad1c73e8e | 195 | { onResult(NTP_PRTCL); close(); return; } |
| bfictorie | 0:8cdad1c73e8e | 196 | |
| bfictorie | 0:8cdad1c73e8e | 197 | m_state = NTP_PONG; |
| bfictorie | 0:8cdad1c73e8e | 198 | |
| bfictorie | 0:8cdad1c73e8e | 199 | break; |
| bfictorie | 0:8cdad1c73e8e | 200 | |
| bfictorie | 0:8cdad1c73e8e | 201 | case NTP_PONG: |
| bfictorie | 0:8cdad1c73e8e | 202 | DBG("\r\nPong\r\n"); |
| bfictorie | 0:8cdad1c73e8e | 203 | while( len = m_pUDPSocket->recvfrom( (char*)&m_pkt, sizeof(NTPPacket), &host ) ) |
| bfictorie | 0:8cdad1c73e8e | 204 | { |
| bfictorie | 0:8cdad1c73e8e | 205 | if( len <= 0 ) |
| bfictorie | 0:8cdad1c73e8e | 206 | break; |
| bfictorie | 0:8cdad1c73e8e | 207 | if( !host.getIp().isEq(m_host.getIp()) ) |
| bfictorie | 0:8cdad1c73e8e | 208 | continue; //Not our packet |
| bfictorie | 0:8cdad1c73e8e | 209 | if( len > 0 ) |
| bfictorie | 0:8cdad1c73e8e | 210 | break; |
| bfictorie | 0:8cdad1c73e8e | 211 | } |
| bfictorie | 0:8cdad1c73e8e | 212 | |
| bfictorie | 0:8cdad1c73e8e | 213 | if(len == 0) |
| bfictorie | 0:8cdad1c73e8e | 214 | return; //Wait for the next packet |
| bfictorie | 0:8cdad1c73e8e | 215 | |
| bfictorie | 0:8cdad1c73e8e | 216 | if(len < 0) |
| bfictorie | 0:8cdad1c73e8e | 217 | { onResult(NTP_PRTCL); close(); return; } |
| bfictorie | 0:8cdad1c73e8e | 218 | |
| bfictorie | 0:8cdad1c73e8e | 219 | if(len < sizeof(NTPPacket)) //TODO: Accept chunks |
| bfictorie | 0:8cdad1c73e8e | 220 | { onResult(NTP_PRTCL); close(); return; } |
| bfictorie | 0:8cdad1c73e8e | 221 | |
| bfictorie | 0:8cdad1c73e8e | 222 | #ifdef __DEBUG |
| bfictorie | 0:8cdad1c73e8e | 223 | //Hex Dump: |
| bfictorie | 0:8cdad1c73e8e | 224 | DBG("\r\nDump Rx:\r\n"); |
| bfictorie | 0:8cdad1c73e8e | 225 | for(int i = 0; i< sizeof(NTPPacket); i++) |
| bfictorie | 0:8cdad1c73e8e | 226 | { |
| bfictorie | 0:8cdad1c73e8e | 227 | DBG("%02x ", *((char*)&m_pkt + i)); |
| bfictorie | 0:8cdad1c73e8e | 228 | } |
| bfictorie | 0:8cdad1c73e8e | 229 | DBG("\r\n\r\n"); |
| bfictorie | 0:8cdad1c73e8e | 230 | #endif |
| bfictorie | 0:8cdad1c73e8e | 231 | |
| bfictorie | 0:8cdad1c73e8e | 232 | if( m_pkt.stratum == 0) //Kiss of death message : Not good ! |
| bfictorie | 0:8cdad1c73e8e | 233 | { |
| bfictorie | 0:8cdad1c73e8e | 234 | onResult(NTP_PRTCL); close(); return; |
| bfictorie | 0:8cdad1c73e8e | 235 | } |
| bfictorie | 0:8cdad1c73e8e | 236 | |
| bfictorie | 0:8cdad1c73e8e | 237 | //Correct Endianness |
| bfictorie | 0:8cdad1c73e8e | 238 | m_pkt.refTm_s = ntohl( m_pkt.refTm_s ); |
| bfictorie | 0:8cdad1c73e8e | 239 | m_pkt.refTm_f = ntohl( m_pkt.refTm_f ); |
| bfictorie | 0:8cdad1c73e8e | 240 | m_pkt.origTm_s = ntohl( m_pkt.origTm_s ); |
| bfictorie | 0:8cdad1c73e8e | 241 | m_pkt.origTm_f = ntohl( m_pkt.origTm_f ); |
| bfictorie | 0:8cdad1c73e8e | 242 | m_pkt.rxTm_s = ntohl( m_pkt.rxTm_s ); |
| bfictorie | 0:8cdad1c73e8e | 243 | m_pkt.rxTm_f = ntohl( m_pkt.rxTm_f ); |
| bfictorie | 0:8cdad1c73e8e | 244 | m_pkt.txTm_s = ntohl( m_pkt.txTm_s ); |
| bfictorie | 0:8cdad1c73e8e | 245 | m_pkt.txTm_f = ntohl( m_pkt.txTm_f ); |
| bfictorie | 0:8cdad1c73e8e | 246 | |
| bfictorie | 0:8cdad1c73e8e | 247 | //Compute offset, see RFC 4330 p.13 |
| bfictorie | 0:8cdad1c73e8e | 248 | uint32_t destTm_s = (NTP_TIMESTAMP_DELTA + time(NULL)); |
| bfictorie | 0:8cdad1c73e8e | 249 | //int32_t origTm = (int32_t) ((uint64_t) m_pkt.origTm - NTP_TIMESTAMP_DELTA); //Convert in local 32 bits timestamps |
| bfictorie | 0:8cdad1c73e8e | 250 | //int32_t rxTm = (int32_t) ((uint64_t) m_pkt.rxTm - NTP_TIMESTAMP_DELTA); //Convert in local 32 bits timestamps |
| bfictorie | 0:8cdad1c73e8e | 251 | //int32_t txTm = (int32_t) ((uint64_t) m_pkt.txTm - NTP_TIMESTAMP_DELTA); //Convert in local 32 bits timestamps |
| bfictorie | 0:8cdad1c73e8e | 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; |
| bfictorie | 0:8cdad1c73e8e | 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 |
| bfictorie | 0:8cdad1c73e8e | 254 | DBG("\r\nSent @%d\r\n", m_pkt.txTm_s); |
| bfictorie | 0:8cdad1c73e8e | 255 | DBG("\r\nOffset: %d\r\n", offset); |
| bfictorie | 0:8cdad1c73e8e | 256 | //Set time accordingly |
| bfictorie | 0:8cdad1c73e8e | 257 | set_time( time(NULL) + (offset /*>> 32*/) ); |
| bfictorie | 0:8cdad1c73e8e | 258 | |
| bfictorie | 0:8cdad1c73e8e | 259 | onResult(NTP_OK); |
| bfictorie | 0:8cdad1c73e8e | 260 | close(); |
| bfictorie | 0:8cdad1c73e8e | 261 | |
| bfictorie | 0:8cdad1c73e8e | 262 | break; |
| bfictorie | 0:8cdad1c73e8e | 263 | } |
| bfictorie | 0:8cdad1c73e8e | 264 | } |
| bfictorie | 0:8cdad1c73e8e | 265 | |
| bfictorie | 0:8cdad1c73e8e | 266 | void NTPClient::setTimeout(int ms) |
| bfictorie | 0:8cdad1c73e8e | 267 | { |
| bfictorie | 0:8cdad1c73e8e | 268 | m_timeout = ms; |
| bfictorie | 0:8cdad1c73e8e | 269 | } |
| bfictorie | 0:8cdad1c73e8e | 270 | |
| bfictorie | 0:8cdad1c73e8e | 271 | void NTPClient::resetTimeout() |
| bfictorie | 0:8cdad1c73e8e | 272 | { |
| bfictorie | 0:8cdad1c73e8e | 273 | m_watchdog.reset(); |
| bfictorie | 0:8cdad1c73e8e | 274 | m_watchdog.start(); |
| bfictorie | 0:8cdad1c73e8e | 275 | } |
| bfictorie | 0:8cdad1c73e8e | 276 | |
| bfictorie | 0:8cdad1c73e8e | 277 | void NTPClient::onTimeout() //Connection has timed out |
| bfictorie | 0:8cdad1c73e8e | 278 | { |
| bfictorie | 0:8cdad1c73e8e | 279 | close(); |
| bfictorie | 0:8cdad1c73e8e | 280 | onResult(NTP_TIMEOUT); |
| bfictorie | 0:8cdad1c73e8e | 281 | } |
| bfictorie | 0:8cdad1c73e8e | 282 | |
| bfictorie | 0:8cdad1c73e8e | 283 | void NTPClient::onDNSReply(DNSReply r) |
| bfictorie | 0:8cdad1c73e8e | 284 | { |
| bfictorie | 0:8cdad1c73e8e | 285 | if(m_closed) |
| bfictorie | 0:8cdad1c73e8e | 286 | { |
| bfictorie | 0:8cdad1c73e8e | 287 | DBG("\r\nWARN: Discarded\r\n"); |
| bfictorie | 0:8cdad1c73e8e | 288 | return; |
| bfictorie | 0:8cdad1c73e8e | 289 | } |
| bfictorie | 0:8cdad1c73e8e | 290 | |
| bfictorie | 0:8cdad1c73e8e | 291 | if( r != DNS_FOUND ) |
| bfictorie | 0:8cdad1c73e8e | 292 | { |
| bfictorie | 0:8cdad1c73e8e | 293 | DBG("\r\nCould not resolve hostname.\r\n"); |
| bfictorie | 0:8cdad1c73e8e | 294 | onResult(NTP_DNS); |
| bfictorie | 0:8cdad1c73e8e | 295 | close(); |
| bfictorie | 0:8cdad1c73e8e | 296 | return; |
| bfictorie | 0:8cdad1c73e8e | 297 | } |
| bfictorie | 0:8cdad1c73e8e | 298 | DBG("\r\nDNS resolved.\r\n"); |
| bfictorie | 0:8cdad1c73e8e | 299 | m_pDnsReq->close(); |
| bfictorie | 0:8cdad1c73e8e | 300 | delete m_pDnsReq; |
| bfictorie | 0:8cdad1c73e8e | 301 | m_pDnsReq=NULL; |
| bfictorie | 0:8cdad1c73e8e | 302 | open(); |
| bfictorie | 0:8cdad1c73e8e | 303 | } |
| bfictorie | 0:8cdad1c73e8e | 304 | |
| bfictorie | 0:8cdad1c73e8e | 305 | void NTPClient::onUDPSocketEvent(UDPSocketEvent e) |
| bfictorie | 0:8cdad1c73e8e | 306 | { |
| bfictorie | 0:8cdad1c73e8e | 307 | resetTimeout(); |
| bfictorie | 0:8cdad1c73e8e | 308 | switch(e) |
| bfictorie | 0:8cdad1c73e8e | 309 | { |
| bfictorie | 0:8cdad1c73e8e | 310 | case UDPSOCKET_READABLE: //The only event for now |
| bfictorie | 0:8cdad1c73e8e | 311 | resetTimeout(); |
| bfictorie | 0:8cdad1c73e8e | 312 | process(); |
| bfictorie | 0:8cdad1c73e8e | 313 | break; |
| bfictorie | 0:8cdad1c73e8e | 314 | } |
| bfictorie | 0:8cdad1c73e8e | 315 | } |
| bfictorie | 0:8cdad1c73e8e | 316 | |
| bfictorie | 0:8cdad1c73e8e | 317 | void NTPClient::onResult(NTPResult r) //Must be called by impl when the request completes |
| bfictorie | 0:8cdad1c73e8e | 318 | { |
| bfictorie | 0:8cdad1c73e8e | 319 | if(m_pCbItem && m_pCbMeth) |
| bfictorie | 0:8cdad1c73e8e | 320 | (m_pCbItem->*m_pCbMeth)(r); |
| bfictorie | 0:8cdad1c73e8e | 321 | else if(m_pCb) |
| bfictorie | 0:8cdad1c73e8e | 322 | m_pCb(r); |
| bfictorie | 0:8cdad1c73e8e | 323 | m_blockingResult = r; //Blocking mode |
| bfictorie | 0:8cdad1c73e8e | 324 | } |
| bfictorie | 0:8cdad1c73e8e | 325 | |
| bfictorie | 0:8cdad1c73e8e | 326 | NTPResult NTPClient::blockingProcess() //Called in blocking mode, calls Net::poll() until return code is available |
| bfictorie | 0:8cdad1c73e8e | 327 | { |
| bfictorie | 0:8cdad1c73e8e | 328 | m_blockingResult = NTP_PROCESSING; |
| bfictorie | 0:8cdad1c73e8e | 329 | do |
| bfictorie | 0:8cdad1c73e8e | 330 | { |
| bfictorie | 0:8cdad1c73e8e | 331 | Net::poll(); |
| bfictorie | 0:8cdad1c73e8e | 332 | } while(m_blockingResult == NTP_PROCESSING); |
| bfictorie | 0:8cdad1c73e8e | 333 | Net::poll(); //Necessary for cleanup |
| bfictorie | 0:8cdad1c73e8e | 334 | return m_blockingResult; |
| bfictorie | 0:8cdad1c73e8e | 335 | } |