b7fc65525ac0fe96a828dad06325aaf52defee68
[sfrench/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 3 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, see <http://www.gnu.org/licenses/>.  */
18
19 #include "includes.h"
20
21 extern bool AllowDebugChange;
22
23 /*
24  * Next two lines needed for SunOS and don't
25  * hurt anything else...
26  */
27 extern char *optarg;
28 extern int optind;
29
30 /* forced running in root-mode */
31 static bool got_username = False;
32 static bool stdin_passwd_get = False;
33 static fstring user_name;
34 static char *new_passwd = NULL;
35 static const char *remote_machine = NULL;
36
37 static fstring ldap_secret;
38
39
40 /*********************************************************
41  Print command usage on stderr and die.
42 **********************************************************/
43 static void usage(void)
44 {
45         printf("When run by root:\n");
46         printf("    smbpasswd [options] [username]\n");
47         printf("otherwise:\n");
48         printf("    smbpasswd [options]\n\n");
49
50         printf("options:\n");
51         printf("  -L                   local mode (must be first option)\n");
52         printf("  -h                   print this usage message\n");
53         printf("  -s                   use stdin for password prompt\n");
54         printf("  -c smb.conf file     Use the given path to the smb.conf file\n");
55         printf("  -D LEVEL             debug level\n");
56         printf("  -r MACHINE           remote machine\n");
57         printf("  -U USER              remote username\n");
58
59         printf("extra options when run by root or in local mode:\n");
60         printf("  -a                   add user\n");
61         printf("  -d                   disable user\n");
62         printf("  -e                   enable user\n");
63         printf("  -i                   interdomain trust account\n");
64         printf("  -m                   machine trust account\n");
65         printf("  -n                   set no password\n");
66         printf("  -W                   use stdin ldap admin 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                         configfile);
193                 exit(1);
194         }
195
196         return local_flags;
197 }
198
199 /*************************************************************
200  Utility function to prompt for new password.
201 *************************************************************/
202 static char *prompt_for_new_password(bool stdin_get)
203 {
204         char *p;
205         fstring new_pw;
206
207         ZERO_ARRAY(new_pw);
208  
209         p = get_pass("New SMB password:", stdin_get);
210
211         fstrcpy(new_pw, p);
212         SAFE_FREE(p);
213
214         p = get_pass("Retype new SMB password:", stdin_get);
215
216         if (strcmp(p, new_pw)) {
217                 fprintf(stderr, "Mismatch - password unchanged.\n");
218                 ZERO_ARRAY(new_pw);
219                 SAFE_FREE(p);
220                 return NULL;
221         }
222
223         return p;
224 }
225
226
227 /*************************************************************
228  Change a password either locally or remotely.
229 *************************************************************/
230
231 static NTSTATUS password_change(const char *remote_mach, char *username, 
232                                 char *old_passwd, char *new_pw,
233                                 int local_flags)
234 {
235         NTSTATUS ret;
236         char *err_str = NULL;
237         char *msg_str = NULL;
238
239         if (remote_mach != NULL) {
240                 if (local_flags & (LOCAL_ADD_USER|LOCAL_DELETE_USER|LOCAL_DISABLE_USER|LOCAL_ENABLE_USER|
241                                                         LOCAL_TRUST_ACCOUNT|LOCAL_SET_NO_PASSWORD)) {
242                         /* these things can't be done remotely yet */
243                         return NT_STATUS_UNSUCCESSFUL;
244                 }
245                 ret = remote_password_change(remote_mach, username, 
246                                              old_passwd, new_pw, err_str, sizeof(err_str));
247                 if(*err_str)
248                         fprintf(stderr, "%s", err_str);
249                 return ret;
250         }
251         
252         ret = local_password_change(username, local_flags, new_pw, 
253                                      &err_str, &msg_str);
254
255         if(msg_str)
256                 printf("%s", msg_str);
257         if(err_str)
258                 fprintf(stderr, "%s", err_str);
259
260         SAFE_FREE(msg_str);
261         SAFE_FREE(err_str);
262         return ret;
263 }
264
265 /*******************************************************************
266  Store the LDAP admin password in secrets.tdb
267  ******************************************************************/
268 static bool store_ldap_admin_pw (char* pw)
269 {       
270         if (!pw) 
271                 return False;
272
273         if (!secrets_init())
274                 return False;
275         
276         return secrets_store_ldap_pw(lp_ldap_admin_dn(), pw);
277 }
278
279
280 /*************************************************************
281  Handle password changing for root.
282 *************************************************************/
283
284 static int process_root(int local_flags)
285 {
286         struct passwd  *pwd;
287         int result = 0;
288         char *old_passwd = NULL;
289
290         if (local_flags & LOCAL_SET_LDAP_ADMIN_PW) {
291                 char *ldap_admin_dn = lp_ldap_admin_dn();
292                 if ( ! *ldap_admin_dn ) {
293                         DEBUG(0,("ERROR: 'ldap admin dn' not defined! Please check your smb.conf\n"));
294                         goto done;
295                 }
296
297                 printf("Setting stored password for \"%s\" in secrets.tdb\n", ldap_admin_dn);
298                 if ( ! *ldap_secret ) {
299                         new_passwd = prompt_for_new_password(stdin_passwd_get);
300                         fstrcpy(ldap_secret, new_passwd);
301                 }
302                 if (!store_ldap_admin_pw(ldap_secret)) {
303                         DEBUG(0,("ERROR: Failed to store the ldap admin password!\n"));
304                 }
305                 goto done;
306         }
307
308         /* Ensure passdb startup(). */
309         if(!initialize_password_db(False, NULL)) {
310                 DEBUG(0, ("Failed to open passdb!\n"));
311                 exit(1);
312         }
313                 
314         /* Ensure we have a SAM sid. */
315         get_global_sam_sid();
316
317         /*
318          * Ensure both add/delete user are not set
319          * Ensure add/delete user and either remote machine or join domain are
320          * not both set.
321          */     
322         if(((local_flags & (LOCAL_ADD_USER|LOCAL_DELETE_USER)) == (LOCAL_ADD_USER|LOCAL_DELETE_USER)) || 
323            ((local_flags & (LOCAL_ADD_USER|LOCAL_DELETE_USER)) && 
324                 (remote_machine != NULL))) {
325                 usage();
326         }
327         
328         /* Only load interfaces if we are doing network operations. */
329
330         if (remote_machine) {
331                 load_interfaces();
332         }
333
334         if (!user_name[0] && (pwd = getpwuid_alloc(NULL, geteuid()))) {
335                 fstrcpy(user_name, pwd->pw_name);
336                 TALLOC_FREE(pwd);
337         } 
338
339         if (!user_name[0]) {
340                 fprintf(stderr,"You must specify a username\n");
341                 exit(1);
342         }
343
344         if (local_flags & LOCAL_TRUST_ACCOUNT) {
345                 /* add the $ automatically */
346                 static fstring buf;
347
348                 /*
349                  * Remove any trailing '$' before we
350                  * generate the initial machine password.
351                  */
352
353                 if (user_name[strlen(user_name)-1] == '$') {
354                         user_name[strlen(user_name)-1] = 0;
355                 }
356
357                 if (local_flags & LOCAL_ADD_USER) {
358                         SAFE_FREE(new_passwd);
359                         new_passwd = smb_xstrdup(user_name);
360                         strlower_m(new_passwd);
361                 }
362
363                 /*
364                  * Now ensure the username ends in '$' for
365                  * the machine add.
366                  */
367
368                 slprintf(buf, sizeof(buf)-1, "%s$", user_name);
369                 fstrcpy(user_name, buf);
370         } else if (local_flags & LOCAL_INTERDOM_ACCOUNT) {
371                 static fstring buf;
372
373                 if ((local_flags & LOCAL_ADD_USER) && (new_passwd == NULL)) {
374                         /*
375                          * Prompt for trusting domain's account password
376                          */
377                         new_passwd = prompt_for_new_password(stdin_passwd_get);
378                         if(!new_passwd) {
379                                 fprintf(stderr, "Unable to get newpassword.\n");
380                                 exit(1);
381                         }
382                 }
383                 
384                 /* prepare uppercased and '$' terminated username */
385                 slprintf(buf, sizeof(buf) - 1, "%s$", user_name);
386                 fstrcpy(user_name, buf);
387                 
388         } else {
389                 
390                 if (remote_machine != NULL) {
391                         old_passwd = get_pass("Old SMB password:",stdin_passwd_get);
392                 }
393                 
394                 if (!(local_flags & LOCAL_SET_PASSWORD)) {
395                         
396                         /*
397                          * If we are trying to enable a user, first we need to find out
398                          * if they are using a modern version of the smbpasswd file that
399                          * disables a user by just writing a flag into the file. If so
400                          * then we can re-enable a user without prompting for a new
401                          * password. If not (ie. they have a no stored password in the
402                          * smbpasswd file) then we need to prompt for a new password.
403                          */
404                         
405                         if(local_flags & LOCAL_ENABLE_USER) {
406                                 struct samu *sampass = NULL;
407                                 
408                                 sampass = samu_new( NULL );
409                                 if (!sampass) {
410                                         fprintf(stderr, "talloc fail for struct samu.\n");
411                                         exit(1);
412                                 }
413                                 if (!pdb_getsampwnam(sampass, user_name)) {
414                                         fprintf(stderr, "Failed to find user %s in passdb backend.\n",
415                                                 user_name );
416                                         exit(1);
417                                 }
418
419                                 if(pdb_get_nt_passwd(sampass) == NULL) {
420                                         local_flags |= LOCAL_SET_PASSWORD;
421                                 }
422                                 TALLOC_FREE(sampass);
423                         }
424                 }
425                 
426                 if((local_flags & LOCAL_SET_PASSWORD) && (new_passwd == NULL)) {
427                         new_passwd = prompt_for_new_password(stdin_passwd_get);
428                         
429                         if(!new_passwd) {
430                                 fprintf(stderr, "Unable to get new password.\n");
431                                 exit(1);
432                         }
433                 }
434         }
435
436         if (!NT_STATUS_IS_OK(password_change(remote_machine, user_name,
437                                              old_passwd, new_passwd,
438                                              local_flags))) {
439                 fprintf(stderr,"Failed to modify password entry for user %s\n", user_name);
440                 result = 1;
441                 goto done;
442         } 
443
444         if(remote_machine) {
445                 printf("Password changed for user %s on %s.\n", user_name, remote_machine );
446         } else if(!(local_flags & (LOCAL_ADD_USER|LOCAL_DISABLE_USER|LOCAL_ENABLE_USER|LOCAL_DELETE_USER|LOCAL_SET_NO_PASSWORD|LOCAL_SET_PASSWORD))) {
447                 struct samu *sampass = NULL;
448                 
449                 sampass = samu_new( NULL );
450                 if (!sampass) {
451                         fprintf(stderr, "talloc fail for struct samu.\n");
452                         exit(1);
453                 }
454
455                 if (!pdb_getsampwnam(sampass, user_name)) {
456                         fprintf(stderr, "Failed to find user %s in passdb backend.\n",
457                                 user_name );
458                         exit(1);
459                 }
460
461                 printf("Password changed for user %s.", user_name );
462                 if(pdb_get_acct_ctrl(sampass)&ACB_DISABLED) {
463                         printf(" User has disabled flag set.");
464                 }
465                 if(pdb_get_acct_ctrl(sampass) & ACB_PWNOTREQ) {
466                         printf(" User has no password flag set.");
467                 }
468                 printf("\n");
469                 TALLOC_FREE(sampass);
470         }
471
472  done:
473         SAFE_FREE(new_passwd);
474         return result;
475 }
476
477
478 /*************************************************************
479  Handle password changing for non-root.
480 *************************************************************/
481
482 static int process_nonroot(int local_flags)
483 {
484         struct passwd  *pwd = NULL;
485         int result = 0;
486         char *old_pw = NULL;
487         char *new_pw = NULL;
488
489         if (local_flags & ~(LOCAL_AM_ROOT | LOCAL_SET_PASSWORD)) {
490                 /* Extra flags that we can't honor non-root */
491                 usage();
492         }
493
494         if (!user_name[0]) {
495                 pwd = getpwuid_alloc(NULL, getuid());
496                 if (pwd) {
497                         fstrcpy(user_name,pwd->pw_name);
498                         TALLOC_FREE(pwd);
499                 } else {
500                         fprintf(stderr, "smbpasswd: cannot lookup user name for uid %u\n", (unsigned int)getuid());
501                         exit(1);
502                 }
503         }
504         
505         /*
506          * A non-root user is always setting a password
507          * via a remote machine (even if that machine is
508          * localhost).
509          */     
510
511         load_interfaces(); /* Delayed from main() */
512
513         if (remote_machine == NULL) {
514                 remote_machine = "127.0.0.1";
515         }
516
517         if (remote_machine != NULL) {
518                 old_pw = get_pass("Old SMB password:",stdin_passwd_get);
519         }
520         
521         if (!new_passwd) {
522                 new_pw = prompt_for_new_password(stdin_passwd_get);
523         }
524         else
525                 new_pw = smb_xstrdup(new_passwd);
526         
527         if (!new_pw) {
528                 fprintf(stderr, "Unable to get new password.\n");
529                 exit(1);
530         }
531
532         if (!NT_STATUS_IS_OK(password_change(remote_machine, user_name, old_pw,
533                                              new_pw, 0))) {
534                 fprintf(stderr,"Failed to change password for %s\n", user_name);
535                 result = 1;
536                 goto done;
537         }
538
539         printf("Password changed for user %s\n", user_name);
540
541  done:
542         SAFE_FREE(old_pw);
543         SAFE_FREE(new_pw);
544
545         return result;
546 }
547
548
549
550 /*********************************************************
551  Start here.
552 **********************************************************/
553 int main(int argc, char **argv)
554 {       
555         TALLOC_CTX *frame = talloc_stackframe();
556         int local_flags = 0;
557         int ret;
558         
559         AllowDebugChange = False;
560
561 #if defined(HAVE_SET_AUTH_PARAMETERS)
562         set_auth_parameters(argc, argv);
563 #endif /* HAVE_SET_AUTH_PARAMETERS */
564
565         if (getuid() == 0) {
566                 local_flags = LOCAL_AM_ROOT;
567         }
568
569         load_case_tables();
570
571         local_flags = process_options(argc, argv, local_flags);
572
573         setup_logging("smbpasswd", True);
574         
575         /*
576          * Set the machine NETBIOS name if not already
577          * set from the config file. 
578          */ 
579     
580         if (!init_names())
581                 return 1;
582
583         /* Check the effective uid - make sure we are not setuid */
584         if (is_setuid_root()) {
585                 fprintf(stderr, "smbpasswd must *NOT* be setuid root.\n");
586                 exit(1);
587         }
588
589         if (local_flags & LOCAL_AM_ROOT) {
590                 secrets_init();
591                 return process_root(local_flags);
592         } 
593
594         ret = process_nonroot(local_flags);
595         TALLOC_FREE(frame);
596         return ret;
597 }