r13212: r12414@cabra: derrell | 2006-01-28 17:52:17 -0500
[vlendec/samba-autobuild/.git] / source3 / utils / smbpasswd.c
1 /*
2  * Unix SMB/CIFS implementation. 
3  * Copyright (C) Jeremy Allison 1995-1998
4  * Copyright (C) Tim Potter     2001
5  * 
6  * This program is free software; you can redistribute it and/or modify it
7  * under the terms of the GNU General Public License as published by the
8  * Free Software Foundation; either version 2 of the License, or (at your
9  * option) any later version.
10  * 
11  * This program is distributed in the hope that it will be useful, but WITHOUT
12  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
13  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
14  * more details.
15  * 
16  * You should have received a copy of the GNU General Public License along with
17  * this program; if not, write to the Free Software Foundation, Inc., 675
18  * Mass Ave, Cambridge, MA 02139, USA.  */
19
20 #include "includes.h"
21
22 extern BOOL AllowDebugChange;
23
24 /*
25  * Next two lines needed for SunOS and don't
26  * hurt anything else...
27  */
28 extern char *optarg;
29 extern int optind;
30
31 /* forced running in root-mode */
32 static BOOL got_username = False;
33 static BOOL stdin_passwd_get = False;
34 static fstring user_name;
35 static char *new_passwd = NULL;
36 static const char *remote_machine = NULL;
37
38 static fstring ldap_secret;
39
40
41 /*********************************************************
42  Print command usage on stderr and die.
43 **********************************************************/
44 static void usage(void)
45 {
46         printf("When run by root:\n");
47         printf("    smbpasswd [options] [username]\n");
48         printf("otherwise:\n");
49         printf("    smbpasswd [options]\n\n");
50
51         printf("options:\n");
52         printf("  -L                   local mode (must be first option)\n");
53         printf("  -h                   print this usage message\n");
54         printf("  -s                   use stdin for password prompt\n");
55         printf("  -c smb.conf file     Use the given path to the smb.conf file\n");
56         printf("  -D LEVEL             debug level\n");
57         printf("  -r MACHINE           remote machine\n");
58         printf("  -U USER              remote username\n");
59
60         printf("extra options when run by root or in local mode:\n");
61         printf("  -a                   add user\n");
62         printf("  -d                   disable user\n");
63         printf("  -e                   enable user\n");
64         printf("  -i                   interdomain trust account\n");
65         printf("  -m                   machine trust account\n");
66         printf("  -n                   set no password\n");
67         printf("  -w PASSWORD          ldap admin password\n");
68         printf("  -x                   delete user\n");
69         printf("  -R ORDER             name resolve order\n");
70
71         exit(1);
72 }
73
74 static void set_line_buffering(FILE *f)
75 {
76         setvbuf(f, NULL, _IOLBF, 0);
77 }
78
79 /*******************************************************************
80  Process command line options
81  ******************************************************************/
82
83 static int process_options(int argc, char **argv, int local_flags)
84 {
85         int ch;
86         pstring configfile;
87         pstrcpy(configfile, dyn_CONFIGFILE);
88
89         local_flags |= LOCAL_SET_PASSWORD;
90
91         ZERO_STRUCT(user_name);
92
93         user_name[0] = '\0';
94
95         while ((ch = getopt(argc, argv, "c:axdehminjr:sw:R:D:U:LW")) != EOF) {
96                 switch(ch) {
97                 case 'L':
98                         local_flags |= LOCAL_AM_ROOT;
99                         break;
100                 case 'c':
101                         pstrcpy(configfile,optarg);
102                         break;
103                 case 'a':
104                         local_flags |= LOCAL_ADD_USER;
105                         break;
106                 case 'x':
107                         local_flags |= LOCAL_DELETE_USER;
108                         local_flags &= ~LOCAL_SET_PASSWORD;
109                         break;
110                 case 'd':
111                         local_flags |= LOCAL_DISABLE_USER;
112                         local_flags &= ~LOCAL_SET_PASSWORD;
113                         break;
114                 case 'e':
115                         local_flags |= LOCAL_ENABLE_USER;
116                         local_flags &= ~LOCAL_SET_PASSWORD;
117                         break;
118                 case 'm':
119                         local_flags |= LOCAL_TRUST_ACCOUNT;
120                         break;
121                 case 'i':
122                         local_flags |= LOCAL_INTERDOM_ACCOUNT;
123                         break;
124                 case 'j':
125                         d_printf("See 'net join' for this functionality\n");
126                         exit(1);
127                         break;
128                 case 'n':
129                         local_flags |= LOCAL_SET_NO_PASSWORD;
130                         local_flags &= ~LOCAL_SET_PASSWORD;
131                         new_passwd = smb_xstrdup("NO PASSWORD");
132                         break;
133                 case 'r':
134                         remote_machine = optarg;
135                         break;
136                 case 's':
137                         set_line_buffering(stdin);
138                         set_line_buffering(stdout);
139                         set_line_buffering(stderr);
140                         stdin_passwd_get = True;
141                         break;
142                 case 'w':
143                         local_flags |= LOCAL_SET_LDAP_ADMIN_PW;
144                         fstrcpy(ldap_secret, optarg);
145                         break;
146                 case 'R':
147                         lp_set_name_resolve_order(optarg);
148                         break;
149                 case 'D':
150                         DEBUGLEVEL = atoi(optarg);
151                         break;
152                 case 'U': {
153                         got_username = True;
154                         fstrcpy(user_name, optarg);
155                         break;
156                 case 'W':
157                         local_flags |= LOCAL_SET_LDAP_ADMIN_PW;
158                         *ldap_secret = '\0';
159                         break;
160                 }
161                 case 'h':
162                 default:
163                         usage();
164                 }
165         }
166         
167         argc -= optind;
168         argv += optind;
169
170         switch(argc) {
171         case 0:
172                 if (!got_username)
173                         fstrcpy(user_name, "");
174                 break;
175         case 1:
176                 if (!(local_flags & LOCAL_AM_ROOT)) {
177                         usage();
178                 } else {
179                         if (got_username) {
180                                 usage();
181                         } else {
182                                 fstrcpy(user_name, argv[0]);
183                         }
184                 }
185                 break;
186         default:
187                 usage();
188         }
189
190         if (!lp_load(configfile,True,False,False,True)) {
191                 fprintf(stderr, "Can't load %s - run testparm to debug it\n", 
192                         dyn_CONFIGFILE);
193                 exit(1);
194         }
195
196         return local_flags;
197 }
198
199 /*************************************************************
200  Utility function to prompt for passwords from stdin. Each
201  password entered must end with a newline.
202 *************************************************************/
203 static char *stdin_new_passwd(void)
204 {
205         static fstring new_pw;
206         size_t len;
207
208         ZERO_ARRAY(new_pw);
209
210         /*
211          * if no error is reported from fgets() and string at least contains
212          * the newline that ends the password, then replace the newline with
213          * a null terminator.
214          */
215         if ( fgets(new_pw, sizeof(new_pw), stdin) != NULL) {
216                 if ((len = strlen(new_pw)) > 0) {
217                         if(new_pw[len-1] == '\n')
218                                 new_pw[len - 1] = 0; 
219                 }
220         }
221         return(new_pw);
222 }
223
224
225 /*************************************************************
226  Utility function to get passwords via tty or stdin
227  Used if the '-s' option is set to silently get passwords
228  to enable scripting.
229 *************************************************************/
230 static char *get_pass( const char *prompt, BOOL stdin_get)
231 {
232         char *p;
233         if (stdin_get) {
234                 p = stdin_new_passwd();
235         } else {
236                 p = getpass(prompt);
237         }
238         return smb_xstrdup(p);
239 }
240
241 /*************************************************************
242  Utility function to prompt for new password.
243 *************************************************************/
244 static char *prompt_for_new_password(BOOL stdin_get)
245 {
246         char *p;
247         fstring new_pw;
248
249         ZERO_ARRAY(new_pw);
250  
251         p = get_pass("New SMB password:", stdin_get);
252
253         fstrcpy(new_pw, p);
254         SAFE_FREE(p);
255
256         p = get_pass("Retype new SMB password:", stdin_get);
257
258         if (strcmp(p, new_pw)) {
259                 fprintf(stderr, "Mismatch - password unchanged.\n");
260                 ZERO_ARRAY(new_pw);
261                 SAFE_FREE(p);
262                 return NULL;
263         }
264
265         return p;
266 }
267
268
269 /*************************************************************
270  Change a password either locally or remotely.
271 *************************************************************/
272
273 static BOOL password_change(const char *remote_mach, char *username, 
274                             char *old_passwd, char *new_pw, int local_flags)
275 {
276         BOOL ret;
277         pstring err_str;
278         pstring msg_str;
279
280         if (remote_mach != NULL) {
281                 if (local_flags & (LOCAL_ADD_USER|LOCAL_DELETE_USER|LOCAL_DISABLE_USER|LOCAL_ENABLE_USER|
282                                                         LOCAL_TRUST_ACCOUNT|LOCAL_SET_NO_PASSWORD)) {
283                         /* these things can't be done remotely yet */
284                         return False;
285                 }
286                 ret = remote_password_change(remote_mach, username, 
287                                              old_passwd, new_pw, err_str, sizeof(err_str));
288                 if(*err_str)
289                         fprintf(stderr, "%s", err_str);
290                 return ret;
291         }
292         
293         ret = local_password_change(username, local_flags, new_pw, 
294                                      err_str, sizeof(err_str), msg_str, sizeof(msg_str));
295
296         if(*msg_str)
297                 printf("%s", msg_str);
298         if(*err_str)
299                 fprintf(stderr, "%s", err_str);
300
301         return ret;
302 }
303
304 /*******************************************************************
305  Store the LDAP admin password in secrets.tdb
306  ******************************************************************/
307 static BOOL store_ldap_admin_pw (char* pw)
308 {       
309         if (!pw) 
310                 return False;
311
312         if (!secrets_init())
313                 return False;
314         
315         return secrets_store_ldap_pw(lp_ldap_admin_dn(), pw);
316 }
317
318
319 /*************************************************************
320  Handle password changing for root.
321 *************************************************************/
322
323 static int process_root(int local_flags)
324 {
325         struct passwd  *pwd;
326         int result = 0;
327         char *old_passwd = NULL;
328
329         if (local_flags & LOCAL_SET_LDAP_ADMIN_PW) {
330                 char *ldap_admin_dn = lp_ldap_admin_dn();
331                 if ( ! *ldap_admin_dn ) {
332                         DEBUG(0,("ERROR: 'ldap admin dn' not defined! Please check your smb.conf\n"));
333                         goto done;
334                 }
335
336                 printf("Setting stored password for \"%s\" in secrets.tdb\n", ldap_admin_dn);
337                 if ( ! *ldap_secret ) {
338                         new_passwd = prompt_for_new_password(stdin_passwd_get);
339                         fstrcpy(ldap_secret, new_passwd);
340                 }
341                 if (!store_ldap_admin_pw(ldap_secret)) {
342                         DEBUG(0,("ERROR: Failed to store the ldap admin password!\n"));
343                 }
344                 goto done;
345         }
346
347         /* Ensure passdb startup(). */
348         if(!initialize_password_db(False)) {
349                 DEBUG(0, ("Failed to open passdb!\n"));
350                 exit(1);
351         }
352                 
353         /* Ensure we have a SAM sid. */
354         get_global_sam_sid();
355
356         /*
357          * Ensure both add/delete user are not set
358          * Ensure add/delete user and either remote machine or join domain are
359          * not both set.
360          */     
361         if(((local_flags & (LOCAL_ADD_USER|LOCAL_DELETE_USER)) == (LOCAL_ADD_USER|LOCAL_DELETE_USER)) || 
362            ((local_flags & (LOCAL_ADD_USER|LOCAL_DELETE_USER)) && 
363                 (remote_machine != NULL))) {
364                 usage();
365         }
366         
367         /* Only load interfaces if we are doing network operations. */
368
369         if (remote_machine) {
370                 load_interfaces();
371         }
372
373         if (!user_name[0] && (pwd = getpwuid_alloc(geteuid()))) {
374                 fstrcpy(user_name, pwd->pw_name);
375                 passwd_free(&pwd);
376         } 
377
378         if (!user_name[0]) {
379                 fprintf(stderr,"You must specify a username\n");
380                 exit(1);
381         }
382
383         if (local_flags & LOCAL_TRUST_ACCOUNT) {
384                 /* add the $ automatically */
385                 static fstring buf;
386
387                 /*
388                  * Remove any trailing '$' before we
389                  * generate the initial machine password.
390                  */
391
392                 if (user_name[strlen(user_name)-1] == '$') {
393                         user_name[strlen(user_name)-1] = 0;
394                 }
395
396                 if (local_flags & LOCAL_ADD_USER) {
397                         SAFE_FREE(new_passwd);
398                         new_passwd = smb_xstrdup(user_name);
399                         strlower_m(new_passwd);
400                 }
401
402                 /*
403                  * Now ensure the username ends in '$' for
404                  * the machine add.
405                  */
406
407                 slprintf(buf, sizeof(buf)-1, "%s$", user_name);
408                 fstrcpy(user_name, buf);
409         } else if (local_flags & LOCAL_INTERDOM_ACCOUNT) {
410                 static fstring buf;
411
412                 if ((local_flags & LOCAL_ADD_USER) && (new_passwd == NULL)) {
413                         /*
414                          * Prompt for trusting domain's account password
415                          */
416                         new_passwd = prompt_for_new_password(stdin_passwd_get);
417                         if(!new_passwd) {
418                                 fprintf(stderr, "Unable to get newpassword.\n");
419                                 exit(1);
420                         }
421                 }
422                 
423                 /* prepare uppercased and '$' terminated username */
424                 slprintf(buf, sizeof(buf) - 1, "%s$", user_name);
425                 fstrcpy(user_name, buf);
426                 
427         } else {
428                 
429                 if (remote_machine != NULL) {
430                         old_passwd = get_pass("Old SMB password:",stdin_passwd_get);
431                 }
432                 
433                 if (!(local_flags & LOCAL_SET_PASSWORD)) {
434                         
435                         /*
436                          * If we are trying to enable a user, first we need to find out
437                          * if they are using a modern version of the smbpasswd file that
438                          * disables a user by just writing a flag into the file. If so
439                          * then we can re-enable a user without prompting for a new
440                          * password. If not (ie. they have a no stored password in the
441                          * smbpasswd file) then we need to prompt for a new password.
442                          */
443                         
444                         if(local_flags & LOCAL_ENABLE_USER) {
445                                 SAM_ACCOUNT *sampass = NULL;
446                                 BOOL ret;
447                                 
448                                 pdb_init_sam(&sampass);
449                                 ret = pdb_getsampwnam(sampass, user_name);
450                                 if((ret) &&
451                                    (pdb_get_lanman_passwd(sampass) == NULL)) {
452                                         local_flags |= LOCAL_SET_PASSWORD;
453                                 }
454                                 pdb_free_sam(&sampass);
455                         }
456                 }
457                 
458                 if((local_flags & LOCAL_SET_PASSWORD) && (new_passwd == NULL)) {
459                         new_passwd = prompt_for_new_password(stdin_passwd_get);
460                         
461                         if(!new_passwd) {
462                                 fprintf(stderr, "Unable to get new password.\n");
463                                 exit(1);
464                         }
465                 }
466         }
467
468         if (!password_change(remote_machine, user_name, old_passwd, new_passwd, local_flags)) {
469                 fprintf(stderr,"Failed to modify password entry for user %s\n", user_name);
470                 result = 1;
471                 goto done;
472         } 
473
474         if(remote_machine) {
475                 printf("Password changed for user %s on %s.\n", user_name, remote_machine );
476         } else if(!(local_flags & (LOCAL_ADD_USER|LOCAL_DISABLE_USER|LOCAL_ENABLE_USER|LOCAL_DELETE_USER|LOCAL_SET_NO_PASSWORD|LOCAL_SET_PASSWORD))) {
477                 SAM_ACCOUNT *sampass = NULL;
478                 BOOL ret;
479                 
480                 pdb_init_sam(&sampass);
481                 ret = pdb_getsampwnam(sampass, user_name);
482
483                 printf("Password changed for user %s.", user_name );
484                 if( (ret != False) && (pdb_get_acct_ctrl(sampass)&ACB_DISABLED) )
485                         printf(" User has disabled flag set.");
486                 if((ret != False) && (pdb_get_acct_ctrl(sampass) & ACB_PWNOTREQ) )
487                         printf(" User has no password flag set.");
488                 printf("\n");
489                 pdb_free_sam(&sampass);
490         }
491
492  done:
493         SAFE_FREE(new_passwd);
494         return result;
495 }
496
497
498 /*************************************************************
499  Handle password changing for non-root.
500 *************************************************************/
501
502 static int process_nonroot(int local_flags)
503 {
504         struct passwd  *pwd = NULL;
505         int result = 0;
506         char *old_pw = NULL;
507         char *new_pw = NULL;
508
509         if (local_flags & ~(LOCAL_AM_ROOT | LOCAL_SET_PASSWORD)) {
510                 /* Extra flags that we can't honor non-root */
511                 usage();
512         }
513
514         if (!user_name[0]) {
515                 pwd = getpwuid_alloc(getuid());
516                 if (pwd) {
517                         fstrcpy(user_name,pwd->pw_name);
518                         passwd_free(&pwd);
519                 } else {
520                         fprintf(stderr, "smbpasswd: cannot lookup user name for uid %u\n", (unsigned int)getuid());
521                         exit(1);
522                 }
523         }
524         
525         /*
526          * A non-root user is always setting a password
527          * via a remote machine (even if that machine is
528          * localhost).
529          */     
530
531         load_interfaces(); /* Delayed from main() */
532
533         if (remote_machine == NULL) {
534                 remote_machine = "127.0.0.1";
535         }
536
537         if (remote_machine != NULL) {
538                 old_pw = get_pass("Old SMB password:",stdin_passwd_get);
539         }
540         
541         if (!new_passwd) {
542                 new_pw = prompt_for_new_password(stdin_passwd_get);
543         }
544         else
545                 new_pw = smb_xstrdup(new_passwd);
546         
547         if (!new_pw) {
548                 fprintf(stderr, "Unable to get new password.\n");
549                 exit(1);
550         }
551
552         if (!password_change(remote_machine, user_name, old_pw, new_pw, 0)) {
553                 fprintf(stderr,"Failed to change password for %s\n", user_name);
554                 result = 1;
555                 goto done;
556         }
557
558         printf("Password changed for user %s\n", user_name);
559
560  done:
561         SAFE_FREE(old_pw);
562         SAFE_FREE(new_pw);
563
564         return result;
565 }
566
567
568
569 /*********************************************************
570  Start here.
571 **********************************************************/
572 int main(int argc, char **argv)
573 {       
574         int local_flags = 0;
575         
576         AllowDebugChange = False;
577
578 #if defined(HAVE_SET_AUTH_PARAMETERS)
579         set_auth_parameters(argc, argv);
580 #endif /* HAVE_SET_AUTH_PARAMETERS */
581
582         if (getuid() == 0) {
583                 local_flags = LOCAL_AM_ROOT;
584         }
585
586         load_case_tables();
587
588         local_flags = process_options(argc, argv, local_flags);
589
590         setup_logging("smbpasswd", True);
591         
592         /*
593          * Set the machine NETBIOS name if not already
594          * set from the config file. 
595          */ 
596     
597         if (!init_names())
598                 return 1;
599
600         /* Check the effective uid - make sure we are not setuid */
601         if (is_setuid_root()) {
602                 fprintf(stderr, "smbpasswd must *NOT* be setuid root.\n");
603                 exit(1);
604         }
605
606         if (local_flags & LOCAL_AM_ROOT) {
607                 secrets_init();
608                 return process_root(local_flags);
609         } 
610
611         return process_nonroot(local_flags);
612 }