[SPARC64]: Abstract out mdesc accesses for better MD update handling.
[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 &= type
49                                 && !strcmp(matches->type, type);
50                 }
51                 if (matches->compat[0]) {
52                         match &= compat &&
53                                 find_in_proplist(compat, matches->compat, len);
54                 }
55                 if (match)
56                         return matches;
57                 matches++;
58         }
59         return NULL;
60 }
61
62 static int vio_bus_match(struct device *dev, struct device_driver *drv)
63 {
64         struct vio_dev *vio_dev = to_vio_dev(dev);
65         struct vio_driver *vio_drv = to_vio_driver(drv);
66         const struct vio_device_id *matches = vio_drv->id_table;
67
68         if (!matches)
69                 return 0;
70
71         return vio_match_device(matches, vio_dev) != NULL;
72 }
73
74 static int vio_device_probe(struct device *dev)
75 {
76         struct vio_dev *vdev = to_vio_dev(dev);
77         struct vio_driver *drv = to_vio_driver(dev->driver);
78         const struct vio_device_id *id;
79         int error = -ENODEV;
80
81         if (drv->probe) {
82                 id = vio_match_device(drv->id_table, vdev);
83                 if (id)
84                         error = drv->probe(vdev, id);
85         }
86
87         return error;
88 }
89
90 static int vio_device_remove(struct device *dev)
91 {
92         struct vio_dev *vdev = to_vio_dev(dev);
93         struct vio_driver *drv = to_vio_driver(dev->driver);
94
95         if (drv->remove)
96                 return drv->remove(vdev);
97
98         return 1;
99 }
100
101 static ssize_t devspec_show(struct device *dev,
102                 struct device_attribute *attr, char *buf)
103 {
104         struct vio_dev *vdev = to_vio_dev(dev);
105         const char *str = "none";
106
107         if (!strcmp(vdev->type, "network"))
108                 str = "vnet";
109         else if (!strcmp(vdev->type, "block"))
110                 str = "vdisk";
111
112         return sprintf(buf, "%s\n", str);
113 }
114
115 static ssize_t type_show(struct device *dev,
116                 struct device_attribute *attr, char *buf)
117 {
118         struct vio_dev *vdev = to_vio_dev(dev);
119         return sprintf(buf, "%s\n", vdev->type);
120 }
121
122 static struct device_attribute vio_dev_attrs[] = {
123         __ATTR_RO(devspec),
124         __ATTR_RO(type),
125         __ATTR_NULL
126 };
127
128 static struct bus_type vio_bus_type = {
129         .name           = "vio",
130         .dev_attrs      = vio_dev_attrs,
131         .match          = vio_bus_match,
132         .probe          = vio_device_probe,
133         .remove         = vio_device_remove,
134 };
135
136 int vio_register_driver(struct vio_driver *viodrv)
137 {
138         viodrv->driver.bus = &vio_bus_type;
139
140         return driver_register(&viodrv->driver);
141 }
142 EXPORT_SYMBOL(vio_register_driver);
143
144 void vio_unregister_driver(struct vio_driver *viodrv)
145 {
146         driver_unregister(&viodrv->driver);
147 }
148 EXPORT_SYMBOL(vio_unregister_driver);
149
150 static void __devinit vio_dev_release(struct device *dev)
151 {
152         kfree(to_vio_dev(dev));
153 }
154
155 static ssize_t
156 show_pciobppath_attr(struct device *dev, struct device_attribute *attr,
157                      char *buf)
158 {
159         struct vio_dev *vdev;
160         struct device_node *dp;
161
162         vdev = to_vio_dev(dev);
163         dp = vdev->dp;
164
165         return snprintf (buf, PAGE_SIZE, "%s\n", dp->full_name);
166 }
167
168 static DEVICE_ATTR(obppath, S_IRUSR | S_IRGRP | S_IROTH,
169                    show_pciobppath_attr, NULL);
170
171 struct device_node *cdev_node;
172
173 static struct vio_dev *root_vdev;
174 static u64 cdev_cfg_handle;
175
176 static void vio_fill_channel_info(struct mdesc_handle *hp, u64 mp,
177                                   struct vio_dev *vdev)
178 {
179         u64 a;
180
181         mdesc_for_each_arc(a, hp, mp, MDESC_ARC_TYPE_FWD) {
182                 const u64 *chan_id;
183                 const u64 *irq;
184                 u64 target;
185
186                 target = mdesc_arc_target(hp, a);
187
188                 irq = mdesc_get_property(hp, target, "tx-ino", NULL);
189                 if (irq)
190                         vdev->tx_irq = sun4v_build_virq(cdev_cfg_handle, *irq);
191
192                 irq = mdesc_get_property(hp, target, "rx-ino", NULL);
193                 if (irq)
194                         vdev->rx_irq = sun4v_build_virq(cdev_cfg_handle, *irq);
195
196                 chan_id = mdesc_get_property(hp, target, "id", NULL);
197                 if (chan_id)
198                         vdev->channel_id = *chan_id;
199         }
200 }
201
202 static struct vio_dev *vio_create_one(struct mdesc_handle *hp, u64 mp,
203                                       struct device *parent)
204 {
205         const char *type, *compat;
206         struct device_node *dp;
207         struct vio_dev *vdev;
208         int err, clen;
209
210         type = mdesc_get_property(hp, mp, "device-type", NULL);
211         if (!type) {
212                 type = mdesc_get_property(hp, mp, "name", NULL);
213                 if (!type)
214                         type = mdesc_node_name(hp, mp);
215         }
216         compat = mdesc_get_property(hp, mp, "device-type", &clen);
217
218         vdev = kzalloc(sizeof(*vdev), GFP_KERNEL);
219         if (!vdev) {
220                 printk(KERN_ERR "VIO: Could not allocate vio_dev\n");
221                 return NULL;
222         }
223
224         vdev->mp = mp;
225         vdev->type = type;
226         vdev->compat = compat;
227         vdev->compat_len = clen;
228
229         vdev->channel_id = ~0UL;
230         vdev->tx_irq = ~0;
231         vdev->rx_irq = ~0;
232
233         vio_fill_channel_info(hp, mp, vdev);
234
235         snprintf(vdev->dev.bus_id, BUS_ID_SIZE, "%lx", mp);
236         vdev->dev.parent = parent;
237         vdev->dev.bus = &vio_bus_type;
238         vdev->dev.release = vio_dev_release;
239
240         if (parent == NULL) {
241                 dp = cdev_node;
242         } else if (to_vio_dev(parent) == root_vdev) {
243                 dp = of_get_next_child(cdev_node, NULL);
244                 while (dp) {
245                         if (!strcmp(dp->type, type))
246                                 break;
247
248                         dp = of_get_next_child(cdev_node, dp);
249                 }
250         } else {
251                 dp = to_vio_dev(parent)->dp;
252         }
253         vdev->dp = dp;
254
255         err = device_register(&vdev->dev);
256         if (err) {
257                 printk(KERN_ERR "VIO: Could not register device %s, err=%d\n",
258                        vdev->dev.bus_id, err);
259                 kfree(vdev);
260                 return NULL;
261         }
262         if (vdev->dp)
263                 err = sysfs_create_file(&vdev->dev.kobj,
264                                         &dev_attr_obppath.attr);
265
266         return vdev;
267 }
268
269 static void walk_tree(struct mdesc_handle *hp, u64 n, struct vio_dev *parent)
270 {
271         u64 a;
272
273         mdesc_for_each_arc(a, hp, n, MDESC_ARC_TYPE_FWD) {
274                 struct vio_dev *vdev;
275                 u64 target;
276
277                 target = mdesc_arc_target(hp, a);
278                 vdev = vio_create_one(hp, target, &parent->dev);
279                 if (vdev)
280                         walk_tree(hp, target, vdev);
281         }
282 }
283
284 static void create_devices(struct mdesc_handle *hp, u64 root)
285 {
286         u64 mp;
287
288         root_vdev = vio_create_one(hp, root, NULL);
289         if (!root_vdev) {
290                 printk(KERN_ERR "VIO: Coult not create root device.\n");
291                 return;
292         }
293
294         walk_tree(hp, root, root_vdev);
295
296         /* Domain services is odd as it doesn't sit underneath the
297          * channel-devices node, so we plug it in manually.
298          */
299         mp = mdesc_node_by_name(hp, MDESC_NODE_NULL, "domain-services");
300         if (mp != MDESC_NODE_NULL) {
301                 struct vio_dev *parent = vio_create_one(hp, mp,
302                                                         &root_vdev->dev);
303
304                 if (parent)
305                         walk_tree(hp, mp, parent);
306         }
307 }
308
309 const char *channel_devices_node = "channel-devices";
310 const char *channel_devices_compat = "SUNW,sun4v-channel-devices";
311 const char *cfg_handle_prop = "cfg-handle";
312
313 static int __init vio_init(void)
314 {
315         struct mdesc_handle *hp;
316         const char *compat;
317         const u64 *cfg_handle;
318         int err, len;
319         u64 root;
320
321         hp = mdesc_grab();
322         if (!hp)
323                 return 0;
324
325         root = mdesc_node_by_name(hp, MDESC_NODE_NULL, channel_devices_node);
326         if (root == MDESC_NODE_NULL) {
327                 printk(KERN_INFO "VIO: No channel-devices MDESC node.\n");
328                 mdesc_release(hp);
329                 return 0;
330         }
331
332         cdev_node = of_find_node_by_name(NULL, "channel-devices");
333         err = -ENODEV;
334         if (!cdev_node) {
335                 printk(KERN_INFO "VIO: No channel-devices OBP node.\n");
336                 goto out_release;
337         }
338
339         compat = mdesc_get_property(hp, root, "compatible", &len);
340         if (!compat) {
341                 printk(KERN_ERR "VIO: Channel devices lacks compatible "
342                        "property\n");
343                 goto out_release;
344         }
345         if (!find_in_proplist(compat, channel_devices_compat, len)) {
346                 printk(KERN_ERR "VIO: Channel devices node lacks (%s) "
347                        "compat entry.\n", channel_devices_compat);
348                 goto out_release;
349         }
350
351         cfg_handle = mdesc_get_property(hp, root, cfg_handle_prop, NULL);
352         if (!cfg_handle) {
353                 printk(KERN_ERR "VIO: Channel devices lacks %s property\n",
354                        cfg_handle_prop);
355                 goto out_release;
356         }
357
358         cdev_cfg_handle = *cfg_handle;
359
360         err = bus_register(&vio_bus_type);
361         if (err) {
362                 printk(KERN_ERR "VIO: Could not register bus type err=%d\n",
363                        err);
364                 return err;
365         }
366
367         create_devices(hp, root);
368
369         mdesc_release(hp);
370
371         return 0;
372
373 out_release:
374         mdesc_release(hp);
375         return err;
376 }
377
378 postcore_initcall(vio_init);