drivers/staging/brcm80211/brcmsmac/aiutils.c

   1 /*
   2  * Copyright (c) 2010 Broadcom Corporation
   3  *
   4  * Permission to use, copy, modify, and/or distribute this software for any
   5  * purpose with or without fee is hereby granted, provided that the above
   6  * copyright notice and this permission notice appear in all copies.
   7  *
   8  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
   9  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
  10  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
  11  * SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  12  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION
  13  * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
  14  * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  15  *
  16  * File contents: support functions for PCI/PCIe
  17  */
  18
  19 #include <linux/delay.h>
  20 #include <linux/pci.h>
  21
  22 #include <defs.h>
  23 #include <chipcommon.h>
  24 #include <brcmu_utils.h>
  25 #include <brcm_hw_ids.h>
  26 #include <soc.h>
  27 #include "types.h"
  28 #include "pub.h"
  29 #include "pmu.h"
  30 #include "srom.h"
  31 #include "nicpci.h"
  32 #include "aiutils.h"
  33
  34 /* slow_clk_ctl */
  35  /* slow clock source mask */
  36 #define SCC_SS_MASK             0x00000007
  37  /* source of slow clock is LPO */
  38 #define SCC_SS_LPO              0x00000000
  39  /* source of slow clock is crystal */
  40 #define SCC_SS_XTAL             0x00000001
  41  /* source of slow clock is PCI */
  42 #define SCC_SS_PCI              0x00000002
  43  /* LPOFreqSel, 1: 160Khz, 0: 32KHz */
  44 #define SCC_LF                  0x00000200
  45  /* LPOPowerDown, 1: LPO is disabled, 0: LPO is enabled */
  46 #define SCC_LP                  0x00000400
  47  /* ForceSlowClk, 1: sb/cores running on slow clock, 0: power logic control */
  48 #define SCC_FS                  0x00000800
  49  /* IgnorePllOffReq, 1/0:
  50   *  power logic ignores/honors PLL clock disable requests from core
  51   */
  52 #define SCC_IP                  0x00001000
  53  /* XtalControlEn, 1/0:
  54   *  power logic does/doesn't disable crystal when appropriate
  55   */
  56 #define SCC_XC                  0x00002000
  57  /* XtalPU (RO), 1/0: crystal running/disabled */
  58 #define SCC_XP                  0x00004000
  59  /* ClockDivider (SlowClk = 1/(4+divisor)) */
  60 #define SCC_CD_MASK             0xffff0000
  61 #define SCC_CD_SHIFT            16
  62
  63 /* system_clk_ctl */
  64  /* ILPen: Enable Idle Low Power */
  65 #define SYCC_IE                 0x00000001
  66  /* ALPen: Enable Active Low Power */
  67 #define SYCC_AE                 0x00000002
  68  /* ForcePLLOn */
  69 #define SYCC_FP                 0x00000004
  70  /* Force ALP (or HT if ALPen is not set */
  71 #define SYCC_AR                 0x00000008
  72  /* Force HT */
  73 #define SYCC_HR                 0x00000010
  74  /* ClkDiv  (ILP = 1/(4 * (divisor + 1)) */
  75 #define SYCC_CD_MASK            0xffff0000
  76 #define SYCC_CD_SHIFT           16
  77
  78 #define CST4329_SPROM_OTP_SEL_MASK      0x00000003
  79  /* OTP is powered up, use def. CIS, no SPROM */
  80 #define CST4329_DEFCIS_SEL              0
  81  /* OTP is powered up, SPROM is present */
  82 #define CST4329_SPROM_SEL               1
  83  /* OTP is powered up, no SPROM */
  84 #define CST4329_OTP_SEL                 2
  85  /* OTP is powered down, SPROM is present */
  86 #define CST4329_OTP_PWRDN               3
  87
  88 #define CST4329_SPI_SDIO_MODE_MASK      0x00000004
  89 #define CST4329_SPI_SDIO_MODE_SHIFT     2
  90
  91 /* 43224 chip-specific ChipControl register bits */
  92 #define CCTRL43224_GPIO_TOGGLE          0x8000
  93  /* 12 mA drive strength */
  94 #define CCTRL_43224A0_12MA_LED_DRIVE    0x00F000F0
  95  /* 12 mA drive strength for later 43224s */
  96 #define CCTRL_43224B0_12MA_LED_DRIVE    0xF0
  97
  98 /* 43236 Chip specific ChipStatus register bits */
  99 #define CST43236_SFLASH_MASK            0x00000040
 100 #define CST43236_OTP_MASK               0x00000080
 101 #define CST43236_HSIC_MASK              0x00000100      /* USB/HSIC */
 102 #define CST43236_BP_CLK                 0x00000200      /* 120/96Mbps */
 103 #define CST43236_BOOT_MASK              0x00001800
 104 #define CST43236_BOOT_SHIFT             11
 105 #define CST43236_BOOT_FROM_SRAM         0 /* boot from SRAM, ARM in reset */
 106 #define CST43236_BOOT_FROM_ROM          1 /* boot from ROM */
 107 #define CST43236_BOOT_FROM_FLASH        2 /* boot from FLASH */
 108 #define CST43236_BOOT_FROM_INVALID      3
 109
 110 /* 4331 chip-specific ChipControl register bits */
 111  /* 0 disable */
 112 #define CCTRL4331_BT_COEXIST            (1<<0)
 113  /* 0 SECI is disabled (JTAG functional) */
 114 #define CCTRL4331_SECI                  (1<<1)
 115  /* 0 disable */
 116 #define CCTRL4331_EXT_LNA               (1<<2)
 117  /* sprom/gpio13-15 mux */
 118 #define CCTRL4331_SPROM_GPIO13_15       (1<<3)
 119  /* 0 ext pa disable, 1 ext pa enabled */
 120 #define CCTRL4331_EXTPA_EN              (1<<4)
 121  /* set drive out GPIO_CLK on sprom_cs pin */
 122 #define CCTRL4331_GPIOCLK_ON_SPROMCS    (1<<5)
 123  /* use sprom_cs pin as PCIE mdio interface */
 124 #define CCTRL4331_PCIE_MDIO_ON_SPROMCS  (1<<6)
 125  /* aband extpa will be at gpio2/5 and sprom_dout */
 126 #define CCTRL4331_EXTPA_ON_GPIO2_5      (1<<7)
 127  /* override core control on pipe_AuxClkEnable */
 128 #define CCTRL4331_OVR_PIPEAUXCLKEN      (1<<8)
 129  /* override core control on pipe_AuxPowerDown */
 130 #define CCTRL4331_OVR_PIPEAUXPWRDOWN    (1<<9)
 131  /* pcie_auxclkenable */
 132 #define CCTRL4331_PCIE_AUXCLKEN         (1<<10)
 133  /* pcie_pipe_pllpowerdown */
 134 #define CCTRL4331_PCIE_PIPE_PLLDOWN     (1<<11)
 135  /* enable bt_shd0 at gpio4 */
 136 #define CCTRL4331_BT_SHD0_ON_GPIO4      (1<<16)
 137  /* enable bt_shd1 at gpio5 */
 138 #define CCTRL4331_BT_SHD1_ON_GPIO5      (1<<17)
 139
 140 /* 4331 Chip specific ChipStatus register bits */
 141  /* crystal frequency 20/40Mhz */
 142 #define CST4331_XTAL_FREQ               0x00000001
 143 #define CST4331_SPROM_PRESENT           0x00000002
 144 #define CST4331_OTP_PRESENT             0x00000004
 145 #define CST4331_LDO_RF                  0x00000008
 146 #define CST4331_LDO_PAR                 0x00000010
 147
 148 /* 4319 chip-specific ChipStatus register bits */
 149 #define CST4319_SPI_CPULESSUSB          0x00000001
 150 #define CST4319_SPI_CLK_POL             0x00000002
 151 #define CST4319_SPI_CLK_PH              0x00000008
 152  /* gpio [7:6], SDIO CIS selection */
 153 #define CST4319_SPROM_OTP_SEL_MASK      0x000000c0
 154 #define CST4319_SPROM_OTP_SEL_SHIFT     6
 155  /* use default CIS, OTP is powered up */
 156 #define CST4319_DEFCIS_SEL              0x00000000
 157  /* use SPROM, OTP is powered up */
 158 #define CST4319_SPROM_SEL               0x00000040
 159  /* use OTP, OTP is powered up */
 160 #define CST4319_OTP_SEL                 0x00000080
 161  /* use SPROM, OTP is powered down */
 162 #define CST4319_OTP_PWRDN               0x000000c0
 163  /* gpio [8], sdio/usb mode */
 164 #define CST4319_SDIO_USB_MODE           0x00000100
 165 #define CST4319_REMAP_SEL_MASK          0x00000600
 166 #define CST4319_ILPDIV_EN               0x00000800
 167 #define CST4319_XTAL_PD_POL             0x00001000
 168 #define CST4319_LPO_SEL                 0x00002000
 169 #define CST4319_RES_INIT_MODE           0x0000c000
 170  /* PALDO is configured with external PNP */
 171 #define CST4319_PALDO_EXTPNP            0x00010000
 172 #define CST4319_CBUCK_MODE_MASK         0x00060000
 173 #define CST4319_CBUCK_MODE_BURST        0x00020000
 174 #define CST4319_CBUCK_MODE_LPBURST      0x00060000
 175 #define CST4319_RCAL_VALID              0x01000000
 176 #define CST4319_RCAL_VALUE_MASK         0x3e000000
 177 #define CST4319_RCAL_VALUE_SHIFT        25
 178
 179 /* 4336 chip-specific ChipStatus register bits */
 180 #define CST4336_SPI_MODE_MASK           0x00000001
 181 #define CST4336_SPROM_PRESENT           0x00000002
 182 #define CST4336_OTP_PRESENT             0x00000004
 183 #define CST4336_ARMREMAP_0              0x00000008
 184 #define CST4336_ILPDIV_EN_MASK          0x00000010
 185 #define CST4336_ILPDIV_EN_SHIFT         4
 186 #define CST4336_XTAL_PD_POL_MASK        0x00000020
 187 #define CST4336_XTAL_PD_POL_SHIFT       5
 188 #define CST4336_LPO_SEL_MASK            0x00000040
 189 #define CST4336_LPO_SEL_SHIFT           6
 190 #define CST4336_RES_INIT_MODE_MASK      0x00000180
 191 #define CST4336_RES_INIT_MODE_SHIFT     7
 192 #define CST4336_CBUCK_MODE_MASK         0x00000600
 193 #define CST4336_CBUCK_MODE_SHIFT        9
 194
 195 /* 4313 chip-specific ChipStatus register bits */
 196 #define CST4313_SPROM_PRESENT                   1
 197 #define CST4313_OTP_PRESENT                     2
 198 #define CST4313_SPROM_OTP_SEL_MASK              0x00000002
 199 #define CST4313_SPROM_OTP_SEL_SHIFT             0
 200
 201 /* 4313 Chip specific ChipControl register bits */
 202  /* 12 mA drive strengh for later 4313 */
 203 #define CCTRL_4313_12MA_LED_DRIVE    0x00000007
 204
 205 /* Manufacturer Ids */
 206 #define MFGID_ARM               0x43b
 207 #define MFGID_BRCM              0x4bf
 208 #define MFGID_MIPS              0x4a7
 209
 210 /* Enumeration ROM registers */
 211 #define ER_EROMENTRY            0x000
 212 #define ER_REMAPCONTROL         0xe00
 213 #define ER_REMAPSELECT          0xe04
 214 #define ER_MASTERSELECT         0xe10
 215 #define ER_ITCR                 0xf00
 216 #define ER_ITIP                 0xf04
 217
 218 /* Erom entries */
 219 #define ER_TAG                  0xe
 220 #define ER_TAG1                 0x6
 221 #define ER_VALID                1
 222 #define ER_CI                   0
 223 #define ER_MP                   2
 224 #define ER_ADD                  4
 225 #define ER_END                  0xe
 226 #define ER_BAD                  0xffffffff
 227
 228 /* EROM CompIdentA */
 229 #define CIA_MFG_MASK            0xfff00000
 230 #define CIA_MFG_SHIFT           20
 231 #define CIA_CID_MASK            0x000fff00
 232 #define CIA_CID_SHIFT           8
 233 #define CIA_CCL_MASK            0x000000f0
 234 #define CIA_CCL_SHIFT           4
 235
 236 /* EROM CompIdentB */
 237 #define CIB_REV_MASK            0xff000000
 238 #define CIB_REV_SHIFT           24
 239 #define CIB_NSW_MASK            0x00f80000
 240 #define CIB_NSW_SHIFT           19
 241 #define CIB_NMW_MASK            0x0007c000
 242 #define CIB_NMW_SHIFT           14
 243 #define CIB_NSP_MASK            0x00003e00
 244 #define CIB_NSP_SHIFT           9
 245 #define CIB_NMP_MASK            0x000001f0
 246 #define CIB_NMP_SHIFT           4
 247
 248 /* EROM AddrDesc */
 249 #define AD_ADDR_MASK            0xfffff000
 250 #define AD_SP_MASK              0x00000f00
 251 #define AD_SP_SHIFT             8
 252 #define AD_ST_MASK              0x000000c0
 253 #define AD_ST_SHIFT             6
 254 #define AD_ST_SLAVE             0x00000000
 255 #define AD_ST_BRIDGE            0x00000040
 256 #define AD_ST_SWRAP             0x00000080
 257 #define AD_ST_MWRAP             0x000000c0
 258 #define AD_SZ_MASK              0x00000030
 259 #define AD_SZ_SHIFT             4
 260 #define AD_SZ_4K                0x00000000
 261 #define AD_SZ_8K                0x00000010
 262 #define AD_SZ_16K               0x00000020
 263 #define AD_SZ_SZD               0x00000030
 264 #define AD_AG32                 0x00000008
 265 #define AD_ADDR_ALIGN           0x00000fff
 266 #define AD_SZ_BASE              0x00001000      /* 4KB */
 267
 268 /* EROM SizeDesc */
 269 #define SD_SZ_MASK              0xfffff000
 270 #define SD_SG32                 0x00000008
 271 #define SD_SZ_ALIGN             0x00000fff
 272
 273 /* PCI config space bit 4 for 4306c0 slow clock source */
 274 #define PCI_CFG_GPIO_SCS        0x10
 275 /* PCI config space GPIO 14 for Xtal power-up */
 276 #define PCI_CFG_GPIO_XTAL       0x40
 277 /* PCI config space GPIO 15 for PLL power-down */
 278 #define PCI_CFG_GPIO_PLL        0x80
 279
 280 /* power control defines */
 281 #define PLL_DELAY               150     /* us pll on delay */
 282 #define FREF_DELAY              200     /* us fref change delay */
 283 #define XTAL_ON_DELAY           1000    /* us crystal power-on delay */
 284
 285 /* resetctrl */
 286 #define AIRC_RESET              1
 287
 288 #define NOREV           -1      /* Invalid rev */
 289
 290 /* GPIO Based LED powersave defines */
 291 #define DEFAULT_GPIO_ONTIME     10      /* Default: 10% on */
 292 #define DEFAULT_GPIO_OFFTIME    90      /* Default: 10% on */
 293
 294 /* When Srom support present, fields in sromcontrol */
 295 #define SRC_START               0x80000000
 296 #define SRC_BUSY                0x80000000
 297 #define SRC_OPCODE              0x60000000
 298 #define SRC_OP_READ             0x00000000
 299 #define SRC_OP_WRITE            0x20000000
 300 #define SRC_OP_WRDIS            0x40000000
 301 #define SRC_OP_WREN             0x60000000
 302 #define SRC_OTPSEL              0x00000010
 303 #define SRC_LOCK                0x00000008
 304 #define SRC_SIZE_MASK           0x00000006
 305 #define SRC_SIZE_1K             0x00000000
 306 #define SRC_SIZE_4K             0x00000002
 307 #define SRC_SIZE_16K            0x00000004
 308 #define SRC_SIZE_SHIFT          1
 309 #define SRC_PRESENT             0x00000001
 310
 311 /* External PA enable mask */
 312 #define GPIO_CTRL_EPA_EN_MASK 0x40
 313
 314 #define DEFAULT_GPIOTIMERVAL \
 315         ((DEFAULT_GPIO_ONTIME << GPIO_ONTIME_SHIFT) | DEFAULT_GPIO_OFFTIME)
 316
 317 #define BADIDX          (SI_MAXCORES + 1)
 318
 319 /* Newer chips can access PCI/PCIE and CC core without requiring to change
 320  * PCI BAR0 WIN
 321  */
 322 #define SI_FAST(si) (((si)->pub.buscoretype == PCIE_CORE_ID) || \
 323                      (((si)->pub.buscoretype == PCI_CORE_ID) && \
 324                       (si)->pub.buscorerev >= 13))
 325
 326 #define CCREGS_FAST(si) (((char __iomem *)((si)->curmap) + \
 327                           PCI_16KB0_CCREGS_OFFSET))
 328
 329 #define IS_SIM(chippkg) \
 330         ((chippkg == HDLSIM_PKG_ID) || (chippkg == HWSIM_PKG_ID))
 331
 332 /*
 333  * Macros to disable/restore function core(D11, ENET, ILINE20, etc) interrupts
 334  * before after core switching to avoid invalid register accesss inside ISR.
 335  */
 336 #define INTR_OFF(si, intr_val) \
 337         if ((si)->intrsoff_fn && \
 338             (si)->coreid[(si)->curidx] == (si)->dev_coreid) \
 339                 intr_val = (*(si)->intrsoff_fn)((si)->intr_arg)
 340
 341 #define INTR_RESTORE(si, intr_val) \
 342         if ((si)->intrsrestore_fn && \
 343             (si)->coreid[(si)->curidx] == (si)->dev_coreid) \
 344                 (*(si)->intrsrestore_fn)((si)->intr_arg, intr_val)
 345
 346 #define PCI(si)         ((si)->pub.buscoretype == PCI_CORE_ID)
 347 #define PCIE(si)        ((si)->pub.buscoretype == PCIE_CORE_ID)
 348
 349 #define PCI_FORCEHT(si) (PCIE(si) && (si->pub.chip == BCM4716_CHIP_ID))
 350
 351 #ifdef BCMDBG
 352 #define SI_MSG(args)    printk args
 353 #else
 354 #define SI_MSG(args)
 355 #endif                          /* BCMDBG */
 356
 357 #define GOODCOREADDR(x, b) \
 358         (((x) >= (b)) && ((x) < ((b) + SI_MAXCORES * SI_CORE_SIZE)) && \
 359                 IS_ALIGNED((x), SI_CORE_SIZE))
 360
 361 #define PCIEREGS(si) ((__iomem char *)((si)->curmap) + \
 362                         PCI_16KB0_PCIREGS_OFFSET)
 363
 364 struct aidmp {
 365         u32 oobselina30;        /* 0x000 */
 366         u32 oobselina74;        /* 0x004 */
 367         u32 PAD[6];
 368         u32 oobselinb30;        /* 0x020 */
 369         u32 oobselinb74;        /* 0x024 */
 370         u32 PAD[6];
 371         u32 oobselinc30;        /* 0x040 */
 372         u32 oobselinc74;        /* 0x044 */
 373         u32 PAD[6];
 374         u32 oobselind30;        /* 0x060 */
 375         u32 oobselind74;        /* 0x064 */
 376         u32 PAD[38];
 377         u32 oobselouta30;       /* 0x100 */
 378         u32 oobselouta74;       /* 0x104 */
 379         u32 PAD[6];
 380         u32 oobseloutb30;       /* 0x120 */
 381         u32 oobseloutb74;       /* 0x124 */
 382         u32 PAD[6];
 383         u32 oobseloutc30;       /* 0x140 */
 384         u32 oobseloutc74;       /* 0x144 */
 385         u32 PAD[6];
 386         u32 oobseloutd30;       /* 0x160 */
 387         u32 oobseloutd74;       /* 0x164 */
 388         u32 PAD[38];
 389         u32 oobsynca;   /* 0x200 */
 390         u32 oobseloutaen;       /* 0x204 */
 391         u32 PAD[6];
 392         u32 oobsyncb;   /* 0x220 */
 393         u32 oobseloutben;       /* 0x224 */
 394         u32 PAD[6];
 395         u32 oobsyncc;   /* 0x240 */
 396         u32 oobseloutcen;       /* 0x244 */
 397         u32 PAD[6];
 398         u32 oobsyncd;   /* 0x260 */
 399         u32 oobseloutden;       /* 0x264 */
 400         u32 PAD[38];
 401         u32 oobaextwidth;       /* 0x300 */
 402         u32 oobainwidth;        /* 0x304 */
 403         u32 oobaoutwidth;       /* 0x308 */
 404         u32 PAD[5];
 405         u32 oobbextwidth;       /* 0x320 */
 406         u32 oobbinwidth;        /* 0x324 */
 407         u32 oobboutwidth;       /* 0x328 */
 408         u32 PAD[5];
 409         u32 oobcextwidth;       /* 0x340 */
 410         u32 oobcinwidth;        /* 0x344 */
 411         u32 oobcoutwidth;       /* 0x348 */
 412         u32 PAD[5];
 413         u32 oobdextwidth;       /* 0x360 */
 414         u32 oobdinwidth;        /* 0x364 */
 415         u32 oobdoutwidth;       /* 0x368 */
 416         u32 PAD[37];
 417         u32 ioctrlset;  /* 0x400 */
 418         u32 ioctrlclear;        /* 0x404 */
 419         u32 ioctrl;             /* 0x408 */
 420         u32 PAD[61];
 421         u32 iostatus;   /* 0x500 */
 422         u32 PAD[127];
 423         u32 ioctrlwidth;        /* 0x700 */
 424         u32 iostatuswidth;      /* 0x704 */
 425         u32 PAD[62];
 426         u32 resetctrl;  /* 0x800 */
 427         u32 resetstatus;        /* 0x804 */
 428         u32 resetreadid;        /* 0x808 */
 429         u32 resetwriteid;       /* 0x80c */
 430         u32 PAD[60];
 431         u32 errlogctrl; /* 0x900 */
 432         u32 errlogdone; /* 0x904 */
 433         u32 errlogstatus;       /* 0x908 */
 434         u32 errlogaddrlo;       /* 0x90c */
 435         u32 errlogaddrhi;       /* 0x910 */
 436         u32 errlogid;   /* 0x914 */
 437         u32 errloguser; /* 0x918 */
 438         u32 errlogflags;        /* 0x91c */
 439         u32 PAD[56];
 440         u32 intstatus;  /* 0xa00 */
 441         u32 PAD[127];
 442         u32 config;             /* 0xe00 */
 443         u32 PAD[63];
 444         u32 itcr;               /* 0xf00 */
 445         u32 PAD[3];
 446         u32 itipooba;   /* 0xf10 */
 447         u32 itipoobb;   /* 0xf14 */
 448         u32 itipoobc;   /* 0xf18 */
 449         u32 itipoobd;   /* 0xf1c */
 450         u32 PAD[4];
 451         u32 itipoobaout;        /* 0xf30 */
 452         u32 itipoobbout;        /* 0xf34 */
 453         u32 itipoobcout;        /* 0xf38 */
 454         u32 itipoobdout;        /* 0xf3c */
 455         u32 PAD[4];
 456         u32 itopooba;   /* 0xf50 */
 457         u32 itopoobb;   /* 0xf54 */
 458         u32 itopoobc;   /* 0xf58 */
 459         u32 itopoobd;   /* 0xf5c */
 460         u32 PAD[4];
 461         u32 itopoobain; /* 0xf70 */
 462         u32 itopoobbin; /* 0xf74 */
 463         u32 itopoobcin; /* 0xf78 */
 464         u32 itopoobdin; /* 0xf7c */
 465         u32 PAD[4];
 466         u32 itopreset;  /* 0xf90 */
 467         u32 PAD[15];
 468         u32 peripherialid4;     /* 0xfd0 */
 469         u32 peripherialid5;     /* 0xfd4 */
 470         u32 peripherialid6;     /* 0xfd8 */
 471         u32 peripherialid7;     /* 0xfdc */
 472         u32 peripherialid0;     /* 0xfe0 */
 473         u32 peripherialid1;     /* 0xfe4 */
 474         u32 peripherialid2;     /* 0xfe8 */
 475         u32 peripherialid3;     /* 0xfec */
 476         u32 componentid0;       /* 0xff0 */
 477         u32 componentid1;       /* 0xff4 */
 478         u32 componentid2;       /* 0xff8 */
 479         u32 componentid3;       /* 0xffc */
 480 };
 481
 482 /* EROM parsing */
 483
 484 static u32
 485 get_erom_ent(struct si_pub *sih, u32 __iomem **eromptr, u32 mask, u32 match)
 486 {
 487         u32 ent;
 488         uint inv = 0, nom = 0;
 489
 490         while (true) {
 491                 ent = R_REG(*eromptr);
 492                 (*eromptr)++;
 493
 494                 if (mask == 0)
 495                         break;
 496
 497                 if ((ent & ER_VALID) == 0) {
 498                         inv++;
 499                         continue;
 500                 }
 501
 502                 if (ent == (ER_END | ER_VALID))
 503                         break;
 504
 505                 if ((ent & mask) == match)
 506                         break;
 507
 508                 nom++;
 509         }
 510
 511         return ent;
 512 }
 513
 514 static u32
 515 get_asd(struct si_pub *sih, u32 __iomem **eromptr, uint sp, uint ad, uint st,
 516         u32 *addrl, u32 *addrh, u32 *sizel, u32 *sizeh)
 517 {
 518         u32 asd, sz, szd;
 519
 520         asd = get_erom_ent(sih, eromptr, ER_VALID, ER_VALID);
 521         if (((asd & ER_TAG1) != ER_ADD) ||
 522             (((asd & AD_SP_MASK) >> AD_SP_SHIFT) != sp) ||
 523             ((asd & AD_ST_MASK) != st)) {
 524                 /* This is not what we want, "push" it back */
 525                 (*eromptr)--;
 526                 return 0;
 527         }
 528         *addrl = asd & AD_ADDR_MASK;
 529         if (asd & AD_AG32)
 530                 *addrh = get_erom_ent(sih, eromptr, 0, 0);
 531         else
 532                 *addrh = 0;
 533         *sizeh = 0;
 534         sz = asd & AD_SZ_MASK;
 535         if (sz == AD_SZ_SZD) {
 536                 szd = get_erom_ent(sih, eromptr, 0, 0);
 537                 *sizel = szd & SD_SZ_MASK;
 538                 if (szd & SD_SG32)
 539                         *sizeh = get_erom_ent(sih, eromptr, 0, 0);
 540         } else
 541                 *sizel = AD_SZ_BASE << (sz >> AD_SZ_SHIFT);
 542
 543         return asd;
 544 }
 545
 546 static void ai_hwfixup(struct si_info *sii)
 547 {
 548 }
 549
 550 /* parse the enumeration rom to identify all cores */
 551 static void ai_scan(struct si_pub *sih, struct chipcregs __iomem *cc)
 552 {
 553         struct si_info *sii = (struct si_info *)sih;
 554
 555         u32 erombase;
 556         u32 __iomem *eromptr, *eromlim;
 557         void __iomem *regs = cc;
 558
 559         erombase = R_REG(&cc->eromptr);
 560
 561         /* Set wrappers address */
 562         sii->curwrap = (void *)((unsigned long)cc + SI_CORE_SIZE);
 563
 564         /* Now point the window at the erom */
 565         pci_write_config_dword(sii->pbus, PCI_BAR0_WIN, erombase);
 566         eromptr = regs;
 567         eromlim = eromptr + (ER_REMAPCONTROL / sizeof(u32));
 568
 569         while (eromptr < eromlim) {
 570                 u32 cia, cib, cid, mfg, crev, nmw, nsw, nmp, nsp;
 571                 u32 mpd, asd, addrl, addrh, sizel, sizeh;
 572                 u32 __iomem *base;
 573                 uint i, j, idx;
 574                 bool br;
 575
 576                 br = false;
 577
 578                 /* Grok a component */
 579                 cia = get_erom_ent(sih, &eromptr, ER_TAG, ER_CI);
 580                 if (cia == (ER_END | ER_VALID)) {
 581                         /*  Found END of erom */
 582                         ai_hwfixup(sii);
 583                         return;
 584                 }
 585                 base = eromptr - 1;
 586                 cib = get_erom_ent(sih, &eromptr, 0, 0);
 587
 588                 if ((cib & ER_TAG) != ER_CI) {
 589                         /* CIA not followed by CIB */
 590                         goto error;
 591                 }
 592
 593                 cid = (cia & CIA_CID_MASK) >> CIA_CID_SHIFT;
 594                 mfg = (cia & CIA_MFG_MASK) >> CIA_MFG_SHIFT;
 595                 crev = (cib & CIB_REV_MASK) >> CIB_REV_SHIFT;
 596                 nmw = (cib & CIB_NMW_MASK) >> CIB_NMW_SHIFT;
 597                 nsw = (cib & CIB_NSW_MASK) >> CIB_NSW_SHIFT;
 598                 nmp = (cib & CIB_NMP_MASK) >> CIB_NMP_SHIFT;
 599                 nsp = (cib & CIB_NSP_MASK) >> CIB_NSP_SHIFT;
 600
 601                 if (((mfg == MFGID_ARM) && (cid == DEF_AI_COMP)) || (nsp == 0))
 602                         continue;
 603                 if ((nmw + nsw == 0)) {
 604                         /* A component which is not a core */
 605                         if (cid == OOB_ROUTER_CORE_ID) {
 606                                 asd = get_asd(sih, &eromptr, 0, 0, AD_ST_SLAVE,
 607                                               &addrl, &addrh, &sizel, &sizeh);
 608                                 if (asd != 0)
 609                                         sii->oob_router = addrl;
 610                         }
 611                         continue;
 612                 }
 613
 614                 idx = sii->numcores;
 615 /*              sii->eromptr[idx] = base; */
 616                 sii->cia[idx] = cia;
 617                 sii->cib[idx] = cib;
 618                 sii->coreid[idx] = cid;
 619
 620                 for (i = 0; i < nmp; i++) {
 621                         mpd = get_erom_ent(sih, &eromptr, ER_VALID, ER_VALID);
 622                         if ((mpd & ER_TAG) != ER_MP) {
 623                                 /* Not enough MP entries for component */
 624                                 goto error;
 625                         }
 626                 }
 627
 628                 /* First Slave Address Descriptor should be port 0:
 629                  * the main register space for the core
 630                  */
 631                 asd =
 632                     get_asd(sih, &eromptr, 0, 0, AD_ST_SLAVE, &addrl, &addrh,
 633                             &sizel, &sizeh);
 634                 if (asd == 0) {
 635                         /* Try again to see if it is a bridge */
 636                         asd =
 637                             get_asd(sih, &eromptr, 0, 0, AD_ST_BRIDGE, &addrl,
 638                                     &addrh, &sizel, &sizeh);
 639                         if (asd != 0)
 640                                 br = true;
 641                         else if ((addrh != 0) || (sizeh != 0)
 642                                  || (sizel != SI_CORE_SIZE)) {
 643                                 /* First Slave ASD for core malformed */
 644                                 goto error;
 645                         }
 646                 }
 647                 sii->coresba[idx] = addrl;
 648                 sii->coresba_size[idx] = sizel;
 649                 /* Get any more ASDs in port 0 */
 650                 j = 1;
 651                 do {
 652                         asd =
 653                             get_asd(sih, &eromptr, 0, j, AD_ST_SLAVE, &addrl,
 654                                     &addrh, &sizel, &sizeh);
 655                         if ((asd != 0) && (j == 1) && (sizel == SI_CORE_SIZE)) {
 656                                 sii->coresba2[idx] = addrl;
 657                                 sii->coresba2_size[idx] = sizel;
 658                         }
 659                         j++;
 660                 } while (asd != 0);
 661
 662                 /* Go through the ASDs for other slave ports */
 663                 for (i = 1; i < nsp; i++) {
 664                         j = 0;
 665                         do {
 666                                 asd =
 667                                     get_asd(sih, &eromptr, i, j++, AD_ST_SLAVE,
 668                                             &addrl, &addrh, &sizel, &sizeh);
 669                         } while (asd != 0);
 670                         if (j == 0) {
 671                                 /* SP has no address descriptors */
 672                                 goto error;
 673                         }
 674                 }
 675
 676                 /* Now get master wrappers */
 677                 for (i = 0; i < nmw; i++) {
 678                         asd =
 679                             get_asd(sih, &eromptr, i, 0, AD_ST_MWRAP, &addrl,
 680                                     &addrh, &sizel, &sizeh);
 681                         if (asd == 0) {
 682                                 /* Missing descriptor for MW */
 683                                 goto error;
 684                         }
 685                         if ((sizeh != 0) || (sizel != SI_CORE_SIZE)) {
 686                                 /* Master wrapper %d is not 4KB */
 687                                 goto error;
 688                         }
 689                         if (i == 0)
 690                                 sii->wrapba[idx] = addrl;
 691                 }
 692
 693                 /* And finally slave wrappers */
 694                 for (i = 0; i < nsw; i++) {
 695                         uint fwp = (nsp == 1) ? 0 : 1;
 696                         asd =
 697                             get_asd(sih, &eromptr, fwp + i, 0, AD_ST_SWRAP,
 698                                     &addrl, &addrh, &sizel, &sizeh);
 699                         if (asd == 0) {
 700                                 /* Missing descriptor for SW */
 701                                 goto error;
 702                         }
 703                         if ((sizeh != 0) || (sizel != SI_CORE_SIZE)) {
 704                                 /* Slave wrapper is not 4KB */
 705                                 goto error;
 706                         }
 707                         if ((nmw == 0) && (i == 0))
 708                                 sii->wrapba[idx] = addrl;
 709                 }
 710
 711                 /* Don't record bridges */
 712                 if (br)
 713                         continue;
 714
 715                 /* Done with core */
 716                 sii->numcores++;
 717         }
 718
 719  error:
 720         /* Reached end of erom without finding END */
 721         sii->numcores = 0;
 722         return;
 723 }
 724
 725 /*
 726  * This function changes the logical "focus" to the indicated core.
 727  * Return the current core's virtual address. Since each core starts with the
 728  * same set of registers (BIST, clock control, etc), the returned address
 729  * contains the first register of this 'common' register block (not to be
 730  * confused with 'common core').
 731  */
 732 void __iomem *ai_setcoreidx(struct si_pub *sih, uint coreidx)
 733 {
 734         struct si_info *sii = (struct si_info *)sih;
 735         u32 addr = sii->coresba[coreidx];
 736         u32 wrap = sii->wrapba[coreidx];
 737
 738         if (coreidx >= sii->numcores)
 739                 return NULL;
 740
 741         /* point bar0 window */
 742         pci_write_config_dword(sii->pbus, PCI_BAR0_WIN, addr);
 743         /* point bar0 2nd 4KB window */
 744         pci_write_config_dword(sii->pbus, PCI_BAR0_WIN2, wrap);
 745         sii->curidx = coreidx;
 746
 747         return sii->curmap;
 748 }
 749
 750 /* Return the number of address spaces in current core */
 751 int ai_numaddrspaces(struct si_pub *sih)
 752 {
 753         return 2;
 754 }
 755
 756 /* Return the address of the nth address space in the current core */
 757 u32 ai_addrspace(struct si_pub *sih, uint asidx)
 758 {
 759         struct si_info *sii;
 760         uint cidx;
 761
 762         sii = (struct si_info *)sih;
 763         cidx = sii->curidx;
 764
 765         if (asidx == 0)
 766                 return sii->coresba[cidx];
 767         else if (asidx == 1)
 768                 return sii->coresba2[cidx];
 769         else {
 770                 /* Need to parse the erom again to find addr space */
 771                 return 0;
 772         }
 773 }
 774
 775 /* Return the size of the nth address space in the current core */
 776 u32 ai_addrspacesize(struct si_pub *sih, uint asidx)
 777 {
 778         struct si_info *sii;
 779         uint cidx;
 780
 781         sii = (struct si_info *)sih;
 782         cidx = sii->curidx;
 783
 784         if (asidx == 0)
 785                 return sii->coresba_size[cidx];
 786         else if (asidx == 1)
 787                 return sii->coresba2_size[cidx];
 788         else {
 789                 /* Need to parse the erom again to find addr */
 790                 return 0;
 791         }
 792 }
 793
 794 uint ai_flag(struct si_pub *sih)
 795 {
 796         struct si_info *sii;
 797         struct aidmp *ai;
 798
 799         sii = (struct si_info *)sih;
 800         ai = sii->curwrap;
 801
 802         return R_REG(&ai->oobselouta30) & 0x1f;
 803 }
 804
 805 void ai_setint(struct si_pub *sih, int siflag)
 806 {
 807 }
 808
 809 uint ai_corevendor(struct si_pub *sih)
 810 {
 811         struct si_info *sii;
 812         u32 cia;
 813
 814         sii = (struct si_info *)sih;
 815         cia = sii->cia[sii->curidx];
 816         return (cia & CIA_MFG_MASK) >> CIA_MFG_SHIFT;
 817 }
 818
 819 uint ai_corerev(struct si_pub *sih)
 820 {
 821         struct si_info *sii;
 822         u32 cib;
 823
 824         sii = (struct si_info *)sih;
 825         cib = sii->cib[sii->curidx];
 826         return (cib & CIB_REV_MASK) >> CIB_REV_SHIFT;
 827 }
 828
 829 bool ai_iscoreup(struct si_pub *sih)
 830 {
 831         struct si_info *sii;
 832         struct aidmp *ai;
 833
 834         sii = (struct si_info *)sih;
 835         ai = sii->curwrap;
 836
 837         return (((R_REG(&ai->ioctrl) & (SICF_FGC | SICF_CLOCK_EN)) ==
 838                  SICF_CLOCK_EN)
 839                 && ((R_REG(&ai->resetctrl) & AIRC_RESET) == 0));
 840 }
 841
 842 void ai_core_cflags_wo(struct si_pub *sih, u32 mask, u32 val)
 843 {
 844         struct si_info *sii;
 845         struct aidmp *ai;
 846         u32 w;
 847
 848         sii = (struct si_info *)sih;
 849
 850         ai = sii->curwrap;
 851
 852         if (mask || val) {
 853                 w = ((R_REG(&ai->ioctrl) & ~mask) | val);
 854                 W_REG(&ai->ioctrl, w);
 855         }
 856 }
 857
 858 u32 ai_core_cflags(struct si_pub *sih, u32 mask, u32 val)
 859 {
 860         struct si_info *sii;
 861         struct aidmp *ai;
 862         u32 w;
 863
 864         sii = (struct si_info *)sih;
 865         ai = sii->curwrap;
 866
 867         if (mask || val) {
 868                 w = ((R_REG(&ai->ioctrl) & ~mask) | val);
 869                 W_REG(&ai->ioctrl, w);
 870         }
 871
 872         return R_REG(&ai->ioctrl);
 873 }
 874
 875 /* return true if PCIE capability exists in the pci config space */
 876 static bool ai_ispcie(struct si_info *sii)
 877 {
 878         u8 cap_ptr;
 879
 880         cap_ptr =
 881             pcicore_find_pci_capability(sii->pbus, PCI_CAP_ID_EXP, NULL,
 882                                         NULL);
 883         if (!cap_ptr)
 884                 return false;
 885
 886         return true;
 887 }
 888
 889 static bool ai_buscore_prep(struct si_info *sii)
 890 {
 891         /* kludge to enable the clock on the 4306 which lacks a slowclock */
 892         if (!ai_ispcie(sii))
 893                 ai_clkctl_xtal(&sii->pub, XTAL | PLL, ON);
 894         return true;
 895 }
 896
 897 u32 ai_core_sflags(struct si_pub *sih, u32 mask, u32 val)
 898 {
 899         struct si_info *sii;
 900         struct aidmp *ai;
 901         u32 w;
 902
 903         sii = (struct si_info *)sih;
 904         ai = sii->curwrap;
 905
 906         if (mask || val) {
 907                 w = ((R_REG(&ai->iostatus) & ~mask) | val);
 908                 W_REG(&ai->iostatus, w);
 909         }
 910
 911         return R_REG(&ai->iostatus);
 912 }
 913
 914 static bool
 915 ai_buscore_setup(struct si_info *sii, u32 savewin, uint *origidx)
 916 {
 917         bool pci, pcie;
 918         uint i;
 919         uint pciidx, pcieidx, pcirev, pcierev;
 920         struct chipcregs __iomem *cc;
 921
 922         cc = ai_setcoreidx(&sii->pub, SI_CC_IDX);
 923
 924         /* get chipcommon rev */
 925         sii->pub.ccrev = (int)ai_corerev(&sii->pub);
 926
 927         /* get chipcommon chipstatus */
 928         if (sii->pub.ccrev >= 11)
 929                 sii->pub.chipst = R_REG(&cc->chipstatus);
 930
 931         /* get chipcommon capabilites */
 932         sii->pub.cccaps = R_REG(&cc->capabilities);
 933         /* get chipcommon extended capabilities */
 934
 935         if (sii->pub.ccrev >= 35)
 936                 sii->pub.cccaps_ext = R_REG(&cc->capabilities_ext);
 937
 938         /* get pmu rev and caps */
 939         if (sii->pub.cccaps & CC_CAP_PMU) {
 940                 sii->pub.pmucaps = R_REG(&cc->pmucapabilities);
 941                 sii->pub.pmurev = sii->pub.pmucaps & PCAP_REV_MASK;
 942         }
 943
 944         /* figure out bus/orignal core idx */
 945         sii->pub.buscoretype = NODEV_CORE_ID;
 946         sii->pub.buscorerev = NOREV;
 947         sii->pub.buscoreidx = BADIDX;
 948
 949         pci = pcie = false;
 950         pcirev = pcierev = NOREV;
 951         pciidx = pcieidx = BADIDX;
 952
 953         for (i = 0; i < sii->numcores; i++) {
 954                 uint cid, crev;
 955
 956                 ai_setcoreidx(&sii->pub, i);
 957                 cid = ai_coreid(&sii->pub);
 958                 crev = ai_corerev(&sii->pub);
 959
 960                 if (cid == PCI_CORE_ID) {
 961                         pciidx = i;
 962                         pcirev = crev;
 963                         pci = true;
 964                 } else if (cid == PCIE_CORE_ID) {
 965                         pcieidx = i;
 966                         pcierev = crev;
 967                         pcie = true;
 968                 }
 969
 970                 /* find the core idx before entering this func. */
 971                 if ((savewin && (savewin == sii->coresba[i])) ||
 972                     (cc == sii->regs[i]))
 973                         *origidx = i;
 974         }
 975
 976         if (pci && pcie) {
 977                 if (ai_ispcie(sii))
 978                         pci = false;
 979                 else
 980                         pcie = false;
 981         }
 982         if (pci) {
 983                 sii->pub.buscoretype = PCI_CORE_ID;
 984                 sii->pub.buscorerev = pcirev;
 985                 sii->pub.buscoreidx = pciidx;
 986         } else if (pcie) {
 987                 sii->pub.buscoretype = PCIE_CORE_ID;
 988                 sii->pub.buscorerev = pcierev;
 989                 sii->pub.buscoreidx = pcieidx;
 990         }
 991
 992         /* fixup necessary chip/core configurations */
 993         if (SI_FAST(sii)) {
 994                 if (!sii->pch) {
 995                         sii->pch = pcicore_init(&sii->pub, sii->pbus,
 996                                                 (__iomem void *)PCIEREGS(sii));
 997                         if (sii->pch == NULL)
 998                                 return false;
 999                 }
1000         }
1001         if (ai_pci_fixcfg(&sii->pub)) {
1002                 /* si_doattach: si_pci_fixcfg failed */
1003                 return false;
1004         }
1005
1006         /* return to the original core */
1007         ai_setcoreidx(&sii->pub, *origidx);
1008
1009         return true;
1010 }
1011
1012 /*
1013  * get boardtype and boardrev
1014  */
1015 static __used void ai_nvram_process(struct si_info *sii)
1016 {
1017         uint w = 0;
1018
1019         /* do a pci config read to get subsystem id and subvendor id */
1020         pci_read_config_dword(sii->pbus, PCI_SUBSYSTEM_VENDOR_ID, &w);
1021
1022         sii->pub.boardvendor = w & 0xffff;
1023         sii->pub.boardtype = (w >> 16) & 0xffff;
1024         sii->pub.boardflags = getintvar(&sii->pub, "boardflags");
1025 }
1026
1027 static struct si_info *ai_doattach(struct si_info *sii,
1028                                    void __iomem *regs, struct pci_dev *pbus,
1029                                    char **vars, uint *varsz)
1030 {
1031         struct si_pub *sih = &sii->pub;
1032         u32 w, savewin;
1033         struct chipcregs __iomem *cc;
1034         uint socitype;
1035         uint origidx;
1036
1037         memset((unsigned char *) sii, 0, sizeof(struct si_info));
1038
1039         savewin = 0;
1040
1041         sih->buscoreidx = BADIDX;
1042
1043         sii->curmap = regs;
1044         sii->pbus = pbus;
1045
1046         /* find Chipcommon address */
1047         pci_read_config_dword(sii->pbus, PCI_BAR0_WIN, &savewin);
1048         if (!GOODCOREADDR(savewin, SI_ENUM_BASE))
1049                 savewin = SI_ENUM_BASE;
1050
1051         pci_write_config_dword(sii->pbus, PCI_BAR0_WIN,
1052                                SI_ENUM_BASE);
1053         cc = (struct chipcregs __iomem *) regs;
1054
1055         /* bus/core/clk setup for register access */
1056         if (!ai_buscore_prep(sii))
1057                 return NULL;
1058
1059         /*
1060          * ChipID recognition.
1061          *   We assume we can read chipid at offset 0 from the regs arg.
1062          *   If we add other chiptypes (or if we need to support old sdio
1063          *   hosts w/o chipcommon), some way of recognizing them needs to
1064          *   be added here.
1065          */
1066         w = R_REG(&cc->chipid);
1067         socitype = (w & CID_TYPE_MASK) >> CID_TYPE_SHIFT;
1068         /* Might as wll fill in chip id rev & pkg */
1069         sih->chip = w & CID_ID_MASK;
1070         sih->chiprev = (w & CID_REV_MASK) >> CID_REV_SHIFT;
1071         sih->chippkg = (w & CID_PKG_MASK) >> CID_PKG_SHIFT;
1072
1073         sih->issim = false;
1074
1075         /* scan for cores */
1076         if (socitype == SOCI_AI) {
1077                 SI_MSG(("Found chip type AI (0x%08x)\n", w));
1078                 /* pass chipc address instead of original core base */
1079                 ai_scan(&sii->pub, cc);
1080         } else {
1081                 /* Found chip of unknown type */
1082                 return NULL;
1083         }
1084         /* no cores found, bail out */
1085         if (sii->numcores == 0)
1086                 return NULL;
1087
1088         /* bus/core/clk setup */
1089         origidx = SI_CC_IDX;
1090         if (!ai_buscore_setup(sii, savewin, &origidx))
1091                 goto exit;
1092
1093         /* Init nvram from sprom/otp if they exist */
1094         if (srom_var_init(&sii->pub, cc, vars, varsz))
1095                 goto exit;
1096
1097         sii->vars = vars ? *vars : NULL;
1098         sii->varsz = varsz ? *varsz : 0;
1099         ai_nvram_process(sii);
1100
1101         /* === NVRAM, clock is ready === */
1102         cc = (struct chipcregs __iomem *) ai_setcore(sih, CC_CORE_ID, 0);
1103         W_REG(&cc->gpiopullup, 0);
1104         W_REG(&cc->gpiopulldown, 0);
1105         ai_setcoreidx(sih, origidx);
1106
1107         /* PMU specific initializations */
1108         if (sih->cccaps & CC_CAP_PMU) {
1109                 u32 xtalfreq;
1110                 si_pmu_init(sih);
1111                 si_pmu_chip_init(sih);
1112
1113                 xtalfreq = si_pmu_measure_alpclk(sih);
1114                 si_pmu_pll_init(sih, xtalfreq);
1115                 si_pmu_res_init(sih);
1116                 si_pmu_swreg_init(sih);
1117         }
1118
1119         /* setup the GPIO based LED powersave register */
1120         w = getintvar(sih, "leddc");
1121         if (w == 0)
1122                 w = DEFAULT_GPIOTIMERVAL;
1123         ai_corereg(sih, SI_CC_IDX, offsetof(struct chipcregs, gpiotimerval),
1124                    ~0, w);
1125
1126         if (PCIE(sii))
1127                 pcicore_attach(sii->pch, SI_DOATTACH);
1128
1129         if (sih->chip == BCM43224_CHIP_ID) {
1130                 /*
1131                  * enable 12 mA drive strenth for 43224 and
1132                  * set chipControl register bit 15
1133                  */
1134                 if (sih->chiprev == 0) {
1135                         SI_MSG(("Applying 43224A0 WARs\n"));
1136                         ai_corereg(sih, SI_CC_IDX,
1137                                    offsetof(struct chipcregs, chipcontrol),
1138                                    CCTRL43224_GPIO_TOGGLE,
1139                                    CCTRL43224_GPIO_TOGGLE);
1140                         si_pmu_chipcontrol(sih, 0, CCTRL_43224A0_12MA_LED_DRIVE,
1141                                            CCTRL_43224A0_12MA_LED_DRIVE);
1142                 }
1143                 if (sih->chiprev >= 1) {
1144                         SI_MSG(("Applying 43224B0+ WARs\n"));
1145                         si_pmu_chipcontrol(sih, 0, CCTRL_43224B0_12MA_LED_DRIVE,
1146                                            CCTRL_43224B0_12MA_LED_DRIVE);
1147                 }
1148         }
1149
1150         if (sih->chip == BCM4313_CHIP_ID) {
1151                 /*
1152                  * enable 12 mA drive strenth for 4313 and
1153                  * set chipControl register bit 1
1154                  */
1155                 SI_MSG(("Applying 4313 WARs\n"));
1156                 si_pmu_chipcontrol(sih, 0, CCTRL_4313_12MA_LED_DRIVE,
1157                                    CCTRL_4313_12MA_LED_DRIVE);
1158         }
1159
1160         return sii;
1161
1162  exit:
1163         if (sii->pch)
1164                 pcicore_deinit(sii->pch);
1165         sii->pch = NULL;
1166
1167         return NULL;
1168 }
1169
1170 /*
1171  * Allocate a si handle.
1172  * devid - pci device id (used to determine chip#)
1173  * osh - opaque OS handle
1174  * regs - virtual address of initial core registers
1175  * vars - pointer to a pointer area for "environment" variables
1176  * varsz - pointer to int to return the size of the vars
1177  */
1178 struct si_pub *
1179 ai_attach(void __iomem *regs, struct pci_dev *sdh, char **vars, uint *varsz)
1180 {
1181         struct si_info *sii;
1182
1183         /* alloc struct si_info */
1184         sii = kmalloc(sizeof(struct si_info), GFP_ATOMIC);
1185         if (sii == NULL)
1186                 return NULL;
1187
1188         if (ai_doattach(sii, regs, sdh, vars, varsz) == NULL) {
1189                 kfree(sii);
1190                 return NULL;
1191         }
1192
1193         return (struct si_pub *) sii;
1194 }
1195
1196 /* may be called with core in reset */
1197 void ai_detach(struct si_pub *sih)
1198 {
1199         struct si_info *sii;
1200
1201         struct si_pub *si_local = NULL;
1202         memcpy(&si_local, &sih, sizeof(struct si_pub **));
1203
1204         sii = (struct si_info *)sih;
1205
1206         if (sii == NULL)
1207                 return;
1208
1209         if (sii->pch)
1210                 pcicore_deinit(sii->pch);
1211         sii->pch = NULL;
1212
1213         kfree(sii);
1214 }
1215
1216 /* register driver interrupt disabling and restoring callback functions */
1217 void
1218 ai_register_intr_callback(struct si_pub *sih, void *intrsoff_fn,
1219                           void *intrsrestore_fn,
1220                           void *intrsenabled_fn, void *intr_arg)
1221 {
1222         struct si_info *sii;
1223
1224         sii = (struct si_info *)sih;
1225         sii->intr_arg = intr_arg;
1226         sii->intrsoff_fn = (u32 (*)(void *)) intrsoff_fn;
1227         sii->intrsrestore_fn = (void (*) (void *, u32)) intrsrestore_fn;
1228         sii->intrsenabled_fn = (bool (*)(void *)) intrsenabled_fn;
1229         /* save current core id.  when this function called, the current core
1230          * must be the core which provides driver functions(il, et, wl, etc.)
1231          */
1232         sii->dev_coreid = sii->coreid[sii->curidx];
1233 }
1234
1235 void ai_deregister_intr_callback(struct si_pub *sih)
1236 {
1237         struct si_info *sii;
1238
1239         sii = (struct si_info *)sih;
1240         sii->intrsoff_fn = NULL;
1241 }
1242
1243 uint ai_coreid(struct si_pub *sih)
1244 {
1245         struct si_info *sii;
1246
1247         sii = (struct si_info *)sih;
1248         return sii->coreid[sii->curidx];
1249 }
1250
1251 uint ai_coreidx(struct si_pub *sih)
1252 {
1253         struct si_info *sii;
1254
1255         sii = (struct si_info *)sih;
1256         return sii->curidx;
1257 }
1258
1259 bool ai_backplane64(struct si_pub *sih)
1260 {
1261         return (sih->cccaps & CC_CAP_BKPLN64) != 0;
1262 }
1263
1264 /* return index of coreid or BADIDX if not found */
1265 uint ai_findcoreidx(struct si_pub *sih, uint coreid, uint coreunit)
1266 {
1267         struct si_info *sii;
1268         uint found;
1269         uint i;
1270
1271         sii = (struct si_info *)sih;
1272
1273         found = 0;
1274
1275         for (i = 0; i < sii->numcores; i++)
1276                 if (sii->coreid[i] == coreid) {
1277                         if (found == coreunit)
1278                                 return i;
1279                         found++;
1280                 }
1281
1282         return BADIDX;
1283 }
1284
1285 /*
1286  * This function changes logical "focus" to the indicated core;
1287  * must be called with interrupts off.
1288  * Moreover, callers should keep interrupts off during switching
1289  * out of and back to d11 core.
1290  */
1291 void __iomem *ai_setcore(struct si_pub *sih, uint coreid, uint coreunit)
1292 {
1293         uint idx;
1294
1295         idx = ai_findcoreidx(sih, coreid, coreunit);
1296         if (idx >= SI_MAXCORES)
1297                 return NULL;
1298
1299         return ai_setcoreidx(sih, idx);
1300 }
1301
1302 /* Turn off interrupt as required by ai_setcore, before switch core */
1303 void __iomem *ai_switch_core(struct si_pub *sih, uint coreid, uint *origidx,
1304                              uint *intr_val)
1305 {
1306         void __iomem *cc;
1307         struct si_info *sii;
1308
1309         sii = (struct si_info *)sih;
1310
1311         if (SI_FAST(sii)) {
1312                 /* Overloading the origidx variable to remember the coreid,
1313                  * this works because the core ids cannot be confused with
1314                  * core indices.
1315                  */
1316                 *origidx = coreid;
1317                 if (coreid == CC_CORE_ID)
1318                         return CCREGS_FAST(sii);
1319                 else if (coreid == sih->buscoretype)
1320                         return PCIEREGS(sii);
1321         }
1322         INTR_OFF(sii, *intr_val);
1323         *origidx = sii->curidx;
1324         cc = ai_setcore(sih, coreid, 0);
1325         return cc;
1326 }
1327
1328 /* restore coreidx and restore interrupt */
1329 void ai_restore_core(struct si_pub *sih, uint coreid, uint intr_val)
1330 {
1331         struct si_info *sii;
1332
1333         sii = (struct si_info *)sih;
1334         if (SI_FAST(sii)
1335             && ((coreid == CC_CORE_ID) || (coreid == sih->buscoretype)))
1336                 return;
1337
1338         ai_setcoreidx(sih, coreid);
1339         INTR_RESTORE(sii, intr_val);
1340 }
1341
1342 void ai_write_wrapperreg(struct si_pub *sih, u32 offset, u32 val)
1343 {
1344         struct si_info *sii = (struct si_info *)sih;
1345         u32 *w = (u32 *) sii->curwrap;
1346         W_REG(w + (offset / 4), val);
1347         return;
1348 }
1349
1350 /*
1351  * Switch to 'coreidx', issue a single arbitrary 32bit register mask&set
1352  * operation, switch back to the original core, and return the new value.
1353  *
1354  * When using the silicon backplane, no fiddling with interrupts or core
1355  * switches is needed.
1356  *
1357  * Also, when using pci/pcie, we can optimize away the core switching for pci
1358  * registers and (on newer pci cores) chipcommon registers.
1359  */
1360 uint ai_corereg(struct si_pub *sih, uint coreidx, uint regoff, uint mask,
1361                 uint val)
1362 {
1363         uint origidx = 0;
1364         u32 __iomem *r = NULL;
1365         uint w;
1366         uint intr_val = 0;
1367         bool fast = false;
1368         struct si_info *sii;
1369
1370         sii = (struct si_info *)sih;
1371
1372         if (coreidx >= SI_MAXCORES)
1373                 return 0;
1374
1375         /*
1376          * If pci/pcie, we can get at pci/pcie regs
1377          * and on newer cores to chipc
1378          */
1379         if ((sii->coreid[coreidx] == CC_CORE_ID) && SI_FAST(sii)) {
1380                 /* Chipc registers are mapped at 12KB */
1381                 fast = true;
1382                 r = (u32 __iomem *)((__iomem char *)sii->curmap +
1383                                     PCI_16KB0_CCREGS_OFFSET + regoff);
1384         } else if (sii->pub.buscoreidx == coreidx) {
1385                 /*
1386                  * pci registers are at either in the last 2KB of
1387                  * an 8KB window or, in pcie and pci rev 13 at 8KB
1388                  */
1389                 fast = true;
1390                 if (SI_FAST(sii))
1391                         r = (u32 __iomem *)((__iomem char *)sii->curmap +
1392                                     PCI_16KB0_PCIREGS_OFFSET + regoff);
1393                 else
1394                         r = (u32 __iomem *)((__iomem char *)sii->curmap +
1395                                     ((regoff >= SBCONFIGOFF) ?
1396                                       PCI_BAR0_PCISBR_OFFSET :
1397                                       PCI_BAR0_PCIREGS_OFFSET) + regoff);
1398         }
1399
1400         if (!fast) {
1401                 INTR_OFF(sii, intr_val);
1402
1403                 /* save current core index */
1404                 origidx = ai_coreidx(&sii->pub);
1405
1406                 /* switch core */
1407                 r = (u32 __iomem *) ((unsigned char __iomem *)
1408                         ai_setcoreidx(&sii->pub, coreidx) + regoff);
1409         }
1410
1411         /* mask and set */
1412         if (mask || val) {
1413                 w = (R_REG(r) & ~mask) | val;
1414                 W_REG(r, w);
1415         }
1416
1417         /* readback */
1418         w = R_REG(r);
1419
1420         if (!fast) {
1421                 /* restore core index */
1422                 if (origidx != coreidx)
1423                         ai_setcoreidx(&sii->pub, origidx);
1424
1425                 INTR_RESTORE(sii, intr_val);
1426         }
1427
1428         return w;
1429 }
1430
1431 void ai_core_disable(struct si_pub *sih, u32 bits)
1432 {
1433         struct si_info *sii;
1434         u32 dummy;
1435         struct aidmp *ai;
1436
1437         sii = (struct si_info *)sih;
1438
1439         ai = sii->curwrap;
1440
1441         /* if core is already in reset, just return */
1442         if (R_REG(&ai->resetctrl) & AIRC_RESET)
1443                 return;
1444
1445         W_REG(&ai->ioctrl, bits);
1446         dummy = R_REG(&ai->ioctrl);
1447         udelay(10);
1448
1449         W_REG(&ai->resetctrl, AIRC_RESET);
1450         udelay(1);
1451 }
1452
1453 /* reset and re-enable a core
1454  * inputs:
1455  * bits - core specific bits that are set during and after reset sequence
1456  * resetbits - core specific bits that are set only during reset sequence
1457  */
1458 void ai_core_reset(struct si_pub *sih, u32 bits, u32 resetbits)
1459 {
1460         struct si_info *sii;
1461         struct aidmp *ai;
1462         u32 dummy;
1463
1464         sii = (struct si_info *)sih;
1465         ai = sii->curwrap;
1466
1467         /*
1468          * Must do the disable sequence first to work
1469          * for arbitrary current core state.
1470          */
1471         ai_core_disable(sih, (bits | resetbits));
1472
1473         /*
1474          * Now do the initialization sequence.
1475          */
1476         W_REG(&ai->ioctrl, (bits | SICF_FGC | SICF_CLOCK_EN));
1477         dummy = R_REG(&ai->ioctrl);
1478         W_REG(&ai->resetctrl, 0);
1479         udelay(1);
1480
1481         W_REG(&ai->ioctrl, (bits | SICF_CLOCK_EN));
1482         dummy = R_REG(&ai->ioctrl);
1483         udelay(1);
1484 }
1485
1486 /* return the slow clock source - LPO, XTAL, or PCI */
1487 static uint ai_slowclk_src(struct si_info *sii)
1488 {
1489         struct chipcregs __iomem *cc;
1490         u32 val;
1491
1492         if (sii->pub.ccrev < 6) {
1493                 pci_read_config_dword(sii->pbus, PCI_GPIO_OUT,
1494                                       &val);
1495                 if (val & PCI_CFG_GPIO_SCS)
1496                         return SCC_SS_PCI;
1497                 return SCC_SS_XTAL;
1498         } else if (sii->pub.ccrev < 10) {
1499                 cc = (struct chipcregs __iomem *)
1500                         ai_setcoreidx(&sii->pub, sii->curidx);
1501                 return R_REG(&cc->slow_clk_ctl) & SCC_SS_MASK;
1502         } else                  /* Insta-clock */
1503                 return SCC_SS_XTAL;
1504 }
1505
1506 /*
1507 * return the ILP (slowclock) min or max frequency
1508 * precondition: we've established the chip has dynamic clk control
1509 */
1510 static uint ai_slowclk_freq(struct si_info *sii, bool max_freq,
1511                             struct chipcregs __iomem *cc)
1512 {
1513         u32 slowclk;
1514         uint div;
1515
1516         slowclk = ai_slowclk_src(sii);
1517         if (sii->pub.ccrev < 6) {
1518                 if (slowclk == SCC_SS_PCI)
1519                         return max_freq ? (PCIMAXFREQ / 64)
1520                                 : (PCIMINFREQ / 64);
1521                 else
1522                         return max_freq ? (XTALMAXFREQ / 32)
1523                                 : (XTALMINFREQ / 32);
1524         } else if (sii->pub.ccrev < 10) {
1525                 div = 4 *
1526                     (((R_REG(&cc->slow_clk_ctl) & SCC_CD_MASK) >>
1527                       SCC_CD_SHIFT) + 1);
1528                 if (slowclk == SCC_SS_LPO)
1529                         return max_freq ? LPOMAXFREQ : LPOMINFREQ;
1530                 else if (slowclk == SCC_SS_XTAL)
1531                         return max_freq ? (XTALMAXFREQ / div)
1532                                 : (XTALMINFREQ / div);
1533                 else if (slowclk == SCC_SS_PCI)
1534                         return max_freq ? (PCIMAXFREQ / div)
1535                                 : (PCIMINFREQ / div);
1536         } else {
1537                 /* Chipc rev 10 is InstaClock */
1538                 div = R_REG(&cc->system_clk_ctl) >> SYCC_CD_SHIFT;
1539                 div = 4 * (div + 1);
1540                 return max_freq ? XTALMAXFREQ : (XTALMINFREQ / div);
1541         }
1542         return 0;
1543 }
1544
1545 static void
1546 ai_clkctl_setdelay(struct si_info *sii, struct chipcregs __iomem *cc)
1547 {
1548         uint slowmaxfreq, pll_delay, slowclk;
1549         uint pll_on_delay, fref_sel_delay;
1550
1551         pll_delay = PLL_DELAY;
1552
1553         /*
1554          * If the slow clock is not sourced by the xtal then
1555          * add the xtal_on_delay since the xtal will also be
1556          * powered down by dynamic clk control logic.
1557          */
1558
1559         slowclk = ai_slowclk_src(sii);
1560         if (slowclk != SCC_SS_XTAL)
1561                 pll_delay += XTAL_ON_DELAY;
1562
1563         /* Starting with 4318 it is ILP that is used for the delays */
1564         slowmaxfreq =
1565             ai_slowclk_freq(sii, (sii->pub.ccrev >= 10) ? false : true, cc);
1566
1567         pll_on_delay = ((slowmaxfreq * pll_delay) + 999999) / 1000000;
1568         fref_sel_delay = ((slowmaxfreq * FREF_DELAY) + 999999) / 1000000;
1569
1570         W_REG(&cc->pll_on_delay, pll_on_delay);
1571         W_REG(&cc->fref_sel_delay, fref_sel_delay);
1572 }
1573
1574 /* initialize power control delay registers */
1575 void ai_clkctl_init(struct si_pub *sih)
1576 {
1577         struct si_info *sii;
1578         uint origidx = 0;
1579         struct chipcregs __iomem *cc;
1580         bool fast;
1581
1582         if (!(sih->cccaps & CC_CAP_PWR_CTL))
1583                 return;
1584
1585         sii = (struct si_info *)sih;
1586         fast = SI_FAST(sii);
1587         if (!fast) {
1588                 origidx = sii->curidx;
1589                 cc = (struct chipcregs __iomem *)
1590                         ai_setcore(sih, CC_CORE_ID, 0);
1591                 if (cc == NULL)
1592                         return;
1593         } else {
1594                 cc = (struct chipcregs __iomem *) CCREGS_FAST(sii);
1595                 if (cc == NULL)
1596                         return;
1597         }
1598
1599         /* set all Instaclk chip ILP to 1 MHz */
1600         if (sih->ccrev >= 10)
1601                 SET_REG(&cc->system_clk_ctl, SYCC_CD_MASK,
1602                         (ILP_DIV_1MHZ << SYCC_CD_SHIFT));
1603
1604         ai_clkctl_setdelay(sii, cc);
1605
1606         if (!fast)
1607                 ai_setcoreidx(sih, origidx);
1608 }
1609
1610 /*
1611  * return the value suitable for writing to the
1612  * dot11 core FAST_PWRUP_DELAY register
1613  */
1614 u16 ai_clkctl_fast_pwrup_delay(struct si_pub *sih)
1615 {
1616         struct si_info *sii;
1617         uint origidx = 0;
1618         struct chipcregs __iomem *cc;
1619         uint slowminfreq;
1620         u16 fpdelay;
1621         uint intr_val = 0;
1622         bool fast;
1623
1624         sii = (struct si_info *)sih;
1625         if (sih->cccaps & CC_CAP_PMU) {
1626                 INTR_OFF(sii, intr_val);
1627                 fpdelay = si_pmu_fast_pwrup_delay(sih);
1628                 INTR_RESTORE(sii, intr_val);
1629                 return fpdelay;
1630         }
1631
1632         if (!(sih->cccaps & CC_CAP_PWR_CTL))
1633                 return 0;
1634
1635         fast = SI_FAST(sii);
1636         fpdelay = 0;
1637         if (!fast) {
1638                 origidx = sii->curidx;
1639                 INTR_OFF(sii, intr_val);
1640                 cc = (struct chipcregs __iomem *)
1641                         ai_setcore(sih, CC_CORE_ID, 0);
1642                 if (cc == NULL)
1643                         goto done;
1644         } else {
1645                 cc = (struct chipcregs __iomem *) CCREGS_FAST(sii);
1646                 if (cc == NULL)
1647                         goto done;
1648         }
1649
1650         slowminfreq = ai_slowclk_freq(sii, false, cc);
1651         fpdelay = (((R_REG(&cc->pll_on_delay) + 2) * 1000000) +
1652                    (slowminfreq - 1)) / slowminfreq;
1653
1654  done:
1655         if (!fast) {
1656                 ai_setcoreidx(sih, origidx);
1657                 INTR_RESTORE(sii, intr_val);
1658         }
1659         return fpdelay;
1660 }
1661
1662 /* turn primary xtal and/or pll off/on */
1663 int ai_clkctl_xtal(struct si_pub *sih, uint what, bool on)
1664 {
1665         struct si_info *sii;
1666         u32 in, out, outen;
1667
1668         sii = (struct si_info *)sih;
1669
1670         /* pcie core doesn't have any mapping to control the xtal pu */
1671         if (PCIE(sii))
1672                 return -1;
1673
1674         pci_read_config_dword(sii->pbus, PCI_GPIO_IN, &in);
1675         pci_read_config_dword(sii->pbus, PCI_GPIO_OUT, &out);
1676         pci_read_config_dword(sii->pbus, PCI_GPIO_OUTEN, &outen);
1677
1678         /*
1679          * Avoid glitching the clock if GPRS is already using it.
1680          * We can't actually read the state of the PLLPD so we infer it
1681          * by the value of XTAL_PU which *is* readable via gpioin.
1682          */
1683         if (on && (in & PCI_CFG_GPIO_XTAL))
1684                 return 0;
1685
1686         if (what & XTAL)
1687                 outen |= PCI_CFG_GPIO_XTAL;
1688         if (what & PLL)
1689                 outen |= PCI_CFG_GPIO_PLL;
1690
1691         if (on) {
1692                 /* turn primary xtal on */
1693                 if (what & XTAL) {
1694                         out |= PCI_CFG_GPIO_XTAL;
1695                         if (what & PLL)
1696                                 out |= PCI_CFG_GPIO_PLL;
1697                         pci_write_config_dword(sii->pbus,
1698                                                PCI_GPIO_OUT, out);
1699                         pci_write_config_dword(sii->pbus,
1700                                                PCI_GPIO_OUTEN, outen);
1701                         udelay(XTAL_ON_DELAY);
1702                 }
1703
1704                 /* turn pll on */
1705                 if (what & PLL) {
1706                         out &= ~PCI_CFG_GPIO_PLL;
1707                         pci_write_config_dword(sii->pbus,
1708                                                PCI_GPIO_OUT, out);
1709                         mdelay(2);
1710                 }
1711         } else {
1712                 if (what & XTAL)
1713                         out &= ~PCI_CFG_GPIO_XTAL;
1714                 if (what & PLL)
1715                         out |= PCI_CFG_GPIO_PLL;
1716                 pci_write_config_dword(sii->pbus,
1717                                        PCI_GPIO_OUT, out);
1718                 pci_write_config_dword(sii->pbus,
1719                                        PCI_GPIO_OUTEN, outen);
1720         }
1721
1722         return 0;
1723 }
1724
1725 /* clk control mechanism through chipcommon, no policy checking */
1726 static bool _ai_clkctl_cc(struct si_info *sii, uint mode)
1727 {
1728         uint origidx = 0;
1729         struct chipcregs __iomem *cc;
1730         u32 scc;
1731         uint intr_val = 0;
1732         bool fast = SI_FAST(sii);
1733
1734         /* chipcommon cores prior to rev6 don't support dynamic clock control */
1735         if (sii->pub.ccrev < 6)
1736                 return false;
1737
1738         if (!fast) {
1739                 INTR_OFF(sii, intr_val);
1740                 origidx = sii->curidx;
1741                 cc = (struct chipcregs __iomem *)
1742                                         ai_setcore(&sii->pub, CC_CORE_ID, 0);
1743         } else {
1744                 cc = (struct chipcregs __iomem *) CCREGS_FAST(sii);
1745                 if (cc == NULL)
1746                         goto done;
1747         }
1748
1749         if (!(sii->pub.cccaps & CC_CAP_PWR_CTL) && (sii->pub.ccrev < 20))
1750                 goto done;
1751
1752         switch (mode) {
1753         case CLK_FAST:          /* FORCEHT, fast (pll) clock */
1754                 if (sii->pub.ccrev < 10) {
1755                         /*
1756                          * don't forget to force xtal back
1757                          * on before we clear SCC_DYN_XTAL..
1758                          */
1759                         ai_clkctl_xtal(&sii->pub, XTAL, ON);
1760                         SET_REG(&cc->slow_clk_ctl,
1761                                 (SCC_XC | SCC_FS | SCC_IP), SCC_IP);
1762                 } else if (sii->pub.ccrev < 20) {
1763                         OR_REG(&cc->system_clk_ctl, SYCC_HR);
1764                 } else {
1765                         OR_REG(&cc->clk_ctl_st, CCS_FORCEHT);
1766                 }
1767
1768                 /* wait for the PLL */
1769                 if (sii->pub.cccaps & CC_CAP_PMU) {
1770                         u32 htavail = CCS_HTAVAIL;
1771                         SPINWAIT(((R_REG(&cc->clk_ctl_st) & htavail)
1772                                   == 0), PMU_MAX_TRANSITION_DLY);
1773                 } else {
1774                         udelay(PLL_DELAY);
1775                 }
1776                 break;
1777
1778         case CLK_DYNAMIC:       /* enable dynamic clock control */
1779                 if (sii->pub.ccrev < 10) {
1780                         scc = R_REG(&cc->slow_clk_ctl);
1781                         scc &= ~(SCC_FS | SCC_IP | SCC_XC);
1782                         if ((scc & SCC_SS_MASK) != SCC_SS_XTAL)
1783                                 scc |= SCC_XC;
1784                         W_REG(&cc->slow_clk_ctl, scc);
1785
1786                         /*
1787                          * for dynamic control, we have to
1788                          * release our xtal_pu "force on"
1789                          */
1790                         if (scc & SCC_XC)
1791                                 ai_clkctl_xtal(&sii->pub, XTAL, OFF);
1792                 } else if (sii->pub.ccrev < 20) {
1793                         /* Instaclock */
1794                         AND_REG(&cc->system_clk_ctl, ~SYCC_HR);
1795                 } else {
1796                         AND_REG(&cc->clk_ctl_st, ~CCS_FORCEHT);
1797                 }
1798                 break;
1799
1800         default:
1801                 break;
1802         }
1803
1804  done:
1805         if (!fast) {
1806                 ai_setcoreidx(&sii->pub, origidx);
1807                 INTR_RESTORE(sii, intr_val);
1808         }
1809         return mode == CLK_FAST;
1810 }
1811
1812 /*
1813  *  clock control policy function throught chipcommon
1814  *
1815  *    set dynamic clk control mode (forceslow, forcefast, dynamic)
1816  *    returns true if we are forcing fast clock
1817  *    this is a wrapper over the next internal function
1818  *      to allow flexible policy settings for outside caller
1819  */
1820 bool ai_clkctl_cc(struct si_pub *sih, uint mode)
1821 {
1822         struct si_info *sii;
1823
1824         sii = (struct si_info *)sih;
1825
1826         /* chipcommon cores prior to rev6 don't support dynamic clock control */
1827         if (sih->ccrev < 6)
1828                 return false;
1829
1830         if (PCI_FORCEHT(sii))
1831                 return mode == CLK_FAST;
1832
1833         return _ai_clkctl_cc(sii, mode);
1834 }
1835
1836 /* Build device path */
1837 int ai_devpath(struct si_pub *sih, char *path, int size)
1838 {
1839         int slen;
1840
1841         if (!path || size <= 0)
1842                 return -1;
1843
1844         slen = snprintf(path, (size_t) size, "pci/%u/%u/",
1845                 ((struct si_info *)sih)->pbus->bus->number,
1846                 PCI_SLOT(((struct pci_dev *)
1847                                 (((struct si_info *)(sih))->pbus))->devfn));
1848
1849         if (slen < 0 || slen >= size) {
1850                 path[0] = '\0';
1851                 return -1;
1852         }
1853
1854         return 0;
1855 }
1856
1857 void ai_pci_up(struct si_pub *sih)
1858 {
1859         struct si_info *sii;
1860
1861         sii = (struct si_info *)sih;
1862
1863         if (PCI_FORCEHT(sii))
1864                 _ai_clkctl_cc(sii, CLK_FAST);
1865
1866         if (PCIE(sii))
1867                 pcicore_up(sii->pch, SI_PCIUP);
1868
1869 }
1870
1871 /* Unconfigure and/or apply various WARs when system is going to sleep mode */
1872 void ai_pci_sleep(struct si_pub *sih)
1873 {
1874         struct si_info *sii;
1875
1876         sii = (struct si_info *)sih;
1877
1878         pcicore_sleep(sii->pch);
1879 }
1880
1881 /* Unconfigure and/or apply various WARs when going down */
1882 void ai_pci_down(struct si_pub *sih)
1883 {
1884         struct si_info *sii;
1885
1886         sii = (struct si_info *)sih;
1887
1888         /* release FORCEHT since chip is going to "down" state */
1889         if (PCI_FORCEHT(sii))
1890                 _ai_clkctl_cc(sii, CLK_DYNAMIC);
1891
1892         pcicore_down(sii->pch, SI_PCIDOWN);
1893 }
1894
1895 /*
1896  * Configure the pci core for pci client (NIC) action
1897  * coremask is the bitvec of cores by index to be enabled.
1898  */
1899 void ai_pci_setup(struct si_pub *sih, uint coremask)
1900 {
1901         struct si_info *sii;
1902         struct sbpciregs __iomem *regs = NULL;
1903         u32 siflag = 0, w;
1904         uint idx = 0;
1905
1906         sii = (struct si_info *)sih;
1907
1908         if (PCI(sii)) {
1909                 /* get current core index */
1910                 idx = sii->curidx;
1911
1912                 /* we interrupt on this backplane flag number */
1913                 siflag = ai_flag(sih);
1914
1915                 /* switch over to pci core */
1916                 regs = ai_setcoreidx(sih, sii->pub.buscoreidx);
1917         }
1918
1919         /*
1920          * Enable sb->pci interrupts.  Assume
1921          * PCI rev 2.3 support was added in pci core rev 6 and things changed..
1922          */
1923         if (PCIE(sii) || (PCI(sii) && ((sii->pub.buscorerev) >= 6))) {
1924                 /* pci config write to set this core bit in PCIIntMask */
1925                 pci_read_config_dword(sii->pbus, PCI_INT_MASK, &w);
1926                 w |= (coremask << PCI_SBIM_SHIFT);
1927                 pci_write_config_dword(sii->pbus, PCI_INT_MASK, w);
1928         } else {
1929                 /* set sbintvec bit for our flag number */
1930                 ai_setint(sih, siflag);
1931         }
1932
1933         if (PCI(sii)) {
1934                 pcicore_pci_setup(sii->pch, regs);
1935
1936                 /* switch back to previous core */
1937                 ai_setcoreidx(sih, idx);
1938         }
1939 }
1940
1941 /*
1942  * Fixup SROMless PCI device's configuration.
1943  * The current core may be changed upon return.
1944  */
1945 int ai_pci_fixcfg(struct si_pub *sih)
1946 {
1947         uint origidx;
1948         void __iomem *regs = NULL;
1949         struct si_info *sii = (struct si_info *)sih;
1950
1951         /* Fixup PI in SROM shadow area to enable the correct PCI core access */
1952         /* save the current index */
1953         origidx = ai_coreidx(&sii->pub);
1954
1955         /* check 'pi' is correct and fix it if not */
1956         regs = ai_setcore(&sii->pub, sii->pub.buscoretype, 0);
1957         if (sii->pub.buscoretype == PCIE_CORE_ID)
1958                 pcicore_fixcfg_pcie(sii->pch,
1959                                     (struct sbpcieregs __iomem *)regs);
1960         else if (sii->pub.buscoretype == PCI_CORE_ID)
1961                 pcicore_fixcfg_pci(sii->pch, (struct sbpciregs __iomem *)regs);
1962
1963         /* restore the original index */
1964         ai_setcoreidx(&sii->pub, origidx);
1965
1966         pcicore_hwup(sii->pch);
1967         return 0;
1968 }
1969
1970 /* mask&set gpiocontrol bits */
1971 u32 ai_gpiocontrol(struct si_pub *sih, u32 mask, u32 val, u8 priority)
1972 {
1973         uint regoff;
1974
1975         regoff = offsetof(struct chipcregs, gpiocontrol);
1976         return ai_corereg(sih, SI_CC_IDX, regoff, mask, val);
1977 }
1978
1979 void ai_chipcontrl_epa4331(struct si_pub *sih, bool on)
1980 {
1981         struct si_info *sii;
1982         struct chipcregs __iomem *cc;
1983         uint origidx;
1984         u32 val;
1985
1986         sii = (struct si_info *)sih;
1987         origidx = ai_coreidx(sih);
1988
1989         cc = (struct chipcregs __iomem *) ai_setcore(sih, CC_CORE_ID, 0);
1990
1991         val = R_REG(&cc->chipcontrol);
1992
1993         if (on) {
1994                 if (sih->chippkg == 9 || sih->chippkg == 0xb)
1995                         /* Ext PA Controls for 4331 12x9 Package */
1996                         W_REG(&cc->chipcontrol, val |
1997                               CCTRL4331_EXTPA_EN |
1998                               CCTRL4331_EXTPA_ON_GPIO2_5);
1999                 else
2000                         /* Ext PA Controls for 4331 12x12 Package */
2001                         W_REG(&cc->chipcontrol,
2002                               val | CCTRL4331_EXTPA_EN);
2003         } else {
2004                 val &= ~(CCTRL4331_EXTPA_EN | CCTRL4331_EXTPA_ON_GPIO2_5);
2005                 W_REG(&cc->chipcontrol, val);
2006         }
2007
2008         ai_setcoreidx(sih, origidx);
2009 }
2010
2011 /* Enable BT-COEX & Ex-PA for 4313 */
2012 void ai_epa_4313war(struct si_pub *sih)
2013 {
2014         struct si_info *sii;
2015         struct chipcregs __iomem *cc;
2016         uint origidx;
2017
2018         sii = (struct si_info *)sih;
2019         origidx = ai_coreidx(sih);
2020
2021         cc = ai_setcore(sih, CC_CORE_ID, 0);
2022
2023         /* EPA Fix */
2024         W_REG(&cc->gpiocontrol,
2025               R_REG(&cc->gpiocontrol) | GPIO_CTRL_EPA_EN_MASK);
2026
2027         ai_setcoreidx(sih, origidx);
2028 }
2029
2030 /* check if the device is removed */
2031 bool ai_deviceremoved(struct si_pub *sih)
2032 {
2033         u32 w;
2034         struct si_info *sii;
2035
2036         sii = (struct si_info *)sih;
2037
2038         pci_read_config_dword(sii->pbus, PCI_VENDOR_ID, &w);
2039         if ((w & 0xFFFF) != PCI_VENDOR_ID_BROADCOM)
2040                 return true;
2041
2042         return false;
2043 }
2044
2045 bool ai_is_sprom_available(struct si_pub *sih)
2046 {
2047         if (sih->ccrev >= 31) {
2048                 struct si_info *sii;
2049                 uint origidx;
2050                 struct chipcregs __iomem *cc;
2051                 u32 sromctrl;
2052
2053                 if ((sih->cccaps & CC_CAP_SROM) == 0)
2054                         return false;
2055
2056                 sii = (struct si_info *)sih;
2057                 origidx = sii->curidx;
2058                 cc = ai_setcoreidx(sih, SI_CC_IDX);
2059                 sromctrl = R_REG(&cc->sromcontrol);
2060                 ai_setcoreidx(sih, origidx);
2061                 return sromctrl & SRC_PRESENT;
2062         }
2063
2064         switch (sih->chip) {
2065         case BCM4313_CHIP_ID:
2066                 return (sih->chipst & CST4313_SPROM_PRESENT) != 0;
2067         default:
2068                 return true;
2069         }
2070 }
2071
2072 bool ai_is_otp_disabled(struct si_pub *sih)
2073 {
2074         switch (sih->chip) {
2075         case BCM4313_CHIP_ID:
2076                 return (sih->chipst & CST4313_OTP_PRESENT) == 0;
2077                 /* These chips always have their OTP on */
2078         case BCM43224_CHIP_ID:
2079         case BCM43225_CHIP_ID:
2080         default:
2081                 return false;
2082         }
2083 }