Merge branch 'for-linus' of master.kernel.org:/pub/scm/linux/kernel/git/roland/infiniband
[linux-2.6] / arch / sparc64 / kernel / vio.c
1 /* vio.c: Virtual I/O channel devices probing infrastructure.
2  *
3  *    Copyright (c) 2003-2005 IBM Corp.
4  *     Dave Engebretsen engebret@us.ibm.com
5  *     Santiago Leon santil@us.ibm.com
6  *     Hollis Blanchard <hollisb@us.ibm.com>
7  *     Stephen Rothwell
8  *
9  * Adapted to sparc64 by David S. Miller davem@davemloft.net
10  */
11
12 #include <linux/kernel.h>
13 #include <linux/irq.h>
14 #include <linux/init.h>
15
16 #include <asm/mdesc.h>
17 #include <asm/vio.h>
18
19 static inline int find_in_proplist(const char *list, const char *match,
20                                    int len)
21 {
22         while (len > 0) {
23                 int l;
24
25                 if (!strcmp(list, match))
26                         return 1;
27                 l = strlen(list) + 1;
28                 list += l;
29                 len -= l;
30         }
31         return 0;
32 }
33
34 static const struct vio_device_id *vio_match_device(
35         const struct vio_device_id *matches,
36         const struct vio_dev *dev)
37 {
38         const char *type, *compat;
39         int len;
40
41         type = dev->type;
42         compat = dev->compat;
43         len = dev->compat_len;
44
45         while (matches->type[0] || matches->compat[0]) {
46                 int match = 1;
47                 if (matches->type[0])
48                         match &= !strcmp(matches->type, type);
49
50                 if (matches->compat[0]) {
51                         match &= len &&
52                                 find_in_proplist(compat, matches->compat, len);
53                 }
54                 if (match)
55                         return matches;
56                 matches++;
57         }
58         return NULL;
59 }
60
61 static int vio_bus_match(struct device *dev, struct device_driver *drv)
62 {
63         struct vio_dev *vio_dev = to_vio_dev(dev);
64         struct vio_driver *vio_drv = to_vio_driver(drv);
65         const struct vio_device_id *matches = vio_drv->id_table;
66
67         if (!matches)
68                 return 0;
69
70         return vio_match_device(matches, vio_dev) != NULL;
71 }
72
73 static int vio_device_probe(struct device *dev)
74 {
75         struct vio_dev *vdev = to_vio_dev(dev);
76         struct vio_driver *drv = to_vio_driver(dev->driver);
77         const struct vio_device_id *id;
78         int error = -ENODEV;
79
80         if (drv->probe) {
81                 id = vio_match_device(drv->id_table, vdev);
82                 if (id)
83                         error = drv->probe(vdev, id);
84         }
85
86         return error;
87 }
88
89 static int vio_device_remove(struct device *dev)
90 {
91         struct vio_dev *vdev = to_vio_dev(dev);
92         struct vio_driver *drv = to_vio_driver(dev->driver);
93
94         if (drv->remove)
95                 return drv->remove(vdev);
96
97         return 1;
98 }
99
100 static ssize_t devspec_show(struct device *dev,
101                 struct device_attribute *attr, char *buf)
102 {
103         struct vio_dev *vdev = to_vio_dev(dev);
104         const char *str = "none";
105
106         if (!strcmp(vdev->type, "network"))
107                 str = "vnet";
108         else if (!strcmp(vdev->type, "block"))
109                 str = "vdisk";
110
111         return sprintf(buf, "%s\n", str);
112 }
113
114 static ssize_t type_show(struct device *dev,
115                 struct device_attribute *attr, char *buf)
116 {
117         struct vio_dev *vdev = to_vio_dev(dev);
118         return sprintf(buf, "%s\n", vdev->type);
119 }
120
121 static struct device_attribute vio_dev_attrs[] = {
122         __ATTR_RO(devspec),
123         __ATTR_RO(type),
124         __ATTR_NULL
125 };
126
127 static struct bus_type vio_bus_type = {
128         .name           = "vio",
129         .dev_attrs      = vio_dev_attrs,
130         .match          = vio_bus_match,
131         .probe          = vio_device_probe,
132         .remove         = vio_device_remove,
133 };
134
135 int vio_register_driver(struct vio_driver *viodrv)
136 {
137         viodrv->driver.bus = &vio_bus_type;
138
139         return driver_register(&viodrv->driver);
140 }
141 EXPORT_SYMBOL(vio_register_driver);
142
143 void vio_unregister_driver(struct vio_driver *viodrv)
144 {
145         driver_unregister(&viodrv->driver);
146 }
147 EXPORT_SYMBOL(vio_unregister_driver);
148
149 static void __devinit vio_dev_release(struct device *dev)
150 {
151         kfree(to_vio_dev(dev));
152 }
153
154 static ssize_t
155 show_pciobppath_attr(struct device *dev, struct device_attribute *attr,
156                      char *buf)
157 {
158         struct vio_dev *vdev;
159         struct device_node *dp;
160
161         vdev = to_vio_dev(dev);
162         dp = vdev->dp;
163
164         return snprintf (buf, PAGE_SIZE, "%s\n", dp->full_name);
165 }
166
167 static DEVICE_ATTR(obppath, S_IRUSR | S_IRGRP | S_IROTH,
168                    show_pciobppath_attr, NULL);
169
170 struct device_node *cdev_node;
171
172 static struct vio_dev *root_vdev;
173 static u64 cdev_cfg_handle;
174
175 static void vio_fill_channel_info(struct mdesc_handle *hp, u64 mp,
176                                   struct vio_dev *vdev)
177 {
178         u64 a;
179
180         mdesc_for_each_arc(a, hp, mp, MDESC_ARC_TYPE_FWD) {
181                 const u64 *chan_id;
182                 const u64 *irq;
183                 u64 target;
184
185                 target = mdesc_arc_target(hp, a);
186
187                 irq = mdesc_get_property(hp, target, "tx-ino", NULL);
188                 if (irq)
189                         vdev->tx_irq = sun4v_build_virq(cdev_cfg_handle, *irq);
190
191                 irq = mdesc_get_property(hp, target, "rx-ino", NULL);
192                 if (irq)
193                         vdev->rx_irq = sun4v_build_virq(cdev_cfg_handle, *irq);
194
195                 chan_id = mdesc_get_property(hp, target, "id", NULL);
196                 if (chan_id)
197                         vdev->channel_id = *chan_id;
198         }
199 }
200
201 static struct vio_dev *vio_create_one(struct mdesc_handle *hp, u64 mp,
202                                       struct device *parent)
203 {
204         const char *type, *compat, *bus_id_name;
205         struct device_node *dp;
206         struct vio_dev *vdev;
207         int err, tlen, clen;
208         const u64 *id;
209
210         type = mdesc_get_property(hp, mp, "device-type", &tlen);
211         if (!type) {
212                 type = mdesc_get_property(hp, mp, "name", &tlen);
213                 if (!type) {
214                         type = mdesc_node_name(hp, mp);
215                         tlen = strlen(type) + 1;
216                 }
217         }
218         if (tlen > VIO_MAX_TYPE_LEN) {
219                 printk(KERN_ERR "VIO: Type string [%s] is too long.\n",
220                        type);
221                 return NULL;
222         }
223
224         bus_id_name = type;
225         if (!strcmp(type, "domain-services-port"))
226                 bus_id_name = "ds";
227
228         if (strlen(bus_id_name) >= KOBJ_NAME_LEN - 4) {
229                 printk(KERN_ERR "VIO: bus_id_name [%s] is too long.\n",
230                        bus_id_name);
231                 return NULL;
232         }
233
234         compat = mdesc_get_property(hp, mp, "device-type", &clen);
235         if (!compat) {
236                 clen = 0;
237         } else if (clen > VIO_MAX_COMPAT_LEN) {
238                 printk(KERN_ERR "VIO: Compat len %d for [%s] is too long.\n",
239                        clen, type);
240                 return NULL;
241         }
242
243         vdev = kzalloc(sizeof(*vdev), GFP_KERNEL);
244         if (!vdev) {
245                 printk(KERN_ERR "VIO: Could not allocate vio_dev\n");
246                 return NULL;
247         }
248
249         vdev->mp = mp;
250         memcpy(vdev->type, type, tlen);
251         if (compat)
252                 memcpy(vdev->compat, compat, clen);
253         else
254                 memset(vdev->compat, 0, sizeof(vdev->compat));
255         vdev->compat_len = clen;
256
257         vdev->channel_id = ~0UL;
258         vdev->tx_irq = ~0;
259         vdev->rx_irq = ~0;
260
261         vio_fill_channel_info(hp, mp, vdev);
262
263         id = mdesc_get_property(hp, mp, "id", NULL);
264         if (!id)
265                 snprintf(vdev->dev.bus_id, BUS_ID_SIZE, "%s",
266                          bus_id_name);
267         else
268                 snprintf(vdev->dev.bus_id, BUS_ID_SIZE, "%s-%lu",
269                          bus_id_name, *id);
270
271         vdev->dev.parent = parent;
272         vdev->dev.bus = &vio_bus_type;
273         vdev->dev.release = vio_dev_release;
274
275         if (parent == NULL) {
276                 dp = cdev_node;
277         } else if (to_vio_dev(parent) == root_vdev) {
278                 dp = of_get_next_child(cdev_node, NULL);
279                 while (dp) {
280                         if (!strcmp(dp->type, type))
281                                 break;
282
283                         dp = of_get_next_child(cdev_node, dp);
284                 }
285         } else {
286                 dp = to_vio_dev(parent)->dp;
287         }
288         vdev->dp = dp;
289
290         printk(KERN_ERR "VIO: Adding device %s\n", vdev->dev.bus_id);
291
292         err = device_register(&vdev->dev);
293         if (err) {
294                 printk(KERN_ERR "VIO: Could not register device %s, err=%d\n",
295                        vdev->dev.bus_id, err);
296                 kfree(vdev);
297                 return NULL;
298         }
299         if (vdev->dp)
300                 err = sysfs_create_file(&vdev->dev.kobj,
301                                         &dev_attr_obppath.attr);
302
303         return vdev;
304 }
305
306 static void vio_add(struct mdesc_handle *hp, u64 node)
307 {
308         (void) vio_create_one(hp, node, &root_vdev->dev);
309 }
310
311 static int vio_md_node_match(struct device *dev, void *arg)
312 {
313         struct vio_dev *vdev = to_vio_dev(dev);
314
315         if (vdev->mp == (u64) arg)
316                 return 1;
317
318         return 0;
319 }
320
321 static void vio_remove(struct mdesc_handle *hp, u64 node)
322 {
323         struct device *dev;
324
325         dev = device_find_child(&root_vdev->dev, (void *) node,
326                                 vio_md_node_match);
327         if (dev) {
328                 printk(KERN_INFO "VIO: Removing device %s\n", dev->bus_id);
329
330                 device_unregister(dev);
331         }
332 }
333
334 static struct mdesc_notifier_client vio_device_notifier = {
335         .add            = vio_add,
336         .remove         = vio_remove,
337         .node_name      = "virtual-device-port",
338 };
339
340 static struct mdesc_notifier_client vio_ds_notifier = {
341         .add            = vio_add,
342         .remove         = vio_remove,
343         .node_name      = "domain-services-port",
344 };
345
346 const char *channel_devices_node = "channel-devices";
347 const char *channel_devices_compat = "SUNW,sun4v-channel-devices";
348 const char *cfg_handle_prop = "cfg-handle";
349
350 static int __init vio_init(void)
351 {
352         struct mdesc_handle *hp;
353         const char *compat;
354         const u64 *cfg_handle;
355         int err, len;
356         u64 root;
357
358         err = bus_register(&vio_bus_type);
359         if (err) {
360                 printk(KERN_ERR "VIO: Could not register bus type err=%d\n",
361                        err);
362                 return err;
363         }
364
365         hp = mdesc_grab();
366         if (!hp)
367                 return 0;
368
369         root = mdesc_node_by_name(hp, MDESC_NODE_NULL, channel_devices_node);
370         if (root == MDESC_NODE_NULL) {
371                 printk(KERN_INFO "VIO: No channel-devices MDESC node.\n");
372                 mdesc_release(hp);
373                 return 0;
374         }
375
376         cdev_node = of_find_node_by_name(NULL, "channel-devices");
377         err = -ENODEV;
378         if (!cdev_node) {
379                 printk(KERN_INFO "VIO: No channel-devices OBP node.\n");
380                 goto out_release;
381         }
382
383         compat = mdesc_get_property(hp, root, "compatible", &len);
384         if (!compat) {
385                 printk(KERN_ERR "VIO: Channel devices lacks compatible "
386                        "property\n");
387                 goto out_release;
388         }
389         if (!find_in_proplist(compat, channel_devices_compat, len)) {
390                 printk(KERN_ERR "VIO: Channel devices node lacks (%s) "
391                        "compat entry.\n", channel_devices_compat);
392                 goto out_release;
393         }
394
395         cfg_handle = mdesc_get_property(hp, root, cfg_handle_prop, NULL);
396         if (!cfg_handle) {
397                 printk(KERN_ERR "VIO: Channel devices lacks %s property\n",
398                        cfg_handle_prop);
399                 goto out_release;
400         }
401
402         cdev_cfg_handle = *cfg_handle;
403
404         root_vdev = vio_create_one(hp, root, NULL);
405         err = -ENODEV;
406         if (!root_vdev) {
407                 printk(KERN_ERR "VIO: Coult not create root device.\n");
408                 goto out_release;
409         }
410
411         mdesc_register_notifier(&vio_device_notifier);
412         mdesc_register_notifier(&vio_ds_notifier);
413
414         mdesc_release(hp);
415
416         return err;
417
418 out_release:
419         mdesc_release(hp);
420         return err;
421 }
422
423 postcore_initcall(vio_init);