util-linux/hwclock.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * Mini hwclock implementation for busybox
   4  *
   5  * Copyright (C) 2002 Robert Griebl <griebl@gmx.de>
   6  *
   7  * Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
   8 */
   9
  10
  11 #include <sys/ioctl.h>
  12 #include <sys/time.h>
  13 #include <sys/utsname.h>
  14 #include <ctype.h>
  15 #include <fcntl.h>
  16 #include <getopt.h>
  17 #include <stdlib.h>
  18 #include <string.h>
  19 #include <syslog.h>
  20 #include <time.h>
  21 #include <unistd.h>
  22 #include "busybox.h"
  23
  24 /* Copied from linux/rtc.h to eliminate the kernel dependency */
  25 struct linux_rtc_time {
  26         int tm_sec;
  27         int tm_min;
  28         int tm_hour;
  29         int tm_mday;
  30         int tm_mon;
  31         int tm_year;
  32         int tm_wday;
  33         int tm_yday;
  34         int tm_isdst;
  35 };
  36
  37 #define RTC_SET_TIME   _IOW('p', 0x0a, struct linux_rtc_time) /* Set RTC time    */
  38 #define RTC_RD_TIME    _IOR('p', 0x09, struct linux_rtc_time) /* Read RTC time   */
  39
  40 #ifdef CONFIG_FEATURE_HWCLOCK_LONGOPTIONS
  41 # ifndef _GNU_SOURCE
  42 #  define _GNU_SOURCE
  43 # endif
  44 #endif
  45
  46 static time_t read_rtc(int utc)
  47 {
  48         int rtc;
  49         struct tm tm;
  50         char *oldtz = 0;
  51         time_t t = 0;
  52
  53         if (( rtc = open ( "/dev/rtc", O_RDONLY )) < 0 ) {
  54                 if (( rtc = open ( "/dev/misc/rtc", O_RDONLY )) < 0 )
  55                         bb_perror_msg_and_die ( "Could not access RTC" );
  56         }
  57         memset ( &tm, 0, sizeof( struct tm ));
  58         if ( ioctl ( rtc, RTC_RD_TIME, &tm ) < 0 )
  59                 bb_perror_msg_and_die ( "Could not read time from RTC" );
  60         tm.tm_isdst = -1; /* not known */
  61
  62         close ( rtc );
  63
  64         if ( utc ) {
  65                 oldtz = getenv ( "TZ" );
  66                 setenv ( "TZ", "UTC 0", 1 );
  67                 tzset ( );
  68         }
  69
  70         t = mktime ( &tm );
  71
  72         if ( utc ) {
  73                 if ( oldtz )
  74                         setenv ( "TZ", oldtz, 1 );
  75                 else
  76                         unsetenv ( "TZ" );
  77                 tzset ( );
  78         }
  79         return t;
  80 }
  81
  82 static void write_rtc(time_t t, int utc)
  83 {
  84         int rtc;
  85         struct tm tm;
  86
  87         if (( rtc = open ( "/dev/rtc", O_WRONLY )) < 0 ) {
  88                 if (( rtc = open ( "/dev/misc/rtc", O_WRONLY )) < 0 )
  89                         bb_perror_msg_and_die ( "Could not access RTC" );
  90         }
  91
  92         tm = *( utc ? gmtime ( &t ) : localtime ( &t ));
  93         tm.tm_isdst = 0;
  94
  95         if ( ioctl ( rtc, RTC_SET_TIME, &tm ) < 0 )
  96                 bb_perror_msg_and_die ( "Could not set the RTC time" );
  97
  98         close ( rtc );
  99 }
 100
 101 static int show_clock(int utc)
 102 {
 103         struct tm *ptm;
 104         time_t t;
 105         RESERVE_CONFIG_BUFFER(buffer, 64);
 106
 107         t = read_rtc ( utc );
 108         ptm = localtime ( &t );  /* Sets 'tzname[]' */
 109
 110         safe_strncpy ( buffer, ctime ( &t ), 64);
 111         if ( buffer [0] )
 112                 buffer [strlen ( buffer ) - 1] = 0;
 113
 114         //printf ( "%s  %.6f seconds %s\n", buffer, 0.0, utc ? "" : ( ptm-> tm_isdst ? tzname [1] : tzname [0] ));
 115         printf ( "%s  %.6f seconds\n", buffer, 0.0 );
 116         RELEASE_CONFIG_BUFFER(buffer);
 117
 118         return 0;
 119 }
 120
 121 static int to_sys_clock(int utc)
 122 {
 123         struct timeval tv = { 0, 0 };
 124         const struct timezone tz = { timezone/60 - 60*daylight, 0 };
 125
 126         tv.tv_sec = read_rtc ( utc );
 127
 128         if ( settimeofday ( &tv, &tz ))
 129                 bb_perror_msg_and_die ( "settimeofday() failed" );
 130
 131         return 0;
 132 }
 133
 134 static int from_sys_clock(int utc)
 135 {
 136         struct timeval tv = { 0, 0 };
 137         struct timezone tz = { 0, 0 };
 138
 139         if ( gettimeofday ( &tv, &tz ))
 140                 bb_perror_msg_and_die ( "gettimeofday() failed" );
 141
 142         write_rtc ( tv.tv_sec, utc );
 143         return 0;
 144 }
 145
 146 #ifdef CONFIG_FEATURE_HWCLOCK_ADJTIME_FHS
 147 # define ADJTIME_PATH "/var/lib/hwclock/adjtime"
 148 #else
 149 # define ADJTIME_PATH "/etc/adjtime"
 150 #endif
 151 static int check_utc(void)
 152 {
 153         int utc = 0;
 154         FILE *f = fopen ( ADJTIME_PATH, "r" );
 155
 156         if ( f ) {
 157                 RESERVE_CONFIG_BUFFER(buffer, 128);
 158
 159                 while ( fgets ( buffer, sizeof( buffer ), f )) {
 160                         int len = strlen ( buffer );
 161
 162                         while ( len && isspace ( buffer [len - 1] ))
 163                                 len--;
 164
 165                         buffer [len] = 0;
 166
 167                         if ( strncmp ( buffer, "UTC", 3 ) == 0 ) {
 168                                 utc = 1;
 169                                 break;
 170                         }
 171                 }
 172                 fclose ( f );
 173                 RELEASE_CONFIG_BUFFER(buffer);
 174         }
 175         return utc;
 176 }
 177
 178 #define HWCLOCK_OPT_LOCALTIME   0x01
 179 #define HWCLOCK_OPT_UTC                 0x02
 180 #define HWCLOCK_OPT_SHOW                0x04
 181 #define HWCLOCK_OPT_HCTOSYS             0x08
 182 #define HWCLOCK_OPT_SYSTOHC             0x10
 183
 184 int hwclock_main ( int argc, char **argv )
 185 {
 186         unsigned long opt;
 187         int utc;
 188
 189 #ifdef CONFIG_FEATURE_HWCLOCK_LONGOPTIONS
 190 static const struct option hwclock_long_options[] = {
 191                 { "localtime", 0, 0, 'l' },
 192                 { "utc",       0, 0, 'u' },
 193                 { "show",      0, 0, 'r' },
 194                 { "hctosys",   0, 0, 's' },
 195                 { "systohc",   0, 0, 'w' },
 196                 { 0,           0, 0, 0 }
 197         };
 198         bb_applet_long_options = hwclock_long_options;
 199 #endif
 200
 201         bb_opt_complementally = "?:r--ws:w--rs:s--wr:l--u:u--l";
 202         opt = bb_getopt_ulflags(argc, argv, "lursw");
 203
 204         /* If -u or -l wasn't given check if we are using utc */
 205         if (opt & (HWCLOCK_OPT_UTC | HWCLOCK_OPT_LOCALTIME))
 206                 utc = opt & HWCLOCK_OPT_UTC;
 207         else
 208                 utc = check_utc();
 209
 210         if (opt & HWCLOCK_OPT_HCTOSYS) {
 211                 return to_sys_clock ( utc );
 212         }
 213         else if (opt & HWCLOCK_OPT_SYSTOHC) {
 214                 return from_sys_clock ( utc );
 215         } else {
 216                 /* default HWCLOCK_OPT_SHOW */
 217                 return show_clock ( utc );
 218         }
 219 }