2 Unix SMB/CIFS implementation.
4 RFC2478 Compliant SPNEGO implementation
6 Copyright (C) Jim McDonough <jmcd@us.ibm.com> 2003
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
19 You should have received a copy of the GNU General Public License
20 along with this program. If not, see <http://www.gnu.org/licenses/>.
24 #include "auth/gensec/spnego.h"
25 #include "auth/gensec/gensec.h"
26 #include "libcli/util/asn_1.h"
28 static bool read_negTokenInit(struct asn1_data *asn1, TALLOC_CTX *mem_ctx,
29 struct spnego_negTokenInit *token)
33 asn1_start_tag(asn1, ASN1_CONTEXT(0));
34 asn1_start_tag(asn1, ASN1_SEQUENCE(0));
36 while (!asn1->has_error && 0 < asn1_tag_remaining(asn1)) {
39 if (!asn1_peek_uint8(asn1, &context)) {
40 asn1->has_error = true;
47 asn1_start_tag(asn1, ASN1_CONTEXT(0));
48 asn1_start_tag(asn1, ASN1_SEQUENCE(0));
50 token->mechTypes = talloc(NULL, const char *);
51 for (i = 0; !asn1->has_error &&
52 0 < asn1_tag_remaining(asn1); i++) {
53 token->mechTypes = talloc_realloc(NULL,
56 asn1_read_OID(asn1, token->mechTypes, token->mechTypes + i);
58 token->mechTypes[i] = NULL;
65 asn1_start_tag(asn1, ASN1_CONTEXT(1));
66 asn1_read_Integer(asn1, &token->reqFlags);
67 token->reqFlags |= SPNEGO_REQ_FLAG;
72 asn1_start_tag(asn1, ASN1_CONTEXT(2));
73 asn1_read_OctetString(asn1, mem_ctx, &token->mechToken);
80 asn1_start_tag(asn1, ASN1_CONTEXT(3));
81 if (!asn1_peek_uint8(asn1, &type_peek)) {
82 asn1->has_error = true;
85 if (type_peek == ASN1_OCTET_STRING) {
86 asn1_read_OctetString(asn1, mem_ctx,
89 /* RFC 2478 says we have an Octet String here,
90 but W2k sends something different... */
92 asn1_push_tag(asn1, ASN1_SEQUENCE(0));
93 asn1_push_tag(asn1, ASN1_CONTEXT(0));
94 asn1_read_GeneralString(asn1, mem_ctx, &mechListMIC);
98 token->targetPrincipal = mechListMIC;
104 asn1->has_error = true;
112 return !asn1->has_error;
115 static bool write_negTokenInit(struct asn1_data *asn1, struct spnego_negTokenInit *token)
117 asn1_push_tag(asn1, ASN1_CONTEXT(0));
118 asn1_push_tag(asn1, ASN1_SEQUENCE(0));
120 /* Write mechTypes */
121 if (token->mechTypes && *token->mechTypes) {
124 asn1_push_tag(asn1, ASN1_CONTEXT(0));
125 asn1_push_tag(asn1, ASN1_SEQUENCE(0));
126 for (i = 0; token->mechTypes[i]; i++) {
127 asn1_write_OID(asn1, token->mechTypes[i]);
134 if (token->reqFlags & SPNEGO_REQ_FLAG) {
135 int flags = token->reqFlags & ~SPNEGO_REQ_FLAG;
137 asn1_push_tag(asn1, ASN1_CONTEXT(1));
138 asn1_write_Integer(asn1, flags);
142 /* write mechToken */
143 if (token->mechToken.data) {
144 asn1_push_tag(asn1, ASN1_CONTEXT(2));
145 asn1_write_OctetString(asn1, token->mechToken.data,
146 token->mechToken.length);
150 /* write mechListMIC */
151 if (token->mechListMIC.data) {
152 asn1_push_tag(asn1, ASN1_CONTEXT(3));
154 /* This is what RFC 2478 says ... */
155 asn1_write_OctetString(asn1, token->mechListMIC.data,
156 token->mechListMIC.length);
158 /* ... but unfortunately this is what Windows
160 asn1_push_tag(asn1, ASN1_SEQUENCE(0));
161 asn1_push_tag(asn1, ASN1_CONTEXT(0));
162 asn1_push_tag(asn1, ASN1_GENERAL_STRING);
163 asn1_write(asn1, token->mechListMIC.data,
164 token->mechListMIC.length);
175 return !asn1->has_error;
178 static bool read_negTokenTarg(struct asn1_data *asn1, TALLOC_CTX *mem_ctx,
179 struct spnego_negTokenTarg *token)
183 asn1_start_tag(asn1, ASN1_CONTEXT(1));
184 asn1_start_tag(asn1, ASN1_SEQUENCE(0));
186 while (!asn1->has_error && 0 < asn1_tag_remaining(asn1)) {
188 if (!asn1_peek_uint8(asn1, &context)) {
189 asn1->has_error = true;
194 case ASN1_CONTEXT(0):
195 asn1_start_tag(asn1, ASN1_CONTEXT(0));
196 asn1_start_tag(asn1, ASN1_ENUMERATED);
197 asn1_read_uint8(asn1, &token->negResult);
201 case ASN1_CONTEXT(1):
202 asn1_start_tag(asn1, ASN1_CONTEXT(1));
203 asn1_read_OID(asn1, mem_ctx, &token->supportedMech);
206 case ASN1_CONTEXT(2):
207 asn1_start_tag(asn1, ASN1_CONTEXT(2));
208 asn1_read_OctetString(asn1, mem_ctx, &token->responseToken);
211 case ASN1_CONTEXT(3):
212 asn1_start_tag(asn1, ASN1_CONTEXT(3));
213 asn1_read_OctetString(asn1, mem_ctx, &token->mechListMIC);
217 asn1->has_error = true;
225 return !asn1->has_error;
228 static bool write_negTokenTarg(struct asn1_data *asn1, struct spnego_negTokenTarg *token)
230 asn1_push_tag(asn1, ASN1_CONTEXT(1));
231 asn1_push_tag(asn1, ASN1_SEQUENCE(0));
233 if (token->negResult != SPNEGO_NONE_RESULT) {
234 asn1_push_tag(asn1, ASN1_CONTEXT(0));
235 asn1_write_enumerated(asn1, token->negResult);
239 if (token->supportedMech) {
240 asn1_push_tag(asn1, ASN1_CONTEXT(1));
241 asn1_write_OID(asn1, token->supportedMech);
245 if (token->responseToken.data) {
246 asn1_push_tag(asn1, ASN1_CONTEXT(2));
247 asn1_write_OctetString(asn1, token->responseToken.data,
248 token->responseToken.length);
252 if (token->mechListMIC.data) {
253 asn1_push_tag(asn1, ASN1_CONTEXT(3));
254 asn1_write_OctetString(asn1, token->mechListMIC.data,
255 token->mechListMIC.length);
262 return !asn1->has_error;
265 ssize_t spnego_read_data(TALLOC_CTX *mem_ctx, DATA_BLOB data, struct spnego_data *token)
267 struct asn1_data *asn1;
273 if (data.length == 0) {
277 asn1 = asn1_init(mem_ctx);
282 asn1_load(asn1, data);
284 if (!asn1_peek_uint8(asn1, &context)) {
285 asn1->has_error = true;
288 case ASN1_APPLICATION(0):
289 asn1_start_tag(asn1, ASN1_APPLICATION(0));
290 asn1_check_OID(asn1, GENSEC_OID_SPNEGO);
291 if (read_negTokenInit(asn1, mem_ctx, &token->negTokenInit)) {
292 token->type = SPNEGO_NEG_TOKEN_INIT;
296 case ASN1_CONTEXT(1):
297 if (read_negTokenTarg(asn1, mem_ctx, &token->negTokenTarg)) {
298 token->type = SPNEGO_NEG_TOKEN_TARG;
302 asn1->has_error = true;
307 if (!asn1->has_error) ret = asn1->ofs;
313 ssize_t spnego_write_data(TALLOC_CTX *mem_ctx, DATA_BLOB *blob, struct spnego_data *spnego)
315 struct asn1_data *asn1 = asn1_init(mem_ctx);
322 switch (spnego->type) {
323 case SPNEGO_NEG_TOKEN_INIT:
324 asn1_push_tag(asn1, ASN1_APPLICATION(0));
325 asn1_write_OID(asn1, GENSEC_OID_SPNEGO);
326 write_negTokenInit(asn1, &spnego->negTokenInit);
329 case SPNEGO_NEG_TOKEN_TARG:
330 write_negTokenTarg(asn1, &spnego->negTokenTarg);
333 asn1->has_error = true;
337 if (!asn1->has_error) {
338 *blob = data_blob_talloc(mem_ctx, asn1->data, asn1->length);
346 bool spnego_free_data(struct spnego_data *spnego)
350 if (!spnego) goto out;
352 switch(spnego->type) {
353 case SPNEGO_NEG_TOKEN_INIT:
354 if (spnego->negTokenInit.mechTypes) {
355 talloc_free(spnego->negTokenInit.mechTypes);
357 data_blob_free(&spnego->negTokenInit.mechToken);
358 data_blob_free(&spnego->negTokenInit.mechListMIC);
359 talloc_free(spnego->negTokenInit.targetPrincipal);
361 case SPNEGO_NEG_TOKEN_TARG:
362 if (spnego->negTokenTarg.supportedMech) {
363 talloc_free(discard_const(spnego->negTokenTarg.supportedMech));
365 data_blob_free(&spnego->negTokenTarg.responseToken);
366 data_blob_free(&spnego->negTokenTarg.mechListMIC);
372 ZERO_STRUCTP(spnego);