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
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
|
/*
* win_store.c
*
* Kerberos configuration storage management routines.
*
* Originally coded by John Rivlin / Fusion Software, Inc.
*
* This file incorporates replacements for the following Unix files:
* g_cnffil.c
*/
#include "krb.h"
#include "k5-int.h"
#include <stdio.h>
#include <assert.h>
krb5_context krb5__krb4_context = 0;
char *
krb__get_srvtabname(default_srvtabname)
char *default_srvtabname;
{
const char* names[3];
char **full_name = 0, **cpp;
krb5_error_code retval;
char *retname;
if (!krb5__krb4_context) {
retval = krb5_init_context(&krb5__krb4_context);
if (!retval)
return NULL;
}
names[0] = "libdefaults";
names[1] = "krb4_srvtab";
names[2] = 0;
retval = profile_get_values(krb5__krb4_context->profile, names,
&full_name);
if (retval == 0 && full_name && full_name[0]) {
retname = strdup(full_name[0]);
for (cpp = full_name; *cpp; cpp++)
krb5_xfree(*cpp);
krb5_xfree(full_name);
} else {
retname = strdup(default_srvtabname);
}
return retname;
}
/*
* Returns an open file handle to the configuration file. This
* file was called "krb.conf" on Unix. Here we search for the entry
* "krb.conf=" in the "[FILES]" section of the "kerberos.ini" file
* located in the Windows directory. If the entry doesn't exist in
* the kerberos.ini file, then "krb.con" in the Windows directory is
* used in its place.
*/
FILE*
krb__get_cnffile()
{
FILE *cnffile = 0;
char cnfname[FILENAME_MAX];
char defname[FILENAME_MAX];
UINT rc;
rc = GetWindowsDirectory(defname, sizeof(defname));
assert(rc > 0);
strcat(defname, "\\");
strcat(defname, DEF_KRB_CONF);
GetPrivateProfileString(INI_FILES, INI_KRB_CONF, defname,
cnfname, sizeof(cnfname), KERBEROS_INI);
cnffile = fopen(cnfname, "r");
return cnffile;
}
/*
* Returns an open file handle to the realms file. This
* file was called "krb.realms" on Unix. Here we search for the entry
* "krb.realms=" in the "[FILES]" section of the "kerberos.ini" file
* located in the Windows directory. If the entry doesn't exist in
* the kerberos.ini file, then "krb.rea" in the Windows directory is
* used in its place.
*/
FILE*
krb__get_realmsfile()
{
FILE *realmsfile = 0;
char realmsname[FILENAME_MAX];
char defname[FILENAME_MAX];
UINT rc;
rc = GetWindowsDirectory(defname, sizeof(defname));
assert(rc > 0);
strcat(defname, "\\");
strcat(defname, DEF_KRB_REALMS);
GetPrivateProfileString(INI_FILES, INI_KRB_REALMS, defname,
realmsname, sizeof(realmsname), KERBEROS_INI);
realmsfile = fopen(realmsname, "r");
return realmsfile;
}
/*
* Returns the current default user. This information is stored in
* the [DEFAULTS] section of the "kerberos.ini" file located in the
* Windows directory.
*/
KRB5_DLLIMP char FAR * KRB5_CALLCONV
krb_get_default_user()
{
static char username[ANAME_SZ];
GetPrivateProfileString(INI_DEFAULTS, INI_USER, "",
username, sizeof(username), KERBEROS_INI);
return username;
}
/*
* Sets the default user name stored in the "kerberos.ini" file.
*/
KRB5_DLLIMP int KRB5_CALLCONV
krb_set_default_user(username)
char *username;
{
BOOL rc;
rc = WritePrivateProfileString(INI_DEFAULTS, INI_USER,
username, KERBEROS_INI);
if (rc)
return KSUCCESS;
else
return KFAILURE;
}
|
