summaryrefslogtreecommitdiffstats
path: root/src/lib/krb5/krb/decrypt_tk.c
blob: aae30a0959416ac39019fb5bc0727c4b59471e73 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
/*
 * $Source$
 * $Author$
 *
 * Copyright 1990 by the Massachusetts Institute of Technology.
 *
 * For copying and distribution information, please see the file
 * <krb5/mit-copyright.h>.
 *
 * krb5_decrypt_tkt_part() function.
 */

#if !defined(lint) && !defined(SABER)
static char rcsid_decrypt_tk_c[] =
"$Id$";
#endif	/* !lint & !SABER */

#include <krb5/copyright.h>

#include <krb5/krb5.h>
#include <krb5/asn1.h>
#include <krb5/krb5_err.h>

#include <errno.h>

#include <krb5/ext-proto.h>


/* array of pointers into encryption systems */
extern krb5_cs_table_entry *csarray[];
extern int max_cryptosystem;

/*
 Takes encrypted dec_ticket->enc_part, encrypts with dec_ticket->etype
 using *srv_key, and places result in dec_ticket->enc_part2.
 The storage of dec_ticket->enc_part2 will be allocated before return.

 returns errors from encryption routines, system errors

*/

krb5_error_code
krb5_decrypt_tkt_part(srv_key, ticket)
krb5_keyblock *srv_key;
register krb5_ticket *ticket;
{
    krb5_enc_tkt_part *dec_tkt_part;
    krb5_encrypt_block eblock;
    krb5_data scratch;
    krb5_error_code retval;

    if (ticket->etype > max_cryptosystem ||
	ticket->etype < 0 ||
	!csarray[ticket->etype])
	return KRB5KDC_ERR_ETYPE_NOSUPP;

    /* put together an eblock for this encryption */

    eblock.crypto_entry = csarray[ticket->etype]->system;

    scratch.length = ticket->enc_part.length;
    if (!(scratch.data = malloc(ticket->enc_part.length)))
	return(ENOMEM);

    /* do any necessary key pre-processing */
    if (retval = (*eblock.crypto_entry->process_key)(&eblock, srv_key)) {
	free(scratch.data);
	return(retval);
    }

    /* call the encryption routine */
    if (retval =
	(*eblock.crypto_entry->decrypt_func)((krb5_pointer) ticket->enc_part.data,
					     (krb5_pointer) scratch.data,
					     scratch.length, &eblock)) {
	(void) (*eblock.crypto_entry->finish_key)(&eblock);
	free(scratch.data);
	return retval;
    }
#define clean_scratch() {bzero(scratch.data, scratch.length); free(scratch.data);}
    if (retval = (*eblock.crypto_entry->finish_key)(&eblock)) {

	clean_scratch();
	return retval;
    }
    /*  now decode the decrypted stuff */
    if (!(retval = decode_krb5_enc_tkt_part(&scratch, &dec_tkt_part))) {
	ticket->enc_part2 = dec_tkt_part;
    }
    clean_scratch();
    return retval;
}