9616e9cfbcabb8971d33f5157711fe6f6558cc33
[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 /*
55  * Message protection services: checksum helpers.
56  */
57
58 #include "gssapiP_eap.h"
59
60 static int
61 gssEapChecksum(krb5_context context,
62                krb5_cksumtype type,
63                size_t rrc,
64                krb5_keyblock *key,
65                krb5_keyusage sign_usage,
66                gss_iov_buffer_desc *iov,
67                int iov_count,
68                int verify,
69                int *valid)
70 {
71     krb5_error_code code;
72     gss_iov_buffer_desc *header;
73     gss_iov_buffer_desc *trailer;
74     krb5_crypto_iov *kiov;
75     size_t kiov_count;
76     int i = 0, j;
77     unsigned int k5_checksumlen;
78
79     if (verify)
80         *valid = FALSE;
81
82     code = krb5_c_crypto_length(context, KRB_KEY_TYPE(key),
83                                 KRB5_CRYPTO_TYPE_CHECKSUM, &k5_checksumlen);
84     if (code != 0)
85         return code;
86
87     header = gssEapLocateIov(iov, iov_count, GSS_IOV_BUFFER_TYPE_HEADER);
88     assert(header != NULL);
89
90     trailer = gssEapLocateIov(iov, iov_count, GSS_IOV_BUFFER_TYPE_TRAILER);
91     assert(rrc != 0 || trailer != NULL);
92
93     if (trailer == NULL) {
94         if (rrc != k5_checksumlen)
95             return KRB5_BAD_MSIZE;
96         if (header->buffer.length != 16 + k5_checksumlen)
97             return KRB5_BAD_MSIZE;
98     } else if (trailer->buffer.length != k5_checksumlen)
99         return KRB5_BAD_MSIZE;
100
101     kiov_count = 2 + iov_count;
102     kiov = (krb5_crypto_iov *)GSSEAP_MALLOC(kiov_count * sizeof(krb5_crypto_iov));
103     if (kiov == NULL)
104         return ENOMEM;
105
106     /* Checksum over ( Data | Header ) */
107
108     /* Data */
109     for (j = 0; j < iov_count; j++) {
110         kiov[i].flags = gssEapMapCryptoFlag(iov[j].type);
111         kiov[i].data.length = iov[j].buffer.length;
112         kiov[i].data.data = (char *)iov[j].buffer.value;
113         i++;
114     }
115
116     /* Header */
117     kiov[i].flags = KRB5_CRYPTO_TYPE_SIGN_ONLY;
118     kiov[i].data.length = 16;
119     kiov[i].data.data = (char *)header->buffer.value;
120     i++;
121
122     /* Checksum */
123     kiov[i].flags = KRB5_CRYPTO_TYPE_CHECKSUM;
124     if (trailer == NULL) {
125         kiov[i].data.length = header->buffer.length - 16;
126         kiov[i].data.data = (char *)header->buffer.value + 16;
127     } else {
128         kiov[i].data.length = trailer->buffer.length;
129         kiov[i].data.data = (char *)trailer->buffer.value;
130     }
131     i++;
132
133     if (verify) {
134         krb5_boolean kvalid = FALSE;
135
136         code = krb5_c_verify_checksum_iov(context, type, key,
137                                           sign_usage, kiov, kiov_count, &kvalid);
138
139         *valid = kvalid;
140     } else {
141         code = krb5_c_make_checksum_iov(context, type, key,
142                                         sign_usage, kiov, kiov_count);
143     }
144
145     GSSEAP_FREE(kiov);
146
147     return code;
148 }
149
150 int
151 gssEapSign(krb5_context context,
152            krb5_cksumtype type,
153            size_t rrc,
154            krb5_keyblock *key,
155            krb5_keyusage sign_usage,
156            gss_iov_buffer_desc *iov,
157            int iov_count)
158 {
159     return gssEapChecksum(context, type, rrc, key,
160                           sign_usage, iov, iov_count, 0, NULL);
161 }
162
163 int
164 gssEapVerify(krb5_context context,
165              krb5_cksumtype type,
166              size_t rrc,
167              krb5_keyblock *key,
168              krb5_keyusage sign_usage,
169              gss_iov_buffer_desc *iov,
170              int iov_count,
171              int *valid)
172 {
173     return gssEapChecksum(context, type, rrc, key,
174                           sign_usage, iov, iov_count, 1, valid);
175 }
176
177 #if 0
178 OM_uint32
179 gssEapEncodeGssChannelBindings(OM_uint32 *minor,
180                                gss_channel_bindings_t chanBindings,
181                                gss_buffer_t encodedBindings)
182 {
183     OM_uint32 major, tmpMinor;
184     size_t length;
185     unsigned char *p;
186
187     if (chanBindings != GSS_C_NO_CHANNEL_BINDINGS) {
188         length = 24;
189         length += chanBindings->initiator_address.length;
190         length += chanBindings->acceptor_address.length;
191         length += chanBindings->application_data.length;
192
193         encodedBindings->value = GSSEAP_MALLOC(length);
194         if (encodedBindings->value == NULL) {
195             *minor = ENOMEM;
196             return GSS_S_FAILURE;
197         }
198
199         encodedBindings->length = length;
200         p = (unsigned char *)encodedBindings->value;
201
202         store_uint32_be(chanBindings->initiator_addrtype, p);
203         store_buffer(&chanBindings->initiator_address, p + 4, 0);
204         p += 4 + chanBindings->initiator_address.length;
205
206         store_uint32_be(chanBindings->acceptor_addrtype, p);
207         store_buffer(&chanBindings->acceptor_address, p + 4, 0);
208         p += 4 + chanBindings->acceptor_address.length;
209
210         store_buffer(&chanBindings->application_data, p, 1);
211         p += chanBindings->application_data.length;
212     } else {
213         encodedBindings->length = 0;
214         encodedBindings->value = NULL;
215     }
216
217     *minor = 0;
218     return GSS_S_COMPLETE;
219 }
220 #endif