Merge branch 'idle-release' of git://git.kernel.org/pub/scm/linux/kernel/git/lenb...
[pandora-kernel.git] / fs / nfs / callback_proc.c
1 /*
2  * linux/fs/nfs/callback_proc.c
3  *
4  * Copyright (C) 2004 Trond Myklebust
5  *
6  * NFSv4 callback procedures
7  */
8 #include <linux/nfs4.h>
9 #include <linux/nfs_fs.h>
10 #include <linux/slab.h>
11 #include "nfs4_fs.h"
12 #include "callback.h"
13 #include "delegation.h"
14 #include "internal.h"
15 #include "pnfs.h"
16
17 #ifdef NFS_DEBUG
18 #define NFSDBG_FACILITY NFSDBG_CALLBACK
19 #endif
20
21 __be32 nfs4_callback_getattr(struct cb_getattrargs *args,
22                              struct cb_getattrres *res,
23                              struct cb_process_state *cps)
24 {
25         struct nfs_delegation *delegation;
26         struct nfs_inode *nfsi;
27         struct inode *inode;
28
29         res->status = htonl(NFS4ERR_OP_NOT_IN_SESSION);
30         if (!cps->clp) /* Always set for v4.0. Set in cb_sequence for v4.1 */
31                 goto out;
32
33         res->bitmap[0] = res->bitmap[1] = 0;
34         res->status = htonl(NFS4ERR_BADHANDLE);
35
36         dprintk("NFS: GETATTR callback request from %s\n",
37                 rpc_peeraddr2str(cps->clp->cl_rpcclient, RPC_DISPLAY_ADDR));
38
39         inode = nfs_delegation_find_inode(cps->clp, &args->fh);
40         if (inode == NULL)
41                 goto out;
42         nfsi = NFS_I(inode);
43         rcu_read_lock();
44         delegation = rcu_dereference(nfsi->delegation);
45         if (delegation == NULL || (delegation->type & FMODE_WRITE) == 0)
46                 goto out_iput;
47         res->size = i_size_read(inode);
48         res->change_attr = delegation->change_attr;
49         if (nfsi->npages != 0)
50                 res->change_attr++;
51         res->ctime = inode->i_ctime;
52         res->mtime = inode->i_mtime;
53         res->bitmap[0] = (FATTR4_WORD0_CHANGE|FATTR4_WORD0_SIZE) &
54                 args->bitmap[0];
55         res->bitmap[1] = (FATTR4_WORD1_TIME_METADATA|FATTR4_WORD1_TIME_MODIFY) &
56                 args->bitmap[1];
57         res->status = 0;
58 out_iput:
59         rcu_read_unlock();
60         iput(inode);
61 out:
62         dprintk("%s: exit with status = %d\n", __func__, ntohl(res->status));
63         return res->status;
64 }
65
66 __be32 nfs4_callback_recall(struct cb_recallargs *args, void *dummy,
67                             struct cb_process_state *cps)
68 {
69         struct inode *inode;
70         __be32 res;
71         
72         res = htonl(NFS4ERR_OP_NOT_IN_SESSION);
73         if (!cps->clp) /* Always set for v4.0. Set in cb_sequence for v4.1 */
74                 goto out;
75
76         dprintk("NFS: RECALL callback request from %s\n",
77                 rpc_peeraddr2str(cps->clp->cl_rpcclient, RPC_DISPLAY_ADDR));
78
79         res = htonl(NFS4ERR_BADHANDLE);
80         inode = nfs_delegation_find_inode(cps->clp, &args->fh);
81         if (inode == NULL)
82                 goto out;
83         /* Set up a helper thread to actually return the delegation */
84         switch (nfs_async_inode_return_delegation(inode, &args->stateid)) {
85         case 0:
86                 res = 0;
87                 break;
88         case -ENOENT:
89                 if (res != 0)
90                         res = htonl(NFS4ERR_BAD_STATEID);
91                 break;
92         default:
93                 res = htonl(NFS4ERR_RESOURCE);
94         }
95         iput(inode);
96 out:
97         dprintk("%s: exit with status = %d\n", __func__, ntohl(res));
98         return res;
99 }
100
101 int nfs4_validate_delegation_stateid(struct nfs_delegation *delegation, const nfs4_stateid *stateid)
102 {
103         if (delegation == NULL || memcmp(delegation->stateid.data, stateid->data,
104                                          sizeof(delegation->stateid.data)) != 0)
105                 return 0;
106         return 1;
107 }
108
109 #if defined(CONFIG_NFS_V4_1)
110
111 static u32 initiate_file_draining(struct nfs_client *clp,
112                                   struct cb_layoutrecallargs *args)
113 {
114         struct nfs_server *server;
115         struct pnfs_layout_hdr *lo;
116         struct inode *ino;
117         bool found = false;
118         u32 rv = NFS4ERR_NOMATCHING_LAYOUT;
119         LIST_HEAD(free_me_list);
120
121         spin_lock(&clp->cl_lock);
122         rcu_read_lock();
123         list_for_each_entry_rcu(server, &clp->cl_superblocks, client_link) {
124                 list_for_each_entry(lo, &server->layouts, plh_layouts) {
125                         if (nfs_compare_fh(&args->cbl_fh,
126                                            &NFS_I(lo->plh_inode)->fh))
127                                 continue;
128                         ino = igrab(lo->plh_inode);
129                         if (!ino)
130                                 continue;
131                         found = true;
132                         /* Without this, layout can be freed as soon
133                          * as we release cl_lock.
134                          */
135                         get_layout_hdr(lo);
136                         break;
137                 }
138                 if (found)
139                         break;
140         }
141         rcu_read_unlock();
142         spin_unlock(&clp->cl_lock);
143
144         if (!found)
145                 return NFS4ERR_NOMATCHING_LAYOUT;
146
147         spin_lock(&ino->i_lock);
148         if (test_bit(NFS_LAYOUT_BULK_RECALL, &lo->plh_flags) ||
149             mark_matching_lsegs_invalid(lo, &free_me_list,
150                                         &args->cbl_range))
151                 rv = NFS4ERR_DELAY;
152         else
153                 rv = NFS4ERR_NOMATCHING_LAYOUT;
154         pnfs_set_layout_stateid(lo, &args->cbl_stateid, true);
155         spin_unlock(&ino->i_lock);
156         pnfs_free_lseg_list(&free_me_list);
157         put_layout_hdr(lo);
158         iput(ino);
159         return rv;
160 }
161
162 static u32 initiate_bulk_draining(struct nfs_client *clp,
163                                   struct cb_layoutrecallargs *args)
164 {
165         struct nfs_server *server;
166         struct pnfs_layout_hdr *lo;
167         struct inode *ino;
168         u32 rv = NFS4ERR_NOMATCHING_LAYOUT;
169         struct pnfs_layout_hdr *tmp;
170         LIST_HEAD(recall_list);
171         LIST_HEAD(free_me_list);
172         struct pnfs_layout_range range = {
173                 .iomode = IOMODE_ANY,
174                 .offset = 0,
175                 .length = NFS4_MAX_UINT64,
176         };
177
178         spin_lock(&clp->cl_lock);
179         rcu_read_lock();
180         list_for_each_entry_rcu(server, &clp->cl_superblocks, client_link) {
181                 if ((args->cbl_recall_type == RETURN_FSID) &&
182                     memcmp(&server->fsid, &args->cbl_fsid,
183                            sizeof(struct nfs_fsid)))
184                         continue;
185
186                 list_for_each_entry(lo, &server->layouts, plh_layouts) {
187                         if (!igrab(lo->plh_inode))
188                                 continue;
189                         get_layout_hdr(lo);
190                         BUG_ON(!list_empty(&lo->plh_bulk_recall));
191                         list_add(&lo->plh_bulk_recall, &recall_list);
192                 }
193         }
194         rcu_read_unlock();
195         spin_unlock(&clp->cl_lock);
196
197         list_for_each_entry_safe(lo, tmp,
198                                  &recall_list, plh_bulk_recall) {
199                 ino = lo->plh_inode;
200                 spin_lock(&ino->i_lock);
201                 set_bit(NFS_LAYOUT_BULK_RECALL, &lo->plh_flags);
202                 if (mark_matching_lsegs_invalid(lo, &free_me_list, &range))
203                         rv = NFS4ERR_DELAY;
204                 list_del_init(&lo->plh_bulk_recall);
205                 spin_unlock(&ino->i_lock);
206                 pnfs_free_lseg_list(&free_me_list);
207                 put_layout_hdr(lo);
208                 iput(ino);
209         }
210         return rv;
211 }
212
213 static u32 do_callback_layoutrecall(struct nfs_client *clp,
214                                     struct cb_layoutrecallargs *args)
215 {
216         u32 res = NFS4ERR_DELAY;
217
218         dprintk("%s enter, type=%i\n", __func__, args->cbl_recall_type);
219         if (test_and_set_bit(NFS4CLNT_LAYOUTRECALL, &clp->cl_state))
220                 goto out;
221         if (args->cbl_recall_type == RETURN_FILE)
222                 res = initiate_file_draining(clp, args);
223         else
224                 res = initiate_bulk_draining(clp, args);
225         clear_bit(NFS4CLNT_LAYOUTRECALL, &clp->cl_state);
226 out:
227         dprintk("%s returning %i\n", __func__, res);
228         return res;
229
230 }
231
232 __be32 nfs4_callback_layoutrecall(struct cb_layoutrecallargs *args,
233                                   void *dummy, struct cb_process_state *cps)
234 {
235         u32 res;
236
237         dprintk("%s: -->\n", __func__);
238
239         if (cps->clp)
240                 res = do_callback_layoutrecall(cps->clp, args);
241         else
242                 res = NFS4ERR_OP_NOT_IN_SESSION;
243
244         dprintk("%s: exit with status = %d\n", __func__, res);
245         return cpu_to_be32(res);
246 }
247
248 static void pnfs_recall_all_layouts(struct nfs_client *clp)
249 {
250         struct cb_layoutrecallargs args;
251
252         /* Pretend we got a CB_LAYOUTRECALL(ALL) */
253         memset(&args, 0, sizeof(args));
254         args.cbl_recall_type = RETURN_ALL;
255         /* FIXME we ignore errors, what should we do? */
256         do_callback_layoutrecall(clp, &args);
257 }
258
259 __be32 nfs4_callback_devicenotify(struct cb_devicenotifyargs *args,
260                                   void *dummy, struct cb_process_state *cps)
261 {
262         int i;
263         __be32 res = 0;
264         struct nfs_client *clp = cps->clp;
265         struct nfs_server *server = NULL;
266
267         dprintk("%s: -->\n", __func__);
268
269         if (!clp) {
270                 res = cpu_to_be32(NFS4ERR_OP_NOT_IN_SESSION);
271                 goto out;
272         }
273
274         for (i = 0; i < args->ndevs; i++) {
275                 struct cb_devicenotifyitem *dev = &args->devs[i];
276
277                 if (!server ||
278                     server->pnfs_curr_ld->id != dev->cbd_layout_type) {
279                         rcu_read_lock();
280                         list_for_each_entry_rcu(server, &clp->cl_superblocks, client_link)
281                                 if (server->pnfs_curr_ld &&
282                                     server->pnfs_curr_ld->id == dev->cbd_layout_type) {
283                                         rcu_read_unlock();
284                                         goto found;
285                                 }
286                         rcu_read_unlock();
287                         dprintk("%s: layout type %u not found\n",
288                                 __func__, dev->cbd_layout_type);
289                         continue;
290                 }
291
292         found:
293                 if (dev->cbd_notify_type == NOTIFY_DEVICEID4_CHANGE)
294                         dprintk("%s: NOTIFY_DEVICEID4_CHANGE not supported, "
295                                 "deleting instead\n", __func__);
296                 nfs4_delete_deviceid(server->pnfs_curr_ld, clp, &dev->cbd_dev_id);
297         }
298
299 out:
300         kfree(args->devs);
301         dprintk("%s: exit with status = %u\n",
302                 __func__, be32_to_cpu(res));
303         return res;
304 }
305
306 int nfs41_validate_delegation_stateid(struct nfs_delegation *delegation, const nfs4_stateid *stateid)
307 {
308         if (delegation == NULL)
309                 return 0;
310
311         if (stateid->stateid.seqid != 0)
312                 return 0;
313         if (memcmp(&delegation->stateid.stateid.other,
314                    &stateid->stateid.other,
315                    NFS4_STATEID_OTHER_SIZE))
316                 return 0;
317
318         return 1;
319 }
320
321 /*
322  * Validate the sequenceID sent by the server.
323  * Return success if the sequenceID is one more than what we last saw on
324  * this slot, accounting for wraparound.  Increments the slot's sequence.
325  *
326  * We don't yet implement a duplicate request cache, instead we set the
327  * back channel ca_maxresponsesize_cached to zero. This is OK for now
328  * since we only currently implement idempotent callbacks anyway.
329  *
330  * We have a single slot backchannel at this time, so we don't bother
331  * checking the used_slots bit array on the table.  The lower layer guarantees
332  * a single outstanding callback request at a time.
333  */
334 static __be32
335 validate_seqid(struct nfs4_slot_table *tbl, struct cb_sequenceargs * args)
336 {
337         struct nfs4_slot *slot;
338
339         dprintk("%s enter. slotid %d seqid %d\n",
340                 __func__, args->csa_slotid, args->csa_sequenceid);
341
342         if (args->csa_slotid > NFS41_BC_MAX_CALLBACKS)
343                 return htonl(NFS4ERR_BADSLOT);
344
345         slot = tbl->slots + args->csa_slotid;
346         dprintk("%s slot table seqid: %d\n", __func__, slot->seq_nr);
347
348         /* Normal */
349         if (likely(args->csa_sequenceid == slot->seq_nr + 1)) {
350                 slot->seq_nr++;
351                 return htonl(NFS4_OK);
352         }
353
354         /* Replay */
355         if (args->csa_sequenceid == slot->seq_nr) {
356                 dprintk("%s seqid %d is a replay\n",
357                         __func__, args->csa_sequenceid);
358                 /* Signal process_op to set this error on next op */
359                 if (args->csa_cachethis == 0)
360                         return htonl(NFS4ERR_RETRY_UNCACHED_REP);
361
362                 /* The ca_maxresponsesize_cached is 0 with no DRC */
363                 else if (args->csa_cachethis == 1)
364                         return htonl(NFS4ERR_REP_TOO_BIG_TO_CACHE);
365         }
366
367         /* Wraparound */
368         if (args->csa_sequenceid == 1 && (slot->seq_nr + 1) == 0) {
369                 slot->seq_nr = 1;
370                 return htonl(NFS4_OK);
371         }
372
373         /* Misordered request */
374         return htonl(NFS4ERR_SEQ_MISORDERED);
375 }
376
377 /*
378  * For each referring call triple, check the session's slot table for
379  * a match.  If the slot is in use and the sequence numbers match, the
380  * client is still waiting for a response to the original request.
381  */
382 static bool referring_call_exists(struct nfs_client *clp,
383                                   uint32_t nrclists,
384                                   struct referring_call_list *rclists)
385 {
386         bool status = 0;
387         int i, j;
388         struct nfs4_session *session;
389         struct nfs4_slot_table *tbl;
390         struct referring_call_list *rclist;
391         struct referring_call *ref;
392
393         /*
394          * XXX When client trunking is implemented, this becomes
395          * a session lookup from within the loop
396          */
397         session = clp->cl_session;
398         tbl = &session->fc_slot_table;
399
400         for (i = 0; i < nrclists; i++) {
401                 rclist = &rclists[i];
402                 if (memcmp(session->sess_id.data,
403                            rclist->rcl_sessionid.data,
404                            NFS4_MAX_SESSIONID_LEN) != 0)
405                         continue;
406
407                 for (j = 0; j < rclist->rcl_nrefcalls; j++) {
408                         ref = &rclist->rcl_refcalls[j];
409
410                         dprintk("%s: sessionid %x:%x:%x:%x sequenceid %u "
411                                 "slotid %u\n", __func__,
412                                 ((u32 *)&rclist->rcl_sessionid.data)[0],
413                                 ((u32 *)&rclist->rcl_sessionid.data)[1],
414                                 ((u32 *)&rclist->rcl_sessionid.data)[2],
415                                 ((u32 *)&rclist->rcl_sessionid.data)[3],
416                                 ref->rc_sequenceid, ref->rc_slotid);
417
418                         spin_lock(&tbl->slot_tbl_lock);
419                         status = (test_bit(ref->rc_slotid, tbl->used_slots) &&
420                                   tbl->slots[ref->rc_slotid].seq_nr ==
421                                         ref->rc_sequenceid);
422                         spin_unlock(&tbl->slot_tbl_lock);
423                         if (status)
424                                 goto out;
425                 }
426         }
427
428 out:
429         return status;
430 }
431
432 __be32 nfs4_callback_sequence(struct cb_sequenceargs *args,
433                               struct cb_sequenceres *res,
434                               struct cb_process_state *cps)
435 {
436         struct nfs_client *clp;
437         int i;
438         __be32 status = htonl(NFS4ERR_BADSESSION);
439
440         cps->clp = NULL;
441
442         clp = nfs4_find_client_sessionid(args->csa_addr, &args->csa_sessionid);
443         if (clp == NULL)
444                 goto out;
445
446         /* state manager is resetting the session */
447         if (test_bit(NFS4_SESSION_DRAINING, &clp->cl_session->session_state)) {
448                 status = NFS4ERR_DELAY;
449                 goto out;
450         }
451
452         status = validate_seqid(&clp->cl_session->bc_slot_table, args);
453         if (status)
454                 goto out;
455
456         /*
457          * Check for pending referring calls.  If a match is found, a
458          * related callback was received before the response to the original
459          * call.
460          */
461         if (referring_call_exists(clp, args->csa_nrclists, args->csa_rclists)) {
462                 status = htonl(NFS4ERR_DELAY);
463                 goto out;
464         }
465
466         memcpy(&res->csr_sessionid, &args->csa_sessionid,
467                sizeof(res->csr_sessionid));
468         res->csr_sequenceid = args->csa_sequenceid;
469         res->csr_slotid = args->csa_slotid;
470         res->csr_highestslotid = NFS41_BC_MAX_CALLBACKS - 1;
471         res->csr_target_highestslotid = NFS41_BC_MAX_CALLBACKS - 1;
472         nfs4_cb_take_slot(clp);
473
474 out:
475         cps->clp = clp; /* put in nfs4_callback_compound */
476         for (i = 0; i < args->csa_nrclists; i++)
477                 kfree(args->csa_rclists[i].rcl_refcalls);
478         kfree(args->csa_rclists);
479
480         if (status == htonl(NFS4ERR_RETRY_UNCACHED_REP)) {
481                 cps->drc_status = status;
482                 status = 0;
483         } else
484                 res->csr_status = status;
485
486         dprintk("%s: exit with status = %d res->csr_status %d\n", __func__,
487                 ntohl(status), ntohl(res->csr_status));
488         return status;
489 }
490
491 static bool
492 validate_bitmap_values(unsigned long mask)
493 {
494         return (mask & ~RCA4_TYPE_MASK_ALL) == 0;
495 }
496
497 __be32 nfs4_callback_recallany(struct cb_recallanyargs *args, void *dummy,
498                                struct cb_process_state *cps)
499 {
500         __be32 status;
501         fmode_t flags = 0;
502
503         status = cpu_to_be32(NFS4ERR_OP_NOT_IN_SESSION);
504         if (!cps->clp) /* set in cb_sequence */
505                 goto out;
506
507         dprintk("NFS: RECALL_ANY callback request from %s\n",
508                 rpc_peeraddr2str(cps->clp->cl_rpcclient, RPC_DISPLAY_ADDR));
509
510         status = cpu_to_be32(NFS4ERR_INVAL);
511         if (!validate_bitmap_values(args->craa_type_mask))
512                 goto out;
513
514         status = cpu_to_be32(NFS4_OK);
515         if (test_bit(RCA4_TYPE_MASK_RDATA_DLG, (const unsigned long *)
516                      &args->craa_type_mask))
517                 flags = FMODE_READ;
518         if (test_bit(RCA4_TYPE_MASK_WDATA_DLG, (const unsigned long *)
519                      &args->craa_type_mask))
520                 flags |= FMODE_WRITE;
521         if (test_bit(RCA4_TYPE_MASK_FILE_LAYOUT, (const unsigned long *)
522                      &args->craa_type_mask))
523                 pnfs_recall_all_layouts(cps->clp);
524         if (flags)
525                 nfs_expire_all_delegation_types(cps->clp, flags);
526 out:
527         dprintk("%s: exit with status = %d\n", __func__, ntohl(status));
528         return status;
529 }
530
531 /* Reduce the fore channel's max_slots to the target value */
532 __be32 nfs4_callback_recallslot(struct cb_recallslotargs *args, void *dummy,
533                                 struct cb_process_state *cps)
534 {
535         struct nfs4_slot_table *fc_tbl;
536         __be32 status;
537
538         status = htonl(NFS4ERR_OP_NOT_IN_SESSION);
539         if (!cps->clp) /* set in cb_sequence */
540                 goto out;
541
542         dprintk("NFS: CB_RECALL_SLOT request from %s target max slots %d\n",
543                 rpc_peeraddr2str(cps->clp->cl_rpcclient, RPC_DISPLAY_ADDR),
544                 args->crsa_target_max_slots);
545
546         fc_tbl = &cps->clp->cl_session->fc_slot_table;
547
548         status = htonl(NFS4ERR_BAD_HIGH_SLOT);
549         if (args->crsa_target_max_slots > fc_tbl->max_slots ||
550             args->crsa_target_max_slots < 1)
551                 goto out;
552
553         status = htonl(NFS4_OK);
554         if (args->crsa_target_max_slots == fc_tbl->max_slots)
555                 goto out;
556
557         fc_tbl->target_max_slots = args->crsa_target_max_slots;
558         nfs41_handle_recall_slot(cps->clp);
559 out:
560         dprintk("%s: exit with status = %d\n", __func__, ntohl(status));
561         return status;
562 }
563 #endif /* CONFIG_NFS_V4_1 */