r14421: This does two things
[Samba.git] / source / auth / auth_util.c
blob776b2fb3d7c7f763d0d87f65317905a603335f42
1 /*
2 Unix SMB/CIFS implementation.
3 Authentication utility functions
4 Copyright (C) Andrew Tridgell 1992-1998
5 Copyright (C) Andrew Bartlett 2001
6 Copyright (C) Jeremy Allison 2000-2001
7 Copyright (C) Rafal Szczesniak 2002
8 Copyright (C) Volker Lendecke 2006
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 2 of the License, or
13 (at your option) any later version.
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.
20 You should have received a copy of the GNU General Public License
21 along with this program; if not, write to the Free Software
22 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
25 #include "includes.h"
27 #undef DBGC_CLASS
28 #define DBGC_CLASS DBGC_AUTH
30 static struct nt_user_token *create_local_nt_token(TALLOC_CTX *mem_ctx,
31 const DOM_SID *user_sid,
32 const DOM_SID *group_sid,
33 BOOL is_guest,
34 int num_groupsids,
35 const DOM_SID *groupsids);
37 /****************************************************************************
38 Create a UNIX user on demand.
39 ****************************************************************************/
41 static int smb_create_user(const char *domain, const char *unix_username, const char *homedir)
43 pstring add_script;
44 int ret;
46 pstrcpy(add_script, lp_adduser_script());
47 if (! *add_script)
48 return -1;
49 all_string_sub(add_script, "%u", unix_username, sizeof(pstring));
50 if (domain)
51 all_string_sub(add_script, "%D", domain, sizeof(pstring));
52 if (homedir)
53 all_string_sub(add_script, "%H", homedir, sizeof(pstring));
54 ret = smbrun(add_script,NULL);
55 flush_pwnam_cache();
56 DEBUG(ret ? 0 : 3,("smb_create_user: Running the command `%s' gave %d\n",add_script,ret));
57 return ret;
60 /****************************************************************************
61 Create an auth_usersupplied_data structure
62 ****************************************************************************/
64 static NTSTATUS make_user_info(auth_usersupplied_info **user_info,
65 const char *smb_name,
66 const char *internal_username,
67 const char *client_domain,
68 const char *domain,
69 const char *wksta_name,
70 DATA_BLOB *lm_pwd, DATA_BLOB *nt_pwd,
71 DATA_BLOB *lm_interactive_pwd, DATA_BLOB *nt_interactive_pwd,
72 DATA_BLOB *plaintext,
73 BOOL encrypted)
76 DEBUG(5,("attempting to make a user_info for %s (%s)\n", internal_username, smb_name));
78 *user_info = SMB_MALLOC_P(auth_usersupplied_info);
79 if (*user_info == NULL) {
80 DEBUG(0,("malloc failed for user_info (size %lu)\n", (unsigned long)sizeof(*user_info)));
81 return NT_STATUS_NO_MEMORY;
84 ZERO_STRUCTP(*user_info);
86 DEBUG(5,("making strings for %s's user_info struct\n", internal_username));
88 (*user_info)->smb_name = SMB_STRDUP(smb_name);
89 if ((*user_info)->smb_name == NULL) {
90 free_user_info(user_info);
91 return NT_STATUS_NO_MEMORY;
94 (*user_info)->internal_username = SMB_STRDUP(internal_username);
95 if ((*user_info)->internal_username == NULL) {
96 free_user_info(user_info);
97 return NT_STATUS_NO_MEMORY;
100 (*user_info)->domain = SMB_STRDUP(domain);
101 if ((*user_info)->domain == NULL) {
102 free_user_info(user_info);
103 return NT_STATUS_NO_MEMORY;
106 (*user_info)->client_domain = SMB_STRDUP(client_domain);
107 if ((*user_info)->client_domain == NULL) {
108 free_user_info(user_info);
109 return NT_STATUS_NO_MEMORY;
112 (*user_info)->wksta_name = SMB_STRDUP(wksta_name);
113 if ((*user_info)->wksta_name == NULL) {
114 free_user_info(user_info);
115 return NT_STATUS_NO_MEMORY;
118 DEBUG(5,("making blobs for %s's user_info struct\n", internal_username));
120 if (lm_pwd)
121 (*user_info)->lm_resp = data_blob(lm_pwd->data, lm_pwd->length);
122 if (nt_pwd)
123 (*user_info)->nt_resp = data_blob(nt_pwd->data, nt_pwd->length);
124 if (lm_interactive_pwd)
125 (*user_info)->lm_interactive_pwd = data_blob(lm_interactive_pwd->data, lm_interactive_pwd->length);
126 if (nt_interactive_pwd)
127 (*user_info)->nt_interactive_pwd = data_blob(nt_interactive_pwd->data, nt_interactive_pwd->length);
129 if (plaintext)
130 (*user_info)->plaintext_password = data_blob(plaintext->data, plaintext->length);
132 (*user_info)->encrypted = encrypted;
134 (*user_info)->logon_parameters = 0;
136 DEBUG(10,("made an %sencrypted user_info for %s (%s)\n", encrypted ? "":"un" , internal_username, smb_name));
138 return NT_STATUS_OK;
141 /****************************************************************************
142 Create an auth_usersupplied_data structure after appropriate mapping.
143 ****************************************************************************/
145 NTSTATUS make_user_info_map(auth_usersupplied_info **user_info,
146 const char *smb_name,
147 const char *client_domain,
148 const char *wksta_name,
149 DATA_BLOB *lm_pwd, DATA_BLOB *nt_pwd,
150 DATA_BLOB *lm_interactive_pwd, DATA_BLOB *nt_interactive_pwd,
151 DATA_BLOB *plaintext,
152 BOOL encrypted)
154 const char *domain;
155 fstring internal_username;
156 fstrcpy(internal_username, smb_name);
157 map_username(internal_username);
159 DEBUG(5, ("make_user_info_map: Mapping user [%s]\\[%s] from workstation [%s]\n",
160 client_domain, smb_name, wksta_name));
162 /* don't allow "" as a domain, fixes a Win9X bug
163 where it doens't supply a domain for logon script
164 'net use' commands. */
166 if ( *client_domain )
167 domain = client_domain;
168 else
169 domain = lp_workgroup();
171 /* do what win2k does. Always map unknown domains to our own
172 and let the "passdb backend" handle unknown users. */
174 if ( !is_trusted_domain(domain) && !strequal(domain, get_global_sam_name()) )
175 domain = my_sam_name();
177 /* we know that it is a trusted domain (and we are allowing them) or it is our domain */
179 return make_user_info(user_info, smb_name, internal_username,
180 client_domain, domain, wksta_name,
181 lm_pwd, nt_pwd,
182 lm_interactive_pwd, nt_interactive_pwd,
183 plaintext, encrypted);
186 /****************************************************************************
187 Create an auth_usersupplied_data, making the DATA_BLOBs here.
188 Decrypt and encrypt the passwords.
189 ****************************************************************************/
191 BOOL make_user_info_netlogon_network(auth_usersupplied_info **user_info,
192 const char *smb_name,
193 const char *client_domain,
194 const char *wksta_name,
195 uint32 logon_parameters,
196 const uchar *lm_network_pwd,
197 int lm_pwd_len,
198 const uchar *nt_network_pwd,
199 int nt_pwd_len)
201 BOOL ret;
202 NTSTATUS status;
203 DATA_BLOB lm_blob = data_blob(lm_network_pwd, lm_pwd_len);
204 DATA_BLOB nt_blob = data_blob(nt_network_pwd, nt_pwd_len);
206 status = make_user_info_map(user_info,
207 smb_name, client_domain,
208 wksta_name,
209 lm_pwd_len ? &lm_blob : NULL,
210 nt_pwd_len ? &nt_blob : NULL,
211 NULL, NULL, NULL,
212 True);
214 if (NT_STATUS_IS_OK(status)) {
215 (*user_info)->logon_parameters = logon_parameters;
217 ret = NT_STATUS_IS_OK(status) ? True : False;
219 data_blob_free(&lm_blob);
220 data_blob_free(&nt_blob);
221 return ret;
224 /****************************************************************************
225 Create an auth_usersupplied_data, making the DATA_BLOBs here.
226 Decrypt and encrypt the passwords.
227 ****************************************************************************/
229 BOOL make_user_info_netlogon_interactive(auth_usersupplied_info **user_info,
230 const char *smb_name,
231 const char *client_domain,
232 const char *wksta_name,
233 uint32 logon_parameters,
234 const uchar chal[8],
235 const uchar lm_interactive_pwd[16],
236 const uchar nt_interactive_pwd[16],
237 const uchar *dc_sess_key)
239 char lm_pwd[16];
240 char nt_pwd[16];
241 unsigned char local_lm_response[24];
242 unsigned char local_nt_response[24];
243 unsigned char key[16];
245 ZERO_STRUCT(key);
246 memcpy(key, dc_sess_key, 8);
248 if (lm_interactive_pwd)
249 memcpy(lm_pwd, lm_interactive_pwd, sizeof(lm_pwd));
251 if (nt_interactive_pwd)
252 memcpy(nt_pwd, nt_interactive_pwd, sizeof(nt_pwd));
254 #ifdef DEBUG_PASSWORD
255 DEBUG(100,("key:"));
256 dump_data(100, (char *)key, sizeof(key));
258 DEBUG(100,("lm owf password:"));
259 dump_data(100, lm_pwd, sizeof(lm_pwd));
261 DEBUG(100,("nt owf password:"));
262 dump_data(100, nt_pwd, sizeof(nt_pwd));
263 #endif
265 if (lm_interactive_pwd)
266 SamOEMhash((uchar *)lm_pwd, key, sizeof(lm_pwd));
268 if (nt_interactive_pwd)
269 SamOEMhash((uchar *)nt_pwd, key, sizeof(nt_pwd));
271 #ifdef DEBUG_PASSWORD
272 DEBUG(100,("decrypt of lm owf password:"));
273 dump_data(100, lm_pwd, sizeof(lm_pwd));
275 DEBUG(100,("decrypt of nt owf password:"));
276 dump_data(100, nt_pwd, sizeof(nt_pwd));
277 #endif
279 if (lm_interactive_pwd)
280 SMBOWFencrypt((const unsigned char *)lm_pwd, chal,
281 local_lm_response);
283 if (nt_interactive_pwd)
284 SMBOWFencrypt((const unsigned char *)nt_pwd, chal,
285 local_nt_response);
287 /* Password info paranoia */
288 ZERO_STRUCT(key);
291 BOOL ret;
292 NTSTATUS nt_status;
293 DATA_BLOB local_lm_blob;
294 DATA_BLOB local_nt_blob;
296 DATA_BLOB lm_interactive_blob;
297 DATA_BLOB nt_interactive_blob;
299 if (lm_interactive_pwd) {
300 local_lm_blob = data_blob(local_lm_response,
301 sizeof(local_lm_response));
302 lm_interactive_blob = data_blob(lm_pwd,
303 sizeof(lm_pwd));
304 ZERO_STRUCT(lm_pwd);
307 if (nt_interactive_pwd) {
308 local_nt_blob = data_blob(local_nt_response,
309 sizeof(local_nt_response));
310 nt_interactive_blob = data_blob(nt_pwd,
311 sizeof(nt_pwd));
312 ZERO_STRUCT(nt_pwd);
315 nt_status = make_user_info_map(
316 user_info,
317 smb_name, client_domain, wksta_name,
318 lm_interactive_pwd ? &local_lm_blob : NULL,
319 nt_interactive_pwd ? &local_nt_blob : NULL,
320 lm_interactive_pwd ? &lm_interactive_blob : NULL,
321 nt_interactive_pwd ? &nt_interactive_blob : NULL,
322 NULL, True);
324 if (NT_STATUS_IS_OK(nt_status)) {
325 (*user_info)->logon_parameters = logon_parameters;
328 ret = NT_STATUS_IS_OK(nt_status) ? True : False;
329 data_blob_free(&local_lm_blob);
330 data_blob_free(&local_nt_blob);
331 data_blob_free(&lm_interactive_blob);
332 data_blob_free(&nt_interactive_blob);
333 return ret;
338 /****************************************************************************
339 Create an auth_usersupplied_data structure
340 ****************************************************************************/
342 BOOL make_user_info_for_reply(auth_usersupplied_info **user_info,
343 const char *smb_name,
344 const char *client_domain,
345 const uint8 chal[8],
346 DATA_BLOB plaintext_password)
349 DATA_BLOB local_lm_blob;
350 DATA_BLOB local_nt_blob;
351 NTSTATUS ret = NT_STATUS_UNSUCCESSFUL;
354 * Not encrypted - do so.
357 DEBUG(5,("make_user_info_for_reply: User passwords not in encrypted "
358 "format.\n"));
360 if (plaintext_password.data) {
361 unsigned char local_lm_response[24];
363 #ifdef DEBUG_PASSWORD
364 DEBUG(10,("Unencrypted password (len %d):\n",
365 (int)plaintext_password.length));
366 dump_data(100, (const char *)plaintext_password.data,
367 plaintext_password.length);
368 #endif
370 SMBencrypt( (const char *)plaintext_password.data,
371 (const uchar*)chal, local_lm_response);
372 local_lm_blob = data_blob(local_lm_response, 24);
374 /* We can't do an NT hash here, as the password needs to be
375 case insensitive */
376 local_nt_blob = data_blob(NULL, 0);
378 } else {
379 local_lm_blob = data_blob(NULL, 0);
380 local_nt_blob = data_blob(NULL, 0);
383 ret = make_user_info_map(
384 user_info, smb_name, client_domain,
385 get_remote_machine_name(),
386 local_lm_blob.data ? &local_lm_blob : NULL,
387 local_nt_blob.data ? &local_nt_blob : NULL,
388 NULL, NULL,
389 plaintext_password.data ? &plaintext_password : NULL,
390 False);
392 data_blob_free(&local_lm_blob);
393 return NT_STATUS_IS_OK(ret) ? True : False;
396 /****************************************************************************
397 Create an auth_usersupplied_data structure
398 ****************************************************************************/
400 NTSTATUS make_user_info_for_reply_enc(auth_usersupplied_info **user_info,
401 const char *smb_name,
402 const char *client_domain,
403 DATA_BLOB lm_resp, DATA_BLOB nt_resp)
405 return make_user_info_map(user_info, smb_name,
406 client_domain,
407 get_remote_machine_name(),
408 lm_resp.data ? &lm_resp : NULL,
409 nt_resp.data ? &nt_resp : NULL,
410 NULL, NULL, NULL,
411 True);
414 /****************************************************************************
415 Create a guest user_info blob, for anonymous authenticaion.
416 ****************************************************************************/
418 BOOL make_user_info_guest(auth_usersupplied_info **user_info)
420 NTSTATUS nt_status;
422 nt_status = make_user_info(user_info,
423 "","",
424 "","",
425 "",
426 NULL, NULL,
427 NULL, NULL,
428 NULL,
429 True);
431 return NT_STATUS_IS_OK(nt_status) ? True : False;
434 /****************************************************************************
435 prints a NT_USER_TOKEN to debug output.
436 ****************************************************************************/
438 void debug_nt_user_token(int dbg_class, int dbg_lev, NT_USER_TOKEN *token)
440 size_t i;
442 if (!token) {
443 DEBUGC(dbg_class, dbg_lev, ("NT user token: (NULL)\n"));
444 return;
447 DEBUGC(dbg_class, dbg_lev,
448 ("NT user token of user %s\n",
449 sid_string_static(&token->user_sids[0]) ));
450 DEBUGADDC(dbg_class, dbg_lev,
451 ("contains %lu SIDs\n", (unsigned long)token->num_sids));
452 for (i = 0; i < token->num_sids; i++)
453 DEBUGADDC(dbg_class, dbg_lev,
454 ("SID[%3lu]: %s\n", (unsigned long)i,
455 sid_string_static(&token->user_sids[i])));
457 dump_se_priv( dbg_class, dbg_lev, &token->privileges );
460 /****************************************************************************
461 prints a UNIX 'token' to debug output.
462 ****************************************************************************/
464 void debug_unix_user_token(int dbg_class, int dbg_lev, uid_t uid, gid_t gid,
465 int n_groups, gid_t *groups)
467 int i;
468 DEBUGC(dbg_class, dbg_lev,
469 ("UNIX token of user %ld\n", (long int)uid));
471 DEBUGADDC(dbg_class, dbg_lev,
472 ("Primary group is %ld and contains %i supplementary "
473 "groups\n", (long int)gid, n_groups));
474 for (i = 0; i < n_groups; i++)
475 DEBUGADDC(dbg_class, dbg_lev, ("Group[%3i]: %ld\n", i,
476 (long int)groups[i]));
479 /******************************************************************************
480 Create a token for the root user to be used internally by smbd.
481 This is similar to running under the context of the LOCAL_SYSTEM account
482 in Windows. This is a read-only token. Do not modify it or free() it.
483 Create a copy if your need to change it.
484 ******************************************************************************/
486 NT_USER_TOKEN *get_root_nt_token( void )
488 static NT_USER_TOKEN *token = NULL;
489 DOM_SID u_sid, g_sid;
490 struct passwd *pw;
492 if ( token )
493 return token;
495 if ( !(pw = sys_getpwnam( "root" )) ) {
496 DEBUG(0,("get_root_nt_token: getpwnam\"root\") failed!\n"));
497 return NULL;
500 /* get the user and primary group SIDs; although the
501 BUILTIN\Administrators SId is really the one that matters here */
503 uid_to_sid(&u_sid, pw->pw_uid);
504 gid_to_sid(&g_sid, pw->pw_gid);
506 token = create_local_nt_token(NULL, &u_sid, &g_sid, False,
507 1, &global_sid_Builtin_Administrators);
508 return token;
511 static int server_info_dtor(void *p)
513 auth_serversupplied_info *server_info =
514 talloc_get_type_abort(p, auth_serversupplied_info);
516 if (server_info->sam_account != NULL) {
517 TALLOC_FREE(server_info->sam_account);
520 ZERO_STRUCTP(server_info);
521 return 0;
524 /***************************************************************************
525 Make a server_info struct. Free with TALLOC_FREE().
526 ***************************************************************************/
528 static auth_serversupplied_info *make_server_info(TALLOC_CTX *mem_ctx)
530 struct auth_serversupplied_info *result;
532 result = TALLOC_ZERO_P(mem_ctx, auth_serversupplied_info);
533 if (result == NULL) {
534 DEBUG(0, ("talloc failed\n"));
535 return NULL;
538 talloc_set_destructor(result, server_info_dtor);
540 /* Initialise the uid and gid values to something non-zero
541 which may save us from giving away root access if there
542 is a bug in allocating these fields. */
544 result->uid = -1;
545 result->gid = -1;
546 return result;
549 /***************************************************************************
550 Make (and fill) a user_info struct from a struct samu
551 ***************************************************************************/
553 NTSTATUS make_server_info_sam(auth_serversupplied_info **server_info,
554 struct samu *sampass)
556 NTSTATUS status;
557 struct passwd *pwd;
558 gid_t *gids;
559 auth_serversupplied_info *result;
561 if ( !(pwd = getpwnam_alloc(NULL, pdb_get_username(sampass))) ) {
562 DEBUG(1, ("User %s in passdb, but getpwnam() fails!\n",
563 pdb_get_username(sampass)));
564 return NT_STATUS_NO_SUCH_USER;
567 if ( !(result = make_server_info(NULL)) ) {
568 TALLOC_FREE(pwd);
569 return NT_STATUS_NO_MEMORY;
572 result->sam_account = sampass;
573 result->unix_name = talloc_strdup(result, pwd->pw_name);
574 result->gid = pwd->pw_gid;
575 result->uid = pwd->pw_uid;
577 TALLOC_FREE(pwd);
579 status = pdb_enum_group_memberships(result, sampass,
580 &result->sids, &gids,
581 &result->num_sids);
583 if (!NT_STATUS_IS_OK(status)) {
584 DEBUG(10, ("pdb_enum_group_memberships failed: %s\n",
585 nt_errstr(status)));
586 result->sam_account = NULL; /* Don't free on error exit. */
587 TALLOC_FREE(result);
588 return status;
591 /* For now we throw away the gids and convert via sid_to_gid
592 * later. This needs fixing, but I'd like to get the code straight and
593 * simple first. */
594 TALLOC_FREE(gids);
596 DEBUG(5,("make_server_info_sam: made server info for user %s -> %s\n",
597 pdb_get_username(sampass), result->unix_name));
599 *server_info = result;
601 return NT_STATUS_OK;
605 * Add alias SIDs from memberships within the partially created token SID list
608 static NTSTATUS add_aliases(TALLOC_CTX *tmp_ctx, const DOM_SID *domain_sid,
609 struct nt_user_token *token)
611 uint32 *aliases;
612 size_t i, num_aliases;
613 NTSTATUS status;
615 aliases = NULL;
616 num_aliases = 0;
618 status = pdb_enum_alias_memberships(tmp_ctx, domain_sid,
619 token->user_sids,
620 token->num_sids,
621 &aliases, &num_aliases);
623 if (!NT_STATUS_IS_OK(status)) {
624 DEBUG(10, ("pdb_enum_alias_memberships failed: %s\n",
625 nt_errstr(status)));
626 return status;
629 for (i=0; i<num_aliases; i++) {
630 DOM_SID alias_sid;
631 sid_compose(&alias_sid, domain_sid, aliases[i]);
632 add_sid_to_array_unique(token, &alias_sid,
633 &token->user_sids,
634 &token->num_sids);
635 if (token->user_sids == NULL) {
636 DEBUG(0, ("add_sid_to_array failed\n"));
637 return NT_STATUS_NO_MEMORY;
641 return NT_STATUS_OK;
644 static NTSTATUS log_nt_token(TALLOC_CTX *tmp_ctx, NT_USER_TOKEN *token)
646 char *command;
647 char *group_sidstr;
648 size_t i;
650 if ((lp_log_nt_token_command() == NULL) ||
651 (strlen(lp_log_nt_token_command()) == 0)) {
652 return NT_STATUS_OK;
655 group_sidstr = talloc_strdup(tmp_ctx, "");
656 for (i=1; i<token->num_sids; i++) {
657 group_sidstr = talloc_asprintf(
658 tmp_ctx, "%s %s", group_sidstr,
659 sid_string_static(&token->user_sids[i]));
662 command = talloc_string_sub(
663 tmp_ctx, lp_log_nt_token_command(),
664 "%s", sid_string_static(&token->user_sids[0]));
665 command = talloc_string_sub(tmp_ctx, command, "%t", group_sidstr);
667 if (command == NULL) {
668 return NT_STATUS_NO_MEMORY;
671 DEBUG(8, ("running command: [%s]\n", command));
672 if (smbrun(command, NULL) != 0) {
673 DEBUG(0, ("Could not log NT token\n"));
674 return NT_STATUS_ACCESS_DENIED;
677 return NT_STATUS_OK;
680 /*******************************************************************
681 *******************************************************************/
683 static NTSTATUS add_builtin_administrators( TALLOC_CTX *ctx, struct nt_user_token *token )
685 return NT_STATUS_OK;
688 /*******************************************************************
689 *******************************************************************/
691 static NTSTATUS create_builtin_users( void )
693 NTSTATUS status;
694 DOM_SID dom_users;
696 status = pdb_create_builtin_alias( BUILTIN_ALIAS_RID_USERS );
697 if ( !NT_STATUS_IS_OK(status) ) {
698 DEBUG(0,("create_builtin_users: Failed to create Users\n"));
699 return status;
702 /* add domain users */
703 if ((IS_DC || (lp_server_role() == ROLE_DOMAIN_MEMBER))
704 && secrets_fetch_domain_sid(lp_workgroup(), &dom_users))
706 sid_append_rid(&dom_users, DOMAIN_GROUP_RID_USERS );
707 status = pdb_add_aliasmem( &global_sid_Builtin_Users, &dom_users);
708 if ( !NT_STATUS_IS_OK(status) ) {
709 DEBUG(0,("create_builtin_administrators: Failed to add Domain Users to"
710 " Users\n"));
711 return status;
715 return NT_STATUS_OK;
718 /*******************************************************************
719 *******************************************************************/
721 static NTSTATUS create_builtin_administrators( void )
723 NTSTATUS status;
724 DOM_SID dom_admins, root_sid;
725 fstring root_name;
726 enum SID_NAME_USE type;
727 TALLOC_CTX *ctx;
728 BOOL ret;
730 status = pdb_create_builtin_alias( BUILTIN_ALIAS_RID_ADMINS );
731 if ( !NT_STATUS_IS_OK(status) ) {
732 DEBUG(0,("create_builtin_administrators: Failed to create Administrators\n"));
733 return status;
736 /* add domain admins */
737 if ((IS_DC || (lp_server_role() == ROLE_DOMAIN_MEMBER))
738 && secrets_fetch_domain_sid(lp_workgroup(), &dom_admins))
740 sid_append_rid(&dom_admins, DOMAIN_GROUP_RID_ADMINS);
741 status = pdb_add_aliasmem( &global_sid_Builtin_Administrators, &dom_admins );
742 if ( !NT_STATUS_IS_OK(status) ) {
743 DEBUG(0,("create_builtin_administrators: Failed to add Domain Admins"
744 " Administrators\n"));
745 return status;
749 /* add root */
750 if ( (ctx = talloc_init(NULL)) == NULL ) {
751 return NT_STATUS_NO_MEMORY;
753 fstr_sprintf( root_name, "%s\\root", get_global_sam_name() );
754 ret = lookup_name( ctx, root_name, 0, NULL, NULL, &root_sid, &type );
755 TALLOC_FREE( ctx );
757 if ( ret ) {
758 status = pdb_add_aliasmem( &global_sid_Builtin_Administrators, &root_sid );
759 if ( !NT_STATUS_IS_OK(status) ) {
760 DEBUG(0,("create_builtin_administrators: Failed to add root"
761 " Administrators\n"));
762 return status;
766 return NT_STATUS_OK;
769 /*******************************************************************
770 Create a NT token for the user, expanding local aliases
771 *******************************************************************/
773 static struct nt_user_token *create_local_nt_token(TALLOC_CTX *mem_ctx,
774 const DOM_SID *user_sid,
775 const DOM_SID *group_sid,
776 BOOL is_guest,
777 int num_groupsids,
778 const DOM_SID *groupsids)
780 TALLOC_CTX *tmp_ctx;
781 struct nt_user_token *result = NULL;
782 int i;
783 NTSTATUS status;
784 gid_t gid;
786 tmp_ctx = talloc_new(mem_ctx);
787 if (tmp_ctx == NULL) {
788 DEBUG(0, ("talloc_new failed\n"));
789 return NULL;
792 result = TALLOC_ZERO_P(tmp_ctx, NT_USER_TOKEN);
793 if (result == NULL) {
794 DEBUG(0, ("talloc failed\n"));
795 goto done;
798 /* Add the user and primary group sid */
800 add_sid_to_array(result, user_sid,
801 &result->user_sids, &result->num_sids);
802 add_sid_to_array(result, group_sid,
803 &result->user_sids, &result->num_sids);
805 /* Add in BUILTIN sids */
807 add_sid_to_array(result, &global_sid_World,
808 &result->user_sids, &result->num_sids);
809 add_sid_to_array(result, &global_sid_Network,
810 &result->user_sids, &result->num_sids);
812 if (is_guest) {
813 add_sid_to_array(result, &global_sid_Builtin_Guests,
814 &result->user_sids, &result->num_sids);
815 } else {
816 add_sid_to_array(result, &global_sid_Authenticated_Users,
817 &result->user_sids, &result->num_sids);
820 /* Now the SIDs we got from authentication. These are the ones from
821 * the info3 struct or from the pdb_enum_group_memberships, depending
822 * on who authenticated the user. */
824 for (i=0; i<num_groupsids; i++) {
825 add_sid_to_array_unique(result, &groupsids[i],
826 &result->user_sids, &result->num_sids);
829 /* Deal with the BUILTIN\Administrators group. If the SID can
830 be resolved then assume that the add_aliasmem( S-1-5-32 )
831 handled it. */
833 if ( !sid_to_gid( &global_sid_Builtin_Administrators, &gid ) ) {
834 /* We can only create a mapping if winbind is running
835 and the nested group functionality has been enabled */
837 if ( lp_winbind_nested_groups() ) {
838 become_root();
839 status = create_builtin_administrators( );
840 if ( !NT_STATUS_IS_OK(status) ) {
841 DEBUG(0,("create_local_nt_token: Failed to create BUILTIN\\Administrators group!\n"));
842 /* don't fail, just log the message */
844 unbecome_root();
846 else {
847 status = add_builtin_administrators( tmp_ctx, result );
848 if ( !NT_STATUS_IS_OK(status) ) {
849 result = NULL;
850 goto done;
855 /* Deal with the BUILTIN\Users group. If the SID can
856 be resolved then assume that the add_aliasmem( S-1-5-32 )
857 handled it. */
859 if ( !sid_to_gid( &global_sid_Builtin_Users, &gid ) ) {
860 /* We can only create a mapping if winbind is running
861 and the nested group functionality has been enabled */
863 if ( lp_winbind_nested_groups() ) {
864 become_root();
865 status = create_builtin_users( );
866 if ( !NT_STATUS_IS_OK(status) ) {
867 DEBUG(0,("create_local_nt_token: Failed to create BUILTIN\\Administrators group!\n"));
868 /* don't fail, just log the message */
870 unbecome_root();
874 /* Deal with local groups */
876 if (lp_winbind_nested_groups()) {
878 /* Now add the aliases. First the one from our local SAM */
880 status = add_aliases(tmp_ctx, get_global_sam_sid(), result);
882 if (!NT_STATUS_IS_OK(status)) {
883 result = NULL;
884 goto done;
887 /* Finally the builtin ones */
889 status = add_aliases(tmp_ctx, &global_sid_Builtin, result);
891 if (!NT_STATUS_IS_OK(status)) {
892 result = NULL;
893 goto done;
898 get_privileges_for_sids(&result->privileges, result->user_sids,
899 result->num_sids);
901 talloc_steal(mem_ctx, result);
903 done:
904 TALLOC_FREE(tmp_ctx);
905 return result;
909 * Create the token to use from server_info->sam_account and
910 * server_info->sids (the info3/sam groups). Find the unix gids.
913 NTSTATUS create_local_token(auth_serversupplied_info *server_info)
915 TALLOC_CTX *mem_ctx;
916 NTSTATUS status;
917 size_t i;
920 mem_ctx = talloc_new(NULL);
921 if (mem_ctx == NULL) {
922 DEBUG(0, ("talloc_new failed\n"));
923 return NT_STATUS_NO_MEMORY;
926 server_info->ptok = create_local_nt_token(
927 server_info,
928 pdb_get_user_sid(server_info->sam_account),
929 pdb_get_group_sid(server_info->sam_account),
930 server_info->guest,
931 server_info->num_sids, server_info->sids);
933 if ( !server_info->ptok ) {
934 return NT_STATUS_NO_SUCH_USER;
937 /* Convert the SIDs to gids. */
939 server_info->n_groups = 0;
940 server_info->groups = NULL;
942 /* Start at index 1, where the groups start. */
944 for (i=1; i<server_info->ptok->num_sids; i++) {
945 gid_t gid;
946 DOM_SID *sid = &server_info->ptok->user_sids[i];
948 if (!sid_to_gid(sid, &gid)) {
949 DEBUG(10, ("Could not convert SID %s to gid, "
950 "ignoring it\n", sid_string_static(sid)));
951 continue;
953 add_gid_to_array_unique(server_info, gid, &server_info->groups,
954 &server_info->n_groups);
957 debug_nt_user_token(DBGC_AUTH, 10, server_info->ptok);
959 status = log_nt_token(mem_ctx, server_info->ptok);
961 TALLOC_FREE(mem_ctx);
962 return status;
966 * Create an artificial NT token given just a username. (Initially indended
967 * for force user)
969 * We go through lookup_name() to avoid problems we had with 'winbind use
970 * default domain'.
972 * We have 3 cases:
974 * unmapped unix users: Go directly to nss to find the user's group.
976 * A passdb user: The list of groups is provided by pdb_enum_group_memberships.
978 * If the user is provided by winbind, the primary gid is set to "domain
979 * users" of the user's domain. For an explanation why this is necessary, see
980 * the thread starting at
981 * http://lists.samba.org/archive/samba-technical/2006-January/044803.html.
984 NTSTATUS create_token_from_username(TALLOC_CTX *mem_ctx, const char *username,
985 BOOL is_guest,
986 uid_t *uid, gid_t *gid,
987 char **found_username,
988 struct nt_user_token **token)
990 NTSTATUS result = NT_STATUS_NO_SUCH_USER;
991 TALLOC_CTX *tmp_ctx;
992 DOM_SID user_sid;
993 enum SID_NAME_USE type;
994 gid_t *gids;
995 DOM_SID primary_group_sid;
996 DOM_SID *group_sids;
997 size_t num_group_sids;
999 tmp_ctx = talloc_new(NULL);
1000 if (tmp_ctx == NULL) {
1001 DEBUG(0, ("talloc_new failed\n"));
1002 return NT_STATUS_NO_MEMORY;
1005 if (!lookup_name(tmp_ctx, username, LOOKUP_NAME_ALL,
1006 NULL, NULL, &user_sid, &type)) {
1007 DEBUG(1, ("lookup_name for %s failed\n", username));
1008 goto done;
1011 if (type != SID_NAME_USER) {
1012 DEBUG(1, ("%s is a %s, not a user\n", username,
1013 sid_type_lookup(type)));
1014 goto done;
1017 if (!sid_to_uid(&user_sid, uid)) {
1018 DEBUG(1, ("sid_to_uid for %s (%s) failed\n",
1019 username, sid_string_static(&user_sid)));
1020 goto done;
1023 if (sid_check_is_in_unix_users(&user_sid)) {
1025 /* This is a unix user not in passdb. We need to ask nss
1026 * directly, without consulting passdb */
1028 struct passwd *pass;
1029 size_t i;
1031 pass = getpwuid_alloc(tmp_ctx, *uid);
1032 if (pass == NULL) {
1033 DEBUG(1, ("getpwuid(%d) for user %s failed\n",
1034 *uid, username));
1035 goto done;
1038 *gid = pass->pw_gid;
1039 gid_to_sid(&primary_group_sid, pass->pw_gid);
1041 if (!getgroups_unix_user(tmp_ctx, username, pass->pw_gid,
1042 &gids, &num_group_sids)) {
1043 DEBUG(1, ("getgroups_unix_user for user %s failed\n",
1044 username));
1045 goto done;
1048 group_sids = talloc_array(tmp_ctx, DOM_SID, num_group_sids);
1049 if (group_sids == NULL) {
1050 DEBUG(1, ("talloc_array failed\n"));
1051 result = NT_STATUS_NO_MEMORY;
1052 goto done;
1055 for (i=0; i<num_group_sids; i++) {
1056 gid_to_sid(&group_sids[i], gids[i]);
1058 *found_username = talloc_strdup(mem_ctx, pass->pw_name);
1060 } else if (sid_check_is_in_our_domain(&user_sid)) {
1062 /* This is a passdb user, so ask passdb */
1064 struct samu *sam_acct = NULL;
1066 if ( !(sam_acct = samu_new( tmp_ctx )) ) {
1067 goto done;
1070 if (!pdb_getsampwsid(sam_acct, &user_sid)) {
1071 DEBUG(1, ("pdb_getsampwsid(%s) for user %s failed\n",
1072 sid_string_static(&user_sid), username));
1073 result = NT_STATUS_NO_SUCH_USER;
1074 goto done;
1077 sid_copy(&primary_group_sid, pdb_get_group_sid(sam_acct));
1079 result = pdb_enum_group_memberships(tmp_ctx, sam_acct,
1080 &group_sids, &gids,
1081 &num_group_sids);
1082 if (!NT_STATUS_IS_OK(result)) {
1083 DEBUG(10, ("enum_group_memberships failed for %s\n",
1084 username));
1085 goto done;
1088 *found_username = talloc_strdup(mem_ctx,
1089 pdb_get_username(sam_acct));
1091 } else {
1093 /* This user is from winbind, force the primary gid to the
1094 * user's "domain users" group. Under certain circumstances
1095 * (user comes from NT4), this might be a loss of
1096 * information. But we can not rely on winbind getting the
1097 * correct info. AD might prohibit winbind looking up that
1098 * information. */
1100 uint32 dummy;
1102 sid_copy(&primary_group_sid, &user_sid);
1103 sid_split_rid(&primary_group_sid, &dummy);
1104 sid_append_rid(&primary_group_sid, DOMAIN_GROUP_RID_USERS);
1106 if (!sid_to_gid(&primary_group_sid, gid)) {
1107 DEBUG(1, ("sid_to_gid(%s) failed\n",
1108 sid_string_static(&primary_group_sid)));
1109 goto done;
1112 num_group_sids = 0;
1113 group_sids = NULL;
1115 *found_username = talloc_strdup(mem_ctx, username);
1118 *token = create_local_nt_token(mem_ctx, &user_sid, &primary_group_sid,
1119 is_guest, num_group_sids, group_sids);
1121 if ((*token == NULL) || (*found_username == NULL)) {
1122 result = NT_STATUS_NO_MEMORY;
1123 goto done;
1126 result = NT_STATUS_OK;
1127 done:
1128 TALLOC_FREE(tmp_ctx);
1129 return result;
1132 /***************************************************************************
1133 Build upon create_token_from_username:
1135 Expensive helper function to figure out whether a user given its name is
1136 member of a particular group.
1137 ***************************************************************************/
1138 BOOL user_in_group_sid(const char *username, const DOM_SID *group_sid)
1140 NTSTATUS status;
1141 uid_t uid;
1142 gid_t gid;
1143 char *found_username;
1144 struct nt_user_token *token;
1145 BOOL result;
1147 TALLOC_CTX *mem_ctx;
1149 mem_ctx = talloc_new(NULL);
1150 if (mem_ctx == NULL) {
1151 DEBUG(0, ("talloc_new failed\n"));
1152 return False;
1155 status = create_token_from_username(mem_ctx, username, False,
1156 &uid, &gid, &found_username,
1157 &token);
1159 if (!NT_STATUS_IS_OK(status)) {
1160 DEBUG(10, ("could not create token for %s\n", username));
1161 return False;
1164 result = nt_token_check_sid(group_sid, token);
1166 TALLOC_FREE(mem_ctx);
1167 return result;
1171 BOOL user_in_group(const char *username, const char *groupname)
1173 TALLOC_CTX *mem_ctx;
1174 DOM_SID group_sid;
1175 NTSTATUS status;
1176 BOOL ret;
1178 mem_ctx = talloc_new(NULL);
1179 if (mem_ctx == NULL) {
1180 DEBUG(0, ("talloc_new failed\n"));
1181 return False;
1184 ret = lookup_name(mem_ctx, groupname, LOOKUP_NAME_ALL,
1185 NULL, NULL, &group_sid, NULL);
1186 TALLOC_FREE(mem_ctx);
1188 if (!ret) {
1189 DEBUG(10, ("lookup_name(%s) failed: %s\n", groupname,
1190 nt_errstr(status)));
1191 return False;
1194 return user_in_group_sid(username, &group_sid);
1198 /***************************************************************************
1199 Make (and fill) a user_info struct from a 'struct passwd' by conversion
1200 to a struct samu
1201 ***************************************************************************/
1203 NTSTATUS make_server_info_pw(auth_serversupplied_info **server_info,
1204 char *unix_username,
1205 struct passwd *pwd)
1207 NTSTATUS status;
1208 struct samu *sampass = NULL;
1209 gid_t *gids;
1210 auth_serversupplied_info *result;
1212 if ( !(sampass = samu_new( NULL )) ) {
1213 return NT_STATUS_NO_MEMORY;
1216 status = samu_set_unix( sampass, pwd );
1217 if (!NT_STATUS_IS_OK(status)) {
1218 return status;
1221 result = make_server_info(NULL);
1223 if (!NT_STATUS_IS_OK(status)) {
1224 TALLOC_FREE(sampass);
1225 return status;
1228 result->sam_account = sampass;
1229 result->unix_name = talloc_strdup(result, unix_username);
1230 result->uid = pwd->pw_uid;
1231 result->gid = pwd->pw_gid;
1233 status = pdb_enum_group_memberships(result, sampass,
1234 &result->sids, &gids,
1235 &result->num_sids);
1237 if (!NT_STATUS_IS_OK(status)) {
1238 DEBUG(10, ("pdb_enum_group_memberships failed: %s\n",
1239 nt_errstr(status)));
1240 TALLOC_FREE(result);
1241 return status;
1244 /* For now we throw away the gids and convert via sid_to_gid
1245 * later. This needs fixing, but I'd like to get the code straight and
1246 * simple first. */
1247 TALLOC_FREE(gids);
1249 *server_info = result;
1251 return NT_STATUS_OK;
1254 /***************************************************************************
1255 Make (and fill) a user_info struct for a guest login.
1256 This *must* succeed for smbd to start. If there is no mapping entry for
1257 the guest gid, then create one.
1258 **********************
1259 *****************************************************/
1261 static NTSTATUS make_new_server_info_guest(auth_serversupplied_info **server_info)
1263 NTSTATUS status;
1264 struct samu *sampass = NULL;
1265 DOM_SID guest_sid;
1266 BOOL ret;
1267 static const char zeros[16];
1269 if ( !(sampass = samu_new( NULL )) ) {
1270 return NT_STATUS_NO_MEMORY;
1273 sid_copy(&guest_sid, get_global_sam_sid());
1274 sid_append_rid(&guest_sid, DOMAIN_USER_RID_GUEST);
1276 become_root();
1277 ret = pdb_getsampwsid(sampass, &guest_sid);
1278 unbecome_root();
1280 if (!ret) {
1281 TALLOC_FREE(sampass);
1282 return NT_STATUS_NO_SUCH_USER;
1285 status = make_server_info_sam(server_info, sampass);
1286 if (!NT_STATUS_IS_OK(status)) {
1287 TALLOC_FREE(sampass);
1288 return status;
1291 (*server_info)->guest = True;
1293 status = create_local_token(*server_info);
1294 if (!NT_STATUS_IS_OK(status)) {
1295 DEBUG(10, ("create_local_token failed: %s\n",
1296 nt_errstr(status)));
1297 return status;
1300 /* annoying, but the Guest really does have a session key, and it is
1301 all zeros! */
1302 (*server_info)->user_session_key = data_blob(zeros, sizeof(zeros));
1303 (*server_info)->lm_session_key = data_blob(zeros, sizeof(zeros));
1305 return NT_STATUS_OK;
1308 static auth_serversupplied_info *copy_serverinfo(auth_serversupplied_info *src)
1310 auth_serversupplied_info *dst;
1312 dst = make_server_info(NULL);
1313 if (dst == NULL) {
1314 return NULL;
1317 dst->guest = src->guest;
1318 dst->uid = src->uid;
1319 dst->gid = src->gid;
1320 dst->n_groups = src->n_groups;
1321 if (src->n_groups != 0)
1322 dst->groups = talloc_memdup(dst, src->groups,
1323 sizeof(gid_t)*dst->n_groups);
1324 else
1325 dst->groups = NULL;
1327 dst->ptok = dup_nt_token(dst, src->ptok);
1329 dst->user_session_key = data_blob_talloc( dst, src->user_session_key.data,
1330 src->user_session_key.length);
1332 dst->lm_session_key = data_blob_talloc(dst, src->lm_session_key.data,
1333 src->lm_session_key.length);
1335 if ( (dst->sam_account = samu_new( NULL )) != NULL )
1336 pdb_copy_sam_account(dst->sam_account, src->sam_account);
1338 dst->pam_handle = NULL;
1339 dst->unix_name = talloc_strdup(dst, src->unix_name);
1341 return dst;
1344 static auth_serversupplied_info *guest_info = NULL;
1346 BOOL init_guest_info(void)
1348 if (guest_info != NULL)
1349 return True;
1351 return NT_STATUS_IS_OK(make_new_server_info_guest(&guest_info));
1354 NTSTATUS make_server_info_guest(auth_serversupplied_info **server_info)
1356 *server_info = copy_serverinfo(guest_info);
1357 return (*server_info != NULL) ? NT_STATUS_OK : NT_STATUS_NO_MEMORY;
1360 /***************************************************************************
1361 Purely internal function for make_server_info_info3
1362 Fill the sam account from getpwnam
1363 ***************************************************************************/
1364 static NTSTATUS fill_sam_account(TALLOC_CTX *mem_ctx,
1365 const char *domain,
1366 const char *username,
1367 char **found_username,
1368 uid_t *uid, gid_t *gid,
1369 struct samu *account)
1371 NTSTATUS nt_status;
1372 fstring dom_user, lower_username;
1373 fstring real_username;
1374 struct passwd *passwd;
1376 fstrcpy( lower_username, username );
1377 strlower_m( lower_username );
1379 fstr_sprintf(dom_user, "%s%c%s", domain, *lp_winbind_separator(),
1380 lower_username);
1382 /* get the passwd struct but don't create the user if he/she
1383 does not exist. We were explicitly called from a following
1384 a winbindd authentication request so we should assume that
1385 nss_winbindd is working */
1387 map_username( dom_user );
1389 if ( !(passwd = smb_getpwnam( NULL, dom_user, real_username, True )) )
1390 return NT_STATUS_NO_SUCH_USER;
1392 *uid = passwd->pw_uid;
1393 *gid = passwd->pw_gid;
1395 /* This is pointless -- there is no suport for differing
1396 unix and windows names. Make sure to always store the
1397 one we actually looked up and succeeded. Have I mentioned
1398 why I hate the 'winbind use default domain' parameter?
1399 --jerry */
1401 *found_username = talloc_strdup( mem_ctx, real_username );
1403 DEBUG(5,("fill_sam_account: located username was [%s]\n", *found_username));
1405 nt_status = samu_set_unix( account, passwd );
1407 TALLOC_FREE(passwd);
1409 return nt_status;
1412 /****************************************************************************
1413 Wrapper to allow the getpwnam() call to strip the domain name and
1414 try again in case a local UNIX user is already there. Also run through
1415 the username if we fallback to the username only.
1416 ****************************************************************************/
1418 struct passwd *smb_getpwnam( TALLOC_CTX *mem_ctx, char *domuser,
1419 fstring save_username, BOOL create )
1421 struct passwd *pw = NULL;
1422 char *p;
1423 fstring username;
1425 /* we only save a copy of the username it has been mangled
1426 by winbindd use default domain */
1428 save_username[0] = '\0';
1430 /* don't call map_username() here since it has to be done higher
1431 up the stack so we don't call it mutliple times */
1433 fstrcpy( username, domuser );
1435 p = strchr_m( username, *lp_winbind_separator() );
1437 /* code for a DOMAIN\user string */
1439 if ( p ) {
1440 fstring strip_username;
1442 pw = Get_Pwnam_alloc( mem_ctx, domuser );
1443 if ( pw ) {
1444 /* make sure we get the case of the username correct */
1445 /* work around 'winbind use default domain = yes' */
1447 if ( !strchr_m( pw->pw_name, *lp_winbind_separator() ) ) {
1448 char *domain;
1450 /* split the domain and username into 2 strings */
1451 *p = '\0';
1452 domain = username;
1454 fstr_sprintf(save_username, "%s%c%s", domain, *lp_winbind_separator(), pw->pw_name);
1456 else
1457 fstrcpy( save_username, pw->pw_name );
1459 /* whew -- done! */
1460 return pw;
1463 /* setup for lookup of just the username */
1464 /* remember that p and username are overlapping memory */
1466 p++;
1467 fstrcpy( strip_username, p );
1468 fstrcpy( username, strip_username );
1471 /* just lookup a plain username */
1473 pw = Get_Pwnam_alloc(mem_ctx, username);
1475 /* Create local user if requested. */
1477 if ( !pw && create ) {
1478 /* Don't add a machine account. */
1479 if (username[strlen(username)-1] == '$')
1480 return NULL;
1482 smb_create_user(NULL, username, NULL);
1483 pw = Get_Pwnam_alloc(mem_ctx, username);
1486 /* one last check for a valid passwd struct */
1488 if ( pw )
1489 fstrcpy( save_username, pw->pw_name );
1491 return pw;
1494 /***************************************************************************
1495 Make a server_info struct from the info3 returned by a domain logon
1496 ***************************************************************************/
1498 NTSTATUS make_server_info_info3(TALLOC_CTX *mem_ctx,
1499 const char *internal_username,
1500 const char *sent_nt_username,
1501 const char *domain,
1502 auth_serversupplied_info **server_info,
1503 NET_USER_INFO_3 *info3)
1505 static const char zeros[16];
1507 NTSTATUS nt_status = NT_STATUS_OK;
1508 char *found_username;
1509 const char *nt_domain;
1510 const char *nt_username;
1511 struct samu *sam_account = NULL;
1512 DOM_SID user_sid;
1513 DOM_SID group_sid;
1515 uid_t uid;
1516 gid_t gid;
1518 size_t i;
1520 auth_serversupplied_info *result;
1523 Here is where we should check the list of
1524 trusted domains, and verify that the SID
1525 matches.
1528 sid_copy(&user_sid, &info3->dom_sid.sid);
1529 if (!sid_append_rid(&user_sid, info3->user_rid)) {
1530 return NT_STATUS_INVALID_PARAMETER;
1533 sid_copy(&group_sid, &info3->dom_sid.sid);
1534 if (!sid_append_rid(&group_sid, info3->group_rid)) {
1535 return NT_STATUS_INVALID_PARAMETER;
1538 if (!(nt_username = unistr2_tdup(mem_ctx, &(info3->uni_user_name)))) {
1539 /* If the server didn't give us one, just use the one we sent
1540 * them */
1541 nt_username = sent_nt_username;
1544 if (!(nt_domain = unistr2_tdup(mem_ctx, &(info3->uni_logon_dom)))) {
1545 /* If the server didn't give us one, just use the one we sent
1546 * them */
1547 nt_domain = domain;
1550 /* try to fill the SAM account.. If getpwnam() fails, then try the
1551 add user script (2.2.x behavior).
1553 We use the _unmapped_ username here in an attempt to provide
1554 consistent username mapping behavior between kerberos and NTLM[SSP]
1555 authentication in domain mode security. I.E. Username mapping
1556 should be applied to the fully qualified username
1557 (e.g. DOMAIN\user) and not just the login name. Yes this means we
1558 called map_username() unnecessarily in make_user_info_map() but
1559 that is how the current code is designed. Making the change here
1560 is the least disruptive place. -- jerry */
1562 if ( !(sam_account = samu_new( NULL )) ) {
1563 return NT_STATUS_NO_MEMORY;
1566 nt_status = fill_sam_account(mem_ctx, nt_domain, sent_nt_username,
1567 &found_username, &uid, &gid, sam_account);
1569 if (NT_STATUS_EQUAL(nt_status, NT_STATUS_NO_SUCH_USER)) {
1570 DEBUG(3,("User %s does not exist, trying to add it\n",
1571 internal_username));
1572 smb_create_user( nt_domain, sent_nt_username, NULL);
1573 nt_status = fill_sam_account( mem_ctx, nt_domain, sent_nt_username,
1574 &found_username, &uid, &gid, sam_account );
1577 /* if we still don't have a valid unix account check for
1578 'map to guest = bad uid' */
1580 if (!NT_STATUS_IS_OK(nt_status)) {
1581 TALLOC_FREE( sam_account );
1582 if ( lp_map_to_guest() == MAP_TO_GUEST_ON_BAD_UID ) {
1583 make_server_info_guest(server_info);
1584 return NT_STATUS_OK;
1586 return nt_status;
1589 if (!pdb_set_nt_username(sam_account, nt_username, PDB_CHANGED)) {
1590 TALLOC_FREE(sam_account);
1591 return NT_STATUS_NO_MEMORY;
1594 if (!pdb_set_username(sam_account, nt_username, PDB_CHANGED)) {
1595 TALLOC_FREE(sam_account);
1596 return NT_STATUS_NO_MEMORY;
1599 if (!pdb_set_domain(sam_account, nt_domain, PDB_CHANGED)) {
1600 TALLOC_FREE(sam_account);
1601 return NT_STATUS_NO_MEMORY;
1604 if (!pdb_set_user_sid(sam_account, &user_sid, PDB_CHANGED)) {
1605 TALLOC_FREE(sam_account);
1606 return NT_STATUS_UNSUCCESSFUL;
1609 if (!pdb_set_group_sid(sam_account, &group_sid, PDB_CHANGED)) {
1610 TALLOC_FREE(sam_account);
1611 return NT_STATUS_UNSUCCESSFUL;
1614 if (!pdb_set_fullname(sam_account,
1615 unistr2_static(&(info3->uni_full_name)),
1616 PDB_CHANGED)) {
1617 TALLOC_FREE(sam_account);
1618 return NT_STATUS_NO_MEMORY;
1621 if (!pdb_set_logon_script(sam_account,
1622 unistr2_static(&(info3->uni_logon_script)),
1623 PDB_CHANGED)) {
1624 TALLOC_FREE(sam_account);
1625 return NT_STATUS_NO_MEMORY;
1628 if (!pdb_set_profile_path(sam_account,
1629 unistr2_static(&(info3->uni_profile_path)),
1630 PDB_CHANGED)) {
1631 TALLOC_FREE(sam_account);
1632 return NT_STATUS_NO_MEMORY;
1635 if (!pdb_set_homedir(sam_account,
1636 unistr2_static(&(info3->uni_home_dir)),
1637 PDB_CHANGED)) {
1638 TALLOC_FREE(sam_account);
1639 return NT_STATUS_NO_MEMORY;
1642 if (!pdb_set_dir_drive(sam_account,
1643 unistr2_static(&(info3->uni_dir_drive)),
1644 PDB_CHANGED)) {
1645 TALLOC_FREE(sam_account);
1646 return NT_STATUS_NO_MEMORY;
1649 if (!pdb_set_acct_ctrl(sam_account, info3->acct_flags, PDB_CHANGED)) {
1650 TALLOC_FREE(sam_account);
1651 return NT_STATUS_NO_MEMORY;
1654 result = make_server_info(NULL);
1655 if (result == NULL) {
1656 DEBUG(4, ("make_server_info failed!\n"));
1657 TALLOC_FREE(sam_account);
1658 return NT_STATUS_NO_MEMORY;
1661 /* save this here to _net_sam_logon() doesn't fail (it assumes a
1662 valid struct samu) */
1664 result->sam_account = sam_account;
1665 result->unix_name = talloc_strdup(result, found_username);
1667 /* Fill in the unix info we found on the way */
1669 result->uid = uid;
1670 result->gid = gid;
1672 /* Create a 'combined' list of all SIDs we might want in the SD */
1674 result->num_sids = 0;
1675 result->sids = NULL;
1677 /* and create (by appending rids) the 'domain' sids */
1679 for (i = 0; i < info3->num_groups2; i++) {
1680 DOM_SID sid;
1681 if (!sid_compose(&sid, &info3->dom_sid.sid,
1682 info3->gids[i].g_rid)) {
1683 DEBUG(3,("could not append additional group rid "
1684 "0x%x\n", info3->gids[i].g_rid));
1685 TALLOC_FREE(result);
1686 return NT_STATUS_INVALID_PARAMETER;
1688 add_sid_to_array(result, &sid, &result->sids,
1689 &result->num_sids);
1692 /* Copy 'other' sids. We need to do sid filtering here to
1693 prevent possible elevation of privileges. See:
1695 http://www.microsoft.com/windows2000/techinfo/administration/security/sidfilter.asp
1698 for (i = 0; i < info3->num_other_sids; i++) {
1699 add_sid_to_array(result, &info3->other_sids[i].sid,
1700 &result->sids,
1701 &result->num_sids);
1704 result->login_server = unistr2_tdup(result,
1705 &(info3->uni_logon_srv));
1707 /* ensure we are never given NULL session keys */
1709 if (memcmp(info3->user_sess_key, zeros, sizeof(zeros)) == 0) {
1710 result->user_session_key = data_blob(NULL, 0);
1711 } else {
1712 result->user_session_key = data_blob_talloc(
1713 result, info3->user_sess_key,
1714 sizeof(info3->user_sess_key));
1717 if (memcmp(info3->lm_sess_key, zeros, 8) == 0) {
1718 result->lm_session_key = data_blob(NULL, 0);
1719 } else {
1720 result->lm_session_key = data_blob_talloc(
1721 result, info3->lm_sess_key,
1722 sizeof(info3->lm_sess_key));
1725 *server_info = result;
1727 return NT_STATUS_OK;
1730 /***************************************************************************
1731 Free a user_info struct
1732 ***************************************************************************/
1734 void free_user_info(auth_usersupplied_info **user_info)
1736 DEBUG(5,("attempting to free (and zero) a user_info structure\n"));
1737 if (*user_info != NULL) {
1738 if ((*user_info)->smb_name) {
1739 DEBUG(10,("structure was created for %s\n",
1740 (*user_info)->smb_name));
1742 SAFE_FREE((*user_info)->smb_name);
1743 SAFE_FREE((*user_info)->internal_username);
1744 SAFE_FREE((*user_info)->client_domain);
1745 SAFE_FREE((*user_info)->domain);
1746 SAFE_FREE((*user_info)->wksta_name);
1747 data_blob_free(&(*user_info)->lm_resp);
1748 data_blob_free(&(*user_info)->nt_resp);
1749 data_blob_clear_free(&(*user_info)->lm_interactive_pwd);
1750 data_blob_clear_free(&(*user_info)->nt_interactive_pwd);
1751 data_blob_clear_free(&(*user_info)->plaintext_password);
1752 ZERO_STRUCT(**user_info);
1754 SAFE_FREE(*user_info);
1757 /***************************************************************************
1758 Make an auth_methods struct
1759 ***************************************************************************/
1761 BOOL make_auth_methods(struct auth_context *auth_context, auth_methods **auth_method)
1763 if (!auth_context) {
1764 smb_panic("no auth_context supplied to "
1765 "make_auth_methods()!\n");
1768 if (!auth_method) {
1769 smb_panic("make_auth_methods: pointer to auth_method pointer "
1770 "is NULL!\n");
1773 *auth_method = TALLOC_P(auth_context->mem_ctx, auth_methods);
1774 if (!*auth_method) {
1775 DEBUG(0,("make_auth_method: malloc failed!\n"));
1776 return False;
1778 ZERO_STRUCTP(*auth_method);
1780 return True;
1783 /****************************************************************************
1784 Duplicate a SID token.
1785 ****************************************************************************/
1787 NT_USER_TOKEN *dup_nt_token(TALLOC_CTX *mem_ctx, NT_USER_TOKEN *ptoken)
1789 NT_USER_TOKEN *token;
1791 if (!ptoken)
1792 return NULL;
1794 token = TALLOC_P(mem_ctx, NT_USER_TOKEN);
1795 if (token == NULL) {
1796 DEBUG(0, ("talloc failed\n"));
1797 return NULL;
1800 token->user_sids = talloc_memdup(token, ptoken->user_sids,
1801 sizeof(DOM_SID) * ptoken->num_sids );
1803 if ((ptoken->user_sids != NULL) && (token->user_sids == NULL)) {
1804 DEBUG(0, ("talloc_memdup failed\n"));
1805 TALLOC_FREE(token);
1806 return NULL;
1809 token->num_sids = ptoken->num_sids;
1811 /* copy the privileges; don't consider failure to be critical here */
1813 if ( !se_priv_copy( &token->privileges, &ptoken->privileges ) ) {
1814 DEBUG(0,("dup_nt_token: Failure to copy SE_PRIV!. "
1815 "Continuing with 0 privileges assigned.\n"));
1818 return token;
1821 /****************************************************************************
1822 Check for a SID in an NT_USER_TOKEN
1823 ****************************************************************************/
1825 BOOL nt_token_check_sid ( const DOM_SID *sid, const NT_USER_TOKEN *token )
1827 int i;
1829 if ( !sid || !token )
1830 return False;
1832 for ( i=0; i<token->num_sids; i++ ) {
1833 if ( sid_equal( sid, &token->user_sids[i] ) )
1834 return True;
1837 return False;
1840 BOOL nt_token_check_domain_rid( NT_USER_TOKEN *token, uint32 rid )
1842 DOM_SID domain_sid;
1844 /* if we are a domain member, the get the domain SID, else for
1845 a DC or standalone server, use our own SID */
1847 if ( lp_server_role() == ROLE_DOMAIN_MEMBER ) {
1848 if ( !secrets_fetch_domain_sid( lp_workgroup(),
1849 &domain_sid ) ) {
1850 DEBUG(1,("nt_token_check_domain_rid: Cannot lookup "
1851 "SID for domain [%s]\n", lp_workgroup()));
1852 return False;
1855 else
1856 sid_copy( &domain_sid, get_global_sam_sid() );
1858 sid_append_rid( &domain_sid, rid );
1860 return nt_token_check_sid( &domain_sid, token );\
1864 * Verify whether or not given domain is trusted.
1866 * @param domain_name name of the domain to be verified
1867 * @return true if domain is one of the trusted once or
1868 * false if otherwise
1871 BOOL is_trusted_domain(const char* dom_name)
1873 DOM_SID trustdom_sid;
1874 BOOL ret;
1876 /* no trusted domains for a standalone server */
1878 if ( lp_server_role() == ROLE_STANDALONE )
1879 return False;
1881 /* if we are a DC, then check for a direct trust relationships */
1883 if ( IS_DC ) {
1884 become_root();
1885 DEBUG (5,("is_trusted_domain: Checking for domain trust with "
1886 "[%s]\n", dom_name ));
1887 ret = secrets_fetch_trusted_domain_password(dom_name, NULL,
1888 NULL, NULL);
1889 unbecome_root();
1890 if (ret)
1891 return True;
1893 else {
1894 NSS_STATUS result;
1896 /* If winbind is around, ask it */
1898 result = wb_is_trusted_domain(dom_name);
1900 if (result == NSS_STATUS_SUCCESS) {
1901 return True;
1904 if (result == NSS_STATUS_NOTFOUND) {
1905 /* winbind could not find the domain */
1906 return False;
1909 /* The only other possible result is that winbind is not up
1910 and running. We need to update the trustdom_cache
1911 ourselves */
1913 update_trustdom_cache();
1916 /* now the trustdom cache should be available a DC could still
1917 * have a transitive trust so fall back to the cache of trusted
1918 * domains (like a domain member would use */
1920 if ( trustdom_cache_fetch(dom_name, &trustdom_sid) ) {
1921 return True;
1924 return False;