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(size: sizeof(*token), GFP_KERNEL); |
79 | if (!token) |
80 | return -ENOMEM; |
81 | |
82 | token->kad = kzalloc(size: plen, GFP_KERNEL); |
83 | if (!token->kad) { |
84 | kfree(objp: 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(time: 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, xdr: 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(size: sizeof(*token), GFP_KERNEL); |
347 | if (!token) |
348 | goto error; |
349 | token->kad = kzalloc(size: 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(time: token->kad->expiry); |
369 | if (expiry < prep->expiry) |
370 | prep->expiry = expiry; |
371 | token = NULL; |
372 | ret = 0; |
373 | |
374 | error_free: |
375 | kfree(objp: 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(objp: 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(objp: 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(token: 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(token: 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, s: key->description); |
428 | |
429 | for (token = key->payload.data[0]; token; token = token->next) { |
430 | seq_puts(m, s: sep); |
431 | |
432 | switch (token->security_index) { |
433 | case RXRPC_SECURITY_RXKAD: |
434 | seq_puts(m, s: "ka" ); |
435 | break; |
436 | default: /* we have a ticket we can't encode */ |
437 | seq_printf(m, fmt: "%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(src: optval, len: optlen); |
459 | if (IS_ERR(ptr: description)) |
460 | return PTR_ERR(ptr: description); |
461 | |
462 | key = request_key_net(&key_type_rxrpc, description, sock_net(&rx->sk), NULL); |
463 | if (IS_ERR(ptr: key)) { |
464 | kfree(objp: description); |
465 | _leave(" = %ld" , PTR_ERR(key)); |
466 | return PTR_ERR(ptr: key); |
467 | } |
468 | |
469 | rx->key = key; |
470 | kfree(objp: 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(type: &key_type_rxrpc, desc: "x" , |
495 | GLOBAL_ROOT_UID, GLOBAL_ROOT_GID, cred, perm: 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(type: &key_type_rxrpc, desc: 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(p: key->description, q: "afs@" , size: 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 | |