1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3  * Board setup routines for the IBM 750GX/CL platform w/ TSI10x bridge
4  *
5  * Copyright 2007 IBM Corporation
6  *
7  * Stephen Winiecki <stevewin@us.ibm.com>
8  * Josh Boyer <jwboyer@linux.vnet.ibm.com>
9  *
10  * Based on code from mpc7448_hpc2.c
11  */
12 
13 #include <linux/stddef.h>
14 #include <linux/kernel.h>
15 #include <linux/pci.h>
16 #include <linux/kdev_t.h>
17 #include <linux/console.h>
18 #include <linux/delay.h>
19 #include <linux/irq.h>
20 #include <linux/seq_file.h>
21 #include <linux/root_dev.h>
22 #include <linux/serial.h>
23 #include <linux/tty.h>
24 #include <linux/serial_core.h>
25 #include <linux/of_address.h>
26 #include <linux/of_irq.h>
27 #include <linux/of_platform.h>
28 #include <linux/extable.h>
29 
30 #include <asm/time.h>
31 #include <asm/machdep.h>
32 #include <asm/udbg.h>
33 #include <asm/tsi108.h>
34 #include <asm/pci-bridge.h>
35 #include <asm/reg.h>
36 #include <mm/mmu_decl.h>
37 #include <asm/tsi108_irq.h>
38 #include <asm/tsi108_pci.h>
39 #include <asm/mpic.h>
40 
41 #undef DEBUG
42 
43 #define HOLLY_PCI_CFG_PHYS 0x7c000000
44 
45 static int holly_exclude_device(struct pci_controller *hose, u_char bus,
46 				u_char devfn)
47 {
48 	if (bus == 0 && PCI_SLOT(devfn) == 0)
49 		return PCIBIOS_DEVICE_NOT_FOUND;
50 	else
51 		return PCIBIOS_SUCCESSFUL;
52 }
53 
54 static void __init holly_remap_bridge(void)
55 {
56 	u32 lut_val, lut_addr;
57 	int i;
58 
59 	printk(KERN_INFO "Remapping PCI bridge\n");
60 
61 	/* Re-init the PCI bridge and LUT registers to have mappings that don't
62 	 * rely on PIBS
63 	 */
64 	lut_addr = 0x900;
65 	for (i = 0; i < 31; i++) {
66 		tsi108_write_reg(TSI108_PB_OFFSET + lut_addr, 0x00000201);
67 		lut_addr += 4;
68 		tsi108_write_reg(TSI108_PB_OFFSET + lut_addr, 0x0);
69 		lut_addr += 4;
70 	}
71 
72 	/* Reserve the last LUT entry for PCI I/O space */
73 	tsi108_write_reg(TSI108_PB_OFFSET + lut_addr, 0x00000241);
74 	lut_addr += 4;
75 	tsi108_write_reg(TSI108_PB_OFFSET + lut_addr, 0x0);
76 
77 	/* Map PCI I/O space */
78 	tsi108_write_reg(TSI108_PCI_PFAB_IO_UPPER, 0x0);
79 	tsi108_write_reg(TSI108_PCI_PFAB_IO, 0x1);
80 
81 	/* Map PCI CFG space */
82 	tsi108_write_reg(TSI108_PCI_PFAB_BAR0_UPPER, 0x0);
83 	tsi108_write_reg(TSI108_PCI_PFAB_BAR0, 0x7c000000 | 0x01);
84 
85 	/* We don't need MEM32 and PRM remapping so disable them */
86 	tsi108_write_reg(TSI108_PCI_PFAB_MEM32, 0x0);
87 	tsi108_write_reg(TSI108_PCI_PFAB_PFM3, 0x0);
88 	tsi108_write_reg(TSI108_PCI_PFAB_PFM4, 0x0);
89 
90 	/* Set P2O_BAR0 */
91 	tsi108_write_reg(TSI108_PCI_P2O_BAR0_UPPER, 0x0);
92 	tsi108_write_reg(TSI108_PCI_P2O_BAR0, 0xc0000000);
93 
94 	/* Init the PCI LUTs to do no remapping */
95 	lut_addr = 0x500;
96 	lut_val = 0x00000002;
97 
98 	for (i = 0; i < 32; i++) {
99 		tsi108_write_reg(TSI108_PCI_OFFSET + lut_addr, lut_val);
100 		lut_addr += 4;
101 		tsi108_write_reg(TSI108_PCI_OFFSET + lut_addr, 0x40000000);
102 		lut_addr += 4;
103 		lut_val += 0x02000000;
104 	}
105 	tsi108_write_reg(TSI108_PCI_P2O_PAGE_SIZES, 0x00007900);
106 
107 	/* Set 64-bit PCI bus address for system memory */
108 	tsi108_write_reg(TSI108_PCI_P2O_BAR2_UPPER, 0x0);
109 	tsi108_write_reg(TSI108_PCI_P2O_BAR2, 0x0);
110 }
111 
112 static void __init holly_init_pci(void)
113 {
114 	struct device_node *np;
115 
116 	if (ppc_md.progress)
117 		ppc_md.progress("holly_setup_arch():set_bridge", 0);
118 
119 	/* setup PCI host bridge */
120 	holly_remap_bridge();
121 
122 	np = of_find_node_by_type(NULL, "pci");
123 	if (np)
124 		tsi108_setup_pci(np, HOLLY_PCI_CFG_PHYS, 1);
125 
126 	ppc_md.pci_exclude_device = holly_exclude_device;
127 	if (ppc_md.progress)
128 		ppc_md.progress("tsi108: resources set", 0x100);
129 }
130 
131 static void __init holly_setup_arch(void)
132 {
133 	tsi108_csr_vir_base = get_vir_csrbase();
134 
135 	printk(KERN_INFO "PPC750GX/CL Platform\n");
136 }
137 
138 /*
139  * Interrupt setup and service.  Interrupts on the holly come
140  * from the four external INT pins, PCI interrupts are routed via
141  * PCI interrupt control registers, it generates internal IRQ23
142  *
143  * Interrupt routing on the Holly Board:
144  * TSI108:PB_INT[0] -> CPU0:INT#
145  * TSI108:PB_INT[1] -> CPU0:MCP#
146  * TSI108:PB_INT[2] -> N/C
147  * TSI108:PB_INT[3] -> N/C
148  */
149 static void __init holly_init_IRQ(void)
150 {
151 	struct mpic *mpic;
152 #ifdef CONFIG_PCI
153 	unsigned int cascade_pci_irq;
154 	struct device_node *tsi_pci;
155 	struct device_node *cascade_node = NULL;
156 #endif
157 
158 	mpic = mpic_alloc(NULL, 0, MPIC_BIG_ENDIAN |
159 			MPIC_SPV_EOI | MPIC_NO_PTHROU_DIS | MPIC_REGSET_TSI108,
160 			24, 0,
161 			"Tsi108_PIC");
162 
163 	BUG_ON(mpic == NULL);
164 
165 	mpic_assign_isu(mpic, 0, mpic->paddr + 0x100);
166 
167 	mpic_init(mpic);
168 
169 #ifdef CONFIG_PCI
170 	tsi_pci = of_find_node_by_type(NULL, "pci");
171 	if (tsi_pci == NULL) {
172 		printk(KERN_ERR "%s: No tsi108 pci node found !\n", __func__);
173 		return;
174 	}
175 
176 	cascade_node = of_find_node_by_type(NULL, "pic-router");
177 	if (cascade_node == NULL) {
178 		printk(KERN_ERR "%s: No tsi108 pci cascade node found !\n", __func__);
179 		return;
180 	}
181 
182 	cascade_pci_irq = irq_of_parse_and_map(tsi_pci, 0);
183 	pr_debug("%s: tsi108 cascade_pci_irq = 0x%x\n", __func__, (u32) cascade_pci_irq);
184 	tsi108_pci_int_init(cascade_node);
185 	irq_set_handler_data(cascade_pci_irq, mpic);
186 	irq_set_chained_handler(cascade_pci_irq, tsi108_irq_cascade);
187 #endif
188 	/* Configure MPIC outputs to CPU0 */
189 	tsi108_write_reg(TSI108_MPIC_OFFSET + 0x30c, 0);
190 }
191 
192 static void holly_show_cpuinfo(struct seq_file *m)
193 {
194 	seq_printf(m, "vendor\t\t: IBM\n");
195 	seq_printf(m, "machine\t\t: PPC750 GX/CL\n");
196 }
197 
198 static void __noreturn holly_restart(char *cmd)
199 {
200 	__be32 __iomem *ocn_bar1 = NULL;
201 	unsigned long bar;
202 	struct device_node *bridge = NULL;
203 	const void *prop;
204 	int size;
205 	phys_addr_t addr = 0xc0000000;
206 
207 	local_irq_disable();
208 
209 	bridge = of_find_node_by_type(NULL, "tsi-bridge");
210 	if (bridge) {
211 		prop = of_get_property(bridge, "reg", &size);
212 		addr = of_translate_address(bridge, prop);
213 	}
214 	addr += (TSI108_PB_OFFSET + 0x414);
215 
216 	ocn_bar1 = ioremap(addr, 0x4);
217 
218 	/* Turn on the BOOT bit so the addresses are correctly
219 	 * routed to the HLP interface */
220 	bar = ioread32be(ocn_bar1);
221 	bar |= 2;
222 	iowrite32be(bar, ocn_bar1);
223 	iosync();
224 
225 	/* Set SRR0 to the reset vector and turn on MSR_IP */
226 	mtspr(SPRN_SRR0, 0xfff00100);
227 	mtspr(SPRN_SRR1, MSR_IP);
228 
229 	/* Do an rfi to jump back to firmware.  Somewhat evil,
230 	 * but it works
231 	 */
232 	__asm__ __volatile__("rfi" : : : "memory");
233 
234 	/* Spin until reset happens.  Shouldn't really get here */
235 	for (;;) ;
236 }
237 
238 /*
239  * Called very early, device-tree isn't unflattened
240  */
241 static int __init holly_probe(void)
242 {
243 	if (!of_machine_is_compatible("ibm,holly"))
244 		return 0;
245 	return 1;
246 }
247 
248 static int ppc750_machine_check_exception(struct pt_regs *regs)
249 {
250 	const struct exception_table_entry *entry;
251 
252 	/* Are we prepared to handle this fault */
253 	if ((entry = search_exception_tables(regs->nip)) != NULL) {
254 		tsi108_clear_pci_cfg_error();
255 		regs_set_recoverable(regs);
256 		regs_set_return_ip(regs, extable_fixup(entry));
257 		return 1;
258 	}
259 	return 0;
260 }
261 
262 define_machine(holly){
263 	.name                   	= "PPC750 GX/CL TSI",
264 	.probe                  	= holly_probe,
265 	.setup_arch             	= holly_setup_arch,
266 	.discover_phbs			= holly_init_pci,
267 	.init_IRQ               	= holly_init_IRQ,
268 	.show_cpuinfo           	= holly_show_cpuinfo,
269 	.get_irq                	= mpic_get_irq,
270 	.restart                	= holly_restart,
271 	.calibrate_decr         	= generic_calibrate_decr,
272 	.machine_check_exception	= ppc750_machine_check_exception,
273 	.progress               	= udbg_progress,
274 };
275