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