linux/drivers/clk/meson/clk-pll.c
<<
>>
Prefs
   1// SPDX-License-Identifier: GPL-2.0
   2/*
   3 * Copyright (c) 2015 Endless Mobile, Inc.
   4 * Author: Carlo Caione <carlo@endlessm.com>
   5 *
   6 * Copyright (c) 2018 Baylibre, SAS.
   7 * Author: Jerome Brunet <jbrunet@baylibre.com>
   8 */
   9
  10/*
  11 * In the most basic form, a Meson PLL is composed as follows:
  12 *
  13 *                     PLL
  14 *        +--------------------------------+
  15 *        |                                |
  16 *        |             +--+               |
  17 *  in >>-----[ /N ]--->|  |      +-----+  |
  18 *        |             |  |------| DCO |---->> out
  19 *        |  +--------->|  |      +--v--+  |
  20 *        |  |          +--+         |     |
  21 *        |  |                       |     |
  22 *        |  +--[ *(M + (F/Fmax) ]<--+     |
  23 *        |                                |
  24 *        +--------------------------------+
  25 *
  26 * out = in * (m + frac / frac_max) / n
  27 */
  28
  29#include <linux/clk-provider.h>
  30#include <linux/delay.h>
  31#include <linux/err.h>
  32#include <linux/io.h>
  33#include <linux/math64.h>
  34#include <linux/module.h>
  35#include <linux/rational.h>
  36
  37#include "clk-regmap.h"
  38#include "clk-pll.h"
  39
  40static inline struct meson_clk_pll_data *
  41meson_clk_pll_data(struct clk_regmap *clk)
  42{
  43        return (struct meson_clk_pll_data *)clk->data;
  44}
  45
  46static int __pll_round_closest_mult(struct meson_clk_pll_data *pll)
  47{
  48        if ((pll->flags & CLK_MESON_PLL_ROUND_CLOSEST) &&
  49            !MESON_PARM_APPLICABLE(&pll->frac))
  50                return 1;
  51
  52        return 0;
  53}
  54
  55static unsigned long __pll_params_to_rate(unsigned long parent_rate,
  56                                          unsigned int m, unsigned int n,
  57                                          unsigned int frac,
  58                                          struct meson_clk_pll_data *pll)
  59{
  60        u64 rate = (u64)parent_rate * m;
  61
  62        if (frac && MESON_PARM_APPLICABLE(&pll->frac)) {
  63                u64 frac_rate = (u64)parent_rate * frac;
  64
  65                rate += DIV_ROUND_UP_ULL(frac_rate,
  66                                         (1 << pll->frac.width));
  67        }
  68
  69        return DIV_ROUND_UP_ULL(rate, n);
  70}
  71
  72static unsigned long meson_clk_pll_recalc_rate(struct clk_hw *hw,
  73                                                unsigned long parent_rate)
  74{
  75        struct clk_regmap *clk = to_clk_regmap(hw);
  76        struct meson_clk_pll_data *pll = meson_clk_pll_data(clk);
  77        unsigned int m, n, frac;
  78
  79        n = meson_parm_read(clk->map, &pll->n);
  80
  81        /*
  82         * On some HW, N is set to zero on init. This value is invalid as
  83         * it would result in a division by zero. The rate can't be
  84         * calculated in this case
  85         */
  86        if (n == 0)
  87                return 0;
  88
  89        m = meson_parm_read(clk->map, &pll->m);
  90
  91        frac = MESON_PARM_APPLICABLE(&pll->frac) ?
  92                meson_parm_read(clk->map, &pll->frac) :
  93                0;
  94
  95        return __pll_params_to_rate(parent_rate, m, n, frac, pll);
  96}
  97
  98static unsigned int __pll_params_with_frac(unsigned long rate,
  99                                           unsigned long parent_rate,
 100                                           unsigned int m,
 101                                           unsigned int n,
 102                                           struct meson_clk_pll_data *pll)
 103{
 104        unsigned int frac_max = (1 << pll->frac.width);
 105        u64 val = (u64)rate * n;
 106
 107        /* Bail out if we are already over the requested rate */
 108        if (rate < parent_rate * m / n)
 109                return 0;
 110
 111        if (pll->flags & CLK_MESON_PLL_ROUND_CLOSEST)
 112                val = DIV_ROUND_CLOSEST_ULL(val * frac_max, parent_rate);
 113        else
 114                val = div_u64(val * frac_max, parent_rate);
 115
 116        val -= m * frac_max;
 117
 118        return min((unsigned int)val, (frac_max - 1));
 119}
 120
 121static bool meson_clk_pll_is_better(unsigned long rate,
 122                                    unsigned long best,
 123                                    unsigned long now,
 124                                    struct meson_clk_pll_data *pll)
 125{
 126        if (__pll_round_closest_mult(pll)) {
 127                /* Round Closest */
 128                if (abs(now - rate) < abs(best - rate))
 129                        return true;
 130        } else {
 131                /* Round down */
 132                if (now <= rate && best < now)
 133                        return true;
 134        }
 135
 136        return false;
 137}
 138
 139static int meson_clk_get_pll_table_index(unsigned int index,
 140                                         unsigned int *m,
 141                                         unsigned int *n,
 142                                         struct meson_clk_pll_data *pll)
 143{
 144        if (!pll->table[index].n)
 145                return -EINVAL;
 146
 147        *m = pll->table[index].m;
 148        *n = pll->table[index].n;
 149
 150        return 0;
 151}
 152
 153static unsigned int meson_clk_get_pll_range_m(unsigned long rate,
 154                                              unsigned long parent_rate,
 155                                              unsigned int n,
 156                                              struct meson_clk_pll_data *pll)
 157{
 158        u64 val = (u64)rate * n;
 159
 160        if (__pll_round_closest_mult(pll))
 161                return DIV_ROUND_CLOSEST_ULL(val, parent_rate);
 162
 163        return div_u64(val,  parent_rate);
 164}
 165
 166static int meson_clk_get_pll_range_index(unsigned long rate,
 167                                         unsigned long parent_rate,
 168                                         unsigned int index,
 169                                         unsigned int *m,
 170                                         unsigned int *n,
 171                                         struct meson_clk_pll_data *pll)
 172{
 173        *n = index + 1;
 174
 175        /* Check the predivider range */
 176        if (*n >= (1 << pll->n.width))
 177                return -EINVAL;
 178
 179        if (*n == 1) {
 180                /* Get the boundaries out the way */
 181                if (rate <= pll->range->min * parent_rate) {
 182                        *m = pll->range->min;
 183                        return -ENODATA;
 184                } else if (rate >= pll->range->max * parent_rate) {
 185                        *m = pll->range->max;
 186                        return -ENODATA;
 187                }
 188        }
 189
 190        *m = meson_clk_get_pll_range_m(rate, parent_rate, *n, pll);
 191
 192        /* the pre-divider gives a multiplier too big - stop */
 193        if (*m >= (1 << pll->m.width))
 194                return -EINVAL;
 195
 196        return 0;
 197}
 198
 199static int meson_clk_get_pll_get_index(unsigned long rate,
 200                                       unsigned long parent_rate,
 201                                       unsigned int index,
 202                                       unsigned int *m,
 203                                       unsigned int *n,
 204                                       struct meson_clk_pll_data *pll)
 205{
 206        if (pll->range)
 207                return meson_clk_get_pll_range_index(rate, parent_rate,
 208                                                     index, m, n, pll);
 209        else if (pll->table)
 210                return meson_clk_get_pll_table_index(index, m, n, pll);
 211
 212        return -EINVAL;
 213}
 214
 215static int meson_clk_get_pll_settings(unsigned long rate,
 216                                      unsigned long parent_rate,
 217                                      unsigned int *best_m,
 218                                      unsigned int *best_n,
 219                                      struct meson_clk_pll_data *pll)
 220{
 221        unsigned long best = 0, now = 0;
 222        unsigned int i, m, n;
 223        int ret;
 224
 225        for (i = 0, ret = 0; !ret; i++) {
 226                ret = meson_clk_get_pll_get_index(rate, parent_rate,
 227                                                  i, &m, &n, pll);
 228                if (ret == -EINVAL)
 229                        break;
 230
 231                now = __pll_params_to_rate(parent_rate, m, n, 0, pll);
 232                if (meson_clk_pll_is_better(rate, best, now, pll)) {
 233                        best = now;
 234                        *best_m = m;
 235                        *best_n = n;
 236
 237                        if (now == rate)
 238                                break;
 239                }
 240        }
 241
 242        return best ? 0 : -EINVAL;
 243}
 244
 245static long meson_clk_pll_round_rate(struct clk_hw *hw, unsigned long rate,
 246                                     unsigned long *parent_rate)
 247{
 248        struct clk_regmap *clk = to_clk_regmap(hw);
 249        struct meson_clk_pll_data *pll = meson_clk_pll_data(clk);
 250        unsigned int m, n, frac;
 251        unsigned long round;
 252        int ret;
 253
 254        ret = meson_clk_get_pll_settings(rate, *parent_rate, &m, &n, pll);
 255        if (ret)
 256                return meson_clk_pll_recalc_rate(hw, *parent_rate);
 257
 258        round = __pll_params_to_rate(*parent_rate, m, n, 0, pll);
 259
 260        if (!MESON_PARM_APPLICABLE(&pll->frac) || rate == round)
 261                return round;
 262
 263        /*
 264         * The rate provided by the setting is not an exact match, let's
 265         * try to improve the result using the fractional parameter
 266         */
 267        frac = __pll_params_with_frac(rate, *parent_rate, m, n, pll);
 268
 269        return __pll_params_to_rate(*parent_rate, m, n, frac, pll);
 270}
 271
 272static int meson_clk_pll_wait_lock(struct clk_hw *hw)
 273{
 274        struct clk_regmap *clk = to_clk_regmap(hw);
 275        struct meson_clk_pll_data *pll = meson_clk_pll_data(clk);
 276        int delay = 24000000;
 277
 278        do {
 279                /* Is the clock locked now ? */
 280                if (meson_parm_read(clk->map, &pll->l))
 281                        return 0;
 282
 283                delay--;
 284        } while (delay > 0);
 285
 286        return -ETIMEDOUT;
 287}
 288
 289static int meson_clk_pll_init(struct clk_hw *hw)
 290{
 291        struct clk_regmap *clk = to_clk_regmap(hw);
 292        struct meson_clk_pll_data *pll = meson_clk_pll_data(clk);
 293
 294        if (pll->init_count) {
 295                meson_parm_write(clk->map, &pll->rst, 1);
 296                regmap_multi_reg_write(clk->map, pll->init_regs,
 297                                       pll->init_count);
 298                meson_parm_write(clk->map, &pll->rst, 0);
 299        }
 300
 301        return 0;
 302}
 303
 304static int meson_clk_pll_is_enabled(struct clk_hw *hw)
 305{
 306        struct clk_regmap *clk = to_clk_regmap(hw);
 307        struct meson_clk_pll_data *pll = meson_clk_pll_data(clk);
 308
 309        if (meson_parm_read(clk->map, &pll->rst) ||
 310            !meson_parm_read(clk->map, &pll->en) ||
 311            !meson_parm_read(clk->map, &pll->l))
 312                return 0;
 313
 314        return 1;
 315}
 316
 317static int meson_clk_pcie_pll_enable(struct clk_hw *hw)
 318{
 319        meson_clk_pll_init(hw);
 320
 321        if (meson_clk_pll_wait_lock(hw))
 322                return -EIO;
 323
 324        return 0;
 325}
 326
 327static int meson_clk_pll_enable(struct clk_hw *hw)
 328{
 329        struct clk_regmap *clk = to_clk_regmap(hw);
 330        struct meson_clk_pll_data *pll = meson_clk_pll_data(clk);
 331
 332        /* do nothing if the PLL is already enabled */
 333        if (clk_hw_is_enabled(hw))
 334                return 0;
 335
 336        /* Make sure the pll is in reset */
 337        meson_parm_write(clk->map, &pll->rst, 1);
 338
 339        /* Enable the pll */
 340        meson_parm_write(clk->map, &pll->en, 1);
 341
 342        /* Take the pll out reset */
 343        meson_parm_write(clk->map, &pll->rst, 0);
 344
 345        if (meson_clk_pll_wait_lock(hw))
 346                return -EIO;
 347
 348        return 0;
 349}
 350
 351static void meson_clk_pll_disable(struct clk_hw *hw)
 352{
 353        struct clk_regmap *clk = to_clk_regmap(hw);
 354        struct meson_clk_pll_data *pll = meson_clk_pll_data(clk);
 355
 356        /* Put the pll is in reset */
 357        meson_parm_write(clk->map, &pll->rst, 1);
 358
 359        /* Disable the pll */
 360        meson_parm_write(clk->map, &pll->en, 0);
 361}
 362
 363static int meson_clk_pll_set_rate(struct clk_hw *hw, unsigned long rate,
 364                                  unsigned long parent_rate)
 365{
 366        struct clk_regmap *clk = to_clk_regmap(hw);
 367        struct meson_clk_pll_data *pll = meson_clk_pll_data(clk);
 368        unsigned int enabled, m, n, frac = 0, ret;
 369        unsigned long old_rate;
 370
 371        if (parent_rate == 0 || rate == 0)
 372                return -EINVAL;
 373
 374        old_rate = rate;
 375
 376        ret = meson_clk_get_pll_settings(rate, parent_rate, &m, &n, pll);
 377        if (ret)
 378                return ret;
 379
 380        enabled = meson_parm_read(clk->map, &pll->en);
 381        if (enabled)
 382                meson_clk_pll_disable(hw);
 383
 384        meson_parm_write(clk->map, &pll->n, n);
 385        meson_parm_write(clk->map, &pll->m, m);
 386
 387        if (MESON_PARM_APPLICABLE(&pll->frac)) {
 388                frac = __pll_params_with_frac(rate, parent_rate, m, n, pll);
 389                meson_parm_write(clk->map, &pll->frac, frac);
 390        }
 391
 392        /* If the pll is stopped, bail out now */
 393        if (!enabled)
 394                return 0;
 395
 396        if (meson_clk_pll_enable(hw)) {
 397                pr_warn("%s: pll did not lock, trying to restore old rate %lu\n",
 398                        __func__, old_rate);
 399                /*
 400                 * FIXME: Do we really need/want this HACK ?
 401                 * It looks unsafe. what happens if the clock gets into a
 402                 * broken state and we can't lock back on the old_rate ? Looks
 403                 * like an infinite recursion is possible
 404                 */
 405                meson_clk_pll_set_rate(hw, old_rate, parent_rate);
 406        }
 407
 408        return 0;
 409}
 410
 411/*
 412 * The Meson G12A PCIE PLL is fined tuned to deliver a very precise
 413 * 100MHz reference clock for the PCIe Analog PHY, and thus requires
 414 * a strict register sequence to enable the PLL.
 415 * To simplify, re-use the _init() op to enable the PLL and keep
 416 * the other ops except set_rate since the rate is fixed.
 417 */
 418const struct clk_ops meson_clk_pcie_pll_ops = {
 419        .recalc_rate    = meson_clk_pll_recalc_rate,
 420        .round_rate     = meson_clk_pll_round_rate,
 421        .is_enabled     = meson_clk_pll_is_enabled,
 422        .enable         = meson_clk_pcie_pll_enable,
 423        .disable        = meson_clk_pll_disable
 424};
 425EXPORT_SYMBOL_GPL(meson_clk_pcie_pll_ops);
 426
 427const struct clk_ops meson_clk_pll_ops = {
 428        .init           = meson_clk_pll_init,
 429        .recalc_rate    = meson_clk_pll_recalc_rate,
 430        .round_rate     = meson_clk_pll_round_rate,
 431        .set_rate       = meson_clk_pll_set_rate,
 432        .is_enabled     = meson_clk_pll_is_enabled,
 433        .enable         = meson_clk_pll_enable,
 434        .disable        = meson_clk_pll_disable
 435};
 436EXPORT_SYMBOL_GPL(meson_clk_pll_ops);
 437
 438const struct clk_ops meson_clk_pll_ro_ops = {
 439        .recalc_rate    = meson_clk_pll_recalc_rate,
 440        .is_enabled     = meson_clk_pll_is_enabled,
 441};
 442EXPORT_SYMBOL_GPL(meson_clk_pll_ro_ops);
 443
 444MODULE_DESCRIPTION("Amlogic PLL driver");
 445MODULE_AUTHOR("Carlo Caione <carlo@endlessm.com>");
 446MODULE_AUTHOR("Jerome Brunet <jbrunet@baylibre.com>");
 447MODULE_LICENSE("GPL v2");
 448