1// SPDX-License-Identifier: GPL-2.0-only
2/*
3 * stack_o2cb.c
4 *
5 * Code which interfaces ocfs2 with the o2cb stack.
6 *
7 * Copyright (C) 2007 Oracle. All rights reserved.
8 */
9
10#include <linux/kernel.h>
11#include <linux/crc32.h>
12#include <linux/slab.h>
13#include <linux/module.h>
14
15/* Needed for AOP_TRUNCATED_PAGE in mlog_errno() */
16#include <linux/fs.h>
17
18#include "cluster/masklog.h"
19#include "cluster/nodemanager.h"
20#include "cluster/heartbeat.h"
21#include "cluster/tcp.h"
22
23#include "stackglue.h"
24
25struct o2dlm_private {
26 struct dlm_eviction_cb op_eviction_cb;
27};
28
29static struct ocfs2_stack_plugin o2cb_stack;
30
31/* These should be identical */
32#if (DLM_LOCK_IV != LKM_IVMODE)
33# error Lock modes do not match
34#endif
35#if (DLM_LOCK_NL != LKM_NLMODE)
36# error Lock modes do not match
37#endif
38#if (DLM_LOCK_CR != LKM_CRMODE)
39# error Lock modes do not match
40#endif
41#if (DLM_LOCK_CW != LKM_CWMODE)
42# error Lock modes do not match
43#endif
44#if (DLM_LOCK_PR != LKM_PRMODE)
45# error Lock modes do not match
46#endif
47#if (DLM_LOCK_PW != LKM_PWMODE)
48# error Lock modes do not match
49#endif
50#if (DLM_LOCK_EX != LKM_EXMODE)
51# error Lock modes do not match
52#endif
53static inline int mode_to_o2dlm(int mode)
54{
55 BUG_ON(mode > LKM_MAXMODE);
56
57 return mode;
58}
59
60static int flags_to_o2dlm(u32 flags)
61{
62 int o2dlm_flags = 0;
63
64 if (flags & DLM_LKF_NOQUEUE)
65 o2dlm_flags |= LKM_NOQUEUE;
66 if (flags & DLM_LKF_CANCEL)
67 o2dlm_flags |= LKM_CANCEL;
68 if (flags & DLM_LKF_CONVERT)
69 o2dlm_flags |= LKM_CONVERT;
70 if (flags & DLM_LKF_VALBLK)
71 o2dlm_flags |= LKM_VALBLK;
72 if (flags & DLM_LKF_IVVALBLK)
73 o2dlm_flags |= LKM_INVVALBLK;
74 if (flags & DLM_LKF_ORPHAN)
75 o2dlm_flags |= LKM_ORPHAN;
76 if (flags & DLM_LKF_FORCEUNLOCK)
77 o2dlm_flags |= LKM_FORCE;
78 if (flags & DLM_LKF_TIMEOUT)
79 o2dlm_flags |= LKM_TIMEOUT;
80 if (flags & DLM_LKF_LOCAL)
81 o2dlm_flags |= LKM_LOCAL;
82
83 return o2dlm_flags;
84}
85
86/*
87 * Map an o2dlm status to standard errno values.
88 *
89 * o2dlm only uses a handful of these, and returns even fewer to the
90 * caller. Still, we try to assign sane values to each error.
91 *
92 * The following value pairs have special meanings to dlmglue, thus
93 * the right hand side needs to stay unique - never duplicate the
94 * mapping elsewhere in the table!
95 *
96 * DLM_NORMAL: 0
97 * DLM_NOTQUEUED: -EAGAIN
98 * DLM_CANCELGRANT: -EBUSY
99 * DLM_CANCEL: -DLM_ECANCEL
100 */
101/* Keep in sync with dlmapi.h */
102static int status_map[] = {
103 [DLM_NORMAL] = 0, /* Success */
104 [DLM_GRANTED] = -EINVAL,
105 [DLM_DENIED] = -EACCES,
106 [DLM_DENIED_NOLOCKS] = -EACCES,
107 [DLM_WORKING] = -EACCES,
108 [DLM_BLOCKED] = -EINVAL,
109 [DLM_BLOCKED_ORPHAN] = -EINVAL,
110 [DLM_DENIED_GRACE_PERIOD] = -EACCES,
111 [DLM_SYSERR] = -ENOMEM, /* It is what it is */
112 [DLM_NOSUPPORT] = -EPROTO,
113 [DLM_CANCELGRANT] = -EBUSY, /* Cancel after grant */
114 [DLM_IVLOCKID] = -EINVAL,
115 [DLM_SYNC] = -EINVAL,
116 [DLM_BADTYPE] = -EINVAL,
117 [DLM_BADRESOURCE] = -EINVAL,
118 [DLM_MAXHANDLES] = -ENOMEM,
119 [DLM_NOCLINFO] = -EINVAL,
120 [DLM_NOLOCKMGR] = -EINVAL,
121 [DLM_NOPURGED] = -EINVAL,
122 [DLM_BADARGS] = -EINVAL,
123 [DLM_VOID] = -EINVAL,
124 [DLM_NOTQUEUED] = -EAGAIN, /* Trylock failed */
125 [DLM_IVBUFLEN] = -EINVAL,
126 [DLM_CVTUNGRANT] = -EPERM,
127 [DLM_BADPARAM] = -EINVAL,
128 [DLM_VALNOTVALID] = -EINVAL,
129 [DLM_REJECTED] = -EPERM,
130 [DLM_ABORT] = -EINVAL,
131 [DLM_CANCEL] = -DLM_ECANCEL, /* Successful cancel */
132 [DLM_IVRESHANDLE] = -EINVAL,
133 [DLM_DEADLOCK] = -EDEADLK,
134 [DLM_DENIED_NOASTS] = -EINVAL,
135 [DLM_FORWARD] = -EINVAL,
136 [DLM_TIMEOUT] = -ETIMEDOUT,
137 [DLM_IVGROUPID] = -EINVAL,
138 [DLM_VERS_CONFLICT] = -EOPNOTSUPP,
139 [DLM_BAD_DEVICE_PATH] = -ENOENT,
140 [DLM_NO_DEVICE_PERMISSION] = -EPERM,
141 [DLM_NO_CONTROL_DEVICE] = -ENOENT,
142 [DLM_RECOVERING] = -ENOTCONN,
143 [DLM_MIGRATING] = -ERESTART,
144 [DLM_MAXSTATS] = -EINVAL,
145};
146
147static int dlm_status_to_errno(enum dlm_status status)
148{
149 BUG_ON(status < 0 || status >= ARRAY_SIZE(status_map));
150
151 return status_map[status];
152}
153
154static void o2dlm_lock_ast_wrapper(void *astarg)
155{
156 struct ocfs2_dlm_lksb *lksb = astarg;
157
158 lksb->lksb_conn->cc_proto->lp_lock_ast(lksb);
159}
160
161static void o2dlm_blocking_ast_wrapper(void *astarg, int level)
162{
163 struct ocfs2_dlm_lksb *lksb = astarg;
164
165 lksb->lksb_conn->cc_proto->lp_blocking_ast(lksb, level);
166}
167
168static void o2dlm_unlock_ast_wrapper(void *astarg, enum dlm_status status)
169{
170 struct ocfs2_dlm_lksb *lksb = astarg;
171 int error = dlm_status_to_errno(status);
172
173 /*
174 * In o2dlm, you can get both the lock_ast() for the lock being
175 * granted and the unlock_ast() for the CANCEL failing. A
176 * successful cancel sends DLM_NORMAL here. If the
177 * lock grant happened before the cancel arrived, you get
178 * DLM_CANCELGRANT.
179 *
180 * There's no need for the double-ast. If we see DLM_CANCELGRANT,
181 * we just ignore it. We expect the lock_ast() to handle the
182 * granted lock.
183 */
184 if (status == DLM_CANCELGRANT)
185 return;
186
187 lksb->lksb_conn->cc_proto->lp_unlock_ast(lksb, error);
188}
189
190static int o2cb_dlm_lock(struct ocfs2_cluster_connection *conn,
191 int mode,
192 struct ocfs2_dlm_lksb *lksb,
193 u32 flags,
194 void *name,
195 unsigned int namelen)
196{
197 enum dlm_status status;
198 int o2dlm_mode = mode_to_o2dlm(mode);
199 int o2dlm_flags = flags_to_o2dlm(flags);
200 int ret;
201
202 status = dlmlock(dlm: conn->cc_lockspace, mode: o2dlm_mode, lksb: &lksb->lksb_o2dlm,
203 flags: o2dlm_flags, name, namelen,
204 ast: o2dlm_lock_ast_wrapper, data: lksb,
205 bast: o2dlm_blocking_ast_wrapper);
206 ret = dlm_status_to_errno(status);
207 return ret;
208}
209
210static int o2cb_dlm_unlock(struct ocfs2_cluster_connection *conn,
211 struct ocfs2_dlm_lksb *lksb,
212 u32 flags)
213{
214 enum dlm_status status;
215 int o2dlm_flags = flags_to_o2dlm(flags);
216 int ret;
217
218 status = dlmunlock(dlm: conn->cc_lockspace, lksb: &lksb->lksb_o2dlm,
219 flags: o2dlm_flags, unlockast: o2dlm_unlock_ast_wrapper, data: lksb);
220 ret = dlm_status_to_errno(status);
221 return ret;
222}
223
224static int o2cb_dlm_lock_status(struct ocfs2_dlm_lksb *lksb)
225{
226 return dlm_status_to_errno(status: lksb->lksb_o2dlm.status);
227}
228
229/*
230 * o2dlm aways has a "valid" LVB. If the dlm loses track of the LVB
231 * contents, it will zero out the LVB. Thus the caller can always trust
232 * the contents.
233 */
234static int o2cb_dlm_lvb_valid(struct ocfs2_dlm_lksb *lksb)
235{
236 return 1;
237}
238
239static void *o2cb_dlm_lvb(struct ocfs2_dlm_lksb *lksb)
240{
241 return (void *)(lksb->lksb_o2dlm.lvb);
242}
243
244static void o2cb_dump_lksb(struct ocfs2_dlm_lksb *lksb)
245{
246 dlm_print_one_lock(lockid: lksb->lksb_o2dlm.lockid);
247}
248
249/*
250 * Check if this node is heartbeating and is connected to all other
251 * heartbeating nodes.
252 */
253static int o2cb_cluster_check(void)
254{
255 u8 node_num;
256 int i;
257 unsigned long hbmap[BITS_TO_LONGS(O2NM_MAX_NODES)];
258 unsigned long netmap[BITS_TO_LONGS(O2NM_MAX_NODES)];
259
260 node_num = o2nm_this_node();
261 if (node_num == O2NM_MAX_NODES) {
262 printk(KERN_ERR "o2cb: This node has not been configured.\n");
263 return -EINVAL;
264 }
265
266 /*
267 * o2dlm expects o2net sockets to be created. If not, then
268 * dlm_join_domain() fails with a stack of errors which are both cryptic
269 * and incomplete. The idea here is to detect upfront whether we have
270 * managed to connect to all nodes or not. If not, then list the nodes
271 * to allow the user to check the configuration (incorrect IP, firewall,
272 * etc.) Yes, this is racy. But its not the end of the world.
273 */
274#define O2CB_MAP_STABILIZE_COUNT 60
275 for (i = 0; i < O2CB_MAP_STABILIZE_COUNT; ++i) {
276 o2hb_fill_node_map(map: hbmap, O2NM_MAX_NODES);
277 if (!test_bit(node_num, hbmap)) {
278 printk(KERN_ERR "o2cb: %s heartbeat has not been "
279 "started.\n", (o2hb_global_heartbeat_active() ?
280 "Global" : "Local"));
281 return -EINVAL;
282 }
283 o2net_fill_node_map(map: netmap, O2NM_MAX_NODES);
284 /* Force set the current node to allow easy compare */
285 set_bit(nr: node_num, addr: netmap);
286 if (bitmap_equal(src1: hbmap, src2: netmap, O2NM_MAX_NODES))
287 return 0;
288 if (i < O2CB_MAP_STABILIZE_COUNT - 1)
289 msleep(msecs: 1000);
290 }
291
292 printk(KERN_ERR "o2cb: This node could not connect to nodes:");
293 i = -1;
294 while ((i = find_next_bit(addr: hbmap, O2NM_MAX_NODES,
295 offset: i + 1)) < O2NM_MAX_NODES) {
296 if (!test_bit(i, netmap))
297 printk(" %u", i);
298 }
299 printk(".\n");
300
301 return -ENOTCONN;
302}
303
304/*
305 * Called from the dlm when it's about to evict a node. This is how the
306 * classic stack signals node death.
307 */
308static void o2dlm_eviction_cb(int node_num, void *data)
309{
310 struct ocfs2_cluster_connection *conn = data;
311
312 printk(KERN_NOTICE "o2cb: o2dlm has evicted node %d from domain %.*s\n",
313 node_num, conn->cc_namelen, conn->cc_name);
314
315 conn->cc_recovery_handler(node_num, conn->cc_recovery_data);
316}
317
318static int o2cb_cluster_connect(struct ocfs2_cluster_connection *conn)
319{
320 int rc = 0;
321 u32 dlm_key;
322 struct dlm_ctxt *dlm;
323 struct o2dlm_private *priv;
324 struct dlm_protocol_version fs_version;
325
326 BUG_ON(conn == NULL);
327 BUG_ON(conn->cc_proto == NULL);
328
329 /* Ensure cluster stack is up and all nodes are connected */
330 rc = o2cb_cluster_check();
331 if (rc) {
332 printk(KERN_ERR "o2cb: Cluster check failed. Fix errors "
333 "before retrying.\n");
334 goto out;
335 }
336
337 priv = kzalloc(size: sizeof(struct o2dlm_private), GFP_KERNEL);
338 if (!priv) {
339 rc = -ENOMEM;
340 goto out_free;
341 }
342
343 /* This just fills the structure in. It is safe to pass conn. */
344 dlm_setup_eviction_cb(cb: &priv->op_eviction_cb, f: o2dlm_eviction_cb,
345 data: conn);
346
347 conn->cc_private = priv;
348
349 /* used by the dlm code to make message headers unique, each
350 * node in this domain must agree on this. */
351 dlm_key = crc32_le(crc: 0, p: conn->cc_name, len: conn->cc_namelen);
352 fs_version.pv_major = conn->cc_version.pv_major;
353 fs_version.pv_minor = conn->cc_version.pv_minor;
354
355 dlm = dlm_register_domain(domain: conn->cc_name, key: dlm_key, fs_proto: &fs_version);
356 if (IS_ERR(ptr: dlm)) {
357 rc = PTR_ERR(ptr: dlm);
358 mlog_errno(rc);
359 goto out_free;
360 }
361
362 conn->cc_version.pv_major = fs_version.pv_major;
363 conn->cc_version.pv_minor = fs_version.pv_minor;
364 conn->cc_lockspace = dlm;
365
366 dlm_register_eviction_cb(dlm, cb: &priv->op_eviction_cb);
367
368out_free:
369 if (rc)
370 kfree(objp: conn->cc_private);
371
372out:
373 return rc;
374}
375
376static int o2cb_cluster_disconnect(struct ocfs2_cluster_connection *conn)
377{
378 struct dlm_ctxt *dlm = conn->cc_lockspace;
379 struct o2dlm_private *priv = conn->cc_private;
380
381 dlm_unregister_eviction_cb(cb: &priv->op_eviction_cb);
382 conn->cc_private = NULL;
383 kfree(objp: priv);
384
385 dlm_unregister_domain(dlm);
386 conn->cc_lockspace = NULL;
387
388 return 0;
389}
390
391static int o2cb_cluster_this_node(struct ocfs2_cluster_connection *conn,
392 unsigned int *node)
393{
394 int node_num;
395
396 node_num = o2nm_this_node();
397 if (node_num == O2NM_INVALID_NODE_NUM)
398 return -ENOENT;
399
400 if (node_num >= O2NM_MAX_NODES)
401 return -EOVERFLOW;
402
403 *node = node_num;
404 return 0;
405}
406
407static struct ocfs2_stack_operations o2cb_stack_ops = {
408 .connect = o2cb_cluster_connect,
409 .disconnect = o2cb_cluster_disconnect,
410 .this_node = o2cb_cluster_this_node,
411 .dlm_lock = o2cb_dlm_lock,
412 .dlm_unlock = o2cb_dlm_unlock,
413 .lock_status = o2cb_dlm_lock_status,
414 .lvb_valid = o2cb_dlm_lvb_valid,
415 .lock_lvb = o2cb_dlm_lvb,
416 .dump_lksb = o2cb_dump_lksb,
417};
418
419static struct ocfs2_stack_plugin o2cb_stack = {
420 .sp_name = "o2cb",
421 .sp_ops = &o2cb_stack_ops,
422 .sp_owner = THIS_MODULE,
423};
424
425static int __init o2cb_stack_init(void)
426{
427 return ocfs2_stack_glue_register(plugin: &o2cb_stack);
428}
429
430static void __exit o2cb_stack_exit(void)
431{
432 ocfs2_stack_glue_unregister(plugin: &o2cb_stack);
433}
434
435MODULE_AUTHOR("Oracle");
436MODULE_DESCRIPTION("ocfs2 driver for the classic o2cb stack");
437MODULE_LICENSE("GPL");
438module_init(o2cb_stack_init);
439module_exit(o2cb_stack_exit);
440

source code of linux/fs/ocfs2/stack_o2cb.c