/*********************************************************************** * Copyright 2001 MontaVista Software Inc. * Author: MontaVista Software, Inc. * ahennessy@mvista.com * * Copyright (C) 2000-2001 Toshiba Corporation * * Based on arch/mips/ddb5xxx/ddb5477/pci_ops.c * * Define the pci_ops for JMR3927. * * Much of the code is derived from the original DDB5074 port by * Geert Uytterhoeven * * This program is free software; you can redistribute it and/or modify it * under the terms of the GNU General Public License as published by the * Free Software Foundation; either version 2 of the License, or (at your * option) any later version. * * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN * NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF * USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON * ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. * * You should have received a copy of the GNU General Public License along * with this program; if not, write to the Free Software Foundation, Inc., * 675 Mass Ave, Cambridge, MA 02139, USA. *********************************************************************** */ #include #include #include #include #include #include #include #include #include #include struct resource pci_io_resource = { "pci IO space", #ifndef JMR3927_INIT_INDIRECT_PCI 0x1000, /* reserve regacy I/O space */ 0x1000 + JMR3927_PCIIO_SIZE -1, #else JMR3927_PCIIO + 0x1000, /* reserve regacy I/O space */ JMR3927_PCIIO + 0x1000 + JMR3927_PCIIO_SIZE -1, #endif IORESOURCE_IO}; struct resource pci_mem_resource = { "pci memory space", JMR3927_PCIMEM, JMR3927_PCIMEM + JMR3927_PCIMEM_SIZE -1, IORESOURCE_MEM}; extern struct pci_ops jmr3927_pci_ops; struct pci_channel mips_pci_channels[] = { { &jmr3927_pci_ops, &pci_io_resource, &pci_mem_resource, 0, 0xff }, { NULL, NULL, NULL, NULL, NULL} }; unsigned int pcibios_assign_all_busses(void) { return 1; } static int mkaddr(unsigned char bus, unsigned char dev_fn, unsigned char where, int *flagsp) { if (bus == 0 && dev_fn >= PCI_DEVFN(TX3927_PCIC_MAX_DEVNU, 0)) return -1; tx3927_pcicptr->ica = ((bus & 0xff) << 0x10) | ((dev_fn & 0xff) << 0x08) | (where & 0xfc); /* clear M_ABORT and Disable M_ABORT Int. */ tx3927_pcicptr->pcistat |= PCI_STATUS_REC_MASTER_ABORT; tx3927_pcicptr->pcistatim &= ~PCI_STATUS_REC_MASTER_ABORT; return 0; } static int check_abort(int flags) { int code = PCIBIOS_SUCCESSFUL; if (tx3927_pcicptr->pcistat & PCI_STATUS_REC_MASTER_ABORT) { tx3927_pcicptr->pcistat |= PCI_STATUS_REC_MASTER_ABORT; tx3927_pcicptr->pcistatim |= PCI_STATUS_REC_MASTER_ABORT; code =PCIBIOS_DEVICE_NOT_FOUND; } return code; } /* * We can't address 8 and 16 bit words directly. Instead we have to * read/write a 32bit word and mask/modify the data we actually want. */ static int jmr3927_pcibios_read_config_byte (struct pci_dev *dev, int where, unsigned char *val) { int flags; unsigned char bus, func_num; db_assert((where & 3) == 0); db_assert(where < (1 << 8)); /* check if the bus is top-level */ if (dev->bus->parent != NULL) { bus = dev->bus->number; db_assert(bus != 0); } else { bus = 0; } func_num = PCI_FUNC(dev->devfn); if (mkaddr(bus, dev->devfn, where, &flags)) return -1; *val = *(volatile u8 *)((ulong)&tx3927_pcicptr->icd | (where&3)); return check_abort(flags); } static int jmr3927_pcibios_read_config_word (struct pci_dev *dev, int where, unsigned short *val) { int flags; unsigned char bus, func_num; if (where & 1) return PCIBIOS_BAD_REGISTER_NUMBER; db_assert((where & 3) == 0); db_assert(where < (1 << 8)); /* check if the bus is top-level */ if (dev->bus->parent != NULL) { bus = dev->bus->number; db_assert(bus != 0); } else { bus = 0; } func_num = PCI_FUNC(dev->devfn); if (mkaddr(bus, dev->devfn, where, &flags)) return -1; *val = le16_to_cpu(*(volatile u16 *)((ulong)&tx3927_pcicptr->icd | (where&3))); return check_abort(flags); } static int jmr3927_pcibios_read_config_dword (struct pci_dev *dev, int where, unsigned int *val) { int flags; unsigned char bus, func_num; if (where & 3) return PCIBIOS_BAD_REGISTER_NUMBER; db_assert((where & 3) == 0); db_assert(where < (1 << 8)); /* check if the bus is top-level */ if (dev->bus->parent != NULL) { bus = dev->bus->number; db_assert(bus != 0); } else { bus = 0; } func_num = PCI_FUNC(dev->devfn); if (mkaddr(bus, dev->devfn, where, &flags)) return -1; *val = le32_to_cpu(tx3927_pcicptr->icd); return check_abort(flags); } static int jmr3927_pcibios_write_config_byte (struct pci_dev *dev, int where, unsigned char val) { int flags; unsigned char bus, func_num; /* check if the bus is top-level */ if (dev->bus->parent != NULL) { bus = dev->bus->number; db_assert(bus != 0); } else { bus = 0; } func_num = PCI_FUNC(dev->devfn); if (mkaddr(bus, dev->devfn, where, &flags)) return -1; *(volatile u8 *)((ulong)&tx3927_pcicptr->icd | (where&3)) = val; return check_abort(flags); } static int jmr3927_pcibios_write_config_word (struct pci_dev *dev, int where, unsigned short val) { int flags; unsigned char bus, func_num; if (where & 1) return PCIBIOS_BAD_REGISTER_NUMBER; /* check if the bus is top-level */ if (dev->bus->parent != NULL) { bus = dev->bus->number; db_assert(bus != 0); } else { bus = 0; } func_num = PCI_FUNC(dev->devfn); if (mkaddr(bus, dev->devfn, where, &flags)) return -1; *(volatile u16 *)((ulong)&tx3927_pcicptr->icd | (where&3)) = cpu_to_le16(val); return check_abort(flags); } static int jmr3927_pcibios_write_config_dword (struct pci_dev *dev, int where, unsigned int val) { int flags; unsigned char bus, func_num; if (where & 3) return PCIBIOS_BAD_REGISTER_NUMBER; /* check if the bus is top-level */ if (dev->bus->parent != NULL) { bus = dev->bus->number; db_assert(bus != 0); } else { bus = 0; } func_num = PCI_FUNC(dev->devfn); if (mkaddr(bus, dev->devfn, where, &flags)) return -1; tx3927_pcicptr->icd = cpu_to_le32(val); return check_abort(flags); } struct pci_ops jmr3927_pci_ops = { jmr3927_pcibios_read_config_byte, jmr3927_pcibios_read_config_word, jmr3927_pcibios_read_config_dword, jmr3927_pcibios_write_config_byte, jmr3927_pcibios_write_config_word, jmr3927_pcibios_write_config_dword }; #ifdef JMR3927_INIT_INDIRECT_PCI /* pci memory access */ unsigned char tx_readb(unsigned char *addr) { unsigned long val; __u32 ioaddr; int offset; int byte; unsigned long flags; save_and_cli(flags); ioaddr = PHYSADDR(addr); if (ioaddr < pci_mem_resource.start || ioaddr > pci_mem_resource.end) { restore_flags(flags); return std_readb(addr); } offset = ioaddr & 0x3; #ifdef __BIG_ENDIAN if (offset == 0) byte = 0x7; else if (offset == 1) byte = 0xb; else if (offset == 2) byte = 0xd; else if (offset == 3) byte = 0xe; #else if (offset == 0) byte = 0xe; else if (offset == 1) byte = 0xd; else if (offset == 2) byte = 0xb; else if (offset == 3) byte = 0x7; #endif *(volatile u32 *)(ulong)&tx3927_pcicptr->ipciaddr = (unsigned long)ioaddr; *(volatile u32 *)(ulong)&tx3927_pcicptr->ipcibe = (PCI_IPCIBE_ICMD_MEMREAD << PCI_IPCIBE_ICMD_SHIFT) | byte; while (!(tx3927_pcicptr->istat & PCI_ISTAT_IDICC)) { udelay(2); } val = (le32_to_cpu(((ulong)tx3927_pcicptr->ipcidata))) >> (offset*8); val = val & 0xff; /* clear by setting */ tx3927_pcicptr->istat |= PCI_ISTAT_IDICC; restore_flags(flags); return val; } void tx_writeb(unsigned long data, unsigned char *addr) { __u32 ioaddr; int offset; int byte; unsigned long flags; save_and_cli(flags); ioaddr = PHYSADDR(addr); if (ioaddr < pci_mem_resource.start || ioaddr > pci_mem_resource.end) { restore_flags(flags); std_writeb(data,addr); return; } data &= 0xff; data = data | (data << 8) | (data << 16) | (data << 24); offset = ioaddr & 0x3; #ifdef __BIG_ENDIAN if (offset == 0) byte = 0x7; else if (offset == 1) byte = 0xb; else if (offset == 2) byte = 0xd; else if (offset == 3) byte = 0xe; #else if (offset == 0) byte = 0xe; else if (offset == 1) byte = 0xd; else if (offset == 2) byte = 0xb; else if (offset == 3) byte = 0x7; #endif *(volatile u32 *)(ulong)&tx3927_pcicptr->ipcidata = data; *(volatile u32 *)(ulong)&tx3927_pcicptr->ipciaddr = (unsigned long)ioaddr; *(volatile u32 *)(ulong)&tx3927_pcicptr->ipcibe = (PCI_IPCIBE_ICMD_MEMWRITE << PCI_IPCIBE_ICMD_SHIFT) | byte; while (!(tx3927_pcicptr->istat & PCI_ISTAT_IDICC)) { udelay(2); } /* clear by setting */ tx3927_pcicptr->istat |= PCI_ISTAT_IDICC; restore_flags(flags); } unsigned short tx_readw(unsigned short *addr) { unsigned long val; __u32 ioaddr; int offset; int byte; unsigned long flags; save_and_cli(flags); ioaddr = PHYSADDR(addr); if (ioaddr < pci_mem_resource.start || ioaddr > pci_mem_resource.end) { restore_flags(flags); return std_readw(addr); } offset = ioaddr & 0x3; #ifdef __BIG_ENDIAN if (offset == 0) byte = 0x3; else if (offset == 2) byte = 0xc; #else if (offset == 0) byte = 0xc; else if (offset == 2) byte = 0x3; #endif *(volatile u32 *)(ulong)&tx3927_pcicptr->ipciaddr = (unsigned long)ioaddr; *(volatile u32 *)(ulong)&tx3927_pcicptr->ipcibe = (PCI_IPCIBE_ICMD_MEMREAD << PCI_IPCIBE_ICMD_SHIFT) | byte; while (!(tx3927_pcicptr->istat & PCI_ISTAT_IDICC)) { udelay(2); } val = (le32_to_cpu(((ulong)tx3927_pcicptr->ipcidata))) >> (offset*8); val = val & 0xffff; /* clear by setting */ tx3927_pcicptr->istat |= PCI_ISTAT_IDICC; restore_flags(flags); return val; } void tx_writew(unsigned long data, unsigned short *addr) { __u32 ioaddr; int offset; int byte; unsigned long flags; save_and_cli(flags); ioaddr = PHYSADDR(addr); if (ioaddr < pci_mem_resource.start || ioaddr > pci_mem_resource.end) { restore_flags(flags); std_writew(data,addr); return; } data = data | (data << 16); offset = ioaddr & 0x3; #ifdef __BIG_ENDIAN if (offset == 0) byte = 0x3; else if (offset == 2) byte = 0xc; #else if (offset == 0) byte = 0xc; else if (offset == 2) byte = 0x3; #endif *(volatile u32 *)(ulong)&tx3927_pcicptr->ipcidata = data; *(volatile u32 *)(ulong)&tx3927_pcicptr->ipciaddr = (unsigned long)ioaddr; *(volatile u32 *)(ulong)&tx3927_pcicptr->ipcibe = (PCI_IPCIBE_ICMD_MEMWRITE << PCI_IPCIBE_ICMD_SHIFT) | byte; while (!(tx3927_pcicptr->istat & PCI_ISTAT_IDICC)) { udelay(2); } /* clear by setting */ tx3927_pcicptr->istat |= PCI_ISTAT_IDICC; restore_flags(flags); } unsigned long tx_readl(unsigned int *addr) { unsigned long val; __u32 ioaddr; unsigned long flags; save_and_cli(flags); ioaddr = PHYSADDR(addr); if (ioaddr < pci_mem_resource.start || ioaddr > pci_mem_resource.end) { restore_flags(flags); return std_readl(addr); } *(volatile u32 *)(ulong)&tx3927_pcicptr->ipciaddr = (unsigned long)ioaddr; *(volatile u32 *)(ulong)&tx3927_pcicptr->ipcibe = (PCI_IPCIBE_ICMD_MEMREAD << PCI_IPCIBE_ICMD_SHIFT) | PCI_IPCIBE_IBE_LONG; while (!(tx3927_pcicptr->istat & PCI_ISTAT_IDICC)) { udelay(2); } val = le32_to_cpu(*(volatile u32 *)(ulong)&tx3927_pcicptr->ipcidata); /* clear by setting */ tx3927_pcicptr->istat |= PCI_ISTAT_IDICC; restore_flags(flags); return val; } void tx_writel(unsigned long data, unsigned int *addr) { __u32 ioaddr; unsigned long flags; save_and_cli(flags); ioaddr = PHYSADDR(addr); if (ioaddr < pci_mem_resource.start || ioaddr > pci_mem_resource.end) { restore_flags(flags); std_writel(data,addr); return; } *(volatile u32 *)(ulong)&tx3927_pcicptr->ipcidata = cpu_to_le32(data); *(volatile u32 *)(ulong)&tx3927_pcicptr->ipciaddr = (unsigned long)ioaddr; *(volatile u32 *)(ulong)&tx3927_pcicptr->ipcibe = (PCI_IPCIBE_ICMD_MEMWRITE << PCI_IPCIBE_ICMD_SHIFT) | PCI_IPCIBE_IBE_LONG; while (!(tx3927_pcicptr->istat & PCI_ISTAT_IDICC)) { udelay(2); } /* clear by setting */ tx3927_pcicptr->istat |= PCI_ISTAT_IDICC; restore_flags(flags); } /* pci io access */ unsigned char tx_ioinb(unsigned char *addr) { unsigned long val; __u32 ioaddr; int offset; int byte; unsigned long flags; save_and_cli(flags); ioaddr = PHYSADDR(addr); if (ioaddr < pci_io_resource.start || ioaddr > pci_io_resource.end) { restore_flags(flags); return std_inb(addr); } offset = ioaddr & 0x3; #ifdef __BIG_ENDIAN if (offset == 0) byte = 0x7; else if (offset == 1) byte = 0xb; else if (offset == 2) byte = 0xd; else if (offset == 3) byte = 0xe; #else if (offset == 0) byte = 0xe; else if (offset == 1) byte = 0xd; else if (offset == 2) byte = 0xb; else if (offset == 3) byte = 0x7; #endif *(volatile u32 *)(ulong)&tx3927_pcicptr->ipciaddr = (unsigned long)ioaddr; *(volatile u32 *)(ulong)&tx3927_pcicptr->ipcibe = (PCI_IPCIBE_ICMD_IOREAD << PCI_IPCIBE_ICMD_SHIFT) | byte; while (!(tx3927_pcicptr->istat & PCI_ISTAT_IDICC)) { udelay(2); } val = (le32_to_cpu(((ulong)tx3927_pcicptr->ipcidata))) >> (offset*8); val = val & 0xff; /* clear by setting */ tx3927_pcicptr->istat |= PCI_ISTAT_IDICC; restore_flags(flags); return val; } void tx_iooutb(unsigned long data, unsigned char *addr) { __u32 ioaddr; int offset; int byte; unsigned long flags; save_and_cli(flags); ioaddr = PHYSADDR(addr); if (ioaddr < pci_io_resource.start || ioaddr > pci_io_resource.end) { restore_flags(flags); std_outb(data,addr); return; } data &= 0xff; data = data | (data << 8) | (data << 16) | (data << 24); offset = ioaddr & 0x3; #ifdef __BIG_ENDIAN if (offset == 0) byte = 0x7; else if (offset == 1) byte = 0xb; else if (offset == 2) byte = 0xd; else if (offset == 3) byte = 0xe; #else if (offset == 0) byte = 0xe; else if (offset == 1) byte = 0xd; else if (offset == 2) byte = 0xb; else if (offset == 3) byte = 0x7; #endif *(volatile u32 *)(ulong)&tx3927_pcicptr->ipcidata = data; *(volatile u32 *)(ulong)&tx3927_pcicptr->ipciaddr = (unsigned long)ioaddr; *(volatile u32 *)(ulong)&tx3927_pcicptr->ipcibe = (PCI_IPCIBE_ICMD_IOWRITE << PCI_IPCIBE_ICMD_SHIFT) | byte; while (!(tx3927_pcicptr->istat & PCI_ISTAT_IDICC)) { udelay(2); } /* clear by setting */ tx3927_pcicptr->istat |= PCI_ISTAT_IDICC; restore_flags(flags); } unsigned short tx_ioinw(unsigned short *addr) { unsigned long val; __u32 ioaddr; int offset; int byte; unsigned long flags; save_and_cli(flags); ioaddr = PHYSADDR(addr); if (ioaddr < pci_io_resource.start || ioaddr > pci_io_resource.end) { restore_flags(flags); return std_inw(addr); } offset = ioaddr & 0x3; #ifdef __BIG_ENDIAN if (offset == 0) byte = 0x3; else if (offset == 2) byte = 0xc; #else if (offset == 0) byte = 0xc; else if (offset == 2) byte = 0x3; #endif *(volatile u32 *)(ulong)&tx3927_pcicptr->ipciaddr = (unsigned long)ioaddr; *(volatile u32 *)(ulong)&tx3927_pcicptr->ipcibe = (PCI_IPCIBE_ICMD_IOREAD << PCI_IPCIBE_ICMD_SHIFT) | byte; while (!(tx3927_pcicptr->istat & PCI_ISTAT_IDICC)) { udelay(2); } val = (le32_to_cpu(((ulong)tx3927_pcicptr->ipcidata))) >> (offset*8); val = val & 0xffff; /* clear by setting */ tx3927_pcicptr->istat |= PCI_ISTAT_IDICC; restore_flags(flags); return val; } void tx_iooutw(unsigned long data, unsigned short *addr) { __u32 ioaddr; int offset; int byte; unsigned long flags; save_and_cli(flags); ioaddr = PHYSADDR(addr); if (ioaddr < pci_io_resource.start || ioaddr > pci_io_resource.end) { restore_flags(flags); std_outw(data,addr); return; } data = data | (data << 16); offset = ioaddr & 0x3; #ifdef __BIG_ENDIAN if (offset == 0) byte = 0x3; else if (offset == 2) byte = 0xc; #else if (offset == 0) byte = 0xc; else if (offset == 2) byte = 0x3; #endif *(volatile u32 *)(ulong)&tx3927_pcicptr->ipcidata = data; *(volatile u32 *)(ulong)&tx3927_pcicptr->ipciaddr = (unsigned long)ioaddr; *(volatile u32 *)(ulong)&tx3927_pcicptr->ipcibe = (PCI_IPCIBE_ICMD_IOWRITE << PCI_IPCIBE_ICMD_SHIFT) | byte; while (!(tx3927_pcicptr->istat & PCI_ISTAT_IDICC)) { udelay(2); } /* clear by setting */ tx3927_pcicptr->istat |= PCI_ISTAT_IDICC; restore_flags(flags); } unsigned long tx_ioinl(unsigned int *addr) { unsigned long val; __u32 ioaddr; unsigned long flags; save_and_cli(flags); ioaddr = PHYSADDR(addr); if (ioaddr < pci_io_resource.start || ioaddr > pci_io_resource.end) { restore_flags(flags); return std_inl(addr); } *(volatile u32 *)(ulong)&tx3927_pcicptr->ipciaddr = (unsigned long)ioaddr; *(volatile u32 *)(ulong)&tx3927_pcicptr->ipcibe = (PCI_IPCIBE_ICMD_IOREAD << PCI_IPCIBE_ICMD_SHIFT) | PCI_IPCIBE_IBE_LONG; while (!(tx3927_pcicptr->istat & PCI_ISTAT_IDICC)) { udelay(2); } val = le32_to_cpu(*(volatile u32 *)(ulong)&tx3927_pcicptr->ipcidata); /* clear by setting */ tx3927_pcicptr->istat |= PCI_ISTAT_IDICC; restore_flags(flags); return val; } void tx_iooutl(unsigned long data, unsigned int *addr) { __u32 ioaddr; unsigned long flags; save_and_cli(flags); ioaddr = PHYSADDR(addr); if (ioaddr < pci_io_resource.start || ioaddr > pci_io_resource.end) { restore_flags(flags); std_outl(data,addr); return; } *(volatile u32 *)(ulong)&tx3927_pcicptr->ipcidata = cpu_to_le32(data); *(volatile u32 *)(ulong)&tx3927_pcicptr->ipciaddr = (unsigned long)ioaddr; *(volatile u32 *)(ulong)&tx3927_pcicptr->ipcibe = (PCI_IPCIBE_ICMD_IOWRITE << PCI_IPCIBE_ICMD_SHIFT) | PCI_IPCIBE_IBE_LONG; while (!(tx3927_pcicptr->istat & PCI_ISTAT_IDICC)) { udelay(2); } /* clear by setting */ tx3927_pcicptr->istat |= PCI_ISTAT_IDICC; restore_flags(flags); } void tx_insbyte(unsigned char *addr,void *buffer,unsigned int count) { unsigned char *ptr = (unsigned char *) buffer; while (count--) { *ptr++ = tx_ioinb(addr); } } void tx_insword(unsigned short *addr,void *buffer,unsigned int count) { unsigned short *ptr = (unsigned short *) buffer; while (count--) { *ptr++ = tx_ioinw(addr); } } void tx_inslong(unsigned int *addr,void *buffer,unsigned int count) { unsigned long *ptr = (unsigned long *) buffer; while (count--) { *ptr++ = tx_ioinl(addr); } } void tx_outsbyte(unsigned char *addr,void *buffer,unsigned int count) { unsigned char *ptr = (unsigned char *) buffer; while (count--) { tx_iooutb(*ptr++,addr); } } void tx_outsword(unsigned short *addr,void *buffer,unsigned int count) { unsigned short *ptr = (unsigned short *) buffer; while (count--) { tx_iooutw(*ptr++,addr); } } void tx_outslong(unsigned int *addr,void *buffer,unsigned int count) { unsigned long *ptr = (unsigned long *) buffer; while (count--) { tx_iooutl(*ptr++,addr); } } #endif