drivers/xen/xenbus/xenbus_probe.c

   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.h"
  66
  67
  68 int xen_store_evtchn;
  69 EXPORT_SYMBOL_GPL(xen_store_evtchn);
  70
  71 struct xenstore_domain_interface *xen_store_interface;
  72 EXPORT_SYMBOL_GPL(xen_store_interface);
  73
  74 enum xenstore_init xen_store_domain_type;
  75 EXPORT_SYMBOL_GPL(xen_store_domain_type);
  76
  77 static unsigned long xen_store_gfn;
  78
  79 static BLOCKING_NOTIFIER_HEAD(xenstore_chain);
  80
  81 /* If something in array of ids matches this device, return it. */
  82 static const struct xenbus_device_id *
  83 match_device(const struct xenbus_device_id *arr, struct xenbus_device *dev)
  84 {
  85         for (; *arr->devicetype != '\0'; arr++) {
  86                 if (!strcmp(arr->devicetype, dev->devicetype))
  87                         return arr;
  88         }
  89         return NULL;
  90 }
  91
  92 int xenbus_match(struct device *_dev, struct device_driver *_drv)
  93 {
  94         struct xenbus_driver *drv = to_xenbus_driver(_drv);
  95
  96         if (!drv->ids)
  97                 return 0;
  98
  99         return match_device(drv->ids, to_xenbus_device(_dev)) != NULL;
 100 }
 101 EXPORT_SYMBOL_GPL(xenbus_match);
 102
 103
 104 static void free_otherend_details(struct xenbus_device *dev)
 105 {
 106         kfree(dev->otherend);
 107         dev->otherend = NULL;
 108 }
 109
 110
 111 static void free_otherend_watch(struct xenbus_device *dev)
 112 {
 113         if (dev->otherend_watch.node) {
 114                 unregister_xenbus_watch(&dev->otherend_watch);
 115                 kfree(dev->otherend_watch.node);
 116                 dev->otherend_watch.node = NULL;
 117         }
 118 }
 119
 120
 121 static int talk_to_otherend(struct xenbus_device *dev)
 122 {
 123         struct xenbus_driver *drv = to_xenbus_driver(dev->dev.driver);
 124
 125         free_otherend_watch(dev);
 126         free_otherend_details(dev);
 127
 128         return drv->read_otherend_details(dev);
 129 }
 130
 131
 132
 133 static int watch_otherend(struct xenbus_device *dev)
 134 {
 135         struct xen_bus_type *bus =
 136                 container_of(dev->dev.bus, struct xen_bus_type, bus);
 137
 138         return xenbus_watch_pathfmt(dev, &dev->otherend_watch,
 139                                     bus->otherend_changed,
 140                                     "%s/%s", dev->otherend, "state");
 141 }
 142
 143
 144 int xenbus_read_otherend_details(struct xenbus_device *xendev,
 145                                  char *id_node, char *path_node)
 146 {
 147         int err = xenbus_gather(XBT_NIL, xendev->nodename,
 148                                 id_node, "%i", &xendev->otherend_id,
 149                                 path_node, NULL, &xendev->otherend,
 150                                 NULL);
 151         if (err) {
 152                 xenbus_dev_fatal(xendev, err,
 153                                  "reading other end details from %s",
 154                                  xendev->nodename);
 155                 return err;
 156         }
 157         if (strlen(xendev->otherend) == 0 ||
 158             !xenbus_exists(XBT_NIL, xendev->otherend, "")) {
 159                 xenbus_dev_fatal(xendev, -ENOENT,
 160                                  "unable to read other end from %s.  "
 161                                  "missing or inaccessible.",
 162                                  xendev->nodename);
 163                 free_otherend_details(xendev);
 164                 return -ENOENT;
 165         }
 166
 167         return 0;
 168 }
 169 EXPORT_SYMBOL_GPL(xenbus_read_otherend_details);
 170
 171 void xenbus_otherend_changed(struct xenbus_watch *watch,
 172                              const char *path, const char *token,
 173                              int ignore_on_shutdown)
 174 {
 175         struct xenbus_device *dev =
 176                 container_of(watch, struct xenbus_device, otherend_watch);
 177         struct xenbus_driver *drv = to_xenbus_driver(dev->dev.driver);
 178         enum xenbus_state state;
 179
 180         /* Protect us against watches firing on old details when the otherend
 181            details change, say immediately after a resume. */
 182         if (!dev->otherend ||
 183             strncmp(dev->otherend, path, strlen(dev->otherend))) {
 184                 dev_dbg(&dev->dev, "Ignoring watch at %s\n", path);
 185                 return;
 186         }
 187
 188         state = xenbus_read_driver_state(dev->otherend);
 189
 190         dev_dbg(&dev->dev, "state is %d, (%s), %s, %s\n",
 191                 state, xenbus_strstate(state), dev->otherend_watch.node, path);
 192
 193         /*
 194          * Ignore xenbus transitions during shutdown. This prevents us doing
 195          * work that can fail e.g., when the rootfs is gone.
 196          */
 197         if (system_state > SYSTEM_RUNNING) {
 198                 if (ignore_on_shutdown && (state == XenbusStateClosing))
 199                         xenbus_frontend_closed(dev);
 200                 return;
 201         }
 202
 203         if (drv->otherend_changed)
 204                 drv->otherend_changed(dev, state);
 205 }
 206 EXPORT_SYMBOL_GPL(xenbus_otherend_changed);
 207
 208 int xenbus_dev_probe(struct device *_dev)
 209 {
 210         struct xenbus_device *dev = to_xenbus_device(_dev);
 211         struct xenbus_driver *drv = to_xenbus_driver(_dev->driver);
 212         const struct xenbus_device_id *id;
 213         int err;
 214
 215         DPRINTK("%s", dev->nodename);
 216
 217         if (!drv->probe) {
 218                 err = -ENODEV;
 219                 goto fail;
 220         }
 221
 222         id = match_device(drv->ids, dev);
 223         if (!id) {
 224                 err = -ENODEV;
 225                 goto fail;
 226         }
 227
 228         err = talk_to_otherend(dev);
 229         if (err) {
 230                 dev_warn(&dev->dev, "talk_to_otherend on %s failed.\n",
 231                          dev->nodename);
 232                 return err;
 233         }
 234
 235         err = drv->probe(dev, id);
 236         if (err)
 237                 goto fail;
 238
 239         err = watch_otherend(dev);
 240         if (err) {
 241                 dev_warn(&dev->dev, "watch_otherend on %s failed.\n",
 242                        dev->nodename);
 243                 return err;
 244         }
 245
 246         return 0;
 247 fail:
 248         xenbus_dev_error(dev, err, "xenbus_dev_probe on %s", dev->nodename);
 249         xenbus_switch_state(dev, XenbusStateClosed);
 250         return err;
 251 }
 252 EXPORT_SYMBOL_GPL(xenbus_dev_probe);
 253
 254 int xenbus_dev_remove(struct device *_dev)
 255 {
 256         struct xenbus_device *dev = to_xenbus_device(_dev);
 257         struct xenbus_driver *drv = to_xenbus_driver(_dev->driver);
 258
 259         DPRINTK("%s", dev->nodename);
 260
 261         free_otherend_watch(dev);
 262
 263         if (drv->remove)
 264                 drv->remove(dev);
 265
 266         free_otherend_details(dev);
 267
 268         xenbus_switch_state(dev, XenbusStateClosed);
 269         return 0;
 270 }
 271 EXPORT_SYMBOL_GPL(xenbus_dev_remove);
 272
 273 void xenbus_dev_shutdown(struct device *_dev)
 274 {
 275         struct xenbus_device *dev = to_xenbus_device(_dev);
 276         unsigned long timeout = 5*HZ;
 277
 278         DPRINTK("%s", dev->nodename);
 279
 280         get_device(&dev->dev);
 281         if (dev->state != XenbusStateConnected) {
 282                 pr_info("%s: %s: %s != Connected, skipping\n",
 283                         __func__, dev->nodename, xenbus_strstate(dev->state));
 284                 goto out;
 285         }
 286         xenbus_switch_state(dev, XenbusStateClosing);
 287         timeout = wait_for_completion_timeout(&dev->down, timeout);
 288         if (!timeout)
 289                 pr_info("%s: %s timeout closing device\n",
 290                         __func__, dev->nodename);
 291  out:
 292         put_device(&dev->dev);
 293 }
 294 EXPORT_SYMBOL_GPL(xenbus_dev_shutdown);
 295
 296 int xenbus_register_driver_common(struct xenbus_driver *drv,
 297                                   struct xen_bus_type *bus,
 298                                   struct module *owner, const char *mod_name)
 299 {
 300         drv->driver.name = drv->name ? drv->name : drv->ids[0].devicetype;
 301         drv->driver.bus = &bus->bus;
 302         drv->driver.owner = owner;
 303         drv->driver.mod_name = mod_name;
 304
 305         return driver_register(&drv->driver);
 306 }
 307 EXPORT_SYMBOL_GPL(xenbus_register_driver_common);
 308
 309 void xenbus_unregister_driver(struct xenbus_driver *drv)
 310 {
 311         driver_unregister(&drv->driver);
 312 }
 313 EXPORT_SYMBOL_GPL(xenbus_unregister_driver);
 314
 315 struct xb_find_info {
 316         struct xenbus_device *dev;
 317         const char *nodename;
 318 };
 319
 320 static int cmp_dev(struct device *dev, void *data)
 321 {
 322         struct xenbus_device *xendev = to_xenbus_device(dev);
 323         struct xb_find_info *info = data;
 324
 325         if (!strcmp(xendev->nodename, info->nodename)) {
 326                 info->dev = xendev;
 327                 get_device(dev);
 328                 return 1;
 329         }
 330         return 0;
 331 }
 332
 333 static struct xenbus_device *xenbus_device_find(const char *nodename,
 334                                                 struct bus_type *bus)
 335 {
 336         struct xb_find_info info = { .dev = NULL, .nodename = nodename };
 337
 338         bus_for_each_dev(bus, NULL, &info, cmp_dev);
 339         return info.dev;
 340 }
 341
 342 static int cleanup_dev(struct device *dev, void *data)
 343 {
 344         struct xenbus_device *xendev = to_xenbus_device(dev);
 345         struct xb_find_info *info = data;
 346         int len = strlen(info->nodename);
 347
 348         DPRINTK("%s", info->nodename);
 349
 350         /* Match the info->nodename path, or any subdirectory of that path. */
 351         if (strncmp(xendev->nodename, info->nodename, len))
 352                 return 0;
 353
 354         /* If the node name is longer, ensure it really is a subdirectory. */
 355         if ((strlen(xendev->nodename) > len) && (xendev->nodename[len] != '/'))
 356                 return 0;
 357
 358         info->dev = xendev;
 359         get_device(dev);
 360         return 1;
 361 }
 362
 363 static void xenbus_cleanup_devices(const char *path, struct bus_type *bus)
 364 {
 365         struct xb_find_info info = { .nodename = path };
 366
 367         do {
 368                 info.dev = NULL;
 369                 bus_for_each_dev(bus, NULL, &info, cleanup_dev);
 370                 if (info.dev) {
 371                         device_unregister(&info.dev->dev);
 372                         put_device(&info.dev->dev);
 373                 }
 374         } while (info.dev);
 375 }
 376
 377 static void xenbus_dev_release(struct device *dev)
 378 {
 379         if (dev)
 380                 kfree(to_xenbus_device(dev));
 381 }
 382
 383 static ssize_t nodename_show(struct device *dev,
 384                              struct device_attribute *attr, char *buf)
 385 {
 386         return sprintf(buf, "%s\n", to_xenbus_device(dev)->nodename);
 387 }
 388 static DEVICE_ATTR_RO(nodename);
 389
 390 static ssize_t devtype_show(struct device *dev,
 391                             struct device_attribute *attr, char *buf)
 392 {
 393         return sprintf(buf, "%s\n", to_xenbus_device(dev)->devicetype);
 394 }
 395 static DEVICE_ATTR_RO(devtype);
 396
 397 static ssize_t modalias_show(struct device *dev,
 398                              struct device_attribute *attr, char *buf)
 399 {
 400         return sprintf(buf, "%s:%s\n", dev->bus->name,
 401                        to_xenbus_device(dev)->devicetype);
 402 }
 403 static DEVICE_ATTR_RO(modalias);
 404
 405 static struct attribute *xenbus_dev_attrs[] = {
 406         &dev_attr_nodename.attr,
 407         &dev_attr_devtype.attr,
 408         &dev_attr_modalias.attr,
 409         NULL,
 410 };
 411
 412 static const struct attribute_group xenbus_dev_group = {
 413         .attrs = xenbus_dev_attrs,
 414 };
 415
 416 const struct attribute_group *xenbus_dev_groups[] = {
 417         &xenbus_dev_group,
 418         NULL,
 419 };
 420 EXPORT_SYMBOL_GPL(xenbus_dev_groups);
 421
 422 int xenbus_probe_node(struct xen_bus_type *bus,
 423                       const char *type,
 424                       const char *nodename)
 425 {
 426         char devname[XEN_BUS_ID_SIZE];
 427         int err;
 428         struct xenbus_device *xendev;
 429         size_t stringlen;
 430         char *tmpstring;
 431
 432         enum xenbus_state state = xenbus_read_driver_state(nodename);
 433
 434         if (state != XenbusStateInitialising) {
 435                 /* Device is not new, so ignore it.  This can happen if a
 436                    device is going away after switching to Closed.  */
 437                 return 0;
 438         }
 439
 440         stringlen = strlen(nodename) + 1 + strlen(type) + 1;
 441         xendev = kzalloc(sizeof(*xendev) + stringlen, GFP_KERNEL);
 442         if (!xendev)
 443                 return -ENOMEM;
 444
 445         xendev->state = XenbusStateInitialising;
 446
 447         /* Copy the strings into the extra space. */
 448
 449         tmpstring = (char *)(xendev + 1);
 450         strcpy(tmpstring, nodename);
 451         xendev->nodename = tmpstring;
 452
 453         tmpstring += strlen(tmpstring) + 1;
 454         strcpy(tmpstring, type);
 455         xendev->devicetype = tmpstring;
 456         init_completion(&xendev->down);
 457
 458         xendev->dev.bus = &bus->bus;
 459         xendev->dev.release = xenbus_dev_release;
 460
 461         err = bus->get_bus_id(devname, xendev->nodename);
 462         if (err)
 463                 goto fail;
 464
 465         dev_set_name(&xendev->dev, "%s", devname);
 466
 467         /* Register with generic device framework. */
 468         err = device_register(&xendev->dev);
 469         if (err)
 470                 goto fail;
 471
 472         return 0;
 473 fail:
 474         kfree(xendev);
 475         return err;
 476 }
 477 EXPORT_SYMBOL_GPL(xenbus_probe_node);
 478
 479 static int xenbus_probe_device_type(struct xen_bus_type *bus, const char *type)
 480 {
 481         int err = 0;
 482         char **dir;
 483         unsigned int dir_n = 0;
 484         int i;
 485
 486         dir = xenbus_directory(XBT_NIL, bus->root, type, &dir_n);
 487         if (IS_ERR(dir))
 488                 return PTR_ERR(dir);
 489
 490         for (i = 0; i < dir_n; i++) {
 491                 err = bus->probe(bus, type, dir[i]);
 492                 if (err)
 493                         break;
 494         }
 495
 496         kfree(dir);
 497         return err;
 498 }
 499
 500 int xenbus_probe_devices(struct xen_bus_type *bus)
 501 {
 502         int err = 0;
 503         char **dir;
 504         unsigned int i, dir_n;
 505
 506         dir = xenbus_directory(XBT_NIL, bus->root, "", &dir_n);
 507         if (IS_ERR(dir))
 508                 return PTR_ERR(dir);
 509
 510         for (i = 0; i < dir_n; i++) {
 511                 err = xenbus_probe_device_type(bus, dir[i]);
 512                 if (err)
 513                         break;
 514         }
 515
 516         kfree(dir);
 517         return err;
 518 }
 519 EXPORT_SYMBOL_GPL(xenbus_probe_devices);
 520
 521 static unsigned int char_count(const char *str, char c)
 522 {
 523         unsigned int i, ret = 0;
 524
 525         for (i = 0; str[i]; i++)
 526                 if (str[i] == c)
 527                         ret++;
 528         return ret;
 529 }
 530
 531 static int strsep_len(const char *str, char c, unsigned int len)
 532 {
 533         unsigned int i;
 534
 535         for (i = 0; str[i]; i++)
 536                 if (str[i] == c) {
 537                         if (len == 0)
 538                                 return i;
 539                         len--;
 540                 }
 541         return (len == 0) ? i : -ERANGE;
 542 }
 543
 544 void xenbus_dev_changed(const char *node, struct xen_bus_type *bus)
 545 {
 546         int exists, rootlen;
 547         struct xenbus_device *dev;
 548         char type[XEN_BUS_ID_SIZE];
 549         const char *p, *root;
 550
 551         if (char_count(node, '/') < 2)
 552                 return;
 553
 554         exists = xenbus_exists(XBT_NIL, node, "");
 555         if (!exists) {
 556                 xenbus_cleanup_devices(node, &bus->bus);
 557                 return;
 558         }
 559
 560         /* backend/<type>/... or device/<type>/... */
 561         p = strchr(node, '/') + 1;
 562         snprintf(type, XEN_BUS_ID_SIZE, "%.*s", (int)strcspn(p, "/"), p);
 563         type[XEN_BUS_ID_SIZE-1] = '\0';
 564
 565         rootlen = strsep_len(node, '/', bus->levels);
 566         if (rootlen < 0)
 567                 return;
 568         root = kasprintf(GFP_KERNEL, "%.*s", rootlen, node);
 569         if (!root)
 570                 return;
 571
 572         dev = xenbus_device_find(root, &bus->bus);
 573         if (!dev)
 574                 xenbus_probe_node(bus, type, root);
 575         else
 576                 put_device(&dev->dev);
 577
 578         kfree(root);
 579 }
 580 EXPORT_SYMBOL_GPL(xenbus_dev_changed);
 581
 582 int xenbus_dev_suspend(struct device *dev)
 583 {
 584         int err = 0;
 585         struct xenbus_driver *drv;
 586         struct xenbus_device *xdev
 587                 = container_of(dev, struct xenbus_device, dev);
 588
 589         DPRINTK("%s", xdev->nodename);
 590
 591         if (dev->driver == NULL)
 592                 return 0;
 593         drv = to_xenbus_driver(dev->driver);
 594         if (drv->suspend)
 595                 err = drv->suspend(xdev);
 596         if (err)
 597                 pr_warn("suspend %s failed: %i\n", dev_name(dev), err);
 598         return 0;
 599 }
 600 EXPORT_SYMBOL_GPL(xenbus_dev_suspend);
 601
 602 int xenbus_dev_resume(struct device *dev)
 603 {
 604         int err;
 605         struct xenbus_driver *drv;
 606         struct xenbus_device *xdev
 607                 = container_of(dev, struct xenbus_device, dev);
 608
 609         DPRINTK("%s", xdev->nodename);
 610
 611         if (dev->driver == NULL)
 612                 return 0;
 613         drv = to_xenbus_driver(dev->driver);
 614         err = talk_to_otherend(xdev);
 615         if (err) {
 616                 pr_warn("resume (talk_to_otherend) %s failed: %i\n",
 617                         dev_name(dev), err);
 618                 return err;
 619         }
 620
 621         xdev->state = XenbusStateInitialising;
 622
 623         if (drv->resume) {
 624                 err = drv->resume(xdev);
 625                 if (err) {
 626                         pr_warn("resume %s failed: %i\n", dev_name(dev), err);
 627                         return err;
 628                 }
 629         }
 630
 631         err = watch_otherend(xdev);
 632         if (err) {
 633                 pr_warn("resume (watch_otherend) %s failed: %d.\n",
 634                         dev_name(dev), err);
 635                 return err;
 636         }
 637
 638         return 0;
 639 }
 640 EXPORT_SYMBOL_GPL(xenbus_dev_resume);
 641
 642 int xenbus_dev_cancel(struct device *dev)
 643 {
 644         /* Do nothing */
 645         DPRINTK("cancel");
 646         return 0;
 647 }
 648 EXPORT_SYMBOL_GPL(xenbus_dev_cancel);
 649
 650 /* A flag to determine if xenstored is 'ready' (i.e. has started) */
 651 int xenstored_ready;
 652
 653
 654 int register_xenstore_notifier(struct notifier_block *nb)
 655 {
 656         int ret = 0;
 657
 658         if (xenstored_ready > 0)
 659                 ret = nb->notifier_call(nb, 0, NULL);
 660         else
 661                 blocking_notifier_chain_register(&xenstore_chain, nb);
 662
 663         return ret;
 664 }
 665 EXPORT_SYMBOL_GPL(register_xenstore_notifier);
 666
 667 void unregister_xenstore_notifier(struct notifier_block *nb)
 668 {
 669         blocking_notifier_chain_unregister(&xenstore_chain, nb);
 670 }
 671 EXPORT_SYMBOL_GPL(unregister_xenstore_notifier);
 672
 673 void xenbus_probe(struct work_struct *unused)
 674 {
 675         xenstored_ready = 1;
 676
 677         /* Notify others that xenstore is up */
 678         blocking_notifier_call_chain(&xenstore_chain, 0, NULL);
 679 }
 680 EXPORT_SYMBOL_GPL(xenbus_probe);
 681
 682 static int __init xenbus_probe_initcall(void)
 683 {
 684         if (!xen_domain())
 685                 return -ENODEV;
 686
 687         if (xen_initial_domain() || xen_hvm_domain())
 688                 return 0;
 689
 690         xenbus_probe(NULL);
 691         return 0;
 692 }
 693
 694 device_initcall(xenbus_probe_initcall);
 695
 696 /* Set up event channel for xenstored which is run as a local process
 697  * (this is normally used only in dom0)
 698  */
 699 static int __init xenstored_local_init(void)
 700 {
 701         int err = -ENOMEM;
 702         unsigned long page = 0;
 703         struct evtchn_alloc_unbound alloc_unbound;
 704
 705         /* Allocate Xenstore page */
 706         page = get_zeroed_page(GFP_KERNEL);
 707         if (!page)
 708                 goto out_err;
 709
 710         xen_store_gfn = xen_start_info->store_mfn = virt_to_gfn((void *)page);
 711
 712         /* Next allocate a local port which xenstored can bind to */
 713         alloc_unbound.dom        = DOMID_SELF;
 714         alloc_unbound.remote_dom = DOMID_SELF;
 715
 716         err = HYPERVISOR_event_channel_op(EVTCHNOP_alloc_unbound,
 717                                           &alloc_unbound);
 718         if (err == -ENOSYS)
 719                 goto out_err;
 720
 721         BUG_ON(err);
 722         xen_store_evtchn = xen_start_info->store_evtchn =
 723                 alloc_unbound.port;
 724
 725         return 0;
 726
 727  out_err:
 728         if (page != 0)
 729                 free_page(page);
 730         return err;
 731 }
 732
 733 static int xenbus_resume_cb(struct notifier_block *nb,
 734                             unsigned long action, void *data)
 735 {
 736         int err = 0;
 737
 738         if (xen_hvm_domain()) {
 739                 uint64_t v = 0;
 740
 741                 err = hvm_get_parameter(HVM_PARAM_STORE_EVTCHN, &v);
 742                 if (!err && v)
 743                         xen_store_evtchn = v;
 744                 else
 745                         pr_warn("Cannot update xenstore event channel: %d\n",
 746                                 err);
 747         } else
 748                 xen_store_evtchn = xen_start_info->store_evtchn;
 749
 750         return err;
 751 }
 752
 753 static struct notifier_block xenbus_resume_nb = {
 754         .notifier_call = xenbus_resume_cb,
 755 };
 756
 757 static int __init xenbus_init(void)
 758 {
 759         int err = 0;
 760         uint64_t v = 0;
 761         xen_store_domain_type = XS_UNKNOWN;
 762
 763         if (!xen_domain())
 764                 return -ENODEV;
 765
 766         xenbus_ring_ops_init();
 767
 768         if (xen_pv_domain())
 769                 xen_store_domain_type = XS_PV;
 770         if (xen_hvm_domain())
 771                 xen_store_domain_type = XS_HVM;
 772         if (xen_hvm_domain() && xen_initial_domain())
 773                 xen_store_domain_type = XS_LOCAL;
 774         if (xen_pv_domain() && !xen_start_info->store_evtchn)
 775                 xen_store_domain_type = XS_LOCAL;
 776         if (xen_pv_domain() && xen_start_info->store_evtchn)
 777                 xenstored_ready = 1;
 778
 779         switch (xen_store_domain_type) {
 780         case XS_LOCAL:
 781                 err = xenstored_local_init();
 782                 if (err)
 783                         goto out_error;
 784                 xen_store_interface = gfn_to_virt(xen_store_gfn);
 785                 break;
 786         case XS_PV:
 787                 xen_store_evtchn = xen_start_info->store_evtchn;
 788                 xen_store_gfn = xen_start_info->store_mfn;
 789                 xen_store_interface = gfn_to_virt(xen_store_gfn);
 790                 break;
 791         case XS_HVM:
 792                 err = hvm_get_parameter(HVM_PARAM_STORE_EVTCHN, &v);
 793                 if (err)
 794                         goto out_error;
 795                 xen_store_evtchn = (int)v;
 796                 err = hvm_get_parameter(HVM_PARAM_STORE_PFN, &v);
 797                 if (err)
 798                         goto out_error;
 799                 xen_store_gfn = (unsigned long)v;
 800                 xen_store_interface =
 801                         xen_remap(xen_store_gfn << XEN_PAGE_SHIFT,
 802                                   XEN_PAGE_SIZE);
 803                 break;
 804         default:
 805                 pr_warn("Xenstore state unknown\n");
 806                 break;
 807         }
 808
 809         /* Initialize the interface to xenstore. */
 810         err = xs_init();
 811         if (err) {
 812                 pr_warn("Error initializing xenstore comms: %i\n", err);
 813                 goto out_error;
 814         }
 815
 816         if ((xen_store_domain_type != XS_LOCAL) &&
 817             (xen_store_domain_type != XS_UNKNOWN))
 818                 xen_resume_notifier_register(&xenbus_resume_nb);
 819
 820 #ifdef CONFIG_XEN_COMPAT_XENFS
 821         /*
 822          * Create xenfs mountpoint in /proc for compatibility with
 823          * utilities that expect to find "xenbus" under "/proc/xen".
 824          */
 825         proc_create_mount_point("xen");
 826 #endif
 827
 828 out_error:
 829         return err;
 830 }
 831
 832 postcore_initcall(xenbus_init);
 833
 834 MODULE_LICENSE("GPL");