source/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 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 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 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, NULL);
 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, NULL);
 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 pdc_ip;
 183
 184                 if (get_pdc_ip(opt_target_workgroup, &pdc_ip)) {
 185                         fstring dc_name;
 186
 187                         if (is_zero_ip(pdc_ip))
 188                                 return False;
 189
 190                         if (!lookup_dc_name(global_myname(), opt_target_workgroup, &pdc_ip, dc_name))
 191                                 return False;
 192
 193                         *server_name = strdup(dc_name);
 194                         *server_ip = pdc_ip;
 195                 }
 196
 197         } else if (flags & NET_FLAGS_DMB) {
 198                 struct in_addr msbrow_ip;
 199                 /*  if (!resolve_name(MSBROWSE, &msbrow_ip, 1)) */
 200                 if (!resolve_name(opt_target_workgroup, &msbrow_ip, 0x1B))  {
 201                         DEBUG(1,("Unable to resolve domain browser via name lookup\n"));
 202                         return False;
 203                 } else {
 204                         *server_ip = msbrow_ip;
 205                 }
 206                 *server_name = strdup(inet_ntoa(opt_dest_ip));
 207         } else if (flags & NET_FLAGS_MASTER) {
 208                 struct in_addr brow_ips;
 209                 if (!resolve_name(opt_target_workgroup, &brow_ips, 0x1D))  {
 210                                 /* go looking for workgroups */
 211                         DEBUG(1,("Unable to resolve master browser via name lookup\n"));
 212                         return False;
 213                 } else {
 214                         *server_ip = brow_ips;
 215                 }
 216                 *server_name = strdup(inet_ntoa(opt_dest_ip));
 217         } else if (!(flags & NET_FLAGS_LOCALHOST_DEFAULT_INSANE)) {
 218                 extern struct in_addr loopback_ip;
 219                 *server_ip = loopback_ip;
 220                 *server_name = strdup("127.0.0.1");
 221         }
 222
 223         if (!server_name || !*server_name) {
 224                 DEBUG(1,("no server to connect to\n"));
 225                 return False;
 226         }
 227
 228         return True;
 229 }
 230
 231
 232 BOOL net_find_dc(struct in_addr *server_ip, fstring server_name, const char *domain_name)
 233 {
 234         if (get_pdc_ip(domain_name, server_ip)) {
 235                 fstring dc_name;
 236
 237                 if (is_zero_ip(*server_ip))
 238                         return False;
 239
 240                 if (!lookup_dc_name(global_myname(), domain_name, server_ip, dc_name))
 241                         return False;
 242
 243                 safe_strcpy(server_name, dc_name, FSTRING_LEN);
 244                 return True;
 245         } else
 246                 return False;
 247 }
 248
 249
 250 struct cli_state *net_make_ipc_connection(unsigned flags)
 251 {
 252         char *server_name = NULL;
 253         struct in_addr server_ip;
 254         struct cli_state *cli = NULL;
 255         NTSTATUS nt_status;
 256
 257         if (!net_find_server(flags, &server_ip, &server_name)) {
 258                 d_printf("\nUnable to find a suitable server\n");
 259                 return NULL;
 260         }
 261
 262         if (flags & NET_FLAGS_ANONYMOUS) {
 263                 nt_status = connect_to_ipc_anonymous(&cli, &server_ip, server_name);
 264         } else {
 265                 nt_status = connect_to_ipc(&cli, &server_ip, server_name);
 266         }
 267
 268         SAFE_FREE(server_name);
 269         if (NT_STATUS_IS_OK(nt_status)) {
 270                 return cli;
 271         } else {
 272                 return NULL;
 273         }
 274 }
 275
 276 static int net_user(int argc, const char **argv)
 277 {
 278         if (net_ads_check() == 0)
 279                 return net_ads_user(argc, argv);
 280
 281         /* if server is not specified, default to PDC? */
 282         if (net_rpc_check(NET_FLAGS_PDC))
 283                 return net_rpc_user(argc, argv);
 284
 285         return net_rap_user(argc, argv);
 286 }
 287
 288 static int net_group(int argc, const char **argv)
 289 {
 290         if (net_ads_check() == 0)
 291                 return net_ads_group(argc, argv);
 292
 293         if (argc == 0 && net_rpc_check(NET_FLAGS_PDC))
 294                 return net_rpc_group(argc, argv);
 295
 296         return net_rap_group(argc, argv);
 297 }
 298
 299 static int net_join(int argc, const char **argv)
 300 {
 301         if (net_ads_check() == 0) {
 302                 if (net_ads_join(argc, argv) == 0)
 303                         return 0;
 304                 else
 305                         d_printf("ADS join did not work, trying RPC...\n");
 306         }
 307         return net_rpc_join(argc, argv);
 308 }
 309
 310 static int net_share(int argc, const char **argv)
 311 {
 312         if (net_rpc_check(0))
 313                 return net_rpc_share(argc, argv);
 314         return net_rap_share(argc, argv);
 315 }
 316
 317 static int net_file(int argc, const char **argv)
 318 {
 319         if (net_rpc_check(0))
 320                 return net_rpc_file(argc, argv);
 321         return net_rap_file(argc, argv);
 322 }
 323
 324 /*
 325  Retrieve our local SID or the SID for the specified name
 326  */
 327 static int net_getlocalsid(int argc, const char **argv)
 328 {
 329         DOM_SID sid;
 330         const char *name;
 331         fstring sid_str;
 332
 333         if (argc >= 1) {
 334                 name = argv[0];
 335         }
 336         else {
 337                 name = global_myname();
 338         }
 339
 340         if (!secrets_fetch_domain_sid(name, &sid)) {
 341                 DEBUG(0, ("Can't fetch domain SID for name: %s\n", name));
 342                 return 1;
 343         }
 344         sid_to_string(sid_str, &sid);
 345         d_printf("SID for domain %s is: %s\n", name, sid_str);
 346         return 0;
 347 }
 348
 349 static int net_setlocalsid(int argc, const char **argv)
 350 {
 351         DOM_SID sid;
 352
 353         if ( (argc != 1)
 354              || (strncmp(argv[0], "S-1-5-21-", strlen("S-1-5-21-")) != 0)
 355              || (!string_to_sid(&sid, argv[0]))
 356              || (sid.num_auths != 4)) {
 357                 d_printf("usage: net setlocalsid S-1-5-21-x-y-z\n");
 358                 return 1;
 359         }
 360
 361         if (!secrets_store_domain_sid(global_myname(), &sid)) {
 362                 DEBUG(0,("Can't store domain SID as a pdc/bdc.\n"));
 363                 return 1;
 364         }
 365
 366         return 0;
 367 }
 368
 369 static int net_getdomainsid(int argc, const char **argv)
 370 {
 371         DOM_SID domain_sid;
 372         fstring sid_str;
 373
 374         if (!secrets_fetch_domain_sid(global_myname(), &domain_sid)) {
 375                 d_printf("Could not fetch local SID\n");
 376                 return 1;
 377         }
 378         sid_to_string(sid_str, &domain_sid);
 379         d_printf("SID for domain %s is: %s\n", global_myname(), sid_str);
 380
 381         if (!secrets_fetch_domain_sid(lp_workgroup(), &domain_sid)) {
 382                 d_printf("Could not fetch domain SID\n");
 383                 return 1;
 384         }
 385
 386         sid_to_string(sid_str, &domain_sid);
 387         d_printf("SID for domain %s is: %s\n", lp_workgroup(), sid_str);
 388
 389         return 0;
 390 }
 391
 392 /* main function table */
 393 static struct functable net_func[] = {
 394         {"RPC", net_rpc},
 395         {"RAP", net_rap},
 396         {"ADS", net_ads},
 397
 398         /* eventually these should auto-choose the transport ... */
 399         {"FILE", net_file},
 400         {"SHARE", net_share},
 401         {"SESSION", net_rap_session},
 402         {"SERVER", net_rap_server},
 403         {"DOMAIN", net_rap_domain},
 404         {"PRINTQ", net_rap_printq},
 405         {"USER", net_user},
 406         {"GROUP", net_group},
 407         {"VALIDATE", net_rap_validate},
 408         {"GROUPMEMBER", net_rap_groupmember},
 409         {"ADMIN", net_rap_admin},
 410         {"SERVICE", net_rap_service},
 411         {"PASSWORD", net_rap_password},
 412         {"TIME", net_time},
 413         {"LOOKUP", net_lookup},
 414         {"JOIN", net_join},
 415         {"CACHE", net_cache},
 416         {"GETLOCALSID", net_getlocalsid},
 417         {"SETLOCALSID", net_setlocalsid},
 418         {"GETDOMAINSID", net_getdomainsid},
 419
 420         {"HELP", net_help},
 421         {NULL, NULL}
 422 };
 423
 424
 425 /****************************************************************************
 426   main program
 427 ****************************************************************************/
 428  int main(int argc, const char **argv)
 429 {
 430         int opt,i;
 431         char *p;
 432         int rc = 0;
 433         int argc_new = 0;
 434         const char ** argv_new;
 435         poptContext pc;
 436         static char *servicesf = dyn_CONFIGFILE;
 437         static char *debuglevel = NULL;
 438
 439         struct poptOption long_options[] = {
 440                 {"help",        'h', POPT_ARG_NONE,   0, 'h'},
 441                 {"workgroup",   'w', POPT_ARG_STRING, &opt_target_workgroup},
 442                 {"myworkgroup", 'W', POPT_ARG_STRING, &opt_workgroup},
 443                 {"user",        'U', POPT_ARG_STRING, &opt_user_name, 'U'},
 444                 {"ipaddress",   'I', POPT_ARG_STRING, 0,'I'},
 445                 {"port",        'p', POPT_ARG_INT,    &opt_port},
 446                 {"myname",      'n', POPT_ARG_STRING, &opt_requester_name},
 447                 {"conf",        's', POPT_ARG_STRING, &servicesf},
 448                 {"server",      'S', POPT_ARG_STRING, &opt_host},
 449                 {"comment",     'C', POPT_ARG_STRING, &opt_comment},
 450                 {"maxusers",    'M', POPT_ARG_INT,    &opt_maxusers},
 451                 {"flags",       'F', POPT_ARG_INT,    &opt_flags},
 452                 {"jobid",       'j', POPT_ARG_INT,    &opt_jobid},
 453                 {"long",        'l', POPT_ARG_NONE,   &opt_long_list_entries},
 454                 {"reboot",      'r', POPT_ARG_NONE,   &opt_reboot},
 455                 {"force",       'f', POPT_ARG_NONE,   &opt_force},
 456                 {"timeout",     't', POPT_ARG_INT,    &opt_timeout},
 457                 {"machine-pass",'P', POPT_ARG_NONE,   &opt_machine_pass},
 458                 {"debuglevel",  'D', POPT_ARG_STRING, &debuglevel},
 459                 { 0, 0, 0, 0}
 460         };
 461
 462         zero_ip(&opt_dest_ip);
 463
 464         dbf = x_stderr;
 465
 466         pc = poptGetContext(NULL, argc, (const char **) argv, long_options,
 467                             POPT_CONTEXT_KEEP_FIRST);
 468
 469         while((opt = poptGetNextOpt(pc)) != -1) {
 470                 switch (opt) {
 471                 case 'h':
 472                         net_help(argc, argv);
 473                         exit(0);
 474                         break;
 475                 case 'I':
 476                         opt_dest_ip = *interpret_addr2(poptGetOptArg(pc));
 477                         if (is_zero_ip(opt_dest_ip))
 478                                 d_printf("\nInvalid ip address specified\n");
 479                         else
 480                                 opt_have_ip = True;
 481                         break;
 482                 case 'U':
 483                         opt_user_specified = True;
 484                         opt_user_name = strdup(opt_user_name);
 485                         p = strchr(opt_user_name,'%');
 486                         if (p) {
 487                                 *p = 0;
 488                                 opt_password = p+1;
 489                         }
 490                         break;
 491                 default:
 492                         d_printf("\nInvalid option %c (%d)\n", (char)opt, opt);
 493                         net_help(argc, argv);
 494                         exit(1);
 495                 }
 496         }
 497
 498         if (debuglevel) {
 499                 debug_parse_levels(debuglevel);
 500                 AllowDebugChange = False;
 501         }
 502
 503         lp_load(servicesf,True,False,False);
 504
 505         argv_new = (const char **)poptGetArgs(pc);
 506
 507         argc_new = argc;
 508         for (i=0; i<argc; i++) {
 509                 if (argv_new[i] == NULL) {
 510                         argc_new = i;
 511                         break;
 512                 }
 513         }
 514
 515         if (!opt_requester_name) {
 516                 static fstring myname;
 517                 get_myname(myname);
 518                 opt_requester_name = myname;
 519         }
 520
 521         if (!opt_user_name && getenv("LOGNAME")) {
 522                 opt_user_name = getenv("LOGNAME");
 523         }
 524
 525         if (!opt_workgroup) {
 526                 opt_workgroup = lp_workgroup();
 527         }
 528
 529         if (!opt_target_workgroup) {
 530                 opt_target_workgroup = strdup(lp_workgroup());
 531         }
 532
 533         if (!init_names())
 534                 exit(1);
 535
 536         load_interfaces();
 537
 538         if (opt_machine_pass) {
 539                 /* it is very useful to be able to make ads queries as the
 540                    machine account for testing purposes and for domain leave */
 541
 542                 if (!secrets_init()) {
 543                         d_printf("ERROR: Unable to open secrets database\n");
 544                         exit(1);
 545                 }
 546
 547                 asprintf(&opt_user_name,"%s$", global_myname());
 548                 opt_password = secrets_fetch_machine_password();
 549                 if (!opt_password) {
 550                         d_printf("ERROR: Unable to fetch machine password\n");
 551                         exit(1);
 552                 }
 553         }
 554
 555         rc = net_run_function(argc_new-1, argv_new+1, net_func, net_help);
 556
 557         DEBUG(2,("return code = %d\n", rc));
 558         return rc;
 559 }