s4-samdb: make sure the static credentials are never freed
[ira/wip.git] / source4 / dsdb / samdb / samdb.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    interface functions for the sam database
5
6    Copyright (C) Andrew Tridgell 2004
7    Copyright (C) Volker Lendecke 2004
8    Copyright (C) Andrew Bartlett <abartlet@samba.org> 2006
9
10    This program is free software; you can redistribute it and/or modify
11    it under the terms of the GNU General Public License as published by
12    the Free Software Foundation; either version 3 of the License, or
13    (at your option) any later version.
14    
15    This program is distributed in the hope that it will be useful,
16    but WITHOUT ANY WARRANTY; without even the implied warranty of
17    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18    GNU General Public License for more details.
19    
20    You should have received a copy of the GNU General Public License
21    along with this program.  If not, see <http://www.gnu.org/licenses/>.
22 */
23
24 #include "includes.h"
25 #include "librpc/gen_ndr/ndr_netlogon.h"
26 #include "librpc/gen_ndr/ndr_misc.h"
27 #include "librpc/gen_ndr/ndr_security.h"
28 #include "lib/events/events.h"
29 #include "lib/ldb/include/ldb.h"
30 #include "lib/ldb/include/ldb_errors.h"
31 #include "libcli/security/security.h"
32 #include "libcli/auth/libcli_auth.h"
33 #include "libcli/ldap/ldap_ndr.h"
34 #include "system/time.h"
35 #include "system/filesys.h"
36 #include "ldb_wrap.h"
37 #include "../lib/util/util_ldb.h"
38 #include "dsdb/samdb/samdb.h"
39 #include "../libds/common/flags.h"
40 #include "param/param.h"
41 #include "lib/events/events.h"
42 #include "auth/credentials/credentials.h"
43 #include "param/secrets.h"
44
45 char *samdb_relative_path(struct ldb_context *ldb,
46                                  TALLOC_CTX *mem_ctx, 
47                                  const char *name) 
48 {
49         const char *base_url = 
50                 (const char *)ldb_get_opaque(ldb, "ldb_url");
51         char *path, *p, *full_name;
52         if (name == NULL) {
53                 return NULL;
54         }
55         if (name[0] == 0 || name[0] == '/' || strstr(name, ":/")) {
56                 return talloc_strdup(mem_ctx, name);
57         }
58         if (strncmp("tdb://", base_url, 6) == 0) {
59                 base_url = base_url+6;
60         }
61         path = talloc_strdup(mem_ctx, base_url);
62         if (path == NULL) {
63                 return NULL;
64         }
65         if ( (p = strrchr(path, '/')) != NULL) {
66                 p[0] = '\0';
67                 full_name = talloc_asprintf(mem_ctx, "%s/%s", path, name);
68         } else {
69                 full_name = talloc_asprintf(mem_ctx, "./%s", name);
70         }
71         talloc_free(path);
72         return full_name;
73 }
74
75 /*
76   make sure the static credentials are not freed
77  */
78 static int samdb_credentials_destructor(struct cli_credentials *creds)
79 {
80         return -1;
81 }
82
83 /*
84   this returns a static set of system credentials. It is static so
85   that we always get the same pointer in ldb_wrap_connect()
86  */
87 struct cli_credentials *samdb_credentials(struct tevent_context *event_ctx, 
88                                           struct loadparm_context *lp_ctx) 
89 {
90         static struct cli_credentials *static_credentials;
91         struct cli_credentials *cred;
92
93         if (static_credentials) {
94                 return static_credentials;
95         }
96
97         cred = cli_credentials_init(talloc_autofree_context());
98         if (!cred) {
99                 return NULL;
100         }
101         cli_credentials_set_conf(cred, lp_ctx);
102
103         /* We don't want to use krb5 to talk to our samdb - recursion
104          * here would be bad, and this account isn't in the KDC
105          * anyway */
106         cli_credentials_set_kerberos_state(cred, CRED_DONT_USE_KERBEROS);
107
108         if (!NT_STATUS_IS_OK(cli_credentials_set_secrets(cred, event_ctx, lp_ctx, NULL, NULL,
109                                                          SECRETS_LDAP_FILTER))) {
110                 /* Perfectly OK - if not against an LDAP backend */
111                 talloc_free(cred);
112                 return NULL;
113         }
114         static_credentials = cred;
115         talloc_set_destructor(cred, samdb_credentials_destructor);
116         return cred;
117 }
118
119 /*
120   connect to the SAM database
121   return an opaque context pointer on success, or NULL on failure
122  */
123 struct ldb_context *samdb_connect(TALLOC_CTX *mem_ctx, 
124                                   struct tevent_context *ev_ctx,
125                                   struct loadparm_context *lp_ctx,
126                                   struct auth_session_info *session_info)
127 {
128         struct ldb_context *ldb;
129         ldb = ldb_wrap_connect(mem_ctx, ev_ctx, lp_ctx, 
130                                lp_sam_url(lp_ctx), session_info,
131                                samdb_credentials(ev_ctx, lp_ctx), 
132                                0);
133         if (!ldb) {
134                 return NULL;
135         }
136         dsdb_make_schema_global(ldb);
137         return ldb;
138 }
139
140
141 /****************************************************************************
142  Create the SID list for this user.
143 ****************************************************************************/
144 NTSTATUS security_token_create(TALLOC_CTX *mem_ctx, 
145                                struct tevent_context *ev_ctx, 
146                                struct loadparm_context *lp_ctx,
147                                struct dom_sid *user_sid,
148                                struct dom_sid *group_sid, 
149                                int n_groupSIDs,
150                                struct dom_sid **groupSIDs, 
151                                bool is_authenticated,
152                                struct security_token **token)
153 {
154         struct security_token *ptoken;
155         int i;
156         NTSTATUS status;
157
158         ptoken = security_token_initialise(mem_ctx);
159         NT_STATUS_HAVE_NO_MEMORY(ptoken);
160
161         ptoken->sids = talloc_array(ptoken, struct dom_sid *, n_groupSIDs + 5);
162         NT_STATUS_HAVE_NO_MEMORY(ptoken->sids);
163
164         ptoken->user_sid = talloc_reference(ptoken, user_sid);
165         ptoken->group_sid = talloc_reference(ptoken, group_sid);
166         ptoken->privilege_mask = 0;
167
168         ptoken->sids[0] = ptoken->user_sid;
169         ptoken->sids[1] = ptoken->group_sid;
170
171         /*
172          * Finally add the "standard" SIDs.
173          * The only difference between guest and "anonymous"
174          * is the addition of Authenticated_Users.
175          */
176         ptoken->sids[2] = dom_sid_parse_talloc(ptoken->sids, SID_WORLD);
177         NT_STATUS_HAVE_NO_MEMORY(ptoken->sids[2]);
178         ptoken->sids[3] = dom_sid_parse_talloc(ptoken->sids, SID_NT_NETWORK);
179         NT_STATUS_HAVE_NO_MEMORY(ptoken->sids[3]);
180         ptoken->num_sids = 4;
181
182         if (is_authenticated) {
183                 ptoken->sids[4] = dom_sid_parse_talloc(ptoken->sids, SID_NT_AUTHENTICATED_USERS);
184                 NT_STATUS_HAVE_NO_MEMORY(ptoken->sids[4]);
185                 ptoken->num_sids++;
186         }
187
188         for (i = 0; i < n_groupSIDs; i++) {
189                 size_t check_sid_idx;
190                 for (check_sid_idx = 1; 
191                      check_sid_idx < ptoken->num_sids; 
192                      check_sid_idx++) {
193                         if (dom_sid_equal(ptoken->sids[check_sid_idx], groupSIDs[i])) {
194                                 break;
195                         }
196                 }
197
198                 if (check_sid_idx == ptoken->num_sids) {
199                         ptoken->sids[ptoken->num_sids++] = talloc_reference(ptoken->sids, groupSIDs[i]);
200                 }
201         }
202
203         /* setup the privilege mask for this token */
204         status = samdb_privilege_setup(ev_ctx, lp_ctx, ptoken);
205         if (!NT_STATUS_IS_OK(status)) {
206                 talloc_free(ptoken);
207                 return status;
208         }
209
210         security_token_debug(10, ptoken);
211
212         *token = ptoken;
213
214         return NT_STATUS_OK;
215 }