r23784: use the GPLv3 boilerplate as recommended by the FSF and the license text
[tprouty/samba.git] / source / utils / net.c
1 /* 
2    Samba Unix/Linux SMB client library 
3    Distributed SMB/CIFS Server Management Utility 
4    Copyright (C) 2001 Steve French  (sfrench@us.ibm.com)
5    Copyright (C) 2001 Jim McDonough (jmcd@us.ibm.com)
6    Copyright (C) 2001 Andrew Tridgell (tridge@samba.org)
7    Copyright (C) 2001 Andrew Bartlett (abartlet@samba.org)
8
9    Originally written by Steve and Jim. Largely rewritten by tridge in
10    November 2001.
11
12    Reworked again by abartlet in December 2001
13
14    This program is free software; you can redistribute it and/or modify
15    it under the terms of the GNU General Public License as published by
16    the Free Software Foundation; either version 3 of the License, or
17    (at your option) any later version.
18    
19    This program is distributed in the hope that it will be useful,
20    but WITHOUT ANY WARRANTY; without even the implied warranty of
21    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
22    GNU General Public License for more details.
23    
24    You should have received a copy of the GNU General Public License
25    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
26  
27 /*****************************************************/
28 /*                                                   */
29 /*   Distributed SMB/CIFS Server Management Utility  */
30 /*                                                   */
31 /*   The intent was to make the syntax similar       */
32 /*   to the NET utility (first developed in DOS      */
33 /*   with additional interesting & useful functions  */
34 /*   added in later SMB server network operating     */
35 /*   systems).                                       */
36 /*                                                   */
37 /*****************************************************/
38
39 #include "includes.h"
40 #include "utils/net.h"
41
42 /***********************************************************************/
43 /* Beginning of internationalization section.  Translatable constants  */
44 /* should be kept in this area and referenced in the rest of the code. */
45 /*                                                                     */
46 /* No functions, outside of Samba or LSB (Linux Standards Base) should */
47 /* be used (if possible).                                              */
48 /***********************************************************************/
49
50 #define YES_STRING              "Yes"
51 #define NO_STRING               "No"
52
53 /************************************************************************************/
54 /*                       end of internationalization section                        */
55 /************************************************************************************/
56
57 /* Yes, these buggers are globals.... */
58 const char *opt_requester_name = NULL;
59 const char *opt_host = NULL; 
60 const char *opt_password = NULL;
61 const char *opt_user_name = NULL;
62 BOOL opt_user_specified = False;
63 const char *opt_workgroup = NULL;
64 int opt_long_list_entries = 0;
65 int opt_reboot = 0;
66 int opt_force = 0;
67 int opt_stdin = 0;
68 int opt_port = 0;
69 int opt_verbose = 0;
70 int opt_maxusers = -1;
71 const char *opt_comment = "";
72 const char *opt_container = NULL;
73 int opt_flags = -1;
74 int opt_timeout = 0;
75 const char *opt_target_workgroup = NULL;
76 int opt_machine_pass = 0;
77 BOOL opt_localgroup = False;
78 BOOL opt_domaingroup = False;
79 static BOOL do_talloc_report=False;
80 const char *opt_newntname = "";
81 int opt_rid = 0;
82 int opt_acls = 0;
83 int opt_attrs = 0;
84 int opt_timestamps = 0;
85 const char *opt_exclude = NULL;
86 const char *opt_destination = NULL;
87 BOOL opt_testmode = False;
88
89 BOOL opt_have_ip = False;
90 struct in_addr opt_dest_ip;
91
92 extern struct in_addr loopback_ip;
93 extern BOOL AllowDebugChange;
94
95 uint32 get_sec_channel_type(const char *param) 
96 {
97         if (!(param && *param)) {
98                 return get_default_sec_channel();
99         } else {
100                 if (strequal(param, "PDC")) {
101                         return SEC_CHAN_BDC;
102                 } else if (strequal(param, "BDC")) {
103                         return SEC_CHAN_BDC;
104                 } else if (strequal(param, "MEMBER")) {
105                         return SEC_CHAN_WKSTA;
106 #if 0                   
107                 } else if (strequal(param, "DOMAIN")) {
108                         return SEC_CHAN_DOMAIN;
109 #endif
110                 } else {
111                         return get_default_sec_channel();
112                 }
113         }
114 }
115
116 /*
117   run a function from a function table. If not found then
118   call the specified usage function 
119 */
120 int net_run_function(int argc, const char **argv, struct functable *table, 
121                      int (*usage_fn)(int argc, const char **argv))
122 {
123         int i;
124         
125         if (argc < 1) {
126                 d_printf("\nUsage: \n");
127                 return usage_fn(argc, argv);
128         }
129         for (i=0; table[i].funcname; i++) {
130                 if (StrCaseCmp(argv[0], table[i].funcname) == 0)
131                         return table[i].fn(argc-1, argv+1);
132         }
133         d_fprintf(stderr, "No command: %s\n", argv[0]);
134         return usage_fn(argc, argv);
135 }
136
137 /*
138  * run a function from a function table.
139  */
140 int net_run_function2(int argc, const char **argv, const char *whoami,
141                       struct functable2 *table)
142 {
143         int i;
144
145         if (argc != 0) {
146                 for (i=0; table[i].funcname; i++) {
147                         if (StrCaseCmp(argv[0], table[i].funcname) == 0)
148                                 return table[i].fn(argc-1, argv+1);
149                 }
150         }
151
152         for (i=0; table[i].funcname != NULL; i++) {
153                 d_printf("%s %-15s %s\n", whoami, table[i].funcname,
154                          table[i].helptext);
155         }
156
157         return -1;
158 }
159
160 /****************************************************************************
161 connect to \\server\service 
162 ****************************************************************************/
163
164 NTSTATUS connect_to_service(struct cli_state **c, struct in_addr *server_ip,
165                                         const char *server_name, 
166                                         const char *service_name, 
167                                         const char *service_type)
168 {
169         NTSTATUS nt_status;
170
171         if (!opt_password && !opt_machine_pass) {
172                 char *pass = getpass("Password:");
173                 if (pass) {
174                         opt_password = SMB_STRDUP(pass);
175                 }
176         }
177
178         nt_status = cli_full_connection(c, NULL, server_name, 
179                                         server_ip, opt_port,
180                                         service_name, service_type,  
181                                         opt_user_name, opt_workgroup,
182                                         opt_password, 0, Undefined, NULL);
183
184         if (NT_STATUS_IS_OK(nt_status)) {
185                 return nt_status;
186         } else {
187                 d_fprintf(stderr, "Could not connect to server %s\n", server_name);
188
189                 /* Display a nicer message depending on the result */
190
191                 if (NT_STATUS_V(nt_status) == 
192                     NT_STATUS_V(NT_STATUS_LOGON_FAILURE))
193                         d_fprintf(stderr, "The username or password was not correct.\n");
194
195                 if (NT_STATUS_V(nt_status) == 
196                     NT_STATUS_V(NT_STATUS_ACCOUNT_LOCKED_OUT))
197                         d_fprintf(stderr, "The account was locked out.\n");
198
199                 if (NT_STATUS_V(nt_status) == 
200                     NT_STATUS_V(NT_STATUS_ACCOUNT_DISABLED))
201                         d_fprintf(stderr, "The account was disabled.\n");
202
203                 return nt_status;
204         }
205 }
206
207
208 /****************************************************************************
209 connect to \\server\ipc$  
210 ****************************************************************************/
211 NTSTATUS connect_to_ipc(struct cli_state **c, struct in_addr *server_ip,
212                                         const char *server_name)
213 {
214         return connect_to_service(c, server_ip, server_name, "IPC$", "IPC");
215 }
216
217 /****************************************************************************
218 connect to \\server\ipc$ anonymously
219 ****************************************************************************/
220 NTSTATUS connect_to_ipc_anonymous(struct cli_state **c,
221                         struct in_addr *server_ip, const char *server_name)
222 {
223         NTSTATUS nt_status;
224
225         nt_status = cli_full_connection(c, opt_requester_name, server_name, 
226                                         server_ip, opt_port,
227                                         "IPC$", "IPC",  
228                                         "", "",
229                                         "", 0, Undefined, NULL);
230         
231         if (NT_STATUS_IS_OK(nt_status)) {
232                 return nt_status;
233         } else {
234                 DEBUG(1,("Cannot connect to server (anonymously).  Error was %s\n", nt_errstr(nt_status)));
235                 return nt_status;
236         }
237 }
238
239 /****************************************************************************
240  Return malloced user@realm for krb5 login.
241 ****************************************************************************/
242
243 static char *get_user_and_realm(const char *username)
244 {
245         char *user_and_realm = NULL;
246
247         if (!username) {
248                 return NULL;
249         }
250         if (strchr_m(username, '@')) {
251                 user_and_realm = SMB_STRDUP(username);
252         } else {
253                 if (asprintf(&user_and_realm, "%s@%s", username, lp_realm()) == -1) {
254                         user_and_realm = NULL;
255                 }
256         }
257         return user_and_realm;
258 }
259
260 /****************************************************************************
261 connect to \\server\ipc$ using KRB5
262 ****************************************************************************/
263
264 NTSTATUS connect_to_ipc_krb5(struct cli_state **c,
265                         struct in_addr *server_ip, const char *server_name)
266 {
267         NTSTATUS nt_status;
268         char *user_and_realm = NULL;
269
270         if (!opt_password && !opt_machine_pass) {
271                 char *pass = getpass("Password:");
272                 if (pass) {
273                         opt_password = SMB_STRDUP(pass);
274                 }
275         }
276
277         user_and_realm = get_user_and_realm(opt_user_name);
278         if (!user_and_realm) {
279                 return NT_STATUS_NO_MEMORY;
280         }
281
282         nt_status = cli_full_connection(c, NULL, server_name, 
283                                         server_ip, opt_port,
284                                         "IPC$", "IPC",  
285                                         user_and_realm, opt_workgroup,
286                                         opt_password, CLI_FULL_CONNECTION_USE_KERBEROS, 
287                                         Undefined, NULL);
288         
289         SAFE_FREE(user_and_realm);
290
291         if (NT_STATUS_IS_OK(nt_status)) {
292                 return nt_status;
293         } else {
294                 DEBUG(1,("Cannot connect to server using kerberos.  Error was %s\n", nt_errstr(nt_status)));
295                 return nt_status;
296         }
297 }
298
299 /**
300  * Connect a server and open a given pipe
301  *
302  * @param cli_dst               A cli_state 
303  * @param pipe                  The pipe to open
304  * @param got_pipe              boolean that stores if we got a pipe
305  *
306  * @return Normal NTSTATUS return.
307  **/
308 NTSTATUS connect_dst_pipe(struct cli_state **cli_dst, struct rpc_pipe_client **pp_pipe_hnd, int pipe_num)
309 {
310         NTSTATUS nt_status;
311         char *server_name = SMB_STRDUP("127.0.0.1");
312         struct cli_state *cli_tmp = NULL;
313         struct rpc_pipe_client *pipe_hnd = NULL;
314
315         if (server_name == NULL) {
316                 return NT_STATUS_NO_MEMORY;
317         }
318
319         if (opt_destination) {
320                 SAFE_FREE(server_name);
321                 if ((server_name = SMB_STRDUP(opt_destination)) == NULL) {
322                         return NT_STATUS_NO_MEMORY;
323                 }
324         }
325
326         /* make a connection to a named pipe */
327         nt_status = connect_to_ipc(&cli_tmp, NULL, server_name);
328         if (!NT_STATUS_IS_OK(nt_status)) {
329                 SAFE_FREE(server_name);
330                 return nt_status;
331         }
332
333         pipe_hnd = cli_rpc_pipe_open_noauth(cli_tmp, pipe_num, &nt_status);
334         if (!pipe_hnd) {
335                 DEBUG(0, ("couldn't not initialize pipe\n"));
336                 cli_shutdown(cli_tmp);
337                 SAFE_FREE(server_name);
338                 return nt_status;
339         }
340
341         *cli_dst = cli_tmp;
342         *pp_pipe_hnd = pipe_hnd;
343         SAFE_FREE(server_name);
344
345         return nt_status;
346 }
347
348 /****************************************************************************
349  Use the local machine's password for this session.
350 ****************************************************************************/
351
352 int net_use_machine_password(void) 
353 {
354         char *user_name = NULL;
355
356         if (!secrets_init()) {
357                 d_fprintf(stderr, "ERROR: Unable to open secrets database\n");
358                 exit(1);
359         }
360
361         user_name = NULL;
362         opt_password = secrets_fetch_machine_password(opt_target_workgroup, NULL, NULL);
363         if (asprintf(&user_name, "%s$@%s", global_myname(), lp_realm()) == -1) {
364                 return -1;
365         }
366         opt_user_name = user_name;
367         return 0;
368 }
369
370 BOOL net_find_server(const char *domain, unsigned flags, struct in_addr *server_ip, char **server_name)
371 {
372         const char *d = domain ? domain : opt_target_workgroup;
373
374         if (opt_host) {
375                 *server_name = SMB_STRDUP(opt_host);
376         }               
377
378         if (opt_have_ip) {
379                 *server_ip = opt_dest_ip;
380                 if (!*server_name) {
381                         *server_name = SMB_STRDUP(inet_ntoa(opt_dest_ip));
382                 }
383         } else if (*server_name) {
384                 /* resolve the IP address */
385                 if (!resolve_name(*server_name, server_ip, 0x20))  {
386                         DEBUG(1,("Unable to resolve server name\n"));
387                         return False;
388                 }
389         } else if (flags & NET_FLAGS_PDC) {
390                 struct in_addr pdc_ip;
391
392                 if (get_pdc_ip(d, &pdc_ip)) {
393                         fstring dc_name;
394                         
395                         if (is_zero_ip(pdc_ip))
396                                 return False;
397                         
398                         if ( !name_status_find(d, 0x1b, 0x20, pdc_ip, dc_name) )
399                                 return False;
400                                 
401                         *server_name = SMB_STRDUP(dc_name);
402                         *server_ip = pdc_ip;
403                 }
404         } else if (flags & NET_FLAGS_DMB) {
405                 struct in_addr msbrow_ip;
406                 /*  if (!resolve_name(MSBROWSE, &msbrow_ip, 1)) */
407                 if (!resolve_name(d, &msbrow_ip, 0x1B))  {
408                         DEBUG(1,("Unable to resolve domain browser via name lookup\n"));
409                         return False;
410                 } else {
411                         *server_ip = msbrow_ip;
412                 }
413                 *server_name = SMB_STRDUP(inet_ntoa(opt_dest_ip));
414         } else if (flags & NET_FLAGS_MASTER) {
415                 struct in_addr brow_ips;
416                 if (!resolve_name(d, &brow_ips, 0x1D))  {
417                                 /* go looking for workgroups */
418                         DEBUG(1,("Unable to resolve master browser via name lookup\n"));
419                         return False;
420                 } else {
421                         *server_ip = brow_ips;
422                 }
423                 *server_name = SMB_STRDUP(inet_ntoa(opt_dest_ip));
424         } else if (!(flags & NET_FLAGS_LOCALHOST_DEFAULT_INSANE)) {
425                 *server_ip = loopback_ip;
426                 *server_name = SMB_STRDUP("127.0.0.1");
427         }
428
429         if (!server_name || !*server_name) {
430                 DEBUG(1,("no server to connect to\n"));
431                 return False;
432         }
433
434         return True;
435 }
436
437
438 BOOL net_find_pdc(struct in_addr *server_ip, fstring server_name, const char *domain_name)
439 {
440         if (get_pdc_ip(domain_name, server_ip)) {
441                 if (is_zero_ip(*server_ip))
442                         return False;
443                 
444                 if (!name_status_find(domain_name, 0x1b, 0x20, *server_ip, server_name))
445                         return False;
446                         
447                 return True;    
448         } 
449         else
450                 return False;
451 }
452
453 struct cli_state *net_make_ipc_connection( unsigned flags )
454 {
455         return net_make_ipc_connection_ex( NULL, NULL, NULL, flags );
456 }
457
458 struct cli_state *net_make_ipc_connection_ex( const char *domain, const char *server,
459                                               struct in_addr *ip, unsigned flags)
460 {
461         char *server_name = NULL;
462         struct in_addr server_ip;
463         struct cli_state *cli = NULL;
464         NTSTATUS nt_status;
465
466         if ( !server || !ip ) {
467                 if (!net_find_server(domain, flags, &server_ip, &server_name)) {
468                         d_fprintf(stderr, "Unable to find a suitable server\n");
469                         return NULL;
470                 }
471         } else {
472                 server_name = SMB_STRDUP( server );
473                 server_ip = *ip;
474         }
475
476         if (flags & NET_FLAGS_ANONYMOUS) {
477                 nt_status = connect_to_ipc_anonymous(&cli, &server_ip, server_name);
478         } else {
479                 nt_status = connect_to_ipc(&cli, &server_ip, server_name);
480         }
481
482         /* store the server in the affinity cache if it was a PDC */
483
484         if ( (flags & NET_FLAGS_PDC) && NT_STATUS_IS_OK(nt_status) )
485                 saf_store( cli->server_domain, cli->desthost );
486
487         SAFE_FREE(server_name);
488         if (NT_STATUS_IS_OK(nt_status)) {
489                 return cli;
490         } else {
491                 d_fprintf(stderr, "Connection failed: %s\n",
492                           nt_errstr(nt_status));
493                 return NULL;
494         }
495 }
496
497 static int net_user(int argc, const char **argv)
498 {
499         if (net_ads_check() == 0)
500                 return net_ads_user(argc, argv);
501
502         /* if server is not specified, default to PDC? */
503         if (net_rpc_check(NET_FLAGS_PDC))
504                 return net_rpc_user(argc, argv);
505
506         return net_rap_user(argc, argv);
507 }
508
509 static int net_group(int argc, const char **argv)
510 {
511         if (net_ads_check() == 0)
512                 return net_ads_group(argc, argv);
513
514         if (argc == 0 && net_rpc_check(NET_FLAGS_PDC))
515                 return net_rpc_group(argc, argv);
516
517         return net_rap_group(argc, argv);
518 }
519
520 static int net_join(int argc, const char **argv)
521 {
522         if (net_ads_check_our_domain() == 0) {
523                 if (net_ads_join(argc, argv) == 0)
524                         return 0;
525                 else
526                         d_fprintf(stderr, "ADS join did not work, falling back to RPC...\n");
527         }
528         return net_rpc_join(argc, argv);
529 }
530
531 static int net_changetrustpw(int argc, const char **argv)
532 {
533         if (net_ads_check_our_domain() == 0)
534                 return net_ads_changetrustpw(argc, argv);
535
536         return net_rpc_changetrustpw(argc, argv);
537 }
538
539 static void set_line_buffering(FILE *f)
540 {
541         setvbuf(f, NULL, _IOLBF, 0);
542 }
543
544 static int net_changesecretpw(int argc, const char **argv)
545 {
546         char *trust_pw;
547         uint32 sec_channel_type = SEC_CHAN_WKSTA;
548
549         if(opt_force) {
550                 if (opt_stdin) {
551                         set_line_buffering(stdin);
552                         set_line_buffering(stdout);
553                         set_line_buffering(stderr);
554                 }
555
556                 trust_pw = get_pass("Enter machine password: ", opt_stdin);
557
558                 if (!secrets_store_machine_password(trust_pw, lp_workgroup(), sec_channel_type)) {
559                             d_fprintf(stderr, "Unable to write the machine account password in the secrets database");
560                             return 1;
561                 }
562                 else {
563                     d_printf("Modified trust account password in secrets database\n");
564                 }
565         }
566         else {
567                 d_printf("Machine account password change requires the -f flag.\n");
568                 d_printf("Do NOT use this function unless you know what it does!\n");
569                 d_printf("This function will change the ADS Domain member machine account password in the secrets.tdb file!\n");
570         }
571
572         return 0;
573 }
574
575 static int net_share(int argc, const char **argv)
576 {
577         if (net_rpc_check(0))
578                 return net_rpc_share(argc, argv);
579         return net_rap_share(argc, argv);
580 }
581
582 static int net_file(int argc, const char **argv)
583 {
584         if (net_rpc_check(0))
585                 return net_rpc_file(argc, argv);
586         return net_rap_file(argc, argv);
587 }
588
589 /*
590  Retrieve our local SID or the SID for the specified name
591  */
592 static int net_getlocalsid(int argc, const char **argv)
593 {
594         DOM_SID sid;
595         const char *name;
596         fstring sid_str;
597
598         if (argc >= 1) {
599                 name = argv[0];
600         }
601         else {
602                 name = global_myname();
603         }
604
605         if(!initialize_password_db(False, NULL)) {
606                 DEBUG(0, ("WARNING: Could not open passdb - local sid may not reflect passdb\n"
607                           "backend knowlege (such as the sid stored in LDAP)\n"));
608         }
609
610         /* first check to see if we can even access secrets, so we don't
611            panic when we can't. */
612
613         if (!secrets_init()) {
614                 d_fprintf(stderr, "Unable to open secrets.tdb.  Can't fetch domain SID for name: %s\n", name);
615                 return 1;
616         }
617
618         /* Generate one, if it doesn't exist */
619         get_global_sam_sid();
620
621         if (!secrets_fetch_domain_sid(name, &sid)) {
622                 DEBUG(0, ("Can't fetch domain SID for name: %s\n", name));
623                 return 1;
624         }
625         sid_to_string(sid_str, &sid);
626         d_printf("SID for domain %s is: %s\n", name, sid_str);
627         return 0;
628 }
629
630 static int net_setlocalsid(int argc, const char **argv)
631 {
632         DOM_SID sid;
633
634         if ( (argc != 1)
635              || (strncmp(argv[0], "S-1-5-21-", strlen("S-1-5-21-")) != 0)
636              || (!string_to_sid(&sid, argv[0]))
637              || (sid.num_auths != 4)) {
638                 d_printf("usage: net setlocalsid S-1-5-21-x-y-z\n");
639                 return 1;
640         }
641
642         if (!secrets_store_domain_sid(global_myname(), &sid)) {
643                 DEBUG(0,("Can't store domain SID as a pdc/bdc.\n"));
644                 return 1;
645         }
646
647         return 0;
648 }
649
650 static int net_setdomainsid(int argc, const char **argv)
651 {
652         DOM_SID sid;
653
654         if ( (argc != 1)
655              || (strncmp(argv[0], "S-1-5-21-", strlen("S-1-5-21-")) != 0)
656              || (!string_to_sid(&sid, argv[0]))
657              || (sid.num_auths != 4)) {
658                 d_printf("usage: net setdomainsid S-1-5-21-x-y-z\n");
659                 return 1;
660         }
661
662         if (!secrets_store_domain_sid(lp_workgroup(), &sid)) {
663                 DEBUG(0,("Can't store domain SID.\n"));
664                 return 1;
665         }
666
667         return 0;
668 }
669
670 static int net_getdomainsid(int argc, const char **argv)
671 {
672         DOM_SID domain_sid;
673         fstring sid_str;
674
675         if(!initialize_password_db(False, NULL)) {
676                 DEBUG(0, ("WARNING: Could not open passdb - domain sid may not reflect passdb\n"
677                           "backend knowlege (such as the sid stored in LDAP)\n"));
678         }
679
680         /* Generate one, if it doesn't exist */
681         get_global_sam_sid();
682
683         if (!secrets_fetch_domain_sid(global_myname(), &domain_sid)) {
684                 d_fprintf(stderr, "Could not fetch local SID\n");
685                 return 1;
686         }
687         sid_to_string(sid_str, &domain_sid);
688         d_printf("SID for domain %s is: %s\n", global_myname(), sid_str);
689
690         if (!secrets_fetch_domain_sid(opt_workgroup, &domain_sid)) {
691                 d_fprintf(stderr, "Could not fetch domain SID\n");
692                 return 1;
693         }
694
695         sid_to_string(sid_str, &domain_sid);
696         d_printf("SID for domain %s is: %s\n", opt_workgroup, sid_str);
697
698         return 0;
699 }
700
701 #ifdef WITH_FAKE_KASERVER
702
703 int net_help_afs(int argc, const char **argv)
704 {
705         d_printf("  net afs key filename\n"
706                  "\tImports a OpenAFS KeyFile into our secrets.tdb\n\n");
707         d_printf("  net afs impersonate <user> <cell>\n"
708                  "\tCreates a token for user@cell\n\n");
709         return -1;
710 }
711
712 static int net_afs_key(int argc, const char **argv)
713 {
714         int fd;
715         struct afs_keyfile keyfile;
716
717         if (argc != 2) {
718                 d_printf("usage: 'net afs key <keyfile> cell'\n");
719                 return -1;
720         }
721
722         if (!secrets_init()) {
723                 d_fprintf(stderr, "Could not open secrets.tdb\n");
724                 return -1;
725         }
726
727         if ((fd = open(argv[0], O_RDONLY, 0)) < 0) {
728                 d_fprintf(stderr, "Could not open %s\n", argv[0]);
729                 return -1;
730         }
731
732         if (read(fd, &keyfile, sizeof(keyfile)) != sizeof(keyfile)) {
733                 d_fprintf(stderr, "Could not read keyfile\n");
734                 return -1;
735         }
736
737         if (!secrets_store_afs_keyfile(argv[1], &keyfile)) {
738                 d_fprintf(stderr, "Could not write keyfile to secrets.tdb\n");
739                 return -1;
740         }
741
742         return 0;
743 }
744
745 static int net_afs_impersonate(int argc, const char **argv)
746 {
747         char *token;
748
749         if (argc != 2) {
750                 fprintf(stderr, "Usage: net afs impersonate <user> <cell>\n");
751                 exit(1);
752         }
753
754         token = afs_createtoken_str(argv[0], argv[1]);
755
756         if (token == NULL) {
757                 fprintf(stderr, "Could not create token\n");
758                 exit(1);
759         }
760
761         if (!afs_settoken_str(token)) {
762                 fprintf(stderr, "Could not set token into kernel\n");
763                 exit(1);
764         }
765
766         printf("Success: %s@%s\n", argv[0], argv[1]);
767         return 0;
768 }
769
770 static int net_afs(int argc, const char **argv)
771 {
772         struct functable func[] = {
773                 {"key", net_afs_key},
774                 {"impersonate", net_afs_impersonate},
775                 {"help", net_help_afs},
776                 {NULL, NULL}
777         };
778         return net_run_function(argc, argv, func, net_help_afs);
779 }
780
781 #endif /* WITH_FAKE_KASERVER */
782
783 static BOOL search_maxrid(struct pdb_search *search, const char *type,
784                           uint32 *max_rid)
785 {
786         struct samr_displayentry *entries;
787         uint32 i, num_entries;
788
789         if (search == NULL) {
790                 d_fprintf(stderr, "get_maxrid: Could not search %s\n", type);
791                 return False;
792         }
793
794         num_entries = pdb_search_entries(search, 0, 0xffffffff, &entries);
795         for (i=0; i<num_entries; i++)
796                 *max_rid = MAX(*max_rid, entries[i].rid);
797         pdb_search_destroy(search);
798         return True;
799 }
800
801 static uint32 get_maxrid(void)
802 {
803         uint32 max_rid = 0;
804
805         if (!search_maxrid(pdb_search_users(0), "users", &max_rid))
806                 return 0;
807
808         if (!search_maxrid(pdb_search_groups(), "groups", &max_rid))
809                 return 0;
810
811         if (!search_maxrid(pdb_search_aliases(get_global_sam_sid()),
812                            "aliases", &max_rid))
813                 return 0;
814         
815         return max_rid;
816 }
817
818 static int net_maxrid(int argc, const char **argv)
819 {
820         uint32 rid;
821
822         if (argc != 0) {
823                 DEBUG(0, ("usage: net maxrid\n"));
824                 return 1;
825         }
826
827         if ((rid = get_maxrid()) == 0) {
828                 DEBUG(0, ("can't get current maximum rid\n"));
829                 return 1;
830         }
831
832         d_printf("Currently used maximum rid: %d\n", rid);
833
834         return 0;
835 }
836
837 /* main function table */
838 static struct functable net_func[] = {
839         {"RPC", net_rpc},
840         {"RAP", net_rap},
841         {"ADS", net_ads},
842
843         /* eventually these should auto-choose the transport ... */
844         {"FILE", net_file},
845         {"SHARE", net_share},
846         {"SESSION", net_rap_session},
847         {"SERVER", net_rap_server},
848         {"DOMAIN", net_rap_domain},
849         {"PRINTQ", net_rap_printq},
850         {"USER", net_user},
851         {"GROUP", net_group},
852         {"GROUPMAP", net_groupmap},
853         {"SAM", net_sam},
854         {"VALIDATE", net_rap_validate},
855         {"GROUPMEMBER", net_rap_groupmember},
856         {"ADMIN", net_rap_admin},
857         {"SERVICE", net_rap_service},   
858         {"PASSWORD", net_rap_password},
859         {"CHANGETRUSTPW", net_changetrustpw},
860         {"CHANGESECRETPW", net_changesecretpw},
861         {"TIME", net_time},
862         {"LOOKUP", net_lookup},
863         {"JOIN", net_join},
864         {"CACHE", net_cache},
865         {"GETLOCALSID", net_getlocalsid},
866         {"SETLOCALSID", net_setlocalsid},
867         {"SETDOMAINSID", net_setdomainsid},
868         {"GETDOMAINSID", net_getdomainsid},
869         {"MAXRID", net_maxrid},
870         {"IDMAP", net_idmap},
871         {"STATUS", net_status},
872         {"USERSHARE", net_usershare},
873         {"USERSIDLIST", net_usersidlist},
874         {"CONF", net_conf},
875 #ifdef WITH_FAKE_KASERVER
876         {"AFS", net_afs},
877 #endif
878
879         {"HELP", net_help},
880         {NULL, NULL}
881 };
882
883
884 /****************************************************************************
885   main program
886 ****************************************************************************/
887  int main(int argc, const char **argv)
888 {
889         int opt,i;
890         char *p;
891         int rc = 0;
892         int argc_new = 0;
893         const char ** argv_new;
894         poptContext pc;
895
896         struct poptOption long_options[] = {
897                 {"help",        'h', POPT_ARG_NONE,   0, 'h'},
898                 {"workgroup",   'w', POPT_ARG_STRING, &opt_target_workgroup},
899                 {"user",        'U', POPT_ARG_STRING, &opt_user_name, 'U'},
900                 {"ipaddress",   'I', POPT_ARG_STRING, 0,'I'},
901                 {"port",        'p', POPT_ARG_INT,    &opt_port},
902                 {"myname",      'n', POPT_ARG_STRING, &opt_requester_name},
903                 {"server",      'S', POPT_ARG_STRING, &opt_host},
904                 {"container",   'c', POPT_ARG_STRING, &opt_container},
905                 {"comment",     'C', POPT_ARG_STRING, &opt_comment},
906                 {"maxusers",    'M', POPT_ARG_INT,    &opt_maxusers},
907                 {"flags",       'F', POPT_ARG_INT,    &opt_flags},
908                 {"long",        'l', POPT_ARG_NONE,   &opt_long_list_entries},
909                 {"reboot",      'r', POPT_ARG_NONE,   &opt_reboot},
910                 {"force",       'f', POPT_ARG_NONE,   &opt_force},
911                 {"stdin",       'i', POPT_ARG_NONE,   &opt_stdin},
912                 {"timeout",     't', POPT_ARG_INT,    &opt_timeout},
913                 {"machine-pass",'P', POPT_ARG_NONE,   &opt_machine_pass},
914                 {"myworkgroup", 'W', POPT_ARG_STRING, &opt_workgroup},
915                 {"verbose",     'v', POPT_ARG_NONE,   &opt_verbose},
916                 {"test",        'T', POPT_ARG_NONE,   &opt_testmode},
917                 /* Options for 'net groupmap set' */
918                 {"local",       'L', POPT_ARG_NONE,   &opt_localgroup},
919                 {"domain",      'D', POPT_ARG_NONE,   &opt_domaingroup},
920                 {"ntname",      'N', POPT_ARG_STRING, &opt_newntname},
921                 {"rid",         'R', POPT_ARG_INT,    &opt_rid},
922                 /* Options for 'net rpc share migrate' */
923                 {"acls",        0, POPT_ARG_NONE,     &opt_acls},
924                 {"attrs",       0, POPT_ARG_NONE,     &opt_attrs},
925                 {"timestamps",  0, POPT_ARG_NONE,     &opt_timestamps},
926                 {"exclude",     'e', POPT_ARG_STRING, &opt_exclude},
927                 {"destination", 0, POPT_ARG_STRING,   &opt_destination},
928                 {"tallocreport", 0, POPT_ARG_NONE, &do_talloc_report},
929
930                 POPT_COMMON_SAMBA
931                 { 0, 0, 0, 0}
932         };
933
934         zero_ip(&opt_dest_ip);
935
936         load_case_tables();
937
938         /* set default debug level to 0 regardless of what smb.conf sets */
939         DEBUGLEVEL_CLASS[DBGC_ALL] = 0;
940         dbf = x_stderr;
941         
942         pc = poptGetContext(NULL, argc, (const char **) argv, long_options, 
943                             POPT_CONTEXT_KEEP_FIRST);
944         
945         while((opt = poptGetNextOpt(pc)) != -1) {
946                 switch (opt) {
947                 case 'h':
948                         net_help(argc, argv);
949                         exit(0);
950                         break;
951                 case 'I':
952                         opt_dest_ip = *interpret_addr2(poptGetOptArg(pc));
953                         if (is_zero_ip(opt_dest_ip))
954                                 d_fprintf(stderr, "\nInvalid ip address specified\n");
955                         else
956                                 opt_have_ip = True;
957                         break;
958                 case 'U':
959                         opt_user_specified = True;
960                         opt_user_name = SMB_STRDUP(opt_user_name);
961                         p = strchr(opt_user_name,'%');
962                         if (p) {
963                                 *p = 0;
964                                 opt_password = p+1;
965                         }
966                         break;
967                 default:
968                         d_fprintf(stderr, "\nInvalid option %s: %s\n", 
969                                  poptBadOption(pc, 0), poptStrerror(opt));
970                         net_help(argc, argv);
971                         exit(1);
972                 }
973         }
974         
975         /*
976          * Don't load debug level from smb.conf. It should be
977          * set by cmdline arg or remain default (0)
978          */
979         AllowDebugChange = False;
980         lp_load(dyn_CONFIGFILE,True,False,False,True);
981         
982         argv_new = (const char **)poptGetArgs(pc);
983
984         argc_new = argc;
985         for (i=0; i<argc; i++) {
986                 if (argv_new[i] == NULL) {
987                         argc_new = i;
988                         break;
989                 }
990         }
991
992         if (do_talloc_report) {
993                 talloc_enable_leak_report();
994         }
995
996         if (opt_requester_name) {
997                 set_global_myname(opt_requester_name);
998         }
999
1000         if (!opt_user_name && getenv("LOGNAME")) {
1001                 opt_user_name = getenv("LOGNAME");
1002         }
1003
1004         if (!opt_workgroup) {
1005                 opt_workgroup = smb_xstrdup(lp_workgroup());
1006         }
1007         
1008         if (!opt_target_workgroup) {
1009                 opt_target_workgroup = smb_xstrdup(lp_workgroup());
1010         }
1011         
1012         if (!init_names())
1013                 exit(1);
1014
1015         load_interfaces();
1016         
1017         /* this makes sure that when we do things like call scripts, 
1018            that it won't assert becouse we are not root */
1019         sec_init();
1020
1021         if (opt_machine_pass) {
1022                 /* it is very useful to be able to make ads queries as the
1023                    machine account for testing purposes and for domain leave */
1024
1025                 net_use_machine_password();
1026         }
1027
1028         if (!opt_password) {
1029                 opt_password = getenv("PASSWD");
1030         }
1031          
1032         rc = net_run_function(argc_new-1, argv_new+1, net_func, net_help);
1033         
1034         DEBUG(2,("return code = %d\n", rc));
1035         return rc;
1036 }