release/src-rt-6.x.4708/linux/linux-2.6.36/arch/arm/mach-omap1/clock.c

   1 /*
   2  *  linux/arch/arm/mach-omap1/clock.c
   3  *
   4  *  Copyright (C) 2004 - 2005, 2009-2010 Nokia Corporation
   5  *  Written by Tuukka Tikkanen <tuukka.tikkanen@elektrobit.com>
   6  *
   7  *  Modified to use omap shared clock framework by
   8  *  Tony Lindgren <tony@atomide.com>
   9  *
  10  * This program is free software; you can redistribute it and/or modify
  11  * it under the terms of the GNU General Public License version 2 as
  12  * published by the Free Software Foundation.
  13  */
  14 #include <linux/kernel.h>
  15 #include <linux/list.h>
  16 #include <linux/errno.h>
  17 #include <linux/err.h>
  18 #include <linux/clk.h>
  19 #include <linux/io.h>
  20
  21 #include <asm/mach-types.h>
  22 #include <asm/clkdev.h>
  23
  24 #include <plat/cpu.h>
  25 #include <plat/usb.h>
  26 #include <plat/clock.h>
  27 #include <plat/sram.h>
  28 #include <plat/clkdev_omap.h>
  29
  30 #include "clock.h"
  31 #include "opp.h"
  32
  33 __u32 arm_idlect1_mask;
  34 struct clk *api_ck_p, *ck_dpll1_p, *ck_ref_p;
  35
  36 /*
  37  * Omap1 specific clock functions
  38  */
  39
  40 unsigned long omap1_uart_recalc(struct clk *clk)
  41 {
  42         unsigned int val = __raw_readl(clk->enable_reg);
  43         return val & clk->enable_bit ? 48000000 : 12000000;
  44 }
  45
  46 unsigned long omap1_sossi_recalc(struct clk *clk)
  47 {
  48         u32 div = omap_readl(MOD_CONF_CTRL_1);
  49
  50         div = (div >> 17) & 0x7;
  51         div++;
  52
  53         return clk->parent->rate / div;
  54 }
  55
  56 static void omap1_clk_allow_idle(struct clk *clk)
  57 {
  58         struct arm_idlect1_clk * iclk = (struct arm_idlect1_clk *)clk;
  59
  60         if (!(clk->flags & CLOCK_IDLE_CONTROL))
  61                 return;
  62
  63         if (iclk->no_idle_count > 0 && !(--iclk->no_idle_count))
  64                 arm_idlect1_mask |= 1 << iclk->idlect_shift;
  65 }
  66
  67 static void omap1_clk_deny_idle(struct clk *clk)
  68 {
  69         struct arm_idlect1_clk * iclk = (struct arm_idlect1_clk *)clk;
  70
  71         if (!(clk->flags & CLOCK_IDLE_CONTROL))
  72                 return;
  73
  74         if (iclk->no_idle_count++ == 0)
  75                 arm_idlect1_mask &= ~(1 << iclk->idlect_shift);
  76 }
  77
  78 static __u16 verify_ckctl_value(__u16 newval)
  79 {
  80         /* This function checks for following limitations set
  81          * by the hardware (all conditions must be true):
  82          * DSPMMU_CK == DSP_CK  or  DSPMMU_CK == DSP_CK/2
  83          * ARM_CK >= TC_CK
  84          * DSP_CK >= TC_CK
  85          * DSPMMU_CK >= TC_CK
  86          *
  87          * In addition following rules are enforced:
  88          * LCD_CK <= TC_CK
  89          * ARMPER_CK <= TC_CK
  90          *
  91          * However, maximum frequencies are not checked for!
  92          */
  93         __u8 per_exp;
  94         __u8 lcd_exp;
  95         __u8 arm_exp;
  96         __u8 dsp_exp;
  97         __u8 tc_exp;
  98         __u8 dspmmu_exp;
  99
 100         per_exp = (newval >> CKCTL_PERDIV_OFFSET) & 3;
 101         lcd_exp = (newval >> CKCTL_LCDDIV_OFFSET) & 3;
 102         arm_exp = (newval >> CKCTL_ARMDIV_OFFSET) & 3;
 103         dsp_exp = (newval >> CKCTL_DSPDIV_OFFSET) & 3;
 104         tc_exp = (newval >> CKCTL_TCDIV_OFFSET) & 3;
 105         dspmmu_exp = (newval >> CKCTL_DSPMMUDIV_OFFSET) & 3;
 106
 107         if (dspmmu_exp < dsp_exp)
 108                 dspmmu_exp = dsp_exp;
 109         if (dspmmu_exp > dsp_exp+1)
 110                 dspmmu_exp = dsp_exp+1;
 111         if (tc_exp < arm_exp)
 112                 tc_exp = arm_exp;
 113         if (tc_exp < dspmmu_exp)
 114                 tc_exp = dspmmu_exp;
 115         if (tc_exp > lcd_exp)
 116                 lcd_exp = tc_exp;
 117         if (tc_exp > per_exp)
 118                 per_exp = tc_exp;
 119
 120         newval &= 0xf000;
 121         newval |= per_exp << CKCTL_PERDIV_OFFSET;
 122         newval |= lcd_exp << CKCTL_LCDDIV_OFFSET;
 123         newval |= arm_exp << CKCTL_ARMDIV_OFFSET;
 124         newval |= dsp_exp << CKCTL_DSPDIV_OFFSET;
 125         newval |= tc_exp << CKCTL_TCDIV_OFFSET;
 126         newval |= dspmmu_exp << CKCTL_DSPMMUDIV_OFFSET;
 127
 128         return newval;
 129 }
 130
 131 static int calc_dsor_exp(struct clk *clk, unsigned long rate)
 132 {
 133         /* Note: If target frequency is too low, this function will return 4,
 134          * which is invalid value. Caller must check for this value and act
 135          * accordingly.
 136          *
 137          * Note: This function does not check for following limitations set
 138          * by the hardware (all conditions must be true):
 139          * DSPMMU_CK == DSP_CK  or  DSPMMU_CK == DSP_CK/2
 140          * ARM_CK >= TC_CK
 141          * DSP_CK >= TC_CK
 142          * DSPMMU_CK >= TC_CK
 143          */
 144         unsigned long realrate;
 145         struct clk * parent;
 146         unsigned  dsor_exp;
 147
 148         parent = clk->parent;
 149         if (unlikely(parent == NULL))
 150                 return -EIO;
 151
 152         realrate = parent->rate;
 153         for (dsor_exp=0; dsor_exp<4; dsor_exp++) {
 154                 if (realrate <= rate)
 155                         break;
 156
 157                 realrate /= 2;
 158         }
 159
 160         return dsor_exp;
 161 }
 162
 163 unsigned long omap1_ckctl_recalc(struct clk *clk)
 164 {
 165         /* Calculate divisor encoded as 2-bit exponent */
 166         int dsor = 1 << (3 & (omap_readw(ARM_CKCTL) >> clk->rate_offset));
 167
 168         return clk->parent->rate / dsor;
 169 }
 170
 171 unsigned long omap1_ckctl_recalc_dsp_domain(struct clk *clk)
 172 {
 173         int dsor;
 174
 175         /* Calculate divisor encoded as 2-bit exponent
 176          *
 177          * The clock control bits are in DSP domain,
 178          * so api_ck is needed for access.
 179          * Note that DSP_CKCTL virt addr = phys addr, so
 180          * we must use __raw_readw() instead of omap_readw().
 181          */
 182         omap1_clk_enable(api_ck_p);
 183         dsor = 1 << (3 & (__raw_readw(DSP_CKCTL) >> clk->rate_offset));
 184         omap1_clk_disable(api_ck_p);
 185
 186         return clk->parent->rate / dsor;
 187 }
 188
 189 /* MPU virtual clock functions */
 190 int omap1_select_table_rate(struct clk *clk, unsigned long rate)
 191 {
 192         /* Find the highest supported frequency <= rate and switch to it */
 193         struct mpu_rate * ptr;
 194         unsigned long dpll1_rate, ref_rate;
 195
 196         dpll1_rate = ck_dpll1_p->rate;
 197         ref_rate = ck_ref_p->rate;
 198
 199         for (ptr = omap1_rate_table; ptr->rate; ptr++) {
 200                 if (ptr->xtal != ref_rate)
 201                         continue;
 202
 203                 /* DPLL1 cannot be reprogrammed without risking system crash */
 204                 if (likely(dpll1_rate != 0) && ptr->pll_rate != dpll1_rate)
 205                         continue;
 206
 207                 /* Can check only after xtal frequency check */
 208                 if (ptr->rate <= rate)
 209                         break;
 210         }
 211
 212         if (!ptr->rate)
 213                 return -EINVAL;
 214
 215         /*
 216          * In most cases we should not need to reprogram DPLL.
 217          * Reprogramming the DPLL is tricky, it must be done from SRAM.
 218          * (on 730, bit 13 must always be 1)
 219          */
 220         if (cpu_is_omap7xx())
 221                 omap_sram_reprogram_clock(ptr->dpllctl_val, ptr->ckctl_val | 0x2000);
 222         else
 223                 omap_sram_reprogram_clock(ptr->dpllctl_val, ptr->ckctl_val);
 224
 225         ck_dpll1_p->rate = ptr->pll_rate;
 226
 227         return 0;
 228 }
 229
 230 int omap1_clk_set_rate_dsp_domain(struct clk *clk, unsigned long rate)
 231 {
 232         int dsor_exp;
 233         u16 regval;
 234
 235         dsor_exp = calc_dsor_exp(clk, rate);
 236         if (dsor_exp > 3)
 237                 dsor_exp = -EINVAL;
 238         if (dsor_exp < 0)
 239                 return dsor_exp;
 240
 241         regval = __raw_readw(DSP_CKCTL);
 242         regval &= ~(3 << clk->rate_offset);
 243         regval |= dsor_exp << clk->rate_offset;
 244         __raw_writew(regval, DSP_CKCTL);
 245         clk->rate = clk->parent->rate / (1 << dsor_exp);
 246
 247         return 0;
 248 }
 249
 250 long omap1_clk_round_rate_ckctl_arm(struct clk *clk, unsigned long rate)
 251 {
 252         int dsor_exp = calc_dsor_exp(clk, rate);
 253         if (dsor_exp < 0)
 254                 return dsor_exp;
 255         if (dsor_exp > 3)
 256                 dsor_exp = 3;
 257         return clk->parent->rate / (1 << dsor_exp);
 258 }
 259
 260 int omap1_clk_set_rate_ckctl_arm(struct clk *clk, unsigned long rate)
 261 {
 262         int dsor_exp;
 263         u16 regval;
 264
 265         dsor_exp = calc_dsor_exp(clk, rate);
 266         if (dsor_exp > 3)
 267                 dsor_exp = -EINVAL;
 268         if (dsor_exp < 0)
 269                 return dsor_exp;
 270
 271         regval = omap_readw(ARM_CKCTL);
 272         regval &= ~(3 << clk->rate_offset);
 273         regval |= dsor_exp << clk->rate_offset;
 274         regval = verify_ckctl_value(regval);
 275         omap_writew(regval, ARM_CKCTL);
 276         clk->rate = clk->parent->rate / (1 << dsor_exp);
 277         return 0;
 278 }
 279
 280 long omap1_round_to_table_rate(struct clk *clk, unsigned long rate)
 281 {
 282         /* Find the highest supported frequency <= rate */
 283         struct mpu_rate * ptr;
 284         long highest_rate;
 285         unsigned long ref_rate;
 286
 287         ref_rate = ck_ref_p->rate;
 288
 289         highest_rate = -EINVAL;
 290
 291         for (ptr = omap1_rate_table; ptr->rate; ptr++) {
 292                 if (ptr->xtal != ref_rate)
 293                         continue;
 294
 295                 highest_rate = ptr->rate;
 296
 297                 /* Can check only after xtal frequency check */
 298                 if (ptr->rate <= rate)
 299                         break;
 300         }
 301
 302         return highest_rate;
 303 }
 304
 305 static unsigned calc_ext_dsor(unsigned long rate)
 306 {
 307         unsigned dsor;
 308
 309         /* MCLK and BCLK divisor selection is not linear:
 310          * freq = 96MHz / dsor
 311          *
 312          * RATIO_SEL range: dsor <-> RATIO_SEL
 313          * 0..6: (RATIO_SEL+2) <-> (dsor-2)
 314          * 6..48:  (8+(RATIO_SEL-6)*2) <-> ((dsor-8)/2+6)
 315          * Minimum dsor is 2 and maximum is 96. Odd divisors starting from 9
 316          * can not be used.
 317          */
 318         for (dsor = 2; dsor < 96; ++dsor) {
 319                 if ((dsor & 1) && dsor > 8)
 320                         continue;
 321                 if (rate >= 96000000 / dsor)
 322                         break;
 323         }
 324         return dsor;
 325 }
 326
 327 int omap1_set_uart_rate(struct clk *clk, unsigned long rate)
 328 {
 329         unsigned int val;
 330
 331         val = __raw_readl(clk->enable_reg);
 332         if (rate == 12000000)
 333                 val &= ~(1 << clk->enable_bit);
 334         else if (rate == 48000000)
 335                 val |= (1 << clk->enable_bit);
 336         else
 337                 return -EINVAL;
 338         __raw_writel(val, clk->enable_reg);
 339         clk->rate = rate;
 340
 341         return 0;
 342 }
 343
 344 /* External clock (MCLK & BCLK) functions */
 345 int omap1_set_ext_clk_rate(struct clk *clk, unsigned long rate)
 346 {
 347         unsigned dsor;
 348         __u16 ratio_bits;
 349
 350         dsor = calc_ext_dsor(rate);
 351         clk->rate = 96000000 / dsor;
 352         if (dsor > 8)
 353                 ratio_bits = ((dsor - 8) / 2 + 6) << 2;
 354         else
 355                 ratio_bits = (dsor - 2) << 2;
 356
 357         ratio_bits |= __raw_readw(clk->enable_reg) & ~0xfd;
 358         __raw_writew(ratio_bits, clk->enable_reg);
 359
 360         return 0;
 361 }
 362
 363 int omap1_set_sossi_rate(struct clk *clk, unsigned long rate)
 364 {
 365         u32 l;
 366         int div;
 367         unsigned long p_rate;
 368
 369         p_rate = clk->parent->rate;
 370         /* Round towards slower frequency */
 371         div = (p_rate + rate - 1) / rate;
 372         div--;
 373         if (div < 0 || div > 7)
 374                 return -EINVAL;
 375
 376         l = omap_readl(MOD_CONF_CTRL_1);
 377         l &= ~(7 << 17);
 378         l |= div << 17;
 379         omap_writel(l, MOD_CONF_CTRL_1);
 380
 381         clk->rate = p_rate / (div + 1);
 382
 383         return 0;
 384 }
 385
 386 long omap1_round_ext_clk_rate(struct clk *clk, unsigned long rate)
 387 {
 388         return 96000000 / calc_ext_dsor(rate);
 389 }
 390
 391 void omap1_init_ext_clk(struct clk *clk)
 392 {
 393         unsigned dsor;
 394         __u16 ratio_bits;
 395
 396         /* Determine current rate and ensure clock is based on 96MHz APLL */
 397         ratio_bits = __raw_readw(clk->enable_reg) & ~1;
 398         __raw_writew(ratio_bits, clk->enable_reg);
 399
 400         ratio_bits = (ratio_bits & 0xfc) >> 2;
 401         if (ratio_bits > 6)
 402                 dsor = (ratio_bits - 6) * 2 + 8;
 403         else
 404                 dsor = ratio_bits + 2;
 405
 406         clk-> rate = 96000000 / dsor;
 407 }
 408
 409 int omap1_clk_enable(struct clk *clk)
 410 {
 411         int ret = 0;
 412
 413         if (clk->usecount++ == 0) {
 414                 if (clk->parent) {
 415                         ret = omap1_clk_enable(clk->parent);
 416                         if (ret)
 417                                 goto err;
 418
 419                         if (clk->flags & CLOCK_NO_IDLE_PARENT)
 420                                 omap1_clk_deny_idle(clk->parent);
 421                 }
 422
 423                 ret = clk->ops->enable(clk);
 424                 if (ret) {
 425                         if (clk->parent)
 426                                 omap1_clk_disable(clk->parent);
 427                         goto err;
 428                 }
 429         }
 430         return ret;
 431
 432 err:
 433         clk->usecount--;
 434         return ret;
 435 }
 436
 437 void omap1_clk_disable(struct clk *clk)
 438 {
 439         if (clk->usecount > 0 && !(--clk->usecount)) {
 440                 clk->ops->disable(clk);
 441                 if (likely(clk->parent)) {
 442                         omap1_clk_disable(clk->parent);
 443                         if (clk->flags & CLOCK_NO_IDLE_PARENT)
 444                                 omap1_clk_allow_idle(clk->parent);
 445                 }
 446         }
 447 }
 448
 449 static int omap1_clk_enable_generic(struct clk *clk)
 450 {
 451         __u16 regval16;
 452         __u32 regval32;
 453
 454         if (unlikely(clk->enable_reg == NULL)) {
 455                 printk(KERN_ERR "clock.c: Enable for %s without enable code\n",
 456                        clk->name);
 457                 return -EINVAL;
 458         }
 459
 460         if (clk->flags & ENABLE_REG_32BIT) {
 461                 regval32 = __raw_readl(clk->enable_reg);
 462                 regval32 |= (1 << clk->enable_bit);
 463                 __raw_writel(regval32, clk->enable_reg);
 464         } else {
 465                 regval16 = __raw_readw(clk->enable_reg);
 466                 regval16 |= (1 << clk->enable_bit);
 467                 __raw_writew(regval16, clk->enable_reg);
 468         }
 469
 470         return 0;
 471 }
 472
 473 static void omap1_clk_disable_generic(struct clk *clk)
 474 {
 475         __u16 regval16;
 476         __u32 regval32;
 477
 478         if (clk->enable_reg == NULL)
 479                 return;
 480
 481         if (clk->flags & ENABLE_REG_32BIT) {
 482                 regval32 = __raw_readl(clk->enable_reg);
 483                 regval32 &= ~(1 << clk->enable_bit);
 484                 __raw_writel(regval32, clk->enable_reg);
 485         } else {
 486                 regval16 = __raw_readw(clk->enable_reg);
 487                 regval16 &= ~(1 << clk->enable_bit);
 488                 __raw_writew(regval16, clk->enable_reg);
 489         }
 490 }
 491
 492 const struct clkops clkops_generic = {
 493         .enable         = omap1_clk_enable_generic,
 494         .disable        = omap1_clk_disable_generic,
 495 };
 496
 497 static int omap1_clk_enable_dsp_domain(struct clk *clk)
 498 {
 499         int retval;
 500
 501         retval = omap1_clk_enable(api_ck_p);
 502         if (!retval) {
 503                 retval = omap1_clk_enable_generic(clk);
 504                 omap1_clk_disable(api_ck_p);
 505         }
 506
 507         return retval;
 508 }
 509
 510 static void omap1_clk_disable_dsp_domain(struct clk *clk)
 511 {
 512         if (omap1_clk_enable(api_ck_p) == 0) {
 513                 omap1_clk_disable_generic(clk);
 514                 omap1_clk_disable(api_ck_p);
 515         }
 516 }
 517
 518 const struct clkops clkops_dspck = {
 519         .enable         = omap1_clk_enable_dsp_domain,
 520         .disable        = omap1_clk_disable_dsp_domain,
 521 };
 522
 523 static int omap1_clk_enable_uart_functional_16xx(struct clk *clk)
 524 {
 525         int ret;
 526         struct uart_clk *uclk;
 527
 528         ret = omap1_clk_enable_generic(clk);
 529         if (ret == 0) {
 530                 /* Set smart idle acknowledgement mode */
 531                 uclk = (struct uart_clk *)clk;
 532                 omap_writeb((omap_readb(uclk->sysc_addr) & ~0x10) | 8,
 533                             uclk->sysc_addr);
 534         }
 535
 536         return ret;
 537 }
 538
 539 static void omap1_clk_disable_uart_functional_16xx(struct clk *clk)
 540 {
 541         struct uart_clk *uclk;
 542
 543         /* Set force idle acknowledgement mode */
 544         uclk = (struct uart_clk *)clk;
 545         omap_writeb((omap_readb(uclk->sysc_addr) & ~0x18), uclk->sysc_addr);
 546
 547         omap1_clk_disable_generic(clk);
 548 }
 549
 550 const struct clkops clkops_uart_16xx = {
 551         .enable         = omap1_clk_enable_uart_functional_16xx,
 552         .disable        = omap1_clk_disable_uart_functional_16xx,
 553 };
 554
 555 long omap1_clk_round_rate(struct clk *clk, unsigned long rate)
 556 {
 557         if (clk->round_rate != NULL)
 558                 return clk->round_rate(clk, rate);
 559
 560         return clk->rate;
 561 }
 562
 563 int omap1_clk_set_rate(struct clk *clk, unsigned long rate)
 564 {
 565         int  ret = -EINVAL;
 566
 567         if (clk->set_rate)
 568                 ret = clk->set_rate(clk, rate);
 569         return ret;
 570 }
 571
 572 /*
 573  * Omap1 clock reset and init functions
 574  */
 575
 576 #ifdef CONFIG_OMAP_RESET_CLOCKS
 577
 578 void omap1_clk_disable_unused(struct clk *clk)
 579 {
 580         __u32 regval32;
 581
 582         /* Clocks in the DSP domain need api_ck. Just assume bootloader
 583          * has not enabled any DSP clocks */
 584         if (clk->enable_reg == DSP_IDLECT2) {
 585                 printk(KERN_INFO "Skipping reset check for DSP domain "
 586                        "clock \"%s\"\n", clk->name);
 587                 return;
 588         }
 589
 590         /* Is the clock already disabled? */
 591         if (clk->flags & ENABLE_REG_32BIT)
 592                 regval32 = __raw_readl(clk->enable_reg);
 593         else
 594                 regval32 = __raw_readw(clk->enable_reg);
 595
 596         if ((regval32 & (1 << clk->enable_bit)) == 0)
 597                 return;
 598
 599         printk(KERN_INFO "Disabling unused clock \"%s\"... ", clk->name);
 600         clk->ops->disable(clk);
 601         printk(" done\n");
 602 }
 603
 604 #endif