[821] | 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 | *
|
---|
[2725] | 7 | * Licensed under GPLv2 or later, see file LICENSE in this source tree.
|
---|
[821] | 8 | */
|
---|
| 9 |
|
---|
[2725] | 10 | #include "libbb.h"
|
---|
| 11 | /* After libbb.h, since it needs sys/types.h on some systems */
|
---|
[821] | 12 | #include <sys/utsname.h>
|
---|
[2725] | 13 | #include "rtc_.h"
|
---|
[821] | 14 |
|
---|
[2725] | 15 | /* diff code is disabled: it's not sys/hw clock diff, it's some useless
|
---|
| 16 | * "time between hwclock was started and we saw CMOS tick" quantity.
|
---|
| 17 | * It's useless since hwclock is started at a random moment,
|
---|
| 18 | * thus the quantity is also random, useless. Showing 0.000000 does not
|
---|
| 19 | * deprive us from any useful info.
|
---|
| 20 | *
|
---|
| 21 | * SHOW_HWCLOCK_DIFF code in this file shows the difference between system
|
---|
| 22 | * and hw clock. It is useful, but not compatible with standard hwclock.
|
---|
| 23 | * Thus disabled.
|
---|
| 24 | */
|
---|
| 25 | #define SHOW_HWCLOCK_DIFF 0
|
---|
[821] | 26 |
|
---|
| 27 |
|
---|
[2725] | 28 | #if !SHOW_HWCLOCK_DIFF
|
---|
| 29 | # define read_rtc(pp_rtcname, sys_tv, utc) read_rtc(pp_rtcname, utc)
|
---|
[821] | 30 | #endif
|
---|
[2725] | 31 | static time_t read_rtc(const char **pp_rtcname, struct timeval *sys_tv, int utc)
|
---|
[1765] | 32 | {
|
---|
[2725] | 33 | struct tm tm_time;
|
---|
| 34 | int fd;
|
---|
[1765] | 35 |
|
---|
[2725] | 36 | fd = rtc_xopen(pp_rtcname, O_RDONLY);
|
---|
[1765] | 37 |
|
---|
[2725] | 38 | rtc_read_tm(&tm_time, fd);
|
---|
[821] | 39 |
|
---|
[2725] | 40 | #if SHOW_HWCLOCK_DIFF
|
---|
| 41 | {
|
---|
| 42 | int before = tm_time.tm_sec;
|
---|
| 43 | while (1) {
|
---|
| 44 | rtc_read_tm(&tm_time, fd);
|
---|
| 45 | gettimeofday(sys_tv, NULL);
|
---|
[3232] | 46 | if (before != (int)tm_time.tm_sec)
|
---|
[2725] | 47 | break;
|
---|
| 48 | }
|
---|
[821] | 49 | }
|
---|
[2725] | 50 | #endif
|
---|
[821] | 51 |
|
---|
[2725] | 52 | if (ENABLE_FEATURE_CLEAN_UP)
|
---|
| 53 | close(fd);
|
---|
[821] | 54 |
|
---|
[2725] | 55 | return rtc_tm2time(&tm_time, utc);
|
---|
[821] | 56 | }
|
---|
| 57 |
|
---|
[2725] | 58 | static void show_clock(const char **pp_rtcname, int utc)
|
---|
[821] | 59 | {
|
---|
[2725] | 60 | #if SHOW_HWCLOCK_DIFF
|
---|
| 61 | struct timeval sys_tv;
|
---|
| 62 | #endif
|
---|
[3232] | 63 | time_t t = read_rtc(pp_rtcname, &sys_tv, utc);
|
---|
[821] | 64 |
|
---|
[3232] | 65 | #if ENABLE_LOCALE_SUPPORT
|
---|
| 66 | /* Standard hwclock uses locale-specific output format */
|
---|
| 67 | char cp[64];
|
---|
| 68 | struct tm *ptm = localtime(&t);
|
---|
| 69 | strftime(cp, sizeof(cp), "%c", ptm);
|
---|
| 70 | #else
|
---|
| 71 | char *cp = ctime(&t);
|
---|
[2725] | 72 | strchrnul(cp, '\n')[0] = '\0';
|
---|
[3232] | 73 | #endif
|
---|
| 74 |
|
---|
[2725] | 75 | #if !SHOW_HWCLOCK_DIFF
|
---|
[1765] | 76 | printf("%s 0.000000 seconds\n", cp);
|
---|
[2725] | 77 | #else
|
---|
| 78 | {
|
---|
| 79 | long diff = sys_tv.tv_sec - t;
|
---|
| 80 | if (diff < 0 /*&& tv.tv_usec != 0*/) {
|
---|
[3232] | 81 | /* Why we need diff++? */
|
---|
| 82 | /* diff >= 0 is ok: | diff < 0, can't just use tv.tv_usec: */
|
---|
| 83 | /* 45.520820 | 43.520820 */
|
---|
| 84 | /* - 44.000000 | - 45.000000 */
|
---|
| 85 | /* = 1.520820 | = -1.479180, not -2.520820! */
|
---|
[2725] | 86 | diff++;
|
---|
[3232] | 87 | /* Should be 1000000 - tv.tv_usec, but then we must check tv.tv_usec != 0 */
|
---|
[2725] | 88 | sys_tv.tv_usec = 999999 - sys_tv.tv_usec;
|
---|
| 89 | }
|
---|
| 90 | printf("%s %ld.%06lu seconds\n", cp, diff, (unsigned long)sys_tv.tv_usec);
|
---|
| 91 | }
|
---|
| 92 | #endif
|
---|
[821] | 93 | }
|
---|
| 94 |
|
---|
[2725] | 95 | static void to_sys_clock(const char **pp_rtcname, int utc)
|
---|
[821] | 96 | {
|
---|
[1765] | 97 | struct timeval tv;
|
---|
[2725] | 98 | struct timezone tz;
|
---|
[821] | 99 |
|
---|
[2725] | 100 | tz.tz_minuteswest = timezone/60 - 60*daylight;
|
---|
| 101 | tz.tz_dsttime = 0;
|
---|
| 102 |
|
---|
| 103 | tv.tv_sec = read_rtc(pp_rtcname, NULL, utc);
|
---|
[1765] | 104 | tv.tv_usec = 0;
|
---|
| 105 | if (settimeofday(&tv, &tz))
|
---|
[2725] | 106 | bb_perror_msg_and_die("settimeofday");
|
---|
[821] | 107 | }
|
---|
| 108 |
|
---|
[2725] | 109 | static void from_sys_clock(const char **pp_rtcname, int utc)
|
---|
[821] | 110 | {
|
---|
[2725] | 111 | #if 1
|
---|
[1765] | 112 | struct timeval tv;
|
---|
[2725] | 113 | struct tm tm_time;
|
---|
| 114 | int rtc;
|
---|
[821] | 115 |
|
---|
[2725] | 116 | rtc = rtc_xopen(pp_rtcname, O_WRONLY);
|
---|
[1765] | 117 | gettimeofday(&tv, NULL);
|
---|
[2725] | 118 | /* Prepare tm_time */
|
---|
| 119 | if (sizeof(time_t) == sizeof(tv.tv_sec)) {
|
---|
| 120 | if (utc)
|
---|
| 121 | gmtime_r((time_t*)&tv.tv_sec, &tm_time);
|
---|
| 122 | else
|
---|
| 123 | localtime_r((time_t*)&tv.tv_sec, &tm_time);
|
---|
| 124 | } else {
|
---|
| 125 | time_t t = tv.tv_sec;
|
---|
| 126 | if (utc)
|
---|
| 127 | gmtime_r(&t, &tm_time);
|
---|
| 128 | else
|
---|
| 129 | localtime_r(&t, &tm_time);
|
---|
| 130 | }
|
---|
[821] | 131 | #else
|
---|
[2725] | 132 | /* Bloated code which tries to set hw clock with better precision.
|
---|
| 133 | * On x86, even though code does set hw clock within <1ms of exact
|
---|
| 134 | * whole seconds, apparently hw clock (at least on some machines)
|
---|
| 135 | * doesn't reset internal fractional seconds to 0,
|
---|
| 136 | * making all this a pointless excercise.
|
---|
| 137 | */
|
---|
| 138 | /* If we see that we are N usec away from whole second,
|
---|
| 139 | * we'll sleep for N-ADJ usecs. ADJ corrects for the fact
|
---|
| 140 | * that CPU is not infinitely fast.
|
---|
| 141 | * On infinitely fast CPU, next wakeup would be
|
---|
| 142 | * on (exactly_next_whole_second - ADJ). On real CPUs,
|
---|
| 143 | * this difference between current time and whole second
|
---|
| 144 | * is less than ADJ (assuming system isn't heavily loaded).
|
---|
| 145 | */
|
---|
| 146 | /* Small value of 256us gives very precise sync for 2+ GHz CPUs.
|
---|
| 147 | * Slower CPUs will fail to sync and will go to bigger
|
---|
| 148 | * ADJ values. qemu-emulated armv4tl with ~100 MHz
|
---|
| 149 | * performance ends up using ADJ ~= 4*1024 and it takes
|
---|
| 150 | * 2+ secs (2 tries with successively larger ADJ)
|
---|
| 151 | * to sync. Even straced one on the same qemu (very slow)
|
---|
| 152 | * takes only 4 tries.
|
---|
| 153 | */
|
---|
| 154 | #define TWEAK_USEC 256
|
---|
| 155 | unsigned adj = TWEAK_USEC;
|
---|
| 156 | struct tm tm_time;
|
---|
| 157 | struct timeval tv;
|
---|
| 158 | int rtc = rtc_xopen(pp_rtcname, O_WRONLY);
|
---|
[821] | 159 |
|
---|
[2725] | 160 | /* Try to catch the moment when whole second is close */
|
---|
| 161 | while (1) {
|
---|
| 162 | unsigned rem_usec;
|
---|
| 163 | time_t t;
|
---|
[821] | 164 |
|
---|
[2725] | 165 | gettimeofday(&tv, NULL);
|
---|
[821] | 166 |
|
---|
[2725] | 167 | t = tv.tv_sec;
|
---|
| 168 | rem_usec = 1000000 - tv.tv_usec;
|
---|
| 169 | if (rem_usec < adj) {
|
---|
| 170 | /* Close enough */
|
---|
| 171 | small_rem:
|
---|
| 172 | t++;
|
---|
| 173 | }
|
---|
[821] | 174 |
|
---|
[2725] | 175 | /* Prepare tm_time from t */
|
---|
| 176 | if (utc)
|
---|
| 177 | gmtime_r(&t, &tm_time); /* may read /etc/xxx (it takes time) */
|
---|
| 178 | else
|
---|
| 179 | localtime_r(&t, &tm_time); /* same */
|
---|
[821] | 180 |
|
---|
[2725] | 181 | if (adj >= 32*1024) {
|
---|
| 182 | break; /* 32 ms diff and still no luck?? give up trying to sync */
|
---|
[821] | 183 | }
|
---|
[2725] | 184 |
|
---|
| 185 | /* gmtime/localtime took some time, re-get cur time */
|
---|
| 186 | gettimeofday(&tv, NULL);
|
---|
| 187 |
|
---|
| 188 | if (tv.tv_sec < t /* we are still in old second */
|
---|
| 189 | || (tv.tv_sec == t && tv.tv_usec < adj) /* not too far into next second */
|
---|
| 190 | ) {
|
---|
| 191 | break; /* good, we are in sync! */
|
---|
| 192 | }
|
---|
| 193 |
|
---|
| 194 | rem_usec = 1000000 - tv.tv_usec;
|
---|
| 195 | if (rem_usec < adj) {
|
---|
| 196 | t = tv.tv_sec;
|
---|
| 197 | goto small_rem; /* already close to next sec, don't sleep */
|
---|
| 198 | }
|
---|
| 199 |
|
---|
| 200 | /* Try to sync up by sleeping */
|
---|
| 201 | usleep(rem_usec - adj);
|
---|
| 202 |
|
---|
| 203 | /* Jump to 1ms diff, then increase fast (x2): EVERY loop
|
---|
| 204 | * takes ~1 sec, people won't like slowly converging code here!
|
---|
| 205 | */
|
---|
| 206 | //bb_error_msg("adj:%d tv.tv_usec:%d", adj, (int)tv.tv_usec);
|
---|
| 207 | if (adj < 512)
|
---|
| 208 | adj = 512;
|
---|
| 209 | /* ... and if last "overshoot" does not look insanely big,
|
---|
| 210 | * just use it as adj increment. This makes convergence faster.
|
---|
| 211 | */
|
---|
| 212 | if (tv.tv_usec < adj * 8) {
|
---|
| 213 | adj += tv.tv_usec;
|
---|
| 214 | continue;
|
---|
| 215 | }
|
---|
| 216 | adj *= 2;
|
---|
[821] | 217 | }
|
---|
[2725] | 218 | /* Debug aid to find "optimal" TWEAK_USEC with nearly exact sync.
|
---|
| 219 | * Look for a value which makes tv_usec close to 999999 or 0.
|
---|
| 220 | * For 2.20GHz Intel Core 2: optimal TWEAK_USEC ~= 200
|
---|
| 221 | */
|
---|
| 222 | //bb_error_msg("tv.tv_usec:%d", (int)tv.tv_usec);
|
---|
| 223 | #endif
|
---|
| 224 |
|
---|
| 225 | tm_time.tm_isdst = 0;
|
---|
| 226 | xioctl(rtc, RTC_SET_TIME, &tm_time);
|
---|
| 227 |
|
---|
| 228 | if (ENABLE_FEATURE_CLEAN_UP)
|
---|
| 229 | close(rtc);
|
---|
[821] | 230 | }
|
---|
| 231 |
|
---|
[3232] | 232 | /*
|
---|
| 233 | * At system boot, kernel may set system time from RTC,
|
---|
| 234 | * but it knows nothing about timezones. If RTC is in local time,
|
---|
| 235 | * then system time is wrong - it is offset by timezone.
|
---|
| 236 | * This option corrects system time if RTC is in local time,
|
---|
| 237 | * and (always) sets in-kernel timezone.
|
---|
| 238 | *
|
---|
| 239 | * This is an alternate option to --hctosys that does not read the
|
---|
| 240 | * hardware clock.
|
---|
| 241 | */
|
---|
| 242 | static void set_system_clock_timezone(int utc)
|
---|
| 243 | {
|
---|
| 244 | struct timeval tv;
|
---|
| 245 | struct tm *broken;
|
---|
| 246 | struct timezone tz;
|
---|
| 247 |
|
---|
| 248 | gettimeofday(&tv, NULL);
|
---|
| 249 | broken = localtime(&tv.tv_sec);
|
---|
| 250 | tz.tz_minuteswest = timezone / 60;
|
---|
| 251 | if (broken->tm_isdst)
|
---|
| 252 | tz.tz_minuteswest -= 60;
|
---|
| 253 | tz.tz_dsttime = 0;
|
---|
| 254 | gettimeofday(&tv, NULL);
|
---|
| 255 | if (!utc)
|
---|
| 256 | tv.tv_sec += tz.tz_minuteswest * 60;
|
---|
| 257 | if (settimeofday(&tv, &tz))
|
---|
| 258 | bb_perror_msg_and_die("settimeofday");
|
---|
| 259 | }
|
---|
| 260 |
|
---|
| 261 | //usage:#define hwclock_trivial_usage
|
---|
| 262 | //usage: IF_FEATURE_HWCLOCK_LONG_OPTIONS(
|
---|
| 263 | //usage: "[-r|--show] [-s|--hctosys] [-w|--systohc] [-t|--systz]"
|
---|
| 264 | //usage: " [-l|--localtime] [-u|--utc]"
|
---|
| 265 | //usage: " [-f|--rtc FILE]"
|
---|
| 266 | //usage: )
|
---|
| 267 | //usage: IF_NOT_FEATURE_HWCLOCK_LONG_OPTIONS(
|
---|
| 268 | //usage: "[-r] [-s] [-w] [-t] [-l] [-u] [-f FILE]"
|
---|
| 269 | //usage: )
|
---|
| 270 | //usage:#define hwclock_full_usage "\n\n"
|
---|
| 271 | //usage: "Query and set hardware clock (RTC)\n"
|
---|
| 272 | //usage: "\n -r Show hardware clock time"
|
---|
| 273 | //usage: "\n -s Set system time from hardware clock"
|
---|
| 274 | //usage: "\n -w Set hardware clock from system time"
|
---|
| 275 | //usage: "\n -t Set in-kernel timezone, correct system time"
|
---|
| 276 | //usage: "\n if hardware clock is in local time"
|
---|
| 277 | //usage: "\n -u Assume hardware clock is kept in UTC"
|
---|
| 278 | //usage: "\n -l Assume hardware clock is kept in local time"
|
---|
| 279 | //usage: "\n -f FILE Use specified device (e.g. /dev/rtc2)"
|
---|
| 280 |
|
---|
[1765] | 281 | #define HWCLOCK_OPT_LOCALTIME 0x01
|
---|
| 282 | #define HWCLOCK_OPT_UTC 0x02
|
---|
| 283 | #define HWCLOCK_OPT_SHOW 0x04
|
---|
| 284 | #define HWCLOCK_OPT_HCTOSYS 0x08
|
---|
| 285 | #define HWCLOCK_OPT_SYSTOHC 0x10
|
---|
[3232] | 286 | #define HWCLOCK_OPT_SYSTZ 0x20
|
---|
| 287 | #define HWCLOCK_OPT_RTCFILE 0x40
|
---|
[821] | 288 |
|
---|
[2725] | 289 | int hwclock_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
|
---|
| 290 | int hwclock_main(int argc UNUSED_PARAM, char **argv)
|
---|
[821] | 291 | {
|
---|
[2725] | 292 | const char *rtcname = NULL;
|
---|
[1765] | 293 | unsigned opt;
|
---|
[821] | 294 | int utc;
|
---|
| 295 |
|
---|
| 296 | #if ENABLE_FEATURE_HWCLOCK_LONG_OPTIONS
|
---|
[1765] | 297 | static const char hwclock_longopts[] ALIGN1 =
|
---|
[3232] | 298 | "localtime\0" No_argument "l" /* short opt is non-standard */
|
---|
[1765] | 299 | "utc\0" No_argument "u"
|
---|
| 300 | "show\0" No_argument "r"
|
---|
| 301 | "hctosys\0" No_argument "s"
|
---|
| 302 | "systohc\0" No_argument "w"
|
---|
[3232] | 303 | "systz\0" No_argument "t" /* short opt is non-standard */
|
---|
| 304 | "rtc\0" Required_argument "f"
|
---|
[1765] | 305 | ;
|
---|
| 306 | applet_long_options = hwclock_longopts;
|
---|
[821] | 307 | #endif
|
---|
[3232] | 308 | opt_complementary = "r--wst:w--rst:s--wrt:t--rsw:l--u:u--l";
|
---|
| 309 | opt = getopt32(argv, "lurswtf:", &rtcname);
|
---|
[821] | 310 |
|
---|
| 311 | /* If -u or -l wasn't given check if we are using utc */
|
---|
| 312 | if (opt & (HWCLOCK_OPT_UTC | HWCLOCK_OPT_LOCALTIME))
|
---|
[2725] | 313 | utc = (opt & HWCLOCK_OPT_UTC);
|
---|
[821] | 314 | else
|
---|
[2725] | 315 | utc = rtc_adjtime_is_utc();
|
---|
[821] | 316 |
|
---|
[2725] | 317 | if (opt & HWCLOCK_OPT_HCTOSYS)
|
---|
| 318 | to_sys_clock(&rtcname, utc);
|
---|
| 319 | else if (opt & HWCLOCK_OPT_SYSTOHC)
|
---|
| 320 | from_sys_clock(&rtcname, utc);
|
---|
[3232] | 321 | else if (opt & HWCLOCK_OPT_SYSTZ)
|
---|
| 322 | set_system_clock_timezone(utc);
|
---|
[2725] | 323 | else
|
---|
| 324 | /* default HWCLOCK_OPT_SHOW */
|
---|
| 325 | show_clock(&rtcname, utc);
|
---|
| 326 |
|
---|
[1765] | 327 | return 0;
|
---|
[821] | 328 | }
|
---|