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