|
@@ -0,0 +1,155 @@
|
|
|
+/*
|
|
|
+ * linux/arch/alpha/kernel/core_titan.c
|
|
|
+ *
|
|
|
+ * Code common to all TITAN core logic chips.
|
|
|
+ */
|
|
|
+
|
|
|
+#define __EXTERN_INLINE inline
|
|
|
+#include <asm/io.h>
|
|
|
+#include <asm/core_titan.h>
|
|
|
+#undef __EXTERN_INLINE
|
|
|
+
|
|
|
+#include <linux/module.h>
|
|
|
+#include <linux/types.h>
|
|
|
+#include <linux/pci.h>
|
|
|
+#include <linux/sched.h>
|
|
|
+#include <linux/init.h>
|
|
|
+#include <linux/vmalloc.h>
|
|
|
+#include <linux/bootmem.h>
|
|
|
+
|
|
|
+#include <asm/ptrace.h>
|
|
|
+#include <asm/smp.h>
|
|
|
+#include <asm/pgalloc.h>
|
|
|
+#include <asm/tlbflush.h>
|
|
|
+#include <asm/vga.h>
|
|
|
+
|
|
|
+#include "proto.h"
|
|
|
+#include "pci_impl.h"
|
|
|
+
|
|
|
+/* Save Titan configuration data as the console had it set up. */
|
|
|
+
|
|
|
+struct
|
|
|
+{
|
|
|
+ unsigned long wsba[4];
|
|
|
+ unsigned long wsm[4];
|
|
|
+ unsigned long tba[4];
|
|
|
+} saved_config[4] __attribute__((common));
|
|
|
+
|
|
|
+/*
|
|
|
+ * Is PChip 1 present? No need to query it more than once.
|
|
|
+ */
|
|
|
+static int titan_pchip1_present;
|
|
|
+
|
|
|
+/*
|
|
|
+ * BIOS32-style PCI interface:
|
|
|
+ */
|
|
|
+
|
|
|
+#define DEBUG_CONFIG 0
|
|
|
+
|
|
|
+#if DEBUG_CONFIG
|
|
|
+# define DBG_CFG(args) printk args
|
|
|
+#else
|
|
|
+# define DBG_CFG(args)
|
|
|
+#endif
|
|
|
+
|
|
|
+
|
|
|
+/*
|
|
|
+ * Routines to access TIG registers.
|
|
|
+ */
|
|
|
+static inline volatile unsigned long *
|
|
|
+mk_tig_addr(int offset)
|
|
|
+{
|
|
|
+ return (volatile unsigned long *)(TITAN_TIG_SPACE + (offset << 6));
|
|
|
+}
|
|
|
+
|
|
|
+static inline u8
|
|
|
+titan_read_tig(int offset, u8 value)
|
|
|
+{
|
|
|
+ volatile unsigned long *tig_addr = mk_tig_addr(offset);
|
|
|
+ return (u8)(*tig_addr & 0xff);
|
|
|
+}
|
|
|
+
|
|
|
+static inline void
|
|
|
+titan_write_tig(int offset, u8 value)
|
|
|
+{
|
|
|
+ volatile unsigned long *tig_addr = mk_tig_addr(offset);
|
|
|
+ *tig_addr = (unsigned long)value;
|
|
|
+}
|
|
|
+
|
|
|
+
|
|
|
+/*
|
|
|
+ * Given a bus, device, and function number, compute resulting
|
|
|
+ * configuration space address
|
|
|
+ * accordingly. It is therefore not safe to have concurrent
|
|
|
+ * invocations to configuration space access routines, but there
|
|
|
+ * really shouldn't be any need for this.
|
|
|
+ *
|
|
|
+ * Note that all config space accesses use Type 1 address format.
|
|
|
+ *
|
|
|
+ * Note also that type 1 is determined by non-zero bus number.
|
|
|
+ *
|
|
|
+ * Type 1:
|
|
|
+ *
|
|
|
+ * 3 3|3 3 2 2|2 2 2 2|2 2 2 2|1 1 1 1|1 1 1 1|1 1
|
|
|
+ * 3 2|1 0 9 8|7 6 5 4|3 2 1 0|9 8 7 6|5 4 3 2|1 0 9 8|7 6 5 4|3 2 1 0
|
|
|
+ * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
|
|
|
+ * | | | | | | | | | | |B|B|B|B|B|B|B|B|D|D|D|D|D|F|F|F|R|R|R|R|R|R|0|1|
|
|
|
+ * +-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
|
|
|
+ *
|
|
|
+ * 31:24 reserved
|
|
|
+ * 23:16 bus number (8 bits = 128 possible buses)
|
|
|
+ * 15:11 Device number (5 bits)
|
|
|
+ * 10:8 function number
|
|
|
+ * 7:2 register number
|
|
|
+ *
|
|
|
+ * Notes:
|
|
|
+ * The function number selects which function of a multi-function device
|
|
|
+ * (e.g., SCSI and Ethernet).
|
|
|
+ *
|
|
|
+ * The register selects a DWORD (32 bit) register offset. Hence it
|
|
|
+ * doesn't get shifted by 2 bits as we want to "drop" the bottom two
|
|
|
+ * bits.
|
|
|
+ */
|
|
|
+
|
|
|
+static int
|
|
|
+mk_conf_addr(struct pci_bus *pbus, unsigned int device_fn, int where,
|
|
|
+ unsigned long *pci_addr, unsigned char *type1)
|
|
|
+{
|
|
|
+ struct pci_controller *hose = pbus->sysdata;
|
|
|
+ unsigned long addr;
|
|
|
+ u8 bus = pbus->number;
|
|
|
+
|
|
|
+ DBG_CFG(("mk_conf_addr(bus=%d ,device_fn=0x%x, where=0x%x, "
|
|
|
+ "pci_addr=0x%p, type1=0x%p)\n",
|
|
|
+ bus, device_fn, where, pci_addr, type1));
|
|
|
+
|
|
|
+ if (!pbus->parent) /* No parent means peer PCI bus. */
|
|
|
+ bus = 0;
|
|
|
+ *type1 = (bus != 0);
|
|
|
+
|
|
|
+ addr = (bus << 16) | (device_fn << 8) | where;
|
|
|
+ addr |= hose->config_space_base;
|
|
|
+
|
|
|
+ *pci_addr = addr;
|
|
|
+ DBG_CFG(("mk_conf_addr: returning pci_addr 0x%lx\n", addr));
|
|
|
+ return 0;
|
|
|
+}
|
|
|
+
|
|
|
+static int
|
|
|
+titan_read_config(struct pci_bus *bus, unsigned int devfn, int where,
|
|
|
+ int size, u32 *value)
|
|
|
+{
|
|
|
+ unsigned long addr;
|
|
|
+ unsigned char type1;
|
|
|
+
|
|
|
+ if (mk_conf_addr(bus, devfn, where, &addr, &type1))
|
|
|
+ return PCIBIOS_DEVICE_NOT_FOUND;
|
|
|
+
|
|
|
+ switch (size) {
|
|
|
+ case 1:
|
|
|
+ *value = __kernel_ldbu(*(vucp)addr);
|
|
|
+ break;
|
|
|
+ case 2:
|
|
|
+ *value = __kernel_ldwu(*(vusp)addr);
|
|
|
+ break;
|
|
|
+ case 4:
|