Suggest the user runs kinit if smbclient -k returns NT_STATUS_MORE_PROCESSING_REQUIRED.
[ira/wip.git] / source3 / passdb / passdb.c
1 /* 
2    Unix SMB/CIFS implementation.
3    Password and authentication handling
4    Copyright (C) Jeremy Allison                 1996-2001
5    Copyright (C) Luke Kenneth Casson Leighton   1996-1998
6    Copyright (C) Gerald (Jerry) Carter          2000-2001
7    Copyright (C) Andrew Bartlett                2001-2002
8    Copyright (C) Simo Sorce                     2003
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 2 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, write to the Free Software
22    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
23 */
24
25 #include "includes.h"
26
27 #undef DBGC_CLASS
28 #define DBGC_CLASS DBGC_PASSDB
29
30 /******************************************************************
31  get the default domain/netbios name to be used when 
32  testing authentication.  For example, if you connect
33  to a Windows member server using a bogus domain name, the
34  Windows box will map the BOGUS\user to DOMAIN\user.  A 
35  standalone box will map to WKS\user.
36 ******************************************************************/
37
38 const char *get_default_sam_name(void)
39 {
40         /* standalone servers can only use the local netbios name */
41         if ( lp_server_role() == ROLE_STANDALONE )
42                 return global_myname();
43
44         /* Windows domain members default to the DOMAIN
45            name when not specified */
46         return lp_workgroup();
47 }
48
49 /******************************************************************
50  get the default domain/netbios name to be used when dealing 
51  with our passdb list of accounts
52 ******************************************************************/
53
54 const char *get_global_sam_name(void) 
55 {
56         if ((lp_server_role() == ROLE_DOMAIN_PDC) || (lp_server_role() == ROLE_DOMAIN_BDC)) {
57                 return lp_workgroup();
58         }
59         return global_myname();
60 }
61
62 /************************************************************
63  Fill the SAM_ACCOUNT with default values.
64  ***********************************************************/
65
66 void pdb_fill_default_sam(SAM_ACCOUNT *user)
67 {
68         ZERO_STRUCT(user->private); /* Don't touch the talloc context */
69
70         /* no initial methods */
71         user->methods = NULL;
72
73         /* Don't change these timestamp settings without a good reason.
74            They are important for NT member server compatibility. */
75
76         user->private.logon_time            = (time_t)0;
77         user->private.pass_last_set_time    = (time_t)0;
78         user->private.pass_can_change_time  = (time_t)0;
79         user->private.logoff_time           = 
80         user->private.kickoff_time          = 
81         user->private.pass_must_change_time = get_time_t_max();
82         user->private.unknown_3 = 0x00ffffff;   /* don't know */
83         user->private.logon_divs = 168;         /* hours per week */
84         user->private.hours_len = 21;           /* 21 times 8 bits = 168 */
85         memset(user->private.hours, 0xff, user->private.hours_len); /* available at all hours */
86         user->private.unknown_5 = 0x00000000; /* don't know */
87         user->private.unknown_6 = 0x000004ec; /* don't know */
88
89         /* Some parts of samba strlen their pdb_get...() returns, 
90            so this keeps the interface unchanged for now. */
91            
92         user->private.username = "";
93         user->private.domain = "";
94         user->private.nt_username = "";
95         user->private.full_name = "";
96         user->private.home_dir = "";
97         user->private.logon_script = "";
98         user->private.profile_path = "";
99         user->private.acct_desc = "";
100         user->private.workstations = "";
101         user->private.unknown_str = "";
102         user->private.munged_dial = "";
103
104         user->private.plaintext_pw = NULL;
105
106 }       
107
108 static void destroy_pdb_talloc(SAM_ACCOUNT **user) 
109 {
110         if (*user) {
111                 data_blob_clear_free(&((*user)->private.lm_pw));
112                 data_blob_clear_free(&((*user)->private.nt_pw));
113
114                 if((*user)->private.plaintext_pw!=NULL)
115                         memset((*user)->private.plaintext_pw,'\0',strlen((*user)->private.plaintext_pw));
116                 talloc_destroy((*user)->mem_ctx);
117                 *user = NULL;
118         }
119 }
120
121
122 /**********************************************************************
123  Alloc memory and initialises a struct sam_passwd on supplied mem_ctx.
124 ***********************************************************************/
125
126 NTSTATUS pdb_init_sam_talloc(TALLOC_CTX *mem_ctx, SAM_ACCOUNT **user)
127 {
128         if (*user != NULL) {
129                 DEBUG(0,("pdb_init_sam_talloc: SAM_ACCOUNT was non NULL\n"));
130 #if 0
131                 smb_panic("non-NULL pointer passed to pdb_init_sam\n");
132 #endif
133                 return NT_STATUS_UNSUCCESSFUL;
134         }
135
136         if (!mem_ctx) {
137                 DEBUG(0,("pdb_init_sam_talloc: mem_ctx was NULL!\n"));
138                 return NT_STATUS_UNSUCCESSFUL;
139         }
140
141         *user=(SAM_ACCOUNT *)talloc(mem_ctx, sizeof(SAM_ACCOUNT));
142
143         if (*user==NULL) {
144                 DEBUG(0,("pdb_init_sam_talloc: error while allocating memory\n"));
145                 return NT_STATUS_NO_MEMORY;
146         }
147
148         (*user)->mem_ctx = mem_ctx;
149
150         (*user)->free_fn = NULL;
151
152         pdb_fill_default_sam(*user);
153         
154         return NT_STATUS_OK;
155 }
156
157
158 /*************************************************************
159  Alloc memory and initialises a struct sam_passwd.
160  ************************************************************/
161
162 NTSTATUS pdb_init_sam(SAM_ACCOUNT **user)
163 {
164         TALLOC_CTX *mem_ctx;
165         NTSTATUS nt_status;
166         
167         mem_ctx = talloc_init("passdb internal SAM_ACCOUNT allocation");
168
169         if (!mem_ctx) {
170                 DEBUG(0,("pdb_init_sam: error while doing talloc_init()\n"));
171                 return NT_STATUS_NO_MEMORY;
172         }
173
174         if (!NT_STATUS_IS_OK(nt_status = pdb_init_sam_talloc(mem_ctx, user))) {
175                 talloc_destroy(mem_ctx);
176                 return nt_status;
177         }
178         
179         (*user)->free_fn = destroy_pdb_talloc;
180
181         return NT_STATUS_OK;
182 }
183
184
185 /*************************************************************
186  Initialises a struct sam_passwd with sane values.
187  ************************************************************/
188
189 NTSTATUS pdb_fill_sam_pw(SAM_ACCOUNT *sam_account, const struct passwd *pwd)
190 {
191         NTSTATUS ret;
192
193         if (!pwd) {
194                 return NT_STATUS_UNSUCCESSFUL;
195         }
196
197         pdb_fill_default_sam(sam_account);
198
199         pdb_set_username(sam_account, pwd->pw_name, PDB_SET);
200         pdb_set_fullname(sam_account, pwd->pw_gecos, PDB_SET);
201
202         pdb_set_unix_homedir(sam_account, pwd->pw_dir, PDB_SET);
203
204         pdb_set_domain (sam_account, get_global_sam_name(), PDB_DEFAULT);
205         
206         /* When we get a proper uid -> SID and SID -> uid allocation
207            mechinism, we should call it here.  
208            
209            We can't just set this to 0 or allow it only to be filled
210            in when added to the backend, because the user's SID 
211            may already be in security descriptors etc.
212            
213            -- abartlet 11-May-02
214         */
215
216         ret = pdb_set_sam_sids(sam_account, pwd);
217         if (!NT_STATUS_IS_OK(ret)) return ret;
218
219         /* check if this is a user account or a machine account */
220         if (pwd->pw_name[strlen(pwd->pw_name)-1] != '$')
221         {
222                 pdb_set_profile_path(sam_account, 
223                                      talloc_sub_specified((sam_account)->mem_ctx, 
224                                                             lp_logon_path(), 
225                                                             pwd->pw_name, global_myname(), 
226                                                             pwd->pw_uid, pwd->pw_gid), 
227                                      PDB_DEFAULT);
228                 
229                 pdb_set_homedir(sam_account, 
230                                 talloc_sub_specified((sam_account)->mem_ctx, 
231                                                        lp_logon_home(),
232                                                        pwd->pw_name, global_myname(), 
233                                                        pwd->pw_uid, pwd->pw_gid),
234                                 PDB_DEFAULT);
235                 
236                 pdb_set_dir_drive(sam_account, 
237                                   talloc_sub_specified((sam_account)->mem_ctx, 
238                                                          lp_logon_drive(),
239                                                          pwd->pw_name, global_myname(), 
240                                                          pwd->pw_uid, pwd->pw_gid),
241                                   PDB_DEFAULT);
242                 
243                 pdb_set_logon_script(sam_account, 
244                                      talloc_sub_specified((sam_account)->mem_ctx, 
245                                                             lp_logon_script(),
246                                                             pwd->pw_name, global_myname(), 
247                                                             pwd->pw_uid, pwd->pw_gid), 
248                                      PDB_DEFAULT);
249                 if (!pdb_set_acct_ctrl(sam_account, ACB_NORMAL, PDB_DEFAULT)) {
250                         DEBUG(1, ("Failed to set 'normal account' flags for user %s.\n", pwd->pw_name));
251                         return NT_STATUS_UNSUCCESSFUL;
252                 }
253         } else {
254                 if (!pdb_set_acct_ctrl(sam_account, ACB_WSTRUST, PDB_DEFAULT)) {
255                         DEBUG(1, ("Failed to set 'trusted workstation account' flags for user %s.\n", pwd->pw_name));
256                         return NT_STATUS_UNSUCCESSFUL;
257                 }
258         }
259         return NT_STATUS_OK;
260 }
261
262
263 /*************************************************************
264  Initialises a struct sam_passwd with sane values.
265  ************************************************************/
266
267 NTSTATUS pdb_init_sam_pw(SAM_ACCOUNT **new_sam_acct, const struct passwd *pwd)
268 {
269         NTSTATUS nt_status;
270
271         if (!pwd) {
272                 new_sam_acct = NULL;
273                 return NT_STATUS_INVALID_PARAMETER;
274         }
275
276         if (!NT_STATUS_IS_OK(nt_status = pdb_init_sam(new_sam_acct))) {
277                 new_sam_acct = NULL;
278                 return nt_status;
279         }
280
281         if (!NT_STATUS_IS_OK(nt_status = pdb_fill_sam_pw(*new_sam_acct, pwd))) {
282                 pdb_free_sam(new_sam_acct);
283                 new_sam_acct = NULL;
284                 return nt_status;
285         }
286
287         return NT_STATUS_OK;
288 }
289
290
291 /*************************************************************
292  Initialises a SAM_ACCOUNT ready to add a new account, based
293  on the unix user if possible.
294  ************************************************************/
295
296 NTSTATUS pdb_init_sam_new(SAM_ACCOUNT **new_sam_acct, const char *username)
297 {
298         NTSTATUS nt_status = NT_STATUS_NO_MEMORY;
299
300         struct passwd *pwd;
301         
302         pwd = Get_Pwnam(username);
303
304         if (pwd) {
305                 if (!NT_STATUS_IS_OK(nt_status = pdb_init_sam_pw(new_sam_acct, pwd))) {
306                         *new_sam_acct = NULL;
307                         return nt_status;
308                 }
309         } else {
310                 DOM_SID g_sid;
311                 if (!NT_STATUS_IS_OK(nt_status = pdb_init_sam(new_sam_acct))) {
312                         *new_sam_acct = NULL;
313                         return nt_status;
314                 }
315                 if (!pdb_set_username(*new_sam_acct, username, PDB_SET)) {
316                         pdb_free_sam(new_sam_acct);
317                         return nt_status;
318                 }
319
320                 pdb_set_domain (*new_sam_acct, get_global_sam_name(), PDB_DEFAULT);
321
322                 /* set Domain Users by default ! */
323                 sid_copy(&g_sid, get_global_sam_sid());
324                 sid_append_rid(&g_sid, DOMAIN_GROUP_RID_USERS);
325                 pdb_set_group_sid(*new_sam_acct, &g_sid, PDB_SET);
326         }
327         return NT_STATUS_OK;
328 }
329
330
331 /**
332  * Free the contets of the SAM_ACCOUNT, but not the structure.
333  *
334  * Also wipes the LM and NT hashes and plaintext password from 
335  * memory.
336  *
337  * @param user SAM_ACCOUNT to free members of.
338  **/
339
340 static void pdb_free_sam_contents(SAM_ACCOUNT *user)
341 {
342
343         /* Kill off sensitive data.  Free()ed by the
344            talloc mechinism */
345
346         data_blob_clear_free(&(user->private.lm_pw));
347         data_blob_clear_free(&(user->private.nt_pw));
348         if (user->private.plaintext_pw!=NULL)
349                 memset(user->private.plaintext_pw,'\0',strlen(user->private.plaintext_pw));
350 }
351
352
353 /************************************************************
354  Reset the SAM_ACCOUNT and free the NT/LM hashes.
355  ***********************************************************/
356
357 NTSTATUS pdb_reset_sam(SAM_ACCOUNT *user)
358 {
359         if (user == NULL) {
360                 DEBUG(0,("pdb_reset_sam: SAM_ACCOUNT was NULL\n"));
361 #if 0
362                 smb_panic("NULL pointer passed to pdb_free_sam\n");
363 #endif
364                 return NT_STATUS_UNSUCCESSFUL;
365         }
366         
367         pdb_free_sam_contents(user);
368
369         pdb_fill_default_sam(user);
370
371         return NT_STATUS_OK;
372 }
373
374
375 /************************************************************
376  Free the SAM_ACCOUNT and the member pointers.
377  ***********************************************************/
378
379 NTSTATUS pdb_free_sam(SAM_ACCOUNT **user)
380 {
381         if (*user == NULL) {
382                 DEBUG(0,("pdb_free_sam: SAM_ACCOUNT was NULL\n"));
383 #if 0
384                 smb_panic("NULL pointer passed to pdb_free_sam\n");
385 #endif
386                 return NT_STATUS_UNSUCCESSFUL;
387         }
388
389         pdb_free_sam_contents(*user);
390         
391         if ((*user)->free_fn) {
392                 (*user)->free_fn(user);
393         }
394
395         return NT_STATUS_OK;    
396 }
397
398 /**************************************************************************
399  * This function will take care of all the steps needed to correctly
400  * allocate and set the user SID, please do use this function to create new
401  * users, messing with SIDs is not good.
402  *
403  * account_data must be provided initialized, pwd may be null.
404  *                                                                      SSS
405  ***************************************************************************/
406
407 NTSTATUS pdb_set_sam_sids(SAM_ACCOUNT *account_data, const struct passwd *pwd)
408 {
409         const char *guest_account = lp_guestaccount();
410         GROUP_MAP map;
411         
412         if (!account_data || !pwd) {
413                 return NT_STATUS_INVALID_PARAMETER;
414         }
415
416         /* this is a hack this thing should not be set
417            this way --SSS */
418         if (!(guest_account && *guest_account)) {
419                 DEBUG(1, ("NULL guest account!?!?\n"));
420                 return NT_STATUS_UNSUCCESSFUL;
421         } else {
422                 /* Ensure this *must* be set right */
423                 if (strcmp(pwd->pw_name, guest_account) == 0) {
424                         if (!pdb_set_user_sid_from_rid(account_data, DOMAIN_USER_RID_GUEST, PDB_DEFAULT)) {
425                                 return NT_STATUS_UNSUCCESSFUL;
426                         }
427                         if (!pdb_set_group_sid_from_rid(account_data, DOMAIN_GROUP_RID_GUESTS, PDB_DEFAULT)) {
428                                 return NT_STATUS_UNSUCCESSFUL;
429                         }
430                         return NT_STATUS_OK;
431                 }
432         }
433
434         if (!pdb_set_user_sid_from_rid(account_data, fallback_pdb_uid_to_user_rid(pwd->pw_uid), PDB_SET)) {
435                 DEBUG(0,("Can't set User SID from RID!\n"));
436                 return NT_STATUS_INVALID_PARAMETER;
437         }
438         
439         /* call the mapping code here */
440         if(pdb_getgrgid(&map, pwd->pw_gid)) {
441                 if (!pdb_set_group_sid(account_data, &map.sid, PDB_SET)){
442                         DEBUG(0,("Can't set Group SID!\n"));
443                         return NT_STATUS_INVALID_PARAMETER;
444                 }
445         } 
446         else {
447                 if (!pdb_set_group_sid_from_rid(account_data, pdb_gid_to_group_rid(pwd->pw_gid), PDB_SET)) {
448                         DEBUG(0,("Can't set Group SID\n"));
449                         return NT_STATUS_INVALID_PARAMETER;
450                 }
451         }
452
453         return NT_STATUS_OK;
454 }
455
456 /**********************************************************
457  Encode the account control bits into a string.
458  length = length of string to encode into (including terminating
459  null). length *MUST BE MORE THAN 2* !
460  **********************************************************/
461
462 char *pdb_encode_acct_ctrl(uint16 acct_ctrl, size_t length)
463 {
464         static fstring acct_str;
465         size_t i = 0;
466
467         acct_str[i++] = '[';
468
469         if (acct_ctrl & ACB_PWNOTREQ ) acct_str[i++] = 'N';
470         if (acct_ctrl & ACB_DISABLED ) acct_str[i++] = 'D';
471         if (acct_ctrl & ACB_HOMDIRREQ) acct_str[i++] = 'H';
472         if (acct_ctrl & ACB_TEMPDUP  ) acct_str[i++] = 'T'; 
473         if (acct_ctrl & ACB_NORMAL   ) acct_str[i++] = 'U';
474         if (acct_ctrl & ACB_MNS      ) acct_str[i++] = 'M';
475         if (acct_ctrl & ACB_WSTRUST  ) acct_str[i++] = 'W';
476         if (acct_ctrl & ACB_SVRTRUST ) acct_str[i++] = 'S';
477         if (acct_ctrl & ACB_AUTOLOCK ) acct_str[i++] = 'L';
478         if (acct_ctrl & ACB_PWNOEXP  ) acct_str[i++] = 'X';
479         if (acct_ctrl & ACB_DOMTRUST ) acct_str[i++] = 'I';
480
481         for ( ; i < length - 2 ; i++ )
482                 acct_str[i] = ' ';
483
484         i = length - 2;
485         acct_str[i++] = ']';
486         acct_str[i++] = '\0';
487
488         return acct_str;
489 }     
490
491 /**********************************************************
492  Decode the account control bits from a string.
493  **********************************************************/
494
495 uint16 pdb_decode_acct_ctrl(const char *p)
496 {
497         uint16 acct_ctrl = 0;
498         BOOL finished = False;
499
500         /*
501          * Check if the account type bits have been encoded after the
502          * NT password (in the form [NDHTUWSLXI]).
503          */
504
505         if (*p != '[')
506                 return 0;
507
508         for (p++; *p && !finished; p++) {
509                 switch (*p) {
510                         case 'N': { acct_ctrl |= ACB_PWNOTREQ ; break; /* 'N'o password. */ }
511                         case 'D': { acct_ctrl |= ACB_DISABLED ; break; /* 'D'isabled. */ }
512                         case 'H': { acct_ctrl |= ACB_HOMDIRREQ; break; /* 'H'omedir required. */ }
513                         case 'T': { acct_ctrl |= ACB_TEMPDUP  ; break; /* 'T'emp account. */ } 
514                         case 'U': { acct_ctrl |= ACB_NORMAL   ; break; /* 'U'ser account (normal). */ } 
515                         case 'M': { acct_ctrl |= ACB_MNS      ; break; /* 'M'NS logon user account. What is this ? */ } 
516                         case 'W': { acct_ctrl |= ACB_WSTRUST  ; break; /* 'W'orkstation account. */ } 
517                         case 'S': { acct_ctrl |= ACB_SVRTRUST ; break; /* 'S'erver account. */ } 
518                         case 'L': { acct_ctrl |= ACB_AUTOLOCK ; break; /* 'L'ocked account. */ } 
519                         case 'X': { acct_ctrl |= ACB_PWNOEXP  ; break; /* No 'X'piry on password */ } 
520                         case 'I': { acct_ctrl |= ACB_DOMTRUST ; break; /* 'I'nterdomain trust account. */ }
521             case ' ': { break; }
522                         case ':':
523                         case '\n':
524                         case '\0': 
525                         case ']':
526                         default:  { finished = True; }
527                 }
528         }
529
530         return acct_ctrl;
531 }
532
533 /*************************************************************
534  Routine to set 32 hex password characters from a 16 byte array.
535 **************************************************************/
536
537 void pdb_sethexpwd(char *p, const unsigned char *pwd, uint16 acct_ctrl)
538 {
539         if (pwd != NULL) {
540                 int i;
541                 for (i = 0; i < 16; i++)
542                         slprintf(&p[i*2], 3, "%02X", pwd[i]);
543         } else {
544                 if (acct_ctrl & ACB_PWNOTREQ)
545                         safe_strcpy(p, "NO PASSWORDXXXXXXXXXXXXXXXXXXXXX", 33);
546                 else
547                         safe_strcpy(p, "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX", 33);
548         }
549 }
550
551 /*************************************************************
552  Routine to get the 32 hex characters and turn them
553  into a 16 byte array.
554 **************************************************************/
555
556 BOOL pdb_gethexpwd(const char *p, unsigned char *pwd)
557 {
558         int i;
559         unsigned char   lonybble, hinybble;
560         const char      *hexchars = "0123456789ABCDEF";
561         char           *p1, *p2;
562         
563         if (!p)
564                 return (False);
565         
566         for (i = 0; i < 32; i += 2) {
567                 hinybble = toupper(p[i]);
568                 lonybble = toupper(p[i + 1]);
569
570                 p1 = strchr(hexchars, hinybble);
571                 p2 = strchr(hexchars, lonybble);
572
573                 if (!p1 || !p2)
574                         return (False);
575
576                 hinybble = PTR_DIFF(p1, hexchars);
577                 lonybble = PTR_DIFF(p2, hexchars);
578
579                 pwd[i / 2] = (hinybble << 4) | lonybble;
580         }
581         return (True);
582 }
583
584 static int algorithmic_rid_base(void)
585 {
586         static int rid_offset = 0;
587
588         if (rid_offset != 0)
589                 return rid_offset;
590
591         rid_offset = lp_algorithmic_rid_base();
592
593         if (rid_offset < BASE_RID) {  
594                 /* Try to prevent admin foot-shooting, we can't put algorithmic
595                    rids below 1000, that's the 'well known RIDs' on NT */
596                 DEBUG(0, ("'algorithmic rid base' must be equal to or above %ld\n", BASE_RID));
597                 rid_offset = BASE_RID;
598         }
599         if (rid_offset & 1) {
600                 DEBUG(0, ("algorithmic rid base must be even\n"));
601                 rid_offset += 1;
602         }
603         return rid_offset;
604 }
605
606 /*******************************************************************
607  Converts NT user RID to a UNIX uid.
608  ********************************************************************/
609
610 uid_t fallback_pdb_user_rid_to_uid(uint32 user_rid)
611 {
612         int rid_offset = algorithmic_rid_base();
613         return (uid_t)(((user_rid & (~USER_RID_TYPE)) - rid_offset)/RID_MULTIPLIER);
614 }
615
616 /*******************************************************************
617  converts UNIX uid to an NT User RID.
618  ********************************************************************/
619
620 uint32 fallback_pdb_uid_to_user_rid(uid_t uid)
621 {
622         int rid_offset = algorithmic_rid_base();
623         return (((((uint32)uid)*RID_MULTIPLIER) + rid_offset) | USER_RID_TYPE);
624 }
625
626 /*******************************************************************
627  Converts NT group RID to a UNIX gid.
628  ********************************************************************/
629
630 gid_t pdb_group_rid_to_gid(uint32 group_rid)
631 {
632         int rid_offset = algorithmic_rid_base();
633         return (gid_t)(((group_rid & (~GROUP_RID_TYPE))- rid_offset)/RID_MULTIPLIER);
634 }
635
636 /*******************************************************************
637  converts NT Group RID to a UNIX uid.
638  
639  warning: you must not call that function only
640  you must do a call to the group mapping first.
641  there is not anymore a direct link between the gid and the rid.
642  ********************************************************************/
643
644 uint32 pdb_gid_to_group_rid(gid_t gid)
645 {
646         int rid_offset = algorithmic_rid_base();
647         return (((((uint32)gid)*RID_MULTIPLIER) + rid_offset) | GROUP_RID_TYPE);
648 }
649
650 /*******************************************************************
651  Decides if a RID is a well known RID.
652  ********************************************************************/
653
654 static BOOL pdb_rid_is_well_known(uint32 rid)
655 {
656         /* Not using rid_offset here, because this is the actual
657            NT fixed value (1000) */
658
659         return (rid < BASE_RID);
660 }
661
662 /*******************************************************************
663  Decides if a RID is a user or group RID.
664  ********************************************************************/
665
666 BOOL fallback_pdb_rid_is_user(uint32 rid)
667 {
668   /* lkcl i understand that NT attaches an enumeration to a RID
669    * such that it can be identified as either a user, group etc
670    * type.  there are 5 such categories, and they are documented.
671    */
672         /* However, they are not in the RID, just somthing you can query
673            seperatly.  Sorry luke :-) */
674
675    if(pdb_rid_is_well_known(rid)) {
676       /*
677        * The only well known user RIDs are DOMAIN_USER_RID_ADMIN
678        * and DOMAIN_USER_RID_GUEST.
679        */
680      if(rid == DOMAIN_USER_RID_ADMIN || rid == DOMAIN_USER_RID_GUEST)
681        return True;
682    } else if((rid & RID_TYPE_MASK) == USER_RID_TYPE) {
683      return True;
684    }
685    return False;
686 }
687
688 /*******************************************************************
689  Convert a rid into a name. Used in the lookup SID rpc.
690  ********************************************************************/
691
692 BOOL local_lookup_sid(DOM_SID *sid, char *name, enum SID_NAME_USE *psid_name_use)
693 {
694         uint32 rid;
695         SAM_ACCOUNT *sam_account = NULL;
696         GROUP_MAP map;
697
698         if (!sid_peek_check_rid(get_global_sam_sid(), sid, &rid)){
699                 DEBUG(0,("local_lookup_sid: sid_peek_check_rid return False! SID: %s\n",
700                         sid_string_static(&map.sid)));
701                 return False;
702         }       
703         *psid_name_use = SID_NAME_UNKNOWN;
704         
705         DEBUG(5,("local_lookup_sid: looking up RID %u.\n", (unsigned int)rid));
706         
707         if (rid == DOMAIN_USER_RID_ADMIN) {
708                 const char **admin_list = lp_admin_users(-1);
709                 *psid_name_use = SID_NAME_USER;
710                 if (admin_list) {
711                         const char *p = *admin_list;
712                         if(!next_token(&p, name, NULL, sizeof(fstring)))
713                                 fstrcpy(name, "Administrator");
714                 } else {
715                         fstrcpy(name, "Administrator");
716                 }
717                 return True;
718         }
719
720         /*
721          * Don't try to convert the rid to a name if 
722          * running in appliance mode
723          */
724
725         if (lp_hide_local_users())
726                 return False;
727                 
728         if (!NT_STATUS_IS_OK(pdb_init_sam(&sam_account))) {
729                 return False;
730         }
731         
732         /* see if the passdb can help us with the name of the user */
733         if (pdb_getsampwsid(sam_account, sid)) {
734                 fstrcpy(name, pdb_get_username(sam_account));
735                 *psid_name_use = SID_NAME_USER;
736
737                 pdb_free_sam(&sam_account);
738                         
739                 return True;
740         }
741
742         pdb_free_sam(&sam_account);
743                 
744         if (pdb_getgrsid(&map, *sid)) {
745                 if (map.gid!=(gid_t)-1) {
746                         DEBUG(5,("local_lookup_sid: mapped group %s to gid %u\n", map.nt_name, (unsigned int)map.gid));
747                 } else {
748                         DEBUG(5,("local_lookup_sid: mapped group %s to no unix gid.  Returning name.\n", map.nt_name));
749                 }
750
751                 fstrcpy(name, map.nt_name);
752                 *psid_name_use = map.sid_name_use;
753                 return True;
754         }
755
756         if (fallback_pdb_rid_is_user(rid)) {
757                 uid_t uid;
758
759                 DEBUG(5, ("assuming RID %u is a user\n", (unsigned)rid));
760
761                 uid = fallback_pdb_user_rid_to_uid(rid);
762                 slprintf(name, sizeof(fstring)-1, "unix_user.%u", (unsigned int)uid);   
763
764                 return False;  /* Indicates that this user was 'not mapped' */
765         } else {
766                 gid_t gid;
767                 struct group *gr; 
768                         
769                 DEBUG(5, ("assuming RID %u is a group\n", (unsigned)rid));
770
771                 gid = pdb_group_rid_to_gid(rid);
772                 gr = getgrgid(gid);
773                         
774                 *psid_name_use = SID_NAME_ALIAS;
775                         
776                 DEBUG(5,("local_lookup_sid: looking up gid %u %s\n", (unsigned int)gid,
777                          gr ? "succeeded" : "failed" ));
778                         
779                 if(!gr) {
780                         slprintf(name, sizeof(fstring)-1, "unix_group.%u", (unsigned int)gid);
781                         return False; /* Indicates that this group was 'not mapped' */
782                 }
783                         
784                 fstrcpy( name, gr->gr_name);
785                         
786                 DEBUG(5,("local_lookup_sid: found group %s for rid %u\n", name,
787                          (unsigned int)rid ));
788                 return True;   
789         }
790 }
791
792 /*******************************************************************
793  Convert a name into a SID. Used in the lookup name rpc.
794  ********************************************************************/
795
796 BOOL local_lookup_name(const char *c_user, DOM_SID *psid, enum SID_NAME_USE *psid_name_use)
797 {
798         extern DOM_SID global_sid_World_Domain;
799         DOM_SID local_sid;
800         fstring user;
801         SAM_ACCOUNT *sam_account = NULL;
802         struct group *grp;
803         GROUP_MAP map;
804                 
805         *psid_name_use = SID_NAME_UNKNOWN;
806
807         /*
808          * user may be quoted a const string, and map_username and
809          * friends can modify it. Make a modifiable copy. JRA.
810          */
811
812         fstrcpy(user, c_user);
813
814         sid_copy(&local_sid, get_global_sam_sid());
815
816         /*
817          * Special case for MACHINE\Everyone. Map to the world_sid.
818          */
819
820         if(strequal(user, "Everyone")) {
821                 sid_copy( psid, &global_sid_World_Domain);
822                 sid_append_rid(psid, 0);
823                 *psid_name_use = SID_NAME_ALIAS;
824                 return True;
825         }
826
827         /* 
828          * Don't lookup local unix users if running in appliance mode
829          */
830         if (lp_hide_local_users()) 
831                 return False;
832
833         (void)map_username(user);
834
835         if (!NT_STATUS_IS_OK(pdb_init_sam(&sam_account))) {
836                 return False;
837         }
838         
839         if (pdb_getsampwnam(sam_account, user)) {
840                 sid_copy(psid, pdb_get_user_sid(sam_account));
841                 *psid_name_use = SID_NAME_USER;
842                 
843                 pdb_free_sam(&sam_account);
844                 return True;
845         }
846
847         pdb_free_sam(&sam_account);
848
849         /*
850          * Maybe it was a group ?
851          */
852
853         /* check if it's a mapped group */
854         if (pdb_getgrnam(&map, user)) {
855                 /* yes it's a mapped group */
856                 sid_copy(&local_sid, &map.sid);
857                 *psid_name_use = map.sid_name_use;
858         } else {
859                 /* it's not a mapped group */
860                 grp = getgrnam(user);
861                 if(!grp)
862                         return False;
863                 
864                 /* 
865                  *check if it's mapped, if it is reply it doesn't exist
866                  *
867                  * that's to prevent this case:
868                  *
869                  * unix group ug is mapped to nt group ng
870                  * someone does a lookup on ug
871                  * we must not reply as it doesn't "exist" anymore
872                  * for NT. For NT only ng exists.
873                  * JFM, 30/11/2001
874                  */
875                 
876                 if (pdb_getgrgid(&map, grp->gr_gid)){
877                         return False;
878                 }
879                 
880                 sid_append_rid( &local_sid, pdb_gid_to_group_rid(grp->gr_gid));
881                 *psid_name_use = SID_NAME_ALIAS;
882         }
883
884         sid_copy( psid, &local_sid);
885
886         return True;
887 }
888
889 /*************************************************************
890  Change a password entry in the local smbpasswd file.
891
892 It is currently being called by SWAT and by smbpasswd.
893  
894  --jerry
895  *************************************************************/
896
897 BOOL local_password_change(const char *user_name, int local_flags,
898                            const char *new_passwd, 
899                            char *err_str, size_t err_str_len,
900                            char *msg_str, size_t msg_str_len)
901 {
902         SAM_ACCOUNT     *sam_pass=NULL;
903         uint16 other_acb;
904
905         *err_str = '\0';
906         *msg_str = '\0';
907
908         /* Get the smb passwd entry for this user */
909         pdb_init_sam(&sam_pass);
910         if(!pdb_getsampwnam(sam_pass, user_name)) {
911                 pdb_free_sam(&sam_pass);
912                 
913                 if ((local_flags & LOCAL_ADD_USER) || (local_flags & LOCAL_DELETE_USER)) {
914                         /* Might not exist in /etc/passwd */
915                         if (!NT_STATUS_IS_OK(pdb_init_sam_new(&sam_pass, user_name))) {
916                                 slprintf(err_str, err_str_len-1, "Failed initialise SAM_ACCOUNT for user %s.\n", user_name);
917                                 return False;
918                         }
919                 } else {
920                         slprintf(err_str, err_str_len-1,"Failed to find entry for user %s.\n", user_name);
921                         return False;
922                 }
923         } else {
924                 /* the entry already existed */
925                 local_flags &= ~LOCAL_ADD_USER;
926         }
927
928         /* the 'other' acb bits not being changed here */
929         other_acb =  (pdb_get_acct_ctrl(sam_pass) & (!(ACB_WSTRUST|ACB_DOMTRUST|ACB_SVRTRUST|ACB_NORMAL)));
930         if (local_flags & LOCAL_TRUST_ACCOUNT) {
931                 if (!pdb_set_acct_ctrl(sam_pass, ACB_WSTRUST | other_acb, PDB_CHANGED) ) {
932                         slprintf(err_str, err_str_len - 1, "Failed to set 'trusted workstation account' flags for user %s.\n", user_name);
933                         pdb_free_sam(&sam_pass);
934                         return False;
935                 }
936         } else if (local_flags & LOCAL_INTERDOM_ACCOUNT) {
937                 if (!pdb_set_acct_ctrl(sam_pass, ACB_DOMTRUST | other_acb, PDB_CHANGED)) {
938                         slprintf(err_str, err_str_len - 1, "Failed to set 'domain trust account' flags for user %s.\n", user_name);
939                         pdb_free_sam(&sam_pass);
940                         return False;
941                 }
942         } else {
943                 if (!pdb_set_acct_ctrl(sam_pass, ACB_NORMAL | other_acb, PDB_CHANGED)) {
944                         slprintf(err_str, err_str_len - 1, "Failed to set 'normal account' flags for user %s.\n", user_name);
945                         pdb_free_sam(&sam_pass);
946                         return False;
947                 }
948         }
949
950         /*
951          * We are root - just write the new password
952          * and the valid last change time.
953          */
954
955         if (local_flags & LOCAL_DISABLE_USER) {
956                 if (!pdb_set_acct_ctrl (sam_pass, pdb_get_acct_ctrl(sam_pass)|ACB_DISABLED, PDB_CHANGED)) {
957                         slprintf(err_str, err_str_len-1, "Failed to set 'disabled' flag for user %s.\n", user_name);
958                         pdb_free_sam(&sam_pass);
959                         return False;
960                 }
961         } else if (local_flags & LOCAL_ENABLE_USER) {
962                 if (!pdb_set_acct_ctrl (sam_pass, pdb_get_acct_ctrl(sam_pass)&(~ACB_DISABLED), PDB_CHANGED)) {
963                         slprintf(err_str, err_str_len-1, "Failed to unset 'disabled' flag for user %s.\n", user_name);
964                         pdb_free_sam(&sam_pass);
965                         return False;
966                 }
967         }
968         
969         if (local_flags & LOCAL_SET_NO_PASSWORD) {
970                 if (!pdb_set_acct_ctrl (sam_pass, pdb_get_acct_ctrl(sam_pass)|ACB_PWNOTREQ, PDB_CHANGED)) {
971                         slprintf(err_str, err_str_len-1, "Failed to set 'no password required' flag for user %s.\n", user_name);
972                         pdb_free_sam(&sam_pass);
973                         return False;
974                 }
975         } else if (local_flags & LOCAL_SET_PASSWORD) {
976                 /*
977                  * If we're dealing with setting a completely empty user account
978                  * ie. One with a password of 'XXXX', but not set disabled (like
979                  * an account created from scratch) then if the old password was
980                  * 'XX's then getsmbpwent will have set the ACB_DISABLED flag.
981                  * We remove that as we're giving this user their first password
982                  * and the decision hasn't really been made to disable them (ie.
983                  * don't create them disabled). JRA.
984                  */
985                 if ((pdb_get_lanman_passwd(sam_pass)==NULL) && (pdb_get_acct_ctrl(sam_pass)&ACB_DISABLED)) {
986                         if (!pdb_set_acct_ctrl (sam_pass, pdb_get_acct_ctrl(sam_pass)&(~ACB_DISABLED), PDB_CHANGED)) {
987                                 slprintf(err_str, err_str_len-1, "Failed to unset 'disabled' flag for user %s.\n", user_name);
988                                 pdb_free_sam(&sam_pass);
989                                 return False;
990                         }
991                 }
992                 if (!pdb_set_acct_ctrl (sam_pass, pdb_get_acct_ctrl(sam_pass)&(~ACB_PWNOTREQ), PDB_CHANGED)) {
993                         slprintf(err_str, err_str_len-1, "Failed to unset 'no password required' flag for user %s.\n", user_name);
994                         pdb_free_sam(&sam_pass);
995                         return False;
996                 }
997                 
998                 if (!pdb_set_plaintext_passwd (sam_pass, new_passwd)) {
999                         slprintf(err_str, err_str_len-1, "Failed to set password for user %s.\n", user_name);
1000                         pdb_free_sam(&sam_pass);
1001                         return False;
1002                 }
1003         }       
1004
1005         if (local_flags & LOCAL_ADD_USER) {
1006                 if (pdb_add_sam_account(sam_pass)) {
1007                         slprintf(msg_str, msg_str_len-1, "Added user %s.\n", user_name);
1008                         pdb_free_sam(&sam_pass);
1009                         return True;
1010                 } else {
1011                         slprintf(err_str, err_str_len-1, "Failed to add entry for user %s.\n", user_name);
1012                         pdb_free_sam(&sam_pass);
1013                         return False;
1014                 }
1015         } else if (local_flags & LOCAL_DELETE_USER) {
1016                 if (!pdb_delete_sam_account(sam_pass)) {
1017                         slprintf(err_str,err_str_len-1, "Failed to delete entry for user %s.\n", user_name);
1018                         pdb_free_sam(&sam_pass);
1019                         return False;
1020                 }
1021                 slprintf(msg_str, msg_str_len-1, "Deleted user %s.\n", user_name);
1022         } else {
1023                 if(!pdb_update_sam_account(sam_pass)) {
1024                         slprintf(err_str, err_str_len-1, "Failed to modify entry for user %s.\n", user_name);
1025                         pdb_free_sam(&sam_pass);
1026                         return False;
1027                 }
1028                 if(local_flags & LOCAL_DISABLE_USER)
1029                         slprintf(msg_str, msg_str_len-1, "Disabled user %s.\n", user_name);
1030                 else if (local_flags & LOCAL_ENABLE_USER)
1031                         slprintf(msg_str, msg_str_len-1, "Enabled user %s.\n", user_name);
1032                 else if (local_flags & LOCAL_SET_NO_PASSWORD)
1033                         slprintf(msg_str, msg_str_len-1, "User %s password set to none.\n", user_name);
1034         }
1035
1036         pdb_free_sam(&sam_pass);
1037         return True;
1038 }