drivers/clk/bcm/clk-kona-setup.c

   1 /*
   2  * Copyright (C) 2013 Broadcom Corporation
   3  * Copyright 2013 Linaro Limited
   4  *
   5  * This program is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU General Public License as
   7  * published by the Free Software Foundation version 2.
   8  *
   9  * This program is distributed "as is" WITHOUT ANY WARRANTY of any
  10  * kind, whether express or implied; without even the implied warranty
  11  * of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  */
  14
  15 #include <linux/io.h>
  16 #include <linux/of_address.h>
  17
  18 #include "clk-kona.h"
  19
  20 /* These are used when a selector or trigger is found to be unneeded */
  21 #define selector_clear_exists(sel)      ((sel)->width = 0)
  22 #define trigger_clear_exists(trig)      FLAG_CLEAR(trig, TRIG, EXISTS)
  23
  24 /* Validity checking */
  25
  26 static bool ccu_data_offsets_valid(struct ccu_data *ccu)
  27 {
  28         struct ccu_policy *ccu_policy = &ccu->policy;
  29         u32 limit;
  30
  31         limit = ccu->range - sizeof(u32);
  32         limit = round_down(limit, sizeof(u32));
  33         if (ccu_policy_exists(ccu_policy)) {
  34                 if (ccu_policy->enable.offset > limit) {
  35                         pr_err("%s: bad policy enable offset for %s "
  36                                         "(%u > %u)\n", __func__,
  37                                 ccu->name, ccu_policy->enable.offset, limit);
  38                         return false;
  39                 }
  40                 if (ccu_policy->control.offset > limit) {
  41                         pr_err("%s: bad policy control offset for %s "
  42                                         "(%u > %u)\n", __func__,
  43                                 ccu->name, ccu_policy->control.offset, limit);
  44                         return false;
  45                 }
  46         }
  47
  48         return true;
  49 }
  50
  51 static bool clk_requires_trigger(struct kona_clk *bcm_clk)
  52 {
  53         struct peri_clk_data *peri = bcm_clk->u.peri;
  54         struct bcm_clk_sel *sel;
  55         struct bcm_clk_div *div;
  56
  57         if (bcm_clk->type != bcm_clk_peri)
  58                 return false;
  59
  60         sel = &peri->sel;
  61         if (sel->parent_count && selector_exists(sel))
  62                 return true;
  63
  64         div = &peri->div;
  65         if (!divider_exists(div))
  66                 return false;
  67
  68         /* Fixed dividers don't need triggers */
  69         if (!divider_is_fixed(div))
  70                 return true;
  71
  72         div = &peri->pre_div;
  73
  74         return divider_exists(div) && !divider_is_fixed(div);
  75 }
  76
  77 static bool peri_clk_data_offsets_valid(struct kona_clk *bcm_clk)
  78 {
  79         struct peri_clk_data *peri;
  80         struct bcm_clk_policy *policy;
  81         struct bcm_clk_gate *gate;
  82         struct bcm_clk_hyst *hyst;
  83         struct bcm_clk_div *div;
  84         struct bcm_clk_sel *sel;
  85         struct bcm_clk_trig *trig;
  86         const char *name;
  87         u32 range;
  88         u32 limit;
  89
  90         BUG_ON(bcm_clk->type != bcm_clk_peri);
  91         peri = bcm_clk->u.peri;
  92         name = bcm_clk->init_data.name;
  93         range = bcm_clk->ccu->range;
  94
  95         limit = range - sizeof(u32);
  96         limit = round_down(limit, sizeof(u32));
  97
  98         policy = &peri->policy;
  99         if (policy_exists(policy)) {
 100                 if (policy->offset > limit) {
 101                         pr_err("%s: bad policy offset for %s (%u > %u)\n",
 102                                 __func__, name, policy->offset, limit);
 103                         return false;
 104                 }
 105         }
 106
 107         gate = &peri->gate;
 108         hyst = &peri->hyst;
 109         if (gate_exists(gate)) {
 110                 if (gate->offset > limit) {
 111                         pr_err("%s: bad gate offset for %s (%u > %u)\n",
 112                                 __func__, name, gate->offset, limit);
 113                         return false;
 114                 }
 115
 116                 if (hyst_exists(hyst)) {
 117                         if (hyst->offset > limit) {
 118                                 pr_err("%s: bad hysteresis offset for %s "
 119                                         "(%u > %u)\n", __func__,
 120                                         name, hyst->offset, limit);
 121                                 return false;
 122                         }
 123                 }
 124         } else if (hyst_exists(hyst)) {
 125                 pr_err("%s: hysteresis but no gate for %s\n", __func__, name);
 126                 return false;
 127         }
 128
 129         div = &peri->div;
 130         if (divider_exists(div)) {
 131                 if (div->u.s.offset > limit) {
 132                         pr_err("%s: bad divider offset for %s (%u > %u)\n",
 133                                 __func__, name, div->u.s.offset, limit);
 134                         return false;
 135                 }
 136         }
 137
 138         div = &peri->pre_div;
 139         if (divider_exists(div)) {
 140                 if (div->u.s.offset > limit) {
 141                         pr_err("%s: bad pre-divider offset for %s "
 142                                         "(%u > %u)\n",
 143                                 __func__, name, div->u.s.offset, limit);
 144                         return false;
 145                 }
 146         }
 147
 148         sel = &peri->sel;
 149         if (selector_exists(sel)) {
 150                 if (sel->offset > limit) {
 151                         pr_err("%s: bad selector offset for %s (%u > %u)\n",
 152                                 __func__, name, sel->offset, limit);
 153                         return false;
 154                 }
 155         }
 156
 157         trig = &peri->trig;
 158         if (trigger_exists(trig)) {
 159                 if (trig->offset > limit) {
 160                         pr_err("%s: bad trigger offset for %s (%u > %u)\n",
 161                                 __func__, name, trig->offset, limit);
 162                         return false;
 163                 }
 164         }
 165
 166         trig = &peri->pre_trig;
 167         if (trigger_exists(trig)) {
 168                 if (trig->offset > limit) {
 169                         pr_err("%s: bad pre-trigger offset for %s (%u > %u)\n",
 170                                 __func__, name, trig->offset, limit);
 171                         return false;
 172                 }
 173         }
 174
 175         return true;
 176 }
 177
 178 /* A bit position must be less than the number of bits in a 32-bit register. */
 179 static bool bit_posn_valid(u32 bit_posn, const char *field_name,
 180                         const char *clock_name)
 181 {
 182         u32 limit = BITS_PER_BYTE * sizeof(u32) - 1;
 183
 184         if (bit_posn > limit) {
 185                 pr_err("%s: bad %s bit for %s (%u > %u)\n", __func__,
 186                         field_name, clock_name, bit_posn, limit);
 187                 return false;
 188         }
 189         return true;
 190 }
 191
 192 /*
 193  * A bitfield must be at least 1 bit wide.  Both the low-order and
 194  * high-order bits must lie within a 32-bit register.  We require
 195  * fields to be less than 32 bits wide, mainly because we use
 196  * shifting to produce field masks, and shifting a full word width
 197  * is not well-defined by the C standard.
 198  */
 199 static bool bitfield_valid(u32 shift, u32 width, const char *field_name,
 200                         const char *clock_name)
 201 {
 202         u32 limit = BITS_PER_BYTE * sizeof(u32);
 203
 204         if (!width) {
 205                 pr_err("%s: bad %s field width 0 for %s\n", __func__,
 206                         field_name, clock_name);
 207                 return false;
 208         }
 209         if (shift + width > limit) {
 210                 pr_err("%s: bad %s for %s (%u + %u > %u)\n", __func__,
 211                         field_name, clock_name, shift, width, limit);
 212                 return false;
 213         }
 214         return true;
 215 }
 216
 217 static bool
 218 ccu_policy_valid(struct ccu_policy *ccu_policy, const char *ccu_name)
 219 {
 220         struct bcm_lvm_en *enable = &ccu_policy->enable;
 221         struct bcm_policy_ctl *control;
 222
 223         if (!bit_posn_valid(enable->bit, "policy enable", ccu_name))
 224                 return false;
 225
 226         control = &ccu_policy->control;
 227         if (!bit_posn_valid(control->go_bit, "policy control GO", ccu_name))
 228                 return false;
 229
 230         if (!bit_posn_valid(control->atl_bit, "policy control ATL", ccu_name))
 231                 return false;
 232
 233         if (!bit_posn_valid(control->ac_bit, "policy control AC", ccu_name))
 234                 return false;
 235
 236         return true;
 237 }
 238
 239 static bool policy_valid(struct bcm_clk_policy *policy, const char *clock_name)
 240 {
 241         if (!bit_posn_valid(policy->bit, "policy", clock_name))
 242                 return false;
 243
 244         return true;
 245 }
 246
 247 /*
 248  * All gates, if defined, have a status bit, and for hardware-only
 249  * gates, that's it.  Gates that can be software controlled also
 250  * have an enable bit.  And a gate that can be hardware or software
 251  * controlled will have a hardware/software select bit.
 252  */
 253 static bool gate_valid(struct bcm_clk_gate *gate, const char *field_name,
 254                         const char *clock_name)
 255 {
 256         if (!bit_posn_valid(gate->status_bit, "gate status", clock_name))
 257                 return false;
 258
 259         if (gate_is_sw_controllable(gate)) {
 260                 if (!bit_posn_valid(gate->en_bit, "gate enable", clock_name))
 261                         return false;
 262
 263                 if (gate_is_hw_controllable(gate)) {
 264                         if (!bit_posn_valid(gate->hw_sw_sel_bit,
 265                                                 "gate hw/sw select",
 266                                                 clock_name))
 267                                 return false;
 268                 }
 269         } else {
 270                 BUG_ON(!gate_is_hw_controllable(gate));
 271         }
 272
 273         return true;
 274 }
 275
 276 static bool hyst_valid(struct bcm_clk_hyst *hyst, const char *clock_name)
 277 {
 278         if (!bit_posn_valid(hyst->en_bit, "hysteresis enable", clock_name))
 279                 return false;
 280
 281         if (!bit_posn_valid(hyst->val_bit, "hysteresis value", clock_name))
 282                 return false;
 283
 284         return true;
 285 }
 286
 287 /*
 288  * A selector bitfield must be valid.  Its parent_sel array must
 289  * also be reasonable for the field.
 290  */
 291 static bool sel_valid(struct bcm_clk_sel *sel, const char *field_name,
 292                         const char *clock_name)
 293 {
 294         if (!bitfield_valid(sel->shift, sel->width, field_name, clock_name))
 295                 return false;
 296
 297         if (sel->parent_count) {
 298                 u32 max_sel;
 299                 u32 limit;
 300
 301                 /*
 302                  * Make sure the selector field can hold all the
 303                  * selector values we expect to be able to use.  A
 304                  * clock only needs to have a selector defined if it
 305                  * has more than one parent.  And in that case the
 306                  * highest selector value will be in the last entry
 307                  * in the array.
 308                  */
 309                 max_sel = sel->parent_sel[sel->parent_count - 1];
 310                 limit = (1 << sel->width) - 1;
 311                 if (max_sel > limit) {
 312                         pr_err("%s: bad selector for %s "
 313                                         "(%u needs > %u bits)\n",
 314                                 __func__, clock_name, max_sel,
 315                                 sel->width);
 316                         return false;
 317                 }
 318         } else {
 319                 pr_warn("%s: ignoring selector for %s (no parents)\n",
 320                         __func__, clock_name);
 321                 selector_clear_exists(sel);
 322                 kfree(sel->parent_sel);
 323                 sel->parent_sel = NULL;
 324         }
 325
 326         return true;
 327 }
 328
 329 /*
 330  * A fixed divider just needs to be non-zero.  A variable divider
 331  * has to have a valid divider bitfield, and if it has a fraction,
 332  * the width of the fraction must not be no more than the width of
 333  * the divider as a whole.
 334  */
 335 static bool div_valid(struct bcm_clk_div *div, const char *field_name,
 336                         const char *clock_name)
 337 {
 338         if (divider_is_fixed(div)) {
 339                 /* Any fixed divider value but 0 is OK */
 340                 if (div->u.fixed == 0) {
 341                         pr_err("%s: bad %s fixed value 0 for %s\n", __func__,
 342                                 field_name, clock_name);
 343                         return false;
 344                 }
 345                 return true;
 346         }
 347         if (!bitfield_valid(div->u.s.shift, div->u.s.width,
 348                                 field_name, clock_name))
 349                 return false;
 350
 351         if (divider_has_fraction(div))
 352                 if (div->u.s.frac_width > div->u.s.width) {
 353                         pr_warn("%s: bad %s fraction width for %s (%u > %u)\n",
 354                                 __func__, field_name, clock_name,
 355                                 div->u.s.frac_width, div->u.s.width);
 356                         return false;
 357                 }
 358
 359         return true;
 360 }
 361
 362 /*
 363  * If a clock has two dividers, the combined number of fractional
 364  * bits must be representable in a 32-bit unsigned value.  This
 365  * is because we scale up a dividend using both dividers before
 366  * dividing to improve accuracy, and we need to avoid overflow.
 367  */
 368 static bool kona_dividers_valid(struct kona_clk *bcm_clk)
 369 {
 370         struct peri_clk_data *peri = bcm_clk->u.peri;
 371         struct bcm_clk_div *div;
 372         struct bcm_clk_div *pre_div;
 373         u32 limit;
 374
 375         BUG_ON(bcm_clk->type != bcm_clk_peri);
 376
 377         if (!divider_exists(&peri->div) || !divider_exists(&peri->pre_div))
 378                 return true;
 379
 380         div = &peri->div;
 381         pre_div = &peri->pre_div;
 382         if (divider_is_fixed(div) || divider_is_fixed(pre_div))
 383                 return true;
 384
 385         limit = BITS_PER_BYTE * sizeof(u32);
 386
 387         return div->u.s.frac_width + pre_div->u.s.frac_width <= limit;
 388 }
 389
 390
 391 /* A trigger just needs to represent a valid bit position */
 392 static bool trig_valid(struct bcm_clk_trig *trig, const char *field_name,
 393                         const char *clock_name)
 394 {
 395         return bit_posn_valid(trig->bit, field_name, clock_name);
 396 }
 397
 398 /* Determine whether the set of peripheral clock registers are valid. */
 399 static bool
 400 peri_clk_data_valid(struct kona_clk *bcm_clk)
 401 {
 402         struct peri_clk_data *peri;
 403         struct bcm_clk_policy *policy;
 404         struct bcm_clk_gate *gate;
 405         struct bcm_clk_hyst *hyst;
 406         struct bcm_clk_sel *sel;
 407         struct bcm_clk_div *div;
 408         struct bcm_clk_div *pre_div;
 409         struct bcm_clk_trig *trig;
 410         const char *name;
 411
 412         BUG_ON(bcm_clk->type != bcm_clk_peri);
 413
 414         /*
 415          * First validate register offsets.  This is the only place
 416          * where we need something from the ccu, so we do these
 417          * together.
 418          */
 419         if (!peri_clk_data_offsets_valid(bcm_clk))
 420                 return false;
 421
 422         peri = bcm_clk->u.peri;
 423         name = bcm_clk->init_data.name;
 424
 425         policy = &peri->policy;
 426         if (policy_exists(policy) && !policy_valid(policy, name))
 427                 return false;
 428
 429         gate = &peri->gate;
 430         if (gate_exists(gate) && !gate_valid(gate, "gate", name))
 431                 return false;
 432
 433         hyst = &peri->hyst;
 434         if (hyst_exists(hyst) && !hyst_valid(hyst, name))
 435                 return false;
 436
 437         sel = &peri->sel;
 438         if (selector_exists(sel)) {
 439                 if (!sel_valid(sel, "selector", name))
 440                         return false;
 441
 442         } else if (sel->parent_count > 1) {
 443                 pr_err("%s: multiple parents but no selector for %s\n",
 444                         __func__, name);
 445
 446                 return false;
 447         }
 448
 449         div = &peri->div;
 450         pre_div = &peri->pre_div;
 451         if (divider_exists(div)) {
 452                 if (!div_valid(div, "divider", name))
 453                         return false;
 454
 455                 if (divider_exists(pre_div))
 456                         if (!div_valid(pre_div, "pre-divider", name))
 457                                 return false;
 458         } else if (divider_exists(pre_div)) {
 459                 pr_err("%s: pre-divider but no divider for %s\n", __func__,
 460                         name);
 461                 return false;
 462         }
 463
 464         trig = &peri->trig;
 465         if (trigger_exists(trig)) {
 466                 if (!trig_valid(trig, "trigger", name))
 467                         return false;
 468
 469                 if (trigger_exists(&peri->pre_trig)) {
 470                         if (!trig_valid(trig, "pre-trigger", name)) {
 471                                 return false;
 472                         }
 473                 }
 474                 if (!clk_requires_trigger(bcm_clk)) {
 475                         pr_warn("%s: ignoring trigger for %s (not needed)\n",
 476                                 __func__, name);
 477                         trigger_clear_exists(trig);
 478                 }
 479         } else if (trigger_exists(&peri->pre_trig)) {
 480                 pr_err("%s: pre-trigger but no trigger for %s\n", __func__,
 481                         name);
 482                 return false;
 483         } else if (clk_requires_trigger(bcm_clk)) {
 484                 pr_err("%s: required trigger missing for %s\n", __func__,
 485                         name);
 486                 return false;
 487         }
 488
 489         return kona_dividers_valid(bcm_clk);
 490 }
 491
 492 static bool kona_clk_valid(struct kona_clk *bcm_clk)
 493 {
 494         switch (bcm_clk->type) {
 495         case bcm_clk_peri:
 496                 if (!peri_clk_data_valid(bcm_clk))
 497                         return false;
 498                 break;
 499         default:
 500                 pr_err("%s: unrecognized clock type (%d)\n", __func__,
 501                         (int)bcm_clk->type);
 502                 return false;
 503         }
 504         return true;
 505 }
 506
 507 /*
 508  * Scan an array of parent clock names to determine whether there
 509  * are any entries containing BAD_CLK_NAME.  Such entries are
 510  * placeholders for non-supported clocks.  Keep track of the
 511  * position of each clock name in the original array.
 512  *
 513  * Allocates an array of pointers to to hold the names of all
 514  * non-null entries in the original array, and returns a pointer to
 515  * that array in *names.  This will be used for registering the
 516  * clock with the common clock code.  On successful return,
 517  * *count indicates how many entries are in that names array.
 518  *
 519  * If there is more than one entry in the resulting names array,
 520  * another array is allocated to record the parent selector value
 521  * for each (defined) parent clock.  This is the value that
 522  * represents this parent clock in the clock's source selector
 523  * register.  The position of the clock in the original parent array
 524  * defines that selector value.  The number of entries in this array
 525  * is the same as the number of entries in the parent names array.
 526  *
 527  * The array of selector values is returned.  If the clock has no
 528  * parents, no selector is required and a null pointer is returned.
 529  *
 530  * Returns a null pointer if the clock names array supplied was
 531  * null.  (This is not an error.)
 532  *
 533  * Returns a pointer-coded error if an error occurs.
 534  */
 535 static u32 *parent_process(const char *clocks[],
 536                         u32 *count, const char ***names)
 537 {
 538         static const char **parent_names;
 539         static u32 *parent_sel;
 540         const char **clock;
 541         u32 parent_count;
 542         u32 bad_count = 0;
 543         u32 orig_count;
 544         u32 i;
 545         u32 j;
 546
 547         *count = 0;     /* In case of early return */
 548         *names = NULL;
 549         if (!clocks)
 550                 return NULL;
 551
 552         /*
 553          * Count the number of names in the null-terminated array,
 554          * and find out how many of those are actually clock names.
 555          */
 556         for (clock = clocks; *clock; clock++)
 557                 if (*clock == BAD_CLK_NAME)
 558                         bad_count++;
 559         orig_count = (u32)(clock - clocks);
 560         parent_count = orig_count - bad_count;
 561
 562         /* If all clocks are unsupported, we treat it as no clock */
 563         if (!parent_count)
 564                 return NULL;
 565
 566         /* Avoid exceeding our parent clock limit */
 567         if (parent_count > PARENT_COUNT_MAX) {
 568                 pr_err("%s: too many parents (%u > %u)\n", __func__,
 569                         parent_count, PARENT_COUNT_MAX);
 570                 return ERR_PTR(-EINVAL);
 571         }
 572
 573         /*
 574          * There is one parent name for each defined parent clock.
 575          * We also maintain an array containing the selector value
 576          * for each defined clock.  If there's only one clock, the
 577          * selector is not required, but we allocate space for the
 578          * array anyway to keep things simple.
 579          */
 580         parent_names = kmalloc_array(parent_count, sizeof(*parent_names),
 581                                GFP_KERNEL);
 582         if (!parent_names) {
 583                 pr_err("%s: error allocating %u parent names\n", __func__,
 584                                 parent_count);
 585                 return ERR_PTR(-ENOMEM);
 586         }
 587
 588         /* There is at least one parent, so allocate a selector array */
 589
 590         parent_sel = kmalloc(parent_count * sizeof(*parent_sel), GFP_KERNEL);
 591         if (!parent_sel) {
 592                 pr_err("%s: error allocating %u parent selectors\n", __func__,
 593                                 parent_count);
 594                 kfree(parent_names);
 595
 596                 return ERR_PTR(-ENOMEM);
 597         }
 598
 599         /* Now fill in the parent names and selector arrays */
 600         for (i = 0, j = 0; i < orig_count; i++) {
 601                 if (clocks[i] != BAD_CLK_NAME) {
 602                         parent_names[j] = clocks[i];
 603                         parent_sel[j] = i;
 604                         j++;
 605                 }
 606         }
 607         *names = parent_names;
 608         *count = parent_count;
 609
 610         return parent_sel;
 611 }
 612
 613 static int
 614 clk_sel_setup(const char **clocks, struct bcm_clk_sel *sel,
 615                 struct clk_init_data *init_data)
 616 {
 617         const char **parent_names = NULL;
 618         u32 parent_count = 0;
 619         u32 *parent_sel;
 620
 621         /*
 622          * If a peripheral clock has multiple parents, the value
 623          * used by the hardware to select that parent is represented
 624          * by the parent clock's position in the "clocks" list.  Some
 625          * values don't have defined or supported clocks; these will
 626          * have BAD_CLK_NAME entries in the parents[] array.  The
 627          * list is terminated by a NULL entry.
 628          *
 629          * We need to supply (only) the names of defined parent
 630          * clocks when registering a clock though, so we use an
 631          * array of parent selector values to map between the
 632          * indexes the common clock code uses and the selector
 633          * values we need.
 634          */
 635         parent_sel = parent_process(clocks, &parent_count, &parent_names);
 636         if (IS_ERR(parent_sel)) {
 637                 int ret = PTR_ERR(parent_sel);
 638
 639                 pr_err("%s: error processing parent clocks for %s (%d)\n",
 640                         __func__, init_data->name, ret);
 641
 642                 return ret;
 643         }
 644
 645         init_data->parent_names = parent_names;
 646         init_data->num_parents = parent_count;
 647
 648         sel->parent_count = parent_count;
 649         sel->parent_sel = parent_sel;
 650
 651         return 0;
 652 }
 653
 654 static void clk_sel_teardown(struct bcm_clk_sel *sel,
 655                 struct clk_init_data *init_data)
 656 {
 657         kfree(sel->parent_sel);
 658         sel->parent_sel = NULL;
 659         sel->parent_count = 0;
 660
 661         init_data->num_parents = 0;
 662         kfree(init_data->parent_names);
 663         init_data->parent_names = NULL;
 664 }
 665
 666 static void peri_clk_teardown(struct peri_clk_data *data,
 667                                 struct clk_init_data *init_data)
 668 {
 669         clk_sel_teardown(&data->sel, init_data);
 670 }
 671
 672 /*
 673  * Caller is responsible for freeing the parent_names[] and
 674  * parent_sel[] arrays in the peripheral clock's "data" structure
 675  * that can be assigned if the clock has one or more parent clocks
 676  * associated with it.
 677  */
 678 static int
 679 peri_clk_setup(struct peri_clk_data *data, struct clk_init_data *init_data)
 680 {
 681         init_data->flags = CLK_IGNORE_UNUSED;
 682
 683         return clk_sel_setup(data->clocks, &data->sel, init_data);
 684 }
 685
 686 static void bcm_clk_teardown(struct kona_clk *bcm_clk)
 687 {
 688         switch (bcm_clk->type) {
 689         case bcm_clk_peri:
 690                 peri_clk_teardown(bcm_clk->u.data, &bcm_clk->init_data);
 691                 break;
 692         default:
 693                 break;
 694         }
 695         bcm_clk->u.data = NULL;
 696         bcm_clk->type = bcm_clk_none;
 697 }
 698
 699 static void kona_clk_teardown(struct clk *clk)
 700 {
 701         struct clk_hw *hw;
 702         struct kona_clk *bcm_clk;
 703
 704         if (!clk)
 705                 return;
 706
 707         hw = __clk_get_hw(clk);
 708         if (!hw) {
 709                 pr_err("%s: clk %p has null hw pointer\n", __func__, clk);
 710                 return;
 711         }
 712         clk_unregister(clk);
 713
 714         bcm_clk = to_kona_clk(hw);
 715         bcm_clk_teardown(bcm_clk);
 716 }
 717
 718 struct clk *kona_clk_setup(struct kona_clk *bcm_clk)
 719 {
 720         struct clk_init_data *init_data = &bcm_clk->init_data;
 721         struct clk *clk = NULL;
 722
 723         switch (bcm_clk->type) {
 724         case bcm_clk_peri:
 725                 if (peri_clk_setup(bcm_clk->u.data, init_data))
 726                         return NULL;
 727                 break;
 728         default:
 729                 pr_err("%s: clock type %d invalid for %s\n", __func__,
 730                         (int)bcm_clk->type, init_data->name);
 731                 return NULL;
 732         }
 733
 734         /* Make sure everything makes sense before we set it up */
 735         if (!kona_clk_valid(bcm_clk)) {
 736                 pr_err("%s: clock data invalid for %s\n", __func__,
 737                         init_data->name);
 738                 goto out_teardown;
 739         }
 740
 741         bcm_clk->hw.init = init_data;
 742         clk = clk_register(NULL, &bcm_clk->hw);
 743         if (IS_ERR(clk)) {
 744                 pr_err("%s: error registering clock %s (%ld)\n", __func__,
 745                         init_data->name, PTR_ERR(clk));
 746                 goto out_teardown;
 747         }
 748         BUG_ON(!clk);
 749
 750         return clk;
 751 out_teardown:
 752         bcm_clk_teardown(bcm_clk);
 753
 754         return NULL;
 755 }
 756
 757 static void ccu_clks_teardown(struct ccu_data *ccu)
 758 {
 759         u32 i;
 760
 761         for (i = 0; i < ccu->clk_data.clk_num; i++)
 762                 kona_clk_teardown(ccu->clk_data.clks[i]);
 763         kfree(ccu->clk_data.clks);
 764 }
 765
 766 static void kona_ccu_teardown(struct ccu_data *ccu)
 767 {
 768         kfree(ccu->clk_data.clks);
 769         ccu->clk_data.clks = NULL;
 770         if (!ccu->base)
 771                 return;
 772
 773         of_clk_del_provider(ccu->node); /* safe if never added */
 774         ccu_clks_teardown(ccu);
 775         of_node_put(ccu->node);
 776         ccu->node = NULL;
 777         iounmap(ccu->base);
 778         ccu->base = NULL;
 779 }
 780
 781 static bool ccu_data_valid(struct ccu_data *ccu)
 782 {
 783         struct ccu_policy *ccu_policy;
 784
 785         if (!ccu_data_offsets_valid(ccu))
 786                 return false;
 787
 788         ccu_policy = &ccu->policy;
 789         if (ccu_policy_exists(ccu_policy))
 790                 if (!ccu_policy_valid(ccu_policy, ccu->name))
 791                         return false;
 792
 793         return true;
 794 }
 795
 796 /*
 797  * Set up a CCU.  Call the provided ccu_clks_setup callback to
 798  * initialize the array of clocks provided by the CCU.
 799  */
 800 void __init kona_dt_ccu_setup(struct ccu_data *ccu,
 801                         struct device_node *node)
 802 {
 803         struct resource res = { 0 };
 804         resource_size_t range;
 805         unsigned int i;
 806         int ret;
 807
 808         if (ccu->clk_data.clk_num) {
 809                 size_t size;
 810
 811                 size = ccu->clk_data.clk_num * sizeof(*ccu->clk_data.clks);
 812                 ccu->clk_data.clks = kzalloc(size, GFP_KERNEL);
 813                 if (!ccu->clk_data.clks) {
 814                         pr_err("%s: unable to allocate %u clocks for %s\n",
 815                                 __func__, ccu->clk_data.clk_num, node->name);
 816                         return;
 817                 }
 818         }
 819
 820         ret = of_address_to_resource(node, 0, &res);
 821         if (ret) {
 822                 pr_err("%s: no valid CCU registers found for %s\n", __func__,
 823                         node->name);
 824                 goto out_err;
 825         }
 826
 827         range = resource_size(&res);
 828         if (range > (resource_size_t)U32_MAX) {
 829                 pr_err("%s: address range too large for %s\n", __func__,
 830                         node->name);
 831                 goto out_err;
 832         }
 833
 834         ccu->range = (u32)range;
 835
 836         if (!ccu_data_valid(ccu)) {
 837                 pr_err("%s: ccu data not valid for %s\n", __func__, node->name);
 838                 goto out_err;
 839         }
 840
 841         ccu->base = ioremap(res.start, ccu->range);
 842         if (!ccu->base) {
 843                 pr_err("%s: unable to map CCU registers for %s\n", __func__,
 844                         node->name);
 845                 goto out_err;
 846         }
 847         ccu->node = of_node_get(node);
 848
 849         /*
 850          * Set up each defined kona clock and save the result in
 851          * the clock framework clock array (in ccu->data).  Then
 852          * register as a provider for these clocks.
 853          */
 854         for (i = 0; i < ccu->clk_data.clk_num; i++) {
 855                 if (!ccu->kona_clks[i].ccu)
 856                         continue;
 857                 ccu->clk_data.clks[i] = kona_clk_setup(&ccu->kona_clks[i]);
 858         }
 859
 860         ret = of_clk_add_provider(node, of_clk_src_onecell_get, &ccu->clk_data);
 861         if (ret) {
 862                 pr_err("%s: error adding ccu %s as provider (%d)\n", __func__,
 863                                 node->name, ret);
 864                 goto out_err;
 865         }
 866
 867         if (!kona_ccu_init(ccu))
 868                 pr_err("Broadcom %s initialization had errors\n", node->name);
 869
 870         return;
 871 out_err:
 872         kona_ccu_teardown(ccu);
 873         pr_err("Broadcom %s setup aborted\n", node->name);
 874 }