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