2008-01-30 21:15:54 +00:00
|
|
|
/*
|
|
|
|
* (C) Copyright 2007-2008
|
2011-10-31 23:00:39 +00:00
|
|
|
* Stelian Pop <stelian@popies.net>
|
2008-01-30 21:15:54 +00:00
|
|
|
* Lead Tech Design <www.leadtechdesign.com>
|
|
|
|
*
|
|
|
|
* See file CREDITS for list of people who contributed to this
|
|
|
|
* project.
|
|
|
|
*
|
|
|
|
* This program is free software; you can redistribute it and/or
|
|
|
|
* modify it under the terms of the GNU General Public License as
|
|
|
|
* published by the Free Software Foundation; either version 2 of
|
|
|
|
* the License, or (at your option) any later version.
|
|
|
|
*
|
|
|
|
* This program is distributed in the hope that it will be useful,
|
|
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
* GNU General Public License for more details.
|
|
|
|
*
|
|
|
|
* You should have received a copy of the GNU General Public License
|
|
|
|
* along with this program; if not, write to the Free Software
|
|
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston,
|
|
|
|
* MA 02111-1307 USA
|
|
|
|
*/
|
|
|
|
|
|
|
|
#include <common.h>
|
2010-11-07 12:26:14 +00:00
|
|
|
#include <asm/io.h>
|
2008-01-30 21:15:54 +00:00
|
|
|
#include <asm/arch/hardware.h>
|
2008-03-26 19:52:32 +00:00
|
|
|
#include <asm/arch/at91_pit.h>
|
|
|
|
#include <asm/arch/at91_pmc.h>
|
2009-04-16 19:30:48 +00:00
|
|
|
#include <asm/arch/clk.h>
|
|
|
|
#include <div64.h>
|
2008-01-30 21:15:54 +00:00
|
|
|
|
2010-10-05 14:54:35 +00:00
|
|
|
#if !defined(CONFIG_AT91FAMILY)
|
|
|
|
# error You need to define CONFIG_AT91FAMILY in your board config!
|
|
|
|
#endif
|
|
|
|
|
|
|
|
DECLARE_GLOBAL_DATA_PTR;
|
|
|
|
|
2008-01-30 21:15:54 +00:00
|
|
|
/*
|
2008-03-26 19:52:28 +00:00
|
|
|
* We're using the AT91CAP9/SAM9 PITC in 32 bit mode, by
|
2008-01-30 21:15:54 +00:00
|
|
|
* setting the 20 bit counter period to its maximum (0xfffff).
|
2010-10-05 14:54:35 +00:00
|
|
|
* (See the relevant data sheets to understand that this really works)
|
|
|
|
*
|
|
|
|
* We do also mimic the typical powerpc way of incrementing
|
|
|
|
* two 32 bit registers called tbl and tbu.
|
|
|
|
*
|
|
|
|
* Those registers increment at 1/16 the main clock rate.
|
2008-01-30 21:15:54 +00:00
|
|
|
*/
|
|
|
|
|
2010-10-05 14:54:35 +00:00
|
|
|
#define TIMER_LOAD_VAL 0xfffff
|
2009-04-16 19:30:48 +00:00
|
|
|
|
|
|
|
static inline unsigned long long tick_to_time(unsigned long long tick)
|
|
|
|
{
|
|
|
|
tick *= CONFIG_SYS_HZ;
|
2010-10-05 14:54:35 +00:00
|
|
|
do_div(tick, gd->timer_rate_hz);
|
2009-04-16 19:30:48 +00:00
|
|
|
|
|
|
|
return tick;
|
|
|
|
}
|
|
|
|
|
|
|
|
static inline unsigned long long usec_to_tick(unsigned long long usec)
|
|
|
|
{
|
2010-10-05 14:54:35 +00:00
|
|
|
usec *= gd->timer_rate_hz;
|
2009-04-16 19:30:48 +00:00
|
|
|
do_div(usec, 1000000);
|
|
|
|
|
|
|
|
return usec;
|
|
|
|
}
|
2008-01-30 21:15:54 +00:00
|
|
|
|
2010-10-05 14:54:35 +00:00
|
|
|
/*
|
|
|
|
* Use the PITC in full 32 bit incrementing mode
|
|
|
|
*/
|
2008-03-26 20:52:27 +00:00
|
|
|
int timer_init(void)
|
2008-01-30 21:15:54 +00:00
|
|
|
{
|
2010-11-03 14:39:55 +00:00
|
|
|
at91_pmc_t *pmc = (at91_pmc_t *) ATMEL_BASE_PMC;
|
|
|
|
at91_pit_t *pit = (at91_pit_t *) ATMEL_BASE_PIT;
|
2010-10-05 14:54:35 +00:00
|
|
|
|
|
|
|
/* Enable PITC Clock */
|
2010-11-03 14:39:55 +00:00
|
|
|
writel(1 << ATMEL_ID_SYS, &pmc->pcer);
|
2008-01-30 21:15:54 +00:00
|
|
|
|
|
|
|
/* Enable PITC */
|
2010-02-03 21:46:58 +00:00
|
|
|
writel(TIMER_LOAD_VAL | AT91_PIT_MR_EN , &pit->mr);
|
2008-01-30 21:15:54 +00:00
|
|
|
|
2012-12-13 20:48:31 +00:00
|
|
|
gd->timer_rate_hz = gd->arch.mck_rate_hz / 16;
|
2010-10-05 14:54:35 +00:00
|
|
|
gd->tbu = gd->tbl = 0;
|
2009-04-16 19:30:48 +00:00
|
|
|
|
2008-01-30 21:15:54 +00:00
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
2010-10-05 14:54:35 +00:00
|
|
|
* Get the current 64 bit timer tick count
|
2008-01-30 21:15:54 +00:00
|
|
|
*/
|
2009-04-16 19:30:48 +00:00
|
|
|
unsigned long long get_ticks(void)
|
2008-01-30 21:15:54 +00:00
|
|
|
{
|
2010-11-03 14:39:55 +00:00
|
|
|
at91_pit_t *pit = (at91_pit_t *) ATMEL_BASE_PIT;
|
2010-02-03 21:46:58 +00:00
|
|
|
|
|
|
|
ulong now = readl(&pit->piir);
|
2008-03-26 19:52:32 +00:00
|
|
|
|
2010-10-05 14:54:35 +00:00
|
|
|
/* increment tbu if tbl has rolled over */
|
|
|
|
if (now < gd->tbl)
|
|
|
|
gd->tbu++;
|
|
|
|
gd->tbl = now;
|
|
|
|
return (((unsigned long long)gd->tbu) << 32) | gd->tbl;
|
2008-01-30 21:15:54 +00:00
|
|
|
}
|
|
|
|
|
2009-11-24 13:09:21 +00:00
|
|
|
void __udelay(unsigned long usec)
|
2008-01-30 21:15:54 +00:00
|
|
|
{
|
2010-11-10 17:07:56 +00:00
|
|
|
unsigned long long start;
|
2009-04-16 19:30:48 +00:00
|
|
|
ulong tmo;
|
2008-01-30 21:15:54 +00:00
|
|
|
|
2010-11-10 17:07:56 +00:00
|
|
|
start = get_ticks(); /* get current timestamp */
|
|
|
|
tmo = usec_to_tick(usec); /* convert usecs to ticks */
|
|
|
|
while ((get_ticks() - start) < tmo)
|
|
|
|
; /* loop till time has passed */
|
2008-01-30 21:15:54 +00:00
|
|
|
}
|
|
|
|
|
2010-10-05 14:54:35 +00:00
|
|
|
/*
|
2010-11-10 17:07:56 +00:00
|
|
|
* get_timer(base) can be used to check for timeouts or
|
|
|
|
* to measure elasped time relative to an event:
|
2010-10-05 14:54:35 +00:00
|
|
|
*
|
2010-11-10 17:07:56 +00:00
|
|
|
* ulong start_time = get_timer(0) sets start_time to the current
|
|
|
|
* time value.
|
|
|
|
* get_timer(start_time) returns the time elapsed since then.
|
2010-10-05 14:54:35 +00:00
|
|
|
*
|
|
|
|
* The time is used in CONFIG_SYS_HZ units!
|
|
|
|
*/
|
2008-01-30 21:15:54 +00:00
|
|
|
ulong get_timer(ulong base)
|
|
|
|
{
|
2010-11-10 17:07:56 +00:00
|
|
|
return tick_to_time(get_ticks()) - base;
|
2008-01-30 21:15:54 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
/*
|
2010-10-05 14:54:35 +00:00
|
|
|
* Return the number of timer ticks per second.
|
2008-01-30 21:15:54 +00:00
|
|
|
*/
|
|
|
|
ulong get_tbclk(void)
|
|
|
|
{
|
2010-10-05 14:54:35 +00:00
|
|
|
return gd->timer_rate_hz;
|
2008-01-30 21:15:54 +00:00
|
|
|
}
|