s4: Change my nested groups patch to don't include user's SID itself in the "groupSID...
[sfrench/samba-autobuild/.git] / source4 / auth / sam.c
1 /* 
2    Unix SMB/CIFS implementation.
3    Password and authentication handling
4    Copyright (C) Andrew Bartlett <abartlet@samba.org> 2001-2004
5    Copyright (C) Gerald Carter                             2003
6    Copyright (C) Stefan Metzmacher                         2005
7    Copyright (C) Matthias Dieter Wallnöfer                 2009
8    
9    This program is free software; you can redistribute it and/or modify
10    it under the terms of the GNU General Public License as published by
11    the Free Software Foundation; either version 3 of the License, or
12    (at your option) any later version.
13    
14    This program is distributed in the hope that it will be useful,
15    but WITHOUT ANY WARRANTY; without even the implied warranty of
16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17    GNU General Public License for more details.
18    
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/>.
21 */
22
23 #include "includes.h"
24 #include "system/time.h"
25 #include "auth/auth.h"
26 #include <ldb.h>
27 #include "../lib/util/util_ldb.h"
28 #include "dsdb/samdb/samdb.h"
29 #include "libcli/security/security.h"
30 #include "libcli/ldap/ldap.h"
31 #include "../libcli/ldap/ldap_ndr.h"
32 #include "librpc/gen_ndr/ndr_netlogon.h"
33 #include "librpc/gen_ndr/ndr_security.h"
34 #include "param/param.h"
35 #include "auth/auth_sam.h"
36
37 #define KRBTGT_ATTRS \
38         /* required for the krb5 kdc */         \
39         "objectClass",                          \
40         "sAMAccountName",                       \
41         "userPrincipalName",                    \
42         "servicePrincipalName",                 \
43         "msDS-KeyVersionNumber",                \
44         "supplementalCredentials",              \
45                                                 \
46         /* passwords */                         \
47         "dBCSPwd",                              \
48         "unicodePwd",                           \
49                                                 \
50         "userAccountControl",                   \
51         "objectSid",                            \
52                                                 \
53         "pwdLastSet",                           \
54         "accountExpires"                        
55
56 const char *krbtgt_attrs[] = {
57         KRBTGT_ATTRS
58 };
59
60 const char *server_attrs[] = {
61         KRBTGT_ATTRS
62 };
63
64 const char *user_attrs[] = {
65         KRBTGT_ATTRS,
66
67         "logonHours",
68
69         /* check 'allowed workstations' */
70         "userWorkstations",
71                        
72         /* required for server_info, not access control: */
73         "displayName",
74         "scriptPath",
75         "profilePath",
76         "homeDirectory",
77         "homeDrive",
78         "lastLogon",
79         "lastLogoff",
80         "accountExpires",
81         "badPwdCount",
82         "logonCount",
83         "primaryGroupID",
84         "memberOf",
85         NULL,
86 };
87
88 /****************************************************************************
89  Check if a user is allowed to logon at this time. Note this is the
90  servers local time, as logon hours are just specified as a weekly
91  bitmask.
92 ****************************************************************************/
93                                                                                                               
94 static bool logon_hours_ok(struct ldb_message *msg, const char *name_for_logs)
95 {
96         /* In logon hours first bit is Sunday from 12AM to 1AM */
97         const struct ldb_val *hours;
98         struct tm *utctime;
99         time_t lasttime;
100         const char *asct;
101         uint8_t bitmask, bitpos;
102
103         hours = ldb_msg_find_ldb_val(msg, "logonHours");
104         if (!hours) {
105                 DEBUG(5,("logon_hours_ok: No hours restrictions for user %s\n", name_for_logs));
106                 return true;
107         }
108
109         if (hours->length != 168/8) {
110                 DEBUG(5,("logon_hours_ok: malformed logon hours restrictions for user %s\n", name_for_logs));
111                 return true;            
112         }
113
114         lasttime = time(NULL);
115         utctime = gmtime(&lasttime);
116         if (!utctime) {
117                 DEBUG(1, ("logon_hours_ok: failed to get gmtime. Failing logon for user %s\n",
118                         name_for_logs));
119                 return false;
120         }
121
122         /* find the corresponding byte and bit */
123         bitpos = (utctime->tm_wday * 24 + utctime->tm_hour) % 168;
124         bitmask = 1 << (bitpos % 8);
125
126         if (! (hours->data[bitpos/8] & bitmask)) {
127                 struct tm *t = localtime(&lasttime);
128                 if (!t) {
129                         asct = "INVALID TIME";
130                 } else {
131                         asct = asctime(t);
132                         if (!asct) {
133                                 asct = "INVALID TIME";
134                         }
135                 }
136                 
137                 DEBUG(1, ("logon_hours_ok: Account for user %s not allowed to "
138                           "logon at this time (%s).\n",
139                           name_for_logs, asct ));
140                 return false;
141         }
142
143         asct = asctime(utctime);
144         DEBUG(5,("logon_hours_ok: user %s allowed to logon at this time (%s)\n",
145                 name_for_logs, asct ? asct : "UNKNOWN TIME" ));
146
147         return true;
148 }
149
150 /****************************************************************************
151  Do a specific test for a SAM_ACCOUNT being vaild for this connection 
152  (ie not disabled, expired and the like).
153 ****************************************************************************/
154 _PUBLIC_ NTSTATUS authsam_account_ok(TALLOC_CTX *mem_ctx,
155                                      struct ldb_context *sam_ctx,
156                                      uint32_t logon_parameters,
157                                      struct ldb_dn *domain_dn,
158                                      struct ldb_message *msg,
159                                      const char *logon_workstation,
160                                      const char *name_for_logs,
161                                      bool allow_domain_trust,
162                                      bool password_change)
163 {
164         uint16_t acct_flags;
165         const char *workstation_list;
166         NTTIME acct_expiry;
167         NTTIME must_change_time;
168
169         NTTIME now;
170         DEBUG(4,("authsam_account_ok: Checking SMB password for user %s\n", name_for_logs));
171
172         acct_flags = samdb_result_acct_flags(sam_ctx, mem_ctx, msg, domain_dn);
173         
174         acct_expiry = samdb_result_account_expires(msg);
175
176         /* Check for when we must change this password, taking the
177          * userAccountControl flags into account */
178         must_change_time = samdb_result_force_password_change(sam_ctx, mem_ctx, 
179                                                               domain_dn, msg);
180
181         workstation_list = samdb_result_string(msg, "userWorkstations", NULL);
182
183         /* Quit if the account was disabled. */
184         if (acct_flags & ACB_DISABLED) {
185                 DEBUG(1,("authsam_account_ok: Account for user '%s' was disabled.\n", name_for_logs));
186                 return NT_STATUS_ACCOUNT_DISABLED;
187         }
188
189         /* Quit if the account was locked out. */
190         if (acct_flags & ACB_AUTOLOCK) {
191                 DEBUG(1,("authsam_account_ok: Account for user %s was locked out.\n", name_for_logs));
192                 return NT_STATUS_ACCOUNT_LOCKED_OUT;
193         }
194
195         /* Test account expire time */
196         unix_to_nt_time(&now, time(NULL));
197         if (now > acct_expiry) {
198                 DEBUG(1,("authsam_account_ok: Account for user '%s' has expired.\n", name_for_logs));
199                 DEBUG(3,("authsam_account_ok: Account expired at '%s'.\n", 
200                          nt_time_string(mem_ctx, acct_expiry)));
201                 return NT_STATUS_ACCOUNT_EXPIRED;
202         }
203
204         /* check for immediate expiry "must change at next logon" (but not if this is a password change request) */
205         if ((must_change_time == 0) && !password_change) {
206                 DEBUG(1,("sam_account_ok: Account for user '%s' password must change!.\n", 
207                          name_for_logs));
208                 return NT_STATUS_PASSWORD_MUST_CHANGE;
209         }
210
211         /* check for expired password (but not if this is a password change request) */
212         if ((must_change_time < now) && !password_change) {
213                 DEBUG(1,("sam_account_ok: Account for user '%s' password expired!.\n", 
214                          name_for_logs));
215                 DEBUG(1,("sam_account_ok: Password expired at '%s' unix time.\n", 
216                          nt_time_string(mem_ctx, must_change_time)));
217                 return NT_STATUS_PASSWORD_EXPIRED;
218         }
219
220         /* Test workstation. Workstation list is comma separated. */
221         if (logon_workstation && workstation_list && *workstation_list) {
222                 bool invalid_ws = true;
223                 int i;
224                 const char **workstations = (const char **)str_list_make(mem_ctx, workstation_list, ",");
225                 
226                 for (i = 0; workstations && workstations[i]; i++) {
227                         DEBUG(10,("sam_account_ok: checking for workstation match '%s' and '%s'\n",
228                                   workstations[i], logon_workstation));
229
230                         if (strequal(workstations[i], logon_workstation)) {
231                                 invalid_ws = false;
232                                 break;
233                         }
234                 }
235
236                 talloc_free(workstations);
237
238                 if (invalid_ws) {
239                         return NT_STATUS_INVALID_WORKSTATION;
240                 }
241         }
242         
243         if (!logon_hours_ok(msg, name_for_logs)) {
244                 return NT_STATUS_INVALID_LOGON_HOURS;
245         }
246         
247         if (!allow_domain_trust) {
248                 if (acct_flags & ACB_DOMTRUST) {
249                         DEBUG(2,("sam_account_ok: Domain trust account %s denied by server\n", name_for_logs));
250                         return NT_STATUS_NOLOGON_INTERDOMAIN_TRUST_ACCOUNT;
251                 }
252         }
253         if (!(logon_parameters & MSV1_0_ALLOW_SERVER_TRUST_ACCOUNT)) {
254                 if (acct_flags & ACB_SVRTRUST) {
255                         DEBUG(2,("sam_account_ok: Server trust account %s denied by server\n", name_for_logs));
256                         return NT_STATUS_NOLOGON_SERVER_TRUST_ACCOUNT;
257                 }
258         }
259         if (!(logon_parameters & MSV1_0_ALLOW_WORKSTATION_TRUST_ACCOUNT)) {
260                 if (acct_flags & ACB_WSTRUST) {
261                         DEBUG(4,("sam_account_ok: Wksta trust account %s denied by server\n", name_for_logs));
262                         return NT_STATUS_NOLOGON_WORKSTATION_TRUST_ACCOUNT;
263                 }
264         }
265
266         return NT_STATUS_OK;
267 }
268
269 /* This function tests if a SID structure "sids" contains the SID "sid" */
270 static bool sids_contains_sid(const struct dom_sid **sids, const int num_sids,
271         const struct dom_sid *sid)
272 {
273         int i;
274
275         for (i = 0; i < num_sids; i++) {
276                 if (dom_sid_equal(sids[i], sid))
277                         return true;
278         }
279         return false;
280 }
281
282 /*
283  * This function generates the transitive closure of a given SID "sid" (it
284  * basically expands nested groups of a SID).
285  * If the SID isn't located in the "res_sids" structure yet and the
286  * "only_childs" flag is negative, we add it to "res_sids".
287  * Then we've always to consider the "memberOf" attributes. We invoke the
288  * function recursively on each item of it with the "only_childs" flag set to
289  * "false".
290  * The "only_childs" flag is particularly useful if you have a user SID and
291  * want to include all his groups (referenced with "memberOf") without his SID
292  * itself.
293  *
294  * At the beginning "res_sids" should reference to a NULL pointer.
295  */
296 static NTSTATUS authsam_expand_nested_groups(struct ldb_context *sam_ctx,
297         const struct dom_sid *sid, const bool only_childs,
298         TALLOC_CTX *res_sids_ctx, struct dom_sid ***res_sids,
299         int *num_res_sids)
300 {
301         const char * const attrs[] = { "memberOf", NULL };
302         int i, ret;
303         bool already_there;
304         struct ldb_dn *tmp_dn;
305         struct dom_sid *tmp_sid;
306         TALLOC_CTX *tmp_ctx;
307         struct ldb_message **res;
308         NTSTATUS status;
309
310         if (*res_sids == NULL) {
311                 *num_res_sids = 0;
312         }
313
314         if (sid == NULL) {
315                 return NT_STATUS_OK;
316         }
317
318         already_there = sids_contains_sid((const struct dom_sid**) *res_sids,
319                 *num_res_sids, sid);
320         if (already_there) {
321                 return NT_STATUS_OK;
322         }
323
324         if (!only_childs) {
325                 tmp_sid = dom_sid_dup(res_sids_ctx, sid);
326                 NT_STATUS_HAVE_NO_MEMORY(tmp_sid);
327                 *res_sids = talloc_realloc(res_sids_ctx, *res_sids,
328                         struct dom_sid *, *num_res_sids + 1);
329                 NT_STATUS_HAVE_NO_MEMORY(*res_sids);
330                 (*res_sids)[*num_res_sids] = tmp_sid;
331                 ++(*num_res_sids);
332         }
333
334         tmp_ctx = talloc_new(sam_ctx);
335
336         ret = gendb_search(sam_ctx, tmp_ctx, NULL, &res, attrs,
337                 "objectSid=%s", ldap_encode_ndr_dom_sid(tmp_ctx, sid));
338         if (ret != 1) {
339                 talloc_free(tmp_ctx);
340                 return NT_STATUS_INTERNAL_DB_CORRUPTION;
341         }
342
343         if (res[0]->num_elements == 0) {
344                 talloc_free(res);
345                 talloc_free(tmp_ctx);
346                 return NT_STATUS_OK;
347         }
348
349         for (i = 0; i < res[0]->elements[0].num_values; i++) {
350                 tmp_dn = ldb_dn_from_ldb_val(tmp_ctx, sam_ctx,
351                         &res[0]->elements[0].values[i]);
352                 tmp_sid = samdb_search_dom_sid(sam_ctx, tmp_ctx, tmp_dn,
353                         "objectSid", NULL);
354
355                 status = authsam_expand_nested_groups(sam_ctx, tmp_sid,
356                         false, res_sids_ctx, res_sids, num_res_sids);
357                 if (!NT_STATUS_IS_OK(status)) {
358                         talloc_free(res);
359                         talloc_free(tmp_ctx);
360                         return status;
361                 }
362         }
363
364         talloc_free(res);
365         talloc_free(tmp_ctx);
366
367         return NT_STATUS_OK;
368 }
369
370 _PUBLIC_ NTSTATUS authsam_make_server_info(TALLOC_CTX *mem_ctx,
371                                            struct ldb_context *sam_ctx,
372                                            const char *netbios_name,
373                                            const char *domain_name,
374                                            struct ldb_dn *domain_dn, 
375                                            struct ldb_message *msg,
376                                            DATA_BLOB user_sess_key, DATA_BLOB lm_sess_key,
377                                            struct auth_serversupplied_info **_server_info)
378 {
379         NTSTATUS status;
380         struct auth_serversupplied_info *server_info;
381         int group_ret = 0;
382         /* find list of sids */
383         struct dom_sid **groupSIDs = NULL;
384         struct dom_sid *account_sid;
385         struct dom_sid *primary_group_sid;
386         const char *str;
387         uint_t rid;
388         TALLOC_CTX *tmp_ctx = talloc_new(mem_ctx);      
389
390         server_info = talloc(tmp_ctx, struct auth_serversupplied_info);
391         NT_STATUS_HAVE_NO_MEMORY_AND_FREE(server_info, tmp_ctx);
392
393         account_sid = samdb_result_dom_sid(server_info, msg, "objectSid");
394         NT_STATUS_HAVE_NO_MEMORY_AND_FREE(account_sid, tmp_ctx);
395
396         status = authsam_expand_nested_groups(sam_ctx, account_sid, true,
397                 server_info, &groupSIDs, &group_ret);
398         if (!NT_STATUS_IS_OK(status)) {
399                 talloc_free(tmp_ctx);
400                 return status;
401         }
402
403         primary_group_sid = dom_sid_dup(server_info, account_sid);
404         NT_STATUS_HAVE_NO_MEMORY_AND_FREE(primary_group_sid, tmp_ctx);
405
406         rid = samdb_result_uint(msg, "primaryGroupID", ~0);
407         if (rid == ~0) {
408                 if (group_ret > 0) {
409                         primary_group_sid = groupSIDs[0];
410                 } else {
411                         primary_group_sid = NULL;
412                 }
413         } else {
414                 primary_group_sid->sub_auths[primary_group_sid->num_auths-1] = rid;
415         }
416
417         server_info->account_sid = account_sid;
418         server_info->primary_group_sid = primary_group_sid;
419         
420         server_info->n_domain_groups = group_ret;
421         server_info->domain_groups = groupSIDs;
422
423         server_info->account_name = talloc_steal(server_info, samdb_result_string(msg, "sAMAccountName", NULL));
424
425         server_info->domain_name = talloc_strdup(server_info, domain_name);
426         NT_STATUS_HAVE_NO_MEMORY_AND_FREE(server_info->domain_name, tmp_ctx);
427
428         str = samdb_result_string(msg, "displayName", "");
429         server_info->full_name = talloc_strdup(server_info, str);
430         NT_STATUS_HAVE_NO_MEMORY_AND_FREE(server_info->full_name, tmp_ctx);
431
432         str = samdb_result_string(msg, "scriptPath", "");
433         server_info->logon_script = talloc_strdup(server_info, str);
434         NT_STATUS_HAVE_NO_MEMORY_AND_FREE(server_info->logon_script, tmp_ctx);
435
436         str = samdb_result_string(msg, "profilePath", "");
437         server_info->profile_path = talloc_strdup(server_info, str);
438         NT_STATUS_HAVE_NO_MEMORY_AND_FREE(server_info->profile_path, tmp_ctx);
439
440         str = samdb_result_string(msg, "homeDirectory", "");
441         server_info->home_directory = talloc_strdup(server_info, str);
442         NT_STATUS_HAVE_NO_MEMORY_AND_FREE(server_info->home_directory, tmp_ctx);
443
444         str = samdb_result_string(msg, "homeDrive", "");
445         server_info->home_drive = talloc_strdup(server_info, str);
446         NT_STATUS_HAVE_NO_MEMORY_AND_FREE(server_info->home_drive, tmp_ctx);
447
448         server_info->logon_server = talloc_strdup(server_info, netbios_name);
449         NT_STATUS_HAVE_NO_MEMORY_AND_FREE(server_info->logon_server, tmp_ctx);
450
451         server_info->last_logon = samdb_result_nttime(msg, "lastLogon", 0);
452         server_info->last_logoff = samdb_result_last_logoff(msg);
453         server_info->acct_expiry = samdb_result_account_expires(msg);
454         server_info->last_password_change = samdb_result_nttime(msg, "pwdLastSet", 0);
455
456         server_info->allow_password_change
457                 = samdb_result_allow_password_change(sam_ctx, mem_ctx, 
458                                                      domain_dn, msg, "pwdLastSet");
459         server_info->force_password_change
460                 = samdb_result_force_password_change(sam_ctx, mem_ctx, 
461                                                      domain_dn, msg);
462         
463         server_info->logon_count = samdb_result_uint(msg, "logonCount", 0);
464         server_info->bad_password_count = samdb_result_uint(msg, "badPwdCount", 0);
465
466         server_info->acct_flags = samdb_result_acct_flags(sam_ctx, mem_ctx, 
467                                                           msg, domain_dn);
468
469         server_info->user_session_key = user_sess_key;
470         server_info->lm_session_key = lm_sess_key;
471
472         server_info->authenticated = true;
473
474         *_server_info = talloc_steal(mem_ctx, server_info);
475
476         return NT_STATUS_OK;
477 }
478
479 NTSTATUS sam_get_results_principal(struct ldb_context *sam_ctx,
480                                    TALLOC_CTX *mem_ctx, const char *principal,
481                                    const char **attrs,
482                                    struct ldb_dn **domain_dn,
483                                    struct ldb_message **msg)
484 {                          
485         struct ldb_dn *user_dn;
486         NTSTATUS nt_status;
487         TALLOC_CTX *tmp_ctx = talloc_new(mem_ctx);
488         int ret;
489
490         if (!tmp_ctx) {
491                 return NT_STATUS_NO_MEMORY;
492         }
493
494         nt_status = crack_user_principal_name(sam_ctx, tmp_ctx, principal, 
495                                               &user_dn, domain_dn);
496         if (!NT_STATUS_IS_OK(nt_status)) {
497                 talloc_free(tmp_ctx);
498                 return nt_status;
499         }
500         
501         /* pull the user attributes */
502         ret = gendb_search_single_extended_dn(sam_ctx, tmp_ctx, user_dn, LDB_SCOPE_BASE,
503                                               msg, attrs, "(objectClass=*)");
504         if (ret != LDB_SUCCESS) {
505                 talloc_free(tmp_ctx);
506                 return NT_STATUS_INTERNAL_DB_CORRUPTION;
507         }
508         talloc_steal(mem_ctx, *msg);
509         talloc_steal(mem_ctx, *domain_dn);
510         talloc_free(tmp_ctx);
511         
512         return NT_STATUS_OK;
513 }