global_myname is a pstring, not an fstring
[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 /***********************************************************************/
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 char *opt_requester_name = NULL;
60 char *opt_host = NULL; 
61 char *opt_password = NULL;
62 char *opt_user_name = NULL;
63 BOOL opt_user_specified = False;
64 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 char *opt_comment = "";
71 int opt_flags = -1;
72 int opt_jobid = 0;
73 int opt_timeout = 0;
74 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 extern pstring global_myname;
81 extern BOOL AllowDebugChange;
82
83 /*
84   run a function from a function table. If not found then
85   call the specified usage function 
86 */
87 int net_run_function(int argc, const char **argv, struct functable *table, 
88                      int (*usage_fn)(int argc, const char **argv))
89 {
90         int i;
91         
92         if (argc < 1) {
93                 d_printf("\nUsage: \n");
94                 return usage_fn(argc, argv);
95         }
96         for (i=0; table[i].funcname; i++) {
97                 if (StrCaseCmp(argv[0], table[i].funcname) == 0)
98                         return table[i].fn(argc-1, argv+1);
99         }
100         d_printf("No command: %s\n", argv[0]);
101         return usage_fn(argc, argv);
102 }
103
104
105 /****************************************************************************
106 connect to \\server\ipc$  
107 ****************************************************************************/
108 NTSTATUS connect_to_ipc(struct cli_state **c, struct in_addr *server_ip,
109                                         const char *server_name)
110 {
111         NTSTATUS nt_status;
112
113         if (!opt_password) {
114                 char *pass = getpass("Password:");
115                 if (pass) {
116                         opt_password = strdup(pass);
117                 }
118         }
119         
120         nt_status = cli_full_connection(c, opt_requester_name, server_name, 
121                                         server_ip, opt_port,
122                                         "IPC$", "IPC",  
123                                         opt_user_name, opt_workgroup,
124                                         opt_password, 0);
125         
126         if (NT_STATUS_IS_OK(nt_status)) {
127                 return nt_status;
128         } else {
129                 DEBUG(1,("Cannot connect to server.  Error was %s\n", 
130                          nt_errstr(nt_status)));
131
132                 /* Display a nicer message depending on the result */
133
134                 if (NT_STATUS_V(nt_status) == 
135                     NT_STATUS_V(NT_STATUS_LOGON_FAILURE))
136                         d_printf("The username or password was not correct.\n");
137
138                 return nt_status;
139         }
140 }
141
142 /****************************************************************************
143 connect to \\server\ipc$ anonymously
144 ****************************************************************************/
145 NTSTATUS connect_to_ipc_anonymous(struct cli_state **c,
146                         struct in_addr *server_ip, const char *server_name)
147 {
148         NTSTATUS nt_status;
149
150         nt_status = cli_full_connection(c, opt_requester_name, server_name, 
151                                         server_ip, opt_port,
152                                         "IPC$", "IPC",  
153                                         "", "",
154                                         "", 0);
155         
156         if (NT_STATUS_IS_OK(nt_status)) {
157                 return nt_status;
158         } else {
159                 DEBUG(1,("Cannot connect to server (anonymously).  Error was %s\n", nt_errstr(nt_status)));
160                 return nt_status;
161         }
162 }
163
164 BOOL net_find_server(unsigned flags, struct in_addr *server_ip, char **server_name)
165 {
166
167         if (opt_host) {
168                 *server_name = strdup(opt_host);
169         }               
170
171         if (opt_have_ip) {
172                 *server_ip = opt_dest_ip;
173                 if (!*server_name) {
174                         *server_name = strdup(inet_ntoa(opt_dest_ip));
175                 }
176         } else if (*server_name) {
177                 /* resolve the IP address */
178                 if (!resolve_name(*server_name, server_ip, 0x20))  {
179                         DEBUG(1,("Unable to resolve server name\n"));
180                         return False;
181                 }
182         } else if (flags & NET_FLAGS_PDC) {
183                 struct in_addr *ip_list;
184                 int addr_count;
185                 if (get_dc_list(True /* PDC only*/, opt_target_workgroup, &ip_list, &addr_count)) {
186                         fstring dc_name;
187                         if (addr_count < 1) {
188                                 return False;
189                         }
190                         
191                         *server_ip = *ip_list;
192                         
193                         if (is_zero_ip(*server_ip))
194                                 return False;
195                         
196                         if (!lookup_dc_name(global_myname, opt_target_workgroup, server_ip, dc_name))
197                                 return False;
198                                 
199                         *server_name = strdup(dc_name);
200                 }
201                 
202         } else if (flags & NET_FLAGS_DMB) {
203                 struct in_addr msbrow_ip;
204                 /*  if (!resolve_name(MSBROWSE, &msbrow_ip, 1)) */
205                 if (!resolve_name(opt_target_workgroup, &msbrow_ip, 0x1B))  {
206                         DEBUG(1,("Unable to resolve domain browser via name lookup\n"));
207                         return False;
208                 } else {
209                         *server_ip = msbrow_ip;
210                 }
211                 *server_name = strdup(inet_ntoa(opt_dest_ip));
212         } else if (flags & NET_FLAGS_MASTER) {
213                 struct in_addr brow_ips;
214                 if (!resolve_name(opt_target_workgroup, &brow_ips, 0x1D))  {
215                                 /* go looking for workgroups */
216                         DEBUG(1,("Unable to resolve master browser via name lookup\n"));
217                         return False;
218                 } else {
219                         *server_ip = brow_ips;
220                 }
221                 *server_name = strdup(inet_ntoa(opt_dest_ip));
222         } else if (!(flags & NET_FLAGS_LOCALHOST_DEFAULT_INSANE)) {
223                 extern struct in_addr loopback_ip;
224                 *server_ip = loopback_ip;
225                 *server_name = strdup("127.0.0.1");
226         }
227
228         if (!server_name || !*server_name) {
229                 DEBUG(1,("no server to connect to\n"));
230                 return False;
231         }
232
233         return True;
234 }
235
236
237 BOOL net_find_dc(struct in_addr *server_ip, fstring server_name, const char *domain_name)
238 {
239         struct in_addr *ip_list;
240         int addr_count;
241
242         if (get_dc_list(True /* PDC only*/, domain_name, &ip_list, &addr_count)) {
243                 fstring dc_name;
244                 if (addr_count < 1) {
245                         return False;
246                 }
247                         
248                 *server_ip = *ip_list;
249                 
250                 if (is_zero_ip(*server_ip))
251                         return False;
252                 
253                 if (!lookup_dc_name(global_myname, domain_name, server_ip, dc_name))
254                         return False;
255                         
256                 safe_strcpy(server_name, dc_name, FSTRING_LEN);
257                 return True;
258         } else
259                 return False;
260 }
261
262
263 struct cli_state *net_make_ipc_connection(unsigned flags)
264 {
265         char *server_name = NULL;
266         struct in_addr server_ip;
267         struct cli_state *cli = NULL;
268         NTSTATUS nt_status;
269
270         if (!net_find_server(flags, &server_ip, &server_name)) {
271                 d_printf("\nUnable to find a suitable server\n");
272                 return NULL;
273         }
274
275         if (flags & NET_FLAGS_ANONYMOUS) {
276                 nt_status = connect_to_ipc_anonymous(&cli, &server_ip, server_name);
277         } else {
278                 nt_status = connect_to_ipc(&cli, &server_ip, server_name);
279         }
280         SAFE_FREE(server_name);
281         return cli;
282 }
283
284 static int net_user(int argc, const char **argv)
285 {
286         if (net_ads_check() == 0)
287                 return net_ads_user(argc, argv);
288
289         /* if server is not specified, default to PDC? */
290         if (net_rpc_check(NET_FLAGS_PDC))
291                 return net_rpc_user(argc, argv);
292
293         return net_rap_user(argc, argv);
294 }
295
296 static int net_group(int argc, const char **argv)
297 {
298         if (net_ads_check() == 0)
299                 return net_ads_group(argc, argv);
300
301         if (argc == 0 && net_rpc_check(NET_FLAGS_PDC))
302                 return net_rpc_group(argc, argv);
303
304         return net_rap_group(argc, argv);
305 }
306
307 static int net_join(int argc, const char **argv)
308 {
309         if (net_ads_check() == 0) {
310                 if (net_ads_join(argc, argv) == 0)
311                         return 0;
312                 else
313                         d_printf("ADS join did not work, trying RPC...\n");
314         }
315         return net_rpc_join(argc, argv);
316 }
317
318 static int net_share(int argc, const char **argv)
319 {
320         if (net_rpc_check(0))
321                 return net_rpc_share(argc, argv);
322         return net_rap_share(argc, argv);
323 }
324
325 static int net_file(int argc, const char **argv)
326 {
327         if (net_rpc_check(0))
328                 return net_rpc_file(argc, argv);
329         return net_rap_file(argc, argv);
330 }
331
332 /* main function table */
333 static struct functable net_func[] = {
334         {"RPC", net_rpc},
335         {"RAP", net_rap},
336         {"ADS", net_ads},
337
338         /* eventually these should auto-choose the transport ... */
339         {"FILE", net_file},
340         {"SHARE", net_share},
341         {"SESSION", net_rap_session},
342         {"SERVER", net_rap_server},
343         {"DOMAIN", net_rap_domain},
344         {"PRINTQ", net_rap_printq},
345         {"USER", net_user},
346         {"GROUP", net_group},
347         {"VALIDATE", net_rap_validate},
348         {"GROUPMEMBER", net_rap_groupmember},
349         {"ADMIN", net_rap_admin},
350         {"SERVICE", net_rap_service},   
351         {"PASSWORD", net_rap_password},
352         {"TIME", net_time},
353         {"LOOKUP", net_lookup},
354         {"JOIN", net_join},
355
356         {"HELP", net_help},
357         {NULL, NULL}
358 };
359
360
361 /****************************************************************************
362   main program
363 ****************************************************************************/
364  int main(int argc, const char **argv)
365 {
366         int opt,i;
367         char *p;
368         int rc = 0;
369         int argc_new = 0;
370         const char ** argv_new;
371         poptContext pc;
372         static char *servicesf = dyn_CONFIGFILE;
373         static char *debuglevel = NULL;
374
375         struct poptOption long_options[] = {
376                 {"help",        'h', POPT_ARG_NONE,   0, 'h'},
377                 {"workgroup",   'w', POPT_ARG_STRING, &opt_target_workgroup},
378                 {"myworkgroup", 'W', POPT_ARG_STRING, &opt_workgroup},
379                 {"user",        'U', POPT_ARG_STRING, &opt_user_name, 'U'},
380                 {"ipaddress",   'I', POPT_ARG_STRING, 0,'I'},
381                 {"port",        'p', POPT_ARG_INT,    &opt_port},
382                 {"myname",      'n', POPT_ARG_STRING, &opt_requester_name},
383                 {"conf",        's', POPT_ARG_STRING, &servicesf},
384                 {"server",      'S', POPT_ARG_STRING, &opt_host},
385                 {"comment",     'C', POPT_ARG_STRING, &opt_comment},
386                 {"maxusers",    'M', POPT_ARG_INT,    &opt_maxusers},
387                 {"flags",       'F', POPT_ARG_INT,    &opt_flags},
388                 {"jobid",       'j', POPT_ARG_INT,    &opt_jobid},
389                 {"long",        'l', POPT_ARG_NONE,   &opt_long_list_entries},
390                 {"reboot",      'r', POPT_ARG_NONE,   &opt_reboot},
391                 {"force",       'f', POPT_ARG_NONE,   &opt_force},
392                 {"timeout",     't', POPT_ARG_INT,    &opt_timeout},
393                 {"machine-pass",'P', POPT_ARG_NONE,   &opt_machine_pass},
394                 {"debuglevel",  'D', POPT_ARG_STRING, &debuglevel},
395                 { 0, 0, 0, 0}
396         };
397
398         zero_ip(&opt_dest_ip);
399
400         dbf = x_stderr;
401         
402         pc = poptGetContext(NULL, argc, (const char **) argv, long_options, 
403                             POPT_CONTEXT_KEEP_FIRST);
404         
405         while((opt = poptGetNextOpt(pc)) != -1) {
406                 switch (opt) {
407                 case 'h':
408                         net_help(argc, argv);
409                         exit(0);
410                         break;
411                 case 'I':
412                         opt_dest_ip = *interpret_addr2(poptGetOptArg(pc));
413                         if (is_zero_ip(opt_dest_ip))
414                                 d_printf("\nInvalid ip address specified\n");
415                         else
416                                 opt_have_ip = True;
417                         break;
418                 case 'U':
419                         opt_user_specified = True;
420                         opt_user_name = strdup(opt_user_name);
421                         p = strchr(opt_user_name,'%');
422                         if (p) {
423                                 *p = 0;
424                                 opt_password = p+1;
425                         }
426                         break;
427                 default:
428                         d_printf("\nInvalid option %c (%d)\n", (char)opt, opt);
429                         net_help(argc, argv);
430                         exit(1);
431                 }
432         }
433
434         if (debuglevel) {
435                 debug_parse_levels(debuglevel);
436                 AllowDebugChange = False;
437         }
438
439         lp_load(servicesf,True,False,False);       
440
441         argv_new = (const char **)poptGetArgs(pc);
442
443         argc_new = argc;
444         for (i=0; i<argc; i++) {
445                 if (argv_new[i] == NULL) {
446                         argc_new = i;
447                         break;
448                 }
449         }
450
451         if (!opt_requester_name) {
452                 static fstring myname;
453                 get_myname(myname);
454                 opt_requester_name = myname;
455         }
456
457         if (!opt_user_name && getenv("LOGNAME")) {
458                 opt_user_name = getenv("LOGNAME");
459         }
460
461         if (!opt_workgroup) {
462                 opt_workgroup = lp_workgroup();
463         }
464         
465         if (!opt_target_workgroup) {
466                 opt_target_workgroup = lp_workgroup();
467         }
468         
469         if (!*global_myname) {
470                 char *p2;
471
472                 pstrcpy(global_myname, myhostname());
473                 p2 = strchr_m(global_myname, '.');
474                 if (p2) 
475                         *p2 = 0;
476         }
477         
478         strupper(global_myname);
479
480         load_interfaces();
481
482         if (opt_machine_pass) {
483                 /* it is very useful to be able to make ads queries as the
484                    machine account for testing purposes and for domain leave */
485
486                 if (!secrets_init()) {
487                         d_printf("ERROR: Unable to open secrets database\n");
488                         exit(1);
489                 }
490
491                 asprintf(&opt_user_name,"%s$", global_myname);
492                 opt_password = secrets_fetch_machine_password();
493                 if (!opt_password) {
494                         d_printf("ERROR: Unable to fetch machine password\n");
495                         exit(1);
496                 }
497         }
498          
499         rc = net_run_function(argc_new-1, argv_new+1, net_func, net_help);
500         
501         DEBUG(2,("return code = %d\n", rc));
502         return rc;
503 }