kernel/2.6.29.6-aldebaran-rt/arch/blackfin/kernel/time.c

   1 /*
   2  * arch/blackfin/kernel/time.c
   3  *
   4  * This file contains the Blackfin-specific time handling details.
   5  * Most of the stuff is located in the machine specific files.
   6  *
   7  * Copyright 2004-2008 Analog Devices Inc.
   8  * Licensed under the GPL-2 or later.
   9  */
  10
  11 #include <linux/module.h>
  12 #include <linux/profile.h>
  13 #include <linux/interrupt.h>
  14 #include <linux/time.h>
  15 #include <linux/irq.h>
  16 #include <linux/delay.h>
  17
  18 #include <asm/blackfin.h>
  19 #include <asm/time.h>
  20 #include <asm/gptimers.h>
  21
  22 /* This is an NTP setting */
  23 #define TICK_SIZE (tick_nsec / 1000)
  24
  25 static struct irqaction bfin_timer_irq = {
  26         .name = "Blackfin Timer Tick",
  27 #ifdef CONFIG_IRQ_PER_CPU
  28         .flags = IRQF_DISABLED | IRQF_PERCPU,
  29 #else
  30         .flags = IRQF_DISABLED
  31 #endif
  32 };
  33
  34 #if defined(CONFIG_TICK_SOURCE_SYSTMR0) || defined(CONFIG_IPIPE)
  35 void __init setup_system_timer0(void)
  36 {
  37         /* Power down the core timer, just to play safe. */
  38         bfin_write_TCNTL(0);
  39
  40         disable_gptimers(TIMER0bit);
  41         set_gptimer_status(0, TIMER_STATUS_TRUN0);
  42         while (get_gptimer_status(0) & TIMER_STATUS_TRUN0)
  43                 udelay(10);
  44
  45         set_gptimer_config(0, 0x59); /* IRQ enable, periodic, PWM_OUT, SCLKed, OUT PAD disabled */
  46         set_gptimer_period(TIMER0_id, get_sclk() / HZ);
  47         set_gptimer_pwidth(TIMER0_id, 1);
  48         SSYNC();
  49         enable_gptimers(TIMER0bit);
  50 }
  51 #else
  52 void __init setup_core_timer(void)
  53 {
  54         u32 tcount;
  55
  56         /* power up the timer, but don't enable it just yet */
  57         bfin_write_TCNTL(1);
  58         CSYNC();
  59
  60         /* the TSCALE prescaler counter */
  61         bfin_write_TSCALE(TIME_SCALE - 1);
  62
  63         tcount = ((get_cclk() / (HZ * TIME_SCALE)) - 1);
  64         bfin_write_TPERIOD(tcount);
  65         bfin_write_TCOUNT(tcount);
  66
  67         /* now enable the timer */
  68         CSYNC();
  69
  70         bfin_write_TCNTL(7);
  71 }
  72 #endif
  73
  74 static void __init
  75 time_sched_init(irqreturn_t(*timer_routine) (int, void *))
  76 {
  77 #if defined(CONFIG_TICK_SOURCE_SYSTMR0) || defined(CONFIG_IPIPE)
  78         setup_system_timer0();
  79         bfin_timer_irq.handler = timer_routine;
  80         setup_irq(IRQ_TIMER0, &bfin_timer_irq);
  81 #else
  82         setup_core_timer();
  83         bfin_timer_irq.handler = timer_routine;
  84         setup_irq(IRQ_CORETMR, &bfin_timer_irq);
  85 #endif
  86 }
  87
  88 /*
  89  * Should return useconds since last timer tick
  90  */
  91 #ifndef CONFIG_GENERIC_TIME
  92 static unsigned long gettimeoffset(void)
  93 {
  94         unsigned long offset;
  95         unsigned long clocks_per_jiffy;
  96
  97 #if defined(CONFIG_TICK_SOURCE_SYSTMR0) || defined(CONFIG_IPIPE)
  98         clocks_per_jiffy = bfin_read_TIMER0_PERIOD();
  99         offset = bfin_read_TIMER0_COUNTER() / \
 100                 (((clocks_per_jiffy + 1) * HZ) / USEC_PER_SEC);
 101
 102         if ((get_gptimer_status(0) & TIMER_STATUS_TIMIL0) && offset < (100000 / HZ / 2))
 103                 offset += (USEC_PER_SEC / HZ);
 104 #else
 105         clocks_per_jiffy = bfin_read_TPERIOD();
 106         offset = (clocks_per_jiffy - bfin_read_TCOUNT()) / \
 107                 (((clocks_per_jiffy + 1) * HZ) / USEC_PER_SEC);
 108
 109         /* Check if we just wrapped the counters and maybe missed a tick */
 110         if ((bfin_read_ILAT() & (1 << IRQ_CORETMR))
 111                 && (offset < (100000 / HZ / 2)))
 112                 offset += (USEC_PER_SEC / HZ);
 113 #endif
 114         return offset;
 115 }
 116 #endif
 117
 118 static inline int set_rtc_mmss(unsigned long nowtime)
 119 {
 120         return 0;
 121 }
 122
 123 /*
 124  * timer_interrupt() needs to keep up the real-time clock,
 125  * as well as call the "do_timer()" routine every clocktick
 126  */
 127 #ifdef CONFIG_CORE_TIMER_IRQ_L1
 128 __attribute__((l1_text))
 129 #endif
 130 irqreturn_t timer_interrupt(int irq, void *dummy)
 131 {
 132         /* last time the cmos clock got updated */
 133         static long last_rtc_update;
 134
 135         write_seqlock(&xtime_lock);
 136 #if defined(CONFIG_TICK_SOURCE_SYSTMR0) && !defined(CONFIG_IPIPE)
 137         /*
 138          * TIMIL0 is latched in __ipipe_grab_irq() when the I-Pipe is
 139          * enabled.
 140          */
 141         if (get_gptimer_status(0) & TIMER_STATUS_TIMIL0) {
 142 #endif
 143                 do_timer(1);
 144
 145                 /*
 146                  * If we have an externally synchronized Linux clock, then update
 147                  * CMOS clock accordingly every ~11 minutes. Set_rtc_mmss() has to be
 148                  * called as close as possible to 500 ms before the new second starts.
 149                  */
 150                 if (ntp_synced() &&
 151                     xtime.tv_sec > last_rtc_update + 660 &&
 152                     (xtime.tv_nsec / NSEC_PER_USEC) >=
 153                     500000 - ((unsigned)TICK_SIZE) / 2
 154                     && (xtime.tv_nsec / NSEC_PER_USEC) <=
 155                     500000 + ((unsigned)TICK_SIZE) / 2) {
 156                         if (set_rtc_mmss(xtime.tv_sec) == 0)
 157                                 last_rtc_update = xtime.tv_sec;
 158                         else
 159                                 /* Do it again in 60s. */
 160                                 last_rtc_update = xtime.tv_sec - 600;
 161                 }
 162 #if defined(CONFIG_TICK_SOURCE_SYSTMR0) && !defined(CONFIG_IPIPE)
 163                 set_gptimer_status(0, TIMER_STATUS_TIMIL0);
 164         }
 165 #endif
 166         write_sequnlock(&xtime_lock);
 167
 168 #ifdef CONFIG_IPIPE
 169         update_root_process_times(get_irq_regs());
 170 #else
 171         update_process_times(user_mode(get_irq_regs()));
 172 #endif
 173         profile_tick(CPU_PROFILING);
 174
 175         return IRQ_HANDLED;
 176 }
 177
 178 void __init time_init(void)
 179 {
 180         time_t secs_since_1970 = (365 * 37 + 9) * 24 * 60 * 60; /* 1 Jan 2007 */
 181
 182 #ifdef CONFIG_RTC_DRV_BFIN
 183         /* [#2663] hack to filter junk RTC values that would cause
 184          * userspace to have to deal with time values greater than
 185          * 2^31 seconds (which uClibc cannot cope with yet)
 186          */
 187         if ((bfin_read_RTC_STAT() & 0xC0000000) == 0xC0000000) {
 188                 printk(KERN_NOTICE "bfin-rtc: invalid date; resetting\n");
 189                 bfin_write_RTC_STAT(0);
 190         }
 191 #endif
 192
 193         /* Initialize xtime. From now on, xtime is updated with timer interrupts */
 194         xtime.tv_sec = secs_since_1970;
 195         xtime.tv_nsec = 0;
 196
 197         wall_to_monotonic.tv_sec = -xtime.tv_sec;
 198
 199         time_sched_init(timer_interrupt);
 200 }
 201
 202 #ifndef CONFIG_GENERIC_TIME
 203 void do_gettimeofday(struct timeval *tv)
 204 {
 205         unsigned long flags;
 206         unsigned long seq;
 207         unsigned long usec, sec;
 208
 209         do {
 210                 seq = read_seqbegin_irqsave(&xtime_lock, flags);
 211                 usec = gettimeoffset();
 212                 sec = xtime.tv_sec;
 213                 usec += (xtime.tv_nsec / NSEC_PER_USEC);
 214         }
 215         while (read_seqretry_irqrestore(&xtime_lock, seq, flags));
 216
 217         while (usec >= USEC_PER_SEC) {
 218                 usec -= USEC_PER_SEC;
 219                 sec++;
 220         }
 221
 222         tv->tv_sec = sec;
 223         tv->tv_usec = usec;
 224 }
 225 EXPORT_SYMBOL(do_gettimeofday);
 226
 227 int do_settimeofday(struct timespec *tv)
 228 {
 229         time_t wtm_sec, sec = tv->tv_sec;
 230         long wtm_nsec, nsec = tv->tv_nsec;
 231
 232         if ((unsigned long)tv->tv_nsec >= NSEC_PER_SEC)
 233                 return -EINVAL;
 234
 235         write_seqlock_irq(&xtime_lock);
 236         /*
 237          * This is revolting. We need to set the xtime.tv_usec
 238          * correctly. However, the value in this location is
 239          * is value at the last tick.
 240          * Discover what correction gettimeofday
 241          * would have done, and then undo it!
 242          */
 243         nsec -= (gettimeoffset() * NSEC_PER_USEC);
 244
 245         wtm_sec = wall_to_monotonic.tv_sec + (xtime.tv_sec - sec);
 246         wtm_nsec = wall_to_monotonic.tv_nsec + (xtime.tv_nsec - nsec);
 247
 248         set_normalized_timespec(&xtime, sec, nsec);
 249         set_normalized_timespec(&wall_to_monotonic, wtm_sec, wtm_nsec);
 250
 251         ntp_clear();
 252
 253         write_sequnlock_irq(&xtime_lock);
 254         clock_was_set();
 255
 256         return 0;
 257 }
 258 EXPORT_SYMBOL(do_settimeofday);
 259 #endif /* !CONFIG_GENERIC_TIME */
 260
 261 /*
 262  * Scheduler clock - returns current time in nanosec units.
 263  */
 264 unsigned long long sched_clock(void)
 265 {
 266         return (unsigned long long)jiffies *(NSEC_PER_SEC / HZ);
 267 }