11da177e4SLinus Torvalds /* 21da177e4SLinus Torvalds * linux/arch/alpha/kernel/time.c 31da177e4SLinus Torvalds * 41da177e4SLinus Torvalds * Copyright (C) 1991, 1992, 1995, 1999, 2000 Linus Torvalds 51da177e4SLinus Torvalds * 61da177e4SLinus Torvalds * This file contains the PC-specific time handling details: 71da177e4SLinus Torvalds * reading the RTC at bootup, etc.. 81da177e4SLinus Torvalds * 1994-07-02 Alan Modra 91da177e4SLinus Torvalds * fixed set_rtc_mmss, fixed time.year for >= 2000, new mktime 101da177e4SLinus Torvalds * 1995-03-26 Markus Kuhn 111da177e4SLinus Torvalds * fixed 500 ms bug at call to set_rtc_mmss, fixed DS12887 121da177e4SLinus Torvalds * precision CMOS clock update 131da177e4SLinus Torvalds * 1997-09-10 Updated NTP code according to technical memorandum Jan '96 141da177e4SLinus Torvalds * "A Kernel Model for Precision Timekeeping" by Dave Mills 151da177e4SLinus Torvalds * 1997-01-09 Adrian Sun 161da177e4SLinus Torvalds * use interval timer if CONFIG_RTC=y 171da177e4SLinus Torvalds * 1997-10-29 John Bowman (bowman@math.ualberta.ca) 181da177e4SLinus Torvalds * fixed tick loss calculation in timer_interrupt 191da177e4SLinus Torvalds * (round system clock to nearest tick instead of truncating) 201da177e4SLinus Torvalds * fixed algorithm in time_init for getting time from CMOS clock 211da177e4SLinus Torvalds * 1999-04-16 Thorsten Kranzkowski (dl8bcu@gmx.net) 221da177e4SLinus Torvalds * fixed algorithm in do_gettimeofday() for calculating the precise time 231da177e4SLinus Torvalds * from processor cycle counter (now taking lost_ticks into account) 241da177e4SLinus Torvalds * 2000-08-13 Jan-Benedict Glaw <jbglaw@lug-owl.de> 251da177e4SLinus Torvalds * Fixed time_init to be aware of epoches != 1900. This prevents 261da177e4SLinus Torvalds * booting up in 2048 for me;) Code is stolen from rtc.c. 271da177e4SLinus Torvalds * 2003-06-03 R. Scott Bailey <scott.bailey@eds.com> 281da177e4SLinus Torvalds * Tighten sanity in time_init from 1% (10,000 PPM) to 250 PPM 291da177e4SLinus Torvalds */ 301da177e4SLinus Torvalds #include <linux/errno.h> 311da177e4SLinus Torvalds #include <linux/module.h> 321da177e4SLinus Torvalds #include <linux/sched.h> 331da177e4SLinus Torvalds #include <linux/kernel.h> 341da177e4SLinus Torvalds #include <linux/param.h> 351da177e4SLinus Torvalds #include <linux/string.h> 361da177e4SLinus Torvalds #include <linux/mm.h> 371da177e4SLinus Torvalds #include <linux/delay.h> 381da177e4SLinus Torvalds #include <linux/ioport.h> 391da177e4SLinus Torvalds #include <linux/irq.h> 401da177e4SLinus Torvalds #include <linux/interrupt.h> 411da177e4SLinus Torvalds #include <linux/init.h> 421da177e4SLinus Torvalds #include <linux/bcd.h> 431da177e4SLinus Torvalds #include <linux/profile.h> 441da177e4SLinus Torvalds 451da177e4SLinus Torvalds #include <asm/uaccess.h> 461da177e4SLinus Torvalds #include <asm/io.h> 471da177e4SLinus Torvalds #include <asm/hwrpb.h> 481da177e4SLinus Torvalds #include <asm/8253pit.h> 491da177e4SLinus Torvalds 501da177e4SLinus Torvalds #include <linux/mc146818rtc.h> 511da177e4SLinus Torvalds #include <linux/time.h> 521da177e4SLinus Torvalds #include <linux/timex.h> 531da177e4SLinus Torvalds 541da177e4SLinus Torvalds #include "proto.h" 551da177e4SLinus Torvalds #include "irq_impl.h" 561da177e4SLinus Torvalds 571da177e4SLinus Torvalds static int set_rtc_mmss(unsigned long); 581da177e4SLinus Torvalds 591da177e4SLinus Torvalds DEFINE_SPINLOCK(rtc_lock); 60cff52dafSAl Viro EXPORT_SYMBOL(rtc_lock); 611da177e4SLinus Torvalds 621da177e4SLinus Torvalds #define TICK_SIZE (tick_nsec / 1000) 631da177e4SLinus Torvalds 641da177e4SLinus Torvalds /* 651da177e4SLinus Torvalds * Shift amount by which scaled_ticks_per_cycle is scaled. Shifting 661da177e4SLinus Torvalds * by 48 gives us 16 bits for HZ while keeping the accuracy good even 671da177e4SLinus Torvalds * for large CPU clock rates. 681da177e4SLinus Torvalds */ 691da177e4SLinus Torvalds #define FIX_SHIFT 48 701da177e4SLinus Torvalds 711da177e4SLinus Torvalds /* lump static variables together for more efficient access: */ 721da177e4SLinus Torvalds static struct { 731da177e4SLinus Torvalds /* cycle counter last time it got invoked */ 741da177e4SLinus Torvalds __u32 last_time; 751da177e4SLinus Torvalds /* ticks/cycle * 2^48 */ 761da177e4SLinus Torvalds unsigned long scaled_ticks_per_cycle; 771da177e4SLinus Torvalds /* last time the CMOS clock got updated */ 781da177e4SLinus Torvalds time_t last_rtc_update; 791da177e4SLinus Torvalds /* partial unused tick */ 801da177e4SLinus Torvalds unsigned long partial_tick; 811da177e4SLinus Torvalds } state; 821da177e4SLinus Torvalds 831da177e4SLinus Torvalds unsigned long est_cycle_freq; 841da177e4SLinus Torvalds 851da177e4SLinus Torvalds 861da177e4SLinus Torvalds static inline __u32 rpcc(void) 871da177e4SLinus Torvalds { 881da177e4SLinus Torvalds __u32 result; 891da177e4SLinus Torvalds asm volatile ("rpcc %0" : "=r"(result)); 901da177e4SLinus Torvalds return result; 911da177e4SLinus Torvalds } 921da177e4SLinus Torvalds 931da177e4SLinus Torvalds /* 941da177e4SLinus Torvalds * timer_interrupt() needs to keep up the real-time clock, 951da177e4SLinus Torvalds * as well as call the "do_timer()" routine every clocktick 961da177e4SLinus Torvalds */ 978774cb81SAl Viro irqreturn_t timer_interrupt(int irq, void *dev) 981da177e4SLinus Torvalds { 991da177e4SLinus Torvalds unsigned long delta; 1001da177e4SLinus Torvalds __u32 now; 1011da177e4SLinus Torvalds long nticks; 1021da177e4SLinus Torvalds 1031da177e4SLinus Torvalds #ifndef CONFIG_SMP 1041da177e4SLinus Torvalds /* Not SMP, do kernel PC profiling here. */ 1058774cb81SAl Viro profile_tick(CPU_PROFILING); 1061da177e4SLinus Torvalds #endif 1071da177e4SLinus Torvalds 1081da177e4SLinus Torvalds write_seqlock(&xtime_lock); 1091da177e4SLinus Torvalds 1101da177e4SLinus Torvalds /* 1111da177e4SLinus Torvalds * Calculate how many ticks have passed since the last update, 1121da177e4SLinus Torvalds * including any previous partial leftover. Save any resulting 1131da177e4SLinus Torvalds * fraction for the next pass. 1141da177e4SLinus Torvalds */ 1151da177e4SLinus Torvalds now = rpcc(); 1161da177e4SLinus Torvalds delta = now - state.last_time; 1171da177e4SLinus Torvalds state.last_time = now; 1181da177e4SLinus Torvalds delta = delta * state.scaled_ticks_per_cycle + state.partial_tick; 1191da177e4SLinus Torvalds state.partial_tick = delta & ((1UL << FIX_SHIFT) - 1); 1201da177e4SLinus Torvalds nticks = delta >> FIX_SHIFT; 1211da177e4SLinus Torvalds 1221da177e4SLinus Torvalds while (nticks > 0) { 1233171a030SAtsushi Nemoto do_timer(1); 1241da177e4SLinus Torvalds #ifndef CONFIG_SMP 1258774cb81SAl Viro update_process_times(user_mode(get_irq_regs())); 1261da177e4SLinus Torvalds #endif 1271da177e4SLinus Torvalds nticks--; 1281da177e4SLinus Torvalds } 1291da177e4SLinus Torvalds 1301da177e4SLinus Torvalds /* 1311da177e4SLinus Torvalds * If we have an externally synchronized Linux clock, then update 1321da177e4SLinus Torvalds * CMOS clock accordingly every ~11 minutes. Set_rtc_mmss() has to be 1331da177e4SLinus Torvalds * called as close as possible to 500 ms before the new second starts. 1341da177e4SLinus Torvalds */ 135b149ee22Sjohn stultz if (ntp_synced() 1361da177e4SLinus Torvalds && xtime.tv_sec > state.last_rtc_update + 660 1371da177e4SLinus Torvalds && xtime.tv_nsec >= 500000 - ((unsigned) TICK_SIZE) / 2 1381da177e4SLinus Torvalds && xtime.tv_nsec <= 500000 + ((unsigned) TICK_SIZE) / 2) { 1391da177e4SLinus Torvalds int tmp = set_rtc_mmss(xtime.tv_sec); 1401da177e4SLinus Torvalds state.last_rtc_update = xtime.tv_sec - (tmp ? 600 : 0); 1411da177e4SLinus Torvalds } 1421da177e4SLinus Torvalds 1431da177e4SLinus Torvalds write_sequnlock(&xtime_lock); 1441da177e4SLinus Torvalds return IRQ_HANDLED; 1451da177e4SLinus Torvalds } 1461da177e4SLinus Torvalds 147ebaf4fc1SSam Ravnborg void __init 1481da177e4SLinus Torvalds common_init_rtc(void) 1491da177e4SLinus Torvalds { 1501da177e4SLinus Torvalds unsigned char x; 1511da177e4SLinus Torvalds 1521da177e4SLinus Torvalds /* Reset periodic interrupt frequency. */ 1531da177e4SLinus Torvalds x = CMOS_READ(RTC_FREQ_SELECT) & 0x3f; 1541da177e4SLinus Torvalds /* Test includes known working values on various platforms 1551da177e4SLinus Torvalds where 0x26 is wrong; we refuse to change those. */ 1561da177e4SLinus Torvalds if (x != 0x26 && x != 0x25 && x != 0x19 && x != 0x06) { 1571da177e4SLinus Torvalds printk("Setting RTC_FREQ to 1024 Hz (%x)\n", x); 1581da177e4SLinus Torvalds CMOS_WRITE(0x26, RTC_FREQ_SELECT); 1591da177e4SLinus Torvalds } 1601da177e4SLinus Torvalds 1611da177e4SLinus Torvalds /* Turn on periodic interrupts. */ 1621da177e4SLinus Torvalds x = CMOS_READ(RTC_CONTROL); 1631da177e4SLinus Torvalds if (!(x & RTC_PIE)) { 1641da177e4SLinus Torvalds printk("Turning on RTC interrupts.\n"); 1651da177e4SLinus Torvalds x |= RTC_PIE; 1661da177e4SLinus Torvalds x &= ~(RTC_AIE | RTC_UIE); 1671da177e4SLinus Torvalds CMOS_WRITE(x, RTC_CONTROL); 1681da177e4SLinus Torvalds } 1691da177e4SLinus Torvalds (void) CMOS_READ(RTC_INTR_FLAGS); 1701da177e4SLinus Torvalds 1711da177e4SLinus Torvalds outb(0x36, 0x43); /* pit counter 0: system timer */ 1721da177e4SLinus Torvalds outb(0x00, 0x40); 1731da177e4SLinus Torvalds outb(0x00, 0x40); 1741da177e4SLinus Torvalds 1751da177e4SLinus Torvalds outb(0xb6, 0x43); /* pit counter 2: speaker */ 1761da177e4SLinus Torvalds outb(0x31, 0x42); 1771da177e4SLinus Torvalds outb(0x13, 0x42); 1781da177e4SLinus Torvalds 1791da177e4SLinus Torvalds init_rtc_irq(); 1801da177e4SLinus Torvalds } 1811da177e4SLinus Torvalds 1821da177e4SLinus Torvalds 1831da177e4SLinus Torvalds /* Validate a computed cycle counter result against the known bounds for 1841da177e4SLinus Torvalds the given processor core. There's too much brokenness in the way of 1851da177e4SLinus Torvalds timing hardware for any one method to work everywhere. :-( 1861da177e4SLinus Torvalds 1871da177e4SLinus Torvalds Return 0 if the result cannot be trusted, otherwise return the argument. */ 1881da177e4SLinus Torvalds 1891da177e4SLinus Torvalds static unsigned long __init 1901da177e4SLinus Torvalds validate_cc_value(unsigned long cc) 1911da177e4SLinus Torvalds { 1921da177e4SLinus Torvalds static struct bounds { 1931da177e4SLinus Torvalds unsigned int min, max; 1941da177e4SLinus Torvalds } cpu_hz[] __initdata = { 1951da177e4SLinus Torvalds [EV3_CPU] = { 50000000, 200000000 }, /* guess */ 1961da177e4SLinus Torvalds [EV4_CPU] = { 100000000, 300000000 }, 1971da177e4SLinus Torvalds [LCA4_CPU] = { 100000000, 300000000 }, /* guess */ 1981da177e4SLinus Torvalds [EV45_CPU] = { 200000000, 300000000 }, 1991da177e4SLinus Torvalds [EV5_CPU] = { 250000000, 433000000 }, 2001da177e4SLinus Torvalds [EV56_CPU] = { 333000000, 667000000 }, 2011da177e4SLinus Torvalds [PCA56_CPU] = { 400000000, 600000000 }, /* guess */ 2021da177e4SLinus Torvalds [PCA57_CPU] = { 500000000, 600000000 }, /* guess */ 2031da177e4SLinus Torvalds [EV6_CPU] = { 466000000, 600000000 }, 2041da177e4SLinus Torvalds [EV67_CPU] = { 600000000, 750000000 }, 2051da177e4SLinus Torvalds [EV68AL_CPU] = { 750000000, 940000000 }, 2061da177e4SLinus Torvalds [EV68CB_CPU] = { 1000000000, 1333333333 }, 2071da177e4SLinus Torvalds /* None of the following are shipping as of 2001-11-01. */ 2081da177e4SLinus Torvalds [EV68CX_CPU] = { 1000000000, 1700000000 }, /* guess */ 2091da177e4SLinus Torvalds [EV69_CPU] = { 1000000000, 1700000000 }, /* guess */ 2101da177e4SLinus Torvalds [EV7_CPU] = { 800000000, 1400000000 }, /* guess */ 2111da177e4SLinus Torvalds [EV79_CPU] = { 1000000000, 2000000000 }, /* guess */ 2121da177e4SLinus Torvalds }; 2131da177e4SLinus Torvalds 2141da177e4SLinus Torvalds /* Allow for some drift in the crystal. 10MHz is more than enough. */ 2151da177e4SLinus Torvalds const unsigned int deviation = 10000000; 2161da177e4SLinus Torvalds 2171da177e4SLinus Torvalds struct percpu_struct *cpu; 2181da177e4SLinus Torvalds unsigned int index; 2191da177e4SLinus Torvalds 2201da177e4SLinus Torvalds cpu = (struct percpu_struct *)((char*)hwrpb + hwrpb->processor_offset); 2211da177e4SLinus Torvalds index = cpu->type & 0xffffffff; 2221da177e4SLinus Torvalds 2231da177e4SLinus Torvalds /* If index out of bounds, no way to validate. */ 22425c8716cSTobias Klauser if (index >= ARRAY_SIZE(cpu_hz)) 2251da177e4SLinus Torvalds return cc; 2261da177e4SLinus Torvalds 2271da177e4SLinus Torvalds /* If index contains no data, no way to validate. */ 2281da177e4SLinus Torvalds if (cpu_hz[index].max == 0) 2291da177e4SLinus Torvalds return cc; 2301da177e4SLinus Torvalds 2311da177e4SLinus Torvalds if (cc < cpu_hz[index].min - deviation 2321da177e4SLinus Torvalds || cc > cpu_hz[index].max + deviation) 2331da177e4SLinus Torvalds return 0; 2341da177e4SLinus Torvalds 2351da177e4SLinus Torvalds return cc; 2361da177e4SLinus Torvalds } 2371da177e4SLinus Torvalds 2381da177e4SLinus Torvalds 2391da177e4SLinus Torvalds /* 2401da177e4SLinus Torvalds * Calibrate CPU clock using legacy 8254 timer/counter. Stolen from 2411da177e4SLinus Torvalds * arch/i386/time.c. 2421da177e4SLinus Torvalds */ 2431da177e4SLinus Torvalds 2441da177e4SLinus Torvalds #define CALIBRATE_LATCH 0xffff 2451da177e4SLinus Torvalds #define TIMEOUT_COUNT 0x100000 2461da177e4SLinus Torvalds 2471da177e4SLinus Torvalds static unsigned long __init 2481da177e4SLinus Torvalds calibrate_cc_with_pit(void) 2491da177e4SLinus Torvalds { 2501da177e4SLinus Torvalds int cc, count = 0; 2511da177e4SLinus Torvalds 2521da177e4SLinus Torvalds /* Set the Gate high, disable speaker */ 2531da177e4SLinus Torvalds outb((inb(0x61) & ~0x02) | 0x01, 0x61); 2541da177e4SLinus Torvalds 2551da177e4SLinus Torvalds /* 2561da177e4SLinus Torvalds * Now let's take care of CTC channel 2 2571da177e4SLinus Torvalds * 2581da177e4SLinus Torvalds * Set the Gate high, program CTC channel 2 for mode 0, 2591da177e4SLinus Torvalds * (interrupt on terminal count mode), binary count, 2601da177e4SLinus Torvalds * load 5 * LATCH count, (LSB and MSB) to begin countdown. 2611da177e4SLinus Torvalds */ 2621da177e4SLinus Torvalds outb(0xb0, 0x43); /* binary, mode 0, LSB/MSB, Ch 2 */ 2631da177e4SLinus Torvalds outb(CALIBRATE_LATCH & 0xff, 0x42); /* LSB of count */ 2641da177e4SLinus Torvalds outb(CALIBRATE_LATCH >> 8, 0x42); /* MSB of count */ 2651da177e4SLinus Torvalds 2661da177e4SLinus Torvalds cc = rpcc(); 2671da177e4SLinus Torvalds do { 2681da177e4SLinus Torvalds count++; 2691da177e4SLinus Torvalds } while ((inb(0x61) & 0x20) == 0 && count < TIMEOUT_COUNT); 2701da177e4SLinus Torvalds cc = rpcc() - cc; 2711da177e4SLinus Torvalds 2721da177e4SLinus Torvalds /* Error: ECTCNEVERSET or ECPUTOOFAST. */ 2731da177e4SLinus Torvalds if (count <= 1 || count == TIMEOUT_COUNT) 2741da177e4SLinus Torvalds return 0; 2751da177e4SLinus Torvalds 2761da177e4SLinus Torvalds return ((long)cc * PIT_TICK_RATE) / (CALIBRATE_LATCH + 1); 2771da177e4SLinus Torvalds } 2781da177e4SLinus Torvalds 2791da177e4SLinus Torvalds /* The Linux interpretation of the CMOS clock register contents: 2801da177e4SLinus Torvalds When the Update-In-Progress (UIP) flag goes from 1 to 0, the 2811da177e4SLinus Torvalds RTC registers show the second which has precisely just started. 2821da177e4SLinus Torvalds Let's hope other operating systems interpret the RTC the same way. */ 2831da177e4SLinus Torvalds 2841da177e4SLinus Torvalds static unsigned long __init 2851da177e4SLinus Torvalds rpcc_after_update_in_progress(void) 2861da177e4SLinus Torvalds { 2871da177e4SLinus Torvalds do { } while (!(CMOS_READ(RTC_FREQ_SELECT) & RTC_UIP)); 2881da177e4SLinus Torvalds do { } while (CMOS_READ(RTC_FREQ_SELECT) & RTC_UIP); 2891da177e4SLinus Torvalds 2901da177e4SLinus Torvalds return rpcc(); 2911da177e4SLinus Torvalds } 2921da177e4SLinus Torvalds 2931da177e4SLinus Torvalds void __init 2941da177e4SLinus Torvalds time_init(void) 2951da177e4SLinus Torvalds { 2961da177e4SLinus Torvalds unsigned int year, mon, day, hour, min, sec, cc1, cc2, epoch; 2971da177e4SLinus Torvalds unsigned long cycle_freq, tolerance; 2981da177e4SLinus Torvalds long diff; 2991da177e4SLinus Torvalds 3001da177e4SLinus Torvalds /* Calibrate CPU clock -- attempt #1. */ 3011da177e4SLinus Torvalds if (!est_cycle_freq) 3021da177e4SLinus Torvalds est_cycle_freq = validate_cc_value(calibrate_cc_with_pit()); 3031da177e4SLinus Torvalds 3044c2e6f6aSMatt Mackall cc1 = rpcc(); 3051da177e4SLinus Torvalds 3061da177e4SLinus Torvalds /* Calibrate CPU clock -- attempt #2. */ 3071da177e4SLinus Torvalds if (!est_cycle_freq) { 3084c2e6f6aSMatt Mackall cc1 = rpcc_after_update_in_progress(); 3091da177e4SLinus Torvalds cc2 = rpcc_after_update_in_progress(); 3101da177e4SLinus Torvalds est_cycle_freq = validate_cc_value(cc2 - cc1); 3111da177e4SLinus Torvalds cc1 = cc2; 3121da177e4SLinus Torvalds } 3131da177e4SLinus Torvalds 3141da177e4SLinus Torvalds cycle_freq = hwrpb->cycle_freq; 3151da177e4SLinus Torvalds if (est_cycle_freq) { 3161da177e4SLinus Torvalds /* If the given value is within 250 PPM of what we calculated, 3171da177e4SLinus Torvalds accept it. Otherwise, use what we found. */ 3181da177e4SLinus Torvalds tolerance = cycle_freq / 4000; 3191da177e4SLinus Torvalds diff = cycle_freq - est_cycle_freq; 3201da177e4SLinus Torvalds if (diff < 0) 3211da177e4SLinus Torvalds diff = -diff; 3221da177e4SLinus Torvalds if ((unsigned long)diff > tolerance) { 3231da177e4SLinus Torvalds cycle_freq = est_cycle_freq; 3241da177e4SLinus Torvalds printk("HWRPB cycle frequency bogus. " 3251da177e4SLinus Torvalds "Estimated %lu Hz\n", cycle_freq); 3261da177e4SLinus Torvalds } else { 3271da177e4SLinus Torvalds est_cycle_freq = 0; 3281da177e4SLinus Torvalds } 3291da177e4SLinus Torvalds } else if (! validate_cc_value (cycle_freq)) { 3301da177e4SLinus Torvalds printk("HWRPB cycle frequency bogus, " 3311da177e4SLinus Torvalds "and unable to estimate a proper value!\n"); 3321da177e4SLinus Torvalds } 3331da177e4SLinus Torvalds 3341da177e4SLinus Torvalds /* From John Bowman <bowman@math.ualberta.ca>: allow the values 3351da177e4SLinus Torvalds to settle, as the Update-In-Progress bit going low isn't good 3361da177e4SLinus Torvalds enough on some hardware. 2ms is our guess; we haven't found 3371da177e4SLinus Torvalds bogomips yet, but this is close on a 500Mhz box. */ 3381da177e4SLinus Torvalds __delay(1000000); 3391da177e4SLinus Torvalds 3401da177e4SLinus Torvalds sec = CMOS_READ(RTC_SECONDS); 3411da177e4SLinus Torvalds min = CMOS_READ(RTC_MINUTES); 3421da177e4SLinus Torvalds hour = CMOS_READ(RTC_HOURS); 3431da177e4SLinus Torvalds day = CMOS_READ(RTC_DAY_OF_MONTH); 3441da177e4SLinus Torvalds mon = CMOS_READ(RTC_MONTH); 3451da177e4SLinus Torvalds year = CMOS_READ(RTC_YEAR); 3461da177e4SLinus Torvalds 3471da177e4SLinus Torvalds if (!(CMOS_READ(RTC_CONTROL) & RTC_DM_BINARY) || RTC_ALWAYS_BCD) { 3481da177e4SLinus Torvalds BCD_TO_BIN(sec); 3491da177e4SLinus Torvalds BCD_TO_BIN(min); 3501da177e4SLinus Torvalds BCD_TO_BIN(hour); 3511da177e4SLinus Torvalds BCD_TO_BIN(day); 3521da177e4SLinus Torvalds BCD_TO_BIN(mon); 3531da177e4SLinus Torvalds BCD_TO_BIN(year); 3541da177e4SLinus Torvalds } 3551da177e4SLinus Torvalds 3561da177e4SLinus Torvalds /* PC-like is standard; used for year >= 70 */ 3571da177e4SLinus Torvalds epoch = 1900; 3581da177e4SLinus Torvalds if (year < 20) 3591da177e4SLinus Torvalds epoch = 2000; 3601da177e4SLinus Torvalds else if (year >= 20 && year < 48) 3611da177e4SLinus Torvalds /* NT epoch */ 3621da177e4SLinus Torvalds epoch = 1980; 3631da177e4SLinus Torvalds else if (year >= 48 && year < 70) 3641da177e4SLinus Torvalds /* Digital UNIX epoch */ 3651da177e4SLinus Torvalds epoch = 1952; 3661da177e4SLinus Torvalds 3671da177e4SLinus Torvalds printk(KERN_INFO "Using epoch = %d\n", epoch); 3681da177e4SLinus Torvalds 3691da177e4SLinus Torvalds if ((year += epoch) < 1970) 3701da177e4SLinus Torvalds year += 100; 3711da177e4SLinus Torvalds 3721da177e4SLinus Torvalds xtime.tv_sec = mktime(year, mon, day, hour, min, sec); 3731da177e4SLinus Torvalds xtime.tv_nsec = 0; 3741da177e4SLinus Torvalds 3751da177e4SLinus Torvalds wall_to_monotonic.tv_sec -= xtime.tv_sec; 3761da177e4SLinus Torvalds wall_to_monotonic.tv_nsec = 0; 3771da177e4SLinus Torvalds 3781da177e4SLinus Torvalds if (HZ > (1<<16)) { 3791da177e4SLinus Torvalds extern void __you_loose (void); 3801da177e4SLinus Torvalds __you_loose(); 3811da177e4SLinus Torvalds } 3821da177e4SLinus Torvalds 3831da177e4SLinus Torvalds state.last_time = cc1; 3841da177e4SLinus Torvalds state.scaled_ticks_per_cycle 3851da177e4SLinus Torvalds = ((unsigned long) HZ << FIX_SHIFT) / cycle_freq; 3861da177e4SLinus Torvalds state.last_rtc_update = 0; 3871da177e4SLinus Torvalds state.partial_tick = 0L; 3881da177e4SLinus Torvalds 3891da177e4SLinus Torvalds /* Startup the timer source. */ 3901da177e4SLinus Torvalds alpha_mv.init_rtc(); 3911da177e4SLinus Torvalds } 3921da177e4SLinus Torvalds 3931da177e4SLinus Torvalds /* 3941da177e4SLinus Torvalds * Use the cycle counter to estimate an displacement from the last time 3951da177e4SLinus Torvalds * tick. Unfortunately the Alpha designers made only the low 32-bits of 3961da177e4SLinus Torvalds * the cycle counter active, so we overflow on 8.2 seconds on a 500MHz 3971da177e4SLinus Torvalds * part. So we can't do the "find absolute time in terms of cycles" thing 3981da177e4SLinus Torvalds * that the other ports do. 3991da177e4SLinus Torvalds */ 4001da177e4SLinus Torvalds void 4011da177e4SLinus Torvalds do_gettimeofday(struct timeval *tv) 4021da177e4SLinus Torvalds { 4031da177e4SLinus Torvalds unsigned long flags; 4048ef38609SAtsushi Nemoto unsigned long sec, usec, seq; 4051da177e4SLinus Torvalds unsigned long delta_cycles, delta_usec, partial_tick; 4061da177e4SLinus Torvalds 4071da177e4SLinus Torvalds do { 4081da177e4SLinus Torvalds seq = read_seqbegin_irqsave(&xtime_lock, flags); 4091da177e4SLinus Torvalds 4101da177e4SLinus Torvalds delta_cycles = rpcc() - state.last_time; 4111da177e4SLinus Torvalds sec = xtime.tv_sec; 4121da177e4SLinus Torvalds usec = (xtime.tv_nsec / 1000); 4131da177e4SLinus Torvalds partial_tick = state.partial_tick; 4141da177e4SLinus Torvalds 4151da177e4SLinus Torvalds } while (read_seqretry_irqrestore(&xtime_lock, seq, flags)); 4161da177e4SLinus Torvalds 4171da177e4SLinus Torvalds #ifdef CONFIG_SMP 4181da177e4SLinus Torvalds /* Until and unless we figure out how to get cpu cycle counters 4191da177e4SLinus Torvalds in sync and keep them there, we can't use the rpcc tricks. */ 4208ef38609SAtsushi Nemoto delta_usec = 0; 4211da177e4SLinus Torvalds #else 4221da177e4SLinus Torvalds /* 4231da177e4SLinus Torvalds * usec = cycles * ticks_per_cycle * 2**48 * 1e6 / (2**48 * ticks) 4241da177e4SLinus Torvalds * = cycles * (s_t_p_c) * 1e6 / (2**48 * ticks) 4251da177e4SLinus Torvalds * = cycles * (s_t_p_c) * 15625 / (2**42 * ticks) 4261da177e4SLinus Torvalds * 4271da177e4SLinus Torvalds * which, given a 600MHz cycle and a 1024Hz tick, has a 4281da177e4SLinus Torvalds * dynamic range of about 1.7e17, which is less than the 4291da177e4SLinus Torvalds * 1.8e19 in an unsigned long, so we are safe from overflow. 4301da177e4SLinus Torvalds * 4311da177e4SLinus Torvalds * Round, but with .5 up always, since .5 to even is harder 4321da177e4SLinus Torvalds * with no clear gain. 4331da177e4SLinus Torvalds */ 4341da177e4SLinus Torvalds 4351da177e4SLinus Torvalds delta_usec = (delta_cycles * state.scaled_ticks_per_cycle 4368ef38609SAtsushi Nemoto + partial_tick) * 15625; 4371da177e4SLinus Torvalds delta_usec = ((delta_usec / ((1UL << (FIX_SHIFT-6-1)) * HZ)) + 1) / 2; 4381da177e4SLinus Torvalds #endif 4391da177e4SLinus Torvalds 4401da177e4SLinus Torvalds usec += delta_usec; 4411da177e4SLinus Torvalds if (usec >= 1000000) { 4421da177e4SLinus Torvalds sec += 1; 4431da177e4SLinus Torvalds usec -= 1000000; 4441da177e4SLinus Torvalds } 4451da177e4SLinus Torvalds 4461da177e4SLinus Torvalds tv->tv_sec = sec; 4471da177e4SLinus Torvalds tv->tv_usec = usec; 4481da177e4SLinus Torvalds } 4491da177e4SLinus Torvalds 4501da177e4SLinus Torvalds EXPORT_SYMBOL(do_gettimeofday); 4511da177e4SLinus Torvalds 4521da177e4SLinus Torvalds int 4531da177e4SLinus Torvalds do_settimeofday(struct timespec *tv) 4541da177e4SLinus Torvalds { 4551da177e4SLinus Torvalds time_t wtm_sec, sec = tv->tv_sec; 4561da177e4SLinus Torvalds long wtm_nsec, nsec = tv->tv_nsec; 4571da177e4SLinus Torvalds unsigned long delta_nsec; 4581da177e4SLinus Torvalds 4591da177e4SLinus Torvalds if ((unsigned long)tv->tv_nsec >= NSEC_PER_SEC) 4601da177e4SLinus Torvalds return -EINVAL; 4611da177e4SLinus Torvalds 4621da177e4SLinus Torvalds write_seqlock_irq(&xtime_lock); 4631da177e4SLinus Torvalds 4641da177e4SLinus Torvalds /* The offset that is added into time in do_gettimeofday above 4651da177e4SLinus Torvalds must be subtracted out here to keep a coherent view of the 4661da177e4SLinus Torvalds time. Without this, a full-tick error is possible. */ 4671da177e4SLinus Torvalds 4681da177e4SLinus Torvalds #ifdef CONFIG_SMP 4698ef38609SAtsushi Nemoto delta_nsec = 0; 4701da177e4SLinus Torvalds #else 4711da177e4SLinus Torvalds delta_nsec = rpcc() - state.last_time; 4721da177e4SLinus Torvalds delta_nsec = (delta_nsec * state.scaled_ticks_per_cycle 4738ef38609SAtsushi Nemoto + state.partial_tick) * 15625; 4741da177e4SLinus Torvalds delta_nsec = ((delta_nsec / ((1UL << (FIX_SHIFT-6-1)) * HZ)) + 1) / 2; 4751da177e4SLinus Torvalds delta_nsec *= 1000; 4761da177e4SLinus Torvalds #endif 4771da177e4SLinus Torvalds 4781da177e4SLinus Torvalds nsec -= delta_nsec; 4791da177e4SLinus Torvalds 4801da177e4SLinus Torvalds wtm_sec = wall_to_monotonic.tv_sec + (xtime.tv_sec - sec); 4811da177e4SLinus Torvalds wtm_nsec = wall_to_monotonic.tv_nsec + (xtime.tv_nsec - nsec); 4821da177e4SLinus Torvalds 4831da177e4SLinus Torvalds set_normalized_timespec(&xtime, sec, nsec); 4841da177e4SLinus Torvalds set_normalized_timespec(&wall_to_monotonic, wtm_sec, wtm_nsec); 4851da177e4SLinus Torvalds 486b149ee22Sjohn stultz ntp_clear(); 4871da177e4SLinus Torvalds 4881da177e4SLinus Torvalds write_sequnlock_irq(&xtime_lock); 4891da177e4SLinus Torvalds clock_was_set(); 4901da177e4SLinus Torvalds return 0; 4911da177e4SLinus Torvalds } 4921da177e4SLinus Torvalds 4931da177e4SLinus Torvalds EXPORT_SYMBOL(do_settimeofday); 4941da177e4SLinus Torvalds 4951da177e4SLinus Torvalds 4961da177e4SLinus Torvalds /* 4971da177e4SLinus Torvalds * In order to set the CMOS clock precisely, set_rtc_mmss has to be 4981da177e4SLinus Torvalds * called 500 ms after the second nowtime has started, because when 4991da177e4SLinus Torvalds * nowtime is written into the registers of the CMOS clock, it will 5001da177e4SLinus Torvalds * jump to the next second precisely 500 ms later. Check the Motorola 5011da177e4SLinus Torvalds * MC146818A or Dallas DS12887 data sheet for details. 5021da177e4SLinus Torvalds * 5031da177e4SLinus Torvalds * BUG: This routine does not handle hour overflow properly; it just 5041da177e4SLinus Torvalds * sets the minutes. Usually you won't notice until after reboot! 5051da177e4SLinus Torvalds */ 5061da177e4SLinus Torvalds 5071da177e4SLinus Torvalds 5081da177e4SLinus Torvalds static int 5091da177e4SLinus Torvalds set_rtc_mmss(unsigned long nowtime) 5101da177e4SLinus Torvalds { 5111da177e4SLinus Torvalds int retval = 0; 5121da177e4SLinus Torvalds int real_seconds, real_minutes, cmos_minutes; 5131da177e4SLinus Torvalds unsigned char save_control, save_freq_select; 5141da177e4SLinus Torvalds 5151da177e4SLinus Torvalds /* irq are locally disabled here */ 5161da177e4SLinus Torvalds spin_lock(&rtc_lock); 5171da177e4SLinus Torvalds /* Tell the clock it's being set */ 5181da177e4SLinus Torvalds save_control = CMOS_READ(RTC_CONTROL); 5191da177e4SLinus Torvalds CMOS_WRITE((save_control|RTC_SET), RTC_CONTROL); 5201da177e4SLinus Torvalds 5211da177e4SLinus Torvalds /* Stop and reset prescaler */ 5221da177e4SLinus Torvalds save_freq_select = CMOS_READ(RTC_FREQ_SELECT); 5231da177e4SLinus Torvalds CMOS_WRITE((save_freq_select|RTC_DIV_RESET2), RTC_FREQ_SELECT); 5241da177e4SLinus Torvalds 5251da177e4SLinus Torvalds cmos_minutes = CMOS_READ(RTC_MINUTES); 5261da177e4SLinus Torvalds if (!(save_control & RTC_DM_BINARY) || RTC_ALWAYS_BCD) 5271da177e4SLinus Torvalds BCD_TO_BIN(cmos_minutes); 5281da177e4SLinus Torvalds 5291da177e4SLinus Torvalds /* 5301da177e4SLinus Torvalds * since we're only adjusting minutes and seconds, 5311da177e4SLinus Torvalds * don't interfere with hour overflow. This avoids 5321da177e4SLinus Torvalds * messing with unknown time zones but requires your 5331da177e4SLinus Torvalds * RTC not to be off by more than 15 minutes 5341da177e4SLinus Torvalds */ 5351da177e4SLinus Torvalds real_seconds = nowtime % 60; 5361da177e4SLinus Torvalds real_minutes = nowtime / 60; 5371da177e4SLinus Torvalds if (((abs(real_minutes - cmos_minutes) + 15)/30) & 1) { 5381da177e4SLinus Torvalds /* correct for half hour time zone */ 5391da177e4SLinus Torvalds real_minutes += 30; 5401da177e4SLinus Torvalds } 5411da177e4SLinus Torvalds real_minutes %= 60; 5421da177e4SLinus Torvalds 5431da177e4SLinus Torvalds if (abs(real_minutes - cmos_minutes) < 30) { 5441da177e4SLinus Torvalds if (!(save_control & RTC_DM_BINARY) || RTC_ALWAYS_BCD) { 5451da177e4SLinus Torvalds BIN_TO_BCD(real_seconds); 5461da177e4SLinus Torvalds BIN_TO_BCD(real_minutes); 5471da177e4SLinus Torvalds } 5481da177e4SLinus Torvalds CMOS_WRITE(real_seconds,RTC_SECONDS); 5491da177e4SLinus Torvalds CMOS_WRITE(real_minutes,RTC_MINUTES); 5501da177e4SLinus Torvalds } else { 5511da177e4SLinus Torvalds printk(KERN_WARNING 5521da177e4SLinus Torvalds "set_rtc_mmss: can't update from %d to %d\n", 5531da177e4SLinus Torvalds cmos_minutes, real_minutes); 5541da177e4SLinus Torvalds retval = -1; 5551da177e4SLinus Torvalds } 5561da177e4SLinus Torvalds 5571da177e4SLinus Torvalds /* The following flags have to be released exactly in this order, 5581da177e4SLinus Torvalds * otherwise the DS12887 (popular MC146818A clone with integrated 5591da177e4SLinus Torvalds * battery and quartz) will not reset the oscillator and will not 5601da177e4SLinus Torvalds * update precisely 500 ms later. You won't find this mentioned in 5611da177e4SLinus Torvalds * the Dallas Semiconductor data sheets, but who believes data 5621da177e4SLinus Torvalds * sheets anyway ... -- Markus Kuhn 5631da177e4SLinus Torvalds */ 5641da177e4SLinus Torvalds CMOS_WRITE(save_control, RTC_CONTROL); 5651da177e4SLinus Torvalds CMOS_WRITE(save_freq_select, RTC_FREQ_SELECT); 5661da177e4SLinus Torvalds spin_unlock(&rtc_lock); 5671da177e4SLinus Torvalds 5681da177e4SLinus Torvalds return retval; 5691da177e4SLinus Torvalds } 570