474 lines
13 KiB
C
474 lines
13 KiB
C
/*
|
|
* arch/ppc/platforms/mpc8260_pci9.c
|
|
*
|
|
* Workaround for device erratum PCI 9.
|
|
* See Motorola's "XPC826xA Family Device Errata Reference."
|
|
* The erratum applies to all 8260 family Hip4 processors. It is scheduled
|
|
* to be fixed in HiP4 Rev C. Erratum PCI 9 states that a simultaneous PCI
|
|
* inbound write transaction and PCI outbound read transaction can result in a
|
|
* bus deadlock. The suggested workaround is to use the IDMA controller to
|
|
* perform all reads from PCI configuration, memory, and I/O space.
|
|
*
|
|
* Author: andy_lowe@mvista.com
|
|
*
|
|
* 2003 (c) MontaVista Software, Inc. This file is licensed under
|
|
* the terms of the GNU General Public License version 2. This program
|
|
* is licensed "as is" without any warranty of any kind, whether express
|
|
* or implied.
|
|
*/
|
|
#include <linux/kernel.h>
|
|
#include <linux/config.h>
|
|
#include <linux/module.h>
|
|
#include <linux/pci.h>
|
|
#include <linux/types.h>
|
|
#include <linux/string.h>
|
|
|
|
#include <asm/io.h>
|
|
#include <asm/pci-bridge.h>
|
|
#include <asm/machdep.h>
|
|
#include <asm/byteorder.h>
|
|
#include <asm/mpc8260.h>
|
|
#include <asm/immap_cpm2.h>
|
|
#include <asm/cpm2.h>
|
|
|
|
#include "m82xx_pci.h"
|
|
|
|
#ifdef CONFIG_8260_PCI9
|
|
/*#include <asm/mpc8260_pci9.h>*/ /* included in asm/io.h */
|
|
|
|
#define IDMA_XFER_BUF_SIZE 64 /* size of the IDMA transfer buffer */
|
|
|
|
/* define a structure for the IDMA dpram usage */
|
|
typedef struct idma_dpram_s {
|
|
idma_t pram; /* IDMA parameter RAM */
|
|
u_char xfer_buf[IDMA_XFER_BUF_SIZE]; /* IDMA transfer buffer */
|
|
idma_bd_t bd; /* buffer descriptor */
|
|
} idma_dpram_t;
|
|
|
|
/* define offsets relative to start of IDMA dpram */
|
|
#define IDMA_XFER_BUF_OFFSET (sizeof(idma_t))
|
|
#define IDMA_BD_OFFSET (sizeof(idma_t) + IDMA_XFER_BUF_SIZE)
|
|
|
|
/* define globals */
|
|
static volatile idma_dpram_t *idma_dpram;
|
|
|
|
/* Exactly one of CONFIG_8260_PCI9_IDMAn must be defined,
|
|
* where n is 1, 2, 3, or 4. This selects the IDMA channel used for
|
|
* the PCI9 workaround.
|
|
*/
|
|
#ifdef CONFIG_8260_PCI9_IDMA1
|
|
#define IDMA_CHAN 0
|
|
#define PROFF_IDMA PROFF_IDMA1_BASE
|
|
#define IDMA_PAGE CPM_CR_IDMA1_PAGE
|
|
#define IDMA_SBLOCK CPM_CR_IDMA1_SBLOCK
|
|
#endif
|
|
#ifdef CONFIG_8260_PCI9_IDMA2
|
|
#define IDMA_CHAN 1
|
|
#define PROFF_IDMA PROFF_IDMA2_BASE
|
|
#define IDMA_PAGE CPM_CR_IDMA2_PAGE
|
|
#define IDMA_SBLOCK CPM_CR_IDMA2_SBLOCK
|
|
#endif
|
|
#ifdef CONFIG_8260_PCI9_IDMA3
|
|
#define IDMA_CHAN 2
|
|
#define PROFF_IDMA PROFF_IDMA3_BASE
|
|
#define IDMA_PAGE CPM_CR_IDMA3_PAGE
|
|
#define IDMA_SBLOCK CPM_CR_IDMA3_SBLOCK
|
|
#endif
|
|
#ifdef CONFIG_8260_PCI9_IDMA4
|
|
#define IDMA_CHAN 3
|
|
#define PROFF_IDMA PROFF_IDMA4_BASE
|
|
#define IDMA_PAGE CPM_CR_IDMA4_PAGE
|
|
#define IDMA_SBLOCK CPM_CR_IDMA4_SBLOCK
|
|
#endif
|
|
|
|
void idma_pci9_init(void)
|
|
{
|
|
uint dpram_offset;
|
|
volatile idma_t *pram;
|
|
volatile im_idma_t *idma_reg;
|
|
volatile cpm2_map_t *immap = cpm2_immr;
|
|
|
|
/* allocate IDMA dpram */
|
|
dpram_offset = cpm_dpalloc(sizeof(idma_dpram_t), 64);
|
|
idma_dpram = cpm_dpram_addr(dpram_offset);
|
|
|
|
/* initialize the IDMA parameter RAM */
|
|
memset((void *)idma_dpram, 0, sizeof(idma_dpram_t));
|
|
pram = &idma_dpram->pram;
|
|
pram->ibase = dpram_offset + IDMA_BD_OFFSET;
|
|
pram->dpr_buf = dpram_offset + IDMA_XFER_BUF_OFFSET;
|
|
pram->ss_max = 32;
|
|
pram->dts = 32;
|
|
|
|
/* initialize the IDMA_BASE pointer to the IDMA parameter RAM */
|
|
*((ushort *) &immap->im_dprambase[PROFF_IDMA]) = dpram_offset;
|
|
|
|
/* initialize the IDMA registers */
|
|
idma_reg = (volatile im_idma_t *) &immap->im_sdma.sdma_idsr1;
|
|
idma_reg[IDMA_CHAN].idmr = 0; /* mask all IDMA interrupts */
|
|
idma_reg[IDMA_CHAN].idsr = 0xff; /* clear all event flags */
|
|
|
|
printk("<4>Using IDMA%d for MPC8260 device erratum PCI 9 workaround\n",
|
|
IDMA_CHAN + 1);
|
|
|
|
return;
|
|
}
|
|
|
|
/* Use the IDMA controller to transfer data from I/O memory to local RAM.
|
|
* The src address must be a physical address suitable for use by the DMA
|
|
* controller with no translation. The dst address must be a kernel virtual
|
|
* address. The dst address is translated to a physical address via
|
|
* virt_to_phys().
|
|
* The sinc argument specifies whether or not the source address is incremented
|
|
* by the DMA controller. The source address is incremented if and only if sinc
|
|
* is non-zero. The destination address is always incremented since the
|
|
* destination is always host RAM.
|
|
*/
|
|
static void
|
|
idma_pci9_read(u8 *dst, u8 *src, int bytes, int unit_size, int sinc)
|
|
{
|
|
unsigned long flags;
|
|
volatile idma_t *pram = &idma_dpram->pram;
|
|
volatile idma_bd_t *bd = &idma_dpram->bd;
|
|
volatile cpm2_map_t *immap = cpm2_immr;
|
|
|
|
local_irq_save(flags);
|
|
|
|
/* initialize IDMA parameter RAM for this transfer */
|
|
if (sinc)
|
|
pram->dcm = IDMA_DCM_DMA_WRAP_64 | IDMA_DCM_SINC
|
|
| IDMA_DCM_DINC | IDMA_DCM_SD_MEM2MEM;
|
|
else
|
|
pram->dcm = IDMA_DCM_DMA_WRAP_64 | IDMA_DCM_DINC
|
|
| IDMA_DCM_SD_MEM2MEM;
|
|
pram->ibdptr = pram->ibase;
|
|
pram->sts = unit_size;
|
|
pram->istate = 0;
|
|
|
|
/* initialize the buffer descriptor */
|
|
bd->dst = virt_to_phys(dst);
|
|
bd->src = (uint) src;
|
|
bd->len = bytes;
|
|
bd->flags = IDMA_BD_V | IDMA_BD_W | IDMA_BD_I | IDMA_BD_L | IDMA_BD_DGBL
|
|
| IDMA_BD_DBO_BE | IDMA_BD_SBO_BE | IDMA_BD_SDTB;
|
|
|
|
/* issue the START_IDMA command to the CP */
|
|
while (immap->im_cpm.cp_cpcr & CPM_CR_FLG);
|
|
immap->im_cpm.cp_cpcr = mk_cr_cmd(IDMA_PAGE, IDMA_SBLOCK, 0,
|
|
CPM_CR_START_IDMA) | CPM_CR_FLG;
|
|
while (immap->im_cpm.cp_cpcr & CPM_CR_FLG);
|
|
|
|
/* wait for transfer to complete */
|
|
while(bd->flags & IDMA_BD_V);
|
|
|
|
local_irq_restore(flags);
|
|
|
|
return;
|
|
}
|
|
|
|
/* Use the IDMA controller to transfer data from I/O memory to local RAM.
|
|
* The dst address must be a physical address suitable for use by the DMA
|
|
* controller with no translation. The src address must be a kernel virtual
|
|
* address. The src address is translated to a physical address via
|
|
* virt_to_phys().
|
|
* The dinc argument specifies whether or not the dest address is incremented
|
|
* by the DMA controller. The source address is incremented if and only if sinc
|
|
* is non-zero. The source address is always incremented since the
|
|
* source is always host RAM.
|
|
*/
|
|
static void
|
|
idma_pci9_write(u8 *dst, u8 *src, int bytes, int unit_size, int dinc)
|
|
{
|
|
unsigned long flags;
|
|
volatile idma_t *pram = &idma_dpram->pram;
|
|
volatile idma_bd_t *bd = &idma_dpram->bd;
|
|
volatile cpm2_map_t *immap = cpm2_immr;
|
|
|
|
local_irq_save(flags);
|
|
|
|
/* initialize IDMA parameter RAM for this transfer */
|
|
if (dinc)
|
|
pram->dcm = IDMA_DCM_DMA_WRAP_64 | IDMA_DCM_SINC
|
|
| IDMA_DCM_DINC | IDMA_DCM_SD_MEM2MEM;
|
|
else
|
|
pram->dcm = IDMA_DCM_DMA_WRAP_64 | IDMA_DCM_SINC
|
|
| IDMA_DCM_SD_MEM2MEM;
|
|
pram->ibdptr = pram->ibase;
|
|
pram->sts = unit_size;
|
|
pram->istate = 0;
|
|
|
|
/* initialize the buffer descriptor */
|
|
bd->dst = (uint) dst;
|
|
bd->src = virt_to_phys(src);
|
|
bd->len = bytes;
|
|
bd->flags = IDMA_BD_V | IDMA_BD_W | IDMA_BD_I | IDMA_BD_L | IDMA_BD_DGBL
|
|
| IDMA_BD_DBO_BE | IDMA_BD_SBO_BE | IDMA_BD_SDTB;
|
|
|
|
/* issue the START_IDMA command to the CP */
|
|
while (immap->im_cpm.cp_cpcr & CPM_CR_FLG);
|
|
immap->im_cpm.cp_cpcr = mk_cr_cmd(IDMA_PAGE, IDMA_SBLOCK, 0,
|
|
CPM_CR_START_IDMA) | CPM_CR_FLG;
|
|
while (immap->im_cpm.cp_cpcr & CPM_CR_FLG);
|
|
|
|
/* wait for transfer to complete */
|
|
while(bd->flags & IDMA_BD_V);
|
|
|
|
local_irq_restore(flags);
|
|
|
|
return;
|
|
}
|
|
|
|
/* Same as idma_pci9_read, but 16-bit little-endian byte swapping is performed
|
|
* if the unit_size is 2, and 32-bit little-endian byte swapping is performed if
|
|
* the unit_size is 4.
|
|
*/
|
|
static void
|
|
idma_pci9_read_le(u8 *dst, u8 *src, int bytes, int unit_size, int sinc)
|
|
{
|
|
int i;
|
|
u8 *p;
|
|
|
|
idma_pci9_read(dst, src, bytes, unit_size, sinc);
|
|
switch(unit_size) {
|
|
case 2:
|
|
for (i = 0, p = dst; i < bytes; i += 2, p += 2)
|
|
swab16s((u16 *) p);
|
|
break;
|
|
case 4:
|
|
for (i = 0, p = dst; i < bytes; i += 4, p += 4)
|
|
swab32s((u32 *) p);
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
}
|
|
EXPORT_SYMBOL(idma_pci9_init);
|
|
EXPORT_SYMBOL(idma_pci9_read);
|
|
EXPORT_SYMBOL(idma_pci9_read_le);
|
|
|
|
static inline int is_pci_mem(unsigned long addr)
|
|
{
|
|
if (addr >= M82xx_PCI_LOWER_MMIO &&
|
|
addr <= M82xx_PCI_UPPER_MMIO)
|
|
return 1;
|
|
if (addr >= M82xx_PCI_LOWER_MEM &&
|
|
addr <= M82xx_PCI_UPPER_MEM)
|
|
return 1;
|
|
return 0;
|
|
}
|
|
|
|
#define is_pci_mem(pa) ( (pa > 0x80000000) && (pa < 0xc0000000))
|
|
int readb(volatile unsigned char *addr)
|
|
{
|
|
u8 val;
|
|
unsigned long pa = iopa((unsigned long) addr);
|
|
|
|
if (!is_pci_mem(pa))
|
|
return in_8(addr);
|
|
|
|
idma_pci9_read((u8 *)&val, (u8 *)pa, sizeof(val), sizeof(val), 0);
|
|
return val;
|
|
}
|
|
|
|
int readw(volatile unsigned short *addr)
|
|
{
|
|
u16 val;
|
|
unsigned long pa = iopa((unsigned long) addr);
|
|
|
|
if (!is_pci_mem(pa))
|
|
return in_le16(addr);
|
|
|
|
idma_pci9_read((u8 *)&val, (u8 *)pa, sizeof(val), sizeof(val), 0);
|
|
return swab16(val);
|
|
}
|
|
|
|
unsigned readl(volatile unsigned *addr)
|
|
{
|
|
u32 val;
|
|
unsigned long pa = iopa((unsigned long) addr);
|
|
|
|
if (!is_pci_mem(pa))
|
|
return in_le32(addr);
|
|
|
|
idma_pci9_read((u8 *)&val, (u8 *)pa, sizeof(val), sizeof(val), 0);
|
|
return swab32(val);
|
|
}
|
|
|
|
int inb(unsigned port)
|
|
{
|
|
u8 val;
|
|
u8 *addr = (u8 *)(port + _IO_BASE);
|
|
|
|
idma_pci9_read((u8 *)&val, (u8 *)addr, sizeof(val), sizeof(val), 0);
|
|
return val;
|
|
}
|
|
|
|
int inw(unsigned port)
|
|
{
|
|
u16 val;
|
|
u8 *addr = (u8 *)(port + _IO_BASE);
|
|
|
|
idma_pci9_read((u8 *)&val, (u8 *)addr, sizeof(val), sizeof(val), 0);
|
|
return swab16(val);
|
|
}
|
|
|
|
unsigned inl(unsigned port)
|
|
{
|
|
u32 val;
|
|
u8 *addr = (u8 *)(port + _IO_BASE);
|
|
|
|
idma_pci9_read((u8 *)&val, (u8 *)addr, sizeof(val), sizeof(val), 0);
|
|
return swab32(val);
|
|
}
|
|
|
|
void insb(unsigned port, void *buf, int ns)
|
|
{
|
|
u8 *addr = (u8 *)(port + _IO_BASE);
|
|
|
|
idma_pci9_read((u8 *)buf, (u8 *)addr, ns*sizeof(u8), sizeof(u8), 0);
|
|
}
|
|
|
|
void insw(unsigned port, void *buf, int ns)
|
|
{
|
|
u8 *addr = (u8 *)(port + _IO_BASE);
|
|
|
|
idma_pci9_read((u8 *)buf, (u8 *)addr, ns*sizeof(u16), sizeof(u16), 0);
|
|
}
|
|
|
|
void insl(unsigned port, void *buf, int nl)
|
|
{
|
|
u8 *addr = (u8 *)(port + _IO_BASE);
|
|
|
|
idma_pci9_read((u8 *)buf, (u8 *)addr, nl*sizeof(u32), sizeof(u32), 0);
|
|
}
|
|
|
|
void insw_ns(unsigned port, void *buf, int ns)
|
|
{
|
|
u8 *addr = (u8 *)(port + _IO_BASE);
|
|
|
|
idma_pci9_read((u8 *)buf, (u8 *)addr, ns*sizeof(u16), sizeof(u16), 0);
|
|
}
|
|
|
|
void insl_ns(unsigned port, void *buf, int nl)
|
|
{
|
|
u8 *addr = (u8 *)(port + _IO_BASE);
|
|
|
|
idma_pci9_read((u8 *)buf, (u8 *)addr, nl*sizeof(u32), sizeof(u32), 0);
|
|
}
|
|
|
|
void *memcpy_fromio(void *dest, unsigned long src, size_t count)
|
|
{
|
|
unsigned long pa = iopa((unsigned long) src);
|
|
|
|
if (is_pci_mem(pa))
|
|
idma_pci9_read((u8 *)dest, (u8 *)pa, count, 32, 1);
|
|
else
|
|
memcpy(dest, (void *)src, count);
|
|
return dest;
|
|
}
|
|
|
|
EXPORT_SYMBOL(readb);
|
|
EXPORT_SYMBOL(readw);
|
|
EXPORT_SYMBOL(readl);
|
|
EXPORT_SYMBOL(inb);
|
|
EXPORT_SYMBOL(inw);
|
|
EXPORT_SYMBOL(inl);
|
|
EXPORT_SYMBOL(insb);
|
|
EXPORT_SYMBOL(insw);
|
|
EXPORT_SYMBOL(insl);
|
|
EXPORT_SYMBOL(insw_ns);
|
|
EXPORT_SYMBOL(insl_ns);
|
|
EXPORT_SYMBOL(memcpy_fromio);
|
|
|
|
#endif /* ifdef CONFIG_8260_PCI9 */
|
|
|
|
/* Indirect PCI routines adapted from arch/ppc/kernel/indirect_pci.c.
|
|
* Copyright (C) 1998 Gabriel Paubert.
|
|
*/
|
|
#ifndef CONFIG_8260_PCI9
|
|
#define cfg_read(val, addr, type, op) *val = op((type)(addr))
|
|
#else
|
|
#define cfg_read(val, addr, type, op) \
|
|
idma_pci9_read_le((u8*)(val),(u8*)(addr),sizeof(*(val)),sizeof(*(val)),0)
|
|
#endif
|
|
|
|
#define cfg_write(val, addr, type, op) op((type *)(addr), (val))
|
|
|
|
static int indirect_write_config(struct pci_bus *pbus, unsigned int devfn, int where,
|
|
int size, u32 value)
|
|
{
|
|
struct pci_controller *hose = pbus->sysdata;
|
|
u8 cfg_type = 0;
|
|
if (ppc_md.pci_exclude_device)
|
|
if (ppc_md.pci_exclude_device(pbus->number, devfn))
|
|
return PCIBIOS_DEVICE_NOT_FOUND;
|
|
|
|
if (hose->set_cfg_type)
|
|
if (pbus->number != hose->first_busno)
|
|
cfg_type = 1;
|
|
|
|
out_be32(hose->cfg_addr,
|
|
(((where & 0xfc) | cfg_type) << 24) | (devfn << 16)
|
|
| ((pbus->number - hose->bus_offset) << 8) | 0x80);
|
|
|
|
switch (size)
|
|
{
|
|
case 1:
|
|
cfg_write(value, hose->cfg_data + (where & 3), u8, out_8);
|
|
break;
|
|
case 2:
|
|
cfg_write(value, hose->cfg_data + (where & 2), u16, out_le16);
|
|
break;
|
|
case 4:
|
|
cfg_write(value, hose->cfg_data + (where & 0), u32, out_le32);
|
|
break;
|
|
}
|
|
return PCIBIOS_SUCCESSFUL;
|
|
}
|
|
|
|
static int indirect_read_config(struct pci_bus *pbus, unsigned int devfn, int where,
|
|
int size, u32 *value)
|
|
{
|
|
struct pci_controller *hose = pbus->sysdata;
|
|
u8 cfg_type = 0;
|
|
if (ppc_md.pci_exclude_device)
|
|
if (ppc_md.pci_exclude_device(pbus->number, devfn))
|
|
return PCIBIOS_DEVICE_NOT_FOUND;
|
|
|
|
if (hose->set_cfg_type)
|
|
if (pbus->number != hose->first_busno)
|
|
cfg_type = 1;
|
|
|
|
out_be32(hose->cfg_addr,
|
|
(((where & 0xfc) | cfg_type) << 24) | (devfn << 16)
|
|
| ((pbus->number - hose->bus_offset) << 8) | 0x80);
|
|
|
|
switch (size)
|
|
{
|
|
case 1:
|
|
cfg_read(value, hose->cfg_data + (where & 3), u8 *, in_8);
|
|
break;
|
|
case 2:
|
|
cfg_read(value, hose->cfg_data + (where & 2), u16 *, in_le16);
|
|
break;
|
|
case 4:
|
|
cfg_read(value, hose->cfg_data + (where & 0), u32 *, in_le32);
|
|
break;
|
|
}
|
|
return PCIBIOS_SUCCESSFUL;
|
|
}
|
|
|
|
static struct pci_ops indirect_pci_ops =
|
|
{
|
|
.read = indirect_read_config,
|
|
.write = indirect_write_config,
|
|
};
|
|
|
|
void
|
|
setup_m8260_indirect_pci(struct pci_controller* hose, u32 cfg_addr, u32 cfg_data)
|
|
{
|
|
hose->ops = &indirect_pci_ops;
|
|
hose->cfg_addr = (unsigned int *) ioremap(cfg_addr, 4);
|
|
hose->cfg_data = (unsigned char *) ioremap(cfg_data, 4);
|
|
}
|