board/amcc/taihu/taihu.c

   1 /*
   2  * (C) Copyright 2000-2005
   3  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
   4  *
   5  * (C) Copyright 2005-2007
   6  * Beijing UD Technology Co., Ltd., taihusupport@amcc.com
   7  *
   8  * See file CREDITS for list of people who contributed to this
   9  * project.
  10  *
  11  * This program is free software; you can redistribute it and/or
  12  * modify it under the terms of the GNU General Public License as
  13  * published by the Free Software Foundation; either version 2 of
  14  * the License, or (at your option) any later version.
  15  *
  16  * This program is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  * GNU General Public License for more details.
  20  *
  21  * You should have received a copy of the GNU General Public License
  22  * along with this program; if not, write to the Free Software
  23  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  24  * MA 02111-1307 USA
  25  */
  26 #include <common.h>
  27 #include <command.h>
  28 #include <asm/processor.h>
  29 #include <asm/io.h>
  30 #include <spi.h>
  31 #include <asm/gpio.h>
  32
  33 extern int lcd_init(void);
  34
  35 /*
  36  * board_early_init_f
  37  */
  38 int board_early_init_f(void)
  39 {
  40         lcd_init();
  41
  42         mtdcr(uicsr, 0xFFFFFFFF);       /* clear all ints */
  43         mtdcr(uicer, 0x00000000);       /* disable all ints */
  44         mtdcr(uiccr, 0x00000000);
  45         mtdcr(uicpr, 0xFFFF7F00);       /* set int polarities */
  46         mtdcr(uictr, 0x00000000);       /* set int trigger levels */
  47         mtdcr(uicsr, 0xFFFFFFFF);       /* clear all ints */
  48         mtdcr(uicvcr, 0x00000001);      /* set vect base=0,INT0 highest priority */
  49
  50         mtebc(pb3ap, CFG_EBC_PB3AP);    /* memory bank 3 (CPLD_LCM) initialization */
  51         mtebc(pb3cr, CFG_EBC_PB3CR);
  52
  53         /*
  54          * Configure CPC0_PCI to enable PerWE as output
  55          * and enable the internal PCI arbiter
  56          */
  57         mtdcr(cpc0_pci, CPC0_PCI_SPE | CPC0_PCI_HOST_CFG_EN | CPC0_PCI_ARBIT_EN);
  58
  59         return 0;
  60 }
  61
  62 /*
  63  * Check Board Identity:
  64  */
  65 int checkboard(void)
  66 {
  67         char *s = getenv("serial#");
  68
  69         puts("Board: Taihu - AMCC PPC405EP Evaluation Board");
  70
  71         if (s != NULL) {
  72                 puts(", serial# ");
  73                 puts(s);
  74         }
  75         putc('\n');
  76
  77         return 0;
  78 }
  79
  80 /*************************************************************************
  81  *  long int initdram
  82  *
  83  ************************************************************************/
  84 long int initdram(int board)
  85 {
  86         return CFG_SDRAM_SIZE_PER_BANK * CFG_SDRAM_BANKS; /* 128Mbytes */
  87 }
  88
  89 static int do_sw_stat(cmd_tbl_t* cmd_tp, int flags, int argc, char *argv[])
  90 {
  91         char stat;
  92         int i;
  93
  94         stat = in_8((u8 *) CPLD_REG0_ADDR);
  95         printf("SW2 status: ");
  96         for (i=0; i<4; i++) /* 4-position */
  97                 printf("%d:%s ", i, stat & (0x08 >> i)?"on":"off");
  98         printf("\n");
  99         return 0;
 100 }
 101
 102 U_BOOT_CMD (
 103         sw2_stat, 1, 1, do_sw_stat,
 104         "sw2_stat - show status of switch 2\n",
 105         NULL
 106         );
 107
 108 static int do_led_ctl(cmd_tbl_t* cmd_tp, int flags, int argc, char *argv[])
 109 {
 110         int led_no;
 111
 112         if (argc != 3) {
 113                 printf("%s", cmd_tp->usage);
 114                 return -1;
 115         }
 116
 117         led_no = simple_strtoul(argv[1], NULL, 16);
 118         if (led_no != 1 && led_no != 2) {
 119                 printf("%s", cmd_tp->usage);
 120                 return -1;
 121         }
 122
 123         if (strcmp(argv[2],"off") == 0x0) {
 124                 if (led_no == 1)
 125                         gpio_write_bit(30, 1);
 126                 else
 127                         gpio_write_bit(31, 1);
 128         } else if (strcmp(argv[2],"on") == 0x0) {
 129                 if (led_no == 1)
 130                         gpio_write_bit(30, 0);
 131                 else
 132                         gpio_write_bit(31, 0);
 133         } else {
 134                 printf("%s", cmd_tp->usage);
 135                 return -1;
 136         }
 137
 138         return 0;
 139 }
 140
 141 U_BOOT_CMD (
 142         led_ctl, 3, 1, do_led_ctl,
 143         "led_ctl        - make led 1 or 2  on or off\n",
 144         "<led_no> <on/off>      -  make led <led_no> on/off,\n"
 145         "\tled_no is 1 or 2\t"
 146         );
 147
 148 #define SPI_CS_GPIO0    0
 149 #define SPI_SCLK_GPIO14 14
 150 #define SPI_DIN_GPIO15  15
 151 #define SPI_DOUT_GPIO16 16
 152
 153 void spi_scl(int bit)
 154 {
 155         gpio_write_bit(SPI_SCLK_GPIO14, bit);
 156 }
 157
 158 void spi_sda(int bit)
 159 {
 160         gpio_write_bit(SPI_DOUT_GPIO16, bit);
 161 }
 162
 163 unsigned char spi_read(void)
 164 {
 165         return (unsigned char)gpio_read_out_bit(SPI_DIN_GPIO15);
 166 }
 167
 168 void taihu_spi_chipsel(int cs)
 169 {
 170         gpio_write_bit(SPI_CS_GPIO0, cs);
 171 }
 172
 173 spi_chipsel_type spi_chipsel[]= {
 174         taihu_spi_chipsel
 175 };
 176
 177 int spi_chipsel_cnt = sizeof(spi_chipsel) / sizeof(spi_chipsel[0]);
 178
 179 #ifdef CONFIG_PCI
 180 static unsigned char int_lines[32] = {
 181         29, 30, 27, 28, 29, 30, 25, 27,
 182         29, 30, 27, 28, 29, 30, 27, 28,
 183         29, 30, 27, 28, 29, 30, 27, 28,
 184         29, 30, 27, 28, 29, 30, 27, 28};
 185
 186 static void taihu_pci_fixup_irq(struct pci_controller *hose, pci_dev_t dev)
 187 {
 188         unsigned char int_line = int_lines[PCI_DEV(dev) & 31];
 189
 190         pci_hose_write_config_byte(hose, dev, PCI_INTERRUPT_LINE, int_line);
 191 }
 192
 193 int pci_pre_init(struct pci_controller *hose)
 194 {
 195         hose->fixup_irq = taihu_pci_fixup_irq;
 196         return 1;
 197 }
 198 #endif /* CONFIG_PCI */
 199
 200 #ifdef CFG_DRAM_TEST
 201 int testdram(void)
 202 {
 203         unsigned long *mem = (unsigned long *)0;
 204         const unsigned long kend = (1024 / sizeof(unsigned long));
 205         unsigned long k, n;
 206         unsigned long msr;
 207         unsigned long total_kbytes = CFG_SDRAM_SIZE_PER_BANK * CFG_SDRAM_BANKS / 1024;
 208
 209         msr = mfmsr();
 210         mtmsr(msr & ~(MSR_EE));
 211
 212         for (k = 0; k < total_kbytes ;
 213              ++k, mem += (1024 / sizeof(unsigned long))) {
 214                 if ((k & 1023) == 0)
 215                         printf("%3d MB\r", k / 1024);
 216
 217                 memset(mem, 0xaaaaaaaa, 1024);
 218                 for (n = 0; n < kend; ++n) {
 219                         if (mem[n] != 0xaaaaaaaa) {
 220                                 printf("SDRAM test fails at: %08x\n",
 221                                        (uint) & mem[n]);
 222                                 return 1;
 223                         }
 224                 }
 225
 226                 memset(mem, 0x55555555, 1024);
 227                 for (n = 0; n < kend; ++n) {
 228                         if (mem[n] != 0x55555555) {
 229                                 printf("SDRAM test fails at: %08x\n",
 230                                        (uint) & mem[n]);
 231                                 return 1;
 232                         }
 233                 }
 234         }
 235         printf("SDRAM test passes\n");
 236         mtmsr(msr);
 237
 238         return 0;
 239 }
 240 #endif /* CFG_DRAM_TEST */