5 #include <sys/socket.h>
7 #include <netinet/in.h>
19 extern int GetRandInt(int nMax);
22 * NTP uses two fixed point formats. The first (l_fp) is the "long"
23 * format and is 64 bits long with the decimal between bits 31 and 32.
24 * This is used for time stamps in the NTP packet header (in network
25 * byte order) and for internal computations of offsets (in local host
26 * byte order). We use the same structure for both signed and unsigned
27 * values, which is a big hack but saves rewriting all the operators
28 * twice. Just to confuse this, we also sometimes just carry the
29 * fractional part in calculations, in both signed and unsigned forms.
30 * Anyway, an l_fp looks like:
33 * 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1
34 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
36 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
38 * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
39 * REF http://www.eecis.udel.edu/~mills/database/rfc/rfc2030.txt
55 inline void Ntp2Unix(uint32_t &n, time_t &u) {
56 // Ntp's time scale starts in 1900, Unix in 1970.
58 u = n - 0x83aa7e80; // 2208988800 1970 - 1900 in seconds
61 inline void ntohl_fp(l_fp *n, l_fp *h) {
62 (h)->Ul_i.Xl_ui = ntohl((n)->Ul_i.Xl_ui);
63 (h)->Ul_f.Xl_uf = ntohl((n)->Ul_f.Xl_uf);
67 uint8_t li_vn_mode; /* leap indicator, version and mode */
68 uint8_t stratum; /* peer stratum */
69 uint8_t ppoll; /* peer poll interval */
70 int8_t precision; /* peer clock precision */
71 uint32_t rootdelay; /* distance to primary clock */
72 uint32_t rootdispersion; /* clock dispersion */
73 uint32_t refid; /* reference clock ID */
74 l_fp ref; /* time peer clock was last updated */
75 l_fp org; /* originate time stamp */
76 l_fp rec; /* receive time stamp */
77 l_fp xmt; /* transmit time stamp */
79 uint32_t exten[1]; /* misused */
80 uint8_t mac[5 * sizeof(uint32_t)]; /* mac */
83 int nServersCount = 112;
85 std::string NtpServers[112] = {
118 "ntp1.niiftri.irkutsk.ru",
119 "ntp2.niiftri.irkutsk.ru",
130 "ntp-01.caltech.edu",
131 "ntp-02.caltech.edu",
132 "ntp-03.caltech.edu",
133 "ntp-04.caltech.edu",
134 "nist1-pa.ustiming.org",
139 "nist1-macon.macon.ga.us",
140 "nist.netservicesgroup.com",
141 "nisttime.carsoncity.k12.mi.us",
142 "nist1-lnk.binary.net",
144 "time-a.timefreq.bldrdoc.gov",
145 "time-b.timefreq.bldrdoc.gov",
146 "time-c.timefreq.bldrdoc.gov",
148 "utcnist.colorado.edu",
149 "utcnist2.colorado.edu",
150 "ntp-nist.ldsbc.net",
151 "nist1-lv.ustiming.org",
153 "nist-time-server.eoni.com",
154 "nist-time-server.eoni.com",
164 "ntp1.meraka.csir.co.za",
168 "ntp1.neology.co.za",
169 "ntp2.neology.co.za",
170 "tick.meraka.csir.co.za",
171 "tock.meraka.csir.co.za",
173 "ntp1.meraka.csir.co.za",
174 "ntp2.meraka.csir.co.za",
202 "ntp.cis.strath.ac.uk",
216 // ... To be continued
219 bool InitWithRandom(SOCKET &sockfd, socklen_t &servlen, struct sockaddr *pcliaddr) {
222 while(nAttempt < 100) {
226 int nServerNum = GetRandInt(nServersCount);
228 std::vector<CNetAddr> vIP;
229 bool fRet = LookupHost(NtpServers[nServerNum].c_str(), vIP, 10, true);
233 struct sockaddr_in servaddr;
234 servaddr.sin_family = AF_INET;
235 servaddr.sin_port = htons(123);
238 for(unsigned int i = 0; i < vIP.size(); i++) {
239 if ((found = vIP[i].GetInAddr(&servaddr.sin_addr))) {
247 sockfd = socket(AF_INET, SOCK_DGRAM, 0);
249 if (sockfd == INVALID_SOCKET)
250 continue; // socket initialization error
252 if (connect(sockfd, (struct sockaddr *) &servaddr, sizeof(servaddr)) == -1 ) {
253 continue; // "connection" error
256 *pcliaddr = *((struct sockaddr *) &servaddr);
257 servlen = sizeof(servaddr);
264 bool InitWithHost(std::string &strHostName, SOCKET &sockfd, socklen_t &servlen, struct sockaddr *pcliaddr) {
267 std::vector<CNetAddr> vIP;
268 bool fRet = LookupHost(strHostName.c_str(), vIP, 10, true);
273 struct sockaddr_in servaddr;
274 servaddr.sin_family = AF_INET;
275 servaddr.sin_port = htons(123);
278 for(unsigned int i = 0; i < vIP.size(); i++) {
279 if ((found = vIP[i].GetInAddr(&servaddr.sin_addr))) {
288 sockfd = socket(AF_INET, SOCK_DGRAM, 0);
290 if (sockfd == INVALID_SOCKET)
291 return false; // socket initialization error
293 if (connect(sockfd, (struct sockaddr *) &servaddr, sizeof(servaddr)) == -1 ) {
294 return false; // "connection" error
298 *pcliaddr = *((struct sockaddr *) &servaddr);
299 servlen = sizeof(servaddr);
305 int64_t DoReq(SOCKET sockfd, socklen_t servlen, struct sockaddr cliaddr) {
308 if (ioctlsocket(sockfd, FIONBIO, &nOne) == SOCKET_ERROR) {
309 printf("ConnectSocket() : ioctlsocket non-blocking setting failed, error %d\n", WSAGetLastError());
311 if (fcntl(sockfd, F_SETFL, O_NONBLOCK) == SOCKET_ERROR) {
312 printf("ConnectSocket() : fcntl non-blocking setting failed, error %d\n", errno);
317 struct pkt *msg = new pkt;
318 struct pkt *prt = new pkt;
325 msg->rootdispersion=0;
327 msg->ref.Ul_i.Xl_i=0;
328 msg->ref.Ul_f.Xl_f=0;
329 msg->org.Ul_i.Xl_i=0;
330 msg->org.Ul_f.Xl_f=0;
331 msg->rec.Ul_i.Xl_i=0;
332 msg->rec.Ul_f.Xl_f=0;
333 msg->xmt.Ul_i.Xl_i=0;
334 msg->xmt.Ul_f.Xl_f=0;
337 int retcode = sendto(sockfd, (char *) msg, len, 0, &cliaddr, servlen);
339 printf("sendto() failed: %d", retcode);
344 struct timeval timeout = {10, 0};
346 FD_SET(sockfd, &fdset);
348 retcode = select(sockfd + 1, &fdset, NULL, NULL, &timeout);
350 printf("recvfrom() error");
354 recvfrom(sockfd, (char *) msg, len, 0, NULL, NULL);
356 ntohl_fp(&msg->rec, &prt->rec);
357 ntohl_fp(&msg->xmt, &prt->xmt);
359 time_t seconds_receive;
360 time_t seconds_transmit;
362 Ntp2Unix(prt->rec.Ul_i.Xl_ui, seconds_receive);
363 Ntp2Unix(prt->xmt.Ul_i.Xl_ui, seconds_transmit);
368 return (seconds_receive + seconds_transmit) / 2;
371 int64_t NtpGetTime() {
372 struct sockaddr cliaddr;
377 if (!InitWithRandom(sockfd, servlen, &cliaddr))
380 int64_t nTime = DoReq(sockfd, servlen, cliaddr);
387 int64_t NtpGetTime(CNetAddr& ip) {
388 struct sockaddr cliaddr;
393 if (!InitWithRandom(sockfd, servlen, &cliaddr))
396 ip = CNetAddr(((sockaddr_in *)&cliaddr)->sin_addr);
397 int64_t nTime = DoReq(sockfd, servlen, cliaddr);
404 int64_t NtpGetTime(std::string &strHostName)
406 struct sockaddr cliaddr;
411 if (!InitWithHost(strHostName, sockfd, servlen, &cliaddr))
414 int64_t nTime = DoReq(sockfd, servlen, cliaddr);
421 void ThreadNtpSamples(void* parg)
423 printf("ThreadNtpSamples started\n");
424 vnThreadsRunning[THREAD_NTP]++;
426 // Make this thread recognisable as time synchronization thread
427 RenameThread("novacoin-ntp-samples");
431 int64_t nTime = NtpGetTime(ip);
433 if (nTime > 0 && nTime != 2085978496) { // Skip the deliberately wrong timestamps
434 AddTimeData(ip, nTime);
437 Sleep(600000); // In case of failure wait 600 seconds and then try again
441 Sleep(43200000); // Sleep for 12 hours
444 vnThreadsRunning[THREAD_NTP]--;
445 printf("ThreadNtpSamples exited\n");