1/*
2 * RapidIO enumeration and discovery support
3 *
4 * Copyright 2005 MontaVista Software, Inc.
5 * Matt Porter <mporter@kernel.crashing.org>
6 *
7 * Copyright 2009 Integrated Device Technology, Inc.
8 * Alex Bounine <alexandre.bounine@idt.com>
9 * - Added Port-Write/Error Management initialization and handling
10 *
11 * Copyright 2009 Sysgo AG
12 * Thomas Moll <thomas.moll@sysgo.com>
13 * - Added Input- Output- enable functionality, to allow full communication
14 *
15 * This program is free software; you can redistribute it and/or modify it
16 * under the terms of the GNU General Public License as published by the
17 * Free Software Foundation; either version 2 of the License, or (at your
18 * option) any later version.
19 */
20
21#include <linux/types.h>
22#include <linux/kernel.h>
23
24#include <linux/delay.h>
25#include <linux/dma-mapping.h>
26#include <linux/init.h>
27#include <linux/rio.h>
28#include <linux/rio_drv.h>
29#include <linux/rio_ids.h>
30#include <linux/rio_regs.h>
31#include <linux/module.h>
32#include <linux/spinlock.h>
33#include <linux/timer.h>
34#include <linux/sched.h>
35#include <linux/jiffies.h>
36#include <linux/slab.h>
37
38#include "rio.h"
39
40static void rio_init_em(struct rio_dev *rdev);
41
42struct rio_id_table {
43 u16 start; /* logical minimal id */
44 u32 max; /* max number of IDs in table */
45 spinlock_t lock;
46 unsigned long table[0];
47};
48
49static int next_destid = 0;
50static int next_comptag = 1;
51
52/**
53 * rio_destid_alloc - Allocate next available destID for given network
54 * @net: RIO network
55 *
56 * Returns next available device destination ID for the specified RIO network.
57 * Marks allocated ID as one in use.
58 * Returns RIO_INVALID_DESTID if new destID is not available.
59 */
60static u16 rio_destid_alloc(struct rio_net *net)
61{
62 int destid;
63 struct rio_id_table *idtab = (struct rio_id_table *)net->enum_data;
64
65 spin_lock(&idtab->lock);
66 destid = find_first_zero_bit(idtab->table, idtab->max);
67
68 if (destid < idtab->max) {
69 set_bit(destid, idtab->table);
70 destid += idtab->start;
71 } else
72 destid = RIO_INVALID_DESTID;
73
74 spin_unlock(&idtab->lock);
75 return (u16)destid;
76}
77
78/**
79 * rio_destid_reserve - Reserve the specified destID
80 * @net: RIO network
81 * @destid: destID to reserve
82 *
83 * Tries to reserve the specified destID.
84 * Returns 0 if successful.
85 */
86static int rio_destid_reserve(struct rio_net *net, u16 destid)
87{
88 int oldbit;
89 struct rio_id_table *idtab = (struct rio_id_table *)net->enum_data;
90
91 destid -= idtab->start;
92 spin_lock(&idtab->lock);
93 oldbit = test_and_set_bit(destid, idtab->table);
94 spin_unlock(&idtab->lock);
95 return oldbit;
96}
97
98/**
99 * rio_destid_free - free a previously allocated destID
100 * @net: RIO network
101 * @destid: destID to free
102 *
103 * Makes the specified destID available for use.
104 */
105static void rio_destid_free(struct rio_net *net, u16 destid)
106{
107 struct rio_id_table *idtab = (struct rio_id_table *)net->enum_data;
108
109 destid -= idtab->start;
110 spin_lock(&idtab->lock);
111 clear_bit(destid, idtab->table);
112 spin_unlock(&idtab->lock);
113}
114
115/**
116 * rio_destid_first - return first destID in use
117 * @net: RIO network
118 */
119static u16 rio_destid_first(struct rio_net *net)
120{
121 int destid;
122 struct rio_id_table *idtab = (struct rio_id_table *)net->enum_data;
123
124 spin_lock(&idtab->lock);
125 destid = find_first_bit(idtab->table, idtab->max);
126 if (destid >= idtab->max)
127 destid = RIO_INVALID_DESTID;
128 else
129 destid += idtab->start;
130 spin_unlock(&idtab->lock);
131 return (u16)destid;
132}
133
134/**
135 * rio_destid_next - return next destID in use
136 * @net: RIO network
137 * @from: destination ID from which search shall continue
138 */
139static u16 rio_destid_next(struct rio_net *net, u16 from)
140{
141 int destid;
142 struct rio_id_table *idtab = (struct rio_id_table *)net->enum_data;
143
144 spin_lock(&idtab->lock);
145 destid = find_next_bit(idtab->table, idtab->max, from);
146 if (destid >= idtab->max)
147 destid = RIO_INVALID_DESTID;
148 else
149 destid += idtab->start;
150 spin_unlock(&idtab->lock);
151 return (u16)destid;
152}
153
154/**
155 * rio_get_device_id - Get the base/extended device id for a device
156 * @port: RIO master port
157 * @destid: Destination ID of device
158 * @hopcount: Hopcount to device
159 *
160 * Reads the base/extended device id from a device. Returns the
161 * 8/16-bit device ID.
162 */
163static u16 rio_get_device_id(struct rio_mport *port, u16 destid, u8 hopcount)
164{
165 u32 result;
166
167 rio_mport_read_config_32(port, destid, hopcount, RIO_DID_CSR, &result);
168
169 return RIO_GET_DID(port->sys_size, result);
170}
171
172/**
173 * rio_set_device_id - Set the base/extended device id for a device
174 * @port: RIO master port
175 * @destid: Destination ID of device
176 * @hopcount: Hopcount to device
177 * @did: Device ID value to be written
178 *
179 * Writes the base/extended device id from a device.
180 */
181static void rio_set_device_id(struct rio_mport *port, u16 destid, u8 hopcount, u16 did)
182{
183 rio_mport_write_config_32(port, destid, hopcount, RIO_DID_CSR,
184 RIO_SET_DID(port->sys_size, did));
185}
186
187/**
188 * rio_clear_locks- Release all host locks and signal enumeration complete
189 * @net: RIO network to run on
190 *
191 * Marks the component tag CSR on each device with the enumeration
192 * complete flag. When complete, it then release the host locks on
193 * each device. Returns 0 on success or %-EINVAL on failure.
194 */
195static int rio_clear_locks(struct rio_net *net)
196{
197 struct rio_mport *port = net->hport;
198 struct rio_dev *rdev;
199 u32 result;
200 int ret = 0;
201
202 /* Release host device id locks */
203 rio_local_write_config_32(port, RIO_HOST_DID_LOCK_CSR,
204 port->host_deviceid);
205 rio_local_read_config_32(port, RIO_HOST_DID_LOCK_CSR, &result);
206 if ((result & 0xffff) != 0xffff) {
207 printk(KERN_INFO
208 "RIO: badness when releasing host lock on master port, result %8.8x\n",
209 result);
210 ret = -EINVAL;
211 }
212 list_for_each_entry(rdev, &net->devices, net_list) {
213 rio_write_config_32(rdev, RIO_HOST_DID_LOCK_CSR,
214 port->host_deviceid);
215 rio_read_config_32(rdev, RIO_HOST_DID_LOCK_CSR, &result);
216 if ((result & 0xffff) != 0xffff) {
217 printk(KERN_INFO
218 "RIO: badness when releasing host lock on vid %4.4x did %4.4x\n",
219 rdev->vid, rdev->did);
220 ret = -EINVAL;
221 }
222
223 /* Mark device as discovered and enable master */
224 rio_read_config_32(rdev,
225 rdev->phys_efptr + RIO_PORT_GEN_CTL_CSR,
226 &result);
227 result |= RIO_PORT_GEN_DISCOVERED | RIO_PORT_GEN_MASTER;
228 rio_write_config_32(rdev,
229 rdev->phys_efptr + RIO_PORT_GEN_CTL_CSR,
230 result);
231 }
232
233 return ret;
234}
235
236/**
237 * rio_enum_host- Set host lock and initialize host destination ID
238 * @port: Master port to issue transaction
239 *
240 * Sets the local host master port lock and destination ID register
241 * with the host device ID value. The host device ID value is provided
242 * by the platform. Returns %0 on success or %-1 on failure.
243 */
244static int rio_enum_host(struct rio_mport *port)
245{
246 u32 result;
247
248 /* Set master port host device id lock */
249 rio_local_write_config_32(port, RIO_HOST_DID_LOCK_CSR,
250 port->host_deviceid);
251
252 rio_local_read_config_32(port, RIO_HOST_DID_LOCK_CSR, &result);
253 if ((result & 0xffff) != port->host_deviceid)
254 return -1;
255
256 /* Set master port destid and init destid ctr */
257 rio_local_set_device_id(port, port->host_deviceid);
258 return 0;
259}
260
261/**
262 * rio_device_has_destid- Test if a device contains a destination ID register
263 * @port: Master port to issue transaction
264 * @src_ops: RIO device source operations
265 * @dst_ops: RIO device destination operations
266 *
267 * Checks the provided @src_ops and @dst_ops for the necessary transaction
268 * capabilities that indicate whether or not a device will implement a
269 * destination ID register. Returns 1 if true or 0 if false.
270 */
271static int rio_device_has_destid(struct rio_mport *port, int src_ops,
272 int dst_ops)
273{
274 u32 mask = RIO_OPS_READ | RIO_OPS_WRITE | RIO_OPS_ATOMIC_TST_SWP | RIO_OPS_ATOMIC_INC | RIO_OPS_ATOMIC_DEC | RIO_OPS_ATOMIC_SET | RIO_OPS_ATOMIC_CLR;
275
276 return !!((src_ops | dst_ops) & mask);
277}
278
279/**
280 * rio_release_dev- Frees a RIO device struct
281 * @dev: LDM device associated with a RIO device struct
282 *
283 * Gets the RIO device struct associated a RIO device struct.
284 * The RIO device struct is freed.
285 */
286static void rio_release_dev(struct device *dev)
287{
288 struct rio_dev *rdev;
289
290 rdev = to_rio_dev(dev);
291 kfree(rdev);
292}
293
294/**
295 * rio_is_switch- Tests if a RIO device has switch capabilities
296 * @rdev: RIO device
297 *
298 * Gets the RIO device Processing Element Features register
299 * contents and tests for switch capabilities. Returns 1 if
300 * the device is a switch or 0 if it is not a switch.
301 * The RIO device struct is freed.
302 */
303static int rio_is_switch(struct rio_dev *rdev)
304{
305 if (rdev->pef & RIO_PEF_SWITCH)
306 return 1;
307 return 0;
308}
309
310/**
311 * rio_setup_device- Allocates and sets up a RIO device
312 * @net: RIO network
313 * @port: Master port to send transactions
314 * @destid: Current destination ID
315 * @hopcount: Current hopcount
316 * @do_enum: Enumeration/Discovery mode flag
317 *
318 * Allocates a RIO device and configures fields based on configuration
319 * space contents. If device has a destination ID register, a destination
320 * ID is either assigned in enumeration mode or read from configuration
321 * space in discovery mode. If the device has switch capabilities, then
322 * a switch is allocated and configured appropriately. Returns a pointer
323 * to a RIO device on success or NULL on failure.
324 *
325 */
326static struct rio_dev *rio_setup_device(struct rio_net *net,
327 struct rio_mport *port, u16 destid,
328 u8 hopcount, int do_enum)
329{
330 int ret = 0;
331 struct rio_dev *rdev;
332 struct rio_switch *rswitch = NULL;
333 int result, rdid;
334 size_t size;
335 u32 swpinfo = 0;
336
337 size = sizeof(struct rio_dev);
338 if (rio_mport_read_config_32(port, destid, hopcount,
339 RIO_PEF_CAR, &result))
340 return NULL;
341
342 if (result & (RIO_PEF_SWITCH | RIO_PEF_MULTIPORT)) {
343 rio_mport_read_config_32(port, destid, hopcount,
344 RIO_SWP_INFO_CAR, &swpinfo);
345 if (result & RIO_PEF_SWITCH) {
346 size += (RIO_GET_TOTAL_PORTS(swpinfo) *
347 sizeof(rswitch->nextdev[0])) + sizeof(*rswitch);
348 }
349 }
350
351 rdev = kzalloc(size, GFP_KERNEL);
352 if (!rdev)
353 return NULL;
354
355 rdev->net = net;
356 rdev->pef = result;
357 rdev->swpinfo = swpinfo;
358 rio_mport_read_config_32(port, destid, hopcount, RIO_DEV_ID_CAR,
359 &result);
360 rdev->did = result >> 16;
361 rdev->vid = result & 0xffff;
362 rio_mport_read_config_32(port, destid, hopcount, RIO_DEV_INFO_CAR,
363 &rdev->device_rev);
364 rio_mport_read_config_32(port, destid, hopcount, RIO_ASM_ID_CAR,
365 &result);
366 rdev->asm_did = result >> 16;
367 rdev->asm_vid = result & 0xffff;
368 rio_mport_read_config_32(port, destid, hopcount, RIO_ASM_INFO_CAR,
369 &result);
370 rdev->asm_rev = result >> 16;
371 if (rdev->pef & RIO_PEF_EXT_FEATURES) {
372 rdev->efptr = result & 0xffff;
373 rdev->phys_efptr = rio_mport_get_physefb(port, 0, destid,
374 hopcount, &rdev->phys_rmap);
375 pr_debug("RIO: %s Register Map %d device\n",
376 __func__, rdev->phys_rmap);
377
378 rdev->em_efptr = rio_mport_get_feature(port, 0, destid,
379 hopcount, RIO_EFB_ERR_MGMNT);
380 if (!rdev->em_efptr)
381 rdev->em_efptr = rio_mport_get_feature(port, 0, destid,
382 hopcount, RIO_EFB_ERR_MGMNT_HS);
383 }
384
385 rio_mport_read_config_32(port, destid, hopcount, RIO_SRC_OPS_CAR,
386 &rdev->src_ops);
387 rio_mport_read_config_32(port, destid, hopcount, RIO_DST_OPS_CAR,
388 &rdev->dst_ops);
389
390 if (do_enum) {
391 /* Assign component tag to device */
392 if (next_comptag >= 0x10000) {
393 pr_err("RIO: Component Tag Counter Overflow\n");
394 goto cleanup;
395 }
396 rio_mport_write_config_32(port, destid, hopcount,
397 RIO_COMPONENT_TAG_CSR, next_comptag);
398 rdev->comp_tag = next_comptag++;
399 rdev->do_enum = true;
400 } else {
401 rio_mport_read_config_32(port, destid, hopcount,
402 RIO_COMPONENT_TAG_CSR,
403 &rdev->comp_tag);
404 }
405
406 if (rio_device_has_destid(port, rdev->src_ops, rdev->dst_ops)) {
407 if (do_enum) {
408 rio_set_device_id(port, destid, hopcount, next_destid);
409 rdev->destid = next_destid;
410 next_destid = rio_destid_alloc(net);
411 } else
412 rdev->destid = rio_get_device_id(port, destid, hopcount);
413
414 rdev->hopcount = 0xff;
415 } else {
416 /* Switch device has an associated destID which
417 * will be adjusted later
418 */
419 rdev->destid = destid;
420 rdev->hopcount = hopcount;
421 }
422
423 /* If a PE has both switch and other functions, show it as a switch */
424 if (rio_is_switch(rdev)) {
425 rswitch = rdev->rswitch;
426 rswitch->port_ok = 0;
427 spin_lock_init(&rswitch->lock);
428 rswitch->route_table =
429 kzalloc(RIO_MAX_ROUTE_ENTRIES(port->sys_size),
430 GFP_KERNEL);
431 if (!rswitch->route_table)
432 goto cleanup;
433 /* Initialize switch route table */
434 for (rdid = 0; rdid < RIO_MAX_ROUTE_ENTRIES(port->sys_size);
435 rdid++)
436 rswitch->route_table[rdid] = RIO_INVALID_ROUTE;
437 dev_set_name(&rdev->dev, "%02x:s:%04x", rdev->net->id,
438 rdev->comp_tag & RIO_CTAG_UDEVID);
439
440 if (do_enum)
441 rio_route_clr_table(rdev, RIO_GLOBAL_TABLE, 0);
442 } else {
443 if (do_enum)
444 /*Enable Input Output Port (transmitter receiver)*/
445 rio_enable_rx_tx_port(port, 0, destid, hopcount, 0);
446
447 dev_set_name(&rdev->dev, "%02x:e:%04x", rdev->net->id,
448 rdev->comp_tag & RIO_CTAG_UDEVID);
449 }
450
451 rdev->dev.parent = &net->dev;
452 rio_attach_device(rdev);
453 rdev->dev.release = rio_release_dev;
454 rdev->dma_mask = DMA_BIT_MASK(32);
455 rdev->dev.dma_mask = &rdev->dma_mask;
456 rdev->dev.coherent_dma_mask = DMA_BIT_MASK(32);
457
458 if (rdev->dst_ops & RIO_DST_OPS_DOORBELL)
459 rio_init_dbell_res(&rdev->riores[RIO_DOORBELL_RESOURCE],
460 0, 0xffff);
461
462 ret = rio_add_device(rdev);
463 if (ret)
464 goto cleanup;
465
466 rio_dev_get(rdev);
467
468 return rdev;
469
470cleanup:
471 if (rswitch)
472 kfree(rswitch->route_table);
473
474 kfree(rdev);
475 return NULL;
476}
477
478/**
479 * rio_sport_is_active- Tests if a switch port has an active connection.
480 * @rdev: RapidIO device object
481 * @sp: Switch port number
482 *
483 * Reads the port error status CSR for a particular switch port to
484 * determine if the port has an active link. Returns
485 * %RIO_PORT_N_ERR_STS_PORT_OK if the port is active or %0 if it is
486 * inactive.
487 */
488static int
489rio_sport_is_active(struct rio_dev *rdev, int sp)
490{
491 u32 result = 0;
492
493 rio_read_config_32(rdev, RIO_DEV_PORT_N_ERR_STS_CSR(rdev, sp),
494 &result);
495
496 return result & RIO_PORT_N_ERR_STS_PORT_OK;
497}
498
499/**
500 * rio_get_host_deviceid_lock- Reads the Host Device ID Lock CSR on a device
501 * @port: Master port to send transaction
502 * @hopcount: Number of hops to the device
503 *
504 * Used during enumeration to read the Host Device ID Lock CSR on a
505 * RIO device. Returns the value of the lock register.
506 */
507static u16 rio_get_host_deviceid_lock(struct rio_mport *port, u8 hopcount)
508{
509 u32 result;
510
511 rio_mport_read_config_32(port, RIO_ANY_DESTID(port->sys_size), hopcount,
512 RIO_HOST_DID_LOCK_CSR, &result);
513
514 return (u16) (result & 0xffff);
515}
516
517/**
518 * rio_enum_peer- Recursively enumerate a RIO network through a master port
519 * @net: RIO network being enumerated
520 * @port: Master port to send transactions
521 * @hopcount: Number of hops into the network
522 * @prev: Previous RIO device connected to the enumerated one
523 * @prev_port: Port on previous RIO device
524 *
525 * Recursively enumerates a RIO network. Transactions are sent via the
526 * master port passed in @port.
527 */
528static int rio_enum_peer(struct rio_net *net, struct rio_mport *port,
529 u8 hopcount, struct rio_dev *prev, int prev_port)
530{
531 struct rio_dev *rdev;
532 u32 regval;
533 int tmp;
534
535 if (rio_mport_chk_dev_access(port,
536 RIO_ANY_DESTID(port->sys_size), hopcount)) {
537 pr_debug("RIO: device access check failed\n");
538 return -1;
539 }
540
541 if (rio_get_host_deviceid_lock(port, hopcount) == port->host_deviceid) {
542 pr_debug("RIO: PE already discovered by this host\n");
543 /*
544 * Already discovered by this host. Add it as another
545 * link to the existing device.
546 */
547 rio_mport_read_config_32(port, RIO_ANY_DESTID(port->sys_size),
548 hopcount, RIO_COMPONENT_TAG_CSR, &regval);
549
550 if (regval) {
551 rdev = rio_get_comptag((regval & 0xffff), NULL);
552
553 if (rdev && prev && rio_is_switch(prev)) {
554 pr_debug("RIO: redundant path to %s\n",
555 rio_name(rdev));
556 prev->rswitch->nextdev[prev_port] = rdev;
557 }
558 }
559
560 return 0;
561 }
562
563 /* Attempt to acquire device lock */
564 rio_mport_write_config_32(port, RIO_ANY_DESTID(port->sys_size),
565 hopcount,
566 RIO_HOST_DID_LOCK_CSR, port->host_deviceid);
567 while ((tmp = rio_get_host_deviceid_lock(port, hopcount))
568 < port->host_deviceid) {
569 /* Delay a bit */
570 mdelay(1);
571 /* Attempt to acquire device lock again */
572 rio_mport_write_config_32(port, RIO_ANY_DESTID(port->sys_size),
573 hopcount,
574 RIO_HOST_DID_LOCK_CSR,
575 port->host_deviceid);
576 }
577
578 if (rio_get_host_deviceid_lock(port, hopcount) > port->host_deviceid) {
579 pr_debug(
580 "RIO: PE locked by a higher priority host...retreating\n");
581 return -1;
582 }
583
584 /* Setup new RIO device */
585 rdev = rio_setup_device(net, port, RIO_ANY_DESTID(port->sys_size),
586 hopcount, 1);
587 if (rdev) {
588 rdev->prev = prev;
589 if (prev && rio_is_switch(prev))
590 prev->rswitch->nextdev[prev_port] = rdev;
591 } else
592 return -1;
593
594 if (rio_is_switch(rdev)) {
595 int sw_destid;
596 int cur_destid;
597 int sw_inport;
598 u16 destid;
599 int port_num;
600
601 sw_inport = RIO_GET_PORT_NUM(rdev->swpinfo);
602 rio_route_add_entry(rdev, RIO_GLOBAL_TABLE,
603 port->host_deviceid, sw_inport, 0);
604 rdev->rswitch->route_table[port->host_deviceid] = sw_inport;
605
606 destid = rio_destid_first(net);
607 while (destid != RIO_INVALID_DESTID && destid < next_destid) {
608 if (destid != port->host_deviceid) {
609 rio_route_add_entry(rdev, RIO_GLOBAL_TABLE,
610 destid, sw_inport, 0);
611 rdev->rswitch->route_table[destid] = sw_inport;
612 }
613 destid = rio_destid_next(net, destid + 1);
614 }
615 pr_debug(
616 "RIO: found %s (vid %4.4x did %4.4x) with %d ports\n",
617 rio_name(rdev), rdev->vid, rdev->did,
618 RIO_GET_TOTAL_PORTS(rdev->swpinfo));
619 sw_destid = next_destid;
620 for (port_num = 0;
621 port_num < RIO_GET_TOTAL_PORTS(rdev->swpinfo);
622 port_num++) {
623 if (sw_inport == port_num) {
624 rio_enable_rx_tx_port(port, 0,
625 RIO_ANY_DESTID(port->sys_size),
626 hopcount, port_num);
627 rdev->rswitch->port_ok |= (1 << port_num);
628 continue;
629 }
630
631 cur_destid = next_destid;
632
633 if (rio_sport_is_active(rdev, port_num)) {
634 pr_debug(
635 "RIO: scanning device on port %d\n",
636 port_num);
637 rio_enable_rx_tx_port(port, 0,
638 RIO_ANY_DESTID(port->sys_size),
639 hopcount, port_num);
640 rdev->rswitch->port_ok |= (1 << port_num);
641 rio_route_add_entry(rdev, RIO_GLOBAL_TABLE,
642 RIO_ANY_DESTID(port->sys_size),
643 port_num, 0);
644
645 if (rio_enum_peer(net, port, hopcount + 1,
646 rdev, port_num) < 0)
647 return -1;
648
649 /* Update routing tables */
650 destid = rio_destid_next(net, cur_destid + 1);
651 if (destid != RIO_INVALID_DESTID) {
652 for (destid = cur_destid;
653 destid < next_destid;) {
654 if (destid != port->host_deviceid) {
655 rio_route_add_entry(rdev,
656 RIO_GLOBAL_TABLE,
657 destid,
658 port_num,
659 0);
660 rdev->rswitch->
661 route_table[destid] =
662 port_num;
663 }
664 destid = rio_destid_next(net,
665 destid + 1);
666 }
667 }
668 } else {
669 /* If switch supports Error Management,
670 * set PORT_LOCKOUT bit for unused port
671 */
672 if (rdev->em_efptr)
673 rio_set_port_lockout(rdev, port_num, 1);
674
675 rdev->rswitch->port_ok &= ~(1 << port_num);
676 }
677 }
678
679 /* Direct Port-write messages to the enumeratiing host */
680 if ((rdev->src_ops & RIO_SRC_OPS_PORT_WRITE) &&
681 (rdev->em_efptr)) {
682 rio_write_config_32(rdev,
683 rdev->em_efptr + RIO_EM_PW_TGT_DEVID,
684 (port->host_deviceid << 16) |
685 (port->sys_size << 15));
686 }
687
688 rio_init_em(rdev);
689
690 /* Check for empty switch */
691 if (next_destid == sw_destid)
692 next_destid = rio_destid_alloc(net);
693
694 rdev->destid = sw_destid;
695 } else
696 pr_debug("RIO: found %s (vid %4.4x did %4.4x)\n",
697 rio_name(rdev), rdev->vid, rdev->did);
698
699 return 0;
700}
701
702/**
703 * rio_enum_complete- Tests if enumeration of a network is complete
704 * @port: Master port to send transaction
705 *
706 * Tests the PGCCSR discovered bit for non-zero value (enumeration
707 * complete flag). Return %1 if enumeration is complete or %0 if
708 * enumeration is incomplete.
709 */
710static int rio_enum_complete(struct rio_mport *port)
711{
712 u32 regval;
713
714 rio_local_read_config_32(port, port->phys_efptr + RIO_PORT_GEN_CTL_CSR,
715 &regval);
716 return (regval & RIO_PORT_GEN_DISCOVERED) ? 1 : 0;
717}
718
719/**
720 * rio_disc_peer- Recursively discovers a RIO network through a master port
721 * @net: RIO network being discovered
722 * @port: Master port to send transactions
723 * @destid: Current destination ID in network
724 * @hopcount: Number of hops into the network
725 * @prev: previous rio_dev
726 * @prev_port: previous port number
727 *
728 * Recursively discovers a RIO network. Transactions are sent via the
729 * master port passed in @port.
730 */
731static int
732rio_disc_peer(struct rio_net *net, struct rio_mport *port, u16 destid,
733 u8 hopcount, struct rio_dev *prev, int prev_port)
734{
735 u8 port_num, route_port;
736 struct rio_dev *rdev;
737 u16 ndestid;
738
739 /* Setup new RIO device */
740 if ((rdev = rio_setup_device(net, port, destid, hopcount, 0))) {
741 rdev->prev = prev;
742 if (prev && rio_is_switch(prev))
743 prev->rswitch->nextdev[prev_port] = rdev;
744 } else
745 return -1;
746
747 if (rio_is_switch(rdev)) {
748 /* Associated destid is how we accessed this switch */
749 rdev->destid = destid;
750
751 pr_debug(
752 "RIO: found %s (vid %4.4x did %4.4x) with %d ports\n",
753 rio_name(rdev), rdev->vid, rdev->did,
754 RIO_GET_TOTAL_PORTS(rdev->swpinfo));
755 for (port_num = 0;
756 port_num < RIO_GET_TOTAL_PORTS(rdev->swpinfo);
757 port_num++) {
758 if (RIO_GET_PORT_NUM(rdev->swpinfo) == port_num)
759 continue;
760
761 if (rio_sport_is_active(rdev, port_num)) {
762 pr_debug(
763 "RIO: scanning device on port %d\n",
764 port_num);
765
766 rio_lock_device(port, destid, hopcount, 1000);
767
768 for (ndestid = 0;
769 ndestid < RIO_ANY_DESTID(port->sys_size);
770 ndestid++) {
771 rio_route_get_entry(rdev,
772 RIO_GLOBAL_TABLE,
773 ndestid,
774 &route_port, 0);
775 if (route_port == port_num)
776 break;
777 }
778
779 if (ndestid == RIO_ANY_DESTID(port->sys_size))
780 continue;
781 rio_unlock_device(port, destid, hopcount);
782 if (rio_disc_peer(net, port, ndestid,
783 hopcount + 1, rdev, port_num) < 0)
784 return -1;
785 }
786 }
787 } else
788 pr_debug("RIO: found %s (vid %4.4x did %4.4x)\n",
789 rio_name(rdev), rdev->vid, rdev->did);
790
791 return 0;
792}
793
794/**
795 * rio_mport_is_active- Tests if master port link is active
796 * @port: Master port to test
797 *
798 * Reads the port error status CSR for the master port to
799 * determine if the port has an active link. Returns
800 * %RIO_PORT_N_ERR_STS_PORT_OK if the master port is active
801 * or %0 if it is inactive.
802 */
803static int rio_mport_is_active(struct rio_mport *port)
804{
805 u32 result = 0;
806
807 rio_local_read_config_32(port,
808 port->phys_efptr +
809 RIO_PORT_N_ERR_STS_CSR(port->index, port->phys_rmap),
810 &result);
811 return result & RIO_PORT_N_ERR_STS_PORT_OK;
812}
813
814static void rio_scan_release_net(struct rio_net *net)
815{
816 pr_debug("RIO-SCAN: %s: net_%d\n", __func__, net->id);
817 kfree(net->enum_data);
818}
819
820static void rio_scan_release_dev(struct device *dev)
821{
822 struct rio_net *net;
823
824 net = to_rio_net(dev);
825 pr_debug("RIO-SCAN: %s: net_%d\n", __func__, net->id);
826 kfree(net);
827}
828
829/*
830 * rio_scan_alloc_net - Allocate and configure a new RIO network
831 * @mport: Master port associated with the RIO network
832 * @do_enum: Enumeration/Discovery mode flag
833 * @start: logical minimal start id for new net
834 *
835 * Allocates a new RIO network structure and initializes enumerator-specific
836 * part of it (if required).
837 * Returns a RIO network pointer on success or %NULL on failure.
838 */
839static struct rio_net *rio_scan_alloc_net(struct rio_mport *mport,
840 int do_enum, u16 start)
841{
842 struct rio_net *net;
843
844 net = rio_alloc_net(mport);
845
846 if (net && do_enum) {
847 struct rio_id_table *idtab;
848 size_t size;
849
850 size = sizeof(struct rio_id_table) +
851 BITS_TO_LONGS(
852 RIO_MAX_ROUTE_ENTRIES(mport->sys_size)
853 ) * sizeof(long);
854
855 idtab = kzalloc(size, GFP_KERNEL);
856
857 if (idtab == NULL) {
858 pr_err("RIO: failed to allocate destID table\n");
859 rio_free_net(net);
860 net = NULL;
861 } else {
862 net->enum_data = idtab;
863 net->release = rio_scan_release_net;
864 idtab->start = start;
865 idtab->max = RIO_MAX_ROUTE_ENTRIES(mport->sys_size);
866 spin_lock_init(&idtab->lock);
867 }
868 }
869
870 if (net) {
871 net->id = mport->id;
872 net->hport = mport;
873 dev_set_name(&net->dev, "rnet_%d", net->id);
874 net->dev.parent = &mport->dev;
875 net->dev.release = rio_scan_release_dev;
876 rio_add_net(net);
877 }
878
879 return net;
880}
881
882/**
883 * rio_update_route_tables- Updates route tables in switches
884 * @net: RIO network to run update on
885 *
886 * For each enumerated device, ensure that each switch in a system
887 * has correct routing entries. Add routes for devices that where
888 * unknown during the first enumeration pass through the switch.
889 */
890static void rio_update_route_tables(struct rio_net *net)
891{
892 struct rio_dev *rdev, *swrdev;
893 struct rio_switch *rswitch;
894 u8 sport;
895 u16 destid;
896
897 list_for_each_entry(rdev, &net->devices, net_list) {
898
899 destid = rdev->destid;
900
901 list_for_each_entry(rswitch, &net->switches, node) {
902
903 if (rio_is_switch(rdev) && (rdev->rswitch == rswitch))
904 continue;
905
906 if (RIO_INVALID_ROUTE == rswitch->route_table[destid]) {
907 swrdev = sw_to_rio_dev(rswitch);
908
909 /* Skip if destid ends in empty switch*/
910 if (swrdev->destid == destid)
911 continue;
912
913 sport = RIO_GET_PORT_NUM(swrdev->swpinfo);
914
915 rio_route_add_entry(swrdev, RIO_GLOBAL_TABLE,
916 destid, sport, 0);
917 rswitch->route_table[destid] = sport;
918 }
919 }
920 }
921}
922
923/**
924 * rio_init_em - Initializes RIO Error Management (for switches)
925 * @rdev: RIO device
926 *
927 * For each enumerated switch, call device-specific error management
928 * initialization routine (if supplied by the switch driver).
929 */
930static void rio_init_em(struct rio_dev *rdev)
931{
932 if (rio_is_switch(rdev) && (rdev->em_efptr) &&
933 rdev->rswitch->ops && rdev->rswitch->ops->em_init) {
934 rdev->rswitch->ops->em_init(rdev);
935 }
936}
937
938/**
939 * rio_enum_mport- Start enumeration through a master port
940 * @mport: Master port to send transactions
941 * @flags: Enumeration control flags
942 *
943 * Starts the enumeration process. If somebody has enumerated our
944 * master port device, then give up. If not and we have an active
945 * link, then start recursive peer enumeration. Returns %0 if
946 * enumeration succeeds or %-EBUSY if enumeration fails.
947 */
948static int rio_enum_mport(struct rio_mport *mport, u32 flags)
949{
950 struct rio_net *net = NULL;
951 int rc = 0;
952
953 printk(KERN_INFO "RIO: enumerate master port %d, %s\n", mport->id,
954 mport->name);
955
956 /*
957 * To avoid multiple start requests (repeat enumeration is not supported
958 * by this method) check if enumeration/discovery was performed for this
959 * mport: if mport was added into the list of mports for a net exit
960 * with error.
961 */
962 if (mport->nnode.next || mport->nnode.prev)
963 return -EBUSY;
964
965 /* If somebody else enumerated our master port device, bail. */
966 if (rio_enum_host(mport) < 0) {
967 printk(KERN_INFO
968 "RIO: master port %d device has been enumerated by a remote host\n",
969 mport->id);
970 rc = -EBUSY;
971 goto out;
972 }
973
974 /* If master port has an active link, allocate net and enum peers */
975 if (rio_mport_is_active(mport)) {
976 net = rio_scan_alloc_net(mport, 1, 0);
977 if (!net) {
978 printk(KERN_ERR "RIO: failed to allocate new net\n");
979 rc = -ENOMEM;
980 goto out;
981 }
982
983 /* reserve mport destID in new net */
984 rio_destid_reserve(net, mport->host_deviceid);
985
986 /* Enable Input Output Port (transmitter receiver) */
987 rio_enable_rx_tx_port(mport, 1, 0, 0, 0);
988
989 /* Set component tag for host */
990 rio_local_write_config_32(mport, RIO_COMPONENT_TAG_CSR,
991 next_comptag++);
992
993 next_destid = rio_destid_alloc(net);
994
995 if (rio_enum_peer(net, mport, 0, NULL, 0) < 0) {
996 /* A higher priority host won enumeration, bail. */
997 printk(KERN_INFO
998 "RIO: master port %d device has lost enumeration to a remote host\n",
999 mport->id);
1000 rio_clear_locks(net);
1001 rc = -EBUSY;
1002 goto out;
1003 }
1004 /* free the last allocated destID (unused) */
1005 rio_destid_free(net, next_destid);
1006 rio_update_route_tables(net);
1007 rio_clear_locks(net);
1008 rio_pw_enable(mport, 1);
1009 } else {
1010 printk(KERN_INFO "RIO: master port %d link inactive\n",
1011 mport->id);
1012 rc = -EINVAL;
1013 }
1014
1015 out:
1016 return rc;
1017}
1018
1019/**
1020 * rio_build_route_tables- Generate route tables from switch route entries
1021 * @net: RIO network to run route tables scan on
1022 *
1023 * For each switch device, generate a route table by copying existing
1024 * route entries from the switch.
1025 */
1026static void rio_build_route_tables(struct rio_net *net)
1027{
1028 struct rio_switch *rswitch;
1029 struct rio_dev *rdev;
1030 int i;
1031 u8 sport;
1032
1033 list_for_each_entry(rswitch, &net->switches, node) {
1034 rdev = sw_to_rio_dev(rswitch);
1035
1036 rio_lock_device(net->hport, rdev->destid,
1037 rdev->hopcount, 1000);
1038 for (i = 0;
1039 i < RIO_MAX_ROUTE_ENTRIES(net->hport->sys_size);
1040 i++) {
1041 if (rio_route_get_entry(rdev, RIO_GLOBAL_TABLE,
1042 i, &sport, 0) < 0)
1043 continue;
1044 rswitch->route_table[i] = sport;
1045 }
1046
1047 rio_unlock_device(net->hport, rdev->destid, rdev->hopcount);
1048 }
1049}
1050
1051/**
1052 * rio_disc_mport- Start discovery through a master port
1053 * @mport: Master port to send transactions
1054 * @flags: discovery control flags
1055 *
1056 * Starts the discovery process. If we have an active link,
1057 * then wait for the signal that enumeration is complete (if wait
1058 * is allowed).
1059 * When enumeration completion is signaled, start recursive
1060 * peer discovery. Returns %0 if discovery succeeds or %-EBUSY
1061 * on failure.
1062 */
1063static int rio_disc_mport(struct rio_mport *mport, u32 flags)
1064{
1065 struct rio_net *net = NULL;
1066 unsigned long to_end;
1067
1068 printk(KERN_INFO "RIO: discover master port %d, %s\n", mport->id,
1069 mport->name);
1070
1071 /* If master port has an active link, allocate net and discover peers */
1072 if (rio_mport_is_active(mport)) {
1073 if (rio_enum_complete(mport))
1074 goto enum_done;
1075 else if (flags & RIO_SCAN_ENUM_NO_WAIT)
1076 return -EAGAIN;
1077
1078 pr_debug("RIO: wait for enumeration to complete...\n");
1079
1080 to_end = jiffies + CONFIG_RAPIDIO_DISC_TIMEOUT * HZ;
1081 while (time_before(jiffies, to_end)) {
1082 if (rio_enum_complete(mport))
1083 goto enum_done;
1084 msleep(10);
1085 }
1086
1087 pr_debug("RIO: discovery timeout on mport %d %s\n",
1088 mport->id, mport->name);
1089 goto bail;
1090enum_done:
1091 pr_debug("RIO: ... enumeration done\n");
1092
1093 net = rio_scan_alloc_net(mport, 0, 0);
1094 if (!net) {
1095 printk(KERN_ERR "RIO: Failed to allocate new net\n");
1096 goto bail;
1097 }
1098
1099 /* Read DestID assigned by enumerator */
1100 rio_local_read_config_32(mport, RIO_DID_CSR,
1101 &mport->host_deviceid);
1102 mport->host_deviceid = RIO_GET_DID(mport->sys_size,
1103 mport->host_deviceid);
1104
1105 if (rio_disc_peer(net, mport, RIO_ANY_DESTID(mport->sys_size),
1106 0, NULL, 0) < 0) {
1107 printk(KERN_INFO
1108 "RIO: master port %d device has failed discovery\n",
1109 mport->id);
1110 goto bail;
1111 }
1112
1113 rio_build_route_tables(net);
1114 }
1115
1116 return 0;
1117bail:
1118 return -EBUSY;
1119}
1120
1121static struct rio_scan rio_scan_ops = {
1122 .owner = THIS_MODULE,
1123 .enumerate = rio_enum_mport,
1124 .discover = rio_disc_mport,
1125};
1126
1127static bool scan;
1128module_param(scan, bool, 0);
1129MODULE_PARM_DESC(scan, "Start RapidIO network enumeration/discovery "
1130 "(default = 0)");
1131
1132/**
1133 * rio_basic_attach:
1134 *
1135 * When this enumeration/discovery method is loaded as a module this function
1136 * registers its specific enumeration and discover routines for all available
1137 * RapidIO mport devices. The "scan" command line parameter controls ability of
1138 * the module to start RapidIO enumeration/discovery automatically.
1139 *
1140 * Returns 0 for success or -EIO if unable to register itself.
1141 *
1142 * This enumeration/discovery method cannot be unloaded and therefore does not
1143 * provide a matching cleanup_module routine.
1144 */
1145
1146static int __init rio_basic_attach(void)
1147{
1148 if (rio_register_scan(RIO_MPORT_ANY, &rio_scan_ops))
1149 return -EIO;
1150 if (scan)
1151 rio_init_mports();
1152 return 0;
1153}
1154
1155late_initcall(rio_basic_attach);
1156
1157MODULE_DESCRIPTION("Basic RapidIO enumeration/discovery");
1158MODULE_LICENSE("GPL");
1159