diff options
Diffstat (limited to 'clockB/hwclock.c')
-rw-r--r-- | clockB/hwclock.c | 1744 |
1 files changed, 0 insertions, 1744 deletions
diff --git a/clockB/hwclock.c b/clockB/hwclock.c deleted file mode 100644 index e7f1c919b..000000000 --- a/clockB/hwclock.c +++ /dev/null @@ -1,1744 +0,0 @@ -/************************************************************************** - hwclock -*************************************************************************** - - This is a program for reading and setting the Hardware Clock on an ISA - family computer. This is the clock that is also known as the RTC, - real time clock, or, unfortunately, the CMOS clock. - - See man page for details. - - By Bryan Henderson, 96.09.19. bryanh@giraffe-data.com - - Based on work by others; see history at end of source code. - -**************************************************************************/ -/************************************************************************** - Maintenance notes - - To compile this, you must use GNU compiler optimization (-O option) - in order to make the "extern inline" functions from asm/io.h (inb(), - etc.) compile. If you don't optimize, which means the compiler - will generate no inline functions, the references to these functions - in this program will be compiled as external references. Since you - probably won't be linking with any functions by these names, you will - have unresolved external references when you link. - - The program is designed to run setuid superuser, since we need to be - able to do direct I/O. (More to the point: we need permission to - execute the iopl() system call). (However, if you use one of the - methods other than direct ISA I/O to access the clock, no setuid is - required). - - Here's some info on how we must deal with the time that elapses while - this program runs: There are two major delays as we run: - - 1) Waiting up to 1 second for a transition of the Hardware Clock so - we are synchronized to the Hardware Clock. - - 2) Running the "date" program to interpret the value of our --date - option. - - Reading the /etc/adjtime file is the next biggest source of delay and - uncertainty. - - The user wants to know what time it was at the moment he invoked us, - not some arbitrary time later. And in setting the clock, he is - giving us the time at the moment we are invoked, so if we set the - clock some time later, we have to add some time to that. - - So we check the system time as soon as we start up, then run "date" - and do file I/O if necessary, then wait to synchronize with a - Hardware Clock edge, then check the system time again to see how - much time we spent. We immediately read the clock then and (if - appropriate) report that time, and additionally, the delay we measured. - - If we're setting the clock to a time given by the user, we wait some - more so that the total delay is an integral number of seconds, then - set the Hardware Clock to the time the user requested plus that - integral number of seconds. N.B. The Hardware Clock can only be set - in integral seconds. - - If we're setting the clock to the system clock value, we wait for - the system clock to reach the top of a second, and then set the - Hardware Clock to the system clock's value. - - Here's an interesting point about setting the Hardware Clock: On my - machine, when you set it, it sets to that precise time. But one can - imagine another clock whose update oscillator marches on a steady one - second period, so updating the clock between any two oscillator ticks - is the same as updating it right at the earlier tick. To avoid any - complications that might cause, we set the clock as soon as possible - after an oscillator tick. - - - About synchronizing to the Hardware Clock when reading the time: The - precision of the Hardware Clock counters themselves is one second. - You can't read the counters and find out that is 12:01:02.5. But if - you consider the location in time of the counter's ticks as part of - its value, then its precision is as infinite as time is continuous! - What I'm saying is this: To find out the _exact_ time in the - hardware clock, we wait until the next clock tick (the next time the - second counter changes) and measure how long we had to wait. We - then read the value of the clock counters and subtract the wait time - and we know precisely what time it was when we set out to query the - time. - - hwclock uses this method, and considers the Hardware Clock to have - infinite precision. - - Definition of century: In this program, a century is a 100 year - period in which all the years' numbers in the Gregorian calendar - differ only in their last two decimal digits. E.g. 1900-1999 is - a century. The 20th Century (1901-2000), however, is not. - - - About the unusual situation of the Jensen variety of Alpha: - - Martin Ostermann writes: - - The problem with the Jensen is twofold: First, it has the clock at a - different address. Secondly, it has a distinction beween "local" and - normal bus addresses. The local ones pertain to the hardware integrated - into the chipset, like serial/parallel ports and of course, the RTC. - Those need to be addressed differently. This is handled fine in the kernel, - and it's not a problem, since this usually gets totally optimized by the - compile. But the i/o routines of (g)libc lack this support so far. - The result of this is, that the old clock program worked only on the - Jensen when USE_DEV_PORT was defined, but not with the normal inb/outb - functions. - - - - Enhancements needed: - - - When waiting for whole second boundary in set_hardware_clock_exact, - fail if we miss the goal by more than .1 second, as could happen if - we get pre-empted (by the kernel dispatcher). - -****************************************************************************/ - -#include <string.h> -#include <stdio.h> -#include <fcntl.h> -#include <sys/ioctl.h> -#include <errno.h> -#include <stdlib.h> -#include <unistd.h> -#include <sys/time.h> -#include <sys/stat.h> -#include "shhopt.h" -#include "../version.h" /* Defines UTIL_LINUX, among other things */ -#include "hwclock.h" - -#define FLOOR(arg) ((arg >= 0 ? (int) arg : ((int) arg) - 1)); - -/* Here the information for time adjustments is kept. */ -#define ADJPATH "/etc/adjtime" - -/* Note that we must define the boolean type as int because we use the - shhopt option processing library which, unfortunately, returns flag - options as integers. It is customary to define bool as char, but - then we would have to do a lot of conversion in order to interface - with shhopt. -*/ - -/* The following are times, in unix standard format (seconds since 1969) */ -#define START_OF_1994 757411200 -#define END_OF_1995 820396800 - -struct adjtime { - /* This is information we keep in the adjtime file that tells us how - to do drift corrections, among other things. Elements are all - straight from the adjtime file, so see documentation of that file - for details. Exception is <dirty>, which is an indication that - what's in this structure is not what's in the disk file (because - it has been updated since read from the disk file). - */ - - bool dirty; - float drift_factor; - time_t last_adj_time; - float not_adjusted; - time_t last_calib_time; - /* The most recent time that we set the clock from an external - authority (as opposed to just doing a drift adjustment) - */ - enum a_local_utc {LOCAL, UTC} local_utc; - /* To which time zone, local or UTC, we most recently set the - hardware clock. - */ -}; - - - - - -bool debug; - /* We are running in debug mode, wherein we put a lot of information about - what we're doing to standard output. Because of the pervasive and yet - background nature of this value, this is a global variable. */ - - - -/* We're going to assume that if the CPU is in the Intel x86 family, - this is an ISA family machine. For all practical purposes, this is - the case at the time of this writing, especially after we assume a - Linux kernel is running on it. - */ -const bool isa_machine = -#ifdef __i386__ -TRUE -#else -FALSE; -#endif -; - -const bool alpha_machine = -#ifdef __alpha__ -TRUE -#else -FALSE; -#endif -; - - - -static bool -hw_clock_is_utc(const bool utc, const bool local_opt, - const struct adjtime adjtime) { -/*---------------------------------------------------------------------------- - Return true iff the hardware clock keeps Coordinated Universal Time - rather than local time. - - 'utc' means the user told us in the invocation options that the - hardware clock is kept in UTC. ------------------------------------------------------------------------------*/ - - bool retval; /* our return value */ - - if (utc) retval = TRUE; - else if (local_opt) retval = FALSE; - else retval = (adjtime.local_utc == UTC); - if (debug) printf("Assuming hardware clock is kept in %s time.\n", - retval ? "UTC" : "LOCAL"); - return retval; -} - - - -static void -read_adjtime(struct adjtime *adjtime_p, int *rc_p) { -/*---------------------------------------------------------------------------- - Read the adjustment parameters and other persistent variables out of - the /etc/adjtime file. - - Return them as the adjtime structure <*adjtime_p>. - - If there is no /etc/adjtime file, return defaults. - If values are missing from the file, return defaults for them. - - return *rc_p = 0 if all OK, !=0 otherwise. - - Note: The default is LOCAL rather than UTC for historical reasons. - ------------------------------------------------------------------------------*/ - FILE *adjfile; - int rc; /* local return code */ - struct stat statbuf; /* We don't even use the contents of this. */ - - rc = stat(ADJPATH, &statbuf); - if (rc < 0 && errno == ENOENT) { - /* He doesn't have a adjtime file, so we'll use defaults. */ - adjtime_p->drift_factor = 0; - adjtime_p->last_adj_time = 0; - adjtime_p->not_adjusted = 0; - adjtime_p->last_calib_time = 0; - adjtime_p->local_utc = LOCAL; - - *rc_p = 0; - } else { - adjfile = fopen(ADJPATH, "r"); /* open file for reading */ - if (adjfile == NULL) { - const int fopen_errno = errno; - fprintf(stderr, MYNAME " is unable to open file " ADJPATH ". " - "fopen() errno=%d:%s", fopen_errno, strerror(fopen_errno)); - *rc_p = 2; - } else { - char line1[81]; /* String: first line of adjtime file */ - char line2[81]; /* String: second line of adjtime file */ - char line3[81]; /* String: third line of adjtime file */ - - line1[0] = '\0'; /* In case fgets fails */ - fgets(line1, sizeof(line1), adjfile); - line2[0] = '\0'; /* In case fgets fails */ - fgets(line2, sizeof(line2), adjfile); - line3[0] = '\0'; /* In case fgets fails */ - fgets(line3, sizeof(line3), adjfile); - - fclose(adjfile); - - /* Set defaults in case values are missing from file */ - adjtime_p->drift_factor = 0; - adjtime_p->last_adj_time = 0; - adjtime_p->not_adjusted = 0; - adjtime_p->last_calib_time = 0; - adjtime_p->local_utc = LOCAL; - - sscanf(line1, "%f %d %f", - &adjtime_p->drift_factor, - (int *) &adjtime_p->last_adj_time, - &adjtime_p->not_adjusted); - - sscanf(line2, "%d", (int *) &adjtime_p->last_calib_time); - - { - char local_utc_string[sizeof(line3)]; - - local_utc_string[0] = '\0'; /* In case nothing in line3 */ - sscanf(line3, "%s", local_utc_string); - - *rc_p = 0; /* Initial assumption - local/utc token is valid */ - if (strlen(local_utc_string) == 0) - adjtime_p->local_utc = LOCAL; - else if (strcmp(local_utc_string, "UTC") == 0) - adjtime_p->local_utc = UTC; - else if (strcmp(local_utc_string, "LOCAL") == 0) - adjtime_p->local_utc = LOCAL; - else { - fprintf(stderr, "%s: The first token of the third line of the file " - ADJPATH " is invalid. It must be LOCAL or UTC, indicating " - "to which time zone the hardware clock is set. Its " - "present value is '%s'.\n", MYNAME, local_utc_string); - *rc_p = 5; - } - } - } - adjtime_p->dirty = FALSE; - - if (debug) { - printf("Last drift adjustment done %s (Time %d)\n", - ctime2(adjtime_p->last_adj_time), - (int) adjtime_p->last_adj_time); - printf("Last calibration done %s (Time %d)\n", - ctime2(adjtime_p->last_calib_time), - (int) adjtime_p->last_calib_time); - } - } -} - - - -static void -synchronize_to_clock_tick(enum clock_access_method clock_access, - const int dev_port, const bool use_uf_bit, - int *retcode_p) { -/*----------------------------------------------------------------------------- - Wait until the moment the Hardware Clock updates to the next second, - so we know the exact time. - - The clock only has 1 second precision, so it gives the exact time only - once per second. - - Return *retcode_p == 0 if it worked, nonzero if it didn't. ------------------------------------------------------------------------------*/ - if (debug) printf("Waiting for clock tick...\n"); - - switch (clock_access) { - case ISA: synchronize_to_clock_tick_ISA(retcode_p, -1, use_uf_bit); break; - case DEV_PORT: synchronize_to_clock_tick_ISA(retcode_p, dev_port, - use_uf_bit); break; - case RTC_IOCTL: synchronize_to_clock_tick_RTC(retcode_p); break; - case KD: synchronize_to_clock_tick_KD(retcode_p); break; - default: - fprintf(stderr, "%s: Internal error in synchronize_to_clock_tick. " - "Invalid value for clock_access argument: %d.\n", - MYNAME, clock_access); - *retcode_p = 1; - } - if (debug) printf("...got clock tick\n"); - return; -} - - -static struct tm -make_within_one_year(const struct tm base_tm, const time_t last_known_time) { -/*---------------------------------------------------------------------------- - Compute a time that is the same as the input base_tm, except for a - different year. The year shall be whatever year it takes to make the - output time within one year after last_known_time. - - The timezone for both the input and output values is the value of - the TZ environment variable. ------------------------------------------------------------------------------*/ - struct tm broken_last_known_time; - /* The input time last_known_time, in broken down format */ - struct tm test_time; - - if (debug) - printf("Ignoring clock year and assuming " - "it's within 1 year after %s\n", - ctime2(last_known_time)); - - broken_last_known_time = *localtime(&last_known_time); - - test_time = base_tm; - test_time.tm_year = broken_last_known_time.tm_year; - - if (mktime(&test_time) < last_known_time) - test_time.tm_year += 1; - - return(test_time); -} - - - -static void -mktime_tz(struct tm hw_tm, const bool universal, const bool badyear, - const time_t last_known_time, - bool *valid_p, time_t *systime_p) { -/*----------------------------------------------------------------------------- - Convert a time in broken down format (hours, minutes, etc.) as read - from the Hardware Clock into standard unix time (seconds into - epoch). Return it as *systime_p. - - The broken down time is argument <tm>. This broken down time is - either in local time zone or UTC, depending on value of logical - argument 'universal'. True means it is in UTC. - - Argument 'badyear' true means the input time is from one of those - machines with the Award BIOS that is incapable of storing a year - value less than 94 or 95, which means we can't use the year value - from the clock (see documentation of hwclock's --badyear option). - In this case, we instead determine the year by assuming that it's - less than a year since the time <last_known_time>. - - - If the argument contains values that do not constitute a valid time, - and mktime() recognizes this, return *valid_p == false and - *systime_p undefined. However, mktime() sometimes goes ahead and - computes a fictional time "as if" the input values were valid, - e.g. if they indicate the 31st day of April, mktime() may compute - the time of May 1. In such a case, we return the same fictional - value mktime() does as *systime_p and return *valid_p == true. - ------------------------------------------------------------------------------*/ - time_t mktime_result; /* The value returned by our mktime() call */ - struct tm adjusted_tm; - /* The same as the value from our argument, except if we determine - the year in the argument is garbage, this value contains the year - computed from the ADJTIME file instead. - */ - char *zone; /* Local time zone name */ - - /* We use the C library function mktime(), but since it only works on - local time zone input, we may have to fake it out by temporarily - changing the local time zone to UTC. - */ - zone = (char *) getenv("TZ"); /* remember original time zone */ - - if (universal) { - /* Set timezone to UTC */ - setenv("TZ", "UTC 0", TRUE); - /* Note: tzset() gets called implicitly by the time code, but only the - first time. When changing the environment variable, better call - tzset() explicitly. - - Also: documentation for tzset() says if TZ = "", that means UTC. - But practice shows that that only works if tzset() hasn't already - been called before. So we explicitly say "UTC 0". - */ - tzset(); - } - - if (badyear) - adjusted_tm = make_within_one_year(hw_tm, last_known_time); - else adjusted_tm = hw_tm; - - mktime_result = mktime(&adjusted_tm); - if (mktime_result == -1) { - /* This apparently (not specified in mktime() documentation) means - the 'adjusted_tm' structure does not contain valid values (however, not - containing valid values does _not_ imply mktime() returns -1). - */ - /* Note that we are assuming here that the invalidity came from the - hardware values and was not introduced by our adjustments! - */ - *valid_p = FALSE; - *systime_p = 0; - if (debug) - printf("Invalid values in hardware clock: " - "%2d/%.2d/%.2d %.2d:%.2d:%.2d\n", - hw_tm.tm_year, hw_tm.tm_mon+1, hw_tm.tm_mday, - hw_tm.tm_hour, hw_tm.tm_min, hw_tm.tm_sec - ); - } else { - *valid_p = TRUE; - *systime_p = mktime_result; - if (debug) - printf("Hw clock time : %s = %d seconds since 1969\n", - ctime2(*systime_p), (int) *systime_p); - } - /* now put back the original zone. */ - if (zone) setenv("TZ", zone, TRUE); - else unsetenv("TZ"); - tzset(); -} - - - -static void -read_hardware_clock(const enum clock_access_method method, - const int dev_port, - const bool universal, const int hc_zero_year, - const bool badyear, - const time_t last_known_time, - bool *valid_p, time_t *systime_p) { -/*---------------------------------------------------------------------------- - Read the hardware clock and return the current time via *systime_p - argument. - - If the hardware clock fails to tell us a time, return *valid_p == false - and undefined value as *systime_p. Otherwise *valid_p == true. - - Consider the hardware clock to be set in Coordinated Universal Time - (UTC) iff 'universal' == true. - - Consider the year value of the clock to be useless iff 'badyear' == true. - - Recognize that the present time is is after 'last_known_time', which - information may be necessary to interpret the value of some hardware - clocks. - - Use the method indicated by 'method' argument to access the hardware clock. ------------------------------------------------------------------------------*/ - struct tm tm; - - switch (method) { - case RTC_IOCTL: - read_hardware_clock_rtc_ioctl(&tm); - break; - case ISA: - read_hardware_clock_isa(&tm, -1, hc_zero_year); - break; - case DEV_PORT: - read_hardware_clock_isa(&tm, dev_port, hc_zero_year); - break; - case KD: - read_hardware_clock_kd(&tm); - break; - default: - fprintf(stderr, - "%s: Internal error: invalid value for clock access method.\n", - MYNAME); - exit(5); - } - if (debug) - printf ("Time read from Hardware Clock: Y=%d M=%d D=%d %02d:%02d:%02d\n", - tm.tm_year, tm.tm_mon+1, tm.tm_mday, - tm.tm_hour, tm.tm_min, tm.tm_sec); - mktime_tz(tm, universal, badyear, last_known_time, valid_p, systime_p); -} - - - -static void -set_hardware_clock(const enum clock_access_method method, - const int dev_port, - const time_t newtime, - const bool universal, - const int hc_zero_year, const bool badyear, - const bool testing) { -/*---------------------------------------------------------------------------- - Set the Hardware Clock to the time 'newtime', in local time zone or UTC, - according to 'universal'. - - 'badyear' true means the clock is incapable of storing the proper - year value, so we instead store 95, 96, 97, or 98 so that it is at - least in the right place in the leap year cycle (and will remain so - for at least the next year). - - Use the method indicated by the 'method' argument. -----------------------------------------------------------------------------*/ - struct tm new_broken_time; - /* Time to which we will set Hardware Clock, in broken down format, in - the time zone of caller's choice - */ - - if (universal) new_broken_time = *gmtime(&newtime); - else new_broken_time = *localtime(&newtime); - - /* If the clock is incapable of storing the true year value, change - the year to a fictional stand-in year as described in the prolog. - */ - if (badyear) - new_broken_time.tm_year = 95 + ((new_broken_time.tm_year + 1) % 4); - - if (debug) - printf("Setting Hardware Clock to %.2d:%.2d:%.2d " - "= %d seconds since 1969\n", - new_broken_time.tm_hour, new_broken_time.tm_min, - new_broken_time.tm_sec, (int) newtime); - - switch (method) { - case RTC_IOCTL: - set_hardware_clock_rtc_ioctl(new_broken_time, testing); - break; - case ISA: - set_hardware_clock_isa(new_broken_time, hc_zero_year, -1, testing); - break; - case DEV_PORT: - set_hardware_clock_isa(new_broken_time, hc_zero_year, dev_port, testing); - break; - case KD: - set_hardware_clock_kd(new_broken_time, testing); - break; - default: - fprintf(stderr, - "%s: Internal error: invalid value for clock access method.\n", - MYNAME); - exit(5); - } -} - - - -static void -set_hardware_clock_exact(const time_t settime, - const struct timeval ref_time, - const enum clock_access_method clock_access, - const int dev_port, - const bool universal, - const int hc_zero_year, - const bool badyear, - const bool testing) { -/*---------------------------------------------------------------------------- - Set the Hardware Clock to the time 'settime', in local time zone or UTC, - according to 'universal'. - - But iff 'badyear', use a fictional year as appropriate for the --badyear - option. - - But correct 'settime' and wait for a fraction of a second so that - 'settime' is the value of the Hardware Clock as of system time - 'ref_time', which is in the past. For example, if 'settime' is - 14:03:05 and 'ref_time' is 12:10:04.5 and the current system - time is 12:10:06.0: Wait .5 seconds (to make exactly 2 seconds since - 'ref_time') and then set the Hardware Clock to 14:03:07, thus - getting a precise and retroactive setting of the clock. - - (Don't be confused by the fact that the system clock and the Hardware - Clock differ by two hours in the above example. That's just to remind - you that there are two independent time scales here). - - This function ought to be able to accept set times as fractional times. - Idea for future enhancement. - ------------------------------------------------------------------------------*/ - time_t newtime; /* Time to which we will set Hardware Clock */ - struct timeval now_time; /* locally used time */ - - gettimeofday(&now_time, NULL); - newtime = settime + (int) time_diff(now_time, ref_time) + 1; - if (debug) - printf("Time elapsed since reference time has been %.6f seconds.\n" - "Delaying further to reach the next full second.\n", - time_diff(now_time, ref_time)); - - /* Now delay some more until Hardware Clock time 'newtime' arrives */ - do gettimeofday(&now_time, NULL); - while (time_diff(now_time, ref_time) < newtime - settime); - - set_hardware_clock(clock_access, dev_port, newtime, - universal, hc_zero_year, badyear, testing); -} - - - -static void -display_time(const bool hclock_valid, const time_t systime, - const float sync_duration, const bool badyear_warn) { -/*---------------------------------------------------------------------------- - Put the time 'systime' on standard output in display format. - Except if hclock_valid == false, just tell standard output that we don't - know what time it is. - - Include in the output the adjustment 'sync_duration'. - - If the year is 1994 or 1995 and 'badyear_warn' is true, warn the - user that he has a brain-damaged clock and needs to use --badyear. - Since we didn't exist in 1994 and 1995, we know the clock isn't - correct. - ------------------------------------------------------------------------------*/ - if (!hclock_valid) - fprintf(stderr, "%s: The Hardware Clock registers contain values that are " - "either invalid (e.g. 50th day of month) or beyond the range " - "we can handle (e.g. Year 2095).\n", MYNAME); - else { - if (badyear_warn && (systime > START_OF_1994 && systime < END_OF_1995)) { - printf("WARNING: The Hardware Clock shows a time in 1994 " - "or 1995. This probably means you have a Hardware Clock " - "that is incapable of tracking years after 1999, and you " - "must use the --badyear option to make hwclock work for " - "you. See hwclock documentation for details.\n"); - } - - printf("%s %.6f seconds\n", ctime2(systime), -(sync_duration)); - } -} - - - -static int -interpret_date_string(const char *date_opt, time_t * const time_p) { -/*---------------------------------------------------------------------------- - Interpret the value of the --date option, which is something like - "13:05:01". In fact, it can be any of the myriad ASCII strings that specify - a time which the "date" program can understand. The date option value in - question is our "dateopt" argument. - - The specified time is in the local time zone. - - Our output, "*time_p", is a seconds-into-epoch time. - - We use the "date" program to interpret the date string. "date" must be - runnable by issuing the command "date" to the /bin/sh shell. That means - in must be in the current PATH. - - If anything goes wrong (and many things can), we return return code - 10 and arbitrary *time_p. Otherwise, return code is 0 and *time_p - is valid. -----------------------------------------------------------------------------*/ - FILE *date_child_fp; - char date_resp[100]; - const char magic[]="seconds-into-epoch="; - char date_command[100]; - int retcode; /* our eventual return code */ - int rc; /* local return code */ - - if (date_opt == NULL) { - fprintf(stderr, "%s: No --date option specified.\n", MYNAME); - retcode = 14; - } else if (strchr(date_opt, '"') != NULL) { - /* Quotation marks in date_opt would ruin the date command we construct. - */ - fprintf(stderr, "%s: The value of the --date option is not a valid date.\n" - "In particular, it contains quotation marks.\n", MYNAME); - retcode = 12; - } else { - sprintf(date_command, "date --date=\"%s\" +seconds-into-epoch=%%s", - date_opt); - if (debug) printf("Issuing date command: %s\n", date_command); - - date_child_fp = popen(date_command, "r"); - if (date_child_fp == NULL) { - fprintf(stderr, "%s: Unable to run 'date' program in /bin/sh shell. " - "popen() failed with errno=%s (%d)\n", - MYNAME, strerror(errno), errno); - retcode = 10; - } else { - date_resp[0] = '\0'; /* in case fgets fails */ - fgets(date_resp, sizeof(date_resp), date_child_fp); - if (debug) printf("response from date command = %s\n", date_resp); - if (strncmp(date_resp, magic, sizeof(magic)-1) != 0) { - fprintf(stderr, "%s: The date command issued by " MYNAME " returned " - "unexpected results.\n" - "The command was:\n %s\nThe response was:\n %s\n", - MYNAME, date_command, date_resp); - retcode = 8; - } else { - int seconds_since_epoch; - rc = sscanf(date_resp + sizeof(magic)-1, "%d", &seconds_since_epoch); - if (rc < 1) { - fprintf(stderr, "%s: The date command issued by " MYNAME " returned" - "something other than an integer where the converted" - "time value was expected.\n" - "The command was:\n %s\nThe response was:\n %s\n", - MYNAME, date_command, date_resp); - retcode = 6; - } else { - retcode = 0; - *time_p = seconds_since_epoch; - if (debug) - printf("date string %s equates to %d seconds since 1969.\n", - date_opt, (int) *time_p); - } - } - fclose(date_child_fp); - } - } - return(retcode); -} - - - -static int -set_system_clock(const bool hclock_valid, const time_t newtime, - const bool testing) { -/*---------------------------------------------------------------------------- - Set the System Clock to time 'newtime'. - - Also set the kernel time zone value to the value indicated by the - TZ environment variable and/or /usr/lib/zoneinfo/, interpreted as - tzset() would interpret them. Except: do not consider Daylight - Savings Time to be a separate component of the time zone. Include - any effect of DST in the basic timezone value and set the kernel - DST value to 0. - - EXCEPT: if hclock_valid is false, just issue an error message - saying there is no valid time in the Hardware Clock to which to set - the system time. - - If 'testing' is true, don't actually update anything -- just say we - would have. ------------------------------------------------------------------------------*/ - int retcode; /* our eventual return code */ - - if (!hclock_valid) { - fprintf(stderr, "%s: The Hardware Clock does not contain a valid time, so " - "we cannot set the System Time from it.\n", MYNAME); - retcode = 1; - } else { - struct timeval tv; - int rc; /* local return code */ - - tv.tv_sec = newtime; - tv.tv_usec = 0; - - tzset(); /* init timezone, daylight from TZ or ...zoneinfo/localtime */ - /* An undocumented function of tzset() is to set global variabales - 'timezone' and 'daylight' - */ - - if (debug) { - printf( "Calling settimeofday:\n" ); - /* Note: tv_sec and tv_usec are declared variously on different - systems: int, long, time_t. Casting to long below makes it - compile everywhere. - */ - printf( "\ttv.tv_sec = %ld, tv.tv_usec = %ld\n", - (long) tv.tv_sec, (long) tv.tv_usec ); - } - if (testing) { - printf("Not setting system clock because running in test mode.\n"); - retcode = 0; - } else { - /* For documentation of settimeofday() see, in addition to its man page, - kernel/time.c in the Linux source code. - */ - const struct timezone tz = { timezone/60 - 60*daylight, 0 }; - /* put daylight in minuteswest rather than dsttime, - since the latter is mostly ignored ... */ - rc = settimeofday(&tv, &tz); - if (rc != 0) { - if (errno == EPERM) - fprintf(stderr, "%s: Must be superuser to set system clock.\n", - MYNAME); - else - fprintf(stderr, - "%s: settimeofday() failed, errno=%s (%d)\n", - MYNAME, strerror(errno), errno); - retcode = 1; - } else retcode = 0; - } - } - return(retcode); -} - - -static void -adjust_drift_factor(struct adjtime *adjtime_p, - const time_t actual_time, - const bool hclock_valid, - const struct timeval hclocktime ) { -/*--------------------------------------------------------------------------- - Update the drift factor and calibration parameters in '*adjtime_p' - to reflect the fact that at some recent instant when the actual time - was 'actual_time', the Hardware Clock said the time was - 'hclocktime', and that we have corrected the Hardware Clock - accordingly. Note that 'hclocktime' is a fractional time, taking - into consideration the Hardware Clock register contents and how long - those contents had been that. - - We assume that the only cause of error in the Hardware Clock is - systematic drift and that the user has been doing regular drift - adjustments using the drift factor in the adjtime file. Therefore, - if 'actual_time' and 'hclocktime' are different, that means the drift - factor isn't quite right. - - EXCEPT: if 'hclock_valid' is false, assume Hardware Clock was not set - before to anything meaningful and regular adjustments have not been - done, so don't adjust the drift factor. - - Also, don't adjust if the error is more than 30 minutes, because that - kind of error probably isn't drift. - -----------------------------------------------------------------------------*/ - if (!hclock_valid) { - if (debug) - printf("Not adjusting drift factor because the Hardware Clock " - "previously contained garbage.\n"); - } else if (adjtime_p->last_calib_time == 0) { - if (debug) - printf("Not adjusting drift factor because there is no \n" - "previous calibration information (i.e. adjtime file is \n" - "nonexistent or has 0 in last calibration time field).\n"); - } else if (time_diff(hclocktime, t2tv(adjtime_p->last_calib_time)) - < 23.0 * 60.0 * 60.0) { - if (debug) - printf("Not adjusting drift factor because it has been less than a " - "day since the last calibration.\n"); - } else { - const float sec_per_day = 24.0 * 60.0 * 60.0; - float atime_per_htime; /* adjusted time units per hardware time unit */ - float adj_days; /* days since last adjustment (in hardware clock time) */ - float cal_days; /* days since last calibration (in hardware clock time) */ - float exp_drift; /* expected drift (sec) since last adjustment */ - float unc_drift; /* uncorrected drift (sec) since last calibration */ - float factor_adjust; /* amount to add to previous drift factor */ - atime_per_htime = 1.0 + adjtime_p->drift_factor / sec_per_day; - adj_days = time_diff(hclocktime, t2tv(adjtime_p->last_adj_time)) - / sec_per_day; - exp_drift = adj_days * adjtime_p->drift_factor + adjtime_p->not_adjusted; - unc_drift = time_diff(t2tv(actual_time), hclocktime) - exp_drift; - cal_days = ((float)(adjtime_p->last_adj_time - adjtime_p->last_calib_time) - + adjtime_p->not_adjusted) / (sec_per_day * atime_per_htime) - + adj_days; - factor_adjust = unc_drift / cal_days; - - if (unc_drift > 30*60.0) { - if (debug) - printf("Not adjusting drift factor because we calculated the \n" - "uncorrected drift as %.0f seconds, which is so large that \n" - "it probably is not drift at all, but rather some \n" - "clock setting anomaly.\n\n", unc_drift); - } else { - if (debug) - printf("Clock drifted %.1f seconds in the past %d seconds " - "in spite of a drift factor of %f seconds/day.\n" - "Adjusting drift factor by %f seconds/day\n", - unc_drift, - (int) (actual_time - adjtime_p->last_calib_time), - adjtime_p->drift_factor, - factor_adjust ); - - adjtime_p->drift_factor += factor_adjust; - } - } - adjtime_p->last_calib_time = actual_time; - - adjtime_p->last_adj_time = actual_time; - - adjtime_p->not_adjusted = 0; - - adjtime_p->dirty = TRUE; -} - - - -static void -calculate_adjustment( - const float factor, - const time_t last_time, - const float not_adjusted, - const time_t systime, - int *adjustment_p, - float *retro_p, - const int debug ) { -/*---------------------------------------------------------------------------- - Do the drift adjustment calculation. - - The way we have to set the clock, we need the adjustment in two parts: - - 1) an integer number of seconds (return as *adjustment_p) - - 2) a positive fraction of a second (less than 1) (return as *retro_p) - - The sum of these two values is the adjustment needed. Positive means to - advance the clock or insert seconds. Negative means to retard the clock - or remove seconds. -----------------------------------------------------------------------------*/ - float exact_adjustment; - - exact_adjustment = ((float) (systime - last_time)) * factor / (24 * 60 * 60) - + not_adjusted; - *adjustment_p = FLOOR(exact_adjustment); - - *retro_p = exact_adjustment - (float) *adjustment_p; - if (debug) { - printf ("Time since last adjustment is %d seconds\n", - (int) (systime - last_time)); - printf ("Need to insert %d seconds and refer time back " - "%.6f seconds ago\n", - *adjustment_p, *retro_p); - } -} - - - -static void -save_adjtime(const struct adjtime adjtime, const bool testing) { -/*----------------------------------------------------------------------------- - Write the contents of the <adjtime> structure to its disk file. - - But if the contents are clean (unchanged since read from disk), don't - bother. ------------------------------------------------------------------------------*/ - char newfile[506]; /* Stuff to write to disk file */ - /* snprintf is not always available, but this is safe - as long as libc does not use more than 100 positions for %ld or %f - */ - - int rc; /* locally used: return code from a function */ - - if (adjtime.dirty) { - /* We'd use snprintf here, but apparently, it isn't always available. */ - sprintf(newfile, "%f %ld %f\n%ld\n%s\n", - adjtime.drift_factor, - (long) adjtime.last_adj_time, - adjtime.not_adjusted, - (long) adjtime.last_calib_time, - (adjtime.local_utc == UTC) ? "UTC" : "LOCAL" - ); - - if (testing) { - printf("Not updating adjtime file because of testing mode.\n"); - printf("Would have written the following to %s:\n%s", - ADJPATH, newfile); - } else { - FILE *adjfile; - - adjfile = fopen(ADJPATH, "w"); - if (adjfile == NULL) { - const int fopen_errno = errno; - printf("Could not open file with the clock adjustment parameters " - "in it (%s) for output.\n" - "fopen() returned errno %d: %s.\n" - "Drift adjustment parameters not updated.\n", - ADJPATH, fopen_errno, strerror(errno)); - } else { - rc = fprintf(adjfile, newfile); - if (rc < 0) { - const int fprintf_errno = errno; - printf("Could not update file (%s) " - "with the clock adjustment parameters in it.\n" - "fprintf() returned errno %d: %s.\n" - "Drift adjustment parameters not updated.\n", - ADJPATH, fprintf_errno, strerror(errno)); - } - rc = fclose(adjfile); - if (rc < 0) { - const int fclose_errno = errno; - printf("Could not update file (%s) " - "with the clock adjustment parameters in it.\n" - "fclose() returned errno %d: %s.\n" - "Drift adjustment parameters not updated.\n", - ADJPATH, fclose_errno, strerror(errno)); - } - } - } - } else if (debug) - printf("Skipping update of adjtime file because nothing has changed.\n"); -} - - - -static void -do_adjustment(struct adjtime *adjtime_p, - const bool hclock_valid, const time_t hclocktime, - const struct timeval read_time, - const enum clock_access_method clock_access, - const int dev_port, const bool universal, - const int hc_zero_year, - const bool badyear, const bool testing) { -/*--------------------------------------------------------------------------- - Do the adjustment requested, by 1) setting the Hardware Clock (if - necessary), and 2) updating the last-adjusted time in the adjtime - structure. - - Do not update anything if the Hardware Clock does not currently present - a valid time. - - arguments 'factor' and 'last_time' are current values from the adjtime - file. - - 'hclock_valid' means the Hardware Clock contains a valid time, and that - time is 'hclocktime'. - - 'read_time' is the current system time (to be precise, it is the system - time at the time 'hclocktime' was read, which due to computational delay - could be a short time ago). - - 'universal': the Hardware Clock is kept in UTC. - - 'badyear': the Hardware Clock is incapable of storing years outside - the range 1994-1999. - - 'testing': We are running in test mode (no updating of clock). - - We do not bother to update the clock if the adjustment would be less than - one second. This is to avoid cumulative error and needless CPU hogging - (remember we use an infinite loop for some timing) if the user runs us - frequently. - -----------------------------------------------------------------------------*/ - if (!hclock_valid) { - fprintf(stderr, "%s: The Hardware Clock does not contain a valid time, " - "so we cannot adjust it.\n", MYNAME); - /* Any previous calibration had to be before the clock got hosed, so - wipe out the record of it so it won't be used in the future. - */ - adjtime_p->last_calib_time = 0; - adjtime_p->last_adj_time = 0; - adjtime_p->not_adjusted = 0; - adjtime_p->dirty = TRUE; - } else if (adjtime_p->last_adj_time == 0) { - if (debug) - printf("Not adjusting clock because we have no information about \n" - "the previous calibration (i.e. the adjtime file is \n" - "nonexistent or contains zero in the last calibrated time \n" - "field).\n"); - } else { - int adjustment; - /* Number of seconds we must insert in the Hardware Clock */ - float retro; - /* Fraction of second we have to remove from clock after inserting - <adjustment> whole seconds. - */ - calculate_adjustment(adjtime_p->drift_factor, - adjtime_p->last_adj_time, - adjtime_p->not_adjusted, - hclocktime, - &adjustment, &retro, - debug ); - if (adjustment > 0 || adjustment < -1) { - set_hardware_clock_exact(hclocktime + adjustment, - time_inc(read_time, -retro), - clock_access, dev_port, universal, - hc_zero_year, badyear, testing); - adjtime_p->last_adj_time = hclocktime + adjustment; - adjtime_p->not_adjusted = 0; - adjtime_p->dirty = TRUE; - } else - if (debug) - printf("Needed adjustment is less than one second, " - "so not setting clock.\n"); - } -} - - -static void -determine_clock_access_method(const bool user_requests_ISA, - const bool user_says_jensen, - enum clock_access_method *clock_access_p) { -/*---------------------------------------------------------------------------- - Figure out how we're going to access the hardware clock, by seeing - what facilities are available, looking at invocation options, and - using compile-time constants. - - 'user_requests_ISA' means the user explicitly asked for the ISA method, - so we'll use that (even if we know it will fail because the machine - is incapable!). ------------------------------------------------------------------------------*/ - const bool jensen = - user_says_jensen || - (alpha_machine && is_in_cpuinfo("system type", "Jensen")); - /* See comments at top of program for how Jensen is a special case. */ - bool rtc_works; - /* The /dev/rtc method is available and seems to work on this machine */ - bool kdghwclk_works; - /* The KDHWCLK method is available and seems to work on this machine. */ - - see_if_rtc_works(&rtc_works); /* May issue error messages */ - see_if_kdghwclk_works(&kdghwclk_works); /* May issue error messages */ - - if (user_requests_ISA) *clock_access_p = ISA; - else if (rtc_works) *clock_access_p = RTC_IOCTL; - else if (kdghwclk_works) *clock_access_p = KD; - else if (got_kdghwclk) *clock_access_p = ISA; - /* I don't know on what machine the above line makes any sense, but the - code has always been this way. -BJH 99.03.31 - */ - else if (isa_machine) *clock_access_p = ISA; - else if (jensen) *clock_access_p = DEV_PORT; - else if (alpha_machine) *clock_access_p = ISA; - else *clock_access_p = NOCLOCK; - if (debug) { - switch (*clock_access_p) { - case ISA: printf("Using direct I/O instructions to ISA clock.\n"); break; - case KD: printf("Using KDGHWCLK interface to m68k clock.\n"); break; - case RTC_IOCTL: printf("Using /dev/rtc interface to clock.\n"); break; - case DEV_PORT: printf("Using /dev/port interface to clock.\n"); break; - case NOCLOCK: printf("Unable to find a usable clock access method.\n"); - break; - default: - printf("determine_clock_access_method() returned invalid value: %d.\n", - *clock_access_p); - } - } -} - - - -static void -do_systohc(const enum clock_access_method clock_access, - const int dev_port, - const time_t hclocktime, const bool hclock_valid, - const struct timeval read_time, - const bool universal, const int hc_zero_year, - const bool badyear, const bool testing, - struct adjtime * const adjtime_p) { -/*---------------------------------------------------------------------------- - Perform the specifics of the hwclock --systohc function. ------------------------------------------------------------------------------*/ - struct timeval nowtime, reftime; - /* We can only set_hardware_clock_exact to a whole seconds - time, so we set it with reference to the most recent - whole seconds time. - */ - gettimeofday(&nowtime, NULL); - reftime.tv_sec = nowtime.tv_sec; - reftime.tv_usec = 0; - - set_hardware_clock_exact((time_t) reftime.tv_sec, reftime, - clock_access, dev_port, universal, - hc_zero_year, badyear, testing); - adjust_drift_factor(adjtime_p, (time_t) reftime.tv_sec, hclock_valid, - time_inc(t2tv(hclocktime), - - time_diff(read_time, reftime) - ) - ); -} - - -static void -manipulate_clock(const bool show, const bool adjust, - const bool set, const time_t set_time, - const bool hctosys, const bool systohc, - const struct timeval startup_time, - const enum clock_access_method clock_access, - const bool utc, const bool local_opt, - const bool badyear, const bool arc_opt, const bool srm_opt, - const bool user_wants_uf, - const bool testing, - int *retcode_p - ) { -/*--------------------------------------------------------------------------- - Do all the normal work of hwclock - read, set clock, etc. - - Issue output to stdout and error message to stderr where appropriate. - - Return rc == 0 if everything went OK, rc != 0 if not. -----------------------------------------------------------------------------*/ - struct adjtime adjtime; - /* Contents of the adjtime file, or what they should be. */ - int rc; /* local return code */ - bool no_auth; /* User lacks necessary authorization to access the clock */ - int dev_port; - /* File descriptor for /dev/port, if we're using it. -1 if we - couldn't open it. 0 if we aren't using it. - */ - get_inb_outb_privilege(clock_access, &no_auth); - - if (no_auth) *retcode_p = 1; - else { - get_dev_port_access(clock_access, &dev_port); - - if (dev_port < 0) *retcode_p = 3; - else { - read_adjtime(&adjtime, &rc); - if (rc != 0) *retcode_p = 2; - else { - const bool use_uf_bit = uf_bit_needed(user_wants_uf); - const int hc_zero_year = zero_year(arc_opt, srm_opt); - /* year of century to which a value of zero corresponds in the - Hardware Clock's year register. - */ - const bool universal = hw_clock_is_utc(utc, local_opt, adjtime); - /* The hardware clock is kept in Coordinated Universal Time. */ - - if ((set || systohc || adjust) && - (adjtime.local_utc == UTC) != universal) { - adjtime.local_utc = universal ? UTC : LOCAL; - adjtime.dirty = TRUE; - } - - synchronize_to_clock_tick(clock_access, dev_port, use_uf_bit, - retcode_p); - /* this takes up to 1 second */ - if (*retcode_p == 0) { - struct timeval read_time; - /* The time at which we read the Hardware Clock */ - - bool hclock_valid; - /* The Hardware Clock gives us a valid time, or at least something - close enough to fool mktime(). - */ - - time_t hclocktime; - /* The time the hardware clock had just after we - synchronized to its next clock tick when we started up. - Defined only if hclock_valid is true. - */ - - gettimeofday(&read_time, NULL); - read_hardware_clock(clock_access, dev_port, universal, - hc_zero_year, badyear, - adjtime.last_calib_time, - &hclock_valid, &hclocktime); - - if (show) { - display_time(hclock_valid, hclocktime, - time_diff(read_time, startup_time), !badyear); - *retcode_p = 0; - } else if (set) { - set_hardware_clock_exact(set_time, startup_time, - clock_access, dev_port, universal, - hc_zero_year, - badyear, testing); - adjust_drift_factor(&adjtime, set_time, hclock_valid, - time_inc(t2tv(hclocktime), - - time_diff(read_time, startup_time) - ) - ); - *retcode_p = 0; - } else if (adjust) { - do_adjustment(&adjtime, hclock_valid, hclocktime, - read_time, clock_access, dev_port, - universal, hc_zero_year, - badyear, testing); - *retcode_p = 0; - } else if (systohc) { - do_systohc(clock_access, dev_port, - hclocktime, hclock_valid, read_time, - universal, hc_zero_year, badyear, testing, - &adjtime); - *retcode_p = 0; - } else if (hctosys) { - rc = set_system_clock(hclock_valid, hclocktime, testing); - if (rc != 0) { - printf("Unable to set system clock.\n"); - *retcode_p = 1; - } else *retcode_p = 0; - } - save_adjtime(adjtime, testing); - } - } - } - if (clock_access == DEV_PORT && dev_port >= 0) close(dev_port); - } -} - - - -static void -report_version(void) { - - char *additional_version; /* malloc'ed */ - /* Stuff to add on to the version report, after the basic version. - If this is hwclock packaged with util-linux, this is the - util-linux version. Otherwise, it's nothing. - */ - -#ifdef UTIL_LINUX - additional_version = malloc(strlen(util_linux_version) + 5); - sprintf(additional_version, "/%s", util_linux_version); -#else - additional_version = strdup(""); -#endif - printf(MYNAME " " VERSION "%s\n", additional_version); - free(additional_version); -} - - - -static void -manipulate_epoch(const bool getepoch, const bool setepoch, - const int epoch_opt, const bool testing) { -/*---------------------------------------------------------------------------- - Get or set the Hardware Clock epoch value in the kernel, as appropriate. - 'getepoch', 'setepoch', and 'epoch' are hwclock invocation options. - - 'epoch' == -1 if the user did not specify an "epoch" option. - ------------------------------------------------------------------------------*/ - /* - Maintenance note: This should work on non-Alpha machines, but the - evidence today (98.03.04) indicates that the kernel only keeps the - epoch value on Alphas. If that is ever fixed, this function should be - changed. - */ - - if (!alpha_machine) - fprintf(stderr, - "%s: The kernel keeps an epoch value for the Hardware Clock " - "only on an Alpha machine.\nThis copy of hwclock was built for " - "a machine other than Alpha\n(and thus is presumably not running " - "on an Alpha now). No action taken.\n", MYNAME); - else { - if (getepoch) { - unsigned long epoch; - char *reason; /* malloc'ed */ - - get_epoch(&epoch, &reason); - if (reason != NULL) { - printf("Unable to get the epoch value from the kernel. %s\n", - reason); - free(reason); - } else - printf("Kernel is assuming an epoch value of %lu\n", epoch); - } else if (setepoch) { - if (epoch_opt == -1) - fprintf(stderr, "%s: To set the epoch value, you must use the 'epoch' " - "option to tell to what value to set it.\n", MYNAME); - else { - int rc; - set_epoch(epoch_opt, testing, &rc); - if (rc != 0) - printf("Unable to set the epoch value in the kernel.\n"); - } - } - } -} - - - -int -main(int argc, char **argv, char **envp) { -/*---------------------------------------------------------------------------- - MAIN ------------------------------------------------------------------------------*/ - struct timeval startup_time; - /* The time we started up, in seconds into the epoch, including fractions. - */ - time_t set_time; /* Time to which user said to set Hardware Clock */ - - enum clock_access_method clock_access; - /* The method that we determine is best for accessing Hardware Clock - on this system. - */ - - bool permitted; /* User is permitted to do the function */ - int retcode; /* Our eventual return code */ - - int rc; /* local return code */ - - /* option_def is the control table for the option parser. These other - variables are the results of parsing the options and their meanings - are given by the option_def. The only exception is <show>, which - may be modified after parsing is complete to effect an implied option. - */ - bool show, set, systohc, hctosys, adjust, getepoch, setepoch, version; - bool utc, local_opt, badyear, testing, directisa; - bool arc_opt, jensen_opt, srm_opt, funky_opt; - char *date_opt; - int epoch_opt; - - const optStruct option_def[] = { - { 'r', (char *) "show", OPT_FLAG, &show, 0 }, - { 0, (char *) "set", OPT_FLAG, &set, 0 }, - { 'w', (char *) "systohc", OPT_FLAG, &systohc, 0 }, - { 's', (char *) "hctosys", OPT_FLAG, &hctosys, 0 }, - { 0, (char *) "getepoch", OPT_FLAG, &getepoch, 0 }, - { 0, (char *) "setepoch", OPT_FLAG, &setepoch, 0 }, - { 'a', (char *) "adjust", OPT_FLAG, &adjust, 0 }, - { 'v', (char *) "version", OPT_FLAG, &version, 0 }, - { 0, (char *) "date", OPT_STRING, &date_opt, 0 }, - { 0, (char *) "epoch", OPT_UINT, &epoch_opt, 0 }, - { 'u', (char *) "utc", OPT_FLAG, &utc, 0 }, - { 0, (char *) "localtime", OPT_FLAG, &local_opt, 0 }, - { 0, (char *) "badyear", OPT_FLAG, &badyear, 0 }, - { 0, (char *) "directisa", OPT_FLAG, &directisa, 0 }, - { 0, (char *) "test", OPT_FLAG, &testing, 0 }, - { 'D', (char *) "debug", OPT_FLAG, &debug, 0 }, - { 'A', (char *) "arc", OPT_FLAG, &arc_opt, 0 }, - { 'J', (char *) "jensen", OPT_FLAG, &jensen_opt,0 }, - { 'S', (char *) "srm", OPT_FLAG, &srm_opt, 0 }, - { 'F', (char *) "funky-toy", OPT_FLAG, &funky_opt, 0 }, - { 0, (char *) NULL, OPT_END, NULL, 0 } - }; - int argc_parse; /* argc, except we modify it as we parse */ - char **argv_parse; /* argv, except we modify it as we parse */ - - assume_interrupts_enabled(); /* Since we haven't messed with them yet */ - - gettimeofday(&startup_time, NULL); /* Remember what time we were invoked */ - - /* set option defaults */ - show = set = systohc = hctosys = adjust = getepoch = setepoch = - version = utc = local_opt = badyear = - directisa = testing = debug = - jensen_opt = arc_opt = srm_opt = funky_opt = FALSE; - date_opt = NULL; - epoch_opt = -1; - - argc_parse = argc; argv_parse = argv; - optParseOptions(&argc_parse, argv_parse, option_def, 0); - /* Uses and sets argc_parse, argv_parse. - Sets show, set, systohc, hctosys, adjust, getepoch, setepoch, - version, utc, localtime, badyear, - directisa, testing, debug, - date_opt, epoch_opt, - jensen_opt, arc_opt, srm_opt, funky_opt - */ - - if (argc_parse - 1 > 0) { - fprintf(stderr, MYNAME " takes no non-option arguments. " - "You supplied %d. See man page for complete syntax.\n", - argc_parse - 1); - exit(100); - } - - if (show + set + systohc + hctosys + adjust + - getepoch + setepoch + version > 1) { - fprintf(stderr, - "You have specified multiple function options to hwclock.\n" - "You can only perform one function at a time.\n"); - exit(100); - } - - if (set) { - rc = interpret_date_string(date_opt, &set_time); /* (time-consuming) */ - if (rc != 0) { - fprintf(stderr, "%s: No usable set-to time given. Cannot set clock.\n", - MYNAME); - exit(100); - } - } - - if (jensen_opt && !alpha_machine) { - fprintf(stderr, "%s: Your options indicate that this is a Jensen model of " - "DEC Alpha, but this is not an Alpha machine!\n", MYNAME); - exit(100); - } - - if (srm_opt && alpha_machine) { - fprintf(stderr, "%s: Your options indicate that this machine keeps SRM " - "console time, but only DEC Alphas have such a clock and this is " - "not an Alpha!\n", MYNAME); - exit(100); - } - if (arc_opt && alpha_machine) { - fprintf(stderr, "%s: Your options indicate that this machine's clock" - "keeps ARC console time, " - "but only DEC Alphas have such a clock and this is " - "not an Alpha!\n", MYNAME); - exit(100); - } - - if (directisa && !(isa_machine || alpha_machine)) { - fprintf(stderr, "%s: You have requested direct access to the ISA Hardware " - "Clock using machine instructions from the user process. " - "But this method only works on an ISA machine with an x86 " - "CPU, or a similar machine such as DEC Alpha. " - "This is not one.\n", MYNAME); - exit(100); - } - - if (utc && local_opt) { - fprintf(stderr, "%s: The --utc and --localtime options are mutually " - "exclusive. You specified both.\n", MYNAME); - exit(100); - } - - - if (!(show | set | systohc | hctosys | adjust | getepoch | setepoch | - version)) - show = TRUE; /* default to show */ - - - if (getuid() == 0) permitted = TRUE; - else { - /* program is designed to run setuid (in some situations) -- be secure! */ - if (set || hctosys || systohc || adjust) { - fprintf(stderr, - "%s: Sorry, only the superuser can change the " - "Hardware Clock.\n", MYNAME); - permitted = FALSE; - } else if (setepoch) { - fprintf(stderr, - "%s: Sorry, only the superuser can change " - "the Hardware Clock epoch in the kernel.\n", MYNAME); - permitted = FALSE; - } else permitted = TRUE; - } - - if (!permitted) retcode = 2; - else { - retcode = 0; - if (version) { - report_version(); - } else if (getepoch || setepoch) { - manipulate_epoch(getepoch, setepoch, epoch_opt, testing); - } else { - determine_clock_access_method(directisa, jensen_opt, &clock_access); - if (clock_access == NOCLOCK) - fprintf(stderr, "%s: Cannot access the Hardware Clock via any known " - "method. Use --debug option to see the details of our " - "search for an access method.\n", MYNAME); - else - manipulate_clock(show, adjust, set, set_time, hctosys, systohc, - startup_time, clock_access, utc, local_opt, badyear, - arc_opt, srm_opt, funky_opt, testing, &rc); - } - } - exit(retcode); -} - - -/**************************************************************************** - - History of this program: - - 99.04.08 BJH Version 2.5 - - Make it work on Alphas without /dev/rtc. Thanks to David Mosberger - <davidm@azstarnet.com>, Jay Estabrook <jestabro@amt.tay1.dec.com>, - Martin Ostermann <ost@coments.rwth-aachen.de>, Andries Brouwer - <aeb@cwi.nl>. Most of this code is lifted from another program - called "clock" (not the original ancestor of hwclock) that has - circulated for use on Alpha. - - Make it work on Sparc. - - Add --badyear option. Thanks to David J Coffin (dcoffin@shore.net) - for the design of this. - - Add --localtime option, local/UTC value in adjtime file, and defaults - for local/utc. - - Don't set CMOS memory Byte 50 (century byte). On some machines, - that byte not only isn't used as a century byte, but it is used for - something else. - - Don't update the drift factor if the variation is so huge that it - probably wasn't due to drift. - - Compute drift factor with better precision. - - 98.08.12 BJH Version 2.4 - - Don't use century byte from Hardware Clock. Add comments telling why. - - - 98.06.20 BJH Version 2.3. - - Make --hctosys set the kernel timezone from TZ environment variable - and/or /usr/lib/zoneinfo. From Klaus Ripke (klaus@ripke.com). - - 98.03.05 BJH. Version 2.2. - - Add --getepoch and --setepoch. - - Fix some word length things so it works on Alpha. - - Make it work when /dev/rtc doesn't have the interrupt functions. - In this case, busywait for the top of a second instead of blocking and - waiting for the update complete interrupt. - - Fix a bunch of bugs too numerous to mention. - - 97.06.01: BJH. Version 2.1. Read and write the century byte (Byte - 50) of the ISA Hardware Clock when using direct ISA I/O. Problem - discovered by job (jei@iclnl.icl.nl). - - Use the rtc clock access method in preference to the KDGHWCLK method. - Problem discovered by Andreas Schwab <schwab@LS5.informatik.uni-dortmund.de>. - - November 1996: Version 2.0.1. Modifications by Nicolai Langfeldt - (janl@math.uio.no) to make it compile on linux 1.2 machines as well - as more recent versions of the kernel. Introduced the NO_CLOCK - access method and wrote feature test code to detect absense of rtc - headers. - - - Bryan Henderson based hwclock on the program "clock", in September - 1996. While remaining mostly backward compatible with clock, - hwclock added the following: - - - You can set the hardware clock without also modifying the Linux - system clock. - - - You can read and set the clock with finer than 1 second precision. - - - When you set the clock, hwclock automatically refigures the drift - rate, based on how far off the clock was before you set it. (This - is the drift rate that is used with the --adjust function to - automatically adjust the clock periodically to compensate for drift). - - - More mnemonic GNU-style command line options. - - - Comments describing how the clock and program work to improve - maintainability. - - - Removed the old dead I/O code that worked without the inb/outb - instructions and without the asm/io.h definitions. - - The first version of hwclock was Version 2. - - Here is the history section from the "clock" program at the time it was - used as a basis for hwclock: - - V1.0 - - - V1.0 by Charles Hedrick, hedrick@cs.rutgers.edu, April 1992. - - ******************** - V1.1 - Modified for clock adjustments - Rob Hooft, hooft@chem.ruu.nl, Nov 1992 - Also moved error messages to stderr. The program now uses getopt. - Changed some exit codes. Made 'gcc 2.3 -Wall' happy. - - ***** - V1.2 - - Applied patches by Harald Koenig (koenig@nova.tat.physik.uni-tuebingen.de) - Patched and indented by Rob Hooft (hooft@EMBL-Heidelberg.DE) - - A free quote from a MAIL-message (with spelling corrections): - - "I found the explanation and solution for the CMOS reading 0xff problem - in the 0.99pl13c (ALPHA) kernel: the RTC goes offline for a small amount - of time for updating. Solution is included in the kernel source - (linux/kernel/time.c)." - - "I modified clock.c to fix this problem and added an option (now default, - look for USE_INLINE_ASM_IO) that I/O instructions are used as inline - code and not via /dev/port (still possible via #undef ...)." - - With the new code, which is partially taken from the kernel sources, - the CMOS clock handling looks much more "official". - Thanks Harald (and Torsten for the kernel code)! - - ***** - V1.3 - Canges from alan@spri.levels.unisa.edu.au (Alan Modra): - a) Fix a few typos in comments and remove reference to making - clock -u a cron job. The kernel adjusts cmos time every 11 - minutes - see kernel/sched.c and kernel/time.c set_rtc_mmss(). - This means we should really have a cron job updating - /etc/adjtime every 11 mins (set last_time to the current time - and not_adjusted to ???). - b) Swapped arguments of outb() to agree with asm/io.h macro of the - same name. Use outb() from asm/io.h as it's slightly better. - c) Changed CMOS_READ and CMOS_WRITE to inline functions. Inserted - cli()..sti() pairs in appropriate places to prevent possible - errors, and changed ioperm() call to iopl() to allow cli. - d) Moved some variables around to localise them a bit. - e) Fixed bug with clock -ua or clock -us that cleared environment - variable TZ. This fix also cured the annoying display of bogus - day of week on a number of machines. (Use mktime(), ctime() - rather than asctime() ) - f) Use settimeofday() rather than stime(). This one is important - as it sets the kernel's timezone offset, which is returned by - gettimeofday(), and used for display of MSDOS and OS2 file - times. - g) faith@cs.unc.edu added -D flag for debugging - - V1.4: alan@SPRI.Levels.UniSA.Edu.Au (Alan Modra) - Wed Feb 8 12:29:08 1995, fix for years > 2000. - faith@cs.unc.edu added -v option to print version. */ - - |