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