GNU Linux-libre 5.4.241-gnu1
[releases.git] / drivers / rapidio / rio-scan.c
1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /*
3  * RapidIO enumeration and discovery support
4  *
5  * Copyright 2005 MontaVista Software, Inc.
6  * Matt Porter <mporter@kernel.crashing.org>
7  *
8  * Copyright 2009 Integrated Device Technology, Inc.
9  * Alex Bounine <alexandre.bounine@idt.com>
10  * - Added Port-Write/Error Management initialization and handling
11  *
12  * Copyright 2009 Sysgo AG
13  * Thomas Moll <thomas.moll@sysgo.com>
14  * - Added Input- Output- enable functionality, to allow full communication
15  */
16
17 #include <linux/types.h>
18 #include <linux/kernel.h>
19
20 #include <linux/delay.h>
21 #include <linux/dma-mapping.h>
22 #include <linux/init.h>
23 #include <linux/rio.h>
24 #include <linux/rio_drv.h>
25 #include <linux/rio_ids.h>
26 #include <linux/rio_regs.h>
27 #include <linux/module.h>
28 #include <linux/spinlock.h>
29 #include <linux/timer.h>
30 #include <linux/sched.h>
31 #include <linux/jiffies.h>
32 #include <linux/slab.h>
33
34 #include "rio.h"
35
36 static void rio_init_em(struct rio_dev *rdev);
37
38 struct rio_id_table {
39         u16 start;      /* logical minimal id */
40         u32 max;        /* max number of IDs in table */
41         spinlock_t lock;
42         unsigned long table[0];
43 };
44
45 static int next_destid = 0;
46 static int next_comptag = 1;
47
48 /**
49  * rio_destid_alloc - Allocate next available destID for given network
50  * @net: RIO network
51  *
52  * Returns next available device destination ID for the specified RIO network.
53  * Marks allocated ID as one in use.
54  * Returns RIO_INVALID_DESTID if new destID is not available.
55  */
56 static u16 rio_destid_alloc(struct rio_net *net)
57 {
58         int destid;
59         struct rio_id_table *idtab = (struct rio_id_table *)net->enum_data;
60
61         spin_lock(&idtab->lock);
62         destid = find_first_zero_bit(idtab->table, idtab->max);
63
64         if (destid < idtab->max) {
65                 set_bit(destid, idtab->table);
66                 destid += idtab->start;
67         } else
68                 destid = RIO_INVALID_DESTID;
69
70         spin_unlock(&idtab->lock);
71         return (u16)destid;
72 }
73
74 /**
75  * rio_destid_reserve - Reserve the specified destID
76  * @net: RIO network
77  * @destid: destID to reserve
78  *
79  * Tries to reserve the specified destID.
80  * Returns 0 if successful.
81  */
82 static int rio_destid_reserve(struct rio_net *net, u16 destid)
83 {
84         int oldbit;
85         struct rio_id_table *idtab = (struct rio_id_table *)net->enum_data;
86
87         destid -= idtab->start;
88         spin_lock(&idtab->lock);
89         oldbit = test_and_set_bit(destid, idtab->table);
90         spin_unlock(&idtab->lock);
91         return oldbit;
92 }
93
94 /**
95  * rio_destid_free - free a previously allocated destID
96  * @net: RIO network
97  * @destid: destID to free
98  *
99  * Makes the specified destID available for use.
100  */
101 static void rio_destid_free(struct rio_net *net, u16 destid)
102 {
103         struct rio_id_table *idtab = (struct rio_id_table *)net->enum_data;
104
105         destid -= idtab->start;
106         spin_lock(&idtab->lock);
107         clear_bit(destid, idtab->table);
108         spin_unlock(&idtab->lock);
109 }
110
111 /**
112  * rio_destid_first - return first destID in use
113  * @net: RIO network
114  */
115 static u16 rio_destid_first(struct rio_net *net)
116 {
117         int destid;
118         struct rio_id_table *idtab = (struct rio_id_table *)net->enum_data;
119
120         spin_lock(&idtab->lock);
121         destid = find_first_bit(idtab->table, idtab->max);
122         if (destid >= idtab->max)
123                 destid = RIO_INVALID_DESTID;
124         else
125                 destid += idtab->start;
126         spin_unlock(&idtab->lock);
127         return (u16)destid;
128 }
129
130 /**
131  * rio_destid_next - return next destID in use
132  * @net: RIO network
133  * @from: destination ID from which search shall continue
134  */
135 static u16 rio_destid_next(struct rio_net *net, u16 from)
136 {
137         int destid;
138         struct rio_id_table *idtab = (struct rio_id_table *)net->enum_data;
139
140         spin_lock(&idtab->lock);
141         destid = find_next_bit(idtab->table, idtab->max, from);
142         if (destid >= idtab->max)
143                 destid = RIO_INVALID_DESTID;
144         else
145                 destid += idtab->start;
146         spin_unlock(&idtab->lock);
147         return (u16)destid;
148 }
149
150 /**
151  * rio_get_device_id - Get the base/extended device id for a device
152  * @port: RIO master port
153  * @destid: Destination ID of device
154  * @hopcount: Hopcount to device
155  *
156  * Reads the base/extended device id from a device. Returns the
157  * 8/16-bit device ID.
158  */
159 static u16 rio_get_device_id(struct rio_mport *port, u16 destid, u8 hopcount)
160 {
161         u32 result;
162
163         rio_mport_read_config_32(port, destid, hopcount, RIO_DID_CSR, &result);
164
165         return RIO_GET_DID(port->sys_size, result);
166 }
167
168 /**
169  * rio_set_device_id - Set the base/extended device id for a device
170  * @port: RIO master port
171  * @destid: Destination ID of device
172  * @hopcount: Hopcount to device
173  * @did: Device ID value to be written
174  *
175  * Writes the base/extended device id from a device.
176  */
177 static void rio_set_device_id(struct rio_mport *port, u16 destid, u8 hopcount, u16 did)
178 {
179         rio_mport_write_config_32(port, destid, hopcount, RIO_DID_CSR,
180                                   RIO_SET_DID(port->sys_size, did));
181 }
182
183 /**
184  * rio_clear_locks- Release all host locks and signal enumeration complete
185  * @net: RIO network to run on
186  *
187  * Marks the component tag CSR on each device with the enumeration
188  * complete flag. When complete, it then release the host locks on
189  * each device. Returns 0 on success or %-EINVAL on failure.
190  */
191 static int rio_clear_locks(struct rio_net *net)
192 {
193         struct rio_mport *port = net->hport;
194         struct rio_dev *rdev;
195         u32 result;
196         int ret = 0;
197
198         /* Release host device id locks */
199         rio_local_write_config_32(port, RIO_HOST_DID_LOCK_CSR,
200                                   port->host_deviceid);
201         rio_local_read_config_32(port, RIO_HOST_DID_LOCK_CSR, &result);
202         if ((result & 0xffff) != 0xffff) {
203                 printk(KERN_INFO
204                        "RIO: badness when releasing host lock on master port, result %8.8x\n",
205                        result);
206                 ret = -EINVAL;
207         }
208         list_for_each_entry(rdev, &net->devices, net_list) {
209                 rio_write_config_32(rdev, RIO_HOST_DID_LOCK_CSR,
210                                     port->host_deviceid);
211                 rio_read_config_32(rdev, RIO_HOST_DID_LOCK_CSR, &result);
212                 if ((result & 0xffff) != 0xffff) {
213                         printk(KERN_INFO
214                                "RIO: badness when releasing host lock on vid %4.4x did %4.4x\n",
215                                rdev->vid, rdev->did);
216                         ret = -EINVAL;
217                 }
218
219                 /* Mark device as discovered and enable master */
220                 rio_read_config_32(rdev,
221                                    rdev->phys_efptr + RIO_PORT_GEN_CTL_CSR,
222                                    &result);
223                 result |= RIO_PORT_GEN_DISCOVERED | RIO_PORT_GEN_MASTER;
224                 rio_write_config_32(rdev,
225                                     rdev->phys_efptr + RIO_PORT_GEN_CTL_CSR,
226                                     result);
227         }
228
229         return ret;
230 }
231
232 /**
233  * rio_enum_host- Set host lock and initialize host destination ID
234  * @port: Master port to issue transaction
235  *
236  * Sets the local host master port lock and destination ID register
237  * with the host device ID value. The host device ID value is provided
238  * by the platform. Returns %0 on success or %-1 on failure.
239  */
240 static int rio_enum_host(struct rio_mport *port)
241 {
242         u32 result;
243
244         /* Set master port host device id lock */
245         rio_local_write_config_32(port, RIO_HOST_DID_LOCK_CSR,
246                                   port->host_deviceid);
247
248         rio_local_read_config_32(port, RIO_HOST_DID_LOCK_CSR, &result);
249         if ((result & 0xffff) != port->host_deviceid)
250                 return -1;
251
252         /* Set master port destid and init destid ctr */
253         rio_local_set_device_id(port, port->host_deviceid);
254         return 0;
255 }
256
257 /**
258  * rio_device_has_destid- Test if a device contains a destination ID register
259  * @port: Master port to issue transaction
260  * @src_ops: RIO device source operations
261  * @dst_ops: RIO device destination operations
262  *
263  * Checks the provided @src_ops and @dst_ops for the necessary transaction
264  * capabilities that indicate whether or not a device will implement a
265  * destination ID register. Returns 1 if true or 0 if false.
266  */
267 static int rio_device_has_destid(struct rio_mport *port, int src_ops,
268                                  int dst_ops)
269 {
270         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;
271
272         return !!((src_ops | dst_ops) & mask);
273 }
274
275 /**
276  * rio_release_dev- Frees a RIO device struct
277  * @dev: LDM device associated with a RIO device struct
278  *
279  * Gets the RIO device struct associated a RIO device struct.
280  * The RIO device struct is freed.
281  */
282 static void rio_release_dev(struct device *dev)
283 {
284         struct rio_dev *rdev;
285
286         rdev = to_rio_dev(dev);
287         kfree(rdev);
288 }
289
290 /**
291  * rio_is_switch- Tests if a RIO device has switch capabilities
292  * @rdev: RIO device
293  *
294  * Gets the RIO device Processing Element Features register
295  * contents and tests for switch capabilities. Returns 1 if
296  * the device is a switch or 0 if it is not a switch.
297  * The RIO device struct is freed.
298  */
299 static int rio_is_switch(struct rio_dev *rdev)
300 {
301         if (rdev->pef & RIO_PEF_SWITCH)
302                 return 1;
303         return 0;
304 }
305
306 /**
307  * rio_setup_device- Allocates and sets up a RIO device
308  * @net: RIO network
309  * @port: Master port to send transactions
310  * @destid: Current destination ID
311  * @hopcount: Current hopcount
312  * @do_enum: Enumeration/Discovery mode flag
313  *
314  * Allocates a RIO device and configures fields based on configuration
315  * space contents. If device has a destination ID register, a destination
316  * ID is either assigned in enumeration mode or read from configuration
317  * space in discovery mode.  If the device has switch capabilities, then
318  * a switch is allocated and configured appropriately. Returns a pointer
319  * to a RIO device on success or NULL on failure.
320  *
321  */
322 static struct rio_dev *rio_setup_device(struct rio_net *net,
323                                         struct rio_mport *port, u16 destid,
324                                         u8 hopcount, int do_enum)
325 {
326         int ret = 0;
327         struct rio_dev *rdev;
328         struct rio_switch *rswitch = NULL;
329         int result, rdid;
330         size_t size;
331         u32 swpinfo = 0;
332
333         size = sizeof(struct rio_dev);
334         if (rio_mport_read_config_32(port, destid, hopcount,
335                                      RIO_PEF_CAR, &result))
336                 return NULL;
337
338         if (result & (RIO_PEF_SWITCH | RIO_PEF_MULTIPORT)) {
339                 rio_mport_read_config_32(port, destid, hopcount,
340                                          RIO_SWP_INFO_CAR, &swpinfo);
341                 if (result & RIO_PEF_SWITCH) {
342                         size += (RIO_GET_TOTAL_PORTS(swpinfo) *
343                                 sizeof(rswitch->nextdev[0])) + sizeof(*rswitch);
344                 }
345         }
346
347         rdev = kzalloc(size, GFP_KERNEL);
348         if (!rdev)
349                 return NULL;
350
351         rdev->net = net;
352         rdev->pef = result;
353         rdev->swpinfo = swpinfo;
354         rio_mport_read_config_32(port, destid, hopcount, RIO_DEV_ID_CAR,
355                                  &result);
356         rdev->did = result >> 16;
357         rdev->vid = result & 0xffff;
358         rio_mport_read_config_32(port, destid, hopcount, RIO_DEV_INFO_CAR,
359                                  &rdev->device_rev);
360         rio_mport_read_config_32(port, destid, hopcount, RIO_ASM_ID_CAR,
361                                  &result);
362         rdev->asm_did = result >> 16;
363         rdev->asm_vid = result & 0xffff;
364         rio_mport_read_config_32(port, destid, hopcount, RIO_ASM_INFO_CAR,
365                                  &result);
366         rdev->asm_rev = result >> 16;
367         if (rdev->pef & RIO_PEF_EXT_FEATURES) {
368                 rdev->efptr = result & 0xffff;
369                 rdev->phys_efptr = rio_mport_get_physefb(port, 0, destid,
370                                                 hopcount, &rdev->phys_rmap);
371                 pr_debug("RIO: %s Register Map %d device\n",
372                          __func__, rdev->phys_rmap);
373
374                 rdev->em_efptr = rio_mport_get_feature(port, 0, destid,
375                                                 hopcount, RIO_EFB_ERR_MGMNT);
376                 if (!rdev->em_efptr)
377                         rdev->em_efptr = rio_mport_get_feature(port, 0, destid,
378                                                 hopcount, RIO_EFB_ERR_MGMNT_HS);
379         }
380
381         rio_mport_read_config_32(port, destid, hopcount, RIO_SRC_OPS_CAR,
382                                  &rdev->src_ops);
383         rio_mport_read_config_32(port, destid, hopcount, RIO_DST_OPS_CAR,
384                                  &rdev->dst_ops);
385
386         if (do_enum) {
387                 /* Assign component tag to device */
388                 if (next_comptag >= 0x10000) {
389                         pr_err("RIO: Component Tag Counter Overflow\n");
390                         goto cleanup;
391                 }
392                 rio_mport_write_config_32(port, destid, hopcount,
393                                           RIO_COMPONENT_TAG_CSR, next_comptag);
394                 rdev->comp_tag = next_comptag++;
395                 rdev->do_enum = true;
396         }  else {
397                 rio_mport_read_config_32(port, destid, hopcount,
398                                          RIO_COMPONENT_TAG_CSR,
399                                          &rdev->comp_tag);
400         }
401
402         if (rio_device_has_destid(port, rdev->src_ops, rdev->dst_ops)) {
403                 if (do_enum) {
404                         rio_set_device_id(port, destid, hopcount, next_destid);
405                         rdev->destid = next_destid;
406                         next_destid = rio_destid_alloc(net);
407                 } else
408                         rdev->destid = rio_get_device_id(port, destid, hopcount);
409
410                 rdev->hopcount = 0xff;
411         } else {
412                 /* Switch device has an associated destID which
413                  * will be adjusted later
414                  */
415                 rdev->destid = destid;
416                 rdev->hopcount = hopcount;
417         }
418
419         /* If a PE has both switch and other functions, show it as a switch */
420         if (rio_is_switch(rdev)) {
421                 rswitch = rdev->rswitch;
422                 rswitch->port_ok = 0;
423                 spin_lock_init(&rswitch->lock);
424                 rswitch->route_table =
425                         kzalloc(RIO_MAX_ROUTE_ENTRIES(port->sys_size),
426                                 GFP_KERNEL);
427                 if (!rswitch->route_table)
428                         goto cleanup;
429                 /* Initialize switch route table */
430                 for (rdid = 0; rdid < RIO_MAX_ROUTE_ENTRIES(port->sys_size);
431                                 rdid++)
432                         rswitch->route_table[rdid] = RIO_INVALID_ROUTE;
433                 dev_set_name(&rdev->dev, "%02x:s:%04x", rdev->net->id,
434                              rdev->comp_tag & RIO_CTAG_UDEVID);
435
436                 if (do_enum)
437                         rio_route_clr_table(rdev, RIO_GLOBAL_TABLE, 0);
438         } else {
439                 if (do_enum)
440                         /*Enable Input Output Port (transmitter receiver)*/
441                         rio_enable_rx_tx_port(port, 0, destid, hopcount, 0);
442
443                 dev_set_name(&rdev->dev, "%02x:e:%04x", rdev->net->id,
444                              rdev->comp_tag & RIO_CTAG_UDEVID);
445         }
446
447         rdev->dev.parent = &net->dev;
448         rio_attach_device(rdev);
449         rdev->dev.release = rio_release_dev;
450         rdev->dma_mask = DMA_BIT_MASK(32);
451         rdev->dev.dma_mask = &rdev->dma_mask;
452         rdev->dev.coherent_dma_mask = DMA_BIT_MASK(32);
453
454         if (rdev->dst_ops & RIO_DST_OPS_DOORBELL)
455                 rio_init_dbell_res(&rdev->riores[RIO_DOORBELL_RESOURCE],
456                                    0, 0xffff);
457
458         ret = rio_add_device(rdev);
459         if (ret) {
460                 if (rswitch)
461                         kfree(rswitch->route_table);
462                 put_device(&rdev->dev);
463                 return NULL;
464         }
465
466         rio_dev_get(rdev);
467
468         return rdev;
469
470 cleanup:
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  */
488 static int
489 rio_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  */
507 static 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  */
528 static 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  */
710 static 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  */
731 static int
732 rio_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  */
803 static 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
814 static 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
820 static 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  */
839 static 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  */
890 static 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  */
930 static 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  */
948 static 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  */
1026 static 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  */
1063 static 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;
1090 enum_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;
1117 bail:
1118         return -EBUSY;
1119 }
1120
1121 static struct rio_scan rio_scan_ops = {
1122         .owner = THIS_MODULE,
1123         .enumerate = rio_enum_mport,
1124         .discover = rio_disc_mport,
1125 };
1126
1127 static bool scan;
1128 module_param(scan, bool, 0);
1129 MODULE_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
1146 static 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
1155 late_initcall(rio_basic_attach);
1156
1157 MODULE_DESCRIPTION("Basic RapidIO enumeration/discovery");
1158 MODULE_LICENSE("GPL");