Avoid overriding default ccache for ads operations.
[kai/samba.git] / source3 / libads / ads_struct.c
1 /* 
2    Unix SMB/CIFS implementation.
3    ads (active directory) utility library
4    Copyright (C) Andrew Tridgell 2001
5    Copyright (C) Andrew Bartlett 2001
6
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 3 of the License, or
10    (at your option) any later version.
11
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16
17    You should have received a copy of the GNU General Public License
18    along with this program.  If not, see <http://www.gnu.org/licenses/>.
19 */
20
21 #include "includes.h"
22 #include "ads.h"
23
24 /* return a ldap dn path from a string, given separators and field name
25    caller must free
26 */
27 char *ads_build_path(const char *realm, const char *sep, const char *field, int reverse)
28 {
29         char *p, *r;
30         int numbits = 0;
31         char *ret;
32         int len;
33         char *saveptr;
34
35         r = SMB_STRDUP(realm);
36
37         if (!r || !*r) {
38                 return r;
39         }
40
41         for (p=r; *p; p++) {
42                 if (strchr(sep, *p)) {
43                         numbits++;
44                 }
45         }
46
47         len = (numbits+1)*(strlen(field)+1) + strlen(r) + 1;
48
49         ret = (char *)SMB_MALLOC(len);
50         if (!ret) {
51                 free(r);
52                 return NULL;
53         }
54
55         if (strlcpy(ret,field, len) >= len) {
56                 /* Truncate ! */
57                 free(r);
58                 return NULL;
59         }
60         p=strtok_r(r, sep, &saveptr);
61         if (p) {
62                 if (strlcat(ret, p, len) >= len) {
63                         free(r);
64                         return NULL;
65                 }
66
67                 while ((p=strtok_r(NULL, sep, &saveptr)) != NULL) {
68                         int retval;
69                         char *s = NULL;
70                         if (reverse)
71                                 retval = asprintf(&s, "%s%s,%s", field, p, ret);
72                         else
73                                 retval = asprintf(&s, "%s,%s%s", ret, field, p);
74                         free(ret);
75                         if (retval == -1) {
76                                 free(r);
77                                 return NULL;
78                         }
79                         ret = SMB_STRDUP(s);
80                         free(s);
81                 }
82         }
83
84         free(r);
85         return ret;
86 }
87
88 /* return a dn of the form "dc=AA,dc=BB,dc=CC" from a 
89    realm of the form AA.BB.CC 
90    caller must free
91 */
92 char *ads_build_dn(const char *realm)
93 {
94         return ads_build_path(realm, ".", "dc=", 0);
95 }
96
97 /* return a DNS name in the for aa.bb.cc from the DN  
98    "dc=AA,dc=BB,dc=CC".  caller must free
99 */
100 char *ads_build_domain(const char *dn)
101 {
102         char *dnsdomain = NULL;
103
104         /* result should always be shorter than the DN */
105
106         if ( (dnsdomain = SMB_STRDUP( dn )) == NULL ) {
107                 DEBUG(0,("ads_build_domain: malloc() failed!\n"));              
108                 return NULL;            
109         }       
110
111         if (!strlower_m( dnsdomain )) {
112                 SAFE_FREE(dnsdomain);
113                 return NULL;
114         }
115
116         all_string_sub( dnsdomain, "dc=", "", 0);
117         all_string_sub( dnsdomain, ",", ".", 0 );
118
119         return dnsdomain;       
120 }
121
122
123
124 #ifndef LDAP_PORT
125 #define LDAP_PORT 389
126 #endif
127
128 /*
129   initialise a ADS_STRUCT, ready for some ads_ ops
130 */
131 ADS_STRUCT *ads_init(const char *realm, 
132                      const char *workgroup,
133                      const char *ldap_server)
134 {
135         ADS_STRUCT *ads;
136         int wrap_flags;
137
138         ads = SMB_XMALLOC_P(ADS_STRUCT);
139         ZERO_STRUCTP(ads);
140
141         ads->server.realm = realm? SMB_STRDUP(realm) : NULL;
142         ads->server.workgroup = workgroup ? SMB_STRDUP(workgroup) : NULL;
143         ads->server.ldap_server = ldap_server? SMB_STRDUP(ldap_server) : NULL;
144
145         /* we need to know if this is a foreign realm */
146         if (realm && *realm && !strequal(lp_realm(), realm)) {
147                 ads->server.foreign = 1;
148         }
149         if (workgroup && *workgroup && !strequal(lp_workgroup(), workgroup)) {
150                 ads->server.foreign = 1;
151         }
152
153         /* the caller will own the memory by default */
154         ads->is_mine = 1;
155
156         wrap_flags = lp_client_ldap_sasl_wrapping();
157         if (wrap_flags == -1) {
158                 wrap_flags = 0;
159         }
160
161         ads->auth.flags = wrap_flags;
162
163         /* Start with a page size of 1000 when the connection is new,
164          * we will drop it by half we get a timeout.   */
165         ads->config.ldap_page_size     = 1000;
166
167         return ads;
168 }
169
170 /****************************************************************
171 ****************************************************************/
172
173 bool ads_set_sasl_wrap_flags(ADS_STRUCT *ads, int flags)
174 {
175         if (!ads) {
176                 return false;
177         }
178
179         ads->auth.flags = flags;
180
181         return true;
182 }
183
184 /*
185   free the memory used by the ADS structure initialized with 'ads_init(...)'
186 */
187 void ads_destroy(ADS_STRUCT **ads)
188 {
189         if (ads && *ads) {
190                 bool is_mine;
191
192                 is_mine = (*ads)->is_mine;
193 #if HAVE_LDAP
194                 ads_disconnect(*ads);
195 #endif
196                 SAFE_FREE((*ads)->server.realm);
197                 SAFE_FREE((*ads)->server.workgroup);
198                 SAFE_FREE((*ads)->server.ldap_server);
199
200                 SAFE_FREE((*ads)->auth.realm);
201                 SAFE_FREE((*ads)->auth.password);
202                 SAFE_FREE((*ads)->auth.user_name);
203                 SAFE_FREE((*ads)->auth.kdc_server);
204                 SAFE_FREE((*ads)->auth.ccache_name);
205
206                 SAFE_FREE((*ads)->config.realm);
207                 SAFE_FREE((*ads)->config.bind_path);
208                 SAFE_FREE((*ads)->config.ldap_server_name);
209                 SAFE_FREE((*ads)->config.server_site_name);
210                 SAFE_FREE((*ads)->config.client_site_name);
211                 SAFE_FREE((*ads)->config.schema_path);
212                 SAFE_FREE((*ads)->config.config_path);
213
214                 ZERO_STRUCTP(*ads);
215
216                 if ( is_mine )
217                         SAFE_FREE(*ads);
218         }
219 }