Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /* |
2 | * linux/fs/lockd/svclock.c | |
3 | * | |
4 | * Handling of server-side locks, mostly of the blocked variety. | |
5 | * This is the ugliest part of lockd because we tread on very thin ice. | |
6 | * GRANT and CANCEL calls may get stuck, meet in mid-flight, etc. | |
7 | * IMNSHO introducing the grant callback into the NLM protocol was one | |
8 | * of the worst ideas Sun ever had. Except maybe for the idea of doing | |
9 | * NFS file locking at all. | |
10 | * | |
11 | * I'm trying hard to avoid race conditions by protecting most accesses | |
12 | * to a file's list of blocked locks through a semaphore. The global | |
13 | * list of blocked locks is not protected in this fashion however. | |
14 | * Therefore, some functions (such as the RPC callback for the async grant | |
15 | * call) move blocked locks towards the head of the list *while some other | |
16 | * process might be traversing it*. This should not be a problem in | |
17 | * practice, because this will only cause functions traversing the list | |
18 | * to visit some blocks twice. | |
19 | * | |
20 | * Copyright (C) 1996, Olaf Kirch <okir@monad.swb.de> | |
21 | */ | |
22 | ||
1da177e4 LT |
23 | #include <linux/types.h> |
24 | #include <linux/errno.h> | |
25 | #include <linux/kernel.h> | |
26 | #include <linux/sched.h> | |
27 | #include <linux/smp_lock.h> | |
28 | #include <linux/sunrpc/clnt.h> | |
29 | #include <linux/sunrpc/svc.h> | |
30 | #include <linux/lockd/nlm.h> | |
31 | #include <linux/lockd/lockd.h> | |
32 | ||
33 | #define NLMDBG_FACILITY NLMDBG_SVCLOCK | |
34 | ||
35 | #ifdef CONFIG_LOCKD_V4 | |
36 | #define nlm_deadlock nlm4_deadlock | |
37 | #else | |
38 | #define nlm_deadlock nlm_lck_denied | |
39 | #endif | |
40 | ||
6849c0ca | 41 | static void nlmsvc_release_block(struct nlm_block *block); |
1da177e4 | 42 | static void nlmsvc_insert_block(struct nlm_block *block, unsigned long); |
68a2d76c | 43 | static void nlmsvc_remove_block(struct nlm_block *block); |
963d8fe5 | 44 | |
5e1abf8c TM |
45 | static int nlmsvc_setgrantargs(struct nlm_rqst *call, struct nlm_lock *lock); |
46 | static void nlmsvc_freegrantargs(struct nlm_rqst *call); | |
963d8fe5 | 47 | static const struct rpc_call_ops nlmsvc_grant_ops; |
1da177e4 LT |
48 | |
49 | /* | |
50 | * The list of blocked locks to retry | |
51 | */ | |
68a2d76c | 52 | static LIST_HEAD(nlm_blocked); |
1da177e4 LT |
53 | |
54 | /* | |
55 | * Insert a blocked lock into the global list | |
56 | */ | |
57 | static void | |
58 | nlmsvc_insert_block(struct nlm_block *block, unsigned long when) | |
59 | { | |
68a2d76c OK |
60 | struct nlm_block *b; |
61 | struct list_head *pos; | |
1da177e4 LT |
62 | |
63 | dprintk("lockd: nlmsvc_insert_block(%p, %ld)\n", block, when); | |
68a2d76c OK |
64 | if (list_empty(&block->b_list)) { |
65 | kref_get(&block->b_count); | |
66 | } else { | |
67 | list_del_init(&block->b_list); | |
68 | } | |
69 | ||
70 | pos = &nlm_blocked; | |
1da177e4 LT |
71 | if (when != NLM_NEVER) { |
72 | if ((when += jiffies) == NLM_NEVER) | |
73 | when ++; | |
68a2d76c OK |
74 | list_for_each(pos, &nlm_blocked) { |
75 | b = list_entry(pos, struct nlm_block, b_list); | |
76 | if (time_after(b->b_when,when) || b->b_when == NLM_NEVER) | |
77 | break; | |
78 | } | |
79 | /* On normal exit from the loop, pos == &nlm_blocked, | |
80 | * so we will be adding to the end of the list - good | |
81 | */ | |
82 | } | |
1da177e4 | 83 | |
68a2d76c | 84 | list_add_tail(&block->b_list, pos); |
1da177e4 | 85 | block->b_when = when; |
1da177e4 LT |
86 | } |
87 | ||
88 | /* | |
89 | * Remove a block from the global list | |
90 | */ | |
68a2d76c | 91 | static inline void |
1da177e4 LT |
92 | nlmsvc_remove_block(struct nlm_block *block) |
93 | { | |
68a2d76c OK |
94 | if (!list_empty(&block->b_list)) { |
95 | list_del_init(&block->b_list); | |
96 | nlmsvc_release_block(block); | |
1da177e4 | 97 | } |
1da177e4 LT |
98 | } |
99 | ||
100 | /* | |
d9f6eb75 | 101 | * Find a block for a given lock |
1da177e4 LT |
102 | */ |
103 | static struct nlm_block * | |
d9f6eb75 | 104 | nlmsvc_lookup_block(struct nlm_file *file, struct nlm_lock *lock) |
1da177e4 | 105 | { |
68a2d76c | 106 | struct nlm_block *block; |
1da177e4 LT |
107 | struct file_lock *fl; |
108 | ||
109 | dprintk("lockd: nlmsvc_lookup_block f=%p pd=%d %Ld-%Ld ty=%d\n", | |
110 | file, lock->fl.fl_pid, | |
111 | (long long)lock->fl.fl_start, | |
112 | (long long)lock->fl.fl_end, lock->fl.fl_type); | |
68a2d76c | 113 | list_for_each_entry(block, &nlm_blocked, b_list) { |
92737230 | 114 | fl = &block->b_call->a_args.lock.fl; |
1da177e4 LT |
115 | dprintk("lockd: check f=%p pd=%d %Ld-%Ld ty=%d cookie=%s\n", |
116 | block->b_file, fl->fl_pid, | |
117 | (long long)fl->fl_start, | |
118 | (long long)fl->fl_end, fl->fl_type, | |
92737230 | 119 | nlmdbg_cookie2a(&block->b_call->a_args.cookie)); |
1da177e4 | 120 | if (block->b_file == file && nlm_compare_locks(fl, &lock->fl)) { |
6849c0ca | 121 | kref_get(&block->b_count); |
1da177e4 LT |
122 | return block; |
123 | } | |
124 | } | |
125 | ||
126 | return NULL; | |
127 | } | |
128 | ||
129 | static inline int nlm_cookie_match(struct nlm_cookie *a, struct nlm_cookie *b) | |
130 | { | |
131 | if(a->len != b->len) | |
132 | return 0; | |
133 | if(memcmp(a->data,b->data,a->len)) | |
134 | return 0; | |
135 | return 1; | |
136 | } | |
137 | ||
138 | /* | |
139 | * Find a block with a given NLM cookie. | |
140 | */ | |
141 | static inline struct nlm_block * | |
142 | nlmsvc_find_block(struct nlm_cookie *cookie, struct sockaddr_in *sin) | |
143 | { | |
144 | struct nlm_block *block; | |
145 | ||
68a2d76c | 146 | list_for_each_entry(block, &nlm_blocked, b_list) { |
92737230 | 147 | if (nlm_cookie_match(&block->b_call->a_args.cookie,cookie) |
1da177e4 | 148 | && nlm_cmp_addr(sin, &block->b_host->h_addr)) |
68a2d76c | 149 | goto found; |
1da177e4 LT |
150 | } |
151 | ||
68a2d76c OK |
152 | return NULL; |
153 | ||
154 | found: | |
155 | kref_get(&block->b_count); | |
1da177e4 LT |
156 | return block; |
157 | } | |
158 | ||
159 | /* | |
160 | * Create a block and initialize it. | |
161 | * | |
162 | * Note: we explicitly set the cookie of the grant reply to that of | |
163 | * the blocked lock request. The spec explicitly mentions that the client | |
164 | * should _not_ rely on the callback containing the same cookie as the | |
165 | * request, but (as I found out later) that's because some implementations | |
166 | * do just this. Never mind the standards comittees, they support our | |
167 | * logging industries. | |
168 | */ | |
169 | static inline struct nlm_block * | |
170 | nlmsvc_create_block(struct svc_rqst *rqstp, struct nlm_file *file, | |
171 | struct nlm_lock *lock, struct nlm_cookie *cookie) | |
172 | { | |
173 | struct nlm_block *block; | |
174 | struct nlm_host *host; | |
92737230 | 175 | struct nlm_rqst *call = NULL; |
1da177e4 LT |
176 | |
177 | /* Create host handle for callback */ | |
db4e4c9a | 178 | host = nlmsvc_lookup_host(rqstp, lock->caller, lock->len); |
1da177e4 LT |
179 | if (host == NULL) |
180 | return NULL; | |
181 | ||
92737230 TM |
182 | call = nlm_alloc_call(host); |
183 | if (call == NULL) | |
184 | return NULL; | |
185 | ||
1da177e4 | 186 | /* Allocate memory for block, and initialize arguments */ |
92737230 TM |
187 | block = kzalloc(sizeof(*block), GFP_KERNEL); |
188 | if (block == NULL) | |
1da177e4 | 189 | goto failed; |
6849c0ca | 190 | kref_init(&block->b_count); |
68a2d76c OK |
191 | INIT_LIST_HEAD(&block->b_list); |
192 | INIT_LIST_HEAD(&block->b_flist); | |
1da177e4 | 193 | |
92737230 | 194 | if (!nlmsvc_setgrantargs(call, lock)) |
1da177e4 LT |
195 | goto failed_free; |
196 | ||
197 | /* Set notifier function for VFS, and init args */ | |
92737230 TM |
198 | call->a_args.lock.fl.fl_flags |= FL_SLEEP; |
199 | call->a_args.lock.fl.fl_lmops = &nlmsvc_lock_operations; | |
200 | call->a_args.cookie = *cookie; /* see above */ | |
1da177e4 LT |
201 | |
202 | dprintk("lockd: created block %p...\n", block); | |
203 | ||
204 | /* Create and initialize the block */ | |
205 | block->b_daemon = rqstp->rq_server; | |
206 | block->b_host = host; | |
207 | block->b_file = file; | |
d9f6eb75 | 208 | file->f_count++; |
1da177e4 LT |
209 | |
210 | /* Add to file's list of blocks */ | |
68a2d76c | 211 | list_add(&block->b_flist, &file->f_blocks); |
1da177e4 LT |
212 | |
213 | /* Set up RPC arguments for callback */ | |
92737230 | 214 | block->b_call = call; |
1da177e4 | 215 | call->a_flags = RPC_TASK_ASYNC; |
92737230 | 216 | call->a_block = block; |
1da177e4 LT |
217 | |
218 | return block; | |
219 | ||
220 | failed_free: | |
221 | kfree(block); | |
222 | failed: | |
92737230 | 223 | nlm_release_call(call); |
1da177e4 LT |
224 | return NULL; |
225 | } | |
226 | ||
227 | /* | |
228 | * Delete a block. If the lock was cancelled or the grant callback | |
229 | * failed, unlock is set to 1. | |
230 | * It is the caller's responsibility to check whether the file | |
231 | * can be closed hereafter. | |
232 | */ | |
6849c0ca | 233 | static int nlmsvc_unlink_block(struct nlm_block *block) |
1da177e4 | 234 | { |
09c7938c | 235 | int status; |
6849c0ca | 236 | dprintk("lockd: unlinking block %p...\n", block); |
1da177e4 LT |
237 | |
238 | /* Remove block from list */ | |
92737230 | 239 | status = posix_unblock_lock(block->b_file->f_file, &block->b_call->a_args.lock.fl); |
1da177e4 | 240 | nlmsvc_remove_block(block); |
6849c0ca TM |
241 | return status; |
242 | } | |
1da177e4 | 243 | |
6849c0ca TM |
244 | static void nlmsvc_free_block(struct kref *kref) |
245 | { | |
246 | struct nlm_block *block = container_of(kref, struct nlm_block, b_count); | |
247 | struct nlm_file *file = block->b_file; | |
6849c0ca TM |
248 | |
249 | dprintk("lockd: freeing block %p...\n", block); | |
1da177e4 LT |
250 | |
251 | /* Remove block from file's list of blocks */ | |
68a2d76c OK |
252 | down(&file->f_sema); |
253 | list_del_init(&block->b_flist); | |
d9f6eb75 | 254 | up(&file->f_sema); |
1da177e4 | 255 | |
92737230 TM |
256 | nlmsvc_freegrantargs(block->b_call); |
257 | nlm_release_call(block->b_call); | |
d9f6eb75 | 258 | nlm_release_file(block->b_file); |
1da177e4 | 259 | kfree(block); |
6849c0ca TM |
260 | } |
261 | ||
262 | static void nlmsvc_release_block(struct nlm_block *block) | |
263 | { | |
264 | if (block != NULL) | |
265 | kref_put(&block->b_count, nlmsvc_free_block); | |
1da177e4 LT |
266 | } |
267 | ||
d9f6eb75 TM |
268 | static void nlmsvc_act_mark(struct nlm_host *host, struct nlm_file *file) |
269 | { | |
270 | struct nlm_block *block; | |
271 | ||
272 | down(&file->f_sema); | |
68a2d76c | 273 | list_for_each_entry(block, &file->f_blocks, b_flist) |
d9f6eb75 TM |
274 | block->b_host->h_inuse = 1; |
275 | up(&file->f_sema); | |
276 | } | |
277 | ||
278 | static void nlmsvc_act_unlock(struct nlm_host *host, struct nlm_file *file) | |
279 | { | |
68a2d76c | 280 | struct nlm_block *block, *next; |
d9f6eb75 TM |
281 | |
282 | restart: | |
283 | down(&file->f_sema); | |
68a2d76c | 284 | list_for_each_entry_safe(block, next, &file->f_blocks, b_flist) { |
d9f6eb75 TM |
285 | if (host != NULL && host != block->b_host) |
286 | continue; | |
68a2d76c OK |
287 | /* Do not destroy blocks that are not on |
288 | * the global retry list - why? */ | |
289 | if (list_empty(&block->b_list)) | |
d9f6eb75 TM |
290 | continue; |
291 | kref_get(&block->b_count); | |
292 | up(&file->f_sema); | |
293 | nlmsvc_unlink_block(block); | |
294 | nlmsvc_release_block(block); | |
295 | goto restart; | |
296 | } | |
297 | up(&file->f_sema); | |
298 | } | |
299 | ||
1da177e4 LT |
300 | /* |
301 | * Loop over all blocks and perform the action specified. | |
302 | * (NLM_ACT_CHECK handled by nlmsvc_inspect_file). | |
303 | */ | |
f3ee439f | 304 | void |
1da177e4 LT |
305 | nlmsvc_traverse_blocks(struct nlm_host *host, struct nlm_file *file, int action) |
306 | { | |
d9f6eb75 TM |
307 | if (action == NLM_ACT_MARK) |
308 | nlmsvc_act_mark(host, file); | |
309 | else | |
310 | nlmsvc_act_unlock(host, file); | |
1da177e4 LT |
311 | } |
312 | ||
5e1abf8c TM |
313 | /* |
314 | * Initialize arguments for GRANTED call. The nlm_rqst structure | |
315 | * has been cleared already. | |
316 | */ | |
317 | static int nlmsvc_setgrantargs(struct nlm_rqst *call, struct nlm_lock *lock) | |
318 | { | |
319 | locks_copy_lock(&call->a_args.lock.fl, &lock->fl); | |
320 | memcpy(&call->a_args.lock.fh, &lock->fh, sizeof(call->a_args.lock.fh)); | |
e9ff3990 | 321 | call->a_args.lock.caller = utsname()->nodename; |
5e1abf8c TM |
322 | call->a_args.lock.oh.len = lock->oh.len; |
323 | ||
324 | /* set default data area */ | |
325 | call->a_args.lock.oh.data = call->a_owner; | |
326 | call->a_args.lock.svid = lock->fl.fl_pid; | |
327 | ||
328 | if (lock->oh.len > NLMCLNT_OHSIZE) { | |
329 | void *data = kmalloc(lock->oh.len, GFP_KERNEL); | |
92737230 | 330 | if (!data) |
5e1abf8c | 331 | return 0; |
5e1abf8c TM |
332 | call->a_args.lock.oh.data = (u8 *) data; |
333 | } | |
334 | ||
335 | memcpy(call->a_args.lock.oh.data, lock->oh.data, lock->oh.len); | |
336 | return 1; | |
337 | } | |
338 | ||
339 | static void nlmsvc_freegrantargs(struct nlm_rqst *call) | |
340 | { | |
92737230 | 341 | if (call->a_args.lock.oh.data != call->a_owner) |
5e1abf8c | 342 | kfree(call->a_args.lock.oh.data); |
5e1abf8c TM |
343 | } |
344 | ||
1da177e4 LT |
345 | /* |
346 | * Attempt to establish a lock, and if it can't be granted, block it | |
347 | * if required. | |
348 | */ | |
349 | u32 | |
350 | nlmsvc_lock(struct svc_rqst *rqstp, struct nlm_file *file, | |
351 | struct nlm_lock *lock, int wait, struct nlm_cookie *cookie) | |
352 | { | |
09c7938c | 353 | struct nlm_block *block, *newblock = NULL; |
1da177e4 | 354 | int error; |
15dadef9 | 355 | u32 ret; |
1da177e4 LT |
356 | |
357 | dprintk("lockd: nlmsvc_lock(%s/%ld, ty=%d, pi=%d, %Ld-%Ld, bl=%d)\n", | |
358 | file->f_file->f_dentry->d_inode->i_sb->s_id, | |
359 | file->f_file->f_dentry->d_inode->i_ino, | |
360 | lock->fl.fl_type, lock->fl.fl_pid, | |
361 | (long long)lock->fl.fl_start, | |
362 | (long long)lock->fl.fl_end, | |
363 | wait); | |
364 | ||
365 | ||
09c7938c | 366 | lock->fl.fl_flags &= ~FL_SLEEP; |
1da177e4 LT |
367 | again: |
368 | /* Lock file against concurrent access */ | |
369 | down(&file->f_sema); | |
09c7938c | 370 | /* Get existing block (in case client is busy-waiting) */ |
d9f6eb75 | 371 | block = nlmsvc_lookup_block(file, lock); |
09c7938c TM |
372 | if (block == NULL) { |
373 | if (newblock != NULL) | |
92737230 | 374 | lock = &newblock->b_call->a_args.lock; |
09c7938c | 375 | } else |
92737230 | 376 | lock = &block->b_call->a_args.lock; |
1da177e4 | 377 | |
a85f193e | 378 | error = posix_lock_file(file->f_file, &lock->fl); |
09c7938c | 379 | lock->fl.fl_flags &= ~FL_SLEEP; |
1da177e4 | 380 | |
a85f193e AA |
381 | dprintk("lockd: posix_lock_file returned %d\n", error); |
382 | ||
09c7938c | 383 | switch(error) { |
1da177e4 | 384 | case 0: |
15dadef9 AA |
385 | ret = nlm_granted; |
386 | goto out; | |
09c7938c TM |
387 | case -EAGAIN: |
388 | break; | |
389 | case -EDEADLK: | |
15dadef9 AA |
390 | ret = nlm_deadlock; |
391 | goto out; | |
1da177e4 | 392 | default: /* includes ENOLCK */ |
15dadef9 AA |
393 | ret = nlm_lck_denied_nolocks; |
394 | goto out; | |
1da177e4 LT |
395 | } |
396 | ||
09c7938c TM |
397 | ret = nlm_lck_denied; |
398 | if (!wait) | |
399 | goto out; | |
400 | ||
401 | ret = nlm_lck_blocked; | |
402 | if (block != NULL) | |
403 | goto out; | |
1da177e4 | 404 | |
1da177e4 LT |
405 | /* If we don't have a block, create and initialize it. Then |
406 | * retry because we may have slept in kmalloc. */ | |
407 | /* We have to release f_sema as nlmsvc_create_block may try to | |
408 | * to claim it while doing host garbage collection */ | |
09c7938c | 409 | if (newblock == NULL) { |
1da177e4 LT |
410 | up(&file->f_sema); |
411 | dprintk("lockd: blocking on this lock (allocating).\n"); | |
09c7938c | 412 | if (!(newblock = nlmsvc_create_block(rqstp, file, lock, cookie))) |
1da177e4 LT |
413 | return nlm_lck_denied_nolocks; |
414 | goto again; | |
415 | } | |
416 | ||
417 | /* Append to list of blocked */ | |
09c7938c | 418 | nlmsvc_insert_block(newblock, NLM_NEVER); |
15dadef9 | 419 | out: |
09c7938c | 420 | up(&file->f_sema); |
6849c0ca TM |
421 | nlmsvc_release_block(newblock); |
422 | nlmsvc_release_block(block); | |
15dadef9 AA |
423 | dprintk("lockd: nlmsvc_lock returned %u\n", ret); |
424 | return ret; | |
1da177e4 LT |
425 | } |
426 | ||
427 | /* | |
428 | * Test for presence of a conflicting lock. | |
429 | */ | |
430 | u32 | |
431 | nlmsvc_testlock(struct nlm_file *file, struct nlm_lock *lock, | |
432 | struct nlm_lock *conflock) | |
433 | { | |
1da177e4 LT |
434 | dprintk("lockd: nlmsvc_testlock(%s/%ld, ty=%d, %Ld-%Ld)\n", |
435 | file->f_file->f_dentry->d_inode->i_sb->s_id, | |
436 | file->f_file->f_dentry->d_inode->i_ino, | |
437 | lock->fl.fl_type, | |
438 | (long long)lock->fl.fl_start, | |
439 | (long long)lock->fl.fl_end); | |
440 | ||
8dc7c311 | 441 | if (posix_test_lock(file->f_file, &lock->fl, &conflock->fl)) { |
1da177e4 | 442 | dprintk("lockd: conflicting lock(ty=%d, %Ld-%Ld)\n", |
8dc7c311 AA |
443 | conflock->fl.fl_type, |
444 | (long long)conflock->fl.fl_start, | |
445 | (long long)conflock->fl.fl_end); | |
1da177e4 | 446 | conflock->caller = "somehost"; /* FIXME */ |
db4e4c9a | 447 | conflock->len = strlen(conflock->caller); |
1da177e4 | 448 | conflock->oh.len = 0; /* don't return OH info */ |
8dc7c311 | 449 | conflock->svid = conflock->fl.fl_pid; |
1da177e4 LT |
450 | return nlm_lck_denied; |
451 | } | |
452 | ||
453 | return nlm_granted; | |
454 | } | |
455 | ||
456 | /* | |
457 | * Remove a lock. | |
458 | * This implies a CANCEL call: We send a GRANT_MSG, the client replies | |
459 | * with a GRANT_RES call which gets lost, and calls UNLOCK immediately | |
460 | * afterwards. In this case the block will still be there, and hence | |
461 | * must be removed. | |
462 | */ | |
463 | u32 | |
464 | nlmsvc_unlock(struct nlm_file *file, struct nlm_lock *lock) | |
465 | { | |
466 | int error; | |
467 | ||
468 | dprintk("lockd: nlmsvc_unlock(%s/%ld, pi=%d, %Ld-%Ld)\n", | |
469 | file->f_file->f_dentry->d_inode->i_sb->s_id, | |
470 | file->f_file->f_dentry->d_inode->i_ino, | |
471 | lock->fl.fl_pid, | |
472 | (long long)lock->fl.fl_start, | |
473 | (long long)lock->fl.fl_end); | |
474 | ||
475 | /* First, cancel any lock that might be there */ | |
476 | nlmsvc_cancel_blocked(file, lock); | |
477 | ||
478 | lock->fl.fl_type = F_UNLCK; | |
479 | error = posix_lock_file(file->f_file, &lock->fl); | |
480 | ||
481 | return (error < 0)? nlm_lck_denied_nolocks : nlm_granted; | |
482 | } | |
483 | ||
484 | /* | |
485 | * Cancel a previously blocked request. | |
486 | * | |
487 | * A cancel request always overrides any grant that may currently | |
488 | * be in progress. | |
489 | * The calling procedure must check whether the file can be closed. | |
490 | */ | |
491 | u32 | |
492 | nlmsvc_cancel_blocked(struct nlm_file *file, struct nlm_lock *lock) | |
493 | { | |
494 | struct nlm_block *block; | |
64a318ee | 495 | int status = 0; |
1da177e4 LT |
496 | |
497 | dprintk("lockd: nlmsvc_cancel(%s/%ld, pi=%d, %Ld-%Ld)\n", | |
498 | file->f_file->f_dentry->d_inode->i_sb->s_id, | |
499 | file->f_file->f_dentry->d_inode->i_ino, | |
500 | lock->fl.fl_pid, | |
501 | (long long)lock->fl.fl_start, | |
502 | (long long)lock->fl.fl_end); | |
503 | ||
504 | down(&file->f_sema); | |
d9f6eb75 TM |
505 | block = nlmsvc_lookup_block(file, lock); |
506 | up(&file->f_sema); | |
507 | if (block != NULL) { | |
6849c0ca TM |
508 | status = nlmsvc_unlink_block(block); |
509 | nlmsvc_release_block(block); | |
510 | } | |
64a318ee | 511 | return status ? nlm_lck_denied : nlm_granted; |
1da177e4 LT |
512 | } |
513 | ||
514 | /* | |
515 | * Unblock a blocked lock request. This is a callback invoked from the | |
516 | * VFS layer when a lock on which we blocked is removed. | |
517 | * | |
518 | * This function doesn't grant the blocked lock instantly, but rather moves | |
519 | * the block to the head of nlm_blocked where it can be picked up by lockd. | |
520 | */ | |
521 | static void | |
522 | nlmsvc_notify_blocked(struct file_lock *fl) | |
523 | { | |
68a2d76c | 524 | struct nlm_block *block; |
1da177e4 LT |
525 | |
526 | dprintk("lockd: VFS unblock notification for block %p\n", fl); | |
68a2d76c | 527 | list_for_each_entry(block, &nlm_blocked, b_list) { |
92737230 | 528 | if (nlm_compare_locks(&block->b_call->a_args.lock.fl, fl)) { |
1da177e4 LT |
529 | nlmsvc_insert_block(block, 0); |
530 | svc_wake_up(block->b_daemon); | |
531 | return; | |
532 | } | |
533 | } | |
534 | ||
535 | printk(KERN_WARNING "lockd: notification for unknown block!\n"); | |
536 | } | |
537 | ||
538 | static int nlmsvc_same_owner(struct file_lock *fl1, struct file_lock *fl2) | |
539 | { | |
540 | return fl1->fl_owner == fl2->fl_owner && fl1->fl_pid == fl2->fl_pid; | |
541 | } | |
542 | ||
543 | struct lock_manager_operations nlmsvc_lock_operations = { | |
544 | .fl_compare_owner = nlmsvc_same_owner, | |
545 | .fl_notify = nlmsvc_notify_blocked, | |
546 | }; | |
547 | ||
548 | /* | |
549 | * Try to claim a lock that was previously blocked. | |
550 | * | |
551 | * Note that we use both the RPC_GRANTED_MSG call _and_ an async | |
552 | * RPC thread when notifying the client. This seems like overkill... | |
553 | * Here's why: | |
554 | * - we don't want to use a synchronous RPC thread, otherwise | |
555 | * we might find ourselves hanging on a dead portmapper. | |
556 | * - Some lockd implementations (e.g. HP) don't react to | |
557 | * RPC_GRANTED calls; they seem to insist on RPC_GRANTED_MSG calls. | |
558 | */ | |
559 | static void | |
560 | nlmsvc_grant_blocked(struct nlm_block *block) | |
561 | { | |
562 | struct nlm_file *file = block->b_file; | |
92737230 | 563 | struct nlm_lock *lock = &block->b_call->a_args.lock; |
1da177e4 LT |
564 | int error; |
565 | ||
566 | dprintk("lockd: grant blocked lock %p\n", block); | |
567 | ||
1da177e4 | 568 | /* Unlink block request from list */ |
6849c0ca | 569 | nlmsvc_unlink_block(block); |
1da177e4 LT |
570 | |
571 | /* If b_granted is true this means we've been here before. | |
572 | * Just retry the grant callback, possibly refreshing the RPC | |
573 | * binding */ | |
574 | if (block->b_granted) { | |
575 | nlm_rebind_host(block->b_host); | |
576 | goto callback; | |
577 | } | |
578 | ||
579 | /* Try the lock operation again */ | |
09c7938c | 580 | lock->fl.fl_flags |= FL_SLEEP; |
5de0e502 | 581 | error = posix_lock_file(file->f_file, &lock->fl); |
09c7938c TM |
582 | lock->fl.fl_flags &= ~FL_SLEEP; |
583 | ||
5de0e502 AA |
584 | switch (error) { |
585 | case 0: | |
586 | break; | |
587 | case -EAGAIN: | |
1da177e4 LT |
588 | dprintk("lockd: lock still blocked\n"); |
589 | nlmsvc_insert_block(block, NLM_NEVER); | |
d9f6eb75 | 590 | return; |
5de0e502 | 591 | default: |
1da177e4 LT |
592 | printk(KERN_WARNING "lockd: unexpected error %d in %s!\n", |
593 | -error, __FUNCTION__); | |
594 | nlmsvc_insert_block(block, 10 * HZ); | |
d9f6eb75 | 595 | return; |
1da177e4 LT |
596 | } |
597 | ||
598 | callback: | |
599 | /* Lock was granted by VFS. */ | |
600 | dprintk("lockd: GRANTing blocked lock.\n"); | |
601 | block->b_granted = 1; | |
1da177e4 LT |
602 | |
603 | /* Schedule next grant callback in 30 seconds */ | |
604 | nlmsvc_insert_block(block, 30 * HZ); | |
605 | ||
606 | /* Call the client */ | |
6849c0ca | 607 | kref_get(&block->b_count); |
92737230 | 608 | if (nlm_async_call(block->b_call, NLMPROC_GRANTED_MSG, |
963d8fe5 | 609 | &nlmsvc_grant_ops) < 0) |
6849c0ca | 610 | nlmsvc_release_block(block); |
1da177e4 LT |
611 | } |
612 | ||
613 | /* | |
614 | * This is the callback from the RPC layer when the NLM_GRANTED_MSG | |
615 | * RPC call has succeeded or timed out. | |
616 | * Like all RPC callbacks, it is invoked by the rpciod process, so it | |
617 | * better not sleep. Therefore, we put the blocked lock on the nlm_blocked | |
618 | * chain once more in order to have it removed by lockd itself (which can | |
619 | * then sleep on the file semaphore without disrupting e.g. the nfs client). | |
620 | */ | |
963d8fe5 | 621 | static void nlmsvc_grant_callback(struct rpc_task *task, void *data) |
1da177e4 | 622 | { |
963d8fe5 | 623 | struct nlm_rqst *call = data; |
92737230 | 624 | struct nlm_block *block = call->a_block; |
1da177e4 | 625 | unsigned long timeout; |
1da177e4 LT |
626 | |
627 | dprintk("lockd: GRANT_MSG RPC callback\n"); | |
1da177e4 LT |
628 | |
629 | /* Technically, we should down the file semaphore here. Since we | |
630 | * move the block towards the head of the queue only, no harm | |
631 | * can be done, though. */ | |
632 | if (task->tk_status < 0) { | |
633 | /* RPC error: Re-insert for retransmission */ | |
634 | timeout = 10 * HZ; | |
1da177e4 LT |
635 | } else { |
636 | /* Call was successful, now wait for client callback */ | |
637 | timeout = 60 * HZ; | |
638 | } | |
639 | nlmsvc_insert_block(block, timeout); | |
640 | svc_wake_up(block->b_daemon); | |
5e1abf8c TM |
641 | } |
642 | ||
ec535ce1 | 643 | static void nlmsvc_grant_release(void *data) |
5e1abf8c | 644 | { |
6041b791 TM |
645 | struct nlm_rqst *call = data; |
646 | ||
647 | nlmsvc_release_block(call->a_block); | |
1da177e4 LT |
648 | } |
649 | ||
963d8fe5 TM |
650 | static const struct rpc_call_ops nlmsvc_grant_ops = { |
651 | .rpc_call_done = nlmsvc_grant_callback, | |
5e1abf8c | 652 | .rpc_release = nlmsvc_grant_release, |
963d8fe5 TM |
653 | }; |
654 | ||
1da177e4 LT |
655 | /* |
656 | * We received a GRANT_RES callback. Try to find the corresponding | |
657 | * block. | |
658 | */ | |
659 | void | |
660 | nlmsvc_grant_reply(struct svc_rqst *rqstp, struct nlm_cookie *cookie, u32 status) | |
661 | { | |
662 | struct nlm_block *block; | |
663 | struct nlm_file *file; | |
664 | ||
665 | dprintk("grant_reply: looking for cookie %x, host (%08x), s=%d \n", | |
666 | *(unsigned int *)(cookie->data), | |
667 | ntohl(rqstp->rq_addr.sin_addr.s_addr), status); | |
668 | if (!(block = nlmsvc_find_block(cookie, &rqstp->rq_addr))) | |
669 | return; | |
670 | file = block->b_file; | |
671 | ||
f232142c | 672 | if (block) { |
1da177e4 LT |
673 | if (status == NLM_LCK_DENIED_GRACE_PERIOD) { |
674 | /* Try again in a couple of seconds */ | |
675 | nlmsvc_insert_block(block, 10 * HZ); | |
1da177e4 LT |
676 | } else { |
677 | /* Lock is now held by client, or has been rejected. | |
678 | * In both cases, the block should be removed. */ | |
6849c0ca | 679 | nlmsvc_unlink_block(block); |
1da177e4 LT |
680 | } |
681 | } | |
6849c0ca | 682 | nlmsvc_release_block(block); |
1da177e4 LT |
683 | } |
684 | ||
685 | /* | |
686 | * Retry all blocked locks that have been notified. This is where lockd | |
687 | * picks up locks that can be granted, or grant notifications that must | |
688 | * be retransmitted. | |
689 | */ | |
690 | unsigned long | |
691 | nlmsvc_retry_blocked(void) | |
692 | { | |
68a2d76c OK |
693 | unsigned long timeout = MAX_SCHEDULE_TIMEOUT; |
694 | struct nlm_block *block; | |
695 | ||
696 | while (!list_empty(&nlm_blocked)) { | |
697 | block = list_entry(nlm_blocked.next, struct nlm_block, b_list); | |
1da177e4 | 698 | |
1da177e4 LT |
699 | if (block->b_when == NLM_NEVER) |
700 | break; | |
68a2d76c OK |
701 | if (time_after(block->b_when,jiffies)) { |
702 | timeout = block->b_when - jiffies; | |
1da177e4 | 703 | break; |
68a2d76c OK |
704 | } |
705 | ||
f3d43c76 BF |
706 | dprintk("nlmsvc_retry_blocked(%p, when=%ld)\n", |
707 | block, block->b_when); | |
6849c0ca | 708 | kref_get(&block->b_count); |
f3d43c76 | 709 | nlmsvc_grant_blocked(block); |
6849c0ca | 710 | nlmsvc_release_block(block); |
1da177e4 LT |
711 | } |
712 | ||
68a2d76c | 713 | return timeout; |
1da177e4 | 714 | } |