net/sntp.c

   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 }