kernel/2.6.29.6-aldebaran-rt/arch/arm/mach-orion5x/terastation_pro2-setup.c

   1 /*
   2  * Buffalo Terastation Pro II/Live Board Setup
   3  *
   4  * Maintainer: Sylver Bruneau <sylver.bruneau@googlemail.com>
   5  *
   6  * This program is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU General Public License
   8  * as published by the Free Software Foundation; either version
   9  * 2 of the License, or (at your option) any later version.
  10  */
  11
  12 #include <linux/kernel.h>
  13 #include <linux/init.h>
  14 #include <linux/platform_device.h>
  15 #include <linux/pci.h>
  16 #include <linux/irq.h>
  17 #include <linux/delay.h>
  18 #include <linux/mtd/physmap.h>
  19 #include <linux/mv643xx_eth.h>
  20 #include <linux/i2c.h>
  21 #include <linux/serial_reg.h>
  22 #include <asm/mach-types.h>
  23 #include <asm/gpio.h>
  24 #include <asm/mach/arch.h>
  25 #include <asm/mach/pci.h>
  26 #include <mach/orion5x.h>
  27 #include "common.h"
  28 #include "mpp.h"
  29
  30 /*****************************************************************************
  31  * Terastation Pro 2/Live Info
  32  ****************************************************************************/
  33
  34 /*
  35  * Terastation Pro 2 hardware :
  36  * - Marvell 88F5281-D0
  37  * - Marvell 88SX6042 SATA controller (PCI)
  38  * - Marvell 88E1118 Gigabit Ethernet PHY
  39  * - 256KB NOR flash
  40  * - 128MB of DDR RAM
  41  * - PCIe port (not equipped)
  42  */
  43
  44 /*
  45  * 256K NOR flash Device bus boot chip select
  46  */
  47
  48 #define TSP2_NOR_BOOT_BASE      0xf4000000
  49 #define TSP2_NOR_BOOT_SIZE      SZ_256K
  50
  51 /*****************************************************************************
  52  * 256KB NOR Flash on BOOT Device
  53  ****************************************************************************/
  54
  55 static struct physmap_flash_data tsp2_nor_flash_data = {
  56         .width    = 1,
  57 };
  58
  59 static struct resource tsp2_nor_flash_resource = {
  60         .flags = IORESOURCE_MEM,
  61         .start = TSP2_NOR_BOOT_BASE,
  62         .end   = TSP2_NOR_BOOT_BASE + TSP2_NOR_BOOT_SIZE - 1,
  63 };
  64
  65 static struct platform_device tsp2_nor_flash = {
  66         .name          = "physmap-flash",
  67         .id            = 0,
  68         .dev           = {
  69                 .platform_data  = &tsp2_nor_flash_data,
  70         },
  71         .num_resources = 1,
  72         .resource      = &tsp2_nor_flash_resource,
  73 };
  74
  75 /*****************************************************************************
  76  * PCI
  77  ****************************************************************************/
  78 #define TSP2_PCI_SLOT0_OFFS             7
  79 #define TSP2_PCI_SLOT0_IRQ_PIN          11
  80
  81 void __init tsp2_pci_preinit(void)
  82 {
  83         int pin;
  84
  85         /*
  86          * Configure PCI GPIO IRQ pins
  87          */
  88         pin = TSP2_PCI_SLOT0_IRQ_PIN;
  89         if (gpio_request(pin, "PCI Int1") == 0) {
  90                 if (gpio_direction_input(pin) == 0) {
  91                         set_irq_type(gpio_to_irq(pin), IRQ_TYPE_LEVEL_LOW);
  92                 } else {
  93                         printk(KERN_ERR "tsp2_pci_preinit failed "
  94                                         "to set_irq_type pin %d\n", pin);
  95                         gpio_free(pin);
  96                 }
  97         } else {
  98                 printk(KERN_ERR "tsp2_pci_preinit failed to "
  99                                 "gpio_request %d\n", pin);
 100         }
 101 }
 102
 103 static int __init tsp2_pci_map_irq(struct pci_dev *dev, u8 slot, u8 pin)
 104 {
 105         int irq;
 106
 107         /*
 108          * Check for devices with hard-wired IRQs.
 109          */
 110         irq = orion5x_pci_map_irq(dev, slot, pin);
 111         if (irq != -1)
 112                 return irq;
 113
 114         /*
 115          * PCI IRQs are connected via GPIOs.
 116          */
 117         if (slot == TSP2_PCI_SLOT0_OFFS)
 118                 return gpio_to_irq(TSP2_PCI_SLOT0_IRQ_PIN);
 119
 120         return -1;
 121 }
 122
 123 static struct hw_pci tsp2_pci __initdata = {
 124         .nr_controllers = 2,
 125         .preinit        = tsp2_pci_preinit,
 126         .swizzle        = pci_std_swizzle,
 127         .setup          = orion5x_pci_sys_setup,
 128         .scan           = orion5x_pci_sys_scan_bus,
 129         .map_irq        = tsp2_pci_map_irq,
 130 };
 131
 132 static int __init tsp2_pci_init(void)
 133 {
 134         if (machine_is_terastation_pro2())
 135                 pci_common_init(&tsp2_pci);
 136
 137         return 0;
 138 }
 139
 140 subsys_initcall(tsp2_pci_init);
 141
 142 /*****************************************************************************
 143  * Ethernet
 144  ****************************************************************************/
 145
 146 static struct mv643xx_eth_platform_data tsp2_eth_data = {
 147         .phy_addr       = 0,
 148 };
 149
 150 /*****************************************************************************
 151  * RTC 5C372a on I2C bus
 152  ****************************************************************************/
 153
 154 #define TSP2_RTC_GPIO   9
 155
 156 static struct i2c_board_info __initdata tsp2_i2c_rtc = {
 157         I2C_BOARD_INFO("rs5c372a", 0x32),
 158 };
 159
 160 /*****************************************************************************
 161  * Terastation Pro II specific power off method via UART1-attached
 162  * microcontroller
 163  ****************************************************************************/
 164
 165 #define UART1_REG(x)    (UART1_VIRT_BASE + ((UART_##x) << 2))
 166
 167 static int tsp2_miconread(unsigned char *buf, int count)
 168 {
 169         int i;
 170         int timeout;
 171
 172         for (i = 0; i < count; i++) {
 173                 timeout = 10;
 174
 175                 while (!(readl(UART1_REG(LSR)) & UART_LSR_DR)) {
 176                         if (--timeout == 0)
 177                                 break;
 178                         udelay(1000);
 179                 }
 180
 181                 if (timeout == 0)
 182                         break;
 183                 buf[i] = readl(UART1_REG(RX));
 184         }
 185
 186         /* return read bytes */
 187         return i;
 188 }
 189
 190 static int tsp2_miconwrite(const unsigned char *buf, int count)
 191 {
 192         int i = 0;
 193
 194         while (count--) {
 195                 while (!(readl(UART1_REG(LSR)) & UART_LSR_THRE))
 196                         barrier();
 197                 writel(buf[i++], UART1_REG(TX));
 198         }
 199
 200         return 0;
 201 }
 202
 203 static int tsp2_miconsend(const unsigned char *data, int count)
 204 {
 205         int i;
 206         unsigned char checksum = 0;
 207         unsigned char recv_buf[40];
 208         unsigned char send_buf[40];
 209         unsigned char correct_ack[3];
 210         int retry = 2;
 211
 212         /* Generate checksum */
 213         for (i = 0; i < count; i++)
 214                 checksum -=  data[i];
 215
 216         do {
 217                 /* Send data */
 218                 tsp2_miconwrite(data, count);
 219
 220                 /* send checksum */
 221                 tsp2_miconwrite(&checksum, 1);
 222
 223                 if (tsp2_miconread(recv_buf, sizeof(recv_buf)) <= 3) {
 224                         printk(KERN_ERR ">%s: receive failed.\n", __func__);
 225
 226                         /* send preamble to clear the receive buffer */
 227                         memset(&send_buf, 0xff, sizeof(send_buf));
 228                         tsp2_miconwrite(send_buf, sizeof(send_buf));
 229
 230                         /* make dummy reads */
 231                         mdelay(100);
 232                         tsp2_miconread(recv_buf, sizeof(recv_buf));
 233                 } else {
 234                         /* Generate expected ack */
 235                         correct_ack[0] = 0x01;
 236                         correct_ack[1] = data[1];
 237                         correct_ack[2] = 0x00;
 238
 239                         /* checksum Check */
 240                         if ((recv_buf[0] + recv_buf[1] + recv_buf[2] +
 241                              recv_buf[3]) & 0xFF) {
 242                                 printk(KERN_ERR ">%s: Checksum Error : "
 243                                         "Received data[%02x, %02x, %02x, %02x]"
 244                                         "\n", __func__, recv_buf[0],
 245                                         recv_buf[1], recv_buf[2], recv_buf[3]);
 246                         } else {
 247                                 /* Check Received Data */
 248                                 if (correct_ack[0] == recv_buf[0] &&
 249                                     correct_ack[1] == recv_buf[1] &&
 250                                     correct_ack[2] == recv_buf[2]) {
 251                                         /* Interval for next command */
 252                                         mdelay(10);
 253
 254                                         /* Receive ACK */
 255                                         return 0;
 256                                 }
 257                         }
 258                         /* Received NAK or illegal Data */
 259                         printk(KERN_ERR ">%s: Error : NAK or Illegal Data "
 260                                         "Received\n", __func__);
 261                 }
 262         } while (retry--);
 263
 264         /* Interval for next command */
 265         mdelay(10);
 266
 267         return -1;
 268 }
 269
 270 static void tsp2_power_off(void)
 271 {
 272         const unsigned char watchdogkill[]      = {0x01, 0x35, 0x00};
 273         const unsigned char shutdownwait[]      = {0x00, 0x0c};
 274         const unsigned char poweroff[]          = {0x00, 0x06};
 275         /* 38400 baud divisor */
 276         const unsigned divisor = ((orion5x_tclk + (8 * 38400)) / (16 * 38400));
 277
 278         pr_info("%s: triggering power-off...\n", __func__);
 279
 280         /* hijack uart1 and reset into sane state (38400,8n1,even parity) */
 281         writel(0x83, UART1_REG(LCR));
 282         writel(divisor & 0xff, UART1_REG(DLL));
 283         writel((divisor >> 8) & 0xff, UART1_REG(DLM));
 284         writel(0x1b, UART1_REG(LCR));
 285         writel(0x00, UART1_REG(IER));
 286         writel(0x07, UART1_REG(FCR));
 287         writel(0x00, UART1_REG(MCR));
 288
 289         /* Send the commands to shutdown the Terastation Pro II */
 290         tsp2_miconsend(watchdogkill, sizeof(watchdogkill)) ;
 291         tsp2_miconsend(shutdownwait, sizeof(shutdownwait)) ;
 292         tsp2_miconsend(poweroff, sizeof(poweroff));
 293 }
 294
 295 /*****************************************************************************
 296  * General Setup
 297  ****************************************************************************/
 298 static struct orion5x_mpp_mode tsp2_mpp_modes[] __initdata = {
 299         {  0, MPP_PCIE_RST_OUTn },
 300         {  1, MPP_UNUSED },
 301         {  2, MPP_UNUSED },
 302         {  3, MPP_UNUSED },
 303         {  4, MPP_NAND },               /* BOOT NAND Flash REn */
 304         {  5, MPP_NAND },               /* BOOT NAND Flash WEn */
 305         {  6, MPP_NAND },               /* BOOT NAND Flash HREn[0] */
 306         {  7, MPP_NAND },               /* BOOT NAND Flash WEn[0] */
 307         {  8, MPP_GPIO },               /* MICON int */
 308         {  9, MPP_GPIO },               /* RTC int */
 309         { 10, MPP_UNUSED },
 310         { 11, MPP_GPIO },               /* PCI Int A */
 311         { 12, MPP_UNUSED },
 312         { 13, MPP_GPIO },               /* UPS on UART0 enable */
 313         { 14, MPP_GPIO },               /* UPS low battery detection */
 314         { 15, MPP_UNUSED },
 315         { 16, MPP_UART },               /* UART1 RXD */
 316         { 17, MPP_UART },               /* UART1 TXD */
 317         { 18, MPP_UART },               /* UART1 CTSn */
 318         { 19, MPP_UART },               /* UART1 RTSn */
 319         { -1 },
 320 };
 321
 322 static void __init tsp2_init(void)
 323 {
 324         /*
 325          * Setup basic Orion functions. Need to be called early.
 326          */
 327         orion5x_init();
 328
 329         orion5x_mpp_conf(tsp2_mpp_modes);
 330
 331         /*
 332          * Configure peripherals.
 333          */
 334         orion5x_setup_dev_boot_win(TSP2_NOR_BOOT_BASE,
 335                                    TSP2_NOR_BOOT_SIZE);
 336         platform_device_register(&tsp2_nor_flash);
 337
 338         orion5x_ehci0_init();
 339         orion5x_eth_init(&tsp2_eth_data);
 340         orion5x_i2c_init();
 341         orion5x_uart0_init();
 342         orion5x_uart1_init();
 343
 344         /* Get RTC IRQ and register the chip */
 345         if (gpio_request(TSP2_RTC_GPIO, "rtc") == 0) {
 346                 if (gpio_direction_input(TSP2_RTC_GPIO) == 0)
 347                         tsp2_i2c_rtc.irq = gpio_to_irq(TSP2_RTC_GPIO);
 348                 else
 349                         gpio_free(TSP2_RTC_GPIO);
 350         }
 351         if (tsp2_i2c_rtc.irq == 0)
 352                 pr_warning("tsp2_init: failed to get RTC IRQ\n");
 353         i2c_register_board_info(0, &tsp2_i2c_rtc, 1);
 354
 355         /* register Terastation Pro II specific power-off method */
 356         pm_power_off = tsp2_power_off;
 357 }
 358
 359 MACHINE_START(TERASTATION_PRO2, "Buffalo Terastation Pro II/Live")
 360         /* Maintainer:  Sylver Bruneau <sylver.bruneau@googlemail.com> */
 361         .phys_io        = ORION5X_REGS_PHYS_BASE,
 362         .io_pg_offst    = ((ORION5X_REGS_VIRT_BASE) >> 18) & 0xFFFC,
 363         .boot_params    = 0x00000100,
 364         .init_machine   = tsp2_init,
 365         .map_io         = orion5x_map_io,
 366         .init_irq       = orion5x_init_irq,
 367         .timer          = &orion5x_timer,
 368         .fixup          = tag_fixup_mem32,
 369 MACHINE_END