1 /*
2 * SNTP support driver
3 *
4 * Masami Komiya <mkomiya@sonare.it> 2005
5 *
6 */
7
8 #include <common.h>
9 #include <command.h>
10 #include <net.h>
11 #include <rtc.h>
12
13 #include "sntp.h"
14
15 #define SNTP_TIMEOUT 10000UL
16
17 static int SntpOurPort;
18
19 static void
SntpSend(void)20 SntpSend (void)
21 {
22 struct sntp_pkt_t pkt;
23 int pktlen = SNTP_PACKET_LEN;
24 int sport;
25
26 debug("%s\n", __func__);
27
28 memset (&pkt, 0, sizeof(pkt));
29
30 pkt.li = NTP_LI_NOLEAP;
31 pkt.vn = NTP_VERSION;
32 pkt.mode = NTP_MODE_CLIENT;
33
34 memcpy ((char *)NetTxPacket + NetEthHdrSize() + IP_HDR_SIZE, (char *)&pkt, pktlen);
35
36 SntpOurPort = 10000 + (get_timer(0) % 4096);
37 sport = NTP_SERVICE_PORT;
38
39 NetSendUDPPacket (NetServerEther, NetNtpServerIP, sport, SntpOurPort, pktlen);
40 }
41
42 static void
SntpTimeout(void)43 SntpTimeout (void)
44 {
45 puts ("Timeout\n");
46 NetState = NETLOOP_FAIL;
47 return;
48 }
49
50 static void
SntpHandler(uchar * pkt,unsigned dest,unsigned src,unsigned len)51 SntpHandler (uchar *pkt, unsigned dest, unsigned src, unsigned len)
52 {
53 struct sntp_pkt_t *rpktp = (struct sntp_pkt_t *)pkt;
54 struct rtc_time tm;
55 ulong seconds;
56
57 debug("%s\n", __func__);
58
59 if (dest != SntpOurPort) return;
60
61 /*
62 * As the RTC's used in U-Boot sepport second resolution only
63 * we simply ignore the sub-second field.
64 */
65 memcpy (&seconds, &rpktp->transmit_timestamp, sizeof(ulong));
66
67 to_tm(ntohl(seconds) - 2208988800UL + NetTimeOffset, &tm);
68 #if defined(CONFIG_CMD_DATE)
69 rtc_set (&tm);
70 #endif
71 printf ("Date: %4d-%02d-%02d Time: %2d:%02d:%02d\n",
72 tm.tm_year, tm.tm_mon, tm.tm_mday,
73 tm.tm_hour, tm.tm_min, tm.tm_sec);
74
75 NetState = NETLOOP_SUCCESS;
76 }
77
78 void
SntpStart(void)79 SntpStart (void)
80 {
81 debug("%s\n", __func__);
82
83 NetSetTimeout (SNTP_TIMEOUT, SntpTimeout);
84 NetSetHandler(SntpHandler);
85 memset (NetServerEther, 0, 6);
86
87 SntpSend ();
88 }
89