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