linux/arch/mips/netlogic/xlp/nlm_hal.c
<<
>>
Prefs
   1/*
   2 * Copyright 2003-2011 NetLogic Microsystems, Inc. (NetLogic). All rights
   3 * reserved.
   4 *
   5 * This software is available to you under a choice of one of two
   6 * licenses.  You may choose to be licensed under the terms of the GNU
   7 * General Public License (GPL) Version 2, available from the file
   8 * COPYING in the main directory of this source tree, or the NetLogic
   9 * license below:
  10 *
  11 * Redistribution and use in source and binary forms, with or without
  12 * modification, are permitted provided that the following conditions
  13 * are met:
  14 *
  15 * 1. Redistributions of source code must retain the above copyright
  16 *    notice, this list of conditions and the following disclaimer.
  17 * 2. Redistributions in binary form must reproduce the above copyright
  18 *    notice, this list of conditions and the following disclaimer in
  19 *    the documentation and/or other materials provided with the
  20 *    distribution.
  21 *
  22 * THIS SOFTWARE IS PROVIDED BY NETLOGIC ``AS IS'' AND ANY EXPRESS OR
  23 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
  24 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  25 * ARE DISCLAIMED. IN NO EVENT SHALL NETLOGIC OR CONTRIBUTORS BE LIABLE
  26 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  27 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  28 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
  29 * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
  30 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
  31 * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN
  32 * IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  33 */
  34
  35#include <linux/types.h>
  36#include <linux/kernel.h>
  37#include <linux/mm.h>
  38#include <linux/delay.h>
  39
  40#include <asm/mipsregs.h>
  41#include <asm/time.h>
  42
  43#include <asm/netlogic/common.h>
  44#include <asm/netlogic/haldefs.h>
  45#include <asm/netlogic/xlp-hal/iomap.h>
  46#include <asm/netlogic/xlp-hal/xlp.h>
  47#include <asm/netlogic/xlp-hal/bridge.h>
  48#include <asm/netlogic/xlp-hal/pic.h>
  49#include <asm/netlogic/xlp-hal/sys.h>
  50
  51/* Main initialization */
  52void nlm_node_init(int node)
  53{
  54        struct nlm_soc_info *nodep;
  55
  56        nodep = nlm_get_node(node);
  57        if (node == 0)
  58                nodep->coremask = 1;    /* node 0, boot cpu */
  59        nodep->sysbase = nlm_get_sys_regbase(node);
  60        nodep->picbase = nlm_get_pic_regbase(node);
  61        nodep->ebase = read_c0_ebase() & MIPS_EBASE_BASE;
  62        if (cpu_is_xlp9xx())
  63                nodep->socbus = xlp9xx_get_socbus(node);
  64        else
  65                nodep->socbus = 0;
  66        spin_lock_init(&nodep->piclock);
  67}
  68
  69static int xlp9xx_irq_to_irt(int irq)
  70{
  71        switch (irq) {
  72        case PIC_GPIO_IRQ:
  73                return 12;
  74        case PIC_I2C_0_IRQ:
  75                return 125;
  76        case PIC_I2C_1_IRQ:
  77                return 126;
  78        case PIC_I2C_2_IRQ:
  79                return 127;
  80        case PIC_I2C_3_IRQ:
  81                return 128;
  82        case PIC_9XX_XHCI_0_IRQ:
  83                return 114;
  84        case PIC_9XX_XHCI_1_IRQ:
  85                return 115;
  86        case PIC_9XX_XHCI_2_IRQ:
  87                return 116;
  88        case PIC_UART_0_IRQ:
  89                return 133;
  90        case PIC_UART_1_IRQ:
  91                return 134;
  92        case PIC_SATA_IRQ:
  93                return 143;
  94        case PIC_NAND_IRQ:
  95                return 151;
  96        case PIC_SPI_IRQ:
  97                return 152;
  98        case PIC_MMC_IRQ:
  99                return 153;
 100        case PIC_PCIE_LINK_LEGACY_IRQ(0):
 101        case PIC_PCIE_LINK_LEGACY_IRQ(1):
 102        case PIC_PCIE_LINK_LEGACY_IRQ(2):
 103        case PIC_PCIE_LINK_LEGACY_IRQ(3):
 104                return 191 + irq - PIC_PCIE_LINK_LEGACY_IRQ_BASE;
 105        }
 106        return -1;
 107}
 108
 109static int xlp_irq_to_irt(int irq)
 110{
 111        uint64_t pcibase;
 112        int devoff, irt;
 113
 114        devoff = 0;
 115        switch (irq) {
 116        case PIC_UART_0_IRQ:
 117                devoff = XLP_IO_UART0_OFFSET(0);
 118                break;
 119        case PIC_UART_1_IRQ:
 120                devoff = XLP_IO_UART1_OFFSET(0);
 121                break;
 122        case PIC_MMC_IRQ:
 123                devoff = XLP_IO_MMC_OFFSET(0);
 124                break;
 125        case PIC_I2C_0_IRQ:     /* I2C will be fixed up */
 126        case PIC_I2C_1_IRQ:
 127        case PIC_I2C_2_IRQ:
 128        case PIC_I2C_3_IRQ:
 129                if (cpu_is_xlpii())
 130                        devoff = XLP2XX_IO_I2C_OFFSET(0);
 131                else
 132                        devoff = XLP_IO_I2C0_OFFSET(0);
 133                break;
 134        case PIC_SATA_IRQ:
 135                devoff = XLP_IO_SATA_OFFSET(0);
 136                break;
 137        case PIC_GPIO_IRQ:
 138                devoff = XLP_IO_GPIO_OFFSET(0);
 139                break;
 140        case PIC_NAND_IRQ:
 141                devoff = XLP_IO_NAND_OFFSET(0);
 142                break;
 143        case PIC_SPI_IRQ:
 144                devoff = XLP_IO_SPI_OFFSET(0);
 145                break;
 146        default:
 147                if (cpu_is_xlpii()) {
 148                        switch (irq) {
 149                                /* XLP2XX has three XHCI USB controller */
 150                        case PIC_2XX_XHCI_0_IRQ:
 151                                devoff = XLP2XX_IO_USB_XHCI0_OFFSET(0);
 152                                break;
 153                        case PIC_2XX_XHCI_1_IRQ:
 154                                devoff = XLP2XX_IO_USB_XHCI1_OFFSET(0);
 155                                break;
 156                        case PIC_2XX_XHCI_2_IRQ:
 157                                devoff = XLP2XX_IO_USB_XHCI2_OFFSET(0);
 158                                break;
 159                        }
 160                } else {
 161                        switch (irq) {
 162                        case PIC_EHCI_0_IRQ:
 163                                devoff = XLP_IO_USB_EHCI0_OFFSET(0);
 164                                break;
 165                        case PIC_EHCI_1_IRQ:
 166                                devoff = XLP_IO_USB_EHCI1_OFFSET(0);
 167                                break;
 168                        case PIC_OHCI_0_IRQ:
 169                                devoff = XLP_IO_USB_OHCI0_OFFSET(0);
 170                                break;
 171                        case PIC_OHCI_1_IRQ:
 172                                devoff = XLP_IO_USB_OHCI1_OFFSET(0);
 173                                break;
 174                        case PIC_OHCI_2_IRQ:
 175                                devoff = XLP_IO_USB_OHCI2_OFFSET(0);
 176                                break;
 177                        case PIC_OHCI_3_IRQ:
 178                                devoff = XLP_IO_USB_OHCI3_OFFSET(0);
 179                                break;
 180                        }
 181                }
 182        }
 183
 184        if (devoff != 0) {
 185                uint32_t val;
 186
 187                pcibase = nlm_pcicfg_base(devoff);
 188                val = nlm_read_reg(pcibase, XLP_PCI_IRTINFO_REG);
 189                if (val == 0xffffffff) {
 190                        irt = -1;
 191                } else {
 192                        irt = val & 0xffff;
 193                        /* HW weirdness, I2C IRT entry has to be fixed up */
 194                        switch (irq) {
 195                        case PIC_I2C_1_IRQ:
 196                                irt = irt + 1; break;
 197                        case PIC_I2C_2_IRQ:
 198                                irt = irt + 2; break;
 199                        case PIC_I2C_3_IRQ:
 200                                irt = irt + 3; break;
 201                        }
 202                }
 203        } else if (irq >= PIC_PCIE_LINK_LEGACY_IRQ(0) &&
 204                        irq <= PIC_PCIE_LINK_LEGACY_IRQ(3)) {
 205                /* HW bug, PCI IRT entries are bad on early silicon, fix */
 206                irt = PIC_IRT_PCIE_LINK_INDEX(irq -
 207                                        PIC_PCIE_LINK_LEGACY_IRQ_BASE);
 208        } else {
 209                irt = -1;
 210        }
 211        return irt;
 212}
 213
 214int nlm_irq_to_irt(int irq)
 215{
 216        /* return -2 for irqs without 1-1 mapping */
 217        if (irq >= PIC_PCIE_LINK_MSI_IRQ(0) && irq <= PIC_PCIE_LINK_MSI_IRQ(3))
 218                return -2;
 219        if (irq >= PIC_PCIE_MSIX_IRQ(0) && irq <= PIC_PCIE_MSIX_IRQ(3))
 220                return -2;
 221
 222        if (cpu_is_xlp9xx())
 223                return xlp9xx_irq_to_irt(irq);
 224        else
 225                return xlp_irq_to_irt(irq);
 226}
 227
 228static unsigned int nlm_xlp2_get_core_frequency(int node, int core)
 229{
 230        unsigned int pll_post_div, ctrl_val0, ctrl_val1, denom;
 231        uint64_t num, sysbase, clockbase;
 232
 233        if (cpu_is_xlp9xx()) {
 234                clockbase = nlm_get_clock_regbase(node);
 235                ctrl_val0 = nlm_read_sys_reg(clockbase,
 236                                        SYS_9XX_CPU_PLL_CTRL0(core));
 237                ctrl_val1 = nlm_read_sys_reg(clockbase,
 238                                        SYS_9XX_CPU_PLL_CTRL1(core));
 239        } else {
 240                sysbase = nlm_get_node(node)->sysbase;
 241                ctrl_val0 = nlm_read_sys_reg(sysbase,
 242                                                SYS_CPU_PLL_CTRL0(core));
 243                ctrl_val1 = nlm_read_sys_reg(sysbase,
 244                                                SYS_CPU_PLL_CTRL1(core));
 245        }
 246
 247        /* Find PLL post divider value */
 248        switch ((ctrl_val0 >> 24) & 0x7) {
 249        case 1:
 250                pll_post_div = 2;
 251                break;
 252        case 3:
 253                pll_post_div = 4;
 254                break;
 255        case 7:
 256                pll_post_div = 8;
 257                break;
 258        case 6:
 259                pll_post_div = 16;
 260                break;
 261        case 0:
 262        default:
 263                pll_post_div = 1;
 264                break;
 265        }
 266
 267        num = 1000000ULL * (400 * 3 + 100 * (ctrl_val1 & 0x3f));
 268        denom = 3 * pll_post_div;
 269        do_div(num, denom);
 270
 271        return (unsigned int)num;
 272}
 273
 274static unsigned int nlm_xlp_get_core_frequency(int node, int core)
 275{
 276        unsigned int pll_divf, pll_divr, dfs_div, ext_div;
 277        unsigned int rstval, dfsval, denom;
 278        uint64_t num, sysbase;
 279
 280        sysbase = nlm_get_node(node)->sysbase;
 281        rstval = nlm_read_sys_reg(sysbase, SYS_POWER_ON_RESET_CFG);
 282        dfsval = nlm_read_sys_reg(sysbase, SYS_CORE_DFS_DIV_VALUE);
 283        pll_divf = ((rstval >> 10) & 0x7f) + 1;
 284        pll_divr = ((rstval >> 8)  & 0x3) + 1;
 285        ext_div  = ((rstval >> 30) & 0x3) + 1;
 286        dfs_div  = ((dfsval >> (core * 4)) & 0xf) + 1;
 287
 288        num = 800000000ULL * pll_divf;
 289        denom = 3 * pll_divr * ext_div * dfs_div;
 290        do_div(num, denom);
 291
 292        return (unsigned int)num;
 293}
 294
 295unsigned int nlm_get_core_frequency(int node, int core)
 296{
 297        if (cpu_is_xlpii())
 298                return nlm_xlp2_get_core_frequency(node, core);
 299        else
 300                return nlm_xlp_get_core_frequency(node, core);
 301}
 302
 303/*
 304 * Calculate PIC frequency from PLL registers.
 305 * freq_out = (ref_freq/2 * (6 + ctrl2[7:0]) + ctrl2[20:8]/2^13) /
 306 *              ((2^ctrl0[7:5]) * Table(ctrl0[26:24]))
 307 */
 308static unsigned int nlm_xlp2_get_pic_frequency(int node)
 309{
 310        u32 ctrl_val0, ctrl_val2, vco_post_div, pll_post_div, cpu_xlp9xx;
 311        u32 mdiv, fdiv, pll_out_freq_den, reg_select, ref_div, pic_div;
 312        u64 sysbase, pll_out_freq_num, ref_clk_select, clockbase, ref_clk;
 313
 314        sysbase = nlm_get_node(node)->sysbase;
 315        clockbase = nlm_get_clock_regbase(node);
 316        cpu_xlp9xx = cpu_is_xlp9xx();
 317
 318        /* Find ref_clk_base */
 319        if (cpu_xlp9xx)
 320                ref_clk_select = (nlm_read_sys_reg(sysbase,
 321                                SYS_9XX_POWER_ON_RESET_CFG) >> 18) & 0x3;
 322        else
 323                ref_clk_select = (nlm_read_sys_reg(sysbase,
 324                                        SYS_POWER_ON_RESET_CFG) >> 18) & 0x3;
 325        switch (ref_clk_select) {
 326        case 0:
 327                ref_clk = 200000000ULL;
 328                ref_div = 3;
 329                break;
 330        case 1:
 331                ref_clk = 100000000ULL;
 332                ref_div = 1;
 333                break;
 334        case 2:
 335                ref_clk = 125000000ULL;
 336                ref_div = 1;
 337                break;
 338        case 3:
 339                ref_clk = 400000000ULL;
 340                ref_div = 3;
 341                break;
 342        }
 343
 344        /* Find the clock source PLL device for PIC */
 345        if (cpu_xlp9xx) {
 346                reg_select = nlm_read_sys_reg(clockbase,
 347                                SYS_9XX_CLK_DEV_SEL_REG) & 0x3;
 348                switch (reg_select) {
 349                case 0:
 350                        ctrl_val0 = nlm_read_sys_reg(clockbase,
 351                                        SYS_9XX_PLL_CTRL0);
 352                        ctrl_val2 = nlm_read_sys_reg(clockbase,
 353                                        SYS_9XX_PLL_CTRL2);
 354                        break;
 355                case 1:
 356                        ctrl_val0 = nlm_read_sys_reg(clockbase,
 357                                        SYS_9XX_PLL_CTRL0_DEVX(0));
 358                        ctrl_val2 = nlm_read_sys_reg(clockbase,
 359                                        SYS_9XX_PLL_CTRL2_DEVX(0));
 360                        break;
 361                case 2:
 362                        ctrl_val0 = nlm_read_sys_reg(clockbase,
 363                                        SYS_9XX_PLL_CTRL0_DEVX(1));
 364                        ctrl_val2 = nlm_read_sys_reg(clockbase,
 365                                        SYS_9XX_PLL_CTRL2_DEVX(1));
 366                        break;
 367                case 3:
 368                        ctrl_val0 = nlm_read_sys_reg(clockbase,
 369                                        SYS_9XX_PLL_CTRL0_DEVX(2));
 370                        ctrl_val2 = nlm_read_sys_reg(clockbase,
 371                                        SYS_9XX_PLL_CTRL2_DEVX(2));
 372                        break;
 373                }
 374        } else {
 375                reg_select = (nlm_read_sys_reg(sysbase,
 376                                        SYS_CLK_DEV_SEL_REG) >> 22) & 0x3;
 377                switch (reg_select) {
 378                case 0:
 379                        ctrl_val0 = nlm_read_sys_reg(sysbase,
 380                                        SYS_PLL_CTRL0);
 381                        ctrl_val2 = nlm_read_sys_reg(sysbase,
 382                                        SYS_PLL_CTRL2);
 383                        break;
 384                case 1:
 385                        ctrl_val0 = nlm_read_sys_reg(sysbase,
 386                                        SYS_PLL_CTRL0_DEVX(0));
 387                        ctrl_val2 = nlm_read_sys_reg(sysbase,
 388                                        SYS_PLL_CTRL2_DEVX(0));
 389                        break;
 390                case 2:
 391                        ctrl_val0 = nlm_read_sys_reg(sysbase,
 392                                        SYS_PLL_CTRL0_DEVX(1));
 393                        ctrl_val2 = nlm_read_sys_reg(sysbase,
 394                                        SYS_PLL_CTRL2_DEVX(1));
 395                        break;
 396                case 3:
 397                        ctrl_val0 = nlm_read_sys_reg(sysbase,
 398                                        SYS_PLL_CTRL0_DEVX(2));
 399                        ctrl_val2 = nlm_read_sys_reg(sysbase,
 400                                        SYS_PLL_CTRL2_DEVX(2));
 401                        break;
 402                }
 403        }
 404
 405        vco_post_div = (ctrl_val0 >> 5) & 0x7;
 406        pll_post_div = (ctrl_val0 >> 24) & 0x7;
 407        mdiv = ctrl_val2 & 0xff;
 408        fdiv = (ctrl_val2 >> 8) & 0x1fff;
 409
 410        /* Find PLL post divider value */
 411        switch (pll_post_div) {
 412        case 1:
 413                pll_post_div = 2;
 414                break;
 415        case 3:
 416                pll_post_div = 4;
 417                break;
 418        case 7:
 419                pll_post_div = 8;
 420                break;
 421        case 6:
 422                pll_post_div = 16;
 423                break;
 424        case 0:
 425        default:
 426                pll_post_div = 1;
 427                break;
 428        }
 429
 430        fdiv = fdiv/(1 << 13);
 431        pll_out_freq_num = ((ref_clk >> 1) * (6 + mdiv)) + fdiv;
 432        pll_out_freq_den = (1 << vco_post_div) * pll_post_div * ref_div;
 433
 434        if (pll_out_freq_den > 0)
 435                do_div(pll_out_freq_num, pll_out_freq_den);
 436
 437        /* PIC post divider, which happens after PLL */
 438        if (cpu_xlp9xx)
 439                pic_div = nlm_read_sys_reg(clockbase,
 440                                SYS_9XX_CLK_DEV_DIV_REG) & 0x3;
 441        else
 442                pic_div = (nlm_read_sys_reg(sysbase,
 443                                        SYS_CLK_DEV_DIV_REG) >> 22) & 0x3;
 444        do_div(pll_out_freq_num, 1 << pic_div);
 445
 446        return pll_out_freq_num;
 447}
 448
 449unsigned int nlm_get_pic_frequency(int node)
 450{
 451        if (cpu_is_xlpii())
 452                return nlm_xlp2_get_pic_frequency(node);
 453        else
 454                return 133333333;
 455}
 456
 457unsigned int nlm_get_cpu_frequency(void)
 458{
 459        return nlm_get_core_frequency(0, 0);
 460}
 461
 462/*
 463 * Fills upto 8 pairs of entries containing the DRAM map of a node
 464 * if node < 0, get dram map for all nodes
 465 */
 466int nlm_get_dram_map(int node, uint64_t *dram_map, int nentries)
 467{
 468        uint64_t bridgebase, base, lim;
 469        uint32_t val;
 470        unsigned int barreg, limreg, xlatreg;
 471        int i, n, rv;
 472
 473        /* Look only at mapping on Node 0, we don't handle crazy configs */
 474        bridgebase = nlm_get_bridge_regbase(0);
 475        rv = 0;
 476        for (i = 0; i < 8; i++) {
 477                if (rv + 1 >= nentries)
 478                        break;
 479                if (cpu_is_xlp9xx()) {
 480                        barreg = BRIDGE_9XX_DRAM_BAR(i);
 481                        limreg = BRIDGE_9XX_DRAM_LIMIT(i);
 482                        xlatreg = BRIDGE_9XX_DRAM_NODE_TRANSLN(i);
 483                } else {
 484                        barreg = BRIDGE_DRAM_BAR(i);
 485                        limreg = BRIDGE_DRAM_LIMIT(i);
 486                        xlatreg = BRIDGE_DRAM_NODE_TRANSLN(i);
 487                }
 488                if (node >= 0) {
 489                        /* node specified, get node mapping of BAR */
 490                        val = nlm_read_bridge_reg(bridgebase, xlatreg);
 491                        n = (val >> 1) & 0x3;
 492                        if (n != node)
 493                                continue;
 494                }
 495                val = nlm_read_bridge_reg(bridgebase, barreg);
 496                val = (val >>  12) & 0xfffff;
 497                base = (uint64_t) val << 20;
 498                val = nlm_read_bridge_reg(bridgebase, limreg);
 499                val = (val >>  12) & 0xfffff;
 500                if (val == 0)   /* BAR not used */
 501                        continue;
 502                lim = ((uint64_t)val + 1) << 20;
 503                dram_map[rv] = base;
 504                dram_map[rv + 1] = lim;
 505                rv += 2;
 506        }
 507        return rv;
 508}
 509