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
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
|
/*
* Copyright (c) 1994 CyberSAFE Corporation.
* All rights reserved.
*
* Export of this software from the United States of America may
* require a specific license from the United States Government.
* It is the responsibility of any person or organization contemplating
* export to obtain such a license before exporting.
*
* WITHIN THAT CONSTRAINT, permission to use, copy, modify, and
* distribute this software and its documentation for any purpose and
* without fee is hereby granted, provided that the above copyright
* notice appear in all copies and that both that copyright notice and
* this permission notice appear in supporting documentation, and that
* the name of M.I.T. not be used in advertising or publicity pertaining
* to distribution of the software without specific, written prior
* permission. Neither M.I.T., the Open Computing Security Group, nor
* CyberSAFE Corporation make any representations about the suitability of
* this software for any purpose. It is provided "as is" without express
* or implied warranty.
*/
#include "k5-int.h"
#include <stdio.h>
#define MAX_REALM_LN 500
krb5_error_code
krb5_check_transited_list(context, trans, realm1, realm2)
krb5_context context;
krb5_data *trans;
krb5_data *realm1;
krb5_data *realm2;
{
char prev[MAX_REALM_LN+1];
char next[MAX_REALM_LN+1];
char *nextp;
int i, j;
int trans_length;
krb5_error_code retval = 0;
krb5_principal *tgs_list;
if (trans == NULL || trans->data == NULL || trans->length == 0)
return(0);
trans_length = trans->data[trans->length-1] ?
trans->length : trans->length - 1;
for (i = 0; i < trans_length; i++)
if (trans->data[i] == '\0') {
/* Realms may not contain ASCII NUL character. */
return(KRB5KRB_AP_ERR_ILL_CR_TKT);
}
if ((retval = krb5_walk_realm_tree(context, realm1, realm2, &tgs_list,
KRB5_REALM_BRANCH_CHAR))) {
return(retval);
}
memset(prev, 0, MAX_REALM_LN + 1);
memset(next, 0, MAX_REALM_LN + 1), nextp = next;
for (i = 0; i < trans_length; i++) {
if (i < trans_length-1 && trans->data[i] == '\\') {
i++;
*nextp++ = trans->data[i];
if (nextp - next > MAX_REALM_LN) {
retval = KRB5KRB_AP_ERR_ILL_CR_TKT;
goto finish;
}
continue;
}
if (i < trans_length && trans->data[i] != ',') {
*nextp++ = trans->data[i];
if (nextp - next > MAX_REALM_LN) {
retval = KRB5KRB_AP_ERR_ILL_CR_TKT;
goto finish;
}
continue;
}
if (strlen(next) > 0) {
if (next[0] != '/') {
if (*(nextp-1) == '.' && strlen(next) + strlen(prev) <= MAX_REALM_LN)
strcat(next, prev);
retval = KRB5KRB_AP_ERR_ILL_CR_TKT;
for (j = 0; tgs_list[j]; j++) {
if (strlen(next) == (size_t) krb5_princ_realm(context, tgs_list[j])->length &&
!memcmp(next, krb5_princ_realm(context, tgs_list[j])->data,
strlen(next))) {
retval = 0;
break;
}
}
if (retval) goto finish;
}
if (i+1 < trans_length && trans->data[i+1] == ' ') {
i++;
memset(next, 0, MAX_REALM_LN + 1), nextp = next;
continue;
}
if (i+1 < trans_length && trans->data[i+1] != '/') {
strcpy(prev, next);
memset(next, 0, MAX_REALM_LN + 1), nextp = next;
continue;
}
}
}
finish:
krb5_free_realm_tree(context, tgs_list);
return(retval);
}
|