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, 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                 {"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 }