447 lines
10 KiB
C
447 lines
10 KiB
C
|
/*
|
||
|
|
* Copyright (C) 2013 Boris BREZILLON <b.brezillon@overkiz.com>
|
||
|
|
*
|
||
|
|
* 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.
|
||
|
|
*
|
||
|
|
*/
|
||
|
|
|
||
|
|
#include <linux/clk-provider.h>
|
||
|
|
#include <linux/clkdev.h>
|
||
|
|
#include <linux/clk/at91_pmc.h>
|
||
|
|
#include <linux/of.h>
|
||
|
|
#include <linux/mfd/syscon.h>
|
||
|
|
#include <linux/regmap.h>
|
||
|
|
|
||
|
|
#include "pmc.h"
|
||
|
|
|
||
|
|
DEFINE_SPINLOCK(pmc_pcr_lock);
|
||
|
|
|
||
|
|
#define PERIPHERAL_MAX 64
|
||
|
|
|
||
|
|
#define PERIPHERAL_AT91RM9200 0
|
||
|
|
#define PERIPHERAL_AT91SAM9X5 1
|
||
|
|
|
||
|
|
#define PERIPHERAL_ID_MIN 2
|
||
|
|
#define PERIPHERAL_ID_MAX 31
|
||
|
|
#define PERIPHERAL_MASK(id) (1 << ((id) & PERIPHERAL_ID_MAX))
|
||
|
|
|
||
|
|
#define PERIPHERAL_RSHIFT_MASK 0x3
|
||
|
|
#define PERIPHERAL_RSHIFT(val) (((val) >> 16) & PERIPHERAL_RSHIFT_MASK)
|
||
|
|
|
||
|
|
#define PERIPHERAL_MAX_SHIFT 3
|
||
|
|
|
||
|
|
struct clk_peripheral {
|
||
|
|
struct clk_hw hw;
|
||
|
|
struct regmap *regmap;
|
||
|
|
u32 id;
|
||
|
|
};
|
||
|
|
|
||
|
|
#define to_clk_peripheral(hw) container_of(hw, struct clk_peripheral, hw)
|
||
|
|
|
||
|
|
struct clk_sam9x5_peripheral {
|
||
|
|
struct clk_hw hw;
|
||
|
|
struct regmap *regmap;
|
||
|
|
struct clk_range range;
|
||
|
|
spinlock_t *lock;
|
||
|
|
u32 id;
|
||
|
|
u32 div;
|
||
|
|
bool auto_div;
|
||
|
|
};
|
||
|
|
|
||
|
|
#define to_clk_sam9x5_peripheral(hw) \
|
||
|
|
container_of(hw, struct clk_sam9x5_peripheral, hw)
|
||
|
|
|
||
|
|
static int clk_peripheral_enable(struct clk_hw *hw)
|
||
|
|
{
|
||
|
|
struct clk_peripheral *periph = to_clk_peripheral(hw);
|
||
|
|
int offset = AT91_PMC_PCER;
|
||
|
|
u32 id = periph->id;
|
||
|
|
|
||
|
|
if (id < PERIPHERAL_ID_MIN)
|
||
|
|
return 0;
|
||
|
|
if (id > PERIPHERAL_ID_MAX)
|
||
|
|
offset = AT91_PMC_PCER1;
|
||
|
|
regmap_write(periph->regmap, offset, PERIPHERAL_MASK(id));
|
||
|
|
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
static void clk_peripheral_disable(struct clk_hw *hw)
|
||
|
|
{
|
||
|
|
struct clk_peripheral *periph = to_clk_peripheral(hw);
|
||
|
|
int offset = AT91_PMC_PCDR;
|
||
|
|
u32 id = periph->id;
|
||
|
|
|
||
|
|
if (id < PERIPHERAL_ID_MIN)
|
||
|
|
return;
|
||
|
|
if (id > PERIPHERAL_ID_MAX)
|
||
|
|
offset = AT91_PMC_PCDR1;
|
||
|
|
regmap_write(periph->regmap, offset, PERIPHERAL_MASK(id));
|
||
|
|
}
|
||
|
|
|
||
|
|
static int clk_peripheral_is_enabled(struct clk_hw *hw)
|
||
|
|
{
|
||
|
|
struct clk_peripheral *periph = to_clk_peripheral(hw);
|
||
|
|
int offset = AT91_PMC_PCSR;
|
||
|
|
unsigned int status;
|
||
|
|
u32 id = periph->id;
|
||
|
|
|
||
|
|
if (id < PERIPHERAL_ID_MIN)
|
||
|
|
return 1;
|
||
|
|
if (id > PERIPHERAL_ID_MAX)
|
||
|
|
offset = AT91_PMC_PCSR1;
|
||
|
|
regmap_read(periph->regmap, offset, &status);
|
||
|
|
|
||
|
|
return status & PERIPHERAL_MASK(id) ? 1 : 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
static const struct clk_ops peripheral_ops = {
|
||
|
|
.enable = clk_peripheral_enable,
|
||
|
|
.disable = clk_peripheral_disable,
|
||
|
|
.is_enabled = clk_peripheral_is_enabled,
|
||
|
|
};
|
||
|
|
|
||
|
|
static struct clk_hw * __init
|
||
|
|
at91_clk_register_peripheral(struct regmap *regmap, const char *name,
|
||
|
|
const char *parent_name, u32 id)
|
||
|
|
{
|
||
|
|
struct clk_peripheral *periph;
|
||
|
|
struct clk_init_data init;
|
||
|
|
struct clk_hw *hw;
|
||
|
|
int ret;
|
||
|
|
|
||
|
|
if (!name || !parent_name || id > PERIPHERAL_ID_MAX)
|
||
|
|
return ERR_PTR(-EINVAL);
|
||
|
|
|
||
|
|
periph = kzalloc(sizeof(*periph), GFP_KERNEL);
|
||
|
|
if (!periph)
|
||
|
|
return ERR_PTR(-ENOMEM);
|
||
|
|
|
||
|
|
init.name = name;
|
||
|
|
init.ops = &peripheral_ops;
|
||
|
|
init.parent_names = (parent_name ? &parent_name : NULL);
|
||
|
|
init.num_parents = (parent_name ? 1 : 0);
|
||
|
|
init.flags = 0;
|
||
|
|
|
||
|
|
periph->id = id;
|
||
|
|
periph->hw.init = &init;
|
||
|
|
periph->regmap = regmap;
|
||
|
|
|
||
|
|
hw = &periph->hw;
|
||
|
|
ret = clk_hw_register(NULL, &periph->hw);
|
||
|
|
if (ret) {
|
||
|
|
kfree(periph);
|
||
|
|
hw = ERR_PTR(ret);
|
||
|
|
}
|
||
|
|
|
||
|
|
return hw;
|
||
|
|
}
|
||
|
|
|
||
|
|
static void clk_sam9x5_peripheral_autodiv(struct clk_sam9x5_peripheral *periph)
|
||
|
|
{
|
||
|
|
struct clk_hw *parent;
|
||
|
|
unsigned long parent_rate;
|
||
|
|
int shift = 0;
|
||
|
|
|
||
|
|
if (!periph->auto_div)
|
||
|
|
return;
|
||
|
|
|
||
|
|
if (periph->range.max) {
|
||
|
|
parent = clk_hw_get_parent_by_index(&periph->hw, 0);
|
||
|
|
parent_rate = clk_hw_get_rate(parent);
|
||
|
|
if (!parent_rate)
|
||
|
|
return;
|
||
|
|
|
||
|
|
for (; shift < PERIPHERAL_MAX_SHIFT; shift++) {
|
||
|
|
if (parent_rate >> shift <= periph->range.max)
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
periph->auto_div = false;
|
||
|
|
periph->div = shift;
|
||
|
|
}
|
||
|
|
|
||
|
|
static int clk_sam9x5_peripheral_enable(struct clk_hw *hw)
|
||
|
|
{
|
||
|
|
struct clk_sam9x5_peripheral *periph = to_clk_sam9x5_peripheral(hw);
|
||
|
|
unsigned long flags;
|
||
|
|
|
||
|
|
if (periph->id < PERIPHERAL_ID_MIN)
|
||
|
|
return 0;
|
||
|
|
|
||
|
|
spin_lock_irqsave(periph->lock, flags);
|
||
|
|
regmap_write(periph->regmap, AT91_PMC_PCR,
|
||
|
|
(periph->id & AT91_PMC_PCR_PID_MASK));
|
||
|
|
regmap_update_bits(periph->regmap, AT91_PMC_PCR,
|
||
|
|
AT91_PMC_PCR_DIV_MASK | AT91_PMC_PCR_CMD |
|
||
|
|
AT91_PMC_PCR_EN,
|
||
|
|
AT91_PMC_PCR_DIV(periph->div) |
|
||
|
|
AT91_PMC_PCR_CMD |
|
||
|
|
AT91_PMC_PCR_EN);
|
||
|
|
spin_unlock_irqrestore(periph->lock, flags);
|
||
|
|
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
static void clk_sam9x5_peripheral_disable(struct clk_hw *hw)
|
||
|
|
{
|
||
|
|
struct clk_sam9x5_peripheral *periph = to_clk_sam9x5_peripheral(hw);
|
||
|
|
unsigned long flags;
|
||
|
|
|
||
|
|
if (periph->id < PERIPHERAL_ID_MIN)
|
||
|
|
return;
|
||
|
|
|
||
|
|
spin_lock_irqsave(periph->lock, flags);
|
||
|
|
regmap_write(periph->regmap, AT91_PMC_PCR,
|
||
|
|
(periph->id & AT91_PMC_PCR_PID_MASK));
|
||
|
|
regmap_update_bits(periph->regmap, AT91_PMC_PCR,
|
||
|
|
AT91_PMC_PCR_EN | AT91_PMC_PCR_CMD,
|
||
|
|
AT91_PMC_PCR_CMD);
|
||
|
|
spin_unlock_irqrestore(periph->lock, flags);
|
||
|
|
}
|
||
|
|
|
||
|
|
static int clk_sam9x5_peripheral_is_enabled(struct clk_hw *hw)
|
||
|
|
{
|
||
|
|
struct clk_sam9x5_peripheral *periph = to_clk_sam9x5_peripheral(hw);
|
||
|
|
unsigned long flags;
|
||
|
|
unsigned int status;
|
||
|
|
|
||
|
|
if (periph->id < PERIPHERAL_ID_MIN)
|
||
|
|
return 1;
|
||
|
|
|
||
|
|
spin_lock_irqsave(periph->lock, flags);
|
||
|
|
regmap_write(periph->regmap, AT91_PMC_PCR,
|
||
|
|
(periph->id & AT91_PMC_PCR_PID_MASK));
|
||
|
|
regmap_read(periph->regmap, AT91_PMC_PCR, &status);
|
||
|
|
spin_unlock_irqrestore(periph->lock, flags);
|
||
|
|
|
||
|
|
return status & AT91_PMC_PCR_EN ? 1 : 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
static unsigned long
|
||
|
|
clk_sam9x5_peripheral_recalc_rate(struct clk_hw *hw,
|
||
|
|
unsigned long parent_rate)
|
||
|
|
{
|
||
|
|
struct clk_sam9x5_peripheral *periph = to_clk_sam9x5_peripheral(hw);
|
||
|
|
unsigned long flags;
|
||
|
|
unsigned int status;
|
||
|
|
|
||
|
|
if (periph->id < PERIPHERAL_ID_MIN)
|
||
|
|
return parent_rate;
|
||
|
|
|
||
|
|
spin_lock_irqsave(periph->lock, flags);
|
||
|
|
regmap_write(periph->regmap, AT91_PMC_PCR,
|
||
|
|
(periph->id & AT91_PMC_PCR_PID_MASK));
|
||
|
|
regmap_read(periph->regmap, AT91_PMC_PCR, &status);
|
||
|
|
spin_unlock_irqrestore(periph->lock, flags);
|
||
|
|
|
||
|
|
if (status & AT91_PMC_PCR_EN) {
|
||
|
|
periph->div = PERIPHERAL_RSHIFT(status);
|
||
|
|
periph->auto_div = false;
|
||
|
|
} else {
|
||
|
|
clk_sam9x5_peripheral_autodiv(periph);
|
||
|
|
}
|
||
|
|
|
||
|
|
return parent_rate >> periph->div;
|
||
|
|
}
|
||
|
|
|
||
|
|
static long clk_sam9x5_peripheral_round_rate(struct clk_hw *hw,
|
||
|
|
unsigned long rate,
|
||
|
|
unsigned long *parent_rate)
|
||
|
|
{
|
||
|
|
int shift = 0;
|
||
|
|
unsigned long best_rate;
|
||
|
|
unsigned long best_diff;
|
||
|
|
unsigned long cur_rate = *parent_rate;
|
||
|
|
unsigned long cur_diff;
|
||
|
|
struct clk_sam9x5_peripheral *periph = to_clk_sam9x5_peripheral(hw);
|
||
|
|
|
||
|
|
if (periph->id < PERIPHERAL_ID_MIN || !periph->range.max)
|
||
|
|
return *parent_rate;
|
||
|
|
|
||
|
|
if (periph->range.max) {
|
||
|
|
for (; shift <= PERIPHERAL_MAX_SHIFT; shift++) {
|
||
|
|
cur_rate = *parent_rate >> shift;
|
||
|
|
if (cur_rate <= periph->range.max)
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
if (rate >= cur_rate)
|
||
|
|
return cur_rate;
|
||
|
|
|
||
|
|
best_diff = cur_rate - rate;
|
||
|
|
best_rate = cur_rate;
|
||
|
|
for (; shift <= PERIPHERAL_MAX_SHIFT; shift++) {
|
||
|
|
cur_rate = *parent_rate >> shift;
|
||
|
|
if (cur_rate < rate)
|
||
|
|
cur_diff = rate - cur_rate;
|
||
|
|
else
|
||
|
|
cur_diff = cur_rate - rate;
|
||
|
|
|
||
|
|
if (cur_diff < best_diff) {
|
||
|
|
best_diff = cur_diff;
|
||
|
|
best_rate = cur_rate;
|
||
|
|
}
|
||
|
|
|
||
|
|
if (!best_diff || cur_rate < rate)
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
return best_rate;
|
||
|
|
}
|
||
|
|
|
||
|
|
static int clk_sam9x5_peripheral_set_rate(struct clk_hw *hw,
|
||
|
|
unsigned long rate,
|
||
|
|
unsigned long parent_rate)
|
||
|
|
{
|
||
|
|
int shift;
|
||
|
|
struct clk_sam9x5_peripheral *periph = to_clk_sam9x5_peripheral(hw);
|
||
|
|
if (periph->id < PERIPHERAL_ID_MIN || !periph->range.max) {
|
||
|
|
if (parent_rate == rate)
|
||
|
|
return 0;
|
||
|
|
else
|
||
|
|
return -EINVAL;
|
||
|
|
}
|
||
|
|
|
||
|
|
if (periph->range.max && rate > periph->range.max)
|
||
|
|
return -EINVAL;
|
||
|
|
|
||
|
|
for (shift = 0; shift <= PERIPHERAL_MAX_SHIFT; shift++) {
|
||
|
|
if (parent_rate >> shift == rate) {
|
||
|
|
periph->auto_div = false;
|
||
|
|
periph->div = shift;
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
return -EINVAL;
|
||
|
|
}
|
||
|
|
|
||
|
|
static const struct clk_ops sam9x5_peripheral_ops = {
|
||
|
|
.enable = clk_sam9x5_peripheral_enable,
|
||
|
|
.disable = clk_sam9x5_peripheral_disable,
|
||
|
|
.is_enabled = clk_sam9x5_peripheral_is_enabled,
|
||
|
|
.recalc_rate = clk_sam9x5_peripheral_recalc_rate,
|
||
|
|
.round_rate = clk_sam9x5_peripheral_round_rate,
|
||
|
|
.set_rate = clk_sam9x5_peripheral_set_rate,
|
||
|
|
};
|
||
|
|
|
||
|
|
static struct clk_hw * __init
|
||
|
|
at91_clk_register_sam9x5_peripheral(struct regmap *regmap, spinlock_t *lock,
|
||
|
|
const char *name, const char *parent_name,
|
||
|
|
u32 id, const struct clk_range *range)
|
||
|
|
{
|
||
|
|
struct clk_sam9x5_peripheral *periph;
|
||
|
|
struct clk_init_data init;
|
||
|
|
struct clk_hw *hw;
|
||
|
|
int ret;
|
||
|
|
|
||
|
|
if (!name || !parent_name)
|
||
|
|
return ERR_PTR(-EINVAL);
|
||
|
|
|
||
|
|
periph = kzalloc(sizeof(*periph), GFP_KERNEL);
|
||
|
|
if (!periph)
|
||
|
|
return ERR_PTR(-ENOMEM);
|
||
|
|
|
||
|
|
init.name = name;
|
||
|
|
init.ops = &sam9x5_peripheral_ops;
|
||
|
|
init.parent_names = (parent_name ? &parent_name : NULL);
|
||
|
|
init.num_parents = (parent_name ? 1 : 0);
|
||
|
|
init.flags = 0;
|
||
|
|
|
||
|
|
periph->id = id;
|
||
|
|
periph->hw.init = &init;
|
||
|
|
periph->div = 0;
|
||
|
|
periph->regmap = regmap;
|
||
|
|
periph->lock = lock;
|
||
|
|
periph->auto_div = true;
|
||
|
|
periph->range = *range;
|
||
|
|
|
||
|
|
hw = &periph->hw;
|
||
|
|
ret = clk_hw_register(NULL, &periph->hw);
|
||
|
|
if (ret) {
|
||
|
|
kfree(periph);
|
||
|
|
hw = ERR_PTR(ret);
|
||
|
|
} else
|
||
|
|
clk_sam9x5_peripheral_autodiv(periph);
|
||
|
|
|
||
|
|
return hw;
|
||
|
|
}
|
||
|
|
|
||
|
|
static void __init
|
||
|
|
of_at91_clk_periph_setup(struct device_node *np, u8 type)
|
||
|
|
{
|
||
|
|
int num;
|
||
|
|
u32 id;
|
||
|
|
struct clk_hw *hw;
|
||
|
|
const char *parent_name;
|
||
|
|
const char *name;
|
||
|
|
struct device_node *periphclknp;
|
||
|
|
struct regmap *regmap;
|
||
|
|
|
||
|
|
parent_name = of_clk_get_parent_name(np, 0);
|
||
|
|
if (!parent_name)
|
||
|
|
return;
|
||
|
|
|
||
|
|
num = of_get_child_count(np);
|
||
|
|
if (!num || num > PERIPHERAL_MAX)
|
||
|
|
return;
|
||
|
|
|
||
|
|
regmap = syscon_node_to_regmap(of_get_parent(np));
|
||
|
|
if (IS_ERR(regmap))
|
||
|
|
return;
|
||
|
|
|
||
|
|
for_each_child_of_node(np, periphclknp) {
|
||
|
|
if (of_property_read_u32(periphclknp, "reg", &id))
|
||
|
|
continue;
|
||
|
|
|
||
|
|
if (id >= PERIPHERAL_MAX)
|
||
|
|
continue;
|
||
|
|
|
||
|
|
if (of_property_read_string(np, "clock-output-names", &name))
|
||
|
|
name = periphclknp->name;
|
||
|
|
|
||
|
|
if (type == PERIPHERAL_AT91RM9200) {
|
||
|
|
hw = at91_clk_register_peripheral(regmap, name,
|
||
|
|
parent_name, id);
|
||
|
|
} else {
|
||
|
|
struct clk_range range = CLK_RANGE(0, 0);
|
||
|
|
|
||
|
|
of_at91_get_clk_range(periphclknp,
|
||
|
|
"atmel,clk-output-range",
|
||
|
|
&range);
|
||
|
|
|
||
|
|
hw = at91_clk_register_sam9x5_peripheral(regmap,
|
||
|
|
&pmc_pcr_lock,
|
||
|
|
name,
|
||
|
|
parent_name,
|
||
|
|
id, &range);
|
||
|
|
}
|
||
|
|
|
||
|
|
if (IS_ERR(hw))
|
||
|
|
continue;
|
||
|
|
|
||
|
|
of_clk_add_hw_provider(periphclknp, of_clk_hw_simple_get, hw);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
static void __init of_at91rm9200_clk_periph_setup(struct device_node *np)
|
||
|
|
{
|
||
|
|
of_at91_clk_periph_setup(np, PERIPHERAL_AT91RM9200);
|
||
|
|
}
|
||
|
|
CLK_OF_DECLARE(at91rm9200_clk_periph, "atmel,at91rm9200-clk-peripheral",
|
||
|
|
of_at91rm9200_clk_periph_setup);
|
||
|
|
|
||
|
|
static void __init of_at91sam9x5_clk_periph_setup(struct device_node *np)
|
||
|
|
{
|
||
|
|
of_at91_clk_periph_setup(np, PERIPHERAL_AT91SAM9X5);
|
||
|
|
}
|
||
|
|
CLK_OF_DECLARE(at91sam9x5_clk_periph, "atmel,at91sam9x5-clk-peripheral",
|
||
|
|
of_at91sam9x5_clk_periph_setup);
|
||
|
|
|