More work on krb5 crypto merge
[mech_eap.orig] / util_cksum.c
1 /*
2  * Copyright (c) 2010, JANET(UK)
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  *
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  *
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  *
16  * 3. Neither the name of JANET(UK) nor the names of its contributors
17  *    may be used to endorse or promote products derived from this software
18  *    without specific prior written permission.
19  *
20  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
21  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30  * SUCH DAMAGE.
31  */
32 /*
33  * Copyright 1993 by OpenVision Technologies, Inc.
34  *
35  * Permission to use, copy, modify, distribute, and sell this software
36  * and its documentation for any purpose is hereby granted without fee,
37  * provided that the above copyright notice appears in all copies and
38  * that both that copyright notice and this permission notice appear in
39  * supporting documentation, and that the name of OpenVision not be used
40  * in advertising or publicity pertaining to distribution of the software
41  * without specific, written prior permission. OpenVision makes no
42  * representations about the suitability of this software for any
43  * purpose.  It is provided "as is" without express or implied warranty.
44  *
45  * OPENVISION DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
46  * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
47  * EVENT SHALL OPENVISION BE LIABLE FOR ANY SPECIAL, INDIRECT OR
48  * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF
49  * USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
50  * OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
51  * PERFORMANCE OF THIS SOFTWARE.
52  */
53
54 #include "gssapiP_eap.h"
55
56 static int
57 gssEapChecksum(krb5_context context,
58                krb5_cksumtype type,
59                size_t rrc,
60                krb5_keyblock *key,
61                krb5_keyusage sign_usage,
62                gss_iov_buffer_desc *iov,
63                int iov_count,
64                int verify,
65                int *valid)
66 {
67     krb5_error_code code;
68     gss_iov_buffer_desc *header;
69     gss_iov_buffer_desc *trailer;
70     krb5_crypto_iov *kiov;
71     size_t kiov_count;
72     int i = 0, j;
73     unsigned int k5_checksumlen;
74
75     if (verify)
76         *valid = FALSE;
77
78     code = krb5_c_crypto_length(context, KRB_KEYTYPE(key),
79                                 KRB5_CRYPTO_TYPE_CHECKSUM, &k5_checksumlen);
80     if (code != 0)
81         return code;
82
83     header = gssEapLocateIov(iov, iov_count, GSS_IOV_BUFFER_TYPE_HEADER);
84     assert(header != NULL);
85
86     trailer = gssEapLocateIov(iov, iov_count, GSS_IOV_BUFFER_TYPE_TRAILER);
87     assert(rrc != 0 || trailer != NULL);
88
89     if (trailer == NULL) {
90         if (rrc != k5_checksumlen)
91             return KRB5_BAD_MSIZE;
92         if (header->buffer.length != 16 + k5_checksumlen)
93             return KRB5_BAD_MSIZE;
94     } else if (trailer->buffer.length != k5_checksumlen)
95         return KRB5_BAD_MSIZE;
96
97     kiov_count = 2 + iov_count;
98     kiov = (krb5_crypto_iov *)GSSEAP_MALLOC(kiov_count * sizeof(krb5_crypto_iov));
99     if (kiov == NULL)
100         return ENOMEM;
101
102     /* Checksum over ( Data | Header ) */
103
104     /* Data */
105     for (j = 0; j < iov_count; j++) {
106         kiov[i].flags = gssEapMapCryptoFlag(iov[j].type);
107         kiov[i].data.length = iov[j].buffer.length;
108         kiov[i].data.data = (char *)iov[j].buffer.value;
109         i++;
110     }
111
112     /* Header */
113     kiov[i].flags = KRB5_CRYPTO_TYPE_SIGN_ONLY;
114     kiov[i].data.length = 16;
115     kiov[i].data.data = (char *)header->buffer.value;
116     i++;
117
118     /* Checksum */
119     kiov[i].flags = KRB5_CRYPTO_TYPE_CHECKSUM;
120     if (trailer == NULL) {
121         kiov[i].data.length = header->buffer.length - 16;
122         kiov[i].data.data = (char *)header->buffer.value + 16;
123     } else {
124         kiov[i].data.length = trailer->buffer.length;
125         kiov[i].data.data = (char *)trailer->buffer.value;
126     }
127     i++;
128
129     if (verify) {
130         krb5_boolean kvalid = FALSE;
131
132         code = krb5_c_verify_checksum_iov(context, type, key,
133                                           sign_usage, kiov, kiov_count, &kvalid);
134
135         *valid = kvalid;
136     } else {
137         code = krb5_c_make_checksum_iov(context, type, key,
138                                         sign_usage, kiov, kiov_count);
139     }
140
141     GSSEAP_FREE(kiov);
142
143     return code;
144 }
145
146 int
147 gssEapSign(krb5_context context,
148            krb5_cksumtype type,
149            size_t rrc,
150            krb5_keyblock *key,
151            krb5_keyusage sign_usage,
152            gss_iov_buffer_desc *iov,
153            int iov_count)
154 {
155     return gssEapChecksum(context, type, rrc, key,
156                           sign_usage, iov, iov_count, 0, NULL);
157 }
158
159 int
160 gssEapVerify(krb5_context context,
161              krb5_cksumtype type,
162              size_t rrc,
163              krb5_keyblock *key,
164              krb5_keyusage sign_usage,
165              gss_iov_buffer_desc *iov,
166              int iov_count,
167              int *valid)
168 {
169     return gssEapChecksum(context, type, rrc, key,
170                           sign_usage, iov, iov_count, 1, valid);
171 }