kernel/drivers/clk/sunxi/clk-factors.c

   1 /*
   2  * Copyright (C) 2013 Emilio López <emilio@elopez.com.ar>
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License version 2 as
   6  * published by the Free Software Foundation.
   7  *
   8  * Adjustable factor-based clock implementation
   9  */
  10
  11 #include <linux/clk-provider.h>
  12 #include <linux/delay.h>
  13 #include <linux/err.h>
  14 #include <linux/io.h>
  15 #include <linux/module.h>
  16 #include <linux/of_address.h>
  17 #include <linux/slab.h>
  18 #include <linux/string.h>
  19
  20 #include "clk-factors.h"
  21
  22 /*
  23  * DOC: basic adjustable factor-based clock
  24  *
  25  * Traits of this clock:
  26  * prepare - clk_prepare only ensures that parents are prepared
  27  * enable - clk_enable only ensures that parents are enabled
  28  * rate - rate is adjustable.
  29  *        clk->rate = (parent->rate * N * (K + 1) >> P) / (M + 1)
  30  * parent - fixed parent.  No clk_set_parent support
  31  */
  32
  33 #define to_clk_factors(_hw) container_of(_hw, struct clk_factors, hw)
  34
  35 #define FACTORS_MAX_PARENTS             5
  36
  37 #define SETMASK(len, pos)               (((1U << (len)) - 1) << (pos))
  38 #define CLRMASK(len, pos)               (~(SETMASK(len, pos)))
  39 #define FACTOR_GET(bit, len, reg)       (((reg) & SETMASK(len, bit)) >> (bit))
  40
  41 #define FACTOR_SET(bit, len, reg, val) \
  42         (((reg) & CLRMASK(len, bit)) | (val << (bit)))
  43
  44 static unsigned long clk_factors_recalc_rate(struct clk_hw *hw,
  45                                              unsigned long parent_rate)
  46 {
  47         u8 n = 1, k = 0, p = 0, m = 0;
  48         u32 reg;
  49         unsigned long rate;
  50         struct clk_factors *factors = to_clk_factors(hw);
  51         struct clk_factors_config *config = factors->config;
  52
  53         /* Fetch the register value */
  54         reg = readl(factors->reg);
  55
  56         /* Get each individual factor if applicable */
  57         if (config->nwidth != SUNXI_FACTORS_NOT_APPLICABLE)
  58                 n = FACTOR_GET(config->nshift, config->nwidth, reg);
  59         if (config->kwidth != SUNXI_FACTORS_NOT_APPLICABLE)
  60                 k = FACTOR_GET(config->kshift, config->kwidth, reg);
  61         if (config->mwidth != SUNXI_FACTORS_NOT_APPLICABLE)
  62                 m = FACTOR_GET(config->mshift, config->mwidth, reg);
  63         if (config->pwidth != SUNXI_FACTORS_NOT_APPLICABLE)
  64                 p = FACTOR_GET(config->pshift, config->pwidth, reg);
  65
  66         /* Calculate the rate */
  67         rate = (parent_rate * (n + config->n_start) * (k + 1) >> p) / (m + 1);
  68
  69         return rate;
  70 }
  71
  72 static long clk_factors_round_rate(struct clk_hw *hw, unsigned long rate,
  73                                    unsigned long *parent_rate)
  74 {
  75         struct clk_factors *factors = to_clk_factors(hw);
  76         factors->get_factors((u32 *)&rate, (u32)*parent_rate,
  77                              NULL, NULL, NULL, NULL);
  78
  79         return rate;
  80 }
  81
  82 static long clk_factors_determine_rate(struct clk_hw *hw, unsigned long rate,
  83                                        unsigned long min_rate,
  84                                        unsigned long max_rate,
  85                                        unsigned long *best_parent_rate,
  86                                        struct clk_hw **best_parent_p)
  87 {
  88         struct clk *clk = hw->clk, *parent, *best_parent = NULL;
  89         int i, num_parents;
  90         unsigned long parent_rate, best = 0, child_rate, best_child_rate = 0;
  91
  92         /* find the parent that can help provide the fastest rate <= rate */
  93         num_parents = __clk_get_num_parents(clk);
  94         for (i = 0; i < num_parents; i++) {
  95                 parent = clk_get_parent_by_index(clk, i);
  96                 if (!parent)
  97                         continue;
  98                 if (__clk_get_flags(clk) & CLK_SET_RATE_PARENT)
  99                         parent_rate = __clk_round_rate(parent, rate);
 100                 else
 101                         parent_rate = __clk_get_rate(parent);
 102
 103                 child_rate = clk_factors_round_rate(hw, rate, &parent_rate);
 104
 105                 if (child_rate <= rate && child_rate > best_child_rate) {
 106                         best_parent = parent;
 107                         best = parent_rate;
 108                         best_child_rate = child_rate;
 109                 }
 110         }
 111
 112         if (best_parent)
 113                 *best_parent_p = __clk_get_hw(best_parent);
 114         *best_parent_rate = best;
 115
 116         return best_child_rate;
 117 }
 118
 119 static int clk_factors_set_rate(struct clk_hw *hw, unsigned long rate,
 120                                 unsigned long parent_rate)
 121 {
 122         u8 n = 0, k = 0, m = 0, p = 0;
 123         u32 reg;
 124         struct clk_factors *factors = to_clk_factors(hw);
 125         struct clk_factors_config *config = factors->config;
 126         unsigned long flags = 0;
 127
 128         factors->get_factors((u32 *)&rate, (u32)parent_rate, &n, &k, &m, &p);
 129
 130         if (factors->lock)
 131                 spin_lock_irqsave(factors->lock, flags);
 132
 133         /* Fetch the register value */
 134         reg = readl(factors->reg);
 135
 136         /* Set up the new factors - macros do not do anything if width is 0 */
 137         reg = FACTOR_SET(config->nshift, config->nwidth, reg, n);
 138         reg = FACTOR_SET(config->kshift, config->kwidth, reg, k);
 139         reg = FACTOR_SET(config->mshift, config->mwidth, reg, m);
 140         reg = FACTOR_SET(config->pshift, config->pwidth, reg, p);
 141
 142         /* Apply them now */
 143         writel(reg, factors->reg);
 144
 145         /* delay 500us so pll stabilizes */
 146         __delay((rate >> 20) * 500 / 2);
 147
 148         if (factors->lock)
 149                 spin_unlock_irqrestore(factors->lock, flags);
 150
 151         return 0;
 152 }
 153
 154 static const struct clk_ops clk_factors_ops = {
 155         .determine_rate = clk_factors_determine_rate,
 156         .recalc_rate = clk_factors_recalc_rate,
 157         .round_rate = clk_factors_round_rate,
 158         .set_rate = clk_factors_set_rate,
 159 };
 160
 161 struct clk *sunxi_factors_register(struct device_node *node,
 162                                    const struct factors_data *data,
 163                                    spinlock_t *lock,
 164                                    void __iomem *reg)
 165 {
 166         struct clk *clk;
 167         struct clk_factors *factors;
 168         struct clk_gate *gate = NULL;
 169         struct clk_mux *mux = NULL;
 170         struct clk_hw *gate_hw = NULL;
 171         struct clk_hw *mux_hw = NULL;
 172         const char *clk_name = node->name;
 173         const char *parents[FACTORS_MAX_PARENTS];
 174         int i = 0;
 175
 176         /* if we have a mux, we will have >1 parents */
 177         while (i < FACTORS_MAX_PARENTS &&
 178                (parents[i] = of_clk_get_parent_name(node, i)) != NULL)
 179                 i++;
 180
 181         /*
 182          * some factor clocks, such as pll5 and pll6, may have multiple
 183          * outputs, and have their name designated in factors_data
 184          */
 185         if (data->name)
 186                 clk_name = data->name;
 187         else
 188                 of_property_read_string(node, "clock-output-names", &clk_name);
 189
 190         factors = kzalloc(sizeof(struct clk_factors), GFP_KERNEL);
 191         if (!factors)
 192                 return NULL;
 193
 194         /* set up factors properties */
 195         factors->reg = reg;
 196         factors->config = data->table;
 197         factors->get_factors = data->getter;
 198         factors->lock = lock;
 199
 200         /* Add a gate if this factor clock can be gated */
 201         if (data->enable) {
 202                 gate = kzalloc(sizeof(struct clk_gate), GFP_KERNEL);
 203                 if (!gate) {
 204                         kfree(factors);
 205                         return NULL;
 206                 }
 207
 208                 /* set up gate properties */
 209                 gate->reg = reg;
 210                 gate->bit_idx = data->enable;
 211                 gate->lock = factors->lock;
 212                 gate_hw = &gate->hw;
 213         }
 214
 215         /* Add a mux if this factor clock can be muxed */
 216         if (data->mux) {
 217                 mux = kzalloc(sizeof(struct clk_mux), GFP_KERNEL);
 218                 if (!mux) {
 219                         kfree(factors);
 220                         kfree(gate);
 221                         return NULL;
 222                 }
 223
 224                 /* set up gate properties */
 225                 mux->reg = reg;
 226                 mux->shift = data->mux;
 227                 mux->mask = data->muxmask;
 228                 mux->lock = factors->lock;
 229                 mux_hw = &mux->hw;
 230         }
 231
 232         clk = clk_register_composite(NULL, clk_name,
 233                         parents, i,
 234                         mux_hw, &clk_mux_ops,
 235                         &factors->hw, &clk_factors_ops,
 236                         gate_hw, &clk_gate_ops, 0);
 237
 238         if (!IS_ERR(clk)) {
 239                 of_clk_add_provider(node, of_clk_src_simple_get, clk);
 240                 clk_register_clkdev(clk, clk_name, NULL);
 241         }
 242
 243         return clk;
 244 }