Loading...
1/*
2 * linux/fs/lockd/clntxdr.c
3 *
4 * XDR functions to encode/decode NLM version 3 RPC arguments and results.
5 * NLM version 3 is backwards compatible with NLM versions 1 and 2.
6 *
7 * NLM client-side only.
8 *
9 * Copyright (C) 2010, Oracle. All rights reserved.
10 */
11
12#include <linux/types.h>
13#include <linux/sunrpc/xdr.h>
14#include <linux/sunrpc/clnt.h>
15#include <linux/sunrpc/stats.h>
16#include <linux/lockd/lockd.h>
17
18#define NLMDBG_FACILITY NLMDBG_XDR
19
20#if (NLMCLNT_OHSIZE > XDR_MAX_NETOBJ)
21# error "NLM host name cannot be larger than XDR_MAX_NETOBJ!"
22#endif
23
24/*
25 * Declare the space requirements for NLM arguments and replies as
26 * number of 32bit-words
27 */
28#define NLM_cookie_sz (1+(NLM_MAXCOOKIELEN>>2))
29#define NLM_caller_sz (1+(NLMCLNT_OHSIZE>>2))
30#define NLM_owner_sz (1+(NLMCLNT_OHSIZE>>2))
31#define NLM_fhandle_sz (1+(NFS2_FHSIZE>>2))
32#define NLM_lock_sz (3+NLM_caller_sz+NLM_owner_sz+NLM_fhandle_sz)
33#define NLM_holder_sz (4+NLM_owner_sz)
34
35#define NLM_testargs_sz (NLM_cookie_sz+1+NLM_lock_sz)
36#define NLM_lockargs_sz (NLM_cookie_sz+4+NLM_lock_sz)
37#define NLM_cancargs_sz (NLM_cookie_sz+2+NLM_lock_sz)
38#define NLM_unlockargs_sz (NLM_cookie_sz+NLM_lock_sz)
39
40#define NLM_testres_sz (NLM_cookie_sz+1+NLM_holder_sz)
41#define NLM_res_sz (NLM_cookie_sz+1)
42#define NLM_norep_sz (0)
43
44
45static s32 loff_t_to_s32(loff_t offset)
46{
47 s32 res;
48
49 if (offset >= NLM_OFFSET_MAX)
50 res = NLM_OFFSET_MAX;
51 else if (offset <= -NLM_OFFSET_MAX)
52 res = -NLM_OFFSET_MAX;
53 else
54 res = offset;
55 return res;
56}
57
58static void nlm_compute_offsets(const struct nlm_lock *lock,
59 u32 *l_offset, u32 *l_len)
60{
61 const struct file_lock *fl = &lock->fl;
62
63 *l_offset = loff_t_to_s32(fl->fl_start);
64 if (fl->fl_end == OFFSET_MAX)
65 *l_len = 0;
66 else
67 *l_len = loff_t_to_s32(fl->fl_end - fl->fl_start + 1);
68}
69
70/*
71 * Handle decode buffer overflows out-of-line.
72 */
73static void print_overflow_msg(const char *func, const struct xdr_stream *xdr)
74{
75 dprintk("lockd: %s prematurely hit the end of our receive buffer. "
76 "Remaining buffer length is %tu words.\n",
77 func, xdr->end - xdr->p);
78}
79
80
81/*
82 * Encode/decode NLMv3 basic data types
83 *
84 * Basic NLMv3 data types are not defined in an IETF standards
85 * document. X/Open has a description of these data types that
86 * is useful. See Chapter 10 of "Protocols for Interworking:
87 * XNFS, Version 3W".
88 *
89 * Not all basic data types have their own encoding and decoding
90 * functions. For run-time efficiency, some data types are encoded
91 * or decoded inline.
92 */
93
94static void encode_bool(struct xdr_stream *xdr, const int value)
95{
96 __be32 *p;
97
98 p = xdr_reserve_space(xdr, 4);
99 *p = value ? xdr_one : xdr_zero;
100}
101
102static void encode_int32(struct xdr_stream *xdr, const s32 value)
103{
104 __be32 *p;
105
106 p = xdr_reserve_space(xdr, 4);
107 *p = cpu_to_be32(value);
108}
109
110/*
111 * typedef opaque netobj<MAXNETOBJ_SZ>
112 */
113static void encode_netobj(struct xdr_stream *xdr,
114 const u8 *data, const unsigned int length)
115{
116 __be32 *p;
117
118 p = xdr_reserve_space(xdr, 4 + length);
119 xdr_encode_opaque(p, data, length);
120}
121
122static int decode_netobj(struct xdr_stream *xdr,
123 struct xdr_netobj *obj)
124{
125 u32 length;
126 __be32 *p;
127
128 p = xdr_inline_decode(xdr, 4);
129 if (unlikely(p == NULL))
130 goto out_overflow;
131 length = be32_to_cpup(p++);
132 if (unlikely(length > XDR_MAX_NETOBJ))
133 goto out_size;
134 obj->len = length;
135 obj->data = (u8 *)p;
136 return 0;
137out_size:
138 dprintk("NFS: returned netobj was too long: %u\n", length);
139 return -EIO;
140out_overflow:
141 print_overflow_msg(__func__, xdr);
142 return -EIO;
143}
144
145/*
146 * netobj cookie;
147 */
148static void encode_cookie(struct xdr_stream *xdr,
149 const struct nlm_cookie *cookie)
150{
151 encode_netobj(xdr, (u8 *)&cookie->data, cookie->len);
152}
153
154static int decode_cookie(struct xdr_stream *xdr,
155 struct nlm_cookie *cookie)
156{
157 u32 length;
158 __be32 *p;
159
160 p = xdr_inline_decode(xdr, 4);
161 if (unlikely(p == NULL))
162 goto out_overflow;
163 length = be32_to_cpup(p++);
164 /* apparently HPUX can return empty cookies */
165 if (length == 0)
166 goto out_hpux;
167 if (length > NLM_MAXCOOKIELEN)
168 goto out_size;
169 p = xdr_inline_decode(xdr, length);
170 if (unlikely(p == NULL))
171 goto out_overflow;
172 cookie->len = length;
173 memcpy(cookie->data, p, length);
174 return 0;
175out_hpux:
176 cookie->len = 4;
177 memset(cookie->data, 0, 4);
178 return 0;
179out_size:
180 dprintk("NFS: returned cookie was too long: %u\n", length);
181 return -EIO;
182out_overflow:
183 print_overflow_msg(__func__, xdr);
184 return -EIO;
185}
186
187/*
188 * netobj fh;
189 */
190static void encode_fh(struct xdr_stream *xdr, const struct nfs_fh *fh)
191{
192 encode_netobj(xdr, (u8 *)&fh->data, NFS2_FHSIZE);
193}
194
195/*
196 * enum nlm_stats {
197 * LCK_GRANTED = 0,
198 * LCK_DENIED = 1,
199 * LCK_DENIED_NOLOCKS = 2,
200 * LCK_BLOCKED = 3,
201 * LCK_DENIED_GRACE_PERIOD = 4
202 * };
203 *
204 *
205 * struct nlm_stat {
206 * nlm_stats stat;
207 * };
208 *
209 * NB: we don't swap bytes for the NLM status values. The upper
210 * layers deal directly with the status value in network byte
211 * order.
212 */
213
214static void encode_nlm_stat(struct xdr_stream *xdr,
215 const __be32 stat)
216{
217 __be32 *p;
218
219 WARN_ON_ONCE(be32_to_cpu(stat) > NLM_LCK_DENIED_GRACE_PERIOD);
220 p = xdr_reserve_space(xdr, 4);
221 *p = stat;
222}
223
224static int decode_nlm_stat(struct xdr_stream *xdr,
225 __be32 *stat)
226{
227 __be32 *p;
228
229 p = xdr_inline_decode(xdr, 4);
230 if (unlikely(p == NULL))
231 goto out_overflow;
232 if (unlikely(ntohl(*p) > ntohl(nlm_lck_denied_grace_period)))
233 goto out_enum;
234 *stat = *p;
235 return 0;
236out_enum:
237 dprintk("%s: server returned invalid nlm_stats value: %u\n",
238 __func__, be32_to_cpup(p));
239 return -EIO;
240out_overflow:
241 print_overflow_msg(__func__, xdr);
242 return -EIO;
243}
244
245/*
246 * struct nlm_holder {
247 * bool exclusive;
248 * int uppid;
249 * netobj oh;
250 * unsigned l_offset;
251 * unsigned l_len;
252 * };
253 */
254static void encode_nlm_holder(struct xdr_stream *xdr,
255 const struct nlm_res *result)
256{
257 const struct nlm_lock *lock = &result->lock;
258 u32 l_offset, l_len;
259 __be32 *p;
260
261 encode_bool(xdr, lock->fl.fl_type == F_RDLCK);
262 encode_int32(xdr, lock->svid);
263 encode_netobj(xdr, lock->oh.data, lock->oh.len);
264
265 p = xdr_reserve_space(xdr, 4 + 4);
266 nlm_compute_offsets(lock, &l_offset, &l_len);
267 *p++ = cpu_to_be32(l_offset);
268 *p = cpu_to_be32(l_len);
269}
270
271static int decode_nlm_holder(struct xdr_stream *xdr, struct nlm_res *result)
272{
273 struct nlm_lock *lock = &result->lock;
274 struct file_lock *fl = &lock->fl;
275 u32 exclusive, l_offset, l_len;
276 int error;
277 __be32 *p;
278 s32 end;
279
280 memset(lock, 0, sizeof(*lock));
281 locks_init_lock(fl);
282
283 p = xdr_inline_decode(xdr, 4 + 4);
284 if (unlikely(p == NULL))
285 goto out_overflow;
286 exclusive = be32_to_cpup(p++);
287 lock->svid = be32_to_cpup(p);
288 fl->fl_pid = (pid_t)lock->svid;
289
290 error = decode_netobj(xdr, &lock->oh);
291 if (unlikely(error))
292 goto out;
293
294 p = xdr_inline_decode(xdr, 4 + 4);
295 if (unlikely(p == NULL))
296 goto out_overflow;
297
298 fl->fl_flags = FL_POSIX;
299 fl->fl_type = exclusive != 0 ? F_WRLCK : F_RDLCK;
300 l_offset = be32_to_cpup(p++);
301 l_len = be32_to_cpup(p);
302 end = l_offset + l_len - 1;
303
304 fl->fl_start = (loff_t)l_offset;
305 if (l_len == 0 || end < 0)
306 fl->fl_end = OFFSET_MAX;
307 else
308 fl->fl_end = (loff_t)end;
309 error = 0;
310out:
311 return error;
312out_overflow:
313 print_overflow_msg(__func__, xdr);
314 return -EIO;
315}
316
317/*
318 * string caller_name<LM_MAXSTRLEN>;
319 */
320static void encode_caller_name(struct xdr_stream *xdr, const char *name)
321{
322 /* NB: client-side does not set lock->len */
323 u32 length = strlen(name);
324 __be32 *p;
325
326 p = xdr_reserve_space(xdr, 4 + length);
327 xdr_encode_opaque(p, name, length);
328}
329
330/*
331 * struct nlm_lock {
332 * string caller_name<LM_MAXSTRLEN>;
333 * netobj fh;
334 * netobj oh;
335 * int uppid;
336 * unsigned l_offset;
337 * unsigned l_len;
338 * };
339 */
340static void encode_nlm_lock(struct xdr_stream *xdr,
341 const struct nlm_lock *lock)
342{
343 u32 l_offset, l_len;
344 __be32 *p;
345
346 encode_caller_name(xdr, lock->caller);
347 encode_fh(xdr, &lock->fh);
348 encode_netobj(xdr, lock->oh.data, lock->oh.len);
349
350 p = xdr_reserve_space(xdr, 4 + 4 + 4);
351 *p++ = cpu_to_be32(lock->svid);
352
353 nlm_compute_offsets(lock, &l_offset, &l_len);
354 *p++ = cpu_to_be32(l_offset);
355 *p = cpu_to_be32(l_len);
356}
357
358
359/*
360 * NLMv3 XDR encode functions
361 *
362 * NLMv3 argument types are defined in Chapter 10 of The Open Group's
363 * "Protocols for Interworking: XNFS, Version 3W".
364 */
365
366/*
367 * struct nlm_testargs {
368 * netobj cookie;
369 * bool exclusive;
370 * struct nlm_lock alock;
371 * };
372 */
373static void nlm_xdr_enc_testargs(struct rpc_rqst *req,
374 struct xdr_stream *xdr,
375 const struct nlm_args *args)
376{
377 const struct nlm_lock *lock = &args->lock;
378
379 encode_cookie(xdr, &args->cookie);
380 encode_bool(xdr, lock->fl.fl_type == F_WRLCK);
381 encode_nlm_lock(xdr, lock);
382}
383
384/*
385 * struct nlm_lockargs {
386 * netobj cookie;
387 * bool block;
388 * bool exclusive;
389 * struct nlm_lock alock;
390 * bool reclaim;
391 * int state;
392 * };
393 */
394static void nlm_xdr_enc_lockargs(struct rpc_rqst *req,
395 struct xdr_stream *xdr,
396 const struct nlm_args *args)
397{
398 const struct nlm_lock *lock = &args->lock;
399
400 encode_cookie(xdr, &args->cookie);
401 encode_bool(xdr, args->block);
402 encode_bool(xdr, lock->fl.fl_type == F_WRLCK);
403 encode_nlm_lock(xdr, lock);
404 encode_bool(xdr, args->reclaim);
405 encode_int32(xdr, args->state);
406}
407
408/*
409 * struct nlm_cancargs {
410 * netobj cookie;
411 * bool block;
412 * bool exclusive;
413 * struct nlm_lock alock;
414 * };
415 */
416static void nlm_xdr_enc_cancargs(struct rpc_rqst *req,
417 struct xdr_stream *xdr,
418 const struct nlm_args *args)
419{
420 const struct nlm_lock *lock = &args->lock;
421
422 encode_cookie(xdr, &args->cookie);
423 encode_bool(xdr, args->block);
424 encode_bool(xdr, lock->fl.fl_type == F_WRLCK);
425 encode_nlm_lock(xdr, lock);
426}
427
428/*
429 * struct nlm_unlockargs {
430 * netobj cookie;
431 * struct nlm_lock alock;
432 * };
433 */
434static void nlm_xdr_enc_unlockargs(struct rpc_rqst *req,
435 struct xdr_stream *xdr,
436 const struct nlm_args *args)
437{
438 const struct nlm_lock *lock = &args->lock;
439
440 encode_cookie(xdr, &args->cookie);
441 encode_nlm_lock(xdr, lock);
442}
443
444/*
445 * struct nlm_res {
446 * netobj cookie;
447 * nlm_stat stat;
448 * };
449 */
450static void nlm_xdr_enc_res(struct rpc_rqst *req,
451 struct xdr_stream *xdr,
452 const struct nlm_res *result)
453{
454 encode_cookie(xdr, &result->cookie);
455 encode_nlm_stat(xdr, result->status);
456}
457
458/*
459 * union nlm_testrply switch (nlm_stats stat) {
460 * case LCK_DENIED:
461 * struct nlm_holder holder;
462 * default:
463 * void;
464 * };
465 *
466 * struct nlm_testres {
467 * netobj cookie;
468 * nlm_testrply test_stat;
469 * };
470 */
471static void encode_nlm_testrply(struct xdr_stream *xdr,
472 const struct nlm_res *result)
473{
474 if (result->status == nlm_lck_denied)
475 encode_nlm_holder(xdr, result);
476}
477
478static void nlm_xdr_enc_testres(struct rpc_rqst *req,
479 struct xdr_stream *xdr,
480 const struct nlm_res *result)
481{
482 encode_cookie(xdr, &result->cookie);
483 encode_nlm_stat(xdr, result->status);
484 encode_nlm_testrply(xdr, result);
485}
486
487
488/*
489 * NLMv3 XDR decode functions
490 *
491 * NLMv3 result types are defined in Chapter 10 of The Open Group's
492 * "Protocols for Interworking: XNFS, Version 3W".
493 */
494
495/*
496 * union nlm_testrply switch (nlm_stats stat) {
497 * case LCK_DENIED:
498 * struct nlm_holder holder;
499 * default:
500 * void;
501 * };
502 *
503 * struct nlm_testres {
504 * netobj cookie;
505 * nlm_testrply test_stat;
506 * };
507 */
508static int decode_nlm_testrply(struct xdr_stream *xdr,
509 struct nlm_res *result)
510{
511 int error;
512
513 error = decode_nlm_stat(xdr, &result->status);
514 if (unlikely(error))
515 goto out;
516 if (result->status == nlm_lck_denied)
517 error = decode_nlm_holder(xdr, result);
518out:
519 return error;
520}
521
522static int nlm_xdr_dec_testres(struct rpc_rqst *req,
523 struct xdr_stream *xdr,
524 struct nlm_res *result)
525{
526 int error;
527
528 error = decode_cookie(xdr, &result->cookie);
529 if (unlikely(error))
530 goto out;
531 error = decode_nlm_testrply(xdr, result);
532out:
533 return error;
534}
535
536/*
537 * struct nlm_res {
538 * netobj cookie;
539 * nlm_stat stat;
540 * };
541 */
542static int nlm_xdr_dec_res(struct rpc_rqst *req,
543 struct xdr_stream *xdr,
544 struct nlm_res *result)
545{
546 int error;
547
548 error = decode_cookie(xdr, &result->cookie);
549 if (unlikely(error))
550 goto out;
551 error = decode_nlm_stat(xdr, &result->status);
552out:
553 return error;
554}
555
556
557/*
558 * For NLM, a void procedure really returns nothing
559 */
560#define nlm_xdr_dec_norep NULL
561
562#define PROC(proc, argtype, restype) \
563[NLMPROC_##proc] = { \
564 .p_proc = NLMPROC_##proc, \
565 .p_encode = (kxdreproc_t)nlm_xdr_enc_##argtype, \
566 .p_decode = (kxdrdproc_t)nlm_xdr_dec_##restype, \
567 .p_arglen = NLM_##argtype##_sz, \
568 .p_replen = NLM_##restype##_sz, \
569 .p_statidx = NLMPROC_##proc, \
570 .p_name = #proc, \
571 }
572
573static struct rpc_procinfo nlm_procedures[] = {
574 PROC(TEST, testargs, testres),
575 PROC(LOCK, lockargs, res),
576 PROC(CANCEL, cancargs, res),
577 PROC(UNLOCK, unlockargs, res),
578 PROC(GRANTED, testargs, res),
579 PROC(TEST_MSG, testargs, norep),
580 PROC(LOCK_MSG, lockargs, norep),
581 PROC(CANCEL_MSG, cancargs, norep),
582 PROC(UNLOCK_MSG, unlockargs, norep),
583 PROC(GRANTED_MSG, testargs, norep),
584 PROC(TEST_RES, testres, norep),
585 PROC(LOCK_RES, res, norep),
586 PROC(CANCEL_RES, res, norep),
587 PROC(UNLOCK_RES, res, norep),
588 PROC(GRANTED_RES, res, norep),
589};
590
591static const struct rpc_version nlm_version1 = {
592 .number = 1,
593 .nrprocs = ARRAY_SIZE(nlm_procedures),
594 .procs = nlm_procedures,
595};
596
597static const struct rpc_version nlm_version3 = {
598 .number = 3,
599 .nrprocs = ARRAY_SIZE(nlm_procedures),
600 .procs = nlm_procedures,
601};
602
603static const struct rpc_version *nlm_versions[] = {
604 [1] = &nlm_version1,
605 [3] = &nlm_version3,
606#ifdef CONFIG_LOCKD_V4
607 [4] = &nlm_version4,
608#endif
609};
610
611static struct rpc_stat nlm_rpc_stats;
612
613const struct rpc_program nlm_program = {
614 .name = "lockd",
615 .number = NLM_PROGRAM,
616 .nrvers = ARRAY_SIZE(nlm_versions),
617 .version = nlm_versions,
618 .stats = &nlm_rpc_stats,
619};
1// SPDX-License-Identifier: GPL-2.0
2/*
3 * linux/fs/lockd/clntxdr.c
4 *
5 * XDR functions to encode/decode NLM version 3 RPC arguments and results.
6 * NLM version 3 is backwards compatible with NLM versions 1 and 2.
7 *
8 * NLM client-side only.
9 *
10 * Copyright (C) 2010, Oracle. All rights reserved.
11 */
12
13#include <linux/types.h>
14#include <linux/sunrpc/xdr.h>
15#include <linux/sunrpc/clnt.h>
16#include <linux/sunrpc/stats.h>
17#include <linux/lockd/lockd.h>
18
19#include <uapi/linux/nfs2.h>
20
21#define NLMDBG_FACILITY NLMDBG_XDR
22
23#if (NLMCLNT_OHSIZE > XDR_MAX_NETOBJ)
24# error "NLM host name cannot be larger than XDR_MAX_NETOBJ!"
25#endif
26
27/*
28 * Declare the space requirements for NLM arguments and replies as
29 * number of 32bit-words
30 */
31#define NLM_cookie_sz (1+(NLM_MAXCOOKIELEN>>2))
32#define NLM_caller_sz (1+(NLMCLNT_OHSIZE>>2))
33#define NLM_owner_sz (1+(NLMCLNT_OHSIZE>>2))
34#define NLM_fhandle_sz (1+(NFS2_FHSIZE>>2))
35#define NLM_lock_sz (3+NLM_caller_sz+NLM_owner_sz+NLM_fhandle_sz)
36#define NLM_holder_sz (4+NLM_owner_sz)
37
38#define NLM_testargs_sz (NLM_cookie_sz+1+NLM_lock_sz)
39#define NLM_lockargs_sz (NLM_cookie_sz+4+NLM_lock_sz)
40#define NLM_cancargs_sz (NLM_cookie_sz+2+NLM_lock_sz)
41#define NLM_unlockargs_sz (NLM_cookie_sz+NLM_lock_sz)
42
43#define NLM_testres_sz (NLM_cookie_sz+1+NLM_holder_sz)
44#define NLM_res_sz (NLM_cookie_sz+1)
45#define NLM_norep_sz (0)
46
47
48static s32 loff_t_to_s32(loff_t offset)
49{
50 s32 res;
51
52 if (offset >= NLM_OFFSET_MAX)
53 res = NLM_OFFSET_MAX;
54 else if (offset <= -NLM_OFFSET_MAX)
55 res = -NLM_OFFSET_MAX;
56 else
57 res = offset;
58 return res;
59}
60
61static void nlm_compute_offsets(const struct nlm_lock *lock,
62 u32 *l_offset, u32 *l_len)
63{
64 const struct file_lock *fl = &lock->fl;
65
66 *l_offset = loff_t_to_s32(fl->fl_start);
67 if (fl->fl_end == OFFSET_MAX)
68 *l_len = 0;
69 else
70 *l_len = loff_t_to_s32(fl->fl_end - fl->fl_start + 1);
71}
72
73/*
74 * Handle decode buffer overflows out-of-line.
75 */
76static void print_overflow_msg(const char *func, const struct xdr_stream *xdr)
77{
78 dprintk("lockd: %s prematurely hit the end of our receive buffer. "
79 "Remaining buffer length is %tu words.\n",
80 func, xdr->end - xdr->p);
81}
82
83
84/*
85 * Encode/decode NLMv3 basic data types
86 *
87 * Basic NLMv3 data types are not defined in an IETF standards
88 * document. X/Open has a description of these data types that
89 * is useful. See Chapter 10 of "Protocols for Interworking:
90 * XNFS, Version 3W".
91 *
92 * Not all basic data types have their own encoding and decoding
93 * functions. For run-time efficiency, some data types are encoded
94 * or decoded inline.
95 */
96
97static void encode_bool(struct xdr_stream *xdr, const int value)
98{
99 __be32 *p;
100
101 p = xdr_reserve_space(xdr, 4);
102 *p = value ? xdr_one : xdr_zero;
103}
104
105static void encode_int32(struct xdr_stream *xdr, const s32 value)
106{
107 __be32 *p;
108
109 p = xdr_reserve_space(xdr, 4);
110 *p = cpu_to_be32(value);
111}
112
113/*
114 * typedef opaque netobj<MAXNETOBJ_SZ>
115 */
116static void encode_netobj(struct xdr_stream *xdr,
117 const u8 *data, const unsigned int length)
118{
119 __be32 *p;
120
121 p = xdr_reserve_space(xdr, 4 + length);
122 xdr_encode_opaque(p, data, length);
123}
124
125static int decode_netobj(struct xdr_stream *xdr,
126 struct xdr_netobj *obj)
127{
128 u32 length;
129 __be32 *p;
130
131 p = xdr_inline_decode(xdr, 4);
132 if (unlikely(p == NULL))
133 goto out_overflow;
134 length = be32_to_cpup(p++);
135 if (unlikely(length > XDR_MAX_NETOBJ))
136 goto out_size;
137 obj->len = length;
138 obj->data = (u8 *)p;
139 return 0;
140out_size:
141 dprintk("NFS: returned netobj was too long: %u\n", length);
142 return -EIO;
143out_overflow:
144 print_overflow_msg(__func__, xdr);
145 return -EIO;
146}
147
148/*
149 * netobj cookie;
150 */
151static void encode_cookie(struct xdr_stream *xdr,
152 const struct nlm_cookie *cookie)
153{
154 encode_netobj(xdr, (u8 *)&cookie->data, cookie->len);
155}
156
157static int decode_cookie(struct xdr_stream *xdr,
158 struct nlm_cookie *cookie)
159{
160 u32 length;
161 __be32 *p;
162
163 p = xdr_inline_decode(xdr, 4);
164 if (unlikely(p == NULL))
165 goto out_overflow;
166 length = be32_to_cpup(p++);
167 /* apparently HPUX can return empty cookies */
168 if (length == 0)
169 goto out_hpux;
170 if (length > NLM_MAXCOOKIELEN)
171 goto out_size;
172 p = xdr_inline_decode(xdr, length);
173 if (unlikely(p == NULL))
174 goto out_overflow;
175 cookie->len = length;
176 memcpy(cookie->data, p, length);
177 return 0;
178out_hpux:
179 cookie->len = 4;
180 memset(cookie->data, 0, 4);
181 return 0;
182out_size:
183 dprintk("NFS: returned cookie was too long: %u\n", length);
184 return -EIO;
185out_overflow:
186 print_overflow_msg(__func__, xdr);
187 return -EIO;
188}
189
190/*
191 * netobj fh;
192 */
193static void encode_fh(struct xdr_stream *xdr, const struct nfs_fh *fh)
194{
195 encode_netobj(xdr, (u8 *)&fh->data, NFS2_FHSIZE);
196}
197
198/*
199 * enum nlm_stats {
200 * LCK_GRANTED = 0,
201 * LCK_DENIED = 1,
202 * LCK_DENIED_NOLOCKS = 2,
203 * LCK_BLOCKED = 3,
204 * LCK_DENIED_GRACE_PERIOD = 4
205 * };
206 *
207 *
208 * struct nlm_stat {
209 * nlm_stats stat;
210 * };
211 *
212 * NB: we don't swap bytes for the NLM status values. The upper
213 * layers deal directly with the status value in network byte
214 * order.
215 */
216
217static void encode_nlm_stat(struct xdr_stream *xdr,
218 const __be32 stat)
219{
220 __be32 *p;
221
222 WARN_ON_ONCE(be32_to_cpu(stat) > NLM_LCK_DENIED_GRACE_PERIOD);
223 p = xdr_reserve_space(xdr, 4);
224 *p = stat;
225}
226
227static int decode_nlm_stat(struct xdr_stream *xdr,
228 __be32 *stat)
229{
230 __be32 *p;
231
232 p = xdr_inline_decode(xdr, 4);
233 if (unlikely(p == NULL))
234 goto out_overflow;
235 if (unlikely(ntohl(*p) > ntohl(nlm_lck_denied_grace_period)))
236 goto out_enum;
237 *stat = *p;
238 return 0;
239out_enum:
240 dprintk("%s: server returned invalid nlm_stats value: %u\n",
241 __func__, be32_to_cpup(p));
242 return -EIO;
243out_overflow:
244 print_overflow_msg(__func__, xdr);
245 return -EIO;
246}
247
248/*
249 * struct nlm_holder {
250 * bool exclusive;
251 * int uppid;
252 * netobj oh;
253 * unsigned l_offset;
254 * unsigned l_len;
255 * };
256 */
257static void encode_nlm_holder(struct xdr_stream *xdr,
258 const struct nlm_res *result)
259{
260 const struct nlm_lock *lock = &result->lock;
261 u32 l_offset, l_len;
262 __be32 *p;
263
264 encode_bool(xdr, lock->fl.fl_type == F_RDLCK);
265 encode_int32(xdr, lock->svid);
266 encode_netobj(xdr, lock->oh.data, lock->oh.len);
267
268 p = xdr_reserve_space(xdr, 4 + 4);
269 nlm_compute_offsets(lock, &l_offset, &l_len);
270 *p++ = cpu_to_be32(l_offset);
271 *p = cpu_to_be32(l_len);
272}
273
274static int decode_nlm_holder(struct xdr_stream *xdr, struct nlm_res *result)
275{
276 struct nlm_lock *lock = &result->lock;
277 struct file_lock *fl = &lock->fl;
278 u32 exclusive, l_offset, l_len;
279 int error;
280 __be32 *p;
281 s32 end;
282
283 memset(lock, 0, sizeof(*lock));
284 locks_init_lock(fl);
285
286 p = xdr_inline_decode(xdr, 4 + 4);
287 if (unlikely(p == NULL))
288 goto out_overflow;
289 exclusive = be32_to_cpup(p++);
290 lock->svid = be32_to_cpup(p);
291 fl->fl_pid = (pid_t)lock->svid;
292
293 error = decode_netobj(xdr, &lock->oh);
294 if (unlikely(error))
295 goto out;
296
297 p = xdr_inline_decode(xdr, 4 + 4);
298 if (unlikely(p == NULL))
299 goto out_overflow;
300
301 fl->fl_flags = FL_POSIX;
302 fl->fl_type = exclusive != 0 ? F_WRLCK : F_RDLCK;
303 l_offset = be32_to_cpup(p++);
304 l_len = be32_to_cpup(p);
305 end = l_offset + l_len - 1;
306
307 fl->fl_start = (loff_t)l_offset;
308 if (l_len == 0 || end < 0)
309 fl->fl_end = OFFSET_MAX;
310 else
311 fl->fl_end = (loff_t)end;
312 error = 0;
313out:
314 return error;
315out_overflow:
316 print_overflow_msg(__func__, xdr);
317 return -EIO;
318}
319
320/*
321 * string caller_name<LM_MAXSTRLEN>;
322 */
323static void encode_caller_name(struct xdr_stream *xdr, const char *name)
324{
325 /* NB: client-side does not set lock->len */
326 u32 length = strlen(name);
327 __be32 *p;
328
329 p = xdr_reserve_space(xdr, 4 + length);
330 xdr_encode_opaque(p, name, length);
331}
332
333/*
334 * struct nlm_lock {
335 * string caller_name<LM_MAXSTRLEN>;
336 * netobj fh;
337 * netobj oh;
338 * int uppid;
339 * unsigned l_offset;
340 * unsigned l_len;
341 * };
342 */
343static void encode_nlm_lock(struct xdr_stream *xdr,
344 const struct nlm_lock *lock)
345{
346 u32 l_offset, l_len;
347 __be32 *p;
348
349 encode_caller_name(xdr, lock->caller);
350 encode_fh(xdr, &lock->fh);
351 encode_netobj(xdr, lock->oh.data, lock->oh.len);
352
353 p = xdr_reserve_space(xdr, 4 + 4 + 4);
354 *p++ = cpu_to_be32(lock->svid);
355
356 nlm_compute_offsets(lock, &l_offset, &l_len);
357 *p++ = cpu_to_be32(l_offset);
358 *p = cpu_to_be32(l_len);
359}
360
361
362/*
363 * NLMv3 XDR encode functions
364 *
365 * NLMv3 argument types are defined in Chapter 10 of The Open Group's
366 * "Protocols for Interworking: XNFS, Version 3W".
367 */
368
369/*
370 * struct nlm_testargs {
371 * netobj cookie;
372 * bool exclusive;
373 * struct nlm_lock alock;
374 * };
375 */
376static void nlm_xdr_enc_testargs(struct rpc_rqst *req,
377 struct xdr_stream *xdr,
378 const void *data)
379{
380 const struct nlm_args *args = data;
381 const struct nlm_lock *lock = &args->lock;
382
383 encode_cookie(xdr, &args->cookie);
384 encode_bool(xdr, lock->fl.fl_type == F_WRLCK);
385 encode_nlm_lock(xdr, lock);
386}
387
388/*
389 * struct nlm_lockargs {
390 * netobj cookie;
391 * bool block;
392 * bool exclusive;
393 * struct nlm_lock alock;
394 * bool reclaim;
395 * int state;
396 * };
397 */
398static void nlm_xdr_enc_lockargs(struct rpc_rqst *req,
399 struct xdr_stream *xdr,
400 const void *data)
401{
402 const struct nlm_args *args = data;
403 const struct nlm_lock *lock = &args->lock;
404
405 encode_cookie(xdr, &args->cookie);
406 encode_bool(xdr, args->block);
407 encode_bool(xdr, lock->fl.fl_type == F_WRLCK);
408 encode_nlm_lock(xdr, lock);
409 encode_bool(xdr, args->reclaim);
410 encode_int32(xdr, args->state);
411}
412
413/*
414 * struct nlm_cancargs {
415 * netobj cookie;
416 * bool block;
417 * bool exclusive;
418 * struct nlm_lock alock;
419 * };
420 */
421static void nlm_xdr_enc_cancargs(struct rpc_rqst *req,
422 struct xdr_stream *xdr,
423 const void *data)
424{
425 const struct nlm_args *args = data;
426 const struct nlm_lock *lock = &args->lock;
427
428 encode_cookie(xdr, &args->cookie);
429 encode_bool(xdr, args->block);
430 encode_bool(xdr, lock->fl.fl_type == F_WRLCK);
431 encode_nlm_lock(xdr, lock);
432}
433
434/*
435 * struct nlm_unlockargs {
436 * netobj cookie;
437 * struct nlm_lock alock;
438 * };
439 */
440static void nlm_xdr_enc_unlockargs(struct rpc_rqst *req,
441 struct xdr_stream *xdr,
442 const void *data)
443{
444 const struct nlm_args *args = data;
445 const struct nlm_lock *lock = &args->lock;
446
447 encode_cookie(xdr, &args->cookie);
448 encode_nlm_lock(xdr, lock);
449}
450
451/*
452 * struct nlm_res {
453 * netobj cookie;
454 * nlm_stat stat;
455 * };
456 */
457static void nlm_xdr_enc_res(struct rpc_rqst *req,
458 struct xdr_stream *xdr,
459 const void *data)
460{
461 const struct nlm_res *result = data;
462
463 encode_cookie(xdr, &result->cookie);
464 encode_nlm_stat(xdr, result->status);
465}
466
467/*
468 * union nlm_testrply switch (nlm_stats stat) {
469 * case LCK_DENIED:
470 * struct nlm_holder holder;
471 * default:
472 * void;
473 * };
474 *
475 * struct nlm_testres {
476 * netobj cookie;
477 * nlm_testrply test_stat;
478 * };
479 */
480static void encode_nlm_testrply(struct xdr_stream *xdr,
481 const struct nlm_res *result)
482{
483 if (result->status == nlm_lck_denied)
484 encode_nlm_holder(xdr, result);
485}
486
487static void nlm_xdr_enc_testres(struct rpc_rqst *req,
488 struct xdr_stream *xdr,
489 const void *data)
490{
491 const struct nlm_res *result = data;
492
493 encode_cookie(xdr, &result->cookie);
494 encode_nlm_stat(xdr, result->status);
495 encode_nlm_testrply(xdr, result);
496}
497
498
499/*
500 * NLMv3 XDR decode functions
501 *
502 * NLMv3 result types are defined in Chapter 10 of The Open Group's
503 * "Protocols for Interworking: XNFS, Version 3W".
504 */
505
506/*
507 * union nlm_testrply switch (nlm_stats stat) {
508 * case LCK_DENIED:
509 * struct nlm_holder holder;
510 * default:
511 * void;
512 * };
513 *
514 * struct nlm_testres {
515 * netobj cookie;
516 * nlm_testrply test_stat;
517 * };
518 */
519static int decode_nlm_testrply(struct xdr_stream *xdr,
520 struct nlm_res *result)
521{
522 int error;
523
524 error = decode_nlm_stat(xdr, &result->status);
525 if (unlikely(error))
526 goto out;
527 if (result->status == nlm_lck_denied)
528 error = decode_nlm_holder(xdr, result);
529out:
530 return error;
531}
532
533static int nlm_xdr_dec_testres(struct rpc_rqst *req,
534 struct xdr_stream *xdr,
535 void *data)
536{
537 struct nlm_res *result = data;
538 int error;
539
540 error = decode_cookie(xdr, &result->cookie);
541 if (unlikely(error))
542 goto out;
543 error = decode_nlm_testrply(xdr, result);
544out:
545 return error;
546}
547
548/*
549 * struct nlm_res {
550 * netobj cookie;
551 * nlm_stat stat;
552 * };
553 */
554static int nlm_xdr_dec_res(struct rpc_rqst *req,
555 struct xdr_stream *xdr,
556 void *data)
557{
558 struct nlm_res *result = data;
559 int error;
560
561 error = decode_cookie(xdr, &result->cookie);
562 if (unlikely(error))
563 goto out;
564 error = decode_nlm_stat(xdr, &result->status);
565out:
566 return error;
567}
568
569
570/*
571 * For NLM, a void procedure really returns nothing
572 */
573#define nlm_xdr_dec_norep NULL
574
575#define PROC(proc, argtype, restype) \
576[NLMPROC_##proc] = { \
577 .p_proc = NLMPROC_##proc, \
578 .p_encode = nlm_xdr_enc_##argtype, \
579 .p_decode = nlm_xdr_dec_##restype, \
580 .p_arglen = NLM_##argtype##_sz, \
581 .p_replen = NLM_##restype##_sz, \
582 .p_statidx = NLMPROC_##proc, \
583 .p_name = #proc, \
584 }
585
586static const struct rpc_procinfo nlm_procedures[] = {
587 PROC(TEST, testargs, testres),
588 PROC(LOCK, lockargs, res),
589 PROC(CANCEL, cancargs, res),
590 PROC(UNLOCK, unlockargs, res),
591 PROC(GRANTED, testargs, res),
592 PROC(TEST_MSG, testargs, norep),
593 PROC(LOCK_MSG, lockargs, norep),
594 PROC(CANCEL_MSG, cancargs, norep),
595 PROC(UNLOCK_MSG, unlockargs, norep),
596 PROC(GRANTED_MSG, testargs, norep),
597 PROC(TEST_RES, testres, norep),
598 PROC(LOCK_RES, res, norep),
599 PROC(CANCEL_RES, res, norep),
600 PROC(UNLOCK_RES, res, norep),
601 PROC(GRANTED_RES, res, norep),
602};
603
604static unsigned int nlm_version1_counts[ARRAY_SIZE(nlm_procedures)];
605static const struct rpc_version nlm_version1 = {
606 .number = 1,
607 .nrprocs = ARRAY_SIZE(nlm_procedures),
608 .procs = nlm_procedures,
609 .counts = nlm_version1_counts,
610};
611
612static unsigned int nlm_version3_counts[ARRAY_SIZE(nlm_procedures)];
613static const struct rpc_version nlm_version3 = {
614 .number = 3,
615 .nrprocs = ARRAY_SIZE(nlm_procedures),
616 .procs = nlm_procedures,
617 .counts = nlm_version3_counts,
618};
619
620static const struct rpc_version *nlm_versions[] = {
621 [1] = &nlm_version1,
622 [3] = &nlm_version3,
623#ifdef CONFIG_LOCKD_V4
624 [4] = &nlm_version4,
625#endif
626};
627
628static struct rpc_stat nlm_rpc_stats;
629
630const struct rpc_program nlm_program = {
631 .name = "lockd",
632 .number = NLM_PROGRAM,
633 .nrvers = ARRAY_SIZE(nlm_versions),
634 .version = nlm_versions,
635 .stats = &nlm_rpc_stats,
636};