/* *  Copyright (C) 2005 Sandburst Corporation * * See file CREDITS for list of people who contributed to this * project. * * 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. * * This program is distributed in the hope that 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 */#include <config.h>#include <common.h>#include <command.h>#include <asm/processor.h>#include <asm/io.h>#include <spd_sdram.h>#include <i2c.h>#include "ppc440gx_i2c.h"#include "sb_common.h"DECLARE_GLOBAL_DATA_PTR;long int fixed_sdram (void);/************************************************************************* *  metrobox_get_master * *  PRI_N - active low signal.	If the GPIO pin is low we are the master * ************************************************************************/int sbcommon_get_master(void){	ppc440_gpio_regs_t *gpio_regs;	gpio_regs = (ppc440_gpio_regs_t *)CFG_GPIO_BASE;	if (gpio_regs->in & SBCOMMON_GPIO_PRI_N) {		return 0;	}	else {		return 1;	}}/************************************************************************* *  metrobox_secondary_present * *  Figure out if secondary/slave board is present * ************************************************************************/int sbcommon_secondary_present(void){	ppc440_gpio_regs_t *gpio_regs;	gpio_regs = (ppc440_gpio_regs_t *)CFG_GPIO_BASE;	if (gpio_regs->in & SBCOMMON_GPIO_SEC_PRES)		return 0;	else		return 1;}/************************************************************************* *  sbcommon_get_serial_number * *  Retrieve the board serial number via the mac address in eeprom * ************************************************************************/unsigned short sbcommon_get_serial_number(void){	unsigned char buff[0x100];	unsigned short sernum;	/* Get the board serial number from eeprom */	/* Initialize I2C */	i2c_init (CFG_I2C_SPEED, CFG_I2C_SLAVE);	/* Read 256 bytes in EEPROM */	i2c_read (0x50, 0, 1, buff, 0x100);	memcpy(&sernum, &buff[0xF4], 2);	sernum /= 32;	return (sernum);}/************************************************************************* *  sbcommon_fans * *  Spin up fans 2 & 3 to get some air moving.	OS will take care *  of the rest.  This is mostly a precaution... * *  Assumes i2c bus 1 is ready. * ************************************************************************/void sbcommon_fans(void){	/*	 * Attempt to turn on 2 of the fans...	 * Need to go through the bridge	 */	puts ("FANS:  ");	/* select fan4 through the bridge */	i2c_reg_write1(0x73, /* addr */		       0x00, /* reg */		       0x08); /* val = bus 4 */	/* Turn on FAN 4 */	i2c_reg_write1(0x2e,		       1,		       0x80);	i2c_reg_write1(0x2e,		       0,		       0x19);	/* Deselect bus 4 on the bridge */	i2c_reg_write1(0x73,		       0x00,		       0x00);	/* select fan3 through the bridge */	i2c_reg_write1(0x73, /* addr */		       0x00, /* reg */		       0x04); /* val = bus 3 */	/* Turn on FAN 3 */	i2c_reg_write1(0x2e,		       1,		       0x80);	i2c_reg_write1(0x2e,		       0,		       0x19);	/* Deselect bus 3 on the bridge */	i2c_reg_write1(0x73,		       0x00,		       0x00);	/* select fan2 through the bridge */	i2c_reg_write1(0x73, /* addr */		       0x00, /* reg */		       0x02); /* val = bus 4 */	/* Turn on FAN 2 */	i2c_reg_write1(0x2e,		       1,		       0x80);	i2c_reg_write1(0x2e,		       0,		       0x19);	/* Deselect bus 2 on the bridge */	i2c_reg_write1(0x73,		       0x00,		       0x00);	/* select fan1 through the bridge */	i2c_reg_write1(0x73, /* addr */		       0x00, /* reg */		       0x01); /* val = bus 0 */	/* Turn on FAN 1 */	i2c_reg_write1(0x2e,		       1,		       0x80);	i2c_reg_write1(0x2e,		       0,		       0x19);	/* Deselect bus 1 on the bridge */	i2c_reg_write1(0x73,		       0x00,		       0x00);	puts ("on\n");	return;}/************************************************************************* *  initdram * *  Initialize sdram * ************************************************************************/long int initdram (int board_type){	long dram_size = 0;#if defined(CONFIG_SPD_EEPROM)	dram_size = spd_sdram ();#else	dram_size = fixed_sdram ();#endif	return dram_size;}/************************************************************************* *  testdram * * ************************************************************************/#if defined(CFG_DRAM_TEST)int testdram (void){	uint *pstart = (uint *) CFG_MEMTEST_START;	uint *pend = (uint *) CFG_MEMTEST_END;	uint *p;	printf("Testing SDRAM: ");	for (p = pstart; p < pend; p++)		*p = 0xaaaaaaaa;	for (p = pstart; p < pend; p++) {		if (*p != 0xaaaaaaaa) {			printf ("SDRAM test fails at: %08x\n", (uint) p);			return 1;		}	}	for (p = pstart; p < pend; p++)		*p = 0x55555555;	for (p = pstart; p < pend; p++) {		if (*p != 0x55555555) {			printf ("SDRAM test fails at: %08x\n", (uint) p);			return 1;		}	}	printf("OK\n");	return 0;}#endif#if !defined(CONFIG_SPD_EEPROM)/************************************************************************* *  fixed sdram init -- doesn't use serial presence detect. * *  Assumes:	128 MB, non-ECC, non-registered *		PLB @ 133 MHz * ************************************************************************/long int fixed_sdram (void){	uint reg;	/*--------------------------------------------------------------------	 * Setup some default	 *------------------------------------------------------------------*/	mtsdram (mem_uabba, 0x00000000);	/* ubba=0 (default)		*/	mtsdram (mem_slio, 0x00000000);		/* rdre=0 wrre=0 rarw=0		*/	mtsdram (mem_devopt, 0x00000000);	/* dll=0 ds=0 (normal)		*/	mtsdram (mem_wddctr, 0x00000000);	/* wrcp=0 dcd=0			*/	mtsdram (mem_clktr, 0x40000000);	/* clkp=1 (90 deg wr) dcdt=0	*/	/*--------------------------------------------------------------------	 * Setup for board-specific specific mem	 *------------------------------------------------------------------*/	/*	 * Following for CAS Latency = 2.5 @ 133 MHz PLB	 */	mtsdram (mem_b0cr, 0x000a4001); /* SDBA=0x000 128MB, Mode 3, enabled */	mtsdram (mem_tr0, 0x410a4012);	/* WR=2	 WD=1 CL=2.5 PA=3 CP=4 LD=2 */	/* RA=10 RD=3			    */	mtsdram (mem_tr1, 0x8080082f);	/* SS=T2 SL=STAGE 3 CD=1 CT=0x02f   */	mtsdram (mem_rtr, 0x08200000);	/* Rate 15.625 ns @ 133 MHz PLB	    */	mtsdram (mem_cfg1, 0x00000000); /* Self-refresh exit, disable PM    */	udelay (400);			/* Delay 200 usecs (min)	    */	/*--------------------------------------------------------------------	 * Enable the controller, then wait for DCEN to complete	 *------------------------------------------------------------------*/	mtsdram (mem_cfg0, 0x86000000); /* DCEN=1, PMUD=1, 64-bit	    */	for (;;) {		mfsdram (mem_mcsts, reg);		if (reg & 0x80000000)			break;	}	return (128 * 1024 * 1024);	/* 128 MB			    */}#endif	/* !defined(CONFIG_SPD_EEPROM) *//************************************************************************* *  pci_pre_init * *  This routine is called just prior to registering the hose and gives *  the board the opportunity to check things. Returning a value of zero *  indicates that things are bad & PCI initialization should be aborted. * *	Different boards may wish to customize the pci controller structure *	(add regions, override default access routines, etc) or perform *	certain pre-initialization actions. * ************************************************************************/#if defined(CONFIG_PCI)int pci_pre_init(struct pci_controller * hose ){	unsigned long strap;	/*--------------------------------------------------------------------------+	 *	The metrobox is always configured as the host & requires the	 *	PCI arbiter to be enabled.	 *--------------------------------------------------------------------------*/	mfsdr(sdr_sdstp1, strap);	if( (strap & SDR0_SDSTP1_PAE_MASK) == 0 ){		printf("PCI: SDR0_STRP1[%08lX] - PCI Arbiter disabled.\n",strap);		return 0;	}	return 1;}#endif /* defined(CONFIG_PCI) *//************************************************************************* *  pci_target_init * *	The bootstrap configuration provides default settings for the pci *	inbound map (PIM). But the bootstrap config choices are limited and *	may not be sufficient for a given board. * ************************************************************************/#if defined(CONFIG_PCI) && defined(CFG_PCI_TARGET_INIT)void pci_target_init(struct pci_controller * hose ){	/*--------------------------------------------------------------------------+	 * Disable everything	 *--------------------------------------------------------------------------*/	out32r( PCIX0_PIM0SA, 0 ); /* disable */	out32r( PCIX0_PIM1SA, 0 ); /* disable */	out32r( PCIX0_PIM2SA, 0 ); /* disable */	out32r( PCIX0_EROMBA, 0 ); /* disable expansion rom */	/*--------------------------------------------------------------------------+	 * Map all of SDRAM to PCI address 0x0000_0000. Note that the 440 strapping	 * options to not support sizes such as 128/256 MB.	 *--------------------------------------------------------------------------*/	out32r( PCIX0_PIM0LAL, CFG_SDRAM_BASE );	out32r( PCIX0_PIM0LAH, 0 );	out32r( PCIX0_PIM0SA, ~(gd->ram_size - 1) | 1 );	out32r( PCIX0_BAR0, 0 );	/*--------------------------------------------------------------------------+	 * Program the board's subsystem id/vendor id	 *--------------------------------------------------------------------------*/	out16r( PCIX0_SBSYSVID, CFG_PCI_SUBSYS_VENDORID );	out16r( PCIX0_SBSYSID, CFG_PCI_SUBSYS_DEVICEID );	out16r( PCIX0_CMD, in16r(PCIX0_CMD) | PCI_COMMAND_MEMORY );}#endif /* defined(CONFIG_PCI) && defined(CFG_PCI_TARGET_INIT) *//************************************************************************* *  is_pci_host * * ************************************************************************/#if defined(CONFIG_PCI)int is_pci_host(struct pci_controller *hose){    /* The metrobox is always configured as host. */    return(1);}#endif /* defined(CONFIG_PCI) *//************************************************************************* *  board_get_enetaddr * *  Get the ethernet MAC address for the management ethernet from the *  strap EEPROM.  Note that is the BASE address for the range of *  external ethernet MACs on the board.  The base + 31 is the actual *  mgmt mac address. * ************************************************************************/static int macaddr_idx = 0;void board_get_enetaddr (uchar * enet){	int i;	unsigned short tmp;	unsigned char buff[0x100], *cp;	if (0 == macaddr_idx) {		/* Initialize I2C */		i2c_init (CFG_I2C_SPEED, CFG_I2C_SLAVE);		/* Read 256 bytes in EEPROM */		i2c_read (0x50, 0, 1, buff, 0x100);		cp = &buff[0xF0];		for (i = 0; i < 6; i++,cp++)			enet[i] = *cp;		memcpy(&tmp, &enet[4], 2);		tmp += 31;		memcpy(&enet[4], &tmp, 2);		macaddr_idx++;	} else {		enet[0] = 0x02;		enet[1] = 0x00;		enet[2] = 0x00;		enet[3] = 0x00;		enet[4] = 0x00;		if (1 == sbcommon_get_master() ) {			/* Master/Primary card */			enet[5] = 0x01;		} else {			/* Slave/Secondary card */			enet [5] = 0x02;		}	}	return;}#ifdef CONFIG_POST/* * Returns 1 if keys pressed to start the power-on long-running tests * Called from board_init_f(). */int post_hotkeys_pressed(void){	return (ctrlc());}#endif