Add the rt linux 4.1.3-rt3 as base
[kvmfornfv.git] / kernel / arch / mips / sgi-ip22 / ip22-mc.c
diff --git a/kernel/arch/mips/sgi-ip22/ip22-mc.c b/kernel/arch/mips/sgi-ip22/ip22-mc.c
new file mode 100644 (file)
index 0000000..6b009c4
--- /dev/null
@@ -0,0 +1,235 @@
+/*
+ * ip22-mc.c: Routines for manipulating SGI Memory Controller.
+ *
+ * Copyright (C) 1996 David S. Miller (davem@davemloft.net)
+ * Copyright (C) 1999 Andrew R. Baker (andrewb@uab.edu) - Indigo2 changes
+ * Copyright (C) 2003 Ladislav Michl  (ladis@linux-mips.org)
+ * Copyright (C) 2004 Peter Fuerst    (pf@net.alphadv.de) - IP28
+ */
+
+#include <linux/init.h>
+#include <linux/module.h>
+#include <linux/kernel.h>
+
+#include <asm/io.h>
+#include <asm/bootinfo.h>
+#include <asm/sgialib.h>
+#include <asm/sgi/mc.h>
+#include <asm/sgi/hpc3.h>
+#include <asm/sgi/ip22.h>
+
+struct sgimc_regs *sgimc;
+
+EXPORT_SYMBOL(sgimc);
+
+static inline unsigned long get_bank_addr(unsigned int memconfig)
+{
+       return (memconfig & SGIMC_MCONFIG_BASEADDR) << ((sgimc->systemid & SGIMC_SYSID_MASKREV) >= 5 ? 24 : 22);
+}
+
+static inline unsigned long get_bank_size(unsigned int memconfig)
+{
+       return ((memconfig & SGIMC_MCONFIG_RMASK) + 0x0100) << ((sgimc->systemid & SGIMC_SYSID_MASKREV) >= 5 ? 16 : 14);
+}
+
+static inline unsigned int get_bank_config(int bank)
+{
+       unsigned int res = bank > 1 ? sgimc->mconfig1 : sgimc->mconfig0;
+       return bank % 2 ? res & 0xffff : res >> 16;
+}
+
+struct mem {
+       unsigned long addr;
+       unsigned long size;
+};
+
+/*
+ * Detect installed memory, do some sanity checks and notify kernel about it
+ */
+static void __init probe_memory(void)
+{
+       int i, j, found, cnt = 0;
+       struct mem bank[4];
+       struct mem space[2] = {{SGIMC_SEG0_BADDR, 0}, {SGIMC_SEG1_BADDR, 0}};
+
+       printk(KERN_INFO "MC: Probing memory configuration:\n");
+       for (i = 0; i < ARRAY_SIZE(bank); i++) {
+               unsigned int tmp = get_bank_config(i);
+               if (!(tmp & SGIMC_MCONFIG_BVALID))
+                       continue;
+
+               bank[cnt].size = get_bank_size(tmp);
+               bank[cnt].addr = get_bank_addr(tmp);
+               printk(KERN_INFO " bank%d: %3ldM @ %08lx\n",
+                       i, bank[cnt].size / 1024 / 1024, bank[cnt].addr);
+               cnt++;
+       }
+
+       /* And you thought bubble sort is dead algorithm... */
+       do {
+               unsigned long addr, size;
+
+               found = 0;
+               for (i = 1; i < cnt; i++)
+                       if (bank[i-1].addr > bank[i].addr) {
+                               addr = bank[i].addr;
+                               size = bank[i].size;
+                               bank[i].addr = bank[i-1].addr;
+                               bank[i].size = bank[i-1].size;
+                               bank[i-1].addr = addr;
+                               bank[i-1].size = size;
+                               found = 1;
+                       }
+       } while (found);
+
+       /* Figure out how are memory banks mapped into spaces */
+       for (i = 0; i < cnt; i++) {
+               found = 0;
+               for (j = 0; j < ARRAY_SIZE(space) && !found; j++)
+                       if (space[j].addr + space[j].size == bank[i].addr) {
+                               space[j].size += bank[i].size;
+                               found = 1;
+                       }
+               /* There is either hole or overlapping memory */
+               if (!found)
+                       printk(KERN_CRIT "MC: Memory configuration mismatch "
+                                        "(%08lx), expect Bus Error soon\n",
+                                        bank[i].addr);
+       }
+
+       for (i = 0; i < ARRAY_SIZE(space); i++)
+               if (space[i].size)
+                       add_memory_region(space[i].addr, space[i].size,
+                                         BOOT_MEM_RAM);
+}
+
+void __init sgimc_init(void)
+{
+       u32 tmp;
+
+       /* ioremap can't fail */
+       sgimc = (struct sgimc_regs *)
+               ioremap(SGIMC_BASE, sizeof(struct sgimc_regs));
+
+       printk(KERN_INFO "MC: SGI memory controller Revision %d\n",
+              (int) sgimc->systemid & SGIMC_SYSID_MASKREV);
+
+       /* Place the MC into a known state.  This must be done before
+        * interrupts are first enabled etc.
+        */
+
+       /* Step 0: Make sure we turn off the watchdog in case it's
+        *         still running (which might be the case after a
+        *         soft reboot).
+        */
+       tmp = sgimc->cpuctrl0;
+       tmp &= ~SGIMC_CCTRL0_WDOG;
+       sgimc->cpuctrl0 = tmp;
+
+       /* Step 1: The CPU/GIO error status registers will not latch
+        *         up a new error status until the register has been
+        *         cleared by the cpu.  These status registers are
+        *         cleared by writing any value to them.
+        */
+       sgimc->cstat = sgimc->gstat = 0;
+
+       /* Step 2: Enable all parity checking in cpu control register
+        *         zero.
+        */
+       /* don't touch parity settings for IP28 */
+       tmp = sgimc->cpuctrl0;
+#ifndef CONFIG_SGI_IP28
+       tmp |= SGIMC_CCTRL0_EPERRGIO | SGIMC_CCTRL0_EPERRMEM;
+#endif
+       tmp |= SGIMC_CCTRL0_R4KNOCHKPARR;
+       sgimc->cpuctrl0 = tmp;
+
+       /* Step 3: Setup the MC write buffer depth, this is controlled
+        *         in cpu control register 1 in the lower 4 bits.
+        */
+       tmp = sgimc->cpuctrl1;
+       tmp &= ~0xf;
+       tmp |= 0xd;
+       sgimc->cpuctrl1 = tmp;
+
+       /* Step 4: Initialize the RPSS divider register to run as fast
+        *         as it can correctly operate.  The register is laid
+        *         out as follows:
+        *
+        *         ----------------------------------------
+        *         |  RESERVED  |   INCREMENT   | DIVIDER |
+        *         ----------------------------------------
+        *          31        16 15            8 7       0
+        *
+        *         DIVIDER determines how often a 'tick' happens,
+        *         INCREMENT determines by how the RPSS increment
+        *         registers value increases at each 'tick'. Thus,
+        *         for IP22 we get INCREMENT=1, DIVIDER=1 == 0x101
+        */
+       sgimc->divider = 0x101;
+
+       /* Step 5: Initialize GIO64 arbitrator configuration register.
+        *
+        * NOTE: HPC init code in sgihpc_init() must run before us because
+        *       we need to know Guiness vs. FullHouse and the board
+        *       revision on this machine. You have been warned.
+        */
+
+       /* First the basic invariants across all GIO64 implementations. */
+       tmp = sgimc->giopar & SGIMC_GIOPAR_GFX64; /* keep gfx 64bit settings */
+       tmp |= SGIMC_GIOPAR_HPC64;      /* All 1st HPC's interface at 64bits */
+       tmp |= SGIMC_GIOPAR_ONEBUS;     /* Only one physical GIO bus exists */
+
+       if (ip22_is_fullhouse()) {
+               /* Fullhouse specific settings. */
+               if (SGIOC_SYSID_BOARDREV(sgioc->sysid) < 2) {
+                       tmp |= SGIMC_GIOPAR_HPC264;     /* 2nd HPC at 64bits */
+                       tmp |= SGIMC_GIOPAR_PLINEEXP0;  /* exp0 pipelines */
+                       tmp |= SGIMC_GIOPAR_MASTEREXP1; /* exp1 masters */
+                       tmp |= SGIMC_GIOPAR_RTIMEEXP0;  /* exp0 is realtime */
+               } else {
+                       tmp |= SGIMC_GIOPAR_HPC264;     /* 2nd HPC 64bits */
+                       tmp |= SGIMC_GIOPAR_PLINEEXP0;  /* exp[01] pipelined */
+                       tmp |= SGIMC_GIOPAR_PLINEEXP1;
+                       tmp |= SGIMC_GIOPAR_MASTEREISA; /* EISA masters */
+               }
+       } else {
+               /* Guiness specific settings. */
+               tmp |= SGIMC_GIOPAR_EISA64;     /* MC talks to EISA at 64bits */
+               tmp |= SGIMC_GIOPAR_MASTEREISA; /* EISA bus can act as master */
+       }
+       sgimc->giopar = tmp;    /* poof */
+
+       probe_memory();
+}
+
+void __init prom_meminit(void) {}
+void __init prom_free_prom_memory(void)
+{
+#ifdef CONFIG_SGI_IP28
+       u32 mconfig1;
+       unsigned long flags;
+       spinlock_t lock;
+
+       /*
+        * because ARCS accesses memory uncached we wait until ARCS
+        * isn't needed any longer, before we switch from slow to
+        * normal mode
+        */
+       spin_lock_irqsave(&lock, flags);
+       mconfig1 = sgimc->mconfig1;
+       /* map ECC register */
+       sgimc->mconfig1 = (mconfig1 & 0xffff0000) | 0x2060;
+       iob();
+       /* switch to normal mode */
+       *(unsigned long *)PHYS_TO_XKSEG_UNCACHED(0x60000000) = 0;
+       iob();
+       /* reduce WR_COL */
+       sgimc->cmacc = (sgimc->cmacc & ~0xf) | 4;
+       iob();
+       /* restore old config */
+       sgimc->mconfig1 = mconfig1;
+       iob();
+       spin_unlock_irqrestore(&lock, flags);
+#endif
+}