Mimir has been busy with patches again, and sent in the following
[gd/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 pstring global_myname;
23 extern BOOL AllowDebugChange;
24
25 /*
26  * Next two lines needed for SunOS and don't
27  * hurt anything else...
28  */
29 extern char *optarg;
30 extern int optind;
31
32 /* forced running in root-mode */
33 static BOOL got_pass = False, got_username = False;
34 static BOOL stdin_passwd_get = False;
35 static fstring user_name, user_password;
36 static char *new_passwd = NULL;
37 static char *remote_machine = NULL;
38
39 static fstring ldap_secret;
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] [password]\n");
48         printf("otherwise:\n");
49         printf("    smbpasswd [options] [password]\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                   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 static int process_options(int argc, char **argv, int local_flags)
83 {
84         int ch;
85         pstring configfile;
86         pstrcpy(configfile, dyn_CONFIGFILE);
87
88         local_flags |= LOCAL_SET_PASSWORD;
89
90         ZERO_STRUCT(user_name);
91         ZERO_STRUCT(user_password);
92
93         user_name[0] = '\0';
94
95         while ((ch = getopt(argc, argv, "c:axdehminjr:sw:R:D:U:L")) != 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 rpc 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                         char *lp;
154
155                         got_username = True;
156                         fstrcpy(user_name, optarg);
157
158                         if ((lp = strchr(user_name, '%'))) {
159                                 *lp = 0;
160                                 fstrcpy(user_password, lp + 1);
161                                 got_pass = True;
162                                 memset(strchr_m(optarg, '%') + 1, 'X',
163                                        strlen(user_password));
164                         }
165
166                         break;
167                 }
168                 case 'h':
169                 default:
170                         usage();
171                 }
172         }
173         
174         argc -= optind;
175         argv += optind;
176
177         switch(argc) {
178         case 0:
179                 if (!got_username)
180                         fstrcpy(user_name, "");
181                 break;
182         case 1:
183                 if (!(local_flags & LOCAL_AM_ROOT)) {
184                         new_passwd = argv[0];
185                 } else {
186                         if (got_username) {
187                                 usage();
188                         } else {
189                                 fstrcpy(user_name, argv[0]);
190                         }
191                 }
192                 break;
193         case 2:
194                 if (!(local_flags & LOCAL_AM_ROOT) || got_username || got_pass) {
195                         usage();
196                 }
197
198                 fstrcpy(user_name, argv[0]);
199                 new_passwd = smb_xstrdup(argv[1]);
200                 break;
201         default:
202                 usage();
203         }
204
205         if (!lp_load(configfile,True,False,False)) {
206                 fprintf(stderr, "Can't load %s - run testparm to debug it\n", 
207                         dyn_CONFIGFILE);
208                 exit(1);
209         }
210
211         return local_flags;
212 }
213
214 /*************************************************************
215  Utility function to prompt for passwords from stdin. Each
216  password entered must end with a newline.
217 *************************************************************/
218 static char *stdin_new_passwd(void)
219 {
220         static fstring new_passwd;
221         size_t len;
222
223         ZERO_ARRAY(new_passwd);
224
225         /*
226          * if no error is reported from fgets() and string at least contains
227          * the newline that ends the password, then replace the newline with
228          * a null terminator.
229          */
230         if ( fgets(new_passwd, sizeof(new_passwd), stdin) != NULL) {
231                 if ((len = strlen(new_passwd)) > 0) {
232                         if(new_passwd[len-1] == '\n')
233                                 new_passwd[len - 1] = 0; 
234                 }
235         }
236         return(new_passwd);
237 }
238
239
240 /*************************************************************
241  Utility function to get passwords via tty or stdin
242  Used if the '-s' option is set to silently get passwords
243  to enable scripting.
244 *************************************************************/
245 static char *get_pass( char *prompt, BOOL stdin_get)
246 {
247         char *p;
248         if (stdin_get) {
249                 p = stdin_new_passwd();
250         } else {
251                 p = getpass(prompt);
252         }
253         return smb_xstrdup(p);
254 }
255
256 /*************************************************************
257  Utility function to prompt for new password.
258 *************************************************************/
259 static char *prompt_for_new_password(BOOL stdin_get)
260 {
261         char *p;
262         fstring new_passwd;
263
264         ZERO_ARRAY(new_passwd);
265  
266         p = get_pass("New SMB password:", stdin_get);
267
268         fstrcpy(new_passwd, p);
269         SAFE_FREE(p);
270
271         p = get_pass("Retype new SMB password:", stdin_get);
272
273         if (strcmp(p, new_passwd)) {
274                 fprintf(stderr, "Mismatch - password unchanged.\n");
275                 ZERO_ARRAY(new_passwd);
276                 SAFE_FREE(p);
277                 return NULL;
278         }
279
280         return p;
281 }
282
283
284 /*************************************************************
285  Change a password either locally or remotely.
286 *************************************************************/
287
288 static BOOL password_change(const char *remote_machine, char *user_name, 
289                             char *old_passwd, char *new_passwd, int local_flags)
290 {
291         BOOL ret;
292         pstring err_str;
293         pstring msg_str;
294
295         if (remote_machine != NULL) {
296                 if (local_flags & (LOCAL_ADD_USER|LOCAL_DELETE_USER|LOCAL_DISABLE_USER|LOCAL_ENABLE_USER|
297                                                         LOCAL_TRUST_ACCOUNT|LOCAL_SET_NO_PASSWORD)) {
298                         /* these things can't be done remotely yet */
299                         return False;
300                 }
301                 ret = remote_password_change(remote_machine, user_name, 
302                                              old_passwd, new_passwd, err_str, sizeof(err_str));
303                 if(*err_str)
304                         fprintf(stderr, err_str);
305                 return ret;
306         }
307         
308         ret = local_password_change(user_name, local_flags, new_passwd, 
309                                      err_str, sizeof(err_str), msg_str, sizeof(msg_str));
310
311         if(*msg_str)
312                 printf(msg_str);
313         if(*err_str)
314                 fprintf(stderr, err_str);
315
316         return ret;
317 }
318
319 /*******************************************************************
320  Store the LDAP admin password in secrets.tdb
321  ******************************************************************/
322 static BOOL store_ldap_admin_pw (char* pw)
323 {       
324         if (!pw) 
325                 return False;
326
327         if (!secrets_init())
328                 return False;
329         
330         return secrets_store_ldap_pw(lp_ldap_admin_dn(), pw);
331 }
332
333
334 /*************************************************************
335  Handle password changing for root.
336 *************************************************************/
337
338 static int process_root(int local_flags)
339 {
340         struct passwd  *pwd;
341         int result = 0;
342         char *old_passwd = NULL;
343
344         if (local_flags & LOCAL_SET_LDAP_ADMIN_PW)
345         {
346                 printf("Setting stored password for \"%s\" in secrets.tdb\n", 
347                         lp_ldap_admin_dn());
348                 if (!store_ldap_admin_pw(ldap_secret))
349                         DEBUG(0,("ERROR: Failed to store the ldap admin password!\n"));
350                 goto done;
351         }
352
353         /*
354          * Ensure both add/delete user are not set
355          * Ensure add/delete user and either remote machine or join domain are
356          * not both set.
357          */     
358         if(((local_flags & (LOCAL_ADD_USER|LOCAL_DELETE_USER)) == (LOCAL_ADD_USER|LOCAL_DELETE_USER)) || 
359            ((local_flags & (LOCAL_ADD_USER|LOCAL_DELETE_USER)) && 
360                 (remote_machine != NULL))) {
361                 usage();
362         }
363         
364         /* Only load interfaces if we are doing network operations. */
365
366         if (remote_machine) {
367                 load_interfaces();
368         }
369
370         if (!user_name[0] && (pwd = getpwuid_alloc(geteuid()))) {
371                 fstrcpy(user_name, pwd->pw_name);
372                 passwd_free(&pwd);
373         } 
374
375         if (!user_name[0]) {
376                 fprintf(stderr,"You must specify a username\n");
377                 exit(1);
378         }
379
380         if (local_flags & LOCAL_TRUST_ACCOUNT) {
381                 /* add the $ automatically */
382                 static fstring buf;
383
384                 /*
385                  * Remove any trailing '$' before we
386                  * generate the initial machine password.
387                  */
388
389                 if (user_name[strlen(user_name)-1] == '$') {
390                         user_name[strlen(user_name)-1] = 0;
391                 }
392
393                 if (local_flags & LOCAL_ADD_USER) {
394                         SAFE_FREE(new_passwd);
395                         new_passwd = smb_xstrdup(user_name);
396                         strlower(new_passwd);
397                 }
398
399                 /*
400                  * Now ensure the username ends in '$' for
401                  * the machine add.
402                  */
403
404                 slprintf(buf, sizeof(buf)-1, "%s$", user_name);
405                 fstrcpy(user_name, buf);
406         } else if (local_flags & LOCAL_INTERDOM_ACCOUNT) {
407                 static fstring buf;
408
409                 if (local_flags & LOCAL_ADD_USER) {
410                         /*
411                          * Prompt for trusting domain's account password
412                          */
413                         new_passwd = prompt_for_new_password(stdin_passwd_get);
414                         if(!new_passwd) {
415                                 fprintf(stderr, "Unable to get newpassword.\n");
416                                 exit(1);
417                         }
418                 }
419                 
420                 /* prepare uppercased and '$' terminated username */
421                 slprintf(buf, sizeof(buf) - 1, "%s$", user_name);
422                 fstrcpy(user_name, buf);
423                 
424         } else {
425                 
426                 if (remote_machine != NULL) {
427                         old_passwd = get_pass("Old SMB password:",stdin_passwd_get);
428                 }
429                 
430                 if (!(local_flags & LOCAL_SET_PASSWORD)) {
431                         
432                         /*
433                          * If we are trying to enable a user, first we need to find out
434                          * if they are using a modern version of the smbpasswd file that
435                          * disables a user by just writing a flag into the file. If so
436                          * then we can re-enable a user without prompting for a new
437                          * password. If not (ie. they have a no stored password in the
438                          * smbpasswd file) then we need to prompt for a new password.
439                          */
440                         
441                         if(local_flags & LOCAL_ENABLE_USER) {
442                                 SAM_ACCOUNT *sampass = NULL;
443                                 BOOL ret;
444                                 
445                                 pdb_init_sam(&sampass);
446                                 ret = pdb_getsampwnam(sampass, user_name);
447                                 if((sampass != False) && (pdb_get_lanman_passwd(sampass) == NULL)) {
448                                         local_flags |= LOCAL_SET_PASSWORD;
449                                 }
450                                 pdb_free_sam(&sampass);
451                         }
452                 }
453                 
454                 if(local_flags & LOCAL_SET_PASSWORD) {
455                         new_passwd = prompt_for_new_password(stdin_passwd_get);
456                         
457                         if(!new_passwd) {
458                                 fprintf(stderr, "Unable to get new password.\n");
459                                 exit(1);
460                         }
461                 }
462         }
463
464         if (!password_change(remote_machine, user_name, old_passwd, new_passwd, local_flags)) {
465                 fprintf(stderr,"Failed to modify password entry for user %s\n", user_name);
466                 result = 1;
467                 goto done;
468         } 
469
470         if(remote_machine) {
471                 printf("Password changed for user %s on %s.\n", user_name, remote_machine );
472         } else if(!(local_flags & (LOCAL_ADD_USER|LOCAL_DISABLE_USER|LOCAL_ENABLE_USER|LOCAL_DELETE_USER|LOCAL_SET_NO_PASSWORD|LOCAL_SET_PASSWORD))) {
473                 SAM_ACCOUNT *sampass = NULL;
474                 BOOL ret;
475                 
476                 pdb_init_sam(&sampass);
477                 ret = pdb_getsampwnam(sampass, user_name);
478
479                 printf("Password changed for user %s.", user_name );
480                 if( (ret != False) && (pdb_get_acct_ctrl(sampass)&ACB_DISABLED) )
481                         printf(" User has disabled flag set.");
482                 if((ret != False) && (pdb_get_acct_ctrl(sampass) & ACB_PWNOTREQ) )
483                         printf(" User has no password flag set.");
484                 printf("\n");
485                 pdb_free_sam(&sampass);
486         }
487
488  done:
489         SAFE_FREE(new_passwd);
490         return result;
491 }
492
493
494 /*************************************************************
495  Handle password changing for non-root.
496 *************************************************************/
497
498 static int process_nonroot(int local_flags)
499 {
500         struct passwd  *pwd = NULL;
501         int result = 0;
502         char *old_passwd = NULL;
503
504         if (local_flags & ~(LOCAL_AM_ROOT | LOCAL_SET_PASSWORD)) {
505                 /* Extra flags that we can't honor non-root */
506                 usage();
507         }
508
509         if (!user_name[0]) {
510                 pwd = getpwuid_alloc(getuid());
511                 if (pwd) {
512                         fstrcpy(user_name,pwd->pw_name);
513                         passwd_free(&pwd);
514                 } else {
515                         fprintf(stderr, "smbpasswd: you don't exist - go away\n");
516                         exit(1);
517                 }
518         }
519         
520         /*
521          * A non-root user is always setting a password
522          * via a remote machine (even if that machine is
523          * localhost).
524          */     
525
526         load_interfaces(); /* Delayed from main() */
527
528         if (remote_machine == NULL) {
529                 remote_machine = "127.0.0.1";
530         }
531
532         if (remote_machine != NULL) {
533                 old_passwd = get_pass("Old SMB password:",stdin_passwd_get);
534         }
535         
536         if (!new_passwd) {
537                 new_passwd = prompt_for_new_password(stdin_passwd_get);
538         }
539         
540         if (!new_passwd) {
541                 fprintf(stderr, "Unable to get new password.\n");
542                 exit(1);
543         }
544
545         if (!password_change(remote_machine, user_name, old_passwd, new_passwd, 0)) {
546                 fprintf(stderr,"Failed to change password for %s\n", user_name);
547                 result = 1;
548                 goto done;
549         }
550
551         printf("Password changed for user %s\n", user_name);
552
553  done:
554         SAFE_FREE(old_passwd);
555         SAFE_FREE(new_passwd);
556
557         return result;
558 }
559
560
561
562 /*********************************************************
563  Start here.
564 **********************************************************/
565 int main(int argc, char **argv)
566 {       
567         int local_flags = 0;
568         
569         AllowDebugChange = False;
570
571 #if defined(HAVE_SET_AUTH_PARAMETERS)
572         set_auth_parameters(argc, argv);
573 #endif /* HAVE_SET_AUTH_PARAMETERS */
574
575         if (getuid() == 0) {
576                 local_flags = LOCAL_AM_ROOT;
577         }
578
579         local_flags = process_options(argc, argv, local_flags);
580
581         setup_logging("smbpasswd", True);
582         
583         /*
584          * Set the machine NETBIOS name if not already
585          * set from the config file. 
586          */ 
587     
588         if (!*global_myname) {   
589                 char *p;
590                 fstrcpy(global_myname, myhostname());
591                 p = strchr_m(global_myname, '.' );
592                 if (p) *p = 0;
593         }           
594         strupper(global_myname);
595
596         /* Check the effective uid - make sure we are not setuid */
597         if (is_setuid_root()) {
598                 fprintf(stderr, "smbpasswd must *NOT* be setuid root.\n");
599                 exit(1);
600         }
601
602         if (local_flags & LOCAL_AM_ROOT) {
603                 secrets_init();
604                 return process_root(local_flags);
605         } 
606
607         return process_nonroot(local_flags);
608 }