xref: /openbmc/u-boot/net/sntp.c (revision e2a53458)
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
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
43 SntpTimeout (void)
44 {
45 	puts ("Timeout\n");
46 	NetState = NETLOOP_FAIL;
47 	return;
48 }
49 
50 static void
51 SntpHandler(uchar *pkt, unsigned dest, IPaddr_t sip, unsigned src,
52 	    unsigned len)
53 {
54 	struct sntp_pkt_t *rpktp = (struct sntp_pkt_t *)pkt;
55 	struct rtc_time tm;
56 	ulong seconds;
57 
58 	debug("%s\n", __func__);
59 
60 	if (dest != SntpOurPort) return;
61 
62 	/*
63 	 * As the RTC's used in U-Boot sepport second resolution only
64 	 * we simply ignore the sub-second field.
65 	 */
66 	memcpy (&seconds, &rpktp->transmit_timestamp, sizeof(ulong));
67 
68 	to_tm(ntohl(seconds) - 2208988800UL + NetTimeOffset, &tm);
69 #if defined(CONFIG_CMD_DATE)
70 	rtc_set (&tm);
71 #endif
72 	printf ("Date: %4d-%02d-%02d Time: %2d:%02d:%02d\n",
73 		tm.tm_year, tm.tm_mon, tm.tm_mday,
74 		tm.tm_hour, tm.tm_min, tm.tm_sec);
75 
76 	NetState = NETLOOP_SUCCESS;
77 }
78 
79 void
80 SntpStart (void)
81 {
82 	debug("%s\n", __func__);
83 
84 	NetSetTimeout (SNTP_TIMEOUT, SntpTimeout);
85 	NetSetHandler(SntpHandler);
86 	memset (NetServerEther, 0, 6);
87 
88 	SntpSend ();
89 }
90