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