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