/* * amirix.c: ppcboot platform support for AMIRIX board * * Copyright 2002 Mind NV * Copyright 2003 AMIRIX Systems Inc. * * http://www.mind.be/ * http://www.amirix.com/ * * Author : Peter De Schrijver (p2@mind.be) *          Frank Smith (smith@amirix.com) * * Derived from : Other platform support files in this tree, ml2 * * This software may be used and distributed according to the terms of * the GNU General Public License (GPL) version 2, incorporated herein by * reference. Drivers based on or derived from this code fall under the GPL * and must retain the authorship, copyright and this license notice. This * file is not a complete program and may only be used when the entire * program is licensed under the GPL. * */#include <common.h>#include <command.h>#include <asm/processor.h>#include "powerspan.h"#include "ap1000.h"int board_pre_init (void){	return 0;}/** serial number and platform display at startup */int checkboard (void){	char *s = getenv ("serial#");	char *e;	/* After a loadace command, the SystemAce control register is left in a wonky state. */	/* this code did not work in board_pre_init */	unsigned char *p = (unsigned char *) AP1000_SYSACE_REGBASE;	p[SYSACE_CTRLREG0] = 0x0;	/* add platform and device to banner */	switch (get_device ()) {	case AP1xx_AP107_TARGET:		puts (AP1xx_AP107_TARGET_STR);		break;	case AP1xx_AP120_TARGET:		puts (AP1xx_AP120_TARGET_STR);		break;	case AP1xx_AP130_TARGET:		puts (AP1xx_AP130_TARGET_STR);		break;	case AP1xx_AP1070_TARGET:		puts (AP1xx_AP1070_TARGET_STR);		break;	case AP1xx_AP1100_TARGET:		puts (AP1xx_AP1100_TARGET_STR);		break;	default:		puts (AP1xx_UNKNOWN_STR);		break;	}	puts (AP1xx_TARGET_STR);	puts (" with ");	switch (get_platform ()) {	case AP100_BASELINE_PLATFORM:	case AP1000_BASELINE_PLATFORM:		puts (AP1xx_BASELINE_PLATFORM_STR);		break;	case AP1xx_QUADGE_PLATFORM:		puts (AP1xx_QUADGE_PLATFORM_STR);		break;	case AP1xx_MGT_REF_PLATFORM:		puts (AP1xx_MGT_REF_PLATFORM_STR);		break;	case AP1xx_STANDARD_PLATFORM:		puts (AP1xx_STANDARD_PLATFORM_STR);		break;	case AP1xx_DUAL_PLATFORM:		puts (AP1xx_DUAL_PLATFORM_STR);		break;	case AP1xx_BASE_SRAM_PLATFORM:		puts (AP1xx_BASE_SRAM_PLATFORM_STR);		break;	case AP1xx_PCI_PCB_TESTPLATFORM:	case AP1000_PCI_PCB_TESTPLATFORM:		puts (AP1xx_PCI_PCB_TESTPLATFORM_STR);		break;	case AP1xx_DUAL_GE_MEZZ_TESTPLATFORM:		puts (AP1xx_DUAL_GE_MEZZ_TESTPLATFORM_STR);		break;	case AP1xx_SFP_MEZZ_TESTPLATFORM:		puts (AP1xx_SFP_MEZZ_TESTPLATFORM_STR);		break;	default:		puts (AP1xx_UNKNOWN_STR);		break;	}	if ((get_platform () & AP1xx_TESTPLATFORM_MASK) != 0) {		puts (AP1xx_TESTPLATFORM_STR);	} else {		puts (AP1xx_PLATFORM_STR);	}	putc ('\n');	puts ("Serial#: ");	if (!s) {		printf ("### No HW ID - assuming AMIRIX");	} else {		for (e = s; *e; ++e) {			if (*e == ' ')				break;		}		for (; s < e; ++s) {			putc (*s);		}	}	putc ('\n');	return (0);}long int initdram (int board_type){	char *s = getenv ("dramsize");	if (s != NULL) {		if ((s[0] == '0') && ((s[1] == 'x') || (s[1] == 'X'))) {			s += 2;		}		return (long int)simple_strtoul (s, NULL, 16);	} else {		/* give all 64 MB */		return 64 * 1024 * 1024;	}}unsigned int get_platform (void){	unsigned int *revision_reg_ptr = (unsigned int *) AP1xx_FPGA_REV_ADDR;	return (*revision_reg_ptr & AP1xx_PLATFORM_MASK);}unsigned int get_device (void){	unsigned int *revision_reg_ptr = (unsigned int *) AP1xx_FPGA_REV_ADDR;	return (*revision_reg_ptr & AP1xx_TARGET_MASK);}#if 0				/* loadace is not working; it appears to be a hardware issue with the system ace. *//*   This function loads FPGA configurations from the SystemACE CompactFlash*/int do_loadace (cmd_tbl_t * cmdtp, int flag, int argc, char *argv[]){	unsigned char *p = (unsigned char *) AP1000_SYSACE_REGBASE;	int cfg;	if ((p[SYSACE_STATREG0] & 0x10) == 0) {		p[SYSACE_CTRLREG0] = 0x80;		printf ("\nNo CompactFlash Detected\n\n");		p[SYSACE_CTRLREG0] = 0x00;		return 1;	}	/* reset configuration controller: |  0x80 */	/* select cpflash                  & ~0x40 */	/* cfg start                       |  0x20 */	/* wait for cfgstart               & ~0x10 */	/* force cfgmode:                  |  0x08 */	/* do no force cfgaddr:            & ~0x04 */	/* clear mpulock:                  & ~0x02 */	/* do not force lock request       & ~0x01 */	p[SYSACE_CTRLREG0] = 0x80 | 0x20 | 0x08;	p[SYSACE_CTRLREG1] = 0x00;	/* force config address if arg2 exists */	if (argc == 2) {		cfg = simple_strtoul (argv[1], NULL, 10);		if (cfg > 7) {			printf ("\nInvalid Configuration\n\n");			p[SYSACE_CTRLREG0] = 0x00;			return 1;		}		/* Set config address */		p[SYSACE_CTRLREG1] = (cfg << 5);		/* force cfgaddr */		p[SYSACE_CTRLREG0] |= 0x04;	} else {		cfg = (p[SYSACE_STATREG1] & 0xE0) >> 5;	}	/* release configuration controller */	printf ("\nLoading V2PRO with config %d...\n", cfg);	p[SYSACE_CTRLREG0] &= ~0x80;	while ((p[SYSACE_STATREG1] & 0x01) == 0) {		if (p[SYSACE_ERRREG0] & 0x80) {			/* attempting to load an invalid configuration makes the cpflash */			/* appear to be removed. Reset here to avoid that problem */			p[SYSACE_CTRLREG0] = 0x80;			printf ("\nConfiguration %d Read Error\n\n", cfg);			p[SYSACE_CTRLREG0] = 0x00;			return 1;		}	}	p[SYSACE_CTRLREG0] |= 0x20;	return 0;}#endif/** Console command to display and set the software reconfigure byte  * <pre>  * swconfig        - display the current value of the software reconfigure byte  * swconfig [#]    - change the software reconfigure byte to #  * </pre>  * @param  *cmdtp  [IN] as passed by run_command (ignored)  * @param  flag    [IN] as passed by run_command (ignored)  * @param  argc    [IN] as passed by run_command if 1, display, if 2 change  * @param  *argv[] [IN] contains the parameters to use  * @return  * <pre>  *      0 if passed  *     -1 if failed  * </pre>  */int do_swconfigbyte (cmd_tbl_t * cmdtp, int flag, int argc, char *argv[]){	unsigned char *sector_buffer = NULL;	unsigned char input_char;	int write_result;	unsigned int input_uint;	/* display value if no argument */	if (argc < 2) {		printf ("Software configuration byte is currently: 0x%02x\n",			*((unsigned char *) (SW_BYTE_SECTOR_ADDR +					     SW_BYTE_SECTOR_OFFSET)));		return 0;	} else if (argc > 3) {		printf ("Too many arguments\n");		return -1;	}	/* if 3 arguments, 3rd argument is the address to use */	if (argc == 3) {		input_uint = simple_strtoul (argv[1], NULL, 16);		sector_buffer = (unsigned char *) input_uint;	} else {		sector_buffer = (unsigned char *) DEFAULT_TEMP_ADDR;	}	input_char = simple_strtoul (argv[1], NULL, 0);	if ((input_char & ~SW_BYTE_MASK) != 0) {		printf ("Input of 0x%02x will be masked to 0x%02x\n",			input_char, (input_char & SW_BYTE_MASK));		input_char = input_char & SW_BYTE_MASK;	}	memcpy (sector_buffer, (void *) SW_BYTE_SECTOR_ADDR,		SW_BYTE_SECTOR_SIZE);	sector_buffer[SW_BYTE_SECTOR_OFFSET] = input_char;	printf ("Erasing Flash...");	if (flash_sect_erase	    (SW_BYTE_SECTOR_ADDR,	     (SW_BYTE_SECTOR_ADDR + SW_BYTE_SECTOR_OFFSET))) {		return -1;	}	printf ("Writing to Flash... ");	write_result =		flash_write ((char *)sector_buffer, SW_BYTE_SECTOR_ADDR,			     SW_BYTE_SECTOR_SIZE);	if (write_result != 0) {		flash_perror (write_result);		return -1;	} else {		printf ("done\n");		printf ("Software configuration byte is now: 0x%02x\n",			*((unsigned char *) (SW_BYTE_SECTOR_ADDR +					     SW_BYTE_SECTOR_OFFSET)));	}	return 0;}#define ONE_SECOND 1000000int do_pause (cmd_tbl_t * cmdtp, int flag, int argc, char *argv[]){	int pause_time;	unsigned int delay_time;	int break_loop = 0;	/* display value if no argument */	if (argc < 2) {		pause_time = 1;	}	else if (argc > 2) {		printf ("Too many arguments\n");		return -1;	} else {		pause_time = simple_strtoul (argv[1], NULL, 0);	}	printf ("Pausing with a poll time of %d, press any key to reactivate\n", pause_time);	delay_time = pause_time * ONE_SECOND;	while (break_loop == 0) {		udelay (delay_time);		if (serial_tstc () != 0) {			break_loop = 1;			/* eat user key presses */			while (serial_tstc () != 0) {				serial_getc ();			}		}	}	return 0;}int do_swreconfig (cmd_tbl_t * cmdtp, int flag, int argc, char *argv[]){	printf ("Triggering software reconfigure (software config byte is 0x%02x)...\n",		*((unsigned char *) (SW_BYTE_SECTOR_ADDR + SW_BYTE_SECTOR_OFFSET)));