4 * Driver giving user-space access to the kernel's xenbus connection
7 * Copyright (c) 2005, Christian Limpach
8 * Copyright (c) 2005, Rusty Russell, IBM Corporation
10 * This program is free software; you can redistribute it and/or
11 * modify it under the terms of the GNU General Public License version 2
12 * as published by the Free Software Foundation; or, when distributed
13 * separately from the Linux kernel or incorporated into other
14 * software packages, subject to the following license:
16 * Permission is hereby granted, free of charge, to any person obtaining a copy
17 * of this source file (the "Software"), to deal in the Software without
18 * restriction, including without limitation the rights to use, copy, modify,
19 * merge, publish, distribute, sublicense, and/or sell copies of the Software,
20 * and to permit persons to whom the Software is furnished to do so, subject to
21 * the following conditions:
23 * The above copyright notice and this permission notice shall be included in
24 * all copies or substantial portions of the Software.
26 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
27 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
28 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
29 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
30 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
31 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
35 #include <linux/kernel.h>
36 #include <linux/slab.h>
37 #include <linux/errno.h>
38 #include <linux/uio.h>
39 #include <linux/notifier.h>
40 #include <linux/sched.h>
41 #include <linux/wait.h>
43 #include <linux/poll.h>
44 #include <linux/mutex.h>
46 #include "xenbus_comms.h"
48 #include <asm/uaccess.h>
49 #include <asm/hypervisor.h>
50 #include <xen/xenbus.h>
51 #include <xen/xen_proc.h>
52 #include <asm/hypervisor.h>
54 #ifdef HAVE_XEN_PLATFORM_COMPAT_H
55 #include <xen/platform-compat.h>
58 #include <xen/public/xenbus.h>
60 struct xenbus_dev_transaction {
61 struct list_head list;
62 struct xenbus_transaction handle;
66 struct list_head list;
72 struct xenbus_dev_data {
73 /* In-progress transaction. */
74 struct list_head transactions;
77 struct list_head watches;
79 /* Partial request. */
82 struct xsd_sockmsg msg;
83 char buffer[XENSTORE_PAYLOAD_MAX];
87 struct list_head read_buffers;
88 wait_queue_head_t read_waitq;
90 struct mutex reply_mutex;
93 static struct proc_dir_entry *xenbus_dev_intf;
95 static ssize_t xenbus_dev_read(struct file *filp,
97 size_t len, loff_t *ppos)
99 struct xenbus_dev_data *u = filp->private_data;
100 struct read_buffer *rb;
103 if (!is_xenstored_ready())
106 mutex_lock(&u->reply_mutex);
107 while (list_empty(&u->read_buffers)) {
108 mutex_unlock(&u->reply_mutex);
109 if (filp->f_flags & O_NONBLOCK)
112 ret = wait_event_interruptible(u->read_waitq,
113 !list_empty(&u->read_buffers));
116 mutex_lock(&u->reply_mutex);
119 rb = list_entry(u->read_buffers.next, struct read_buffer, list);
120 for (i = 0; i < len;) {
121 put_user(rb->msg[rb->cons], ubuf + i);
124 if (rb->cons == rb->len) {
127 if (list_empty(&u->read_buffers))
129 rb = list_entry(u->read_buffers.next,
130 struct read_buffer, list);
133 mutex_unlock(&u->reply_mutex);
138 static int queue_reply(struct list_head *queue,
139 const void *data, unsigned int len)
141 struct read_buffer *rb;
146 rb = kmalloc(sizeof(*rb) + len, GFP_KERNEL);
153 memcpy(rb->msg, data, len);
155 list_add_tail(&rb->list, queue);
159 static void queue_flush(struct xenbus_dev_data *u, struct list_head *queue,
163 list_splice_tail(queue, &u->read_buffers);
164 wake_up(&u->read_waitq);
166 while (!list_empty(queue)) {
167 struct read_buffer *rb = list_entry(queue->next,
168 struct read_buffer, list);
170 list_del(queue->next);
177 struct list_head list;
178 struct xenbus_watch watch;
179 struct xenbus_dev_data *dev_data;
183 static void free_watch_adapter (struct watch_adapter *watch)
185 kfree(watch->watch.node);
190 static void watch_fired(struct xenbus_watch *watch,
194 struct watch_adapter *adap =
195 container_of(watch, struct watch_adapter, watch);
196 struct xsd_sockmsg hdr;
197 const char *path, *token;
198 int err, path_len, tok_len, body_len, data_len = 0;
201 path = vec[XS_WATCH_PATH];
204 path_len = strlen(path) + 1;
205 tok_len = strlen(token) + 1;
207 data_len = vec[len] - vec[2] + 1;
208 body_len = path_len + tok_len + data_len;
210 hdr.type = XS_WATCH_EVENT;
213 mutex_lock(&adap->dev_data->reply_mutex);
214 err = queue_reply(&queue, &hdr, sizeof(hdr));
216 err = queue_reply(&queue, path, path_len);
218 err = queue_reply(&queue, token, tok_len);
220 err = queue_reply(&queue, vec[2], data_len);
221 queue_flush(adap->dev_data, &queue, err);
222 mutex_unlock(&adap->dev_data->reply_mutex);
225 static LIST_HEAD(watch_list);
227 static ssize_t xenbus_dev_write(struct file *filp,
228 const char __user *ubuf,
229 size_t len, loff_t *ppos)
231 struct xenbus_dev_data *u = filp->private_data;
232 struct xenbus_dev_transaction *trans = NULL;
237 struct watch_adapter *watch;
240 if (!is_xenstored_ready())
243 if ((len + u->len) > sizeof(u->u.buffer)) {
248 if (copy_from_user(u->u.buffer + u->len, ubuf, len) != 0) {
254 if ((u->len < sizeof(u->u.msg)) ||
255 (u->len < (sizeof(u->u.msg) + u->u.msg.len)))
258 msg_type = u->u.msg.type;
263 static const char XS_RESP[] = "OK";
264 struct xsd_sockmsg hdr;
266 path = u->u.buffer + sizeof(u->u.msg);
267 token = memchr(path, 0, u->u.msg.len);
273 if (memchr(token, 0, u->u.msg.len - (token - path)) == NULL) {
278 if (msg_type == XS_WATCH) {
279 watch = kzalloc(sizeof(*watch), GFP_KERNEL);
284 watch->watch.node = kstrdup(path, GFP_KERNEL);
285 watch->watch.callback = watch_fired;
286 watch->token = kstrdup(token, GFP_KERNEL);
289 err = watch->watch.node && watch->token
290 ? register_xenbus_watch(&watch->watch) : -ENOMEM;
292 free_watch_adapter(watch);
297 list_add(&watch->list, &u->watches);
299 list_for_each_entry(watch, &u->watches, list) {
300 if (!strcmp(watch->token, token) &&
301 !strcmp(watch->watch.node, path))
303 unregister_xenbus_watch(&watch->watch);
304 list_del(&watch->list);
305 free_watch_adapter(watch);
312 hdr.len = sizeof(XS_RESP);
313 mutex_lock(&u->reply_mutex);
314 err = queue_reply(&queue, &hdr, sizeof(hdr))
315 ?: queue_reply(&queue, XS_RESP, hdr.len);
319 case XS_TRANSACTION_START:
320 trans = kmalloc(sizeof(*trans), GFP_KERNEL);
327 case XS_TRANSACTION_END:
328 list_for_each_entry(trans, &u->transactions, list)
329 if (trans->handle.id == u->u.msg.tx_id)
331 if (&trans->list == &u->transactions) {
338 reply = xenbus_dev_request_and_reply(&u->u.msg);
340 if (msg_type == XS_TRANSACTION_START)
346 if (msg_type == XS_TRANSACTION_START) {
347 trans->handle.id = simple_strtoul(reply, NULL, 0);
348 list_add(&trans->list, &u->transactions);
349 } else if (msg_type == XS_TRANSACTION_END) {
350 list_del(&trans->list);
353 mutex_lock(&u->reply_mutex);
354 err = queue_reply(&queue, &u->u.msg, sizeof(u->u.msg))
355 ?: queue_reply(&queue, reply, u->u.msg.len);
359 queue_flush(u, &queue, err);
360 mutex_unlock(&u->reply_mutex);
370 static int xenbus_dev_open(struct inode *inode, struct file *filp)
372 struct xenbus_dev_data *u;
374 if (xen_store_evtchn == 0)
377 nonseekable_open(inode, filp);
379 u = kzalloc(sizeof(*u), GFP_KERNEL);
383 INIT_LIST_HEAD(&u->transactions);
384 INIT_LIST_HEAD(&u->watches);
385 INIT_LIST_HEAD(&u->read_buffers);
386 init_waitqueue_head(&u->read_waitq);
388 mutex_init(&u->reply_mutex);
390 filp->private_data = u;
395 static int xenbus_dev_release(struct inode *inode, struct file *filp)
397 struct xenbus_dev_data *u = filp->private_data;
398 struct xenbus_dev_transaction *trans, *tmp;
399 struct watch_adapter *watch, *tmp_watch;
400 struct read_buffer *rb, *tmp_rb;
402 list_for_each_entry_safe(trans, tmp, &u->transactions, list) {
403 xenbus_transaction_end(trans->handle, 1);
404 list_del(&trans->list);
408 list_for_each_entry_safe(watch, tmp_watch, &u->watches, list) {
409 unregister_xenbus_watch(&watch->watch);
410 list_del(&watch->list);
411 free_watch_adapter(watch);
414 list_for_each_entry_safe(rb, tmp_rb, &u->read_buffers, list) {
423 static unsigned int xenbus_dev_poll(struct file *file, poll_table *wait)
425 struct xenbus_dev_data *u = file->private_data;
427 if (!is_xenstored_ready())
430 poll_wait(file, &u->read_waitq, wait);
431 if (!list_empty(&u->read_buffers))
432 return POLLIN | POLLRDNORM;
436 #ifdef CONFIG_XEN_PRIVILEGED_GUEST
437 static long xenbus_dev_ioctl(struct file *file,
438 unsigned int cmd, unsigned long data)
440 void __user *udata = (void __user *) data;
443 if (!is_initial_xendomain())
448 case IOCTL_XENBUS_ALLOC: {
452 old = atomic_cmpxchg(&xenbus_xsd_state,
453 XENBUS_XSD_UNCOMMITTED,
454 XENBUS_XSD_FOREIGN_INIT);
455 if (old != XENBUS_XSD_UNCOMMITTED)
458 if (copy_from_user(&xa, udata, sizeof(xa))) {
460 atomic_set(&xenbus_xsd_state, XENBUS_XSD_UNCOMMITTED);
464 ret = xenbus_conn(xa.dom, &xa.grant_ref, &xa.port);
466 atomic_set(&xenbus_xsd_state, XENBUS_XSD_UNCOMMITTED);
470 if (copy_to_user(udata, &xa, sizeof(xa))) {
472 atomic_set(&xenbus_xsd_state, XENBUS_XSD_UNCOMMITTED);
486 static const struct file_operations xenbus_dev_file_ops = {
487 .read = xenbus_dev_read,
488 .write = xenbus_dev_write,
489 .open = xenbus_dev_open,
490 .release = xenbus_dev_release,
492 .poll = xenbus_dev_poll,
493 #ifdef CONFIG_XEN_PRIVILEGED_GUEST
494 .unlocked_ioctl = xenbus_dev_ioctl
504 xenbus_dev_init(void)
506 xenbus_dev_intf = create_xen_proc_entry("xenbus", 0400);
508 xenbus_dev_intf->proc_fops = &xenbus_dev_file_ops;