[deliverable/linux.git] / arch / powerpc / platforms / embedded6xx / mpc7448_hpc2.c

/*
 * mpc7448_hpc2.c
 *
 * Board setup routines for the Freescale mpc7448hpc2(taiga) platform
 *
 * Author: Jacob Pan
 *	 jacob.pan@freescale.com
 * Author: Xianghua Xiao
 *       x.xiao@freescale.com
 * Maintainer: Roy Zang <tie-fei.zang@freescale.com>
 * 	Add Flat Device Tree support fot mpc7448hpc2 board
 *
 * Copyright 2004-2006 Freescale Semiconductor, Inc.
 *
 * 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.
 */

#include <linux/stddef.h>
#include <linux/kernel.h>
#include <linux/pci.h>
#include <linux/kdev_t.h>
#include <linux/console.h>
#include <linux/delay.h>
#include <linux/irq.h>
#include <linux/seq_file.h>
#include <linux/root_dev.h>
#include <linux/serial.h>
#include <linux/tty.h>
#include <linux/serial_core.h>

#include <asm/system.h>
#include <asm/time.h>
#include <asm/machdep.h>
#include <asm/prom.h>
#include <asm/udbg.h>
#include <asm/tsi108.h>
#include <asm/pci-bridge.h>
#include <asm/reg.h>
#include <mm/mmu_decl.h>
#include "mpc7448_hpc2.h"
#include <asm/tsi108_pci.h>
#include <asm/tsi108_irq.h>
#include <asm/mpic.h>

#undef DEBUG
#ifdef DEBUG
#define DBG(fmt...) do { printk(fmt); } while(0)
#else
#define DBG(fmt...) do { } while(0)
#endif

#define MPC7448HPC2_PCI_CFG_PHYS 0xfb000000

extern void _nmask_and_or_msr(unsigned long nmask, unsigned long or_val);

int mpc7448_hpc2_exclude_device(u_char bus, u_char devfn)
{
	if (bus == 0 && PCI_SLOT(devfn) == 0)
		return PCIBIOS_DEVICE_NOT_FOUND;
	else
		return PCIBIOS_SUCCESSFUL;
}

static void __init mpc7448_hpc2_setup_arch(void)
{
	struct device_node *np;
	if (ppc_md.progress)
		ppc_md.progress("mpc7448_hpc2_setup_arch():set_bridge", 0);

	tsi108_csr_vir_base = get_vir_csrbase();

	/* setup PCI host bridge */
#ifdef CONFIG_PCI
	for (np = NULL; (np = of_find_node_by_type(np, "pci")) != NULL;)
		tsi108_setup_pci(np, MPC7448HPC2_PCI_CFG_PHYS, 0);

	ppc_md.pci_exclude_device = mpc7448_hpc2_exclude_device;
	if (ppc_md.progress)
		ppc_md.progress("tsi108: resources set", 0x100);
#endif

	printk(KERN_INFO "MPC7448HPC2 (TAIGA) Platform\n");
	printk(KERN_INFO
	       "Jointly ported by Freescale and Tundra Semiconductor\n");
	printk(KERN_INFO
	       "Enabling L2 cache then enabling the HID0 prefetch engine.\n");
}

/*
 * Interrupt setup and service.  Interrrupts on the mpc7448_hpc2 come
 * from the four external INT pins, PCI interrupts are routed via
 * PCI interrupt control registers, it generates internal IRQ23
 *
 * Interrupt routing on the Taiga Board:
 * TSI108:PB_INT[0] -> CPU0:INT#
 * TSI108:PB_INT[1] -> CPU0:MCP#
 * TSI108:PB_INT[2] -> N/C
 * TSI108:PB_INT[3] -> N/C
 */
static void __init mpc7448_hpc2_init_IRQ(void)
{
	struct mpic *mpic;
	phys_addr_t mpic_paddr = 0;
	struct device_node *tsi_pic;
#ifdef CONFIG_PCI
	unsigned int cascade_pci_irq;
	struct device_node *tsi_pci;
	struct device_node *cascade_node = NULL;
#endif

	tsi_pic = of_find_node_by_type(NULL, "open-pic");
	if (tsi_pic) {
		unsigned int size;
		const void *prop = of_get_property(tsi_pic, "reg", &size);
		mpic_paddr = of_translate_address(tsi_pic, prop);
	}

	if (mpic_paddr == 0) {
		printk("%s: No tsi108 PIC found !\n", __FUNCTION__);
		return;
	}

	DBG("%s: tsi108 pic phys_addr = 0x%x\n", __FUNCTION__,
	    (u32) mpic_paddr);

	mpic = mpic_alloc(tsi_pic, mpic_paddr,
			MPIC_PRIMARY | MPIC_BIG_ENDIAN | MPIC_WANTS_RESET |
			MPIC_SPV_EOI | MPIC_NO_PTHROU_DIS | MPIC_REGSET_TSI108,
			24,
			NR_IRQS-4, /* num_sources used */
			"Tsi108_PIC");

	BUG_ON(mpic == NULL);

	mpic_assign_isu(mpic, 0, mpic_paddr + 0x100);

	mpic_init(mpic);

#ifdef CONFIG_PCI
	tsi_pci = of_find_node_by_type(NULL, "pci");
	if (tsi_pci == NULL) {
		printk("%s: No tsi108 pci node found !\n", __FUNCTION__);
		return;
	}
	cascade_node = of_find_node_by_type(NULL, "pic-router");
	if (cascade_node == NULL) {
		printk("%s: No tsi108 pci cascade node found !\n", __FUNCTION__);
		return;
	}

	cascade_pci_irq = irq_of_parse_and_map(tsi_pci, 0);
	DBG("%s: tsi108 cascade_pci_irq = 0x%x\n", __FUNCTION__,
	    (u32) cascade_pci_irq);
	tsi108_pci_int_init(cascade_node);
	set_irq_data(cascade_pci_irq, mpic);
	set_irq_chained_handler(cascade_pci_irq, tsi108_irq_cascade);
#endif
	/* Configure MPIC outputs to CPU0 */
	tsi108_write_reg(TSI108_MPIC_OFFSET + 0x30c, 0);
	of_node_put(tsi_pic);
}

void mpc7448_hpc2_show_cpuinfo(struct seq_file *m)
{
	seq_printf(m, "vendor\t\t: Freescale Semiconductor\n");
	seq_printf(m, "machine\t\t: MPC7448hpc2\n");
}

void mpc7448_hpc2_restart(char *cmd)
{
	local_irq_disable();

	/* Set exception prefix high - to the firmware */
	_nmask_and_or_msr(0, MSR_IP);

	for (;;) ;		/* Spin until reset happens */
}

void mpc7448_hpc2_power_off(void)
{
	local_irq_disable();
	for (;;) ;		/* No way to shut power off with software */
}

void mpc7448_hpc2_halt(void)
{
	mpc7448_hpc2_power_off();
}

/*
 * Called very early, device-tree isn't unflattened
 */
static int __init mpc7448_hpc2_probe(void)
{
	unsigned long root = of_get_flat_dt_root();

	if (!of_flat_dt_is_compatible(root, "mpc74xx"))
		return 0;
	return 1;
}

static int mpc7448_machine_check_exception(struct pt_regs *regs)
{
	const struct exception_table_entry *entry;

	/* Are we prepared to handle this fault */
	if ((entry = search_exception_tables(regs->nip)) != NULL) {
		tsi108_clear_pci_cfg_error();
		regs->msr |= MSR_RI;
		regs->nip = entry->fixup;
		return 1;
	}
	return 0;
}

define_machine(mpc7448_hpc2){
	.name 			= "MPC7448 HPC2",
	.probe 			= mpc7448_hpc2_probe,
	.setup_arch 		= mpc7448_hpc2_setup_arch,
	.init_IRQ 		= mpc7448_hpc2_init_IRQ,
	.show_cpuinfo 		= mpc7448_hpc2_show_cpuinfo,
	.get_irq 		= mpic_get_irq,
	.restart 		= mpc7448_hpc2_restart,
	.calibrate_decr 	= generic_calibrate_decr,
	.machine_check_exception= mpc7448_machine_check_exception,
	.progress 		= udbg_progress,
};
Commit	Line	Data
c5d56332 ZR	1	/*
	2	* mpc7448_hpc2.c
	3	*
c4342ff9	4	* Board setup routines for the Freescale mpc7448hpc2(taiga) platform
c5d56332 ZR	5	*
	6	* Author: Jacob Pan
	7	* jacob.pan@freescale.com
	8	* Author: Xianghua Xiao
	9	* x.xiao@freescale.com
	10	* Maintainer: Roy Zang <tie-fei.zang@freescale.com>
	11	* Add Flat Device Tree support fot mpc7448hpc2 board
	12	*
	13	* Copyright 2004-2006 Freescale Semiconductor, Inc.
	14	*
c4342ff9 ZR	15	* This program is free software; you can redistribute it and/or
	16	* modify it under the terms of the GNU General Public License
	17	* as published by the Free Software Foundation; either version
	18	* 2 of the License, or (at your option) any later version.
c5d56332 ZR	19	*/
c5d56332 ZR	20
c5d56332 ZR	21	#include <linux/stddef.h>
	22	#include <linux/kernel.h>
	23	#include <linux/pci.h>
	24	#include <linux/kdev_t.h>
	25	#include <linux/console.h>
	26	#include <linux/delay.h>
	27	#include <linux/irq.h>
c5d56332 ZR	28	#include <linux/seq_file.h>
	29	#include <linux/root_dev.h>
	30	#include <linux/serial.h>
	31	#include <linux/tty.h>
	32	#include <linux/serial_core.h>
	33
	34	#include <asm/system.h>
	35	#include <asm/time.h>
	36	#include <asm/machdep.h>
	37	#include <asm/prom.h>
	38	#include <asm/udbg.h>
	39	#include <asm/tsi108.h>
	40	#include <asm/pci-bridge.h>
	41	#include <asm/reg.h>
	42	#include <mm/mmu_decl.h>
	43	#include "mpc7448_hpc2.h"
08390db0	44	#include <asm/tsi108_pci.h>
c5d56332 ZR	45	#include <asm/tsi108_irq.h>
	46	#include <asm/mpic.h>
	47
	48	#undef DEBUG
	49	#ifdef DEBUG
	50	#define DBG(fmt...) do { printk(fmt); } while(0)
	51	#else
	52	#define DBG(fmt...) do { } while(0)
	53	#endif
	54
05ad6a91 JB	55	#define MPC7448HPC2_PCI_CFG_PHYS 0xfb000000
05ad6a91 JB	56
c5d56332	57	extern void _nmask_and_or_msr(unsigned long nmask, unsigned long or_val);
c5d56332 ZR	58
	59	int mpc7448_hpc2_exclude_device(u_char bus, u_char devfn)
	60	{
	61	if (bus == 0 && PCI_SLOT(devfn) == 0)
	62	return PCIBIOS_DEVICE_NOT_FOUND;
	63	else
	64	return PCIBIOS_SUCCESSFUL;
	65	}
	66
c5d56332 ZR	67	static void __init mpc7448_hpc2_setup_arch(void)
c5d56332 ZR	68	{
c5d56332 ZR	69	struct device_node *np;
	70	if (ppc_md.progress)
	71	ppc_md.progress("mpc7448_hpc2_setup_arch():set_bridge", 0);
	72
c5d56332 ZR	73	tsi108_csr_vir_base = get_vir_csrbase();
c5d56332 ZR	74
c5d56332 ZR	75	/* setup PCI host bridge */
	76	#ifdef CONFIG_PCI
	77	for (np = NULL; (np = of_find_node_by_type(np, "pci")) != NULL;)
05ad6a91	78	tsi108_setup_pci(np, MPC7448HPC2_PCI_CFG_PHYS, 0);
c5d56332 ZR	79
	80	ppc_md.pci_exclude_device = mpc7448_hpc2_exclude_device;
	81	if (ppc_md.progress)
	82	ppc_md.progress("tsi108: resources set", 0x100);
	83	#endif
	84
	85	printk(KERN_INFO "MPC7448HPC2 (TAIGA) Platform\n");
	86	printk(KERN_INFO
	87	"Jointly ported by Freescale and Tundra Semiconductor\n");
	88	printk(KERN_INFO
	89	"Enabling L2 cache then enabling the HID0 prefetch engine.\n");
	90	}
	91
	92	/*
	93	* Interrupt setup and service. Interrrupts on the mpc7448_hpc2 come
	94	* from the four external INT pins, PCI interrupts are routed via
	95	* PCI interrupt control registers, it generates internal IRQ23
	96	*
	97	* Interrupt routing on the Taiga Board:
	98	* TSI108:PB_INT[0] -> CPU0:INT#
	99	* TSI108:PB_INT[1] -> CPU0:MCP#
	100	* TSI108:PB_INT[2] -> N/C
	101	* TSI108:PB_INT[3] -> N/C
	102	*/
	103	static void __init mpc7448_hpc2_init_IRQ(void)
	104	{
	105	struct mpic *mpic;
	106	phys_addr_t mpic_paddr = 0;
5873c9bd ZR	107	struct device_node *tsi_pic;
5873c9bd ZR	108	#ifdef CONFIG_PCI
c4342ff9 ZR	109	unsigned int cascade_pci_irq;
c4342ff9 ZR	110	struct device_node *tsi_pci;
5873c9bd ZR	111	struct device_node *cascade_node = NULL;
5873c9bd ZR	112	#endif
c5d56332 ZR	113
	114	tsi_pic = of_find_node_by_type(NULL, "open-pic");
	115	if (tsi_pic) {
	116	unsigned int size;
e2eb6392	117	const void *prop = of_get_property(tsi_pic, "reg", &size);
c5d56332 ZR	118	mpic_paddr = of_translate_address(tsi_pic, prop);
	119	}
	120
	121	if (mpic_paddr == 0) {
	122	printk("%s: No tsi108 PIC found !\n", __FUNCTION__);
	123	return;
	124	}
	125
5873c9bd	126	DBG("%s: tsi108 pic phys_addr = 0x%x\n", __FUNCTION__,
c5d56332 ZR	127	(u32) mpic_paddr);
c5d56332 ZR	128
c4342ff9	129	mpic = mpic_alloc(tsi_pic, mpic_paddr,
c5d56332	130	MPIC_PRIMARY \| MPIC_BIG_ENDIAN \| MPIC_WANTS_RESET \|
7233593b	131	MPIC_SPV_EOI \| MPIC_NO_PTHROU_DIS \| MPIC_REGSET_TSI108,
5873c9bd ZR	132	24,
5873c9bd ZR	133	NR_IRQS-4, /* num_sources used */
c4342ff9	134	"Tsi108_PIC");
c5d56332	135
5873c9bd ZR	136	BUG_ON(mpic == NULL);
	137
	138	mpic_assign_isu(mpic, 0, mpic_paddr + 0x100);
	139
c5d56332	140	mpic_init(mpic);
c4342ff9	141
5873c9bd	142	#ifdef CONFIG_PCI
c4342ff9	143	tsi_pci = of_find_node_by_type(NULL, "pci");
5873c9bd	144	if (tsi_pci == NULL) {
c4342ff9 ZR	145	printk("%s: No tsi108 pci node found !\n", __FUNCTION__);
	146	return;
	147	}
5873c9bd ZR	148	cascade_node = of_find_node_by_type(NULL, "pic-router");
	149	if (cascade_node == NULL) {
	150	printk("%s: No tsi108 pci cascade node found !\n", __FUNCTION__);
	151	return;
	152	}
c4342ff9 ZR	153
c4342ff9 ZR	154	cascade_pci_irq = irq_of_parse_and_map(tsi_pci, 0);
5873c9bd ZR	155	DBG("%s: tsi108 cascade_pci_irq = 0x%x\n", __FUNCTION__,
	156	(u32) cascade_pci_irq);
	157	tsi108_pci_int_init(cascade_node);
c4342ff9 ZR	158	set_irq_data(cascade_pci_irq, mpic);
c4342ff9 ZR	159	set_irq_chained_handler(cascade_pci_irq, tsi108_irq_cascade);
5873c9bd	160	#endif
c5d56332 ZR	161	/* Configure MPIC outputs to CPU0 */
c5d56332 ZR	162	tsi108_write_reg(TSI108_MPIC_OFFSET + 0x30c, 0);
c4342ff9	163	of_node_put(tsi_pic);
c5d56332 ZR	164	}
	165
	166	void mpc7448_hpc2_show_cpuinfo(struct seq_file *m)
	167	{
	168	seq_printf(m, "vendor\t\t: Freescale Semiconductor\n");
	169	seq_printf(m, "machine\t\t: MPC7448hpc2\n");
	170	}
	171
	172	void mpc7448_hpc2_restart(char *cmd)
	173	{
	174	local_irq_disable();
	175
	176	/* Set exception prefix high - to the firmware */
	177	_nmask_and_or_msr(0, MSR_IP);
	178
	179	for (;;) ; /* Spin until reset happens */
	180	}
	181
	182	void mpc7448_hpc2_power_off(void)
	183	{
	184	local_irq_disable();
	185	for (;;) ; /* No way to shut power off with software */
	186	}
	187
	188	void mpc7448_hpc2_halt(void)
	189	{
	190	mpc7448_hpc2_power_off();
	191	}
	192
	193	/*
	194	* Called very early, device-tree isn't unflattened
	195	*/
	196	static int __init mpc7448_hpc2_probe(void)
	197	{
	198	unsigned long root = of_get_flat_dt_root();
	199
	200	if (!of_flat_dt_is_compatible(root, "mpc74xx"))
	201	return 0;
	202	return 1;
	203	}
	204
	205	static int mpc7448_machine_check_exception(struct pt_regs *regs)
	206	{
c5d56332 ZR	207	const struct exception_table_entry *entry;
	208
	209	/* Are we prepared to handle this fault */
	210	if ((entry = search_exception_tables(regs->nip)) != NULL) {
	211	tsi108_clear_pci_cfg_error();
	212	regs->msr \|= MSR_RI;
	213	regs->nip = entry->fixup;
	214	return 1;
	215	}
	216	return 0;
c5d56332	217	}
c4342ff9	218
c5d56332 ZR	219	define_machine(mpc7448_hpc2){
	220	.name = "MPC7448 HPC2",
	221	.probe = mpc7448_hpc2_probe,
	222	.setup_arch = mpc7448_hpc2_setup_arch,
	223	.init_IRQ = mpc7448_hpc2_init_IRQ,
	224	.show_cpuinfo = mpc7448_hpc2_show_cpuinfo,
	225	.get_irq = mpic_get_irq,
c5d56332 ZR	226	.restart = mpc7448_hpc2_restart,
	227	.calibrate_decr = generic_calibrate_decr,
	228	.machine_check_exception= mpc7448_machine_check_exception,
	229	.progress = udbg_progress,
	230	};