1 /******************************************************************************
2 * Talks to Xen Store to figure out what devices we have.
3 *
4 * Copyright (C) 2005 Rusty Russell, IBM Corporation
5 * Copyright (C) 2005 Mike Wray, Hewlett-Packard
6 * Copyright (C) 2005, 2006 XenSource Ltd
7 *
8 * This program is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU General Public License version 2
10 * as published by the Free Software Foundation; or, when distributed
11 * separately from the Linux kernel or incorporated into other
12 * software packages, subject to the following license:
13 *
14 * Permission is hereby granted, free of charge, to any person obtaining a copy
15 * of this source file (the "Software"), to deal in the Software without
16 * restriction, including without limitation the rights to use, copy, modify,
17 * merge, publish, distribute, sublicense, and/or sell copies of the Software,
18 * and to permit persons to whom the Software is furnished to do so, subject to
19 * the following conditions:
20 *
21 * The above copyright notice and this permission notice shall be included in
22 * all copies or substantial portions of the Software.
23 *
24 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
25 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
26 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
27 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
28 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
29 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
30 * IN THE SOFTWARE.
31 */
32
33 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
34
35 #define DPRINTK(fmt, args...) \
36 pr_debug("xenbus_probe (%s:%d) " fmt ".\n", \
37 __func__, __LINE__, ##args)
38
39 #include <linux/kernel.h>
40 #include <linux/err.h>
41 #include <linux/string.h>
42 #include <linux/ctype.h>
43 #include <linux/fcntl.h>
44 #include <linux/mm.h>
45 #include <linux/proc_fs.h>
46 #include <linux/notifier.h>
47 #include <linux/kthread.h>
48 #include <linux/mutex.h>
49 #include <linux/io.h>
50 #include <linux/slab.h>
51 #include <linux/module.h>
52
53 #include <asm/page.h>
54 #include <asm/pgtable.h>
55 #include <asm/xen/hypervisor.h>
56
57 #include <xen/xen.h>
58 #include <xen/xenbus.h>
59 #include <xen/events.h>
60 #include <xen/xen-ops.h>
61 #include <xen/page.h>
62
63 #include <xen/hvm.h>
64
65 #include "xenbus_comms.h"
66 #include "xenbus_probe.h"
67
68
69 int xen_store_evtchn;
70 EXPORT_SYMBOL_GPL(xen_store_evtchn);
71
72 struct xenstore_domain_interface *xen_store_interface;
73 EXPORT_SYMBOL_GPL(xen_store_interface);
74
75 enum xenstore_init xen_store_domain_type;
76 EXPORT_SYMBOL_GPL(xen_store_domain_type);
77
78 static unsigned long xen_store_gfn;
79
80 static BLOCKING_NOTIFIER_HEAD(xenstore_chain);
81
82 /* If something in array of ids matches this device, return it. */
83 static const struct xenbus_device_id *
match_device(const struct xenbus_device_id * arr,struct xenbus_device * dev)84 match_device(const struct xenbus_device_id *arr, struct xenbus_device *dev)
85 {
86 for (; *arr->devicetype != '\0'; arr++) {
87 if (!strcmp(arr->devicetype, dev->devicetype))
88 return arr;
89 }
90 return NULL;
91 }
92
xenbus_match(struct device * _dev,struct device_driver * _drv)93 int xenbus_match(struct device *_dev, struct device_driver *_drv)
94 {
95 struct xenbus_driver *drv = to_xenbus_driver(_drv);
96
97 if (!drv->ids)
98 return 0;
99
100 return match_device(drv->ids, to_xenbus_device(_dev)) != NULL;
101 }
102 EXPORT_SYMBOL_GPL(xenbus_match);
103
104
free_otherend_details(struct xenbus_device * dev)105 static void free_otherend_details(struct xenbus_device *dev)
106 {
107 kfree(dev->otherend);
108 dev->otherend = NULL;
109 }
110
111
free_otherend_watch(struct xenbus_device * dev)112 static void free_otherend_watch(struct xenbus_device *dev)
113 {
114 if (dev->otherend_watch.node) {
115 unregister_xenbus_watch(&dev->otherend_watch);
116 kfree(dev->otherend_watch.node);
117 dev->otherend_watch.node = NULL;
118 }
119 }
120
121
talk_to_otherend(struct xenbus_device * dev)122 static int talk_to_otherend(struct xenbus_device *dev)
123 {
124 struct xenbus_driver *drv = to_xenbus_driver(dev->dev.driver);
125
126 free_otherend_watch(dev);
127 free_otherend_details(dev);
128
129 return drv->read_otherend_details(dev);
130 }
131
132
133
watch_otherend(struct xenbus_device * dev)134 static int watch_otherend(struct xenbus_device *dev)
135 {
136 struct xen_bus_type *bus =
137 container_of(dev->dev.bus, struct xen_bus_type, bus);
138
139 return xenbus_watch_pathfmt(dev, &dev->otherend_watch,
140 bus->otherend_will_handle,
141 bus->otherend_changed,
142 "%s/%s", dev->otherend, "state");
143 }
144
145
xenbus_read_otherend_details(struct xenbus_device * xendev,char * id_node,char * path_node)146 int xenbus_read_otherend_details(struct xenbus_device *xendev,
147 char *id_node, char *path_node)
148 {
149 int err = xenbus_gather(XBT_NIL, xendev->nodename,
150 id_node, "%i", &xendev->otherend_id,
151 path_node, NULL, &xendev->otherend,
152 NULL);
153 if (err) {
154 xenbus_dev_fatal(xendev, err,
155 "reading other end details from %s",
156 xendev->nodename);
157 return err;
158 }
159 if (strlen(xendev->otherend) == 0 ||
160 !xenbus_exists(XBT_NIL, xendev->otherend, "")) {
161 xenbus_dev_fatal(xendev, -ENOENT,
162 "unable to read other end from %s. "
163 "missing or inaccessible.",
164 xendev->nodename);
165 free_otherend_details(xendev);
166 return -ENOENT;
167 }
168
169 return 0;
170 }
171 EXPORT_SYMBOL_GPL(xenbus_read_otherend_details);
172
xenbus_otherend_changed(struct xenbus_watch * watch,const char ** vec,unsigned int len,int ignore_on_shutdown)173 void xenbus_otherend_changed(struct xenbus_watch *watch,
174 const char **vec, unsigned int len,
175 int ignore_on_shutdown)
176 {
177 struct xenbus_device *dev =
178 container_of(watch, struct xenbus_device, otherend_watch);
179 struct xenbus_driver *drv = to_xenbus_driver(dev->dev.driver);
180 enum xenbus_state state;
181
182 /* Protect us against watches firing on old details when the otherend
183 details change, say immediately after a resume. */
184 if (!dev->otherend ||
185 strncmp(dev->otherend, vec[XS_WATCH_PATH],
186 strlen(dev->otherend))) {
187 dev_dbg(&dev->dev, "Ignoring watch at %s\n",
188 vec[XS_WATCH_PATH]);
189 return;
190 }
191
192 state = xenbus_read_driver_state(dev->otherend);
193
194 dev_dbg(&dev->dev, "state is %d, (%s), %s, %s\n",
195 state, xenbus_strstate(state), dev->otherend_watch.node,
196 vec[XS_WATCH_PATH]);
197
198 /*
199 * Ignore xenbus transitions during shutdown. This prevents us doing
200 * work that can fail e.g., when the rootfs is gone.
201 */
202 if (system_state > SYSTEM_RUNNING) {
203 if (ignore_on_shutdown && (state == XenbusStateClosing))
204 xenbus_frontend_closed(dev);
205 return;
206 }
207
208 if (drv->otherend_changed)
209 drv->otherend_changed(dev, state);
210 }
211 EXPORT_SYMBOL_GPL(xenbus_otherend_changed);
212
xenbus_dev_probe(struct device * _dev)213 int xenbus_dev_probe(struct device *_dev)
214 {
215 struct xenbus_device *dev = to_xenbus_device(_dev);
216 struct xenbus_driver *drv = to_xenbus_driver(_dev->driver);
217 const struct xenbus_device_id *id;
218 int err;
219
220 DPRINTK("%s", dev->nodename);
221
222 if (!drv->probe) {
223 err = -ENODEV;
224 goto fail;
225 }
226
227 id = match_device(drv->ids, dev);
228 if (!id) {
229 err = -ENODEV;
230 goto fail;
231 }
232
233 err = talk_to_otherend(dev);
234 if (err) {
235 dev_warn(&dev->dev, "talk_to_otherend on %s failed.\n",
236 dev->nodename);
237 return err;
238 }
239
240 err = drv->probe(dev, id);
241 if (err)
242 goto fail;
243
244 err = watch_otherend(dev);
245 if (err) {
246 dev_warn(&dev->dev, "watch_otherend on %s failed.\n",
247 dev->nodename);
248 return err;
249 }
250
251 return 0;
252 fail:
253 xenbus_dev_error(dev, err, "xenbus_dev_probe on %s", dev->nodename);
254 xenbus_switch_state(dev, XenbusStateClosed);
255 return err;
256 }
257 EXPORT_SYMBOL_GPL(xenbus_dev_probe);
258
xenbus_dev_remove(struct device * _dev)259 int xenbus_dev_remove(struct device *_dev)
260 {
261 struct xenbus_device *dev = to_xenbus_device(_dev);
262 struct xenbus_driver *drv = to_xenbus_driver(_dev->driver);
263
264 DPRINTK("%s", dev->nodename);
265
266 free_otherend_watch(dev);
267
268 if (drv->remove)
269 drv->remove(dev);
270
271 free_otherend_details(dev);
272
273 xenbus_switch_state(dev, XenbusStateClosed);
274 return 0;
275 }
276 EXPORT_SYMBOL_GPL(xenbus_dev_remove);
277
xenbus_dev_shutdown(struct device * _dev)278 void xenbus_dev_shutdown(struct device *_dev)
279 {
280 struct xenbus_device *dev = to_xenbus_device(_dev);
281 unsigned long timeout = 5*HZ;
282
283 DPRINTK("%s", dev->nodename);
284
285 get_device(&dev->dev);
286 if (dev->state != XenbusStateConnected) {
287 pr_info("%s: %s: %s != Connected, skipping\n",
288 __func__, dev->nodename, xenbus_strstate(dev->state));
289 goto out;
290 }
291 xenbus_switch_state(dev, XenbusStateClosing);
292 timeout = wait_for_completion_timeout(&dev->down, timeout);
293 if (!timeout)
294 pr_info("%s: %s timeout closing device\n",
295 __func__, dev->nodename);
296 out:
297 put_device(&dev->dev);
298 }
299 EXPORT_SYMBOL_GPL(xenbus_dev_shutdown);
300
xenbus_register_driver_common(struct xenbus_driver * drv,struct xen_bus_type * bus,struct module * owner,const char * mod_name)301 int xenbus_register_driver_common(struct xenbus_driver *drv,
302 struct xen_bus_type *bus,
303 struct module *owner, const char *mod_name)
304 {
305 drv->driver.name = drv->name ? drv->name : drv->ids[0].devicetype;
306 drv->driver.bus = &bus->bus;
307 drv->driver.owner = owner;
308 drv->driver.mod_name = mod_name;
309
310 return driver_register(&drv->driver);
311 }
312 EXPORT_SYMBOL_GPL(xenbus_register_driver_common);
313
xenbus_unregister_driver(struct xenbus_driver * drv)314 void xenbus_unregister_driver(struct xenbus_driver *drv)
315 {
316 driver_unregister(&drv->driver);
317 }
318 EXPORT_SYMBOL_GPL(xenbus_unregister_driver);
319
320 struct xb_find_info {
321 struct xenbus_device *dev;
322 const char *nodename;
323 };
324
cmp_dev(struct device * dev,void * data)325 static int cmp_dev(struct device *dev, void *data)
326 {
327 struct xenbus_device *xendev = to_xenbus_device(dev);
328 struct xb_find_info *info = data;
329
330 if (!strcmp(xendev->nodename, info->nodename)) {
331 info->dev = xendev;
332 get_device(dev);
333 return 1;
334 }
335 return 0;
336 }
337
xenbus_device_find(const char * nodename,struct bus_type * bus)338 static struct xenbus_device *xenbus_device_find(const char *nodename,
339 struct bus_type *bus)
340 {
341 struct xb_find_info info = { .dev = NULL, .nodename = nodename };
342
343 bus_for_each_dev(bus, NULL, &info, cmp_dev);
344 return info.dev;
345 }
346
cleanup_dev(struct device * dev,void * data)347 static int cleanup_dev(struct device *dev, void *data)
348 {
349 struct xenbus_device *xendev = to_xenbus_device(dev);
350 struct xb_find_info *info = data;
351 int len = strlen(info->nodename);
352
353 DPRINTK("%s", info->nodename);
354
355 /* Match the info->nodename path, or any subdirectory of that path. */
356 if (strncmp(xendev->nodename, info->nodename, len))
357 return 0;
358
359 /* If the node name is longer, ensure it really is a subdirectory. */
360 if ((strlen(xendev->nodename) > len) && (xendev->nodename[len] != '/'))
361 return 0;
362
363 info->dev = xendev;
364 get_device(dev);
365 return 1;
366 }
367
xenbus_cleanup_devices(const char * path,struct bus_type * bus)368 static void xenbus_cleanup_devices(const char *path, struct bus_type *bus)
369 {
370 struct xb_find_info info = { .nodename = path };
371
372 do {
373 info.dev = NULL;
374 bus_for_each_dev(bus, NULL, &info, cleanup_dev);
375 if (info.dev) {
376 device_unregister(&info.dev->dev);
377 put_device(&info.dev->dev);
378 }
379 } while (info.dev);
380 }
381
xenbus_dev_release(struct device * dev)382 static void xenbus_dev_release(struct device *dev)
383 {
384 if (dev)
385 kfree(to_xenbus_device(dev));
386 }
387
nodename_show(struct device * dev,struct device_attribute * attr,char * buf)388 static ssize_t nodename_show(struct device *dev,
389 struct device_attribute *attr, char *buf)
390 {
391 return sprintf(buf, "%s\n", to_xenbus_device(dev)->nodename);
392 }
393 static DEVICE_ATTR_RO(nodename);
394
devtype_show(struct device * dev,struct device_attribute * attr,char * buf)395 static ssize_t devtype_show(struct device *dev,
396 struct device_attribute *attr, char *buf)
397 {
398 return sprintf(buf, "%s\n", to_xenbus_device(dev)->devicetype);
399 }
400 static DEVICE_ATTR_RO(devtype);
401
modalias_show(struct device * dev,struct device_attribute * attr,char * buf)402 static ssize_t modalias_show(struct device *dev,
403 struct device_attribute *attr, char *buf)
404 {
405 return sprintf(buf, "%s:%s\n", dev->bus->name,
406 to_xenbus_device(dev)->devicetype);
407 }
408 static DEVICE_ATTR_RO(modalias);
409
410 static struct attribute *xenbus_dev_attrs[] = {
411 &dev_attr_nodename.attr,
412 &dev_attr_devtype.attr,
413 &dev_attr_modalias.attr,
414 NULL,
415 };
416
417 static const struct attribute_group xenbus_dev_group = {
418 .attrs = xenbus_dev_attrs,
419 };
420
421 const struct attribute_group *xenbus_dev_groups[] = {
422 &xenbus_dev_group,
423 NULL,
424 };
425 EXPORT_SYMBOL_GPL(xenbus_dev_groups);
426
xenbus_probe_node(struct xen_bus_type * bus,const char * type,const char * nodename)427 int xenbus_probe_node(struct xen_bus_type *bus,
428 const char *type,
429 const char *nodename)
430 {
431 char devname[XEN_BUS_ID_SIZE];
432 int err;
433 struct xenbus_device *xendev;
434 size_t stringlen;
435 char *tmpstring;
436
437 enum xenbus_state state = xenbus_read_driver_state(nodename);
438
439 if (state != XenbusStateInitialising) {
440 /* Device is not new, so ignore it. This can happen if a
441 device is going away after switching to Closed. */
442 return 0;
443 }
444
445 stringlen = strlen(nodename) + 1 + strlen(type) + 1;
446 xendev = kzalloc(sizeof(*xendev) + stringlen, GFP_KERNEL);
447 if (!xendev)
448 return -ENOMEM;
449
450 xendev->state = XenbusStateInitialising;
451
452 /* Copy the strings into the extra space. */
453
454 tmpstring = (char *)(xendev + 1);
455 strcpy(tmpstring, nodename);
456 xendev->nodename = tmpstring;
457
458 tmpstring += strlen(tmpstring) + 1;
459 strcpy(tmpstring, type);
460 xendev->devicetype = tmpstring;
461 init_completion(&xendev->down);
462
463 xendev->dev.bus = &bus->bus;
464 xendev->dev.release = xenbus_dev_release;
465
466 err = bus->get_bus_id(devname, xendev->nodename);
467 if (err)
468 goto fail;
469
470 dev_set_name(&xendev->dev, "%s", devname);
471
472 /* Register with generic device framework. */
473 err = device_register(&xendev->dev);
474 if (err) {
475 put_device(&xendev->dev);
476 xendev = NULL;
477 goto fail;
478 }
479
480 return 0;
481 fail:
482 kfree(xendev);
483 return err;
484 }
485 EXPORT_SYMBOL_GPL(xenbus_probe_node);
486
xenbus_probe_device_type(struct xen_bus_type * bus,const char * type)487 static int xenbus_probe_device_type(struct xen_bus_type *bus, const char *type)
488 {
489 int err = 0;
490 char **dir;
491 unsigned int dir_n = 0;
492 int i;
493
494 dir = xenbus_directory(XBT_NIL, bus->root, type, &dir_n);
495 if (IS_ERR(dir))
496 return PTR_ERR(dir);
497
498 for (i = 0; i < dir_n; i++) {
499 err = bus->probe(bus, type, dir[i]);
500 if (err)
501 break;
502 }
503
504 kfree(dir);
505 return err;
506 }
507
xenbus_probe_devices(struct xen_bus_type * bus)508 int xenbus_probe_devices(struct xen_bus_type *bus)
509 {
510 int err = 0;
511 char **dir;
512 unsigned int i, dir_n;
513
514 dir = xenbus_directory(XBT_NIL, bus->root, "", &dir_n);
515 if (IS_ERR(dir))
516 return PTR_ERR(dir);
517
518 for (i = 0; i < dir_n; i++) {
519 err = xenbus_probe_device_type(bus, dir[i]);
520 if (err)
521 break;
522 }
523
524 kfree(dir);
525 return err;
526 }
527 EXPORT_SYMBOL_GPL(xenbus_probe_devices);
528
char_count(const char * str,char c)529 static unsigned int char_count(const char *str, char c)
530 {
531 unsigned int i, ret = 0;
532
533 for (i = 0; str[i]; i++)
534 if (str[i] == c)
535 ret++;
536 return ret;
537 }
538
strsep_len(const char * str,char c,unsigned int len)539 static int strsep_len(const char *str, char c, unsigned int len)
540 {
541 unsigned int i;
542
543 for (i = 0; str[i]; i++)
544 if (str[i] == c) {
545 if (len == 0)
546 return i;
547 len--;
548 }
549 return (len == 0) ? i : -ERANGE;
550 }
551
xenbus_dev_changed(const char * node,struct xen_bus_type * bus)552 void xenbus_dev_changed(const char *node, struct xen_bus_type *bus)
553 {
554 int exists, rootlen;
555 struct xenbus_device *dev;
556 char type[XEN_BUS_ID_SIZE];
557 const char *p, *root;
558
559 if (char_count(node, '/') < 2)
560 return;
561
562 exists = xenbus_exists(XBT_NIL, node, "");
563 if (!exists) {
564 xenbus_cleanup_devices(node, &bus->bus);
565 return;
566 }
567
568 /* backend/<type>/... or device/<type>/... */
569 p = strchr(node, '/') + 1;
570 snprintf(type, XEN_BUS_ID_SIZE, "%.*s", (int)strcspn(p, "/"), p);
571 type[XEN_BUS_ID_SIZE-1] = '\0';
572
573 rootlen = strsep_len(node, '/', bus->levels);
574 if (rootlen < 0)
575 return;
576 root = kasprintf(GFP_KERNEL, "%.*s", rootlen, node);
577 if (!root)
578 return;
579
580 dev = xenbus_device_find(root, &bus->bus);
581 if (!dev)
582 xenbus_probe_node(bus, type, root);
583 else
584 put_device(&dev->dev);
585
586 kfree(root);
587 }
588 EXPORT_SYMBOL_GPL(xenbus_dev_changed);
589
xenbus_dev_suspend(struct device * dev)590 int xenbus_dev_suspend(struct device *dev)
591 {
592 int err = 0;
593 struct xenbus_driver *drv;
594 struct xenbus_device *xdev
595 = container_of(dev, struct xenbus_device, dev);
596
597 DPRINTK("%s", xdev->nodename);
598
599 if (dev->driver == NULL)
600 return 0;
601 drv = to_xenbus_driver(dev->driver);
602 if (drv->suspend)
603 err = drv->suspend(xdev);
604 if (err)
605 pr_warn("suspend %s failed: %i\n", dev_name(dev), err);
606 return 0;
607 }
608 EXPORT_SYMBOL_GPL(xenbus_dev_suspend);
609
xenbus_dev_resume(struct device * dev)610 int xenbus_dev_resume(struct device *dev)
611 {
612 int err;
613 struct xenbus_driver *drv;
614 struct xenbus_device *xdev
615 = container_of(dev, struct xenbus_device, dev);
616
617 DPRINTK("%s", xdev->nodename);
618
619 if (dev->driver == NULL)
620 return 0;
621 drv = to_xenbus_driver(dev->driver);
622 err = talk_to_otherend(xdev);
623 if (err) {
624 pr_warn("resume (talk_to_otherend) %s failed: %i\n",
625 dev_name(dev), err);
626 return err;
627 }
628
629 xdev->state = XenbusStateInitialising;
630
631 if (drv->resume) {
632 err = drv->resume(xdev);
633 if (err) {
634 pr_warn("resume %s failed: %i\n", dev_name(dev), err);
635 return err;
636 }
637 }
638
639 err = watch_otherend(xdev);
640 if (err) {
641 pr_warn("resume (watch_otherend) %s failed: %d.\n",
642 dev_name(dev), err);
643 return err;
644 }
645
646 return 0;
647 }
648 EXPORT_SYMBOL_GPL(xenbus_dev_resume);
649
xenbus_dev_cancel(struct device * dev)650 int xenbus_dev_cancel(struct device *dev)
651 {
652 /* Do nothing */
653 DPRINTK("cancel");
654 return 0;
655 }
656 EXPORT_SYMBOL_GPL(xenbus_dev_cancel);
657
658 /* A flag to determine if xenstored is 'ready' (i.e. has started) */
659 int xenstored_ready;
660
661
register_xenstore_notifier(struct notifier_block * nb)662 int register_xenstore_notifier(struct notifier_block *nb)
663 {
664 int ret = 0;
665
666 if (xenstored_ready > 0)
667 ret = nb->notifier_call(nb, 0, NULL);
668 else
669 blocking_notifier_chain_register(&xenstore_chain, nb);
670
671 return ret;
672 }
673 EXPORT_SYMBOL_GPL(register_xenstore_notifier);
674
unregister_xenstore_notifier(struct notifier_block * nb)675 void unregister_xenstore_notifier(struct notifier_block *nb)
676 {
677 blocking_notifier_chain_unregister(&xenstore_chain, nb);
678 }
679 EXPORT_SYMBOL_GPL(unregister_xenstore_notifier);
680
xenbus_probe(struct work_struct * unused)681 void xenbus_probe(struct work_struct *unused)
682 {
683 xenstored_ready = 1;
684
685 /* Notify others that xenstore is up */
686 blocking_notifier_call_chain(&xenstore_chain, 0, NULL);
687 }
688 EXPORT_SYMBOL_GPL(xenbus_probe);
689
xenbus_probe_initcall(void)690 static int __init xenbus_probe_initcall(void)
691 {
692 if (!xen_domain())
693 return -ENODEV;
694
695 if (xen_initial_domain() || xen_hvm_domain())
696 return 0;
697
698 xenbus_probe(NULL);
699 return 0;
700 }
701
702 device_initcall(xenbus_probe_initcall);
703
704 /* Set up event channel for xenstored which is run as a local process
705 * (this is normally used only in dom0)
706 */
xenstored_local_init(void)707 static int __init xenstored_local_init(void)
708 {
709 int err = 0;
710 unsigned long page = 0;
711 struct evtchn_alloc_unbound alloc_unbound;
712
713 /* Allocate Xenstore page */
714 page = get_zeroed_page(GFP_KERNEL);
715 if (!page)
716 goto out_err;
717
718 xen_store_gfn = xen_start_info->store_mfn = virt_to_gfn((void *)page);
719
720 /* Next allocate a local port which xenstored can bind to */
721 alloc_unbound.dom = DOMID_SELF;
722 alloc_unbound.remote_dom = DOMID_SELF;
723
724 err = HYPERVISOR_event_channel_op(EVTCHNOP_alloc_unbound,
725 &alloc_unbound);
726 if (err == -ENOSYS)
727 goto out_err;
728
729 BUG_ON(err);
730 xen_store_evtchn = xen_start_info->store_evtchn =
731 alloc_unbound.port;
732
733 return 0;
734
735 out_err:
736 if (page != 0)
737 free_page(page);
738 return err;
739 }
740
xenbus_resume_cb(struct notifier_block * nb,unsigned long action,void * data)741 static int xenbus_resume_cb(struct notifier_block *nb,
742 unsigned long action, void *data)
743 {
744 int err = 0;
745
746 if (xen_hvm_domain()) {
747 uint64_t v = 0;
748
749 err = hvm_get_parameter(HVM_PARAM_STORE_EVTCHN, &v);
750 if (!err && v)
751 xen_store_evtchn = v;
752 else
753 pr_warn("Cannot update xenstore event channel: %d\n",
754 err);
755 } else
756 xen_store_evtchn = xen_start_info->store_evtchn;
757
758 return err;
759 }
760
761 static struct notifier_block xenbus_resume_nb = {
762 .notifier_call = xenbus_resume_cb,
763 };
764
xenbus_init(void)765 static int __init xenbus_init(void)
766 {
767 int err;
768 uint64_t v = 0;
769 xen_store_domain_type = XS_UNKNOWN;
770
771 if (!xen_domain())
772 return -ENODEV;
773
774 xenbus_ring_ops_init();
775
776 if (xen_pv_domain())
777 xen_store_domain_type = XS_PV;
778 if (xen_hvm_domain())
779 xen_store_domain_type = XS_HVM;
780 if (xen_hvm_domain() && xen_initial_domain())
781 xen_store_domain_type = XS_LOCAL;
782 if (xen_pv_domain() && !xen_start_info->store_evtchn)
783 xen_store_domain_type = XS_LOCAL;
784 if (xen_pv_domain() && xen_start_info->store_evtchn)
785 xenstored_ready = 1;
786
787 switch (xen_store_domain_type) {
788 case XS_LOCAL:
789 err = xenstored_local_init();
790 if (err)
791 goto out_error;
792 xen_store_interface = gfn_to_virt(xen_store_gfn);
793 break;
794 case XS_PV:
795 xen_store_evtchn = xen_start_info->store_evtchn;
796 xen_store_gfn = xen_start_info->store_mfn;
797 xen_store_interface = gfn_to_virt(xen_store_gfn);
798 break;
799 case XS_HVM:
800 err = hvm_get_parameter(HVM_PARAM_STORE_EVTCHN, &v);
801 if (err)
802 goto out_error;
803 xen_store_evtchn = (int)v;
804 err = hvm_get_parameter(HVM_PARAM_STORE_PFN, &v);
805 if (err)
806 goto out_error;
807 /*
808 * Uninitialized hvm_params are zero and return no error.
809 * Although it is theoretically possible to have
810 * HVM_PARAM_STORE_PFN set to zero on purpose, in reality it is
811 * not zero when valid. If zero, it means that Xenstore hasn't
812 * been properly initialized. Instead of attempting to map a
813 * wrong guest physical address return error.
814 *
815 * Also recognize all bits set as an invalid value.
816 */
817 if (!v || !~v) {
818 err = -ENOENT;
819 goto out_error;
820 }
821 /* Avoid truncation on 32-bit. */
822 #if BITS_PER_LONG == 32
823 if (v > ULONG_MAX) {
824 pr_err("%s: cannot handle HVM_PARAM_STORE_PFN=%llx > ULONG_MAX\n",
825 __func__, v);
826 err = -EINVAL;
827 goto out_error;
828 }
829 #endif
830 xen_store_gfn = (unsigned long)v;
831 xen_store_interface =
832 xen_remap(xen_store_gfn << XEN_PAGE_SHIFT,
833 XEN_PAGE_SIZE);
834 break;
835 default:
836 pr_warn("Xenstore state unknown\n");
837 break;
838 }
839
840 /* Initialize the interface to xenstore. */
841 err = xs_init();
842 if (err) {
843 pr_warn("Error initializing xenstore comms: %i\n", err);
844 goto out_error;
845 }
846
847 if ((xen_store_domain_type != XS_LOCAL) &&
848 (xen_store_domain_type != XS_UNKNOWN))
849 xen_resume_notifier_register(&xenbus_resume_nb);
850
851 #ifdef CONFIG_XEN_COMPAT_XENFS
852 /*
853 * Create xenfs mountpoint in /proc for compatibility with
854 * utilities that expect to find "xenbus" under "/proc/xen".
855 */
856 proc_mkdir("xen", NULL);
857 #endif
858 return 0;
859
860 out_error:
861 xen_store_domain_type = XS_UNKNOWN;
862 return err;
863 }
864
865 postcore_initcall(xenbus_init);
866
867 MODULE_LICENSE("GPL");
868