GNU Linux-libre 4.9.337-gnu1
[releases.git] / drivers / rapidio / rio-scan.c
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
40 static void rio_init_em(struct rio_dev *rdev);
41
42 struct 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
49 static int next_destid = 0;
50 static 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  */
60 static 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 specivied destID
80  * @net: RIO network
81  * @destid: destID to reserve
82  *
83  * Tries to reserve the specified destID.
84  * Returns 0 if successful.
85  */
86 static 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  */
105 static 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  */
119 static 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  */
139 static 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  */
163 static 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  */
181 static 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  */
195 static 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  */
244 static 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  */
271 static 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  */
286 static 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  */
303 static 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  */
326 static 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 = kzalloc(sizeof(u8)*
429                                         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                 if (rswitch)
465                         kfree(rswitch->route_table);
466                 put_device(&rdev->dev);
467                 return NULL;
468         }
469
470         rio_dev_get(rdev);
471
472         return rdev;
473
474 cleanup:
475         if (rswitch)
476                 kfree(rswitch->route_table);
477
478         kfree(rdev);
479         return NULL;
480 }
481
482 /**
483  * rio_sport_is_active- Tests if a switch port has an active connection.
484  * @rdev: RapidIO device object
485  * @sp: Switch port number
486  *
487  * Reads the port error status CSR for a particular switch port to
488  * determine if the port has an active link.  Returns
489  * %RIO_PORT_N_ERR_STS_PORT_OK if the port is active or %0 if it is
490  * inactive.
491  */
492 static int
493 rio_sport_is_active(struct rio_dev *rdev, int sp)
494 {
495         u32 result = 0;
496
497         rio_read_config_32(rdev, RIO_DEV_PORT_N_ERR_STS_CSR(rdev, sp),
498                            &result);
499
500         return result & RIO_PORT_N_ERR_STS_PORT_OK;
501 }
502
503 /**
504  * rio_get_host_deviceid_lock- Reads the Host Device ID Lock CSR on a device
505  * @port: Master port to send transaction
506  * @hopcount: Number of hops to the device
507  *
508  * Used during enumeration to read the Host Device ID Lock CSR on a
509  * RIO device. Returns the value of the lock register.
510  */
511 static u16 rio_get_host_deviceid_lock(struct rio_mport *port, u8 hopcount)
512 {
513         u32 result;
514
515         rio_mport_read_config_32(port, RIO_ANY_DESTID(port->sys_size), hopcount,
516                                  RIO_HOST_DID_LOCK_CSR, &result);
517
518         return (u16) (result & 0xffff);
519 }
520
521 /**
522  * rio_enum_peer- Recursively enumerate a RIO network through a master port
523  * @net: RIO network being enumerated
524  * @port: Master port to send transactions
525  * @hopcount: Number of hops into the network
526  * @prev: Previous RIO device connected to the enumerated one
527  * @prev_port: Port on previous RIO device
528  *
529  * Recursively enumerates a RIO network.  Transactions are sent via the
530  * master port passed in @port.
531  */
532 static int rio_enum_peer(struct rio_net *net, struct rio_mport *port,
533                          u8 hopcount, struct rio_dev *prev, int prev_port)
534 {
535         struct rio_dev *rdev;
536         u32 regval;
537         int tmp;
538
539         if (rio_mport_chk_dev_access(port,
540                         RIO_ANY_DESTID(port->sys_size), hopcount)) {
541                 pr_debug("RIO: device access check failed\n");
542                 return -1;
543         }
544
545         if (rio_get_host_deviceid_lock(port, hopcount) == port->host_deviceid) {
546                 pr_debug("RIO: PE already discovered by this host\n");
547                 /*
548                  * Already discovered by this host. Add it as another
549                  * link to the existing device.
550                  */
551                 rio_mport_read_config_32(port, RIO_ANY_DESTID(port->sys_size),
552                                 hopcount, RIO_COMPONENT_TAG_CSR, &regval);
553
554                 if (regval) {
555                         rdev = rio_get_comptag((regval & 0xffff), NULL);
556
557                         if (rdev && prev && rio_is_switch(prev)) {
558                                 pr_debug("RIO: redundant path to %s\n",
559                                          rio_name(rdev));
560                                 prev->rswitch->nextdev[prev_port] = rdev;
561                         }
562                 }
563
564                 return 0;
565         }
566
567         /* Attempt to acquire device lock */
568         rio_mport_write_config_32(port, RIO_ANY_DESTID(port->sys_size),
569                                   hopcount,
570                                   RIO_HOST_DID_LOCK_CSR, port->host_deviceid);
571         while ((tmp = rio_get_host_deviceid_lock(port, hopcount))
572                < port->host_deviceid) {
573                 /* Delay a bit */
574                 mdelay(1);
575                 /* Attempt to acquire device lock again */
576                 rio_mport_write_config_32(port, RIO_ANY_DESTID(port->sys_size),
577                                           hopcount,
578                                           RIO_HOST_DID_LOCK_CSR,
579                                           port->host_deviceid);
580         }
581
582         if (rio_get_host_deviceid_lock(port, hopcount) > port->host_deviceid) {
583                 pr_debug(
584                     "RIO: PE locked by a higher priority host...retreating\n");
585                 return -1;
586         }
587
588         /* Setup new RIO device */
589         rdev = rio_setup_device(net, port, RIO_ANY_DESTID(port->sys_size),
590                                         hopcount, 1);
591         if (rdev) {
592                 rdev->prev = prev;
593                 if (prev && rio_is_switch(prev))
594                         prev->rswitch->nextdev[prev_port] = rdev;
595         } else
596                 return -1;
597
598         if (rio_is_switch(rdev)) {
599                 int sw_destid;
600                 int cur_destid;
601                 int sw_inport;
602                 u16 destid;
603                 int port_num;
604
605                 sw_inport = RIO_GET_PORT_NUM(rdev->swpinfo);
606                 rio_route_add_entry(rdev, RIO_GLOBAL_TABLE,
607                                     port->host_deviceid, sw_inport, 0);
608                 rdev->rswitch->route_table[port->host_deviceid] = sw_inport;
609
610                 destid = rio_destid_first(net);
611                 while (destid != RIO_INVALID_DESTID && destid < next_destid) {
612                         if (destid != port->host_deviceid) {
613                                 rio_route_add_entry(rdev, RIO_GLOBAL_TABLE,
614                                                     destid, sw_inport, 0);
615                                 rdev->rswitch->route_table[destid] = sw_inport;
616                         }
617                         destid = rio_destid_next(net, destid + 1);
618                 }
619                 pr_debug(
620                     "RIO: found %s (vid %4.4x did %4.4x) with %d ports\n",
621                     rio_name(rdev), rdev->vid, rdev->did,
622                     RIO_GET_TOTAL_PORTS(rdev->swpinfo));
623                 sw_destid = next_destid;
624                 for (port_num = 0;
625                      port_num < RIO_GET_TOTAL_PORTS(rdev->swpinfo);
626                      port_num++) {
627                         if (sw_inport == port_num) {
628                                 rio_enable_rx_tx_port(port, 0,
629                                               RIO_ANY_DESTID(port->sys_size),
630                                               hopcount, port_num);
631                                 rdev->rswitch->port_ok |= (1 << port_num);
632                                 continue;
633                         }
634
635                         cur_destid = next_destid;
636
637                         if (rio_sport_is_active(rdev, port_num)) {
638                                 pr_debug(
639                                     "RIO: scanning device on port %d\n",
640                                     port_num);
641                                 rio_enable_rx_tx_port(port, 0,
642                                               RIO_ANY_DESTID(port->sys_size),
643                                               hopcount, port_num);
644                                 rdev->rswitch->port_ok |= (1 << port_num);
645                                 rio_route_add_entry(rdev, RIO_GLOBAL_TABLE,
646                                                 RIO_ANY_DESTID(port->sys_size),
647                                                 port_num, 0);
648
649                                 if (rio_enum_peer(net, port, hopcount + 1,
650                                                   rdev, port_num) < 0)
651                                         return -1;
652
653                                 /* Update routing tables */
654                                 destid = rio_destid_next(net, cur_destid + 1);
655                                 if (destid != RIO_INVALID_DESTID) {
656                                         for (destid = cur_destid;
657                                              destid < next_destid;) {
658                                                 if (destid != port->host_deviceid) {
659                                                         rio_route_add_entry(rdev,
660                                                                     RIO_GLOBAL_TABLE,
661                                                                     destid,
662                                                                     port_num,
663                                                                     0);
664                                                         rdev->rswitch->
665                                                                 route_table[destid] =
666                                                                 port_num;
667                                                 }
668                                                 destid = rio_destid_next(net,
669                                                                 destid + 1);
670                                         }
671                                 }
672                         } else {
673                                 /* If switch supports Error Management,
674                                  * set PORT_LOCKOUT bit for unused port
675                                  */
676                                 if (rdev->em_efptr)
677                                         rio_set_port_lockout(rdev, port_num, 1);
678
679                                 rdev->rswitch->port_ok &= ~(1 << port_num);
680                         }
681                 }
682
683                 /* Direct Port-write messages to the enumeratiing host */
684                 if ((rdev->src_ops & RIO_SRC_OPS_PORT_WRITE) &&
685                     (rdev->em_efptr)) {
686                         rio_write_config_32(rdev,
687                                         rdev->em_efptr + RIO_EM_PW_TGT_DEVID,
688                                         (port->host_deviceid << 16) |
689                                         (port->sys_size << 15));
690                 }
691
692                 rio_init_em(rdev);
693
694                 /* Check for empty switch */
695                 if (next_destid == sw_destid)
696                         next_destid = rio_destid_alloc(net);
697
698                 rdev->destid = sw_destid;
699         } else
700                 pr_debug("RIO: found %s (vid %4.4x did %4.4x)\n",
701                     rio_name(rdev), rdev->vid, rdev->did);
702
703         return 0;
704 }
705
706 /**
707  * rio_enum_complete- Tests if enumeration of a network is complete
708  * @port: Master port to send transaction
709  *
710  * Tests the PGCCSR discovered bit for non-zero value (enumeration
711  * complete flag). Return %1 if enumeration is complete or %0 if
712  * enumeration is incomplete.
713  */
714 static int rio_enum_complete(struct rio_mport *port)
715 {
716         u32 regval;
717
718         rio_local_read_config_32(port, port->phys_efptr + RIO_PORT_GEN_CTL_CSR,
719                                  &regval);
720         return (regval & RIO_PORT_GEN_DISCOVERED) ? 1 : 0;
721 }
722
723 /**
724  * rio_disc_peer- Recursively discovers a RIO network through a master port
725  * @net: RIO network being discovered
726  * @port: Master port to send transactions
727  * @destid: Current destination ID in network
728  * @hopcount: Number of hops into the network
729  * @prev: previous rio_dev
730  * @prev_port: previous port number
731  *
732  * Recursively discovers a RIO network.  Transactions are sent via the
733  * master port passed in @port.
734  */
735 static int
736 rio_disc_peer(struct rio_net *net, struct rio_mport *port, u16 destid,
737               u8 hopcount, struct rio_dev *prev, int prev_port)
738 {
739         u8 port_num, route_port;
740         struct rio_dev *rdev;
741         u16 ndestid;
742
743         /* Setup new RIO device */
744         if ((rdev = rio_setup_device(net, port, destid, hopcount, 0))) {
745                 rdev->prev = prev;
746                 if (prev && rio_is_switch(prev))
747                         prev->rswitch->nextdev[prev_port] = rdev;
748         } else
749                 return -1;
750
751         if (rio_is_switch(rdev)) {
752                 /* Associated destid is how we accessed this switch */
753                 rdev->destid = destid;
754
755                 pr_debug(
756                     "RIO: found %s (vid %4.4x did %4.4x) with %d ports\n",
757                     rio_name(rdev), rdev->vid, rdev->did,
758                     RIO_GET_TOTAL_PORTS(rdev->swpinfo));
759                 for (port_num = 0;
760                      port_num < RIO_GET_TOTAL_PORTS(rdev->swpinfo);
761                      port_num++) {
762                         if (RIO_GET_PORT_NUM(rdev->swpinfo) == port_num)
763                                 continue;
764
765                         if (rio_sport_is_active(rdev, port_num)) {
766                                 pr_debug(
767                                     "RIO: scanning device on port %d\n",
768                                     port_num);
769
770                                 rio_lock_device(port, destid, hopcount, 1000);
771
772                                 for (ndestid = 0;
773                                      ndestid < RIO_ANY_DESTID(port->sys_size);
774                                      ndestid++) {
775                                         rio_route_get_entry(rdev,
776                                                             RIO_GLOBAL_TABLE,
777                                                             ndestid,
778                                                             &route_port, 0);
779                                         if (route_port == port_num)
780                                                 break;
781                                 }
782
783                                 if (ndestid == RIO_ANY_DESTID(port->sys_size))
784                                         continue;
785                                 rio_unlock_device(port, destid, hopcount);
786                                 if (rio_disc_peer(net, port, ndestid,
787                                         hopcount + 1, rdev, port_num) < 0)
788                                         return -1;
789                         }
790                 }
791         } else
792                 pr_debug("RIO: found %s (vid %4.4x did %4.4x)\n",
793                     rio_name(rdev), rdev->vid, rdev->did);
794
795         return 0;
796 }
797
798 /**
799  * rio_mport_is_active- Tests if master port link is active
800  * @port: Master port to test
801  *
802  * Reads the port error status CSR for the master port to
803  * determine if the port has an active link.  Returns
804  * %RIO_PORT_N_ERR_STS_PORT_OK if the  master port is active
805  * or %0 if it is inactive.
806  */
807 static int rio_mport_is_active(struct rio_mport *port)
808 {
809         u32 result = 0;
810
811         rio_local_read_config_32(port,
812                 port->phys_efptr +
813                         RIO_PORT_N_ERR_STS_CSR(port->index, port->phys_rmap),
814                 &result);
815         return result & RIO_PORT_N_ERR_STS_PORT_OK;
816 }
817
818 static void rio_scan_release_net(struct rio_net *net)
819 {
820         pr_debug("RIO-SCAN: %s: net_%d\n", __func__, net->id);
821         kfree(net->enum_data);
822 }
823
824 static void rio_scan_release_dev(struct device *dev)
825 {
826         struct rio_net *net;
827
828         net = to_rio_net(dev);
829         pr_debug("RIO-SCAN: %s: net_%d\n", __func__, net->id);
830         kfree(net);
831 }
832
833 /*
834  * rio_scan_alloc_net - Allocate and configure a new RIO network
835  * @mport: Master port associated with the RIO network
836  * @do_enum: Enumeration/Discovery mode flag
837  * @start: logical minimal start id for new net
838  *
839  * Allocates a new RIO network structure and initializes enumerator-specific
840  * part of it (if required).
841  * Returns a RIO network pointer on success or %NULL on failure.
842  */
843 static struct rio_net *rio_scan_alloc_net(struct rio_mport *mport,
844                                           int do_enum, u16 start)
845 {
846         struct rio_net *net;
847
848         net = rio_alloc_net(mport);
849
850         if (net && do_enum) {
851                 struct rio_id_table *idtab;
852                 size_t size;
853
854                 size = sizeof(struct rio_id_table) +
855                                 BITS_TO_LONGS(
856                                         RIO_MAX_ROUTE_ENTRIES(mport->sys_size)
857                                         ) * sizeof(long);
858
859                 idtab = kzalloc(size, GFP_KERNEL);
860
861                 if (idtab == NULL) {
862                         pr_err("RIO: failed to allocate destID table\n");
863                         rio_free_net(net);
864                         net = NULL;
865                 } else {
866                         net->enum_data = idtab;
867                         net->release = rio_scan_release_net;
868                         idtab->start = start;
869                         idtab->max = RIO_MAX_ROUTE_ENTRIES(mport->sys_size);
870                         spin_lock_init(&idtab->lock);
871                 }
872         }
873
874         if (net) {
875                 net->id = mport->id;
876                 net->hport = mport;
877                 dev_set_name(&net->dev, "rnet_%d", net->id);
878                 net->dev.parent = &mport->dev;
879                 net->dev.release = rio_scan_release_dev;
880                 rio_add_net(net);
881         }
882
883         return net;
884 }
885
886 /**
887  * rio_update_route_tables- Updates route tables in switches
888  * @net: RIO network to run update on
889  *
890  * For each enumerated device, ensure that each switch in a system
891  * has correct routing entries. Add routes for devices that where
892  * unknown dirung the first enumeration pass through the switch.
893  */
894 static void rio_update_route_tables(struct rio_net *net)
895 {
896         struct rio_dev *rdev, *swrdev;
897         struct rio_switch *rswitch;
898         u8 sport;
899         u16 destid;
900
901         list_for_each_entry(rdev, &net->devices, net_list) {
902
903                 destid = rdev->destid;
904
905                 list_for_each_entry(rswitch, &net->switches, node) {
906
907                         if (rio_is_switch(rdev) && (rdev->rswitch == rswitch))
908                                 continue;
909
910                         if (RIO_INVALID_ROUTE == rswitch->route_table[destid]) {
911                                 swrdev = sw_to_rio_dev(rswitch);
912
913                                 /* Skip if destid ends in empty switch*/
914                                 if (swrdev->destid == destid)
915                                         continue;
916
917                                 sport = RIO_GET_PORT_NUM(swrdev->swpinfo);
918
919                                 rio_route_add_entry(swrdev, RIO_GLOBAL_TABLE,
920                                                     destid, sport, 0);
921                                 rswitch->route_table[destid] = sport;
922                         }
923                 }
924         }
925 }
926
927 /**
928  * rio_init_em - Initializes RIO Error Management (for switches)
929  * @rdev: RIO device
930  *
931  * For each enumerated switch, call device-specific error management
932  * initialization routine (if supplied by the switch driver).
933  */
934 static void rio_init_em(struct rio_dev *rdev)
935 {
936         if (rio_is_switch(rdev) && (rdev->em_efptr) &&
937             rdev->rswitch->ops && rdev->rswitch->ops->em_init) {
938                 rdev->rswitch->ops->em_init(rdev);
939         }
940 }
941
942 /**
943  * rio_enum_mport- Start enumeration through a master port
944  * @mport: Master port to send transactions
945  * @flags: Enumeration control flags
946  *
947  * Starts the enumeration process. If somebody has enumerated our
948  * master port device, then give up. If not and we have an active
949  * link, then start recursive peer enumeration. Returns %0 if
950  * enumeration succeeds or %-EBUSY if enumeration fails.
951  */
952 static int rio_enum_mport(struct rio_mport *mport, u32 flags)
953 {
954         struct rio_net *net = NULL;
955         int rc = 0;
956
957         printk(KERN_INFO "RIO: enumerate master port %d, %s\n", mport->id,
958                mport->name);
959
960         /*
961          * To avoid multiple start requests (repeat enumeration is not supported
962          * by this method) check if enumeration/discovery was performed for this
963          * mport: if mport was added into the list of mports for a net exit
964          * with error.
965          */
966         if (mport->nnode.next || mport->nnode.prev)
967                 return -EBUSY;
968
969         /* If somebody else enumerated our master port device, bail. */
970         if (rio_enum_host(mport) < 0) {
971                 printk(KERN_INFO
972                        "RIO: master port %d device has been enumerated by a remote host\n",
973                        mport->id);
974                 rc = -EBUSY;
975                 goto out;
976         }
977
978         /* If master port has an active link, allocate net and enum peers */
979         if (rio_mport_is_active(mport)) {
980                 net = rio_scan_alloc_net(mport, 1, 0);
981                 if (!net) {
982                         printk(KERN_ERR "RIO: failed to allocate new net\n");
983                         rc = -ENOMEM;
984                         goto out;
985                 }
986
987                 /* reserve mport destID in new net */
988                 rio_destid_reserve(net, mport->host_deviceid);
989
990                 /* Enable Input Output Port (transmitter reviever) */
991                 rio_enable_rx_tx_port(mport, 1, 0, 0, 0);
992
993                 /* Set component tag for host */
994                 rio_local_write_config_32(mport, RIO_COMPONENT_TAG_CSR,
995                                           next_comptag++);
996
997                 next_destid = rio_destid_alloc(net);
998
999                 if (rio_enum_peer(net, mport, 0, NULL, 0) < 0) {
1000                         /* A higher priority host won enumeration, bail. */
1001                         printk(KERN_INFO
1002                                "RIO: master port %d device has lost enumeration to a remote host\n",
1003                                mport->id);
1004                         rio_clear_locks(net);
1005                         rc = -EBUSY;
1006                         goto out;
1007                 }
1008                 /* free the last allocated destID (unused) */
1009                 rio_destid_free(net, next_destid);
1010                 rio_update_route_tables(net);
1011                 rio_clear_locks(net);
1012                 rio_pw_enable(mport, 1);
1013         } else {
1014                 printk(KERN_INFO "RIO: master port %d link inactive\n",
1015                        mport->id);
1016                 rc = -EINVAL;
1017         }
1018
1019       out:
1020         return rc;
1021 }
1022
1023 /**
1024  * rio_build_route_tables- Generate route tables from switch route entries
1025  * @net: RIO network to run route tables scan on
1026  *
1027  * For each switch device, generate a route table by copying existing
1028  * route entries from the switch.
1029  */
1030 static void rio_build_route_tables(struct rio_net *net)
1031 {
1032         struct rio_switch *rswitch;
1033         struct rio_dev *rdev;
1034         int i;
1035         u8 sport;
1036
1037         list_for_each_entry(rswitch, &net->switches, node) {
1038                 rdev = sw_to_rio_dev(rswitch);
1039
1040                 rio_lock_device(net->hport, rdev->destid,
1041                                 rdev->hopcount, 1000);
1042                 for (i = 0;
1043                      i < RIO_MAX_ROUTE_ENTRIES(net->hport->sys_size);
1044                      i++) {
1045                         if (rio_route_get_entry(rdev, RIO_GLOBAL_TABLE,
1046                                                 i, &sport, 0) < 0)
1047                                 continue;
1048                         rswitch->route_table[i] = sport;
1049                 }
1050
1051                 rio_unlock_device(net->hport, rdev->destid, rdev->hopcount);
1052         }
1053 }
1054
1055 /**
1056  * rio_disc_mport- Start discovery through a master port
1057  * @mport: Master port to send transactions
1058  * @flags: discovery control flags
1059  *
1060  * Starts the discovery process. If we have an active link,
1061  * then wait for the signal that enumeration is complete (if wait
1062  * is allowed).
1063  * When enumeration completion is signaled, start recursive
1064  * peer discovery. Returns %0 if discovery succeeds or %-EBUSY
1065  * on failure.
1066  */
1067 static int rio_disc_mport(struct rio_mport *mport, u32 flags)
1068 {
1069         struct rio_net *net = NULL;
1070         unsigned long to_end;
1071
1072         printk(KERN_INFO "RIO: discover master port %d, %s\n", mport->id,
1073                mport->name);
1074
1075         /* If master port has an active link, allocate net and discover peers */
1076         if (rio_mport_is_active(mport)) {
1077                 if (rio_enum_complete(mport))
1078                         goto enum_done;
1079                 else if (flags & RIO_SCAN_ENUM_NO_WAIT)
1080                         return -EAGAIN;
1081
1082                 pr_debug("RIO: wait for enumeration to complete...\n");
1083
1084                 to_end = jiffies + CONFIG_RAPIDIO_DISC_TIMEOUT * HZ;
1085                 while (time_before(jiffies, to_end)) {
1086                         if (rio_enum_complete(mport))
1087                                 goto enum_done;
1088                         msleep(10);
1089                 }
1090
1091                 pr_debug("RIO: discovery timeout on mport %d %s\n",
1092                          mport->id, mport->name);
1093                 goto bail;
1094 enum_done:
1095                 pr_debug("RIO: ... enumeration done\n");
1096
1097                 net = rio_scan_alloc_net(mport, 0, 0);
1098                 if (!net) {
1099                         printk(KERN_ERR "RIO: Failed to allocate new net\n");
1100                         goto bail;
1101                 }
1102
1103                 /* Read DestID assigned by enumerator */
1104                 rio_local_read_config_32(mport, RIO_DID_CSR,
1105                                          &mport->host_deviceid);
1106                 mport->host_deviceid = RIO_GET_DID(mport->sys_size,
1107                                                    mport->host_deviceid);
1108
1109                 if (rio_disc_peer(net, mport, RIO_ANY_DESTID(mport->sys_size),
1110                                         0, NULL, 0) < 0) {
1111                         printk(KERN_INFO
1112                                "RIO: master port %d device has failed discovery\n",
1113                                mport->id);
1114                         goto bail;
1115                 }
1116
1117                 rio_build_route_tables(net);
1118         }
1119
1120         return 0;
1121 bail:
1122         return -EBUSY;
1123 }
1124
1125 static struct rio_scan rio_scan_ops = {
1126         .owner = THIS_MODULE,
1127         .enumerate = rio_enum_mport,
1128         .discover = rio_disc_mport,
1129 };
1130
1131 static bool scan;
1132 module_param(scan, bool, 0);
1133 MODULE_PARM_DESC(scan, "Start RapidIO network enumeration/discovery "
1134                         "(default = 0)");
1135
1136 /**
1137  * rio_basic_attach:
1138  *
1139  * When this enumeration/discovery method is loaded as a module this function
1140  * registers its specific enumeration and discover routines for all available
1141  * RapidIO mport devices. The "scan" command line parameter controls ability of
1142  * the module to start RapidIO enumeration/discovery automatically.
1143  *
1144  * Returns 0 for success or -EIO if unable to register itself.
1145  *
1146  * This enumeration/discovery method cannot be unloaded and therefore does not
1147  * provide a matching cleanup_module routine.
1148  */
1149
1150 static int __init rio_basic_attach(void)
1151 {
1152         if (rio_register_scan(RIO_MPORT_ANY, &rio_scan_ops))
1153                 return -EIO;
1154         if (scan)
1155                 rio_init_mports();
1156         return 0;
1157 }
1158
1159 late_initcall(rio_basic_attach);
1160
1161 MODULE_DESCRIPTION("Basic RapidIO enumeration/discovery");
1162 MODULE_LICENSE("GPL");