pci.c
上传用户:jlfgdled
上传日期:2013-04-10
资源大小:33168k
文件大小:14k
源码类别:

Linux/Unix编程

开发平台:

Unix_Linux

  1. /*
  2.  * Carsten Langgaard, carstenl@mips.com
  3.  * Copyright (C) 1999,2000 MIPS Technologies, Inc.  All rights reserved.
  4.  *
  5.  *  This program is free software; you can distribute it and/or modify it
  6.  *  under the terms of the GNU General Public License (Version 2) as
  7.  *  published by the Free Software Foundation.
  8.  *
  9.  *  This program is distributed in the hope it will be useful, but WITHOUT
  10.  *  ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  11.  *  FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  12.  *  for more details.
  13.  *
  14.  *  You should have received a copy of the GNU General Public License along
  15.  *  with this program; if not, write to the Free Software Foundation, Inc.,
  16.  *  59 Temple Place - Suite 330, Boston MA 02111-1307, USA.
  17.  *
  18.  * MIPS boards specific PCI support.
  19.  *
  20.  */
  21. #include <linux/config.h>
  22. #ifdef CONFIG_PCI
  23. #include <linux/types.h>
  24. #include <linux/pci.h>
  25. #include <linux/kernel.h>
  26. #include <linux/init.h>
  27. #include <asm/mips-boards/generic.h>
  28. #include <asm/gt64120.h>
  29. #include <asm/mips-boards/bonito64.h>
  30. #ifdef CONFIG_MIPS_MALTA
  31. #include <asm/mips-boards/malta.h>
  32. #endif
  33. #include <asm/mips-boards/msc01_pci.h>
  34. #define PCI_ACCESS_READ  0
  35. #define PCI_ACCESS_WRITE 1
  36. /*
  37.  *  PCI configuration cycle AD bus definition
  38.  */
  39. /* Type 0 */
  40. #define PCI_CFG_TYPE0_REG_SHF           0
  41. #define PCI_CFG_TYPE0_FUNC_SHF          8
  42. /* Type 1 */
  43. #define PCI_CFG_TYPE1_REG_SHF           0
  44. #define PCI_CFG_TYPE1_FUNC_SHF          8
  45. #define PCI_CFG_TYPE1_DEV_SHF           11
  46. #define PCI_CFG_TYPE1_BUS_SHF           16
  47. static int
  48. mips_pcibios_config_access(unsigned char access_type, struct pci_dev *dev,
  49.                            unsigned char where, u32 *data)
  50. {
  51. unsigned char bus = dev->bus->number;
  52. unsigned char dev_fn = dev->devfn;
  53. unsigned char type;
  54. u32 intr, dummy;
  55. u64 pci_addr;
  56. switch(mips_revision_corid) {
  57. case MIPS_REVISION_CORID_QED_RM5261:
  58. case MIPS_REVISION_CORID_CORE_LV:
  59. case MIPS_REVISION_CORID_CORE_FPGA:
  60.         /* Galileo GT64120 system controller. */
  61. if ((bus == 0) && (dev_fn >= PCI_DEVFN(31,0)))
  62. return -1; /* Because of a bug in the galileo (for slot 31). */
  63. /* Clear cause register bits */
  64. GT_READ(GT_INTRCAUSE_OFS, intr);
  65. GT_WRITE(GT_INTRCAUSE_OFS, intr &
  66.  ~(GT_INTRCAUSE_MASABORT0_BIT |
  67.    GT_INTRCAUSE_TARABORT0_BIT));
  68. /* Setup address */
  69. GT_WRITE(GT_PCI0_CFGADDR_OFS,
  70.  (bus         << GT_PCI0_CFGADDR_BUSNUM_SHF)   |
  71.  (dev_fn      << GT_PCI0_CFGADDR_FUNCTNUM_SHF) |
  72.  ((where / 4) << GT_PCI0_CFGADDR_REGNUM_SHF)   |
  73.  GT_PCI0_CFGADDR_CONFIGEN_BIT);
  74. if (access_type == PCI_ACCESS_WRITE) {
  75. if (bus == 0 && dev_fn == 0) {
  76. /*
  77.  * The Galileo system controller is acting
  78.  * differently than other devices.
  79.  */
  80. GT_WRITE(GT_PCI0_CFGDATA_OFS, *data);
  81. } else {
  82. GT_PCI_WRITE(GT_PCI0_CFGDATA_OFS, *data);
  83. }
  84. } else {
  85. if (bus == 0 && dev_fn == 0) {
  86. /*
  87.  * The Galileo system controller is acting
  88.  * differently than other devices.
  89.  */
  90. GT_READ(GT_PCI0_CFGDATA_OFS, *data);
  91. } else {
  92. GT_PCI_READ(GT_PCI0_CFGDATA_OFS, *data);
  93. }
  94. }
  95. /* Check for master or target abort */
  96. GT_READ(GT_INTRCAUSE_OFS, intr);
  97. if (intr & (GT_INTRCAUSE_MASABORT0_BIT |
  98.     GT_INTRCAUSE_TARABORT0_BIT))
  99. {
  100. /* Error occured */
  101. /* Clear bits */
  102. GT_READ(GT_INTRCAUSE_OFS, intr);
  103. GT_WRITE(GT_INTRCAUSE_OFS, intr &
  104.  ~(GT_INTRCAUSE_MASABORT0_BIT |
  105.    GT_INTRCAUSE_TARABORT0_BIT));
  106. return -1;
  107. }
  108. break;
  109. case MIPS_REVISION_CORID_BONITO64:
  110. case MIPS_REVISION_CORID_CORE_20K:
  111.         /* Algorithmics Bonito64 system controller. */
  112.         if ((bus == 0) && (PCI_SLOT(dev_fn) == 0)) {
  113.         return -1;
  114. }
  115. /* Clear cause register bits */
  116. BONITO_PCICMD |= (BONITO_PCICMD_MABORT_CLR |
  117.   BONITO_PCICMD_MTABORT_CLR);
  118. /*
  119.  * Setup pattern to be used as PCI "address" for
  120.  * Type 0 cycle
  121.  */
  122. if (bus == 0) {
  123.         /* IDSEL */
  124.         pci_addr = (u64)1 << (PCI_SLOT(dev_fn) + 10);
  125. } else {
  126.         /* Bus number */
  127.         pci_addr = bus << PCI_CFG_TYPE1_BUS_SHF;
  128. /* Device number */
  129. pci_addr |= PCI_SLOT(dev_fn) << PCI_CFG_TYPE1_DEV_SHF;
  130. }
  131. /* Function (same for Type 0/1) */
  132. pci_addr |= PCI_FUNC(dev_fn) << PCI_CFG_TYPE0_FUNC_SHF;
  133. /* Register number (same for Type 0/1) */
  134. pci_addr |= (where & ~0x3) << PCI_CFG_TYPE0_REG_SHF;
  135. if (bus == 0) {
  136.         /* Type 0 */
  137.         BONITO_PCIMAP_CFG = pci_addr >> 16;
  138. } else {
  139.         /* Type 1 */
  140.         BONITO_PCIMAP_CFG = (pci_addr >> 16) | 0x10000;
  141. }
  142. /* Flush Bonito register block */
  143. dummy = BONITO_PCIMAP_CFG;
  144. __asm__ __volatile__(
  145.      ".settnoreordernt"
  146.      ".settnoatnt"
  147.      "syncnt"
  148.      ".settatnt"
  149.      ".settreorder");
  150. /* Perform access */
  151. if (access_type == PCI_ACCESS_WRITE) {
  152.         *(volatile u32 *)(KSEG1ADDR(BONITO_PCICFG_BASE +
  153.   (pci_addr & 0xffff))) = *(u32 *)data;
  154. /* Wait till done */
  155. while (BONITO_PCIMSTAT & 0xF)
  156.         ;
  157. } else {
  158.         *(u32 *)data =
  159.   *(volatile u32 *)(KSEG1ADDR(BONITO_PCICFG_BASE +
  160.     (pci_addr & 0xffff)));
  161. }
  162. /* Detect Master/Target abort */
  163. if (BONITO_PCICMD & (BONITO_PCICMD_MABORT_CLR |
  164.      BONITO_PCICMD_MTABORT_CLR) )
  165. {
  166.         /* Error occurred */
  167.         /* Clear bits */
  168.         BONITO_PCICMD |= (BONITO_PCICMD_MABORT_CLR |
  169.   BONITO_PCICMD_MTABORT_CLR);
  170. return -1;
  171. }
  172.         break;
  173. case MIPS_REVISION_CORID_CORE_MSC:
  174.         /* MIPS system controller. */
  175.         if ((bus == 0) && (PCI_SLOT(dev_fn) == 0)) {
  176.         return -1;
  177. }
  178. /* Clear status register bits. */
  179. MSC_WRITE(MSC01_PCI_INTSTAT,
  180.   (MSC01_PCI_INTCFG_MA_BIT |
  181.    MSC01_PCI_INTCFG_TA_BIT));
  182. /* Setup address */
  183. if (bus == 0)
  184. type = 0;  /* Type 0 */
  185. else
  186. type = 1;  /* Type 1 */
  187. MSC_WRITE(MSC01_PCI_CFGADDR,
  188.   ((bus              << MSC01_PCI_CFGADDR_BNUM_SHF) |
  189.    (PCI_SLOT(dev_fn) << MSC01_PCI_CFGADDR_DNUM_SHF) |
  190.    (PCI_FUNC(dev_fn) << MSC01_PCI_CFGADDR_FNUM_SHF) |
  191.    ((where /4 )      << MSC01_PCI_CFGADDR_RNUM_SHF) |
  192.    (type)));
  193. /* Perform access */
  194. if (access_type == PCI_ACCESS_WRITE) {
  195.         MSC_WRITE(MSC01_PCI_CFGDATA, *data);
  196. } else {
  197. MSC_READ(MSC01_PCI_CFGDATA, *data);
  198. }
  199. /* Detect Master/Target abort */
  200. MSC_READ(MSC01_PCI_INTSTAT, intr);
  201. if (intr & (MSC01_PCI_INTCFG_MA_BIT |
  202.     MSC01_PCI_INTCFG_TA_BIT))
  203. {
  204.         /* Error occurred */
  205.         /* Clear bits */
  206. MSC_READ(MSC01_PCI_INTSTAT, intr);
  207. MSC_WRITE(MSC01_PCI_INTSTAT,
  208.   (MSC01_PCI_INTCFG_MA_BIT |
  209.    MSC01_PCI_INTCFG_TA_BIT));
  210. return -1;
  211. }
  212.         break;
  213. default:
  214.         printk("Unknown Core card, don't know the system controller.n");
  215. return -1;
  216. }
  217. return 0;
  218. }
  219. /*
  220.  * We can't address 8 and 16 bit words directly.  Instead we have to
  221.  * read/write a 32bit word and mask/modify the data we actually want.
  222.  */
  223. static int
  224. mips_pcibios_read_config_byte (struct pci_dev *dev, int where, u8 *val)
  225. {
  226. u32 data = 0;
  227. if (mips_pcibios_config_access(PCI_ACCESS_READ, dev, where, &data))
  228. return -1;
  229. *val = (data >> ((where & 3) << 3)) & 0xff;
  230. return PCIBIOS_SUCCESSFUL;
  231. }
  232. static int
  233. mips_pcibios_read_config_word (struct pci_dev *dev, int where, u16 *val)
  234. {
  235. u32 data = 0;
  236. if (where & 1)
  237. return PCIBIOS_BAD_REGISTER_NUMBER;
  238. if (mips_pcibios_config_access(PCI_ACCESS_READ, dev, where, &data))
  239.        return -1;
  240. *val = (data >> ((where & 3) << 3)) & 0xffff;
  241. return PCIBIOS_SUCCESSFUL;
  242. }
  243. static int
  244. mips_pcibios_read_config_dword (struct pci_dev *dev, int where, u32 *val)
  245. {
  246. u32 data = 0;
  247. if (where & 3)
  248. return PCIBIOS_BAD_REGISTER_NUMBER;
  249. if (mips_pcibios_config_access(PCI_ACCESS_READ, dev, where, &data))
  250. return -1;
  251. *val = data;
  252. return PCIBIOS_SUCCESSFUL;
  253. }
  254. static int
  255. mips_pcibios_write_config_byte (struct pci_dev *dev, int where, u8 val)
  256. {
  257. u32 data = 0;
  258. if (mips_pcibios_config_access(PCI_ACCESS_READ, dev, where, &data))
  259. return -1;
  260. data = (data & ~(0xff << ((where & 3) << 3))) |
  261.        (val << ((where & 3) << 3));
  262. if (mips_pcibios_config_access(PCI_ACCESS_WRITE, dev, where, &data))
  263. return -1;
  264. return PCIBIOS_SUCCESSFUL;
  265. }
  266. static int
  267. mips_pcibios_write_config_word (struct pci_dev *dev, int where, u16 val)
  268. {
  269.         u32 data = 0;
  270. if (where & 1)
  271. return PCIBIOS_BAD_REGISTER_NUMBER;
  272.         if (mips_pcibios_config_access(PCI_ACCESS_READ, dev, where, &data))
  273.        return -1;
  274. data = (data & ~(0xffff << ((where & 3) << 3))) |
  275.        (val << ((where & 3) << 3));
  276. if (mips_pcibios_config_access(PCI_ACCESS_WRITE, dev, where, &data))
  277.        return -1;
  278. return PCIBIOS_SUCCESSFUL;
  279. }
  280. static int
  281. mips_pcibios_write_config_dword(struct pci_dev *dev, int where, u32 val)
  282. {
  283. if (where & 3)
  284. return PCIBIOS_BAD_REGISTER_NUMBER;
  285. if (mips_pcibios_config_access(PCI_ACCESS_WRITE, dev, where, &val))
  286.        return -1;
  287. return PCIBIOS_SUCCESSFUL;
  288. }
  289. struct pci_ops mips_pci_ops = {
  290. mips_pcibios_read_config_byte,
  291.         mips_pcibios_read_config_word,
  292. mips_pcibios_read_config_dword,
  293. mips_pcibios_write_config_byte,
  294. mips_pcibios_write_config_word,
  295. mips_pcibios_write_config_dword
  296. };
  297. int mips_pcibios_iack(void)
  298. {
  299. int irq;
  300.         u32 dummy;
  301. /*
  302.  * Determine highest priority pending interrupt by performing
  303.  * a PCI Interrupt Acknowledge cycle.
  304.  */
  305. switch(mips_revision_corid) {
  306. case MIPS_REVISION_CORID_QED_RM5261:
  307. case MIPS_REVISION_CORID_CORE_LV:
  308. case MIPS_REVISION_CORID_CORE_FPGA:
  309. case MIPS_REVISION_CORID_CORE_MSC:
  310. if (mips_revision_corid == MIPS_REVISION_CORID_CORE_MSC)
  311. MSC_READ(MSC01_PCI_IACK, irq);
  312. else
  313. GT_READ(GT_PCI0_IACK_OFS, irq);
  314. irq &= 0xff;
  315. break;
  316. case MIPS_REVISION_CORID_BONITO64:
  317. case MIPS_REVISION_CORID_CORE_20K:
  318. /* The following will generate a PCI IACK cycle on the
  319.  * Bonito controller. It's a little bit kludgy, but it
  320.  * was the easiest way to implement it in hardware at
  321.  * the given time.
  322.  */
  323. BONITO_PCIMAP_CFG = 0x20000;
  324. /* Flush Bonito register block */
  325. dummy = BONITO_PCIMAP_CFG;
  326. __asm__ __volatile__(
  327. ".settnoreordernt"
  328. ".settnoatnt"
  329. "syncnt"
  330. ".settatnt"
  331. ".settreorder");
  332. irq = *(volatile u32 *)(KSEG1ADDR(BONITO_PCICFG_BASE));
  333. irq &= 0xff;
  334. BONITO_PCIMAP_CFG = 0;
  335. break;
  336. default:
  337.         printk("Unknown Core card, don't know the system controller.n");
  338. return -1;
  339. }
  340. return irq;
  341. }
  342. void __init pcibios_init(void)
  343. {
  344. #ifdef CONFIG_MIPS_MALTA
  345. struct pci_dev *pdev;
  346. unsigned char reg_val;
  347. #endif
  348. printk("PCI: Probing PCI hardware on host bus 0.n");
  349. pci_scan_bus(0, &mips_pci_ops, NULL);
  350. switch(mips_revision_corid) {
  351. case MIPS_REVISION_CORID_QED_RM5261:
  352. case MIPS_REVISION_CORID_CORE_LV:
  353. case MIPS_REVISION_CORID_CORE_FPGA:
  354. /*
  355.  * Due to a bug in the Galileo system controller, we need
  356.  * to setup the PCI BAR for the Galileo internal registers.
  357.  * This should be done in the bios/bootprom and will be
  358.  * fixed in a later revision of YAMON (the MIPS boards
  359.  * boot prom).
  360.  */
  361. GT_WRITE(GT_PCI0_CFGADDR_OFS,
  362.  (0 << GT_PCI0_CFGADDR_BUSNUM_SHF) | /* Local bus */
  363.  (0 << GT_PCI0_CFGADDR_DEVNUM_SHF) | /* GT64120 dev */
  364.  (0 << GT_PCI0_CFGADDR_FUNCTNUM_SHF) | /* Function 0*/
  365.  ((0x20/4) << GT_PCI0_CFGADDR_REGNUM_SHF) | /* BAR 4*/
  366.  GT_PCI0_CFGADDR_CONFIGEN_BIT );
  367. /* Perform the write */
  368. GT_WRITE( GT_PCI0_CFGDATA_OFS, PHYSADDR(MIPS_GT_BASE));
  369. break;
  370. }
  371. #ifdef CONFIG_MIPS_MALTA
  372. pci_for_each_dev(pdev) {
  373. if ((pdev->vendor == PCI_VENDOR_ID_INTEL)
  374.     && (pdev->device == PCI_DEVICE_ID_INTEL_82371AB)
  375.     && (PCI_SLOT(pdev->devfn) == 0x0a)) {
  376. /*
  377.  * IDE Decode enable.
  378.  */
  379. pci_read_config_byte(pdev, 0x41, &reg_val);
  380.          pci_write_config_byte(pdev, 0x41, reg_val | 0x80);
  381. pci_read_config_byte(pdev, 0x43, &reg_val);
  382.          pci_write_config_byte(pdev, 0x43, reg_val | 0x80);
  383. }
  384. if ((pdev->vendor == PCI_VENDOR_ID_INTEL)
  385.     && (pdev->device == PCI_DEVICE_ID_INTEL_82371AB_0)
  386.     && (PCI_SLOT(pdev->devfn) == 0x0a)) {
  387. /*
  388.  * Set top of main memory accessible by ISA or DMA
  389.  * devices to 16 Mb.
  390.  */
  391. pci_read_config_byte(pdev, 0x69, &reg_val);
  392. pci_write_config_byte(pdev, 0x69, reg_val | 0xf0);
  393. }
  394. }
  395. /*
  396.  * Activate Floppy Controller in the SMSC FDC37M817 Super I/O
  397.  * Controller.
  398.  * This should be done in the bios/bootprom and will be fixed in
  399.          * a later revision of YAMON (the MIPS boards boot prom).
  400.  */
  401. /* Entering config state. */
  402. SMSC_WRITE(SMSC_CONFIG_ENTER, SMSC_CONFIG_REG);
  403. /* Activate floppy controller. */
  404. SMSC_WRITE(SMSC_CONFIG_DEVNUM, SMSC_CONFIG_REG);
  405. SMSC_WRITE(SMSC_CONFIG_DEVNUM_FLOPPY, SMSC_DATA_REG);
  406. SMSC_WRITE(SMSC_CONFIG_ACTIVATE, SMSC_CONFIG_REG);
  407. SMSC_WRITE(SMSC_CONFIG_ACTIVATE_ENABLE, SMSC_DATA_REG);
  408. /* Exit config state. */
  409. SMSC_WRITE(SMSC_CONFIG_EXIT, SMSC_CONFIG_REG);
  410. #endif
  411. }
  412. int __init
  413. pcibios_enable_device(struct pci_dev *dev)
  414. {
  415. /* Not needed, since we enable all devices at startup.  */
  416. return 0;
  417. }
  418. void __init
  419. pcibios_align_resource(void *data, struct resource *res, unsigned long size,
  420.        unsigned long align)
  421. {
  422. }
  423. char * __init
  424. pcibios_setup(char *str)
  425. {
  426. /* Nothing to do for now.  */
  427. return str;
  428. }
  429. struct pci_fixup pcibios_fixups[] = {
  430. { 0 }
  431. };
  432. void __init
  433. pcibios_update_resource(struct pci_dev *dev, struct resource *root,
  434.                         struct resource *res, int resource)
  435. {
  436. unsigned long where, size;
  437. u32 reg;
  438. where = PCI_BASE_ADDRESS_0 + (resource * 4);
  439. size = res->end - res->start;
  440. pci_read_config_dword(dev, where, &reg);
  441. reg = (reg & size) | (((u32)(res->start - root->start)) & ~size);
  442. pci_write_config_dword(dev, where, reg);
  443. }
  444. /*
  445.  *  Called after each bus is probed, but before its children
  446.  *  are examined.
  447.  */
  448. void __init pcibios_fixup_bus(struct pci_bus *b)
  449. {
  450. pci_read_bridge_bases(b);
  451. }
  452. unsigned __init int pcibios_assign_all_busses(void)
  453. {
  454. return 1;
  455. }
  456. #endif /* CONFIG_PCI */