arch/powerpc/platforms/embedded6xx/mpc7448_hpc2.c - kernel/msm-4.19 - Gitiles

 /*
  * 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/ide.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_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

 #ifndef CONFIG_PCI
 isa_io_base = MPC7448_HPC2_ISA_IO_BASE;
 isa_mem_base = MPC7448_HPC2_ISA_MEM_BASE;
 pci_dram_offset = MPC7448_HPC2_PCI_MEM_OFFSET;
 #endif

 extern int tsi108_setup_pci(struct device_node *dev);
 extern void _nmask_and_or_msr(unsigned long nmask, unsigned long or_val);
 extern void tsi108_pci_int_init(struct device_node *node);
 extern void tsi108_irq_cascade(unsigned int irq, struct irq_desc *desc);

 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 *cpu;
 	struct device_node *np;
 	if (ppc_md.progress)
 		ppc_md.progress("mpc7448_hpc2_setup_arch():set_bridge", 0);

 	cpu = of_find_node_by_type(NULL, "cpu");
 	if (cpu != 0) {
 		const unsigned int *fp;

 		fp = get_property(cpu, "clock-frequency", NULL);
 		if (fp != 0)
 			loops_per_jiffy = *fp / HZ;
 		else
 			loops_per_jiffy = 50000000 / HZ;
 		of_node_put(cpu);
 	}
 	tsi108_csr_vir_base = get_vir_csrbase();

 #ifdef	CONFIG_ROOT_NFS
 	ROOT_DEV = Root_NFS;
 #else
 	ROOT_DEV = Root_HDA1;
 #endif

 #ifdef CONFIG_BLK_DEV_INITRD
 	ROOT_DEV = Root_RAM0;
 #endif

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

 	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 = 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)
 {
 	extern void tsi108_clear_pci_cfg_error(void);
 	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,
 };
	/*
	* 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/ide.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_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

	#ifndef CONFIG_PCI
	isa_io_base = MPC7448_HPC2_ISA_IO_BASE;
	isa_mem_base = MPC7448_HPC2_ISA_MEM_BASE;
	pci_dram_offset = MPC7448_HPC2_PCI_MEM_OFFSET;
	#endif

	extern int tsi108_setup_pci(struct device_node *dev);
	extern void _nmask_and_or_msr(unsigned long nmask, unsigned long or_val);
	extern void tsi108_pci_int_init(struct device_node *node);
	extern void tsi108_irq_cascade(unsigned int irq, struct irq_desc *desc);

	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 *cpu;
	struct device_node *np;
	if (ppc_md.progress)
	ppc_md.progress("mpc7448_hpc2_setup_arch():set_bridge", 0);

	cpu = of_find_node_by_type(NULL, "cpu");
	if (cpu != 0) {
	const unsigned int *fp;

	fp = get_property(cpu, "clock-frequency", NULL);
	if (fp != 0)
	loops_per_jiffy = *fp / HZ;
	else
	loops_per_jiffy = 50000000 / HZ;
	of_node_put(cpu);
	}
	tsi108_csr_vir_base = get_vir_csrbase();

	#ifdef CONFIG_ROOT_NFS
	ROOT_DEV = Root_NFS;
	#else
	ROOT_DEV = Root_HDA1;
	#endif

	#ifdef CONFIG_BLK_DEV_INITRD
	ROOT_DEV = Root_RAM0;
	#endif

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

	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 = 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)
	{
	extern void tsi108_clear_pci_cfg_error(void);
	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,
	};