|  | /* | 
|  | *  linux/arch/alpha/kernel/rtc.c | 
|  | * | 
|  | *  Copyright (C) 1991, 1992, 1995, 1999, 2000  Linus Torvalds | 
|  | * | 
|  | * This file contains date handling. | 
|  | */ | 
|  | #include <linux/errno.h> | 
|  | #include <linux/init.h> | 
|  | #include <linux/kernel.h> | 
|  | #include <linux/param.h> | 
|  | #include <linux/string.h> | 
|  | #include <linux/mc146818rtc.h> | 
|  | #include <linux/bcd.h> | 
|  | #include <linux/rtc.h> | 
|  | #include <linux/platform_device.h> | 
|  |  | 
|  | #include <asm/rtc.h> | 
|  |  | 
|  | #include "proto.h" | 
|  |  | 
|  |  | 
|  | /* | 
|  | * Support for the RTC device. | 
|  | * | 
|  | * We don't want to use the rtc-cmos driver, because we don't want to support | 
|  | * alarms, as that would be indistinguishable from timer interrupts. | 
|  | * | 
|  | * Further, generic code is really, really tied to a 1900 epoch.  This is | 
|  | * true in __get_rtc_time as well as the users of struct rtc_time e.g. | 
|  | * rtc_tm_to_time.  Thankfully all of the other epochs in use are later | 
|  | * than 1900, and so it's easy to adjust. | 
|  | */ | 
|  |  | 
|  | static unsigned long rtc_epoch; | 
|  |  | 
|  | static int __init | 
|  | specifiy_epoch(char *str) | 
|  | { | 
|  | unsigned long epoch = simple_strtoul(str, NULL, 0); | 
|  | if (epoch < 1900) | 
|  | printk("Ignoring invalid user specified epoch %lu\n", epoch); | 
|  | else | 
|  | rtc_epoch = epoch; | 
|  | return 1; | 
|  | } | 
|  | __setup("epoch=", specifiy_epoch); | 
|  |  | 
|  | static void __init | 
|  | init_rtc_epoch(void) | 
|  | { | 
|  | int epoch, year, ctrl; | 
|  |  | 
|  | if (rtc_epoch != 0) { | 
|  | /* The epoch was specified on the command-line.  */ | 
|  | return; | 
|  | } | 
|  |  | 
|  | /* Detect the epoch in use on this computer.  */ | 
|  | ctrl = CMOS_READ(RTC_CONTROL); | 
|  | year = CMOS_READ(RTC_YEAR); | 
|  | if (!(ctrl & RTC_DM_BINARY) || RTC_ALWAYS_BCD) | 
|  | year = bcd2bin(year); | 
|  |  | 
|  | /* PC-like is standard; used for year >= 70 */ | 
|  | epoch = 1900; | 
|  | if (year < 20) { | 
|  | epoch = 2000; | 
|  | } else if (year >= 20 && year < 48) { | 
|  | /* NT epoch */ | 
|  | epoch = 1980; | 
|  | } else if (year >= 48 && year < 70) { | 
|  | /* Digital UNIX epoch */ | 
|  | epoch = 1952; | 
|  | } | 
|  | rtc_epoch = epoch; | 
|  |  | 
|  | printk(KERN_INFO "Using epoch %d for rtc year %d\n", epoch, year); | 
|  | } | 
|  |  | 
|  | static int | 
|  | alpha_rtc_read_time(struct device *dev, struct rtc_time *tm) | 
|  | { | 
|  | __get_rtc_time(tm); | 
|  |  | 
|  | /* Adjust for non-default epochs.  It's easier to depend on the | 
|  | generic __get_rtc_time and adjust the epoch here than create | 
|  | a copy of __get_rtc_time with the edits we need.  */ | 
|  | if (rtc_epoch != 1900) { | 
|  | int year = tm->tm_year; | 
|  | /* Undo the century adjustment made in __get_rtc_time.  */ | 
|  | if (year >= 100) | 
|  | year -= 100; | 
|  | year += rtc_epoch - 1900; | 
|  | /* Redo the century adjustment with the epoch in place.  */ | 
|  | if (year <= 69) | 
|  | year += 100; | 
|  | tm->tm_year = year; | 
|  | } | 
|  |  | 
|  | return rtc_valid_tm(tm); | 
|  | } | 
|  |  | 
|  | static int | 
|  | alpha_rtc_set_time(struct device *dev, struct rtc_time *tm) | 
|  | { | 
|  | struct rtc_time xtm; | 
|  |  | 
|  | if (rtc_epoch != 1900) { | 
|  | xtm = *tm; | 
|  | xtm.tm_year -= rtc_epoch - 1900; | 
|  | tm = &xtm; | 
|  | } | 
|  |  | 
|  | return __set_rtc_time(tm); | 
|  | } | 
|  |  | 
|  | static int | 
|  | alpha_rtc_set_mmss(struct device *dev, unsigned long nowtime) | 
|  | { | 
|  | int retval = 0; | 
|  | int real_seconds, real_minutes, cmos_minutes; | 
|  | unsigned char save_control, save_freq_select; | 
|  |  | 
|  | /* Note: This code only updates minutes and seconds.  Comments | 
|  | indicate this was to avoid messing with unknown time zones, | 
|  | and with the epoch nonsense described above.  In order for | 
|  | this to work, the existing clock cannot be off by more than | 
|  | 15 minutes. | 
|  |  | 
|  | ??? This choice is may be out of date.  The x86 port does | 
|  | not have problems with timezones, and the epoch processing has | 
|  | now been fixed in alpha_set_rtc_time. | 
|  |  | 
|  | In either case, one can always force a full rtc update with | 
|  | the userland hwclock program, so surely 15 minute accuracy | 
|  | is no real burden.  */ | 
|  |  | 
|  | /* In order to set the CMOS clock precisely, we have to be called | 
|  | 500 ms after the second nowtime has started, because when | 
|  | nowtime is written into the registers of the CMOS clock, it will | 
|  | jump to the next second precisely 500 ms later. Check the Motorola | 
|  | MC146818A or Dallas DS12887 data sheet for details.  */ | 
|  |  | 
|  | /* irq are locally disabled here */ | 
|  | spin_lock(&rtc_lock); | 
|  | /* Tell the clock it's being set */ | 
|  | save_control = CMOS_READ(RTC_CONTROL); | 
|  | CMOS_WRITE((save_control|RTC_SET), RTC_CONTROL); | 
|  |  | 
|  | /* Stop and reset prescaler */ | 
|  | save_freq_select = CMOS_READ(RTC_FREQ_SELECT); | 
|  | CMOS_WRITE((save_freq_select|RTC_DIV_RESET2), RTC_FREQ_SELECT); | 
|  |  | 
|  | cmos_minutes = CMOS_READ(RTC_MINUTES); | 
|  | if (!(save_control & RTC_DM_BINARY) || RTC_ALWAYS_BCD) | 
|  | cmos_minutes = bcd2bin(cmos_minutes); | 
|  |  | 
|  | real_seconds = nowtime % 60; | 
|  | real_minutes = nowtime / 60; | 
|  | if (((abs(real_minutes - cmos_minutes) + 15) / 30) & 1) { | 
|  | /* correct for half hour time zone */ | 
|  | real_minutes += 30; | 
|  | } | 
|  | real_minutes %= 60; | 
|  |  | 
|  | if (abs(real_minutes - cmos_minutes) < 30) { | 
|  | if (!(save_control & RTC_DM_BINARY) || RTC_ALWAYS_BCD) { | 
|  | real_seconds = bin2bcd(real_seconds); | 
|  | real_minutes = bin2bcd(real_minutes); | 
|  | } | 
|  | CMOS_WRITE(real_seconds,RTC_SECONDS); | 
|  | CMOS_WRITE(real_minutes,RTC_MINUTES); | 
|  | } else { | 
|  | printk_once(KERN_NOTICE | 
|  | "set_rtc_mmss: can't update from %d to %d\n", | 
|  | cmos_minutes, real_minutes); | 
|  | retval = -1; | 
|  | } | 
|  |  | 
|  | /* The following flags have to be released exactly in this order, | 
|  | * otherwise the DS12887 (popular MC146818A clone with integrated | 
|  | * battery and quartz) will not reset the oscillator and will not | 
|  | * update precisely 500 ms later. You won't find this mentioned in | 
|  | * the Dallas Semiconductor data sheets, but who believes data | 
|  | * sheets anyway ...                           -- Markus Kuhn | 
|  | */ | 
|  | CMOS_WRITE(save_control, RTC_CONTROL); | 
|  | CMOS_WRITE(save_freq_select, RTC_FREQ_SELECT); | 
|  | spin_unlock(&rtc_lock); | 
|  |  | 
|  | return retval; | 
|  | } | 
|  |  | 
|  | static int | 
|  | alpha_rtc_ioctl(struct device *dev, unsigned int cmd, unsigned long arg) | 
|  | { | 
|  | switch (cmd) { | 
|  | case RTC_EPOCH_READ: | 
|  | return put_user(rtc_epoch, (unsigned long __user *)arg); | 
|  | case RTC_EPOCH_SET: | 
|  | if (arg < 1900) | 
|  | return -EINVAL; | 
|  | rtc_epoch = arg; | 
|  | return 0; | 
|  | default: | 
|  | return -ENOIOCTLCMD; | 
|  | } | 
|  | } | 
|  |  | 
|  | static const struct rtc_class_ops alpha_rtc_ops = { | 
|  | .read_time = alpha_rtc_read_time, | 
|  | .set_time = alpha_rtc_set_time, | 
|  | .set_mmss = alpha_rtc_set_mmss, | 
|  | .ioctl = alpha_rtc_ioctl, | 
|  | }; | 
|  |  | 
|  | /* | 
|  | * Similarly, except do the actual CMOS access on the boot cpu only. | 
|  | * This requires marshalling the data across an interprocessor call. | 
|  | */ | 
|  |  | 
|  | #if defined(CONFIG_SMP) && \ | 
|  | (defined(CONFIG_ALPHA_GENERIC) || defined(CONFIG_ALPHA_MARVEL)) | 
|  | # define HAVE_REMOTE_RTC 1 | 
|  |  | 
|  | union remote_data { | 
|  | struct rtc_time *tm; | 
|  | unsigned long now; | 
|  | long retval; | 
|  | }; | 
|  |  | 
|  | static void | 
|  | do_remote_read(void *data) | 
|  | { | 
|  | union remote_data *x = data; | 
|  | x->retval = alpha_rtc_read_time(NULL, x->tm); | 
|  | } | 
|  |  | 
|  | static int | 
|  | remote_read_time(struct device *dev, struct rtc_time *tm) | 
|  | { | 
|  | union remote_data x; | 
|  | if (smp_processor_id() != boot_cpuid) { | 
|  | x.tm = tm; | 
|  | smp_call_function_single(boot_cpuid, do_remote_read, &x, 1); | 
|  | return x.retval; | 
|  | } | 
|  | return alpha_rtc_read_time(NULL, tm); | 
|  | } | 
|  |  | 
|  | static void | 
|  | do_remote_set(void *data) | 
|  | { | 
|  | union remote_data *x = data; | 
|  | x->retval = alpha_rtc_set_time(NULL, x->tm); | 
|  | } | 
|  |  | 
|  | static int | 
|  | remote_set_time(struct device *dev, struct rtc_time *tm) | 
|  | { | 
|  | union remote_data x; | 
|  | if (smp_processor_id() != boot_cpuid) { | 
|  | x.tm = tm; | 
|  | smp_call_function_single(boot_cpuid, do_remote_set, &x, 1); | 
|  | return x.retval; | 
|  | } | 
|  | return alpha_rtc_set_time(NULL, tm); | 
|  | } | 
|  |  | 
|  | static void | 
|  | do_remote_mmss(void *data) | 
|  | { | 
|  | union remote_data *x = data; | 
|  | x->retval = alpha_rtc_set_mmss(NULL, x->now); | 
|  | } | 
|  |  | 
|  | static int | 
|  | remote_set_mmss(struct device *dev, unsigned long now) | 
|  | { | 
|  | union remote_data x; | 
|  | if (smp_processor_id() != boot_cpuid) { | 
|  | x.now = now; | 
|  | smp_call_function_single(boot_cpuid, do_remote_mmss, &x, 1); | 
|  | return x.retval; | 
|  | } | 
|  | return alpha_rtc_set_mmss(NULL, now); | 
|  | } | 
|  |  | 
|  | static const struct rtc_class_ops remote_rtc_ops = { | 
|  | .read_time = remote_read_time, | 
|  | .set_time = remote_set_time, | 
|  | .set_mmss = remote_set_mmss, | 
|  | .ioctl = alpha_rtc_ioctl, | 
|  | }; | 
|  | #endif | 
|  |  | 
|  | static int __init | 
|  | alpha_rtc_init(void) | 
|  | { | 
|  | const struct rtc_class_ops *ops; | 
|  | struct platform_device *pdev; | 
|  | struct rtc_device *rtc; | 
|  | const char *name; | 
|  |  | 
|  | init_rtc_epoch(); | 
|  | name = "rtc-alpha"; | 
|  | ops = &alpha_rtc_ops; | 
|  |  | 
|  | #ifdef HAVE_REMOTE_RTC | 
|  | if (alpha_mv.rtc_boot_cpu_only) | 
|  | ops = &remote_rtc_ops; | 
|  | #endif | 
|  |  | 
|  | pdev = platform_device_register_simple(name, -1, NULL, 0); | 
|  | rtc = devm_rtc_device_register(&pdev->dev, name, ops, THIS_MODULE); | 
|  | if (IS_ERR(rtc)) | 
|  | return PTR_ERR(rtc); | 
|  |  | 
|  | platform_set_drvdata(pdev, rtc); | 
|  | return 0; | 
|  | } | 
|  | device_initcall(alpha_rtc_init); |