b2a86bb020160fd23be3301b61d8580c7e3c3b32
[kai/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 #define HAVE_SMB_REGISTER_PASSDB
44 #include "module_dummy.h"
45
46
47 /***********************************************************************/
48 /* Beginning of internationalization section.  Translatable constants  */
49 /* should be kept in this area and referenced in the rest of the code. */
50 /*                                                                     */
51 /* No functions, outside of Samba or LSB (Linux Standards Base) should */
52 /* be used (if possible).                                              */
53 /***********************************************************************/
54
55 #define YES_STRING              "Yes"
56 #define NO_STRING               "No"
57
58 /************************************************************************************/
59 /*                       end of internationalization section                        */
60 /************************************************************************************/
61
62 /* Yes, these buggers are globals.... */
63 const char *opt_requester_name = NULL;
64 const char *opt_host = NULL; 
65 const char *opt_password = NULL;
66 const char *opt_user_name = NULL;
67 BOOL opt_user_specified = False;
68 const char *opt_workgroup = NULL;
69 int opt_long_list_entries = 0;
70 int opt_reboot = 0;
71 int opt_force = 0;
72 int opt_port = 0;
73 int opt_maxusers = -1;
74 const char *opt_comment = "";
75 const char *opt_container = "cn=Users";
76 int opt_flags = -1;
77 int opt_timeout = 0;
78 const char *opt_target_workgroup = NULL;
79 static int opt_machine_pass = 0;
80
81 BOOL opt_have_ip = False;
82 struct in_addr opt_dest_ip;
83
84 uint32 get_sec_channel_type(const char *param) 
85 {
86         if (!(param && *param)) {
87                 return get_default_sec_channel();
88         } else {
89                 if (strcasecmp(param, "PDC")==0) {
90                         return SEC_CHAN_BDC;
91                 } else if (strcasecmp(param, "BDC")==0) {
92                         return SEC_CHAN_BDC;
93                 } else if (strcasecmp(param, "MEMBER")==0) {
94                         return SEC_CHAN_WKSTA;
95 #if 0                   
96                 } else if (strcasecmp(param, "DOMAIN")==0) {
97                         return SEC_CHAN_DOMAIN;
98 #endif
99                 } else {
100                         return get_default_sec_channel();
101                 }
102         }
103 }
104
105 /*
106   run a function from a function table. If not found then
107   call the specified usage function 
108 */
109 int net_run_function(int argc, const char **argv, struct functable *table, 
110                      int (*usage_fn)(int argc, const char **argv))
111 {
112         int i;
113         
114         if (argc < 1) {
115                 d_printf("\nUsage: \n");
116                 return usage_fn(argc, argv);
117         }
118         for (i=0; table[i].funcname; i++) {
119                 if (StrCaseCmp(argv[0], table[i].funcname) == 0)
120                         return table[i].fn(argc-1, argv+1);
121         }
122         d_printf("No command: %s\n", argv[0]);
123         return usage_fn(argc, argv);
124 }
125
126
127 /****************************************************************************
128 connect to \\server\ipc$  
129 ****************************************************************************/
130 NTSTATUS connect_to_ipc(struct cli_state **c, struct in_addr *server_ip,
131                                         const char *server_name)
132 {
133         NTSTATUS nt_status;
134
135         if (!opt_password) {
136                 char *pass = getpass("Password:");
137                 if (pass) {
138                         opt_password = strdup(pass);
139                 }
140         }
141         
142         nt_status = cli_full_connection(c, opt_requester_name, server_name, 
143                                         server_ip, opt_port,
144                                         "IPC$", "IPC",  
145                                         opt_user_name, opt_workgroup,
146                                         opt_password, 0, NULL);
147         
148         if (NT_STATUS_IS_OK(nt_status)) {
149                 return nt_status;
150         } else {
151                 DEBUG(1,("Cannot connect to server.  Error was %s\n", 
152                          nt_errstr(nt_status)));
153
154                 /* Display a nicer message depending on the result */
155
156                 if (NT_STATUS_V(nt_status) == 
157                     NT_STATUS_V(NT_STATUS_LOGON_FAILURE))
158                         d_printf("The username or password was not correct.\n");
159
160                 return nt_status;
161         }
162 }
163
164 /****************************************************************************
165 connect to \\server\ipc$ anonymously
166 ****************************************************************************/
167 NTSTATUS connect_to_ipc_anonymous(struct cli_state **c,
168                         struct in_addr *server_ip, const char *server_name)
169 {
170         NTSTATUS nt_status;
171
172         nt_status = cli_full_connection(c, opt_requester_name, server_name, 
173                                         server_ip, opt_port,
174                                         "IPC$", "IPC",  
175                                         "", "",
176                                         "", 0, NULL);
177         
178         if (NT_STATUS_IS_OK(nt_status)) {
179                 return nt_status;
180         } else {
181                 DEBUG(1,("Cannot connect to server (anonymously).  Error was %s\n", nt_errstr(nt_status)));
182                 return nt_status;
183         }
184 }
185
186 BOOL net_find_server(unsigned flags, struct in_addr *server_ip, char **server_name)
187 {
188
189         if (opt_host) {
190                 *server_name = strdup(opt_host);
191         }               
192
193         if (opt_have_ip) {
194                 *server_ip = opt_dest_ip;
195                 if (!*server_name) {
196                         *server_name = strdup(inet_ntoa(opt_dest_ip));
197                 }
198         } else if (*server_name) {
199                 /* resolve the IP address */
200                 if (!resolve_name(*server_name, server_ip, 0x20))  {
201                         DEBUG(1,("Unable to resolve server name\n"));
202                         return False;
203                 }
204         } else if (flags & NET_FLAGS_PDC) {
205                 struct in_addr pdc_ip;
206
207                 if (get_pdc_ip(opt_target_workgroup, &pdc_ip)) {
208                         fstring dc_name;
209                         
210                         if (is_zero_ip(pdc_ip))
211                                 return False;
212                         
213                         if (!lookup_dc_name(global_myname(), opt_target_workgroup, &pdc_ip, dc_name))
214                                 return False;
215                                 
216                         *server_name = strdup(dc_name);
217                         *server_ip = pdc_ip;
218                 }
219                 
220         } else if (flags & NET_FLAGS_DMB) {
221                 struct in_addr msbrow_ip;
222                 /*  if (!resolve_name(MSBROWSE, &msbrow_ip, 1)) */
223                 if (!resolve_name(opt_target_workgroup, &msbrow_ip, 0x1B))  {
224                         DEBUG(1,("Unable to resolve domain browser via name lookup\n"));
225                         return False;
226                 } else {
227                         *server_ip = msbrow_ip;
228                 }
229                 *server_name = strdup(inet_ntoa(opt_dest_ip));
230         } else if (flags & NET_FLAGS_MASTER) {
231                 struct in_addr brow_ips;
232                 if (!resolve_name(opt_target_workgroup, &brow_ips, 0x1D))  {
233                                 /* go looking for workgroups */
234                         DEBUG(1,("Unable to resolve master browser via name lookup\n"));
235                         return False;
236                 } else {
237                         *server_ip = brow_ips;
238                 }
239                 *server_name = strdup(inet_ntoa(opt_dest_ip));
240         } else if (!(flags & NET_FLAGS_LOCALHOST_DEFAULT_INSANE)) {
241                 extern struct in_addr loopback_ip;
242                 *server_ip = loopback_ip;
243                 *server_name = strdup("127.0.0.1");
244         }
245
246         if (!server_name || !*server_name) {
247                 DEBUG(1,("no server to connect to\n"));
248                 return False;
249         }
250
251         return True;
252 }
253
254
255 BOOL net_find_dc(struct in_addr *server_ip, fstring server_name, const char *domain_name)
256 {
257         if (get_pdc_ip(domain_name, server_ip)) {
258                 fstring dc_name;
259                         
260                 if (is_zero_ip(*server_ip))
261                         return False;
262                 
263                 if (!lookup_dc_name(global_myname(), domain_name, server_ip, dc_name))
264                         return False;
265                         
266                 fstrcpy(server_name, dc_name);
267                 return True;
268         } else
269                 return False;
270 }
271
272
273 struct cli_state *net_make_ipc_connection(unsigned flags)
274 {
275         char *server_name = NULL;
276         struct in_addr server_ip;
277         struct cli_state *cli = NULL;
278         NTSTATUS nt_status;
279
280         if (!net_find_server(flags, &server_ip, &server_name)) {
281                 d_printf("\nUnable to find a suitable server\n");
282                 return NULL;
283         }
284
285         if (flags & NET_FLAGS_ANONYMOUS) {
286                 nt_status = connect_to_ipc_anonymous(&cli, &server_ip, server_name);
287         } else {
288                 nt_status = connect_to_ipc(&cli, &server_ip, server_name);
289         }
290
291         SAFE_FREE(server_name);
292         if (NT_STATUS_IS_OK(nt_status)) {
293                 return cli;
294         } else {
295                 return NULL;
296         }
297 }
298
299 static int net_user(int argc, const char **argv)
300 {
301         if (net_ads_check() == 0)
302                 return net_ads_user(argc, argv);
303
304         /* if server is not specified, default to PDC? */
305         if (net_rpc_check(NET_FLAGS_PDC))
306                 return net_rpc_user(argc, argv);
307
308         return net_rap_user(argc, argv);
309 }
310
311 static int net_group(int argc, const char **argv)
312 {
313         if (net_ads_check() == 0)
314                 return net_ads_group(argc, argv);
315
316         if (argc == 0 && net_rpc_check(NET_FLAGS_PDC))
317                 return net_rpc_group(argc, argv);
318
319         return net_rap_group(argc, argv);
320 }
321
322 static int net_join(int argc, const char **argv)
323 {
324         if (net_ads_check() == 0) {
325                 if (net_ads_join(argc, argv) == 0)
326                         return 0;
327                 else
328                         d_printf("ADS join did not work, trying RPC...\n");
329         }
330         return net_rpc_join(argc, argv);
331 }
332
333 static int net_changetrustpw(int argc, const char **argv)
334 {
335         if (net_ads_check() == 0)
336                 return net_ads_changetrustpw(argc, argv);
337
338         return net_rpc_changetrustpw(argc, argv);
339 }
340
341 static int net_share(int argc, const char **argv)
342 {
343         if (net_rpc_check(0))
344                 return net_rpc_share(argc, argv);
345         return net_rap_share(argc, argv);
346 }
347
348 static int net_file(int argc, const char **argv)
349 {
350         if (net_rpc_check(0))
351                 return net_rpc_file(argc, argv);
352         return net_rap_file(argc, argv);
353 }
354
355 /***********************************************************
356  migrated functionality from smbgroupedit
357  **********************************************************/
358 static int net_groupmap(int argc, const char **argv)
359 {
360         if ( 0 == argc )
361                 return net_help_groupmap( argc, argv );
362
363         if ( !StrCaseCmp( argv[0], "add" ) )
364                 return net_groupmap_add(argc-1, argv+1);
365         else if ( !StrCaseCmp( argv[0], "modify" ) )
366                 return net_groupmap_modify(argc-1, argv+1);
367         else if ( !StrCaseCmp( argv[0], "delete" ) )
368                 return net_groupmap_delete(argc-1, argv+1);
369         else if ( !StrCaseCmp( argv[0], "list" ) )
370                 return net_groupmap_list(argc-1, argv+1);
371         
372         return net_help_groupmap( argc, argv );
373 }
374
375 /*
376  Retrieve our local SID or the SID for the specified name
377  */
378 static int net_getlocalsid(int argc, const char **argv)
379 {
380         DOM_SID sid;
381         const char *name;
382         fstring sid_str;
383
384         if (argc >= 1) {
385                 name = argv[0];
386         }
387         else {
388                 name = global_myname();
389         }
390
391         if (!secrets_fetch_domain_sid(name, &sid)) {
392                 DEBUG(0, ("Can't fetch domain SID for name: %s\n", name));      
393                 return 1;
394         }
395         sid_to_string(sid_str, &sid);
396         d_printf("SID for domain %s is: %s\n", name, sid_str);
397         return 0;
398 }
399
400 static int net_setlocalsid(int argc, const char **argv)
401 {
402         DOM_SID sid;
403
404         if ( (argc != 1)
405              || (strncmp(argv[0], "S-1-5-21-", strlen("S-1-5-21-")) != 0)
406              || (!string_to_sid(&sid, argv[0]))
407              || (sid.num_auths != 4)) {
408                 d_printf("usage: net setlocalsid S-1-5-21-x-y-z\n");
409                 return 1;
410         }
411
412         if (!secrets_store_domain_sid(global_myname(), &sid)) {
413                 DEBUG(0,("Can't store domain SID as a pdc/bdc.\n"));
414                 return 1;
415         }
416
417         return 0;
418 }
419
420 static int net_getdomainsid(int argc, const char **argv)
421 {
422         DOM_SID domain_sid;
423         fstring sid_str;
424
425         if (!secrets_fetch_domain_sid(global_myname(), &domain_sid)) {
426                 d_printf("Could not fetch local SID\n");
427                 return 1;
428         }
429         sid_to_string(sid_str, &domain_sid);
430         d_printf("SID for domain %s is: %s\n", global_myname(), sid_str);
431
432         if (!secrets_fetch_domain_sid(opt_workgroup, &domain_sid)) {
433                 d_printf("Could not fetch domain SID\n");
434                 return 1;
435         }
436
437         sid_to_string(sid_str, &domain_sid);
438         d_printf("SID for domain %s is: %s\n", opt_workgroup, sid_str);
439
440         return 0;
441 }
442
443 static uint32 get_maxrid(void)
444 {
445         SAM_ACCOUNT *pwd = NULL;
446         uint32 max_rid = 0;
447         GROUP_MAP *map = NULL;
448         int num_entries = 0;
449         int i;
450
451         if (!pdb_setsampwent(False)) {
452                 DEBUG(0, ("load_sampwd_entries: Unable to open passdb.\n"));
453                 return 0;
454         }
455
456         for (; (NT_STATUS_IS_OK(pdb_init_sam(&pwd))) 
457                      && pdb_getsampwent(pwd) == True; pwd=NULL) {
458                 uint32 rid;
459
460                 if (!sid_peek_rid(pdb_get_user_sid(pwd), &rid)) {
461                         DEBUG(0, ("can't get RID for user '%s'\n",
462                                   pdb_get_username(pwd)));
463                         pdb_free_sam(&pwd);
464                         continue;
465                 }
466
467                 if (rid > max_rid)
468                         max_rid = rid;
469
470                 DEBUG(1,("%d is user '%s'\n", rid, pdb_get_username(pwd)));
471                 pdb_free_sam(&pwd);
472         }
473
474         pdb_endsampwent();
475         pdb_free_sam(&pwd);
476
477         if (!pdb_enum_group_mapping(SID_NAME_UNKNOWN, &map, &num_entries,
478                                     ENUM_ONLY_MAPPED, MAPPING_WITHOUT_PRIV))
479                 return max_rid;
480
481         for (i = 0; i < num_entries; i++) {
482                 uint32 rid;
483
484                 if (!sid_peek_check_rid(get_global_sam_sid(), &map[i].sid,
485                                         &rid)) {
486                         DEBUG(3, ("skipping map for group '%s', SID %s\n",
487                                   map[i].nt_name,
488                                   sid_string_static(&map[i].sid)));
489                         continue;
490                 }
491                 DEBUG(1,("%d is group '%s'\n", rid, map[i].nt_name));
492
493                 if (rid > max_rid)
494                         max_rid = rid;
495         }
496
497         SAFE_FREE(map);
498
499         return max_rid;
500 }
501
502 static int net_maxrid(int argc, const char **argv)
503 {
504         uint32 rid;
505
506         if (argc != 0) {
507                 DEBUG(0, ("usage: net maxrid\n"));
508                 return 1;
509         }
510
511         if ((rid = get_maxrid()) == 0) {
512                 DEBUG(0, ("can't get current maximum rid\n"));
513                 return 1;
514         }
515
516         d_printf("Currently used maximum rid: %d\n", rid);
517
518         return 0;
519 }
520
521 /* main function table */
522 static struct functable net_func[] = {
523         {"RPC", net_rpc},
524         {"RAP", net_rap},
525         {"ADS", net_ads},
526
527         /* eventually these should auto-choose the transport ... */
528         {"FILE", net_file},
529         {"SHARE", net_share},
530         {"SESSION", net_rap_session},
531         {"SERVER", net_rap_server},
532         {"DOMAIN", net_rap_domain},
533         {"PRINTQ", net_rap_printq},
534         {"USER", net_user},
535         {"GROUP", net_group},
536         {"GROUPMAP", net_groupmap},
537         {"VALIDATE", net_rap_validate},
538         {"GROUPMEMBER", net_rap_groupmember},
539         {"ADMIN", net_rap_admin},
540         {"SERVICE", net_rap_service},   
541         {"PASSWORD", net_rap_password},
542         {"CHANGETRUSTPW", net_changetrustpw},
543         {"TIME", net_time},
544         {"LOOKUP", net_lookup},
545         {"JOIN", net_join},
546         {"CACHE", net_cache},
547         {"GETLOCALSID", net_getlocalsid},
548         {"SETLOCALSID", net_setlocalsid},
549         {"GETDOMAINSID", net_getdomainsid},
550         {"MAXRID", net_maxrid},
551
552         {"HELP", net_help},
553         {NULL, NULL}
554 };
555
556
557 /****************************************************************************
558   main program
559 ****************************************************************************/
560  int main(int argc, const char **argv)
561 {
562         int opt,i;
563         char *p;
564         int rc = 0;
565         int argc_new = 0;
566         const char ** argv_new;
567         poptContext pc;
568
569         struct poptOption long_options[] = {
570                 {"help",        'h', POPT_ARG_NONE,   0, 'h'},
571                 {"workgroup",   'w', POPT_ARG_STRING, &opt_target_workgroup},
572                 {"user",        'U', POPT_ARG_STRING, &opt_user_name, 'U'},
573                 {"ipaddress",   'I', POPT_ARG_STRING, 0,'I'},
574                 {"port",        'p', POPT_ARG_INT,    &opt_port},
575                 {"myname",      'n', POPT_ARG_STRING, &opt_requester_name},
576                 {"server",      'S', POPT_ARG_STRING, &opt_host},
577                 {"container",   'c', POPT_ARG_STRING, &opt_container},
578                 {"comment",     'C', POPT_ARG_STRING, &opt_comment},
579                 {"maxusers",    'M', POPT_ARG_INT,    &opt_maxusers},
580                 {"flags",       'F', POPT_ARG_INT,    &opt_flags},
581                 {"long",        'l', POPT_ARG_NONE,   &opt_long_list_entries},
582                 {"reboot",      'r', POPT_ARG_NONE,   &opt_reboot},
583                 {"force",       'f', POPT_ARG_NONE,   &opt_force},
584                 {"timeout",     't', POPT_ARG_INT,    &opt_timeout},
585                 {"machine-pass",'P', POPT_ARG_NONE,   &opt_machine_pass},
586                 {"myworkgroup", 'W', POPT_ARG_STRING, &opt_workgroup},
587                 POPT_COMMON_SAMBA
588                 { 0, 0, 0, 0}
589         };
590
591         zero_ip(&opt_dest_ip);
592
593         dbf = x_stderr;
594         
595         pc = poptGetContext(NULL, argc, (const char **) argv, long_options, 
596                             POPT_CONTEXT_KEEP_FIRST);
597         
598         while((opt = poptGetNextOpt(pc)) != -1) {
599                 switch (opt) {
600                 case 'h':
601                         net_help(argc, argv);
602                         exit(0);
603                         break;
604                 case 'I':
605                         opt_dest_ip = *interpret_addr2(poptGetOptArg(pc));
606                         if (is_zero_ip(opt_dest_ip))
607                                 d_printf("\nInvalid ip address specified\n");
608                         else
609                                 opt_have_ip = True;
610                         break;
611                 case 'U':
612                         opt_user_specified = True;
613                         opt_user_name = strdup(opt_user_name);
614                         p = strchr(opt_user_name,'%');
615                         if (p) {
616                                 *p = 0;
617                                 opt_password = p+1;
618                         }
619                         break;
620                 default:
621                         d_printf("\nInvalid option %s: %s\n", 
622                                  poptBadOption(pc, 0), poptStrerror(opt));
623                         net_help(argc, argv);
624                         exit(1);
625                 }
626         }
627         
628         lp_load(dyn_CONFIGFILE,True,False,False);       
629
630         argv_new = (const char **)poptGetArgs(pc);
631
632         argc_new = argc;
633         for (i=0; i<argc; i++) {
634                 if (argv_new[i] == NULL) {
635                         argc_new = i;
636                         break;
637                 }
638         }
639
640         if (!opt_requester_name) {
641                 static fstring myname;
642                 get_myname(myname);
643                 opt_requester_name = myname;
644         }
645
646         if (!opt_user_name && getenv("LOGNAME")) {
647                 opt_user_name = getenv("LOGNAME");
648         }
649
650         if (!opt_workgroup) {
651                 opt_workgroup = smb_xstrdup(lp_workgroup());
652         }
653         
654         if (!opt_target_workgroup) {
655                 opt_target_workgroup = smb_xstrdup(lp_workgroup());
656         }
657         
658         if (!init_names())
659                 exit(1);
660
661         load_interfaces();
662
663         if (opt_machine_pass) {
664                 char *user = NULL;
665                 /* it is very useful to be able to make ads queries as the
666                    machine account for testing purposes and for domain leave */
667
668                 if (!secrets_init()) {
669                         d_printf("ERROR: Unable to open secrets database\n");
670                         exit(1);
671                 }
672
673                 opt_password = secrets_fetch_machine_password(opt_workgroup, NULL, NULL);
674
675                 asprintf(&user,"%s$", global_myname());
676                 opt_user_name = user;
677                 if (!opt_password) {
678                         d_printf("ERROR: Unable to fetch machine password\n");
679                         exit(1);
680                 }
681         }
682
683         if (!opt_password) {
684                 opt_password = getenv("PASSWD");
685         }
686          
687         rc = net_run_function(argc_new-1, argv_new+1, net_func, net_help);
688         
689         DEBUG(2,("return code = %d\n", rc));
690         return rc;
691 }