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