Linux 3.17-rc2
[linux/fpc-iii.git] / arch / powerpc / sysdev / fsl_rio.c
blobc04b718307c89837efe57b1df82c97e204e3cde0
1 /*
2 * Freescale MPC85xx/MPC86xx RapidIO support
4 * Copyright 2009 Sysgo AG
5 * Thomas Moll <thomas.moll@sysgo.com>
6 * - fixed maintenance access routines, check for aligned access
8 * Copyright 2009 Integrated Device Technology, Inc.
9 * Alex Bounine <alexandre.bounine@idt.com>
10 * - Added Port-Write message handling
11 * - Added Machine Check exception handling
13 * Copyright (C) 2007, 2008, 2010, 2011 Freescale Semiconductor, Inc.
14 * Zhang Wei <wei.zhang@freescale.com>
16 * Copyright 2005 MontaVista Software, Inc.
17 * Matt Porter <mporter@kernel.crashing.org>
19 * This program is free software; you can redistribute it and/or modify it
20 * under the terms of the GNU General Public License as published by the
21 * Free Software Foundation; either version 2 of the License, or (at your
22 * option) any later version.
25 #include <linux/init.h>
26 #include <linux/module.h>
27 #include <linux/types.h>
28 #include <linux/dma-mapping.h>
29 #include <linux/interrupt.h>
30 #include <linux/device.h>
31 #include <linux/of_address.h>
32 #include <linux/of_irq.h>
33 #include <linux/of_platform.h>
34 #include <linux/delay.h>
35 #include <linux/slab.h>
37 #include <linux/io.h>
38 #include <linux/uaccess.h>
39 #include <asm/machdep.h>
41 #include "fsl_rio.h"
43 #undef DEBUG_PW /* Port-Write debugging */
45 #define RIO_PORT1_EDCSR 0x0640
46 #define RIO_PORT2_EDCSR 0x0680
47 #define RIO_PORT1_IECSR 0x10130
48 #define RIO_PORT2_IECSR 0x101B0
50 #define RIO_GCCSR 0x13c
51 #define RIO_ESCSR 0x158
52 #define ESCSR_CLEAR 0x07120204
53 #define RIO_PORT2_ESCSR 0x178
54 #define RIO_CCSR 0x15c
55 #define RIO_LTLEDCSR_IER 0x80000000
56 #define RIO_LTLEDCSR_PRT 0x01000000
57 #define IECSR_CLEAR 0x80000000
58 #define RIO_ISR_AACR 0x10120
59 #define RIO_ISR_AACR_AA 0x1 /* Accept All ID */
61 #define __fsl_read_rio_config(x, addr, err, op) \
62 __asm__ __volatile__( \
63 "1: "op" %1,0(%2)\n" \
64 " eieio\n" \
65 "2:\n" \
66 ".section .fixup,\"ax\"\n" \
67 "3: li %1,-1\n" \
68 " li %0,%3\n" \
69 " b 2b\n" \
70 ".section __ex_table,\"a\"\n" \
71 PPC_LONG_ALIGN "\n" \
72 PPC_LONG "1b,3b\n" \
73 ".text" \
74 : "=r" (err), "=r" (x) \
75 : "b" (addr), "i" (-EFAULT), "0" (err))
77 void __iomem *rio_regs_win;
78 void __iomem *rmu_regs_win;
79 resource_size_t rio_law_start;
81 struct fsl_rio_dbell *dbell;
82 struct fsl_rio_pw *pw;
84 #ifdef CONFIG_E500
85 int fsl_rio_mcheck_exception(struct pt_regs *regs)
87 const struct exception_table_entry *entry;
88 unsigned long reason;
90 if (!rio_regs_win)
91 return 0;
93 reason = in_be32((u32 *)(rio_regs_win + RIO_LTLEDCSR));
94 if (reason & (RIO_LTLEDCSR_IER | RIO_LTLEDCSR_PRT)) {
95 /* Check if we are prepared to handle this fault */
96 entry = search_exception_tables(regs->nip);
97 if (entry) {
98 pr_debug("RIO: %s - MC Exception handled\n",
99 __func__);
100 out_be32((u32 *)(rio_regs_win + RIO_LTLEDCSR),
102 regs->msr |= MSR_RI;
103 regs->nip = entry->fixup;
104 return 1;
108 return 0;
110 EXPORT_SYMBOL_GPL(fsl_rio_mcheck_exception);
111 #endif
114 * fsl_local_config_read - Generate a MPC85xx local config space read
115 * @mport: RapidIO master port info
116 * @index: ID of RapdiIO interface
117 * @offset: Offset into configuration space
118 * @len: Length (in bytes) of the maintenance transaction
119 * @data: Value to be read into
121 * Generates a MPC85xx local configuration space read. Returns %0 on
122 * success or %-EINVAL on failure.
124 static int fsl_local_config_read(struct rio_mport *mport,
125 int index, u32 offset, int len, u32 *data)
127 struct rio_priv *priv = mport->priv;
128 pr_debug("fsl_local_config_read: index %d offset %8.8x\n", index,
129 offset);
130 *data = in_be32(priv->regs_win + offset);
132 return 0;
136 * fsl_local_config_write - Generate a MPC85xx local config space write
137 * @mport: RapidIO master port info
138 * @index: ID of RapdiIO interface
139 * @offset: Offset into configuration space
140 * @len: Length (in bytes) of the maintenance transaction
141 * @data: Value to be written
143 * Generates a MPC85xx local configuration space write. Returns %0 on
144 * success or %-EINVAL on failure.
146 static int fsl_local_config_write(struct rio_mport *mport,
147 int index, u32 offset, int len, u32 data)
149 struct rio_priv *priv = mport->priv;
150 pr_debug
151 ("fsl_local_config_write: index %d offset %8.8x data %8.8x\n",
152 index, offset, data);
153 out_be32(priv->regs_win + offset, data);
155 return 0;
159 * fsl_rio_config_read - Generate a MPC85xx read maintenance transaction
160 * @mport: RapidIO master port info
161 * @index: ID of RapdiIO interface
162 * @destid: Destination ID of transaction
163 * @hopcount: Number of hops to target device
164 * @offset: Offset into configuration space
165 * @len: Length (in bytes) of the maintenance transaction
166 * @val: Location to be read into
168 * Generates a MPC85xx read maintenance transaction. Returns %0 on
169 * success or %-EINVAL on failure.
171 static int
172 fsl_rio_config_read(struct rio_mport *mport, int index, u16 destid,
173 u8 hopcount, u32 offset, int len, u32 *val)
175 struct rio_priv *priv = mport->priv;
176 u8 *data;
177 u32 rval, err = 0;
179 pr_debug
180 ("fsl_rio_config_read:"
181 " index %d destid %d hopcount %d offset %8.8x len %d\n",
182 index, destid, hopcount, offset, len);
184 /* 16MB maintenance window possible */
185 /* allow only aligned access to maintenance registers */
186 if (offset > (0x1000000 - len) || !IS_ALIGNED(offset, len))
187 return -EINVAL;
189 out_be32(&priv->maint_atmu_regs->rowtar,
190 (destid << 22) | (hopcount << 12) | (offset >> 12));
191 out_be32(&priv->maint_atmu_regs->rowtear, (destid >> 10));
193 data = (u8 *) priv->maint_win + (offset & (RIO_MAINT_WIN_SIZE - 1));
194 switch (len) {
195 case 1:
196 __fsl_read_rio_config(rval, data, err, "lbz");
197 break;
198 case 2:
199 __fsl_read_rio_config(rval, data, err, "lhz");
200 break;
201 case 4:
202 __fsl_read_rio_config(rval, data, err, "lwz");
203 break;
204 default:
205 return -EINVAL;
208 if (err) {
209 pr_debug("RIO: cfg_read error %d for %x:%x:%x\n",
210 err, destid, hopcount, offset);
213 *val = rval;
215 return err;
219 * fsl_rio_config_write - Generate a MPC85xx write maintenance transaction
220 * @mport: RapidIO master port info
221 * @index: ID of RapdiIO interface
222 * @destid: Destination ID of transaction
223 * @hopcount: Number of hops to target device
224 * @offset: Offset into configuration space
225 * @len: Length (in bytes) of the maintenance transaction
226 * @val: Value to be written
228 * Generates an MPC85xx write maintenance transaction. Returns %0 on
229 * success or %-EINVAL on failure.
231 static int
232 fsl_rio_config_write(struct rio_mport *mport, int index, u16 destid,
233 u8 hopcount, u32 offset, int len, u32 val)
235 struct rio_priv *priv = mport->priv;
236 u8 *data;
237 pr_debug
238 ("fsl_rio_config_write:"
239 " index %d destid %d hopcount %d offset %8.8x len %d val %8.8x\n",
240 index, destid, hopcount, offset, len, val);
242 /* 16MB maintenance windows possible */
243 /* allow only aligned access to maintenance registers */
244 if (offset > (0x1000000 - len) || !IS_ALIGNED(offset, len))
245 return -EINVAL;
247 out_be32(&priv->maint_atmu_regs->rowtar,
248 (destid << 22) | (hopcount << 12) | (offset >> 12));
249 out_be32(&priv->maint_atmu_regs->rowtear, (destid >> 10));
251 data = (u8 *) priv->maint_win + (offset & (RIO_MAINT_WIN_SIZE - 1));
252 switch (len) {
253 case 1:
254 out_8((u8 *) data, val);
255 break;
256 case 2:
257 out_be16((u16 *) data, val);
258 break;
259 case 4:
260 out_be32((u32 *) data, val);
261 break;
262 default:
263 return -EINVAL;
266 return 0;
269 void fsl_rio_port_error_handler(int offset)
271 /*XXX: Error recovery is not implemented, we just clear errors */
272 out_be32((u32 *)(rio_regs_win + RIO_LTLEDCSR), 0);
274 if (offset == 0) {
275 out_be32((u32 *)(rio_regs_win + RIO_PORT1_EDCSR), 0);
276 out_be32((u32 *)(rio_regs_win + RIO_PORT1_IECSR), IECSR_CLEAR);
277 out_be32((u32 *)(rio_regs_win + RIO_ESCSR), ESCSR_CLEAR);
278 } else {
279 out_be32((u32 *)(rio_regs_win + RIO_PORT2_EDCSR), 0);
280 out_be32((u32 *)(rio_regs_win + RIO_PORT2_IECSR), IECSR_CLEAR);
281 out_be32((u32 *)(rio_regs_win + RIO_PORT2_ESCSR), ESCSR_CLEAR);
284 static inline void fsl_rio_info(struct device *dev, u32 ccsr)
286 const char *str;
287 if (ccsr & 1) {
288 /* Serial phy */
289 switch (ccsr >> 30) {
290 case 0:
291 str = "1";
292 break;
293 case 1:
294 str = "4";
295 break;
296 default:
297 str = "Unknown";
298 break;
300 dev_info(dev, "Hardware port width: %s\n", str);
302 switch ((ccsr >> 27) & 7) {
303 case 0:
304 str = "Single-lane 0";
305 break;
306 case 1:
307 str = "Single-lane 2";
308 break;
309 case 2:
310 str = "Four-lane";
311 break;
312 default:
313 str = "Unknown";
314 break;
316 dev_info(dev, "Training connection status: %s\n", str);
317 } else {
318 /* Parallel phy */
319 if (!(ccsr & 0x80000000))
320 dev_info(dev, "Output port operating in 8-bit mode\n");
321 if (!(ccsr & 0x08000000))
322 dev_info(dev, "Input port operating in 8-bit mode\n");
327 * fsl_rio_setup - Setup Freescale PowerPC RapidIO interface
328 * @dev: platform_device pointer
330 * Initializes MPC85xx RapidIO hardware interface, configures
331 * master port with system-specific info, and registers the
332 * master port with the RapidIO subsystem.
334 int fsl_rio_setup(struct platform_device *dev)
336 struct rio_ops *ops;
337 struct rio_mport *port;
338 struct rio_priv *priv;
339 int rc = 0;
340 const u32 *dt_range, *cell, *port_index;
341 u32 active_ports = 0;
342 struct resource regs, rmu_regs;
343 struct device_node *np, *rmu_node;
344 int rlen;
345 u32 ccsr;
346 u64 range_start, range_size;
347 int paw, aw, sw;
348 u32 i;
349 static int tmp;
350 struct device_node *rmu_np[MAX_MSG_UNIT_NUM] = {NULL};
352 if (!dev->dev.of_node) {
353 dev_err(&dev->dev, "Device OF-Node is NULL");
354 return -ENODEV;
357 rc = of_address_to_resource(dev->dev.of_node, 0, &regs);
358 if (rc) {
359 dev_err(&dev->dev, "Can't get %s property 'reg'\n",
360 dev->dev.of_node->full_name);
361 return -EFAULT;
363 dev_info(&dev->dev, "Of-device full name %s\n",
364 dev->dev.of_node->full_name);
365 dev_info(&dev->dev, "Regs: %pR\n", &regs);
367 rio_regs_win = ioremap(regs.start, resource_size(&regs));
368 if (!rio_regs_win) {
369 dev_err(&dev->dev, "Unable to map rio register window\n");
370 rc = -ENOMEM;
371 goto err_rio_regs;
374 ops = kzalloc(sizeof(struct rio_ops), GFP_KERNEL);
375 if (!ops) {
376 rc = -ENOMEM;
377 goto err_ops;
379 ops->lcread = fsl_local_config_read;
380 ops->lcwrite = fsl_local_config_write;
381 ops->cread = fsl_rio_config_read;
382 ops->cwrite = fsl_rio_config_write;
383 ops->dsend = fsl_rio_doorbell_send;
384 ops->pwenable = fsl_rio_pw_enable;
385 ops->open_outb_mbox = fsl_open_outb_mbox;
386 ops->open_inb_mbox = fsl_open_inb_mbox;
387 ops->close_outb_mbox = fsl_close_outb_mbox;
388 ops->close_inb_mbox = fsl_close_inb_mbox;
389 ops->add_outb_message = fsl_add_outb_message;
390 ops->add_inb_buffer = fsl_add_inb_buffer;
391 ops->get_inb_message = fsl_get_inb_message;
393 rmu_node = of_parse_phandle(dev->dev.of_node, "fsl,srio-rmu-handle", 0);
394 if (!rmu_node) {
395 dev_err(&dev->dev, "No valid fsl,srio-rmu-handle property\n");
396 goto err_rmu;
398 rc = of_address_to_resource(rmu_node, 0, &rmu_regs);
399 if (rc) {
400 dev_err(&dev->dev, "Can't get %s property 'reg'\n",
401 rmu_node->full_name);
402 goto err_rmu;
404 rmu_regs_win = ioremap(rmu_regs.start, resource_size(&rmu_regs));
405 if (!rmu_regs_win) {
406 dev_err(&dev->dev, "Unable to map rmu register window\n");
407 rc = -ENOMEM;
408 goto err_rmu;
410 for_each_compatible_node(np, NULL, "fsl,srio-msg-unit") {
411 rmu_np[tmp] = np;
412 tmp++;
415 /*set up doobell node*/
416 np = of_find_compatible_node(NULL, NULL, "fsl,srio-dbell-unit");
417 if (!np) {
418 dev_err(&dev->dev, "No fsl,srio-dbell-unit node\n");
419 rc = -ENODEV;
420 goto err_dbell;
422 dbell = kzalloc(sizeof(struct fsl_rio_dbell), GFP_KERNEL);
423 if (!(dbell)) {
424 dev_err(&dev->dev, "Can't alloc memory for 'fsl_rio_dbell'\n");
425 rc = -ENOMEM;
426 goto err_dbell;
428 dbell->dev = &dev->dev;
429 dbell->bellirq = irq_of_parse_and_map(np, 1);
430 dev_info(&dev->dev, "bellirq: %d\n", dbell->bellirq);
432 aw = of_n_addr_cells(np);
433 dt_range = of_get_property(np, "reg", &rlen);
434 if (!dt_range) {
435 pr_err("%s: unable to find 'reg' property\n",
436 np->full_name);
437 rc = -ENOMEM;
438 goto err_pw;
440 range_start = of_read_number(dt_range, aw);
441 dbell->dbell_regs = (struct rio_dbell_regs *)(rmu_regs_win +
442 (u32)range_start);
444 /*set up port write node*/
445 np = of_find_compatible_node(NULL, NULL, "fsl,srio-port-write-unit");
446 if (!np) {
447 dev_err(&dev->dev, "No fsl,srio-port-write-unit node\n");
448 rc = -ENODEV;
449 goto err_pw;
451 pw = kzalloc(sizeof(struct fsl_rio_pw), GFP_KERNEL);
452 if (!(pw)) {
453 dev_err(&dev->dev, "Can't alloc memory for 'fsl_rio_pw'\n");
454 rc = -ENOMEM;
455 goto err_pw;
457 pw->dev = &dev->dev;
458 pw->pwirq = irq_of_parse_and_map(np, 0);
459 dev_info(&dev->dev, "pwirq: %d\n", pw->pwirq);
460 aw = of_n_addr_cells(np);
461 dt_range = of_get_property(np, "reg", &rlen);
462 if (!dt_range) {
463 pr_err("%s: unable to find 'reg' property\n",
464 np->full_name);
465 rc = -ENOMEM;
466 goto err;
468 range_start = of_read_number(dt_range, aw);
469 pw->pw_regs = (struct rio_pw_regs *)(rmu_regs_win + (u32)range_start);
471 /*set up ports node*/
472 for_each_child_of_node(dev->dev.of_node, np) {
473 port_index = of_get_property(np, "cell-index", NULL);
474 if (!port_index) {
475 dev_err(&dev->dev, "Can't get %s property 'cell-index'\n",
476 np->full_name);
477 continue;
480 dt_range = of_get_property(np, "ranges", &rlen);
481 if (!dt_range) {
482 dev_err(&dev->dev, "Can't get %s property 'ranges'\n",
483 np->full_name);
484 continue;
487 /* Get node address wide */
488 cell = of_get_property(np, "#address-cells", NULL);
489 if (cell)
490 aw = *cell;
491 else
492 aw = of_n_addr_cells(np);
493 /* Get node size wide */
494 cell = of_get_property(np, "#size-cells", NULL);
495 if (cell)
496 sw = *cell;
497 else
498 sw = of_n_size_cells(np);
499 /* Get parent address wide wide */
500 paw = of_n_addr_cells(np);
501 range_start = of_read_number(dt_range + aw, paw);
502 range_size = of_read_number(dt_range + aw + paw, sw);
504 dev_info(&dev->dev, "%s: LAW start 0x%016llx, size 0x%016llx.\n",
505 np->full_name, range_start, range_size);
507 port = kzalloc(sizeof(struct rio_mport), GFP_KERNEL);
508 if (!port)
509 continue;
511 i = *port_index - 1;
512 port->index = (unsigned char)i;
514 priv = kzalloc(sizeof(struct rio_priv), GFP_KERNEL);
515 if (!priv) {
516 dev_err(&dev->dev, "Can't alloc memory for 'priv'\n");
517 kfree(port);
518 continue;
521 INIT_LIST_HEAD(&port->dbells);
522 port->iores.start = range_start;
523 port->iores.end = port->iores.start + range_size - 1;
524 port->iores.flags = IORESOURCE_MEM;
525 port->iores.name = "rio_io_win";
527 if (request_resource(&iomem_resource, &port->iores) < 0) {
528 dev_err(&dev->dev, "RIO: Error requesting master port region"
529 " 0x%016llx-0x%016llx\n",
530 (u64)port->iores.start, (u64)port->iores.end);
531 kfree(priv);
532 kfree(port);
533 continue;
535 sprintf(port->name, "RIO mport %d", i);
537 priv->dev = &dev->dev;
538 port->dev.parent = &dev->dev;
539 port->ops = ops;
540 port->priv = priv;
541 port->phys_efptr = 0x100;
542 priv->regs_win = rio_regs_win;
544 /* Probe the master port phy type */
545 ccsr = in_be32(priv->regs_win + RIO_CCSR + i*0x20);
546 port->phy_type = (ccsr & 1) ? RIO_PHY_SERIAL : RIO_PHY_PARALLEL;
547 if (port->phy_type == RIO_PHY_PARALLEL) {
548 dev_err(&dev->dev, "RIO: Parallel PHY type, unsupported port type!\n");
549 release_resource(&port->iores);
550 kfree(priv);
551 kfree(port);
552 continue;
554 dev_info(&dev->dev, "RapidIO PHY type: Serial\n");
555 /* Checking the port training status */
556 if (in_be32((priv->regs_win + RIO_ESCSR + i*0x20)) & 1) {
557 dev_err(&dev->dev, "Port %d is not ready. "
558 "Try to restart connection...\n", i);
559 /* Disable ports */
560 out_be32(priv->regs_win
561 + RIO_CCSR + i*0x20, 0);
562 /* Set 1x lane */
563 setbits32(priv->regs_win
564 + RIO_CCSR + i*0x20, 0x02000000);
565 /* Enable ports */
566 setbits32(priv->regs_win
567 + RIO_CCSR + i*0x20, 0x00600000);
568 msleep(100);
569 if (in_be32((priv->regs_win
570 + RIO_ESCSR + i*0x20)) & 1) {
571 dev_err(&dev->dev,
572 "Port %d restart failed.\n", i);
573 release_resource(&port->iores);
574 kfree(priv);
575 kfree(port);
576 continue;
578 dev_info(&dev->dev, "Port %d restart success!\n", i);
580 fsl_rio_info(&dev->dev, ccsr);
582 port->sys_size = (in_be32((priv->regs_win + RIO_PEF_CAR))
583 & RIO_PEF_CTLS) >> 4;
584 dev_info(&dev->dev, "RapidIO Common Transport System size: %d\n",
585 port->sys_size ? 65536 : 256);
587 if (rio_register_mport(port)) {
588 release_resource(&port->iores);
589 kfree(priv);
590 kfree(port);
591 continue;
593 if (port->host_deviceid >= 0)
594 out_be32(priv->regs_win + RIO_GCCSR, RIO_PORT_GEN_HOST |
595 RIO_PORT_GEN_MASTER | RIO_PORT_GEN_DISCOVERED);
596 else
597 out_be32(priv->regs_win + RIO_GCCSR,
598 RIO_PORT_GEN_MASTER);
600 priv->atmu_regs = (struct rio_atmu_regs *)(priv->regs_win
601 + ((i == 0) ? RIO_ATMU_REGS_PORT1_OFFSET :
602 RIO_ATMU_REGS_PORT2_OFFSET));
604 priv->maint_atmu_regs = priv->atmu_regs + 1;
606 /* Set to receive any dist ID for serial RapidIO controller. */
607 if (port->phy_type == RIO_PHY_SERIAL)
608 out_be32((priv->regs_win
609 + RIO_ISR_AACR + i*0x80), RIO_ISR_AACR_AA);
611 /* Configure maintenance transaction window */
612 out_be32(&priv->maint_atmu_regs->rowbar,
613 port->iores.start >> 12);
614 out_be32(&priv->maint_atmu_regs->rowar,
615 0x80077000 | (ilog2(RIO_MAINT_WIN_SIZE) - 1));
617 priv->maint_win = ioremap(port->iores.start,
618 RIO_MAINT_WIN_SIZE);
620 rio_law_start = range_start;
622 fsl_rio_setup_rmu(port, rmu_np[i]);
624 dbell->mport[i] = port;
626 active_ports++;
629 if (!active_ports) {
630 rc = -ENOLINK;
631 goto err;
634 fsl_rio_doorbell_init(dbell);
635 fsl_rio_port_write_init(pw);
637 return 0;
638 err:
639 kfree(pw);
640 pw = NULL;
641 err_pw:
642 kfree(dbell);
643 dbell = NULL;
644 err_dbell:
645 iounmap(rmu_regs_win);
646 rmu_regs_win = NULL;
647 err_rmu:
648 kfree(ops);
649 err_ops:
650 iounmap(rio_regs_win);
651 rio_regs_win = NULL;
652 err_rio_regs:
653 return rc;
656 /* The probe function for RapidIO peer-to-peer network.
658 static int fsl_of_rio_rpn_probe(struct platform_device *dev)
660 printk(KERN_INFO "Setting up RapidIO peer-to-peer network %s\n",
661 dev->dev.of_node->full_name);
663 return fsl_rio_setup(dev);
666 static const struct of_device_id fsl_of_rio_rpn_ids[] = {
668 .compatible = "fsl,srio",
673 static struct platform_driver fsl_of_rio_rpn_driver = {
674 .driver = {
675 .name = "fsl-of-rio",
676 .owner = THIS_MODULE,
677 .of_match_table = fsl_of_rio_rpn_ids,
679 .probe = fsl_of_rio_rpn_probe,
682 static __init int fsl_of_rio_rpn_init(void)
684 return platform_driver_register(&fsl_of_rio_rpn_driver);
687 subsys_initcall(fsl_of_rio_rpn_init);