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", __FUNCTION__); 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, 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", __FUNCTION__); 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 79 SntpStart (void) 80 { 81 debug ("%s\n", __FUNCTION__); 82 83 NetSetTimeout (SNTP_TIMEOUT, SntpTimeout); 84 NetSetHandler(SntpHandler); 85 memset (NetServerEther, 0, 6); 86 87 SntpSend (); 88 } 89