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