Merge branch 'upstream-linus' of git://git.kernel.org/pub/scm/linux/kernel/git/jgarzi...
[linux-2.6] / fs / ocfs2 / stack_user.c
1 /* -*- mode: c; c-basic-offset: 8; -*-
2  * vim: noexpandtab sw=8 ts=8 sts=0:
3  *
4  * stack_user.c
5  *
6  * Code which interfaces ocfs2 with fs/dlm and a userspace stack.
7  *
8  * Copyright (C) 2007 Oracle.  All rights reserved.
9  *
10  * This program is free software; you can redistribute it and/or
11  * modify it under the terms of the GNU General Public
12  * License as published by the Free Software Foundation, version 2.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
17  * General Public License for more details.
18  */
19
20 #include <linux/module.h>
21 #include <linux/fs.h>
22 #include <linux/miscdevice.h>
23 #include <linux/mutex.h>
24 #include <linux/smp_lock.h>
25 #include <linux/reboot.h>
26 #include <asm/uaccess.h>
27
28 #include "ocfs2.h"  /* For struct ocfs2_lock_res */
29 #include "stackglue.h"
30
31
32 /*
33  * The control protocol starts with a handshake.  Until the handshake
34  * is complete, the control device will fail all write(2)s.
35  *
36  * The handshake is simple.  First, the client reads until EOF.  Each line
37  * of output is a supported protocol tag.  All protocol tags are a single
38  * character followed by a two hex digit version number.  Currently the
39  * only things supported is T01, for "Text-base version 0x01".  Next, the
40  * client writes the version they would like to use, including the newline.
41  * Thus, the protocol tag is 'T01\n'.  If the version tag written is
42  * unknown, -EINVAL is returned.  Once the negotiation is complete, the
43  * client can start sending messages.
44  *
45  * The T01 protocol has three messages.  First is the "SETN" message.
46  * It has the following syntax:
47  *
48  *  SETN<space><8-char-hex-nodenum><newline>
49  *
50  * This is 14 characters.
51  *
52  * The "SETN" message must be the first message following the protocol.
53  * It tells ocfs2_control the local node number.
54  *
55  * Next comes the "SETV" message.  It has the following syntax:
56  *
57  *  SETV<space><2-char-hex-major><space><2-char-hex-minor><newline>
58  *
59  * This is 11 characters.
60  *
61  * The "SETV" message sets the filesystem locking protocol version as
62  * negotiated by the client.  The client negotiates based on the maximum
63  * version advertised in /sys/fs/ocfs2/max_locking_protocol.  The major
64  * number from the "SETV" message must match
65  * ocfs2_user_plugin.sp_proto->lp_max_version.pv_major, and the minor number
66  * must be less than or equal to ...->lp_max_version.pv_minor.
67  *
68  * Once this information has been set, mounts will be allowed.  From this
69  * point on, the "DOWN" message can be sent for node down notification.
70  * It has the following syntax:
71  *
72  *  DOWN<space><32-char-cap-hex-uuid><space><8-char-hex-nodenum><newline>
73  *
74  * eg:
75  *
76  *  DOWN 632A924FDD844190BDA93C0DF6B94899 00000001\n
77  *
78  * This is 47 characters.
79  */
80
81 /*
82  * Whether or not the client has done the handshake.
83  * For now, we have just one protocol version.
84  */
85 #define OCFS2_CONTROL_PROTO                     "T01\n"
86 #define OCFS2_CONTROL_PROTO_LEN                 4
87
88 /* Handshake states */
89 #define OCFS2_CONTROL_HANDSHAKE_INVALID         (0)
90 #define OCFS2_CONTROL_HANDSHAKE_READ            (1)
91 #define OCFS2_CONTROL_HANDSHAKE_PROTOCOL        (2)
92 #define OCFS2_CONTROL_HANDSHAKE_VALID           (3)
93
94 /* Messages */
95 #define OCFS2_CONTROL_MESSAGE_OP_LEN            4
96 #define OCFS2_CONTROL_MESSAGE_SETNODE_OP        "SETN"
97 #define OCFS2_CONTROL_MESSAGE_SETNODE_TOTAL_LEN 14
98 #define OCFS2_CONTROL_MESSAGE_SETVERSION_OP     "SETV"
99 #define OCFS2_CONTROL_MESSAGE_SETVERSION_TOTAL_LEN      11
100 #define OCFS2_CONTROL_MESSAGE_DOWN_OP           "DOWN"
101 #define OCFS2_CONTROL_MESSAGE_DOWN_TOTAL_LEN    47
102 #define OCFS2_TEXT_UUID_LEN                     32
103 #define OCFS2_CONTROL_MESSAGE_VERNUM_LEN        2
104 #define OCFS2_CONTROL_MESSAGE_NODENUM_LEN       8
105
106 /*
107  * ocfs2_live_connection is refcounted because the filesystem and
108  * miscdevice sides can detach in different order.  Let's just be safe.
109  */
110 struct ocfs2_live_connection {
111         struct list_head                oc_list;
112         struct ocfs2_cluster_connection *oc_conn;
113 };
114
115 struct ocfs2_control_private {
116         struct list_head op_list;
117         int op_state;
118         int op_this_node;
119         struct ocfs2_protocol_version op_proto;
120 };
121
122 /* SETN<space><8-char-hex-nodenum><newline> */
123 struct ocfs2_control_message_setn {
124         char    tag[OCFS2_CONTROL_MESSAGE_OP_LEN];
125         char    space;
126         char    nodestr[OCFS2_CONTROL_MESSAGE_NODENUM_LEN];
127         char    newline;
128 };
129
130 /* SETV<space><2-char-hex-major><space><2-char-hex-minor><newline> */
131 struct ocfs2_control_message_setv {
132         char    tag[OCFS2_CONTROL_MESSAGE_OP_LEN];
133         char    space1;
134         char    major[OCFS2_CONTROL_MESSAGE_VERNUM_LEN];
135         char    space2;
136         char    minor[OCFS2_CONTROL_MESSAGE_VERNUM_LEN];
137         char    newline;
138 };
139
140 /* DOWN<space><32-char-cap-hex-uuid><space><8-char-hex-nodenum><newline> */
141 struct ocfs2_control_message_down {
142         char    tag[OCFS2_CONTROL_MESSAGE_OP_LEN];
143         char    space1;
144         char    uuid[OCFS2_TEXT_UUID_LEN];
145         char    space2;
146         char    nodestr[OCFS2_CONTROL_MESSAGE_NODENUM_LEN];
147         char    newline;
148 };
149
150 union ocfs2_control_message {
151         char                                    tag[OCFS2_CONTROL_MESSAGE_OP_LEN];
152         struct ocfs2_control_message_setn       u_setn;
153         struct ocfs2_control_message_setv       u_setv;
154         struct ocfs2_control_message_down       u_down;
155 };
156
157 static struct ocfs2_stack_plugin ocfs2_user_plugin;
158
159 static atomic_t ocfs2_control_opened;
160 static int ocfs2_control_this_node = -1;
161 static struct ocfs2_protocol_version running_proto;
162
163 static LIST_HEAD(ocfs2_live_connection_list);
164 static LIST_HEAD(ocfs2_control_private_list);
165 static DEFINE_MUTEX(ocfs2_control_lock);
166
167 static inline void ocfs2_control_set_handshake_state(struct file *file,
168                                                      int state)
169 {
170         struct ocfs2_control_private *p = file->private_data;
171         p->op_state = state;
172 }
173
174 static inline int ocfs2_control_get_handshake_state(struct file *file)
175 {
176         struct ocfs2_control_private *p = file->private_data;
177         return p->op_state;
178 }
179
180 static struct ocfs2_live_connection *ocfs2_connection_find(const char *name)
181 {
182         size_t len = strlen(name);
183         struct ocfs2_live_connection *c;
184
185         BUG_ON(!mutex_is_locked(&ocfs2_control_lock));
186
187         list_for_each_entry(c, &ocfs2_live_connection_list, oc_list) {
188                 if ((c->oc_conn->cc_namelen == len) &&
189                     !strncmp(c->oc_conn->cc_name, name, len))
190                         return c;
191         }
192
193         return c;
194 }
195
196 /*
197  * ocfs2_live_connection structures are created underneath the ocfs2
198  * mount path.  Since the VFS prevents multiple calls to
199  * fill_super(), we can't get dupes here.
200  */
201 static int ocfs2_live_connection_new(struct ocfs2_cluster_connection *conn,
202                                      struct ocfs2_live_connection **c_ret)
203 {
204         int rc = 0;
205         struct ocfs2_live_connection *c;
206
207         c = kzalloc(sizeof(struct ocfs2_live_connection), GFP_KERNEL);
208         if (!c)
209                 return -ENOMEM;
210
211         mutex_lock(&ocfs2_control_lock);
212         c->oc_conn = conn;
213
214         if (atomic_read(&ocfs2_control_opened))
215                 list_add(&c->oc_list, &ocfs2_live_connection_list);
216         else {
217                 printk(KERN_ERR
218                        "ocfs2: Userspace control daemon is not present\n");
219                 rc = -ESRCH;
220         }
221
222         mutex_unlock(&ocfs2_control_lock);
223
224         if (!rc)
225                 *c_ret = c;
226         else
227                 kfree(c);
228
229         return rc;
230 }
231
232 /*
233  * This function disconnects the cluster connection from ocfs2_control.
234  * Afterwards, userspace can't affect the cluster connection.
235  */
236 static void ocfs2_live_connection_drop(struct ocfs2_live_connection *c)
237 {
238         mutex_lock(&ocfs2_control_lock);
239         list_del_init(&c->oc_list);
240         c->oc_conn = NULL;
241         mutex_unlock(&ocfs2_control_lock);
242
243         kfree(c);
244 }
245
246 static int ocfs2_control_cfu(void *target, size_t target_len,
247                              const char __user *buf, size_t count)
248 {
249         /* The T01 expects write(2) calls to have exactly one command */
250         if ((count != target_len) ||
251             (count > sizeof(union ocfs2_control_message)))
252                 return -EINVAL;
253
254         if (copy_from_user(target, buf, target_len))
255                 return -EFAULT;
256
257         return 0;
258 }
259
260 static ssize_t ocfs2_control_validate_protocol(struct file *file,
261                                                const char __user *buf,
262                                                size_t count)
263 {
264         ssize_t ret;
265         char kbuf[OCFS2_CONTROL_PROTO_LEN];
266
267         ret = ocfs2_control_cfu(kbuf, OCFS2_CONTROL_PROTO_LEN,
268                                 buf, count);
269         if (ret)
270                 return ret;
271
272         if (strncmp(kbuf, OCFS2_CONTROL_PROTO, OCFS2_CONTROL_PROTO_LEN))
273                 return -EINVAL;
274
275         ocfs2_control_set_handshake_state(file,
276                                           OCFS2_CONTROL_HANDSHAKE_PROTOCOL);
277
278         return count;
279 }
280
281 static void ocfs2_control_send_down(const char *uuid,
282                                     int nodenum)
283 {
284         struct ocfs2_live_connection *c;
285
286         mutex_lock(&ocfs2_control_lock);
287
288         c = ocfs2_connection_find(uuid);
289         if (c) {
290                 BUG_ON(c->oc_conn == NULL);
291                 c->oc_conn->cc_recovery_handler(nodenum,
292                                                 c->oc_conn->cc_recovery_data);
293         }
294
295         mutex_unlock(&ocfs2_control_lock);
296 }
297
298 /*
299  * Called whenever configuration elements are sent to /dev/ocfs2_control.
300  * If all configuration elements are present, try to set the global
301  * values.  If there is a problem, return an error.  Skip any missing
302  * elements, and only bump ocfs2_control_opened when we have all elements
303  * and are successful.
304  */
305 static int ocfs2_control_install_private(struct file *file)
306 {
307         int rc = 0;
308         int set_p = 1;
309         struct ocfs2_control_private *p = file->private_data;
310
311         BUG_ON(p->op_state != OCFS2_CONTROL_HANDSHAKE_PROTOCOL);
312
313         mutex_lock(&ocfs2_control_lock);
314
315         if (p->op_this_node < 0) {
316                 set_p = 0;
317         } else if ((ocfs2_control_this_node >= 0) &&
318                    (ocfs2_control_this_node != p->op_this_node)) {
319                 rc = -EINVAL;
320                 goto out_unlock;
321         }
322
323         if (!p->op_proto.pv_major) {
324                 set_p = 0;
325         } else if (!list_empty(&ocfs2_live_connection_list) &&
326                    ((running_proto.pv_major != p->op_proto.pv_major) ||
327                     (running_proto.pv_minor != p->op_proto.pv_minor))) {
328                 rc = -EINVAL;
329                 goto out_unlock;
330         }
331
332         if (set_p) {
333                 ocfs2_control_this_node = p->op_this_node;
334                 running_proto.pv_major = p->op_proto.pv_major;
335                 running_proto.pv_minor = p->op_proto.pv_minor;
336         }
337
338 out_unlock:
339         mutex_unlock(&ocfs2_control_lock);
340
341         if (!rc && set_p) {
342                 /* We set the global values successfully */
343                 atomic_inc(&ocfs2_control_opened);
344                 ocfs2_control_set_handshake_state(file,
345                                         OCFS2_CONTROL_HANDSHAKE_VALID);
346         }
347
348         return rc;
349 }
350
351 static int ocfs2_control_get_this_node(void)
352 {
353         int rc;
354
355         mutex_lock(&ocfs2_control_lock);
356         if (ocfs2_control_this_node < 0)
357                 rc = -EINVAL;
358         else
359                 rc = ocfs2_control_this_node;
360         mutex_unlock(&ocfs2_control_lock);
361
362         return rc;
363 }
364
365 static int ocfs2_control_do_setnode_msg(struct file *file,
366                                         struct ocfs2_control_message_setn *msg)
367 {
368         long nodenum;
369         char *ptr = NULL;
370         struct ocfs2_control_private *p = file->private_data;
371
372         if (ocfs2_control_get_handshake_state(file) !=
373             OCFS2_CONTROL_HANDSHAKE_PROTOCOL)
374                 return -EINVAL;
375
376         if (strncmp(msg->tag, OCFS2_CONTROL_MESSAGE_SETNODE_OP,
377                     OCFS2_CONTROL_MESSAGE_OP_LEN))
378                 return -EINVAL;
379
380         if ((msg->space != ' ') || (msg->newline != '\n'))
381                 return -EINVAL;
382         msg->space = msg->newline = '\0';
383
384         nodenum = simple_strtol(msg->nodestr, &ptr, 16);
385         if (!ptr || *ptr)
386                 return -EINVAL;
387
388         if ((nodenum == LONG_MIN) || (nodenum == LONG_MAX) ||
389             (nodenum > INT_MAX) || (nodenum < 0))
390                 return -ERANGE;
391         p->op_this_node = nodenum;
392
393         return ocfs2_control_install_private(file);
394 }
395
396 static int ocfs2_control_do_setversion_msg(struct file *file,
397                                            struct ocfs2_control_message_setv *msg)
398  {
399         long major, minor;
400         char *ptr = NULL;
401         struct ocfs2_control_private *p = file->private_data;
402         struct ocfs2_protocol_version *max =
403                 &ocfs2_user_plugin.sp_proto->lp_max_version;
404
405         if (ocfs2_control_get_handshake_state(file) !=
406             OCFS2_CONTROL_HANDSHAKE_PROTOCOL)
407                 return -EINVAL;
408
409         if (strncmp(msg->tag, OCFS2_CONTROL_MESSAGE_SETVERSION_OP,
410                     OCFS2_CONTROL_MESSAGE_OP_LEN))
411                 return -EINVAL;
412
413         if ((msg->space1 != ' ') || (msg->space2 != ' ') ||
414             (msg->newline != '\n'))
415                 return -EINVAL;
416         msg->space1 = msg->space2 = msg->newline = '\0';
417
418         major = simple_strtol(msg->major, &ptr, 16);
419         if (!ptr || *ptr)
420                 return -EINVAL;
421         minor = simple_strtol(msg->minor, &ptr, 16);
422         if (!ptr || *ptr)
423                 return -EINVAL;
424
425         /*
426          * The major must be between 1 and 255, inclusive.  The minor
427          * must be between 0 and 255, inclusive.  The version passed in
428          * must be within the maximum version supported by the filesystem.
429          */
430         if ((major == LONG_MIN) || (major == LONG_MAX) ||
431             (major > (u8)-1) || (major < 1))
432                 return -ERANGE;
433         if ((minor == LONG_MIN) || (minor == LONG_MAX) ||
434             (minor > (u8)-1) || (minor < 0))
435                 return -ERANGE;
436         if ((major != max->pv_major) ||
437             (minor > max->pv_minor))
438                 return -EINVAL;
439
440         p->op_proto.pv_major = major;
441         p->op_proto.pv_minor = minor;
442
443         return ocfs2_control_install_private(file);
444 }
445
446 static int ocfs2_control_do_down_msg(struct file *file,
447                                      struct ocfs2_control_message_down *msg)
448 {
449         long nodenum;
450         char *p = NULL;
451
452         if (ocfs2_control_get_handshake_state(file) !=
453             OCFS2_CONTROL_HANDSHAKE_VALID)
454                 return -EINVAL;
455
456         if (strncmp(msg->tag, OCFS2_CONTROL_MESSAGE_DOWN_OP,
457                     OCFS2_CONTROL_MESSAGE_OP_LEN))
458                 return -EINVAL;
459
460         if ((msg->space1 != ' ') || (msg->space2 != ' ') ||
461             (msg->newline != '\n'))
462                 return -EINVAL;
463         msg->space1 = msg->space2 = msg->newline = '\0';
464
465         nodenum = simple_strtol(msg->nodestr, &p, 16);
466         if (!p || *p)
467                 return -EINVAL;
468
469         if ((nodenum == LONG_MIN) || (nodenum == LONG_MAX) ||
470             (nodenum > INT_MAX) || (nodenum < 0))
471                 return -ERANGE;
472
473         ocfs2_control_send_down(msg->uuid, nodenum);
474
475         return 0;
476 }
477
478 static ssize_t ocfs2_control_message(struct file *file,
479                                      const char __user *buf,
480                                      size_t count)
481 {
482         ssize_t ret;
483         union ocfs2_control_message msg;
484
485         /* Try to catch padding issues */
486         WARN_ON(offsetof(struct ocfs2_control_message_down, uuid) !=
487                 (sizeof(msg.u_down.tag) + sizeof(msg.u_down.space1)));
488
489         memset(&msg, 0, sizeof(union ocfs2_control_message));
490         ret = ocfs2_control_cfu(&msg, count, buf, count);
491         if (ret)
492                 goto out;
493
494         if ((count == OCFS2_CONTROL_MESSAGE_SETNODE_TOTAL_LEN) &&
495             !strncmp(msg.tag, OCFS2_CONTROL_MESSAGE_SETNODE_OP,
496                      OCFS2_CONTROL_MESSAGE_OP_LEN))
497                 ret = ocfs2_control_do_setnode_msg(file, &msg.u_setn);
498         else if ((count == OCFS2_CONTROL_MESSAGE_SETVERSION_TOTAL_LEN) &&
499                  !strncmp(msg.tag, OCFS2_CONTROL_MESSAGE_SETVERSION_OP,
500                           OCFS2_CONTROL_MESSAGE_OP_LEN))
501                 ret = ocfs2_control_do_setversion_msg(file, &msg.u_setv);
502         else if ((count == OCFS2_CONTROL_MESSAGE_DOWN_TOTAL_LEN) &&
503                  !strncmp(msg.tag, OCFS2_CONTROL_MESSAGE_DOWN_OP,
504                           OCFS2_CONTROL_MESSAGE_OP_LEN))
505                 ret = ocfs2_control_do_down_msg(file, &msg.u_down);
506         else
507                 ret = -EINVAL;
508
509 out:
510         return ret ? ret : count;
511 }
512
513 static ssize_t ocfs2_control_write(struct file *file,
514                                    const char __user *buf,
515                                    size_t count,
516                                    loff_t *ppos)
517 {
518         ssize_t ret;
519
520         switch (ocfs2_control_get_handshake_state(file)) {
521                 case OCFS2_CONTROL_HANDSHAKE_INVALID:
522                         ret = -EINVAL;
523                         break;
524
525                 case OCFS2_CONTROL_HANDSHAKE_READ:
526                         ret = ocfs2_control_validate_protocol(file, buf,
527                                                               count);
528                         break;
529
530                 case OCFS2_CONTROL_HANDSHAKE_PROTOCOL:
531                 case OCFS2_CONTROL_HANDSHAKE_VALID:
532                         ret = ocfs2_control_message(file, buf, count);
533                         break;
534
535                 default:
536                         BUG();
537                         ret = -EIO;
538                         break;
539         }
540
541         return ret;
542 }
543
544 /*
545  * This is a naive version.  If we ever have a new protocol, we'll expand
546  * it.  Probably using seq_file.
547  */
548 static ssize_t ocfs2_control_read(struct file *file,
549                                   char __user *buf,
550                                   size_t count,
551                                   loff_t *ppos)
552 {
553         char *proto_string = OCFS2_CONTROL_PROTO;
554         size_t to_write = 0;
555
556         if (*ppos >= OCFS2_CONTROL_PROTO_LEN)
557                 return 0;
558
559         to_write = OCFS2_CONTROL_PROTO_LEN - *ppos;
560         if (to_write > count)
561                 to_write = count;
562         if (copy_to_user(buf, proto_string + *ppos, to_write))
563                 return -EFAULT;
564
565         *ppos += to_write;
566
567         /* Have we read the whole protocol list? */
568         if (*ppos >= OCFS2_CONTROL_PROTO_LEN)
569                 ocfs2_control_set_handshake_state(file,
570                                                   OCFS2_CONTROL_HANDSHAKE_READ);
571
572         return to_write;
573 }
574
575 static int ocfs2_control_release(struct inode *inode, struct file *file)
576 {
577         struct ocfs2_control_private *p = file->private_data;
578
579         mutex_lock(&ocfs2_control_lock);
580
581         if (ocfs2_control_get_handshake_state(file) !=
582             OCFS2_CONTROL_HANDSHAKE_VALID)
583                 goto out;
584
585         if (atomic_dec_and_test(&ocfs2_control_opened)) {
586                 if (!list_empty(&ocfs2_live_connection_list)) {
587                         /* XXX: Do bad things! */
588                         printk(KERN_ERR
589                                "ocfs2: Unexpected release of ocfs2_control!\n"
590                                "       Loss of cluster connection requires "
591                                "an emergency restart!\n");
592                         emergency_restart();
593                 }
594                 /*
595                  * Last valid close clears the node number and resets
596                  * the locking protocol version
597                  */
598                 ocfs2_control_this_node = -1;
599                 running_proto.pv_major = 0;
600                 running_proto.pv_major = 0;
601         }
602
603 out:
604         list_del_init(&p->op_list);
605         file->private_data = NULL;
606
607         mutex_unlock(&ocfs2_control_lock);
608
609         kfree(p);
610
611         return 0;
612 }
613
614 static int ocfs2_control_open(struct inode *inode, struct file *file)
615 {
616         struct ocfs2_control_private *p;
617
618         p = kzalloc(sizeof(struct ocfs2_control_private), GFP_KERNEL);
619         if (!p)
620                 return -ENOMEM;
621         p->op_this_node = -1;
622
623         lock_kernel();
624         mutex_lock(&ocfs2_control_lock);
625         file->private_data = p;
626         list_add(&p->op_list, &ocfs2_control_private_list);
627         mutex_unlock(&ocfs2_control_lock);
628         unlock_kernel();
629
630         return 0;
631 }
632
633 static const struct file_operations ocfs2_control_fops = {
634         .open    = ocfs2_control_open,
635         .release = ocfs2_control_release,
636         .read    = ocfs2_control_read,
637         .write   = ocfs2_control_write,
638         .owner   = THIS_MODULE,
639 };
640
641 static struct miscdevice ocfs2_control_device = {
642         .minor          = MISC_DYNAMIC_MINOR,
643         .name           = "ocfs2_control",
644         .fops           = &ocfs2_control_fops,
645 };
646
647 static int ocfs2_control_init(void)
648 {
649         int rc;
650
651         atomic_set(&ocfs2_control_opened, 0);
652
653         rc = misc_register(&ocfs2_control_device);
654         if (rc)
655                 printk(KERN_ERR
656                        "ocfs2: Unable to register ocfs2_control device "
657                        "(errno %d)\n",
658                        -rc);
659
660         return rc;
661 }
662
663 static void ocfs2_control_exit(void)
664 {
665         int rc;
666
667         rc = misc_deregister(&ocfs2_control_device);
668         if (rc)
669                 printk(KERN_ERR
670                        "ocfs2: Unable to deregister ocfs2_control device "
671                        "(errno %d)\n",
672                        -rc);
673 }
674
675 static struct dlm_lksb *fsdlm_astarg_to_lksb(void *astarg)
676 {
677         struct ocfs2_lock_res *res = astarg;
678         return &res->l_lksb.lksb_fsdlm;
679 }
680
681 static void fsdlm_lock_ast_wrapper(void *astarg)
682 {
683         struct dlm_lksb *lksb = fsdlm_astarg_to_lksb(astarg);
684         int status = lksb->sb_status;
685
686         BUG_ON(ocfs2_user_plugin.sp_proto == NULL);
687
688         /*
689          * For now we're punting on the issue of other non-standard errors
690          * where we can't tell if the unlock_ast or lock_ast should be called.
691          * The main "other error" that's possible is EINVAL which means the
692          * function was called with invalid args, which shouldn't be possible
693          * since the caller here is under our control.  Other non-standard
694          * errors probably fall into the same category, or otherwise are fatal
695          * which means we can't carry on anyway.
696          */
697
698         if (status == -DLM_EUNLOCK || status == -DLM_ECANCEL)
699                 ocfs2_user_plugin.sp_proto->lp_unlock_ast(astarg, 0);
700         else
701                 ocfs2_user_plugin.sp_proto->lp_lock_ast(astarg);
702 }
703
704 static void fsdlm_blocking_ast_wrapper(void *astarg, int level)
705 {
706         BUG_ON(ocfs2_user_plugin.sp_proto == NULL);
707
708         ocfs2_user_plugin.sp_proto->lp_blocking_ast(astarg, level);
709 }
710
711 static int user_dlm_lock(struct ocfs2_cluster_connection *conn,
712                          int mode,
713                          union ocfs2_dlm_lksb *lksb,
714                          u32 flags,
715                          void *name,
716                          unsigned int namelen,
717                          void *astarg)
718 {
719         int ret;
720
721         if (!lksb->lksb_fsdlm.sb_lvbptr)
722                 lksb->lksb_fsdlm.sb_lvbptr = (char *)lksb +
723                                              sizeof(struct dlm_lksb);
724
725         ret = dlm_lock(conn->cc_lockspace, mode, &lksb->lksb_fsdlm,
726                        flags|DLM_LKF_NODLCKWT, name, namelen, 0,
727                        fsdlm_lock_ast_wrapper, astarg,
728                        fsdlm_blocking_ast_wrapper);
729         return ret;
730 }
731
732 static int user_dlm_unlock(struct ocfs2_cluster_connection *conn,
733                            union ocfs2_dlm_lksb *lksb,
734                            u32 flags,
735                            void *astarg)
736 {
737         int ret;
738
739         ret = dlm_unlock(conn->cc_lockspace, lksb->lksb_fsdlm.sb_lkid,
740                          flags, &lksb->lksb_fsdlm, astarg);
741         return ret;
742 }
743
744 static int user_dlm_lock_status(union ocfs2_dlm_lksb *lksb)
745 {
746         return lksb->lksb_fsdlm.sb_status;
747 }
748
749 static void *user_dlm_lvb(union ocfs2_dlm_lksb *lksb)
750 {
751         return (void *)(lksb->lksb_fsdlm.sb_lvbptr);
752 }
753
754 static void user_dlm_dump_lksb(union ocfs2_dlm_lksb *lksb)
755 {
756 }
757
758 /*
759  * Compare a requested locking protocol version against the current one.
760  *
761  * If the major numbers are different, they are incompatible.
762  * If the current minor is greater than the request, they are incompatible.
763  * If the current minor is less than or equal to the request, they are
764  * compatible, and the requester should run at the current minor version.
765  */
766 static int fs_protocol_compare(struct ocfs2_protocol_version *existing,
767                                struct ocfs2_protocol_version *request)
768 {
769         if (existing->pv_major != request->pv_major)
770                 return 1;
771
772         if (existing->pv_minor > request->pv_minor)
773                 return 1;
774
775         if (existing->pv_minor < request->pv_minor)
776                 request->pv_minor = existing->pv_minor;
777
778         return 0;
779 }
780
781 static int user_cluster_connect(struct ocfs2_cluster_connection *conn)
782 {
783         dlm_lockspace_t *fsdlm;
784         struct ocfs2_live_connection *control;
785         int rc = 0;
786
787         BUG_ON(conn == NULL);
788
789         rc = ocfs2_live_connection_new(conn, &control);
790         if (rc)
791                 goto out;
792
793         /*
794          * running_proto must have been set before we allowed any mounts
795          * to proceed.
796          */
797         if (fs_protocol_compare(&running_proto, &conn->cc_version)) {
798                 printk(KERN_ERR
799                        "Unable to mount with fs locking protocol version "
800                        "%u.%u because the userspace control daemon has "
801                        "negotiated %u.%u\n",
802                        conn->cc_version.pv_major, conn->cc_version.pv_minor,
803                        running_proto.pv_major, running_proto.pv_minor);
804                 rc = -EPROTO;
805                 ocfs2_live_connection_drop(control);
806                 goto out;
807         }
808
809         rc = dlm_new_lockspace(conn->cc_name, strlen(conn->cc_name),
810                                &fsdlm, DLM_LSFL_FS, DLM_LVB_LEN);
811         if (rc) {
812                 ocfs2_live_connection_drop(control);
813                 goto out;
814         }
815
816         conn->cc_private = control;
817         conn->cc_lockspace = fsdlm;
818 out:
819         return rc;
820 }
821
822 static int user_cluster_disconnect(struct ocfs2_cluster_connection *conn)
823 {
824         dlm_release_lockspace(conn->cc_lockspace, 2);
825         conn->cc_lockspace = NULL;
826         ocfs2_live_connection_drop(conn->cc_private);
827         conn->cc_private = NULL;
828         return 0;
829 }
830
831 static int user_cluster_this_node(unsigned int *this_node)
832 {
833         int rc;
834
835         rc = ocfs2_control_get_this_node();
836         if (rc < 0)
837                 return rc;
838
839         *this_node = rc;
840         return 0;
841 }
842
843 static struct ocfs2_stack_operations ocfs2_user_plugin_ops = {
844         .connect        = user_cluster_connect,
845         .disconnect     = user_cluster_disconnect,
846         .this_node      = user_cluster_this_node,
847         .dlm_lock       = user_dlm_lock,
848         .dlm_unlock     = user_dlm_unlock,
849         .lock_status    = user_dlm_lock_status,
850         .lock_lvb       = user_dlm_lvb,
851         .dump_lksb      = user_dlm_dump_lksb,
852 };
853
854 static struct ocfs2_stack_plugin ocfs2_user_plugin = {
855         .sp_name        = "user",
856         .sp_ops         = &ocfs2_user_plugin_ops,
857         .sp_owner       = THIS_MODULE,
858 };
859
860
861 static int __init ocfs2_user_plugin_init(void)
862 {
863         int rc;
864
865         rc = ocfs2_control_init();
866         if (!rc) {
867                 rc = ocfs2_stack_glue_register(&ocfs2_user_plugin);
868                 if (rc)
869                         ocfs2_control_exit();
870         }
871
872         return rc;
873 }
874
875 static void __exit ocfs2_user_plugin_exit(void)
876 {
877         ocfs2_stack_glue_unregister(&ocfs2_user_plugin);
878         ocfs2_control_exit();
879 }
880
881 MODULE_AUTHOR("Oracle");
882 MODULE_DESCRIPTION("ocfs2 driver for userspace cluster stacks");
883 MODULE_LICENSE("GPL");
884 module_init(ocfs2_user_plugin_init);
885 module_exit(ocfs2_user_plugin_exit);