| /* | 
 |  * Copyright (C) 1999, 2000, 2004, 2005  MIPS Technologies, Inc. | 
 |  *	All rights reserved. | 
 |  *	Authors: Carsten Langgaard <carstenl@mips.com> | 
 |  *		 Maciej W. Rozycki <macro@mips.com> | 
 |  * | 
 |  *  This program is free software; you can distribute it and/or modify it | 
 |  *  under the terms of the GNU General Public License (Version 2) as | 
 |  *  published by the Free Software Foundation. | 
 |  * | 
 |  *  This program is distributed in the hope it will be useful, but WITHOUT | 
 |  *  ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | 
 |  *  FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License | 
 |  *  for more details. | 
 |  * | 
 |  *  You should have received a copy of the GNU General Public License along | 
 |  *  with this program; if not, write to the Free Software Foundation, Inc., | 
 |  *  59 Temple Place - Suite 330, Boston MA 02111-1307, USA. | 
 |  * | 
 |  * PROM library initialisation code. | 
 |  */ | 
 | #include <linux/init.h> | 
 | #include <linux/string.h> | 
 | #include <linux/kernel.h> | 
 |  | 
 | #include <asm/bootinfo.h> | 
 | #include <asm/gt64120.h> | 
 | #include <asm/io.h> | 
 | #include <asm/system.h> | 
 | #include <asm/cacheflush.h> | 
 | #include <asm/traps.h> | 
 |  | 
 | #include <asm/mips-boards/prom.h> | 
 | #include <asm/mips-boards/generic.h> | 
 | #include <asm/mips-boards/bonito64.h> | 
 | #include <asm/mips-boards/msc01_pci.h> | 
 |  | 
 | #include <asm/mips-boards/malta.h> | 
 |  | 
 | #ifdef CONFIG_KGDB | 
 | extern int rs_kgdb_hook(int, int); | 
 | extern int rs_putDebugChar(char); | 
 | extern char rs_getDebugChar(void); | 
 | extern int saa9730_kgdb_hook(int); | 
 | extern int saa9730_putDebugChar(char); | 
 | extern char saa9730_getDebugChar(void); | 
 | #endif | 
 |  | 
 | int prom_argc; | 
 | int *_prom_argv, *_prom_envp; | 
 |  | 
 | /* | 
 |  * YAMON (32-bit PROM) pass arguments and environment as 32-bit pointer. | 
 |  * This macro take care of sign extension, if running in 64-bit mode. | 
 |  */ | 
 | #define prom_envp(index) ((char *)(long)_prom_envp[(index)]) | 
 |  | 
 | int init_debug = 0; | 
 |  | 
 | int mips_revision_corid; | 
 | int mips_revision_sconid; | 
 |  | 
 | /* Bonito64 system controller register base. */ | 
 | unsigned long _pcictrl_bonito; | 
 | unsigned long _pcictrl_bonito_pcicfg; | 
 |  | 
 | /* GT64120 system controller register base */ | 
 | unsigned long _pcictrl_gt64120; | 
 |  | 
 | /* MIPS System controller register base */ | 
 | unsigned long _pcictrl_msc; | 
 |  | 
 | char *prom_getenv(char *envname) | 
 | { | 
 | 	/* | 
 | 	 * Return a pointer to the given environment variable. | 
 | 	 * In 64-bit mode: we're using 64-bit pointers, but all pointers | 
 | 	 * in the PROM structures are only 32-bit, so we need some | 
 | 	 * workarounds, if we are running in 64-bit mode. | 
 | 	 */ | 
 | 	int i, index=0; | 
 |  | 
 | 	i = strlen(envname); | 
 |  | 
 | 	while (prom_envp(index)) { | 
 | 		if(strncmp(envname, prom_envp(index), i) == 0) { | 
 | 			return(prom_envp(index+1)); | 
 | 		} | 
 | 		index += 2; | 
 | 	} | 
 |  | 
 | 	return NULL; | 
 | } | 
 |  | 
 | static inline unsigned char str2hexnum(unsigned char c) | 
 | { | 
 | 	if (c >= '0' && c <= '9') | 
 | 		return c - '0'; | 
 | 	if (c >= 'a' && c <= 'f') | 
 | 		return c - 'a' + 10; | 
 | 	return 0; /* foo */ | 
 | } | 
 |  | 
 | static inline void str2eaddr(unsigned char *ea, unsigned char *str) | 
 | { | 
 | 	int i; | 
 |  | 
 | 	for (i = 0; i < 6; i++) { | 
 | 		unsigned char num; | 
 |  | 
 | 		if((*str == '.') || (*str == ':')) | 
 | 			str++; | 
 | 		num = str2hexnum(*str++) << 4; | 
 | 		num |= (str2hexnum(*str++)); | 
 | 		ea[i] = num; | 
 | 	} | 
 | } | 
 |  | 
 | int get_ethernet_addr(char *ethernet_addr) | 
 | { | 
 |         char *ethaddr_str; | 
 |  | 
 |         ethaddr_str = prom_getenv("ethaddr"); | 
 | 	if (!ethaddr_str) { | 
 | 	        printk("ethaddr not set in boot prom\n"); | 
 | 		return -1; | 
 | 	} | 
 | 	str2eaddr(ethernet_addr, ethaddr_str); | 
 |  | 
 | 	if (init_debug > 1) { | 
 | 	        int i; | 
 | 		printk("get_ethernet_addr: "); | 
 | 	        for (i=0; i<5; i++) | 
 | 		        printk("%02x:", (unsigned char)*(ethernet_addr+i)); | 
 | 		printk("%02x\n", *(ethernet_addr+i)); | 
 | 	} | 
 |  | 
 | 	return 0; | 
 | } | 
 |  | 
 | #ifdef CONFIG_SERIAL_8250_CONSOLE | 
 | static void __init console_config(void) | 
 | { | 
 | 	char console_string[40]; | 
 | 	int baud = 0; | 
 | 	char parity = '\0', bits = '\0', flow = '\0'; | 
 | 	char *s; | 
 |  | 
 | 	if ((strstr(prom_getcmdline(), "console=")) == NULL) { | 
 | 		s = prom_getenv("modetty0"); | 
 | 		if (s) { | 
 | 			while (*s >= '0' && *s <= '9') | 
 | 				baud = baud*10 + *s++ - '0'; | 
 | 			if (*s == ',') s++; | 
 | 			if (*s) parity = *s++; | 
 | 			if (*s == ',') s++; | 
 | 			if (*s) bits = *s++; | 
 | 			if (*s == ',') s++; | 
 | 			if (*s == 'h') flow = 'r'; | 
 | 		} | 
 | 		if (baud == 0) | 
 | 			baud = 38400; | 
 | 		if (parity != 'n' && parity != 'o' && parity != 'e') | 
 | 			parity = 'n'; | 
 | 		if (bits != '7' && bits != '8') | 
 | 			bits = '8'; | 
 | 		if (flow == '\0') | 
 | 			flow = 'r'; | 
 | 		sprintf(console_string, " console=ttyS0,%d%c%c%c", baud, parity, bits, flow); | 
 | 		strcat(prom_getcmdline(), console_string); | 
 | 		pr_info("Config serial console:%s\n", console_string); | 
 | 	} | 
 | } | 
 | #endif | 
 |  | 
 | #ifdef CONFIG_KGDB | 
 | void __init kgdb_config(void) | 
 | { | 
 | 	extern int (*generic_putDebugChar)(char); | 
 | 	extern char (*generic_getDebugChar)(void); | 
 | 	char *argptr; | 
 | 	int line, speed; | 
 |  | 
 | 	argptr = prom_getcmdline(); | 
 | 	if ((argptr = strstr(argptr, "kgdb=ttyS")) != NULL) { | 
 | 		argptr += strlen("kgdb=ttyS"); | 
 | 		if (*argptr != '0' && *argptr != '1') | 
 | 			printk("KGDB: Unknown serial line /dev/ttyS%c, " | 
 | 			       "falling back to /dev/ttyS1\n", *argptr); | 
 | 		line = *argptr == '0' ? 0 : 1; | 
 | 		printk("KGDB: Using serial line /dev/ttyS%d for session\n", line); | 
 |  | 
 | 		speed = 0; | 
 | 		if (*++argptr == ',') | 
 | 		{ | 
 | 			int c; | 
 | 			while ((c = *++argptr) && ('0' <= c && c <= '9')) | 
 | 				speed = speed * 10 + c - '0'; | 
 | 		} | 
 | #ifdef CONFIG_MIPS_ATLAS | 
 | 		if (line == 1) { | 
 | 			speed = saa9730_kgdb_hook(speed); | 
 | 			generic_putDebugChar = saa9730_putDebugChar; | 
 | 			generic_getDebugChar = saa9730_getDebugChar; | 
 | 		} | 
 | 		else | 
 | #endif | 
 | 		{ | 
 | 			speed = rs_kgdb_hook(line, speed); | 
 | 			generic_putDebugChar = rs_putDebugChar; | 
 | 			generic_getDebugChar = rs_getDebugChar; | 
 | 		} | 
 |  | 
 | 		pr_info("KGDB: Using serial line /dev/ttyS%d at %d for " | 
 | 		        "session, please connect your debugger\n", | 
 | 		        line ? 1 : 0, speed); | 
 |  | 
 | 		{ | 
 | 			char *s; | 
 | 			for (s = "Please connect GDB to this port\r\n"; *s; ) | 
 | 				generic_putDebugChar(*s++); | 
 | 		} | 
 |  | 
 | 		/* Breakpoint is invoked after interrupts are initialised */ | 
 | 	} | 
 | } | 
 | #endif | 
 |  | 
 | void __init mips_nmi_setup(void) | 
 | { | 
 | 	void *base; | 
 | 	extern char except_vec_nmi; | 
 |  | 
 | 	base = cpu_has_veic ? | 
 | 		(void *)(CAC_BASE + 0xa80) : | 
 | 		(void *)(CAC_BASE + 0x380); | 
 | 	memcpy(base, &except_vec_nmi, 0x80); | 
 | 	flush_icache_range((unsigned long)base, (unsigned long)base + 0x80); | 
 | } | 
 |  | 
 | void __init mips_ejtag_setup(void) | 
 | { | 
 | 	void *base; | 
 | 	extern char except_vec_ejtag_debug; | 
 |  | 
 | 	base = cpu_has_veic ? | 
 | 		(void *)(CAC_BASE + 0xa00) : | 
 | 		(void *)(CAC_BASE + 0x300); | 
 | 	memcpy(base, &except_vec_ejtag_debug, 0x80); | 
 | 	flush_icache_range((unsigned long)base, (unsigned long)base + 0x80); | 
 | } | 
 |  | 
 | extern struct plat_smp_ops msmtc_smp_ops; | 
 |  | 
 | void __init prom_init(void) | 
 | { | 
 | 	prom_argc = fw_arg0; | 
 | 	_prom_argv = (int *) fw_arg1; | 
 | 	_prom_envp = (int *) fw_arg2; | 
 |  | 
 | 	mips_display_message("LINUX"); | 
 |  | 
 | #ifdef CONFIG_MIPS_SEAD | 
 | 	set_io_port_base(KSEG1); | 
 | #else | 
 | 	/* | 
 | 	 * early setup of _pcictrl_bonito so that we can determine | 
 | 	 * the system controller on a CORE_EMUL board | 
 | 	 */ | 
 | 	_pcictrl_bonito = (unsigned long)ioremap(BONITO_REG_BASE, BONITO_REG_SIZE); | 
 |  | 
 | 	mips_revision_corid = MIPS_REVISION_CORID; | 
 |  | 
 | 	if (mips_revision_corid == MIPS_REVISION_CORID_CORE_EMUL) { | 
 | 		if (BONITO_PCIDID == 0x0001df53 || | 
 | 		    BONITO_PCIDID == 0x0003df53) | 
 | 			mips_revision_corid = MIPS_REVISION_CORID_CORE_EMUL_BON; | 
 | 		else | 
 | 			mips_revision_corid = MIPS_REVISION_CORID_CORE_EMUL_MSC; | 
 | 	} | 
 |  | 
 | 	mips_revision_sconid = MIPS_REVISION_SCONID; | 
 | 	if (mips_revision_sconid == MIPS_REVISION_SCON_OTHER) { | 
 | 		switch (mips_revision_corid) { | 
 | 		case MIPS_REVISION_CORID_QED_RM5261: | 
 | 		case MIPS_REVISION_CORID_CORE_LV: | 
 | 		case MIPS_REVISION_CORID_CORE_FPGA: | 
 | 		case MIPS_REVISION_CORID_CORE_FPGAR2: | 
 | 			mips_revision_sconid = MIPS_REVISION_SCON_GT64120; | 
 | 			break; | 
 | 		case MIPS_REVISION_CORID_CORE_EMUL_BON: | 
 | 		case MIPS_REVISION_CORID_BONITO64: | 
 | 		case MIPS_REVISION_CORID_CORE_20K: | 
 | 			mips_revision_sconid = MIPS_REVISION_SCON_BONITO; | 
 | 			break; | 
 | 		case MIPS_REVISION_CORID_CORE_MSC: | 
 | 		case MIPS_REVISION_CORID_CORE_FPGA2: | 
 | 		case MIPS_REVISION_CORID_CORE_FPGA3: | 
 | 		case MIPS_REVISION_CORID_CORE_FPGA4: | 
 | 		case MIPS_REVISION_CORID_CORE_24K: | 
 | 		case MIPS_REVISION_CORID_CORE_EMUL_MSC: | 
 | 			mips_revision_sconid = MIPS_REVISION_SCON_SOCIT; | 
 | 			break; | 
 | 		default: | 
 | 			mips_display_message("CC Error"); | 
 | 			while (1);   /* We die here... */ | 
 | 		} | 
 | 	} | 
 |  | 
 | 	switch (mips_revision_sconid) { | 
 | 		u32 start, map, mask, data; | 
 |  | 
 | 	case MIPS_REVISION_SCON_GT64120: | 
 | 		/* | 
 | 		 * Setup the North bridge to do Master byte-lane swapping | 
 | 		 * when running in bigendian. | 
 | 		 */ | 
 | 		_pcictrl_gt64120 = (unsigned long)ioremap(MIPS_GT_BASE, 0x2000); | 
 |  | 
 | #ifdef CONFIG_CPU_LITTLE_ENDIAN | 
 | 		GT_WRITE(GT_PCI0_CMD_OFS, GT_PCI0_CMD_MBYTESWAP_BIT | | 
 | 			 GT_PCI0_CMD_SBYTESWAP_BIT); | 
 | #else | 
 | 		GT_WRITE(GT_PCI0_CMD_OFS, 0); | 
 | #endif | 
 | 		/* Fix up PCI I/O mapping if necessary (for Atlas).  */ | 
 | 		start = GT_READ(GT_PCI0IOLD_OFS); | 
 | 		map = GT_READ(GT_PCI0IOREMAP_OFS); | 
 | 		if ((start & map) != 0) { | 
 | 			map &= ~start; | 
 | 			GT_WRITE(GT_PCI0IOREMAP_OFS, map); | 
 | 		} | 
 |  | 
 | 		set_io_port_base(MALTA_GT_PORT_BASE); | 
 | 		break; | 
 |  | 
 | 	case MIPS_REVISION_SCON_BONITO: | 
 | 		_pcictrl_bonito_pcicfg = (unsigned long)ioremap(BONITO_PCICFG_BASE, BONITO_PCICFG_SIZE); | 
 |  | 
 | 		/* | 
 | 		 * Disable Bonito IOBC. | 
 | 		 */ | 
 | 		BONITO_PCIMEMBASECFG = BONITO_PCIMEMBASECFG & | 
 | 			~(BONITO_PCIMEMBASECFG_MEMBASE0_CACHED | | 
 | 			  BONITO_PCIMEMBASECFG_MEMBASE1_CACHED); | 
 |  | 
 | 		/* | 
 | 		 * Setup the North bridge to do Master byte-lane swapping | 
 | 		 * when running in bigendian. | 
 | 		 */ | 
 | #ifdef CONFIG_CPU_LITTLE_ENDIAN | 
 | 		BONITO_BONGENCFG = BONITO_BONGENCFG & | 
 | 			~(BONITO_BONGENCFG_MSTRBYTESWAP | | 
 | 			  BONITO_BONGENCFG_BYTESWAP); | 
 | #else | 
 | 		BONITO_BONGENCFG = BONITO_BONGENCFG | | 
 | 			BONITO_BONGENCFG_MSTRBYTESWAP | | 
 | 			BONITO_BONGENCFG_BYTESWAP; | 
 | #endif | 
 |  | 
 | 		set_io_port_base(MALTA_BONITO_PORT_BASE); | 
 | 		break; | 
 |  | 
 | 	case MIPS_REVISION_SCON_SOCIT: | 
 | 	case MIPS_REVISION_SCON_ROCIT: | 
 | 		_pcictrl_msc = (unsigned long)ioremap(MIPS_MSC01_PCI_REG_BASE, 0x2000); | 
 | 	mips_pci_controller: | 
 | 		mb(); | 
 | 		MSC_READ(MSC01_PCI_CFG, data); | 
 | 		MSC_WRITE(MSC01_PCI_CFG, data & ~MSC01_PCI_CFG_EN_BIT); | 
 | 		wmb(); | 
 |  | 
 | 		/* Fix up lane swapping.  */ | 
 | #ifdef CONFIG_CPU_LITTLE_ENDIAN | 
 | 		MSC_WRITE(MSC01_PCI_SWAP, MSC01_PCI_SWAP_NOSWAP); | 
 | #else | 
 | 		MSC_WRITE(MSC01_PCI_SWAP, | 
 | 			  MSC01_PCI_SWAP_BYTESWAP << MSC01_PCI_SWAP_IO_SHF | | 
 | 			  MSC01_PCI_SWAP_BYTESWAP << MSC01_PCI_SWAP_MEM_SHF | | 
 | 			  MSC01_PCI_SWAP_BYTESWAP << MSC01_PCI_SWAP_BAR0_SHF); | 
 | #endif | 
 | 		/* Fix up target memory mapping.  */ | 
 | 		MSC_READ(MSC01_PCI_BAR0, mask); | 
 | 		MSC_WRITE(MSC01_PCI_P2SCMSKL, mask & MSC01_PCI_BAR0_SIZE_MSK); | 
 |  | 
 | 		/* Don't handle target retries indefinitely.  */ | 
 | 		if ((data & MSC01_PCI_CFG_MAXRTRY_MSK) == | 
 | 		    MSC01_PCI_CFG_MAXRTRY_MSK) | 
 | 			data = (data & ~(MSC01_PCI_CFG_MAXRTRY_MSK << | 
 | 					 MSC01_PCI_CFG_MAXRTRY_SHF)) | | 
 | 			       ((MSC01_PCI_CFG_MAXRTRY_MSK - 1) << | 
 | 				MSC01_PCI_CFG_MAXRTRY_SHF); | 
 |  | 
 | 		wmb(); | 
 | 		MSC_WRITE(MSC01_PCI_CFG, data); | 
 | 		mb(); | 
 |  | 
 | 		set_io_port_base(MALTA_MSC_PORT_BASE); | 
 | 		break; | 
 |  | 
 | 	case MIPS_REVISION_SCON_SOCITSC: | 
 | 	case MIPS_REVISION_SCON_SOCITSCP: | 
 | 		_pcictrl_msc = (unsigned long)ioremap(MIPS_SOCITSC_PCI_REG_BASE, 0x2000); | 
 | 		goto mips_pci_controller; | 
 |  | 
 | 	default: | 
 | 		/* Unknown system controller */ | 
 | 		mips_display_message("SC Error"); | 
 | 		while (1);   /* We die here... */ | 
 | 	} | 
 | #endif | 
 | 	board_nmi_handler_setup = mips_nmi_setup; | 
 | 	board_ejtag_handler_setup = mips_ejtag_setup; | 
 |  | 
 | 	pr_info("\nLINUX started...\n"); | 
 | 	prom_init_cmdline(); | 
 | 	prom_meminit(); | 
 | #ifdef CONFIG_SERIAL_8250_CONSOLE | 
 | 	console_config(); | 
 | #endif | 
 | #ifdef CONFIG_MIPS_MT_SMP | 
 | 	register_smp_ops(&vsmp_smp_ops); | 
 | #endif | 
 | #ifdef CONFIG_MIPS_MT_SMTC | 
 | 	register_smp_ops(&msmtc_smp_ops); | 
 | #endif | 
 | } |