xref: /openbmc/linux/net/rxrpc/key.c (revision 8e7a49e0)
1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /* RxRPC key management
3  *
4  * Copyright (C) 2007 Red Hat, Inc. All Rights Reserved.
5  * Written by David Howells (dhowells@redhat.com)
6  *
7  * RxRPC keys should have a description of describing their purpose:
8  *	"afs@example.com"
9  */
10 
11 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
12 
13 #include <crypto/skcipher.h>
14 #include <linux/module.h>
15 #include <linux/net.h>
16 #include <linux/skbuff.h>
17 #include <linux/key-type.h>
18 #include <linux/ctype.h>
19 #include <linux/slab.h>
20 #include <net/sock.h>
21 #include <net/af_rxrpc.h>
22 #include <keys/rxrpc-type.h>
23 #include <keys/user-type.h>
24 #include "ar-internal.h"
25 
26 static int rxrpc_preparse(struct key_preparsed_payload *);
27 static void rxrpc_free_preparse(struct key_preparsed_payload *);
28 static void rxrpc_destroy(struct key *);
29 static void rxrpc_describe(const struct key *, struct seq_file *);
30 static long rxrpc_read(const struct key *, char *, size_t);
31 
32 /*
33  * rxrpc defined keys take an arbitrary string as the description and an
34  * arbitrary blob of data as the payload
35  */
36 struct key_type key_type_rxrpc = {
37 	.name		= "rxrpc",
38 	.flags		= KEY_TYPE_NET_DOMAIN,
39 	.preparse	= rxrpc_preparse,
40 	.free_preparse	= rxrpc_free_preparse,
41 	.instantiate	= generic_key_instantiate,
42 	.destroy	= rxrpc_destroy,
43 	.describe	= rxrpc_describe,
44 	.read		= rxrpc_read,
45 };
46 EXPORT_SYMBOL(key_type_rxrpc);
47 
48 /*
49  * parse an RxKAD type XDR format token
50  * - the caller guarantees we have at least 4 words
51  */
52 static int rxrpc_preparse_xdr_rxkad(struct key_preparsed_payload *prep,
53 				    size_t datalen,
54 				    const __be32 *xdr, unsigned int toklen)
55 {
56 	struct rxrpc_key_token *token, **pptoken;
57 	time64_t expiry;
58 	size_t plen;
59 	u32 tktlen;
60 
61 	_enter(",{%x,%x,%x,%x},%u",
62 	       ntohl(xdr[0]), ntohl(xdr[1]), ntohl(xdr[2]), ntohl(xdr[3]),
63 	       toklen);
64 
65 	if (toklen <= 8 * 4)
66 		return -EKEYREJECTED;
67 	tktlen = ntohl(xdr[7]);
68 	_debug("tktlen: %x", tktlen);
69 	if (tktlen > AFSTOKEN_RK_TIX_MAX)
70 		return -EKEYREJECTED;
71 	if (toklen < 8 * 4 + tktlen)
72 		return -EKEYREJECTED;
73 
74 	plen = sizeof(*token) + sizeof(*token->kad) + tktlen;
75 	prep->quotalen = datalen + plen;
76 
77 	plen -= sizeof(*token);
78 	token = kzalloc(sizeof(*token), GFP_KERNEL);
79 	if (!token)
80 		return -ENOMEM;
81 
82 	token->kad = kzalloc(plen, GFP_KERNEL);
83 	if (!token->kad) {
84 		kfree(token);
85 		return -ENOMEM;
86 	}
87 
88 	token->security_index	= RXRPC_SECURITY_RXKAD;
89 	token->kad->ticket_len	= tktlen;
90 	token->kad->vice_id	= ntohl(xdr[0]);
91 	token->kad->kvno	= ntohl(xdr[1]);
92 	token->kad->start	= ntohl(xdr[4]);
93 	token->kad->expiry	= ntohl(xdr[5]);
94 	token->kad->primary_flag = ntohl(xdr[6]);
95 	memcpy(&token->kad->session_key, &xdr[2], 8);
96 	memcpy(&token->kad->ticket, &xdr[8], tktlen);
97 
98 	_debug("SCIX: %u", token->security_index);
99 	_debug("TLEN: %u", token->kad->ticket_len);
100 	_debug("EXPY: %x", token->kad->expiry);
101 	_debug("KVNO: %u", token->kad->kvno);
102 	_debug("PRIM: %u", token->kad->primary_flag);
103 	_debug("SKEY: %02x%02x%02x%02x%02x%02x%02x%02x",
104 	       token->kad->session_key[0], token->kad->session_key[1],
105 	       token->kad->session_key[2], token->kad->session_key[3],
106 	       token->kad->session_key[4], token->kad->session_key[5],
107 	       token->kad->session_key[6], token->kad->session_key[7]);
108 	if (token->kad->ticket_len >= 8)
109 		_debug("TCKT: %02x%02x%02x%02x%02x%02x%02x%02x",
110 		       token->kad->ticket[0], token->kad->ticket[1],
111 		       token->kad->ticket[2], token->kad->ticket[3],
112 		       token->kad->ticket[4], token->kad->ticket[5],
113 		       token->kad->ticket[6], token->kad->ticket[7]);
114 
115 	/* count the number of tokens attached */
116 	prep->payload.data[1] = (void *)((unsigned long)prep->payload.data[1] + 1);
117 
118 	/* attach the data */
119 	for (pptoken = (struct rxrpc_key_token **)&prep->payload.data[0];
120 	     *pptoken;
121 	     pptoken = &(*pptoken)->next)
122 		continue;
123 	*pptoken = token;
124 	expiry = rxrpc_u32_to_time64(token->kad->expiry);
125 	if (expiry < prep->expiry)
126 		prep->expiry = expiry;
127 
128 	_leave(" = 0");
129 	return 0;
130 }
131 
132 /*
133  * attempt to parse the data as the XDR format
134  * - the caller guarantees we have more than 7 words
135  */
136 static int rxrpc_preparse_xdr(struct key_preparsed_payload *prep)
137 {
138 	const __be32 *xdr = prep->data, *token, *p;
139 	const char *cp;
140 	unsigned int len, paddedlen, loop, ntoken, toklen, sec_ix;
141 	size_t datalen = prep->datalen;
142 	int ret, ret2;
143 
144 	_enter(",{%x,%x,%x,%x},%zu",
145 	       ntohl(xdr[0]), ntohl(xdr[1]), ntohl(xdr[2]), ntohl(xdr[3]),
146 	       prep->datalen);
147 
148 	if (datalen > AFSTOKEN_LENGTH_MAX)
149 		goto not_xdr;
150 
151 	/* XDR is an array of __be32's */
152 	if (datalen & 3)
153 		goto not_xdr;
154 
155 	/* the flags should be 0 (the setpag bit must be handled by
156 	 * userspace) */
157 	if (ntohl(*xdr++) != 0)
158 		goto not_xdr;
159 	datalen -= 4;
160 
161 	/* check the cell name */
162 	len = ntohl(*xdr++);
163 	if (len < 1 || len > AFSTOKEN_CELL_MAX)
164 		goto not_xdr;
165 	datalen -= 4;
166 	paddedlen = (len + 3) & ~3;
167 	if (paddedlen > datalen)
168 		goto not_xdr;
169 
170 	cp = (const char *) xdr;
171 	for (loop = 0; loop < len; loop++)
172 		if (!isprint(cp[loop]))
173 			goto not_xdr;
174 	for (; loop < paddedlen; loop++)
175 		if (cp[loop])
176 			goto not_xdr;
177 	_debug("cellname: [%u/%u] '%*.*s'",
178 	       len, paddedlen, len, len, (const char *) xdr);
179 	datalen -= paddedlen;
180 	xdr += paddedlen >> 2;
181 
182 	/* get the token count */
183 	if (datalen < 12)
184 		goto not_xdr;
185 	ntoken = ntohl(*xdr++);
186 	datalen -= 4;
187 	_debug("ntoken: %x", ntoken);
188 	if (ntoken < 1 || ntoken > AFSTOKEN_MAX)
189 		goto not_xdr;
190 
191 	/* check each token wrapper */
192 	p = xdr;
193 	loop = ntoken;
194 	do {
195 		if (datalen < 8)
196 			goto not_xdr;
197 		toklen = ntohl(*p++);
198 		sec_ix = ntohl(*p);
199 		datalen -= 4;
200 		_debug("token: [%x/%zx] %x", toklen, datalen, sec_ix);
201 		paddedlen = (toklen + 3) & ~3;
202 		if (toklen < 20 || toklen > datalen || paddedlen > datalen)
203 			goto not_xdr;
204 		datalen -= paddedlen;
205 		p += paddedlen >> 2;
206 
207 	} while (--loop > 0);
208 
209 	_debug("remainder: %zu", datalen);
210 	if (datalen != 0)
211 		goto not_xdr;
212 
213 	/* okay: we're going to assume it's valid XDR format
214 	 * - we ignore the cellname, relying on the key to be correctly named
215 	 */
216 	ret = -EPROTONOSUPPORT;
217 	do {
218 		toklen = ntohl(*xdr++);
219 		token = xdr;
220 		xdr += (toklen + 3) / 4;
221 
222 		sec_ix = ntohl(*token++);
223 		toklen -= 4;
224 
225 		_debug("TOKEN type=%x len=%x", sec_ix, toklen);
226 
227 		switch (sec_ix) {
228 		case RXRPC_SECURITY_RXKAD:
229 			ret2 = rxrpc_preparse_xdr_rxkad(prep, datalen, token, toklen);
230 			break;
231 		default:
232 			ret2 = -EPROTONOSUPPORT;
233 			break;
234 		}
235 
236 		switch (ret2) {
237 		case 0:
238 			ret = 0;
239 			break;
240 		case -EPROTONOSUPPORT:
241 			break;
242 		case -ENOPKG:
243 			if (ret != 0)
244 				ret = -ENOPKG;
245 			break;
246 		default:
247 			ret = ret2;
248 			goto error;
249 		}
250 
251 	} while (--ntoken > 0);
252 
253 error:
254 	_leave(" = %d", ret);
255 	return ret;
256 
257 not_xdr:
258 	_leave(" = -EPROTO");
259 	return -EPROTO;
260 }
261 
262 /*
263  * Preparse an rxrpc defined key.
264  *
265  * Data should be of the form:
266  *	OFFSET	LEN	CONTENT
267  *	0	4	key interface version number
268  *	4	2	security index (type)
269  *	6	2	ticket length
270  *	8	4	key expiry time (time_t)
271  *	12	4	kvno
272  *	16	8	session key
273  *	24	[len]	ticket
274  *
275  * if no data is provided, then a no-security key is made
276  */
277 static int rxrpc_preparse(struct key_preparsed_payload *prep)
278 {
279 	const struct rxrpc_key_data_v1 *v1;
280 	struct rxrpc_key_token *token, **pp;
281 	time64_t expiry;
282 	size_t plen;
283 	u32 kver;
284 	int ret;
285 
286 	_enter("%zu", prep->datalen);
287 
288 	/* handle a no-security key */
289 	if (!prep->data && prep->datalen == 0)
290 		return 0;
291 
292 	/* determine if the XDR payload format is being used */
293 	if (prep->datalen > 7 * 4) {
294 		ret = rxrpc_preparse_xdr(prep);
295 		if (ret != -EPROTO)
296 			return ret;
297 	}
298 
299 	/* get the key interface version number */
300 	ret = -EINVAL;
301 	if (prep->datalen <= 4 || !prep->data)
302 		goto error;
303 	memcpy(&kver, prep->data, sizeof(kver));
304 	prep->data += sizeof(kver);
305 	prep->datalen -= sizeof(kver);
306 
307 	_debug("KEY I/F VERSION: %u", kver);
308 
309 	ret = -EKEYREJECTED;
310 	if (kver != 1)
311 		goto error;
312 
313 	/* deal with a version 1 key */
314 	ret = -EINVAL;
315 	if (prep->datalen < sizeof(*v1))
316 		goto error;
317 
318 	v1 = prep->data;
319 	if (prep->datalen != sizeof(*v1) + v1->ticket_length)
320 		goto error;
321 
322 	_debug("SCIX: %u", v1->security_index);
323 	_debug("TLEN: %u", v1->ticket_length);
324 	_debug("EXPY: %x", v1->expiry);
325 	_debug("KVNO: %u", v1->kvno);
326 	_debug("SKEY: %02x%02x%02x%02x%02x%02x%02x%02x",
327 	       v1->session_key[0], v1->session_key[1],
328 	       v1->session_key[2], v1->session_key[3],
329 	       v1->session_key[4], v1->session_key[5],
330 	       v1->session_key[6], v1->session_key[7]);
331 	if (v1->ticket_length >= 8)
332 		_debug("TCKT: %02x%02x%02x%02x%02x%02x%02x%02x",
333 		       v1->ticket[0], v1->ticket[1],
334 		       v1->ticket[2], v1->ticket[3],
335 		       v1->ticket[4], v1->ticket[5],
336 		       v1->ticket[6], v1->ticket[7]);
337 
338 	ret = -EPROTONOSUPPORT;
339 	if (v1->security_index != RXRPC_SECURITY_RXKAD)
340 		goto error;
341 
342 	plen = sizeof(*token->kad) + v1->ticket_length;
343 	prep->quotalen = plen + sizeof(*token);
344 
345 	ret = -ENOMEM;
346 	token = kzalloc(sizeof(*token), GFP_KERNEL);
347 	if (!token)
348 		goto error;
349 	token->kad = kzalloc(plen, GFP_KERNEL);
350 	if (!token->kad)
351 		goto error_free;
352 
353 	token->security_index		= RXRPC_SECURITY_RXKAD;
354 	token->kad->ticket_len		= v1->ticket_length;
355 	token->kad->expiry		= v1->expiry;
356 	token->kad->kvno		= v1->kvno;
357 	memcpy(&token->kad->session_key, &v1->session_key, 8);
358 	memcpy(&token->kad->ticket, v1->ticket, v1->ticket_length);
359 
360 	/* count the number of tokens attached */
361 	prep->payload.data[1] = (void *)((unsigned long)prep->payload.data[1] + 1);
362 
363 	/* attach the data */
364 	pp = (struct rxrpc_key_token **)&prep->payload.data[0];
365 	while (*pp)
366 		pp = &(*pp)->next;
367 	*pp = token;
368 	expiry = rxrpc_u32_to_time64(token->kad->expiry);
369 	if (expiry < prep->expiry)
370 		prep->expiry = expiry;
371 	token = NULL;
372 	ret = 0;
373 
374 error_free:
375 	kfree(token);
376 error:
377 	return ret;
378 }
379 
380 /*
381  * Free token list.
382  */
383 static void rxrpc_free_token_list(struct rxrpc_key_token *token)
384 {
385 	struct rxrpc_key_token *next;
386 
387 	for (; token; token = next) {
388 		next = token->next;
389 		switch (token->security_index) {
390 		case RXRPC_SECURITY_RXKAD:
391 			kfree(token->kad);
392 			break;
393 		default:
394 			pr_err("Unknown token type %x on rxrpc key\n",
395 			       token->security_index);
396 			BUG();
397 		}
398 
399 		kfree(token);
400 	}
401 }
402 
403 /*
404  * Clean up preparse data.
405  */
406 static void rxrpc_free_preparse(struct key_preparsed_payload *prep)
407 {
408 	rxrpc_free_token_list(prep->payload.data[0]);
409 }
410 
411 /*
412  * dispose of the data dangling from the corpse of a rxrpc key
413  */
414 static void rxrpc_destroy(struct key *key)
415 {
416 	rxrpc_free_token_list(key->payload.data[0]);
417 }
418 
419 /*
420  * describe the rxrpc key
421  */
422 static void rxrpc_describe(const struct key *key, struct seq_file *m)
423 {
424 	const struct rxrpc_key_token *token;
425 	const char *sep = ": ";
426 
427 	seq_puts(m, key->description);
428 
429 	for (token = key->payload.data[0]; token; token = token->next) {
430 		seq_puts(m, sep);
431 
432 		switch (token->security_index) {
433 		case RXRPC_SECURITY_RXKAD:
434 			seq_puts(m, "ka");
435 			break;
436 		default: /* we have a ticket we can't encode */
437 			seq_printf(m, "%u", token->security_index);
438 			break;
439 		}
440 
441 		sep = " ";
442 	}
443 }
444 
445 /*
446  * grab the security key for a socket
447  */
448 int rxrpc_request_key(struct rxrpc_sock *rx, sockptr_t optval, int optlen)
449 {
450 	struct key *key;
451 	char *description;
452 
453 	_enter("");
454 
455 	if (optlen <= 0 || optlen > PAGE_SIZE - 1 || rx->securities)
456 		return -EINVAL;
457 
458 	description = memdup_sockptr_nul(optval, optlen);
459 	if (IS_ERR(description))
460 		return PTR_ERR(description);
461 
462 	key = request_key_net(&key_type_rxrpc, description, sock_net(&rx->sk), NULL);
463 	if (IS_ERR(key)) {
464 		kfree(description);
465 		_leave(" = %ld", PTR_ERR(key));
466 		return PTR_ERR(key);
467 	}
468 
469 	rx->key = key;
470 	kfree(description);
471 	_leave(" = 0 [key %x]", key->serial);
472 	return 0;
473 }
474 
475 /*
476  * generate a server data key
477  */
478 int rxrpc_get_server_data_key(struct rxrpc_connection *conn,
479 			      const void *session_key,
480 			      time64_t expiry,
481 			      u32 kvno)
482 {
483 	const struct cred *cred = current_cred();
484 	struct key *key;
485 	int ret;
486 
487 	struct {
488 		u32 kver;
489 		struct rxrpc_key_data_v1 v1;
490 	} data;
491 
492 	_enter("");
493 
494 	key = key_alloc(&key_type_rxrpc, "x",
495 			GLOBAL_ROOT_UID, GLOBAL_ROOT_GID, cred, 0,
496 			KEY_ALLOC_NOT_IN_QUOTA, NULL);
497 	if (IS_ERR(key)) {
498 		_leave(" = -ENOMEM [alloc %ld]", PTR_ERR(key));
499 		return -ENOMEM;
500 	}
501 
502 	_debug("key %d", key_serial(key));
503 
504 	data.kver = 1;
505 	data.v1.security_index = RXRPC_SECURITY_RXKAD;
506 	data.v1.ticket_length = 0;
507 	data.v1.expiry = rxrpc_time64_to_u32(expiry);
508 	data.v1.kvno = 0;
509 
510 	memcpy(&data.v1.session_key, session_key, sizeof(data.v1.session_key));
511 
512 	ret = key_instantiate_and_link(key, &data, sizeof(data), NULL, NULL);
513 	if (ret < 0)
514 		goto error;
515 
516 	conn->key = key;
517 	_leave(" = 0 [%d]", key_serial(key));
518 	return 0;
519 
520 error:
521 	key_revoke(key);
522 	key_put(key);
523 	_leave(" = -ENOMEM [ins %d]", ret);
524 	return -ENOMEM;
525 }
526 EXPORT_SYMBOL(rxrpc_get_server_data_key);
527 
528 /**
529  * rxrpc_get_null_key - Generate a null RxRPC key
530  * @keyname: The name to give the key.
531  *
532  * Generate a null RxRPC key that can be used to indicate anonymous security is
533  * required for a particular domain.
534  */
535 struct key *rxrpc_get_null_key(const char *keyname)
536 {
537 	const struct cred *cred = current_cred();
538 	struct key *key;
539 	int ret;
540 
541 	key = key_alloc(&key_type_rxrpc, keyname,
542 			GLOBAL_ROOT_UID, GLOBAL_ROOT_GID, cred,
543 			KEY_POS_SEARCH, KEY_ALLOC_NOT_IN_QUOTA, NULL);
544 	if (IS_ERR(key))
545 		return key;
546 
547 	ret = key_instantiate_and_link(key, NULL, 0, NULL, NULL);
548 	if (ret < 0) {
549 		key_revoke(key);
550 		key_put(key);
551 		return ERR_PTR(ret);
552 	}
553 
554 	return key;
555 }
556 EXPORT_SYMBOL(rxrpc_get_null_key);
557 
558 /*
559  * read the contents of an rxrpc key
560  * - this returns the result in XDR form
561  */
562 static long rxrpc_read(const struct key *key,
563 		       char *buffer, size_t buflen)
564 {
565 	const struct rxrpc_key_token *token;
566 	size_t size;
567 	__be32 *xdr, *oldxdr;
568 	u32 cnlen, toksize, ntoks, tok, zero;
569 	u16 toksizes[AFSTOKEN_MAX];
570 
571 	_enter("");
572 
573 	/* we don't know what form we should return non-AFS keys in */
574 	if (memcmp(key->description, "afs@", 4) != 0)
575 		return -EOPNOTSUPP;
576 	cnlen = strlen(key->description + 4);
577 
578 #define RND(X) (((X) + 3) & ~3)
579 
580 	/* AFS keys we return in XDR form, so we need to work out the size of
581 	 * the XDR */
582 	size = 2 * 4;	/* flags, cellname len */
583 	size += RND(cnlen);	/* cellname */
584 	size += 1 * 4;	/* token count */
585 
586 	ntoks = 0;
587 	for (token = key->payload.data[0]; token; token = token->next) {
588 		toksize = 4;	/* sec index */
589 
590 		switch (token->security_index) {
591 		case RXRPC_SECURITY_RXKAD:
592 			toksize += 8 * 4;	/* viceid, kvno, key*2, begin,
593 						 * end, primary, tktlen */
594 			if (!token->no_leak_key)
595 				toksize += RND(token->kad->ticket_len);
596 			break;
597 
598 		default: /* we have a ticket we can't encode */
599 			pr_err("Unsupported key token type (%u)\n",
600 			       token->security_index);
601 			return -ENOPKG;
602 		}
603 
604 		_debug("token[%u]: toksize=%u", ntoks, toksize);
605 		if (WARN_ON(toksize > AFSTOKEN_LENGTH_MAX))
606 			return -EIO;
607 
608 		toksizes[ntoks++] = toksize;
609 		size += toksize + 4; /* each token has a length word */
610 	}
611 
612 #undef RND
613 
614 	if (!buffer || buflen < size)
615 		return size;
616 
617 	xdr = (__be32 *)buffer;
618 	zero = 0;
619 #define ENCODE(x)				\
620 	do {					\
621 		*xdr++ = htonl(x);		\
622 	} while(0)
623 #define ENCODE_DATA(l, s)						\
624 	do {								\
625 		u32 _l = (l);						\
626 		ENCODE(l);						\
627 		memcpy(xdr, (s), _l);					\
628 		if (_l & 3)						\
629 			memcpy((u8 *)xdr + _l, &zero, 4 - (_l & 3));	\
630 		xdr += (_l + 3) >> 2;					\
631 	} while(0)
632 #define ENCODE_BYTES(l, s)						\
633 	do {								\
634 		u32 _l = (l);						\
635 		memcpy(xdr, (s), _l);					\
636 		if (_l & 3)						\
637 			memcpy((u8 *)xdr + _l, &zero, 4 - (_l & 3));	\
638 		xdr += (_l + 3) >> 2;					\
639 	} while(0)
640 #define ENCODE64(x)					\
641 	do {						\
642 		__be64 y = cpu_to_be64(x);		\
643 		memcpy(xdr, &y, 8);			\
644 		xdr += 8 >> 2;				\
645 	} while(0)
646 #define ENCODE_STR(s)				\
647 	do {					\
648 		const char *_s = (s);		\
649 		ENCODE_DATA(strlen(_s), _s);	\
650 	} while(0)
651 
652 	ENCODE(0);					/* flags */
653 	ENCODE_DATA(cnlen, key->description + 4);	/* cellname */
654 	ENCODE(ntoks);
655 
656 	tok = 0;
657 	for (token = key->payload.data[0]; token; token = token->next) {
658 		toksize = toksizes[tok++];
659 		ENCODE(toksize);
660 		oldxdr = xdr;
661 		ENCODE(token->security_index);
662 
663 		switch (token->security_index) {
664 		case RXRPC_SECURITY_RXKAD:
665 			ENCODE(token->kad->vice_id);
666 			ENCODE(token->kad->kvno);
667 			ENCODE_BYTES(8, token->kad->session_key);
668 			ENCODE(token->kad->start);
669 			ENCODE(token->kad->expiry);
670 			ENCODE(token->kad->primary_flag);
671 			if (token->no_leak_key)
672 				ENCODE(0);
673 			else
674 				ENCODE_DATA(token->kad->ticket_len, token->kad->ticket);
675 			break;
676 
677 		default:
678 			pr_err("Unsupported key token type (%u)\n",
679 			       token->security_index);
680 			return -ENOPKG;
681 		}
682 
683 		if (WARN_ON((unsigned long)xdr - (unsigned long)oldxdr ==
684 			    toksize))
685 			return -EIO;
686 	}
687 
688 #undef ENCODE_STR
689 #undef ENCODE_DATA
690 #undef ENCODE64
691 #undef ENCODE
692 
693 	if (WARN_ON(tok != ntoks))
694 		return -EIO;
695 	if (WARN_ON((unsigned long)xdr - (unsigned long)buffer != size))
696 		return -EIO;
697 	_leave(" = %zu", size);
698 	return size;
699 }
700