source/nsswitch/winbindd_util.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3
   4    Winbind daemon for ntdom nss module
   5
   6    Copyright (C) Tim Potter 2000-2001
   7    Copyright (C) 2001 by Martin Pool <mbp@samba.org>
   8
   9    This program is free software; you can redistribute it and/or modify
  10    it under the terms of the GNU General Public License as published by
  11    the Free Software Foundation; either version 2 of the License, or
  12    (at your option) any later version.
  13
  14    This program is distributed in the hope that it will be useful,
  15    but WITHOUT ANY WARRANTY; without even the implied warranty of
  16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17    GNU General Public License for more details.
  18
  19    You should have received a copy of the GNU General Public License
  20    along with this program; if not, write to the Free Software
  21    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  22 */
  23
  24 #include "winbindd.h"
  25
  26 #undef DBGC_CLASS
  27 #define DBGC_CLASS DBGC_WINBIND
  28
  29 /**
  30  * @file winbindd_util.c
  31  *
  32  * Winbind daemon for NT domain authentication nss module.
  33  **/
  34
  35
  36 /**
  37  * Used to clobber name fields that have an undefined value.
  38  *
  39  * Correct code should never look at a field that has this value.
  40  **/
  41
  42 static const fstring name_deadbeef = "<deadbeef>";
  43
  44 /* The list of trusted domains.  Note that the list can be deleted and
  45    recreated using the init_domain_list() function so pointers to
  46    individual winbindd_domain structures cannot be made.  Keep a copy of
  47    the domain name instead. */
  48
  49 static struct winbindd_domain *_domain_list;
  50
  51 struct winbindd_domain *domain_list(void)
  52 {
  53         /* Initialise list */
  54
  55         if (!_domain_list)
  56                 init_domain_list();
  57
  58         return _domain_list;
  59 }
  60
  61 /* Free all entries in the trusted domain list */
  62
  63 void free_domain_list(void)
  64 {
  65         struct winbindd_domain *domain = _domain_list;
  66
  67         while(domain) {
  68                 struct winbindd_domain *next = domain->next;
  69
  70                 DLIST_REMOVE(_domain_list, domain);
  71                 SAFE_FREE(domain);
  72                 domain = next;
  73         }
  74 }
  75
  76
  77 /* Add a trusted domain to our list of domains */
  78 static struct winbindd_domain *add_trusted_domain(const char *domain_name, const char *alt_name,
  79                                                   struct winbindd_methods *methods,
  80                                                   DOM_SID *sid)
  81 {
  82         struct winbindd_domain *domain;
  83
  84         /* We can't call domain_list() as this function is called from
  85            init_domain_list() and we'll get stuck in a loop. */
  86         for (domain = _domain_list; domain; domain = domain->next) {
  87                 if (strcasecmp(domain_name, domain->name) == 0 ||
  88                     strcasecmp(domain_name, domain->alt_name) == 0) {
  89                         return domain;
  90                 }
  91                 if (alt_name && *alt_name) {
  92                         if (strcasecmp(alt_name, domain->name) == 0 ||
  93                             strcasecmp(alt_name, domain->alt_name) == 0) {
  94                                 return domain;
  95                         }
  96                 }
  97         }
  98
  99         /* Create new domain entry */
 100
 101         if ((domain = (struct winbindd_domain *)
 102              malloc(sizeof(*domain))) == NULL)
 103                 return NULL;
 104
 105         /* Fill in fields */
 106
 107         ZERO_STRUCTP(domain);
 108
 109         /* prioritise the short name */
 110         if (strchr_m(domain_name, '.') && alt_name && *alt_name) {
 111                 fstrcpy(domain->name, alt_name);
 112                 fstrcpy(domain->alt_name, domain_name);
 113         } else {
 114         fstrcpy(domain->name, domain_name);
 115                 if (alt_name) {
 116                         fstrcpy(domain->alt_name, alt_name);
 117                 }
 118         }
 119
 120         domain->methods = methods;
 121         domain->sequence_number = DOM_SEQUENCE_NONE;
 122         domain->last_seq_check = 0;
 123         if (sid) {
 124                 sid_copy(&domain->sid, sid);
 125         }
 126
 127         /* see if this is a native mode win2k domain, but only for our own domain */
 128
 129         if ( lp_server_role() != ROLE_DOMAIN_PDC && strequal( lp_workgroup(), domain_name) )    {
 130                 domain->native_mode = cm_check_for_native_mode_win2k( domain_name );
 131                 DEBUG(3,("add_trusted_domain: %s is a %s mode domain\n", domain_name,
 132                                         domain->native_mode ? "native" : "mixed" ));
 133         }
 134
 135         /* Link to domain list */
 136         DLIST_ADD(_domain_list, domain);
 137
 138         DEBUG(1,("Added domain %s %s %s\n",
 139                  domain->name, domain->alt_name,
 140                  sid?sid_string_static(&domain->sid):""));
 141
 142         return domain;
 143 }
 144
 145
 146 /*
 147   rescan our domains looking for new trusted domains
 148  */
 149 void rescan_trusted_domains(BOOL force)
 150 {
 151         struct winbindd_domain *domain;
 152         TALLOC_CTX *mem_ctx;
 153         static time_t last_scan;
 154         time_t t = time(NULL);
 155
 156         /* trusted domains might be disabled */
 157         if (!lp_allow_trusted_domains()) {
 158                 return;
 159         }
 160
 161         /* Only rescan every few minutes but force if necessary */
 162
 163         if (((unsigned)(t - last_scan) < WINBINDD_RESCAN_FREQ) && !force)
 164                 return;
 165
 166         last_scan = t;
 167
 168         DEBUG(1, ("scanning trusted domain list\n"));
 169
 170         if (!(mem_ctx = talloc_init("init_domain_list")))
 171                 return;
 172
 173         for (domain = _domain_list; domain; domain = domain->next) {
 174                 NTSTATUS result;
 175                 char **names;
 176                 char **alt_names;
 177                 int num_domains = 0;
 178                 DOM_SID *dom_sids;
 179                 int i;
 180
 181                 result = domain->methods->trusted_domains(domain, mem_ctx, &num_domains,
 182                                                           &names, &alt_names, &dom_sids);
 183                 if (!NT_STATUS_IS_OK(result)) {
 184                         continue;
 185                 }
 186
 187                 /* Add each domain to the trusted domain list. Each domain inherits
 188                    the access methods of its parent */
 189                 for(i = 0; i < num_domains; i++) {
 190                         DEBUG(10,("Found domain %s\n", names[i]));
 191                         add_trusted_domain(names[i], alt_names?alt_names[i]:NULL,
 192                                            domain->methods, &dom_sids[i]);
 193
 194                         /* store trusted domain in the cache */
 195                         trustdom_cache_store(names[i], alt_names ? alt_names[i] : NULL,
 196                                              &dom_sids[i], t + WINBINDD_RESCAN_FREQ);
 197                 }
 198         }
 199
 200         talloc_destroy(mem_ctx);
 201 }
 202
 203 /* Look up global info for the winbind daemon */
 204 BOOL init_domain_list(void)
 205 {
 206         extern struct winbindd_methods cache_methods;
 207         struct winbindd_domain *domain;
 208
 209         /* Free existing list */
 210         free_domain_list();
 211
 212         /* Add ourselves as the first entry */
 213         domain = add_trusted_domain(lp_workgroup(), NULL, &cache_methods, NULL);
 214
 215         if (!secrets_fetch_domain_sid(domain->name, &domain->sid)) {
 216                 DEBUG(1, ("Could not fetch sid for our domain %s\n",
 217                           domain->name));
 218                 return False;
 219         }
 220
 221         /* get any alternate name for the primary domain */
 222         cache_methods.alternate_name(domain);
 223
 224         /* do an initial scan for trusted domains */
 225         rescan_trusted_domains(True);
 226
 227         return True;
 228 }
 229
 230 /* Given a domain name, return the struct winbindd domain info for it
 231    if it is actually working. */
 232
 233 struct winbindd_domain *find_domain_from_name(const char *domain_name)
 234 {
 235         struct winbindd_domain *domain;
 236
 237         /* Search through list */
 238
 239         for (domain = domain_list(); domain != NULL; domain = domain->next) {
 240                 if (strequal(domain_name, domain->name) ||
 241                     (domain->alt_name[0] && strequal(domain_name, domain->alt_name)))
 242                         return domain;
 243         }
 244
 245         /* Not found */
 246
 247         return NULL;
 248 }
 249
 250 /* Given a domain sid, return the struct winbindd domain info for it */
 251
 252 struct winbindd_domain *find_domain_from_sid(DOM_SID *sid)
 253 {
 254         struct winbindd_domain *domain;
 255
 256         /* Search through list */
 257
 258         for (domain = domain_list(); domain != NULL; domain = domain->next) {
 259                 if (sid_compare_domain(sid, &domain->sid) == 0)
 260                         return domain;
 261         }
 262
 263         /* Not found */
 264
 265         return NULL;
 266 }
 267
 268 /* Lookup a sid in a domain from a name */
 269
 270 BOOL winbindd_lookup_sid_by_name(struct winbindd_domain *domain,
 271                                  const char *name, DOM_SID *sid,
 272                                  enum SID_NAME_USE *type)
 273 {
 274         NTSTATUS result;
 275         TALLOC_CTX *mem_ctx;
 276         /* Don't bother with machine accounts */
 277
 278         if (name[strlen(name) - 1] == '$')
 279                 return False;
 280
 281         mem_ctx = talloc_init("lookup_sid_by_name for %s\n", name);
 282         if (!mem_ctx)
 283                 return False;
 284
 285         /* Lookup name */
 286         result = domain->methods->name_to_sid(domain, mem_ctx, name, sid, type);
 287
 288         talloc_destroy(mem_ctx);
 289
 290         /* Return rid and type if lookup successful */
 291         if (!NT_STATUS_IS_OK(result)) {
 292                 *type = SID_NAME_UNKNOWN;
 293         }
 294
 295         return NT_STATUS_IS_OK(result);
 296 }
 297
 298 /**
 299  * @brief Lookup a name in a domain from a sid.
 300  *
 301  * @param sid Security ID you want to look up.
 302  *
 303  * @param name On success, set to the name corresponding to @p sid.
 304  *
 305  * @param dom_name On success, set to the 'domain name' corresponding to @p sid.
 306  *
 307  * @param type On success, contains the type of name: alias, group or
 308  * user.
 309  *
 310  * @retval True if the name exists, in which case @p name and @p type
 311  * are set, otherwise False.
 312  **/
 313 BOOL winbindd_lookup_name_by_sid(DOM_SID *sid,
 314                                  fstring dom_name,
 315                                  fstring name,
 316                                  enum SID_NAME_USE *type)
 317 {
 318         char *names;
 319         NTSTATUS result;
 320         TALLOC_CTX *mem_ctx;
 321         BOOL rv = False;
 322         struct winbindd_domain *domain;
 323
 324         domain = find_domain_from_sid(sid);
 325
 326         if (!domain) {
 327                 DEBUG(1,("Can't find domain from sid\n"));
 328                 return False;
 329         }
 330
 331         /* Lookup name */
 332
 333         if (!(mem_ctx = talloc_init("winbindd_lookup_name_by_sid")))
 334                 return False;
 335
 336         result = domain->methods->sid_to_name(domain, mem_ctx, sid, &names, type);
 337
 338         /* Return name and type if successful */
 339
 340         if ((rv = NT_STATUS_IS_OK(result))) {
 341                 fstrcpy(dom_name, domain->name);
 342                 fstrcpy(name, names);
 343         } else {
 344                 *type = SID_NAME_UNKNOWN;
 345                 fstrcpy(name, name_deadbeef);
 346         }
 347
 348         talloc_destroy(mem_ctx);
 349
 350         return rv;
 351 }
 352
 353
 354 /* Free state information held for {set,get,end}{pw,gr}ent() functions */
 355
 356 void free_getent_state(struct getent_state *state)
 357 {
 358         struct getent_state *temp;
 359
 360         /* Iterate over state list */
 361
 362         temp = state;
 363
 364         while(temp != NULL) {
 365                 struct getent_state *next;
 366
 367                 /* Free sam entries then list entry */
 368
 369                 SAFE_FREE(state->sam_entries);
 370                 DLIST_REMOVE(state, state);
 371                 next = temp->next;
 372
 373                 SAFE_FREE(temp);
 374                 temp = next;
 375         }
 376 }
 377
 378 /* Parse winbindd related parameters */
 379
 380 BOOL winbindd_param_init(void)
 381 {
 382         /* Parse winbind uid and winbind_gid parameters */
 383
 384         if (!lp_winbind_uid(&server_state.uid_low, &server_state.uid_high)) {
 385                 DEBUG(0, ("winbind uid range missing or invalid\n"));
 386                 return False;
 387         }
 388
 389         if (!lp_winbind_gid(&server_state.gid_low, &server_state.gid_high)) {
 390                 DEBUG(0, ("winbind gid range missing or invalid\n"));
 391                 return False;
 392         }
 393
 394         return True;
 395 }
 396
 397 /* Check if a domain is present in a comma-separated list of domains */
 398
 399 BOOL check_domain_env(char *domain_env, char *domain)
 400 {
 401         fstring name;
 402         const char *tmp = domain_env;
 403
 404         while(next_token(&tmp, name, ",", sizeof(fstring))) {
 405                 if (strequal(name, domain))
 406                         return True;
 407         }
 408
 409         return False;
 410 }
 411
 412 /* Parse a string of the form DOMAIN/user into a domain and a user */
 413
 414 BOOL parse_domain_user(const char *domuser, fstring domain, fstring user)
 415 {
 416         char *p = strchr(domuser,*lp_winbind_separator());
 417
 418         if (!(p || lp_winbind_use_default_domain()))
 419                 return False;
 420
 421         if(!p && lp_winbind_use_default_domain()) {
 422                 fstrcpy(user, domuser);
 423                 fstrcpy(domain, lp_workgroup());
 424         } else {
 425                 fstrcpy(user, p+1);
 426                 fstrcpy(domain, domuser);
 427                 domain[PTR_DIFF(p, domuser)] = 0;
 428         }
 429         strupper(domain);
 430         return True;
 431 }
 432
 433 /*
 434     Fill DOMAIN\\USERNAME entry accounting 'winbind use default domain' and
 435     'winbind separator' options.
 436     This means:
 437         - omit DOMAIN when 'winbind use default domain = true' and DOMAIN is
 438         lp_workgroup
 439
 440 */
 441 void fill_domain_username(fstring name, const char *domain, const char *user)
 442 {
 443         if(lp_winbind_use_default_domain() &&
 444             !strcmp(lp_workgroup(), domain)) {
 445                 strlcpy(name, user, sizeof(fstring));
 446         } else {
 447                 slprintf(name, sizeof(fstring) - 1, "%s%s%s",
 448                          domain, lp_winbind_separator(),
 449                          user);
 450         }
 451 }
 452
 453 /*
 454  * Winbindd socket accessor functions
 455  */
 456
 457 char *get_winbind_priv_pipe_dir(void)
 458 {
 459         return lock_path(WINBINDD_PRIV_SOCKET_SUBDIR);
 460 }
 461
 462 /* Open the winbindd socket */
 463
 464 static int _winbindd_socket = -1;
 465 static int _winbindd_priv_socket = -1;
 466
 467 int open_winbindd_socket(void)
 468 {
 469         if (_winbindd_socket == -1) {
 470                 _winbindd_socket = create_pipe_sock(
 471                         WINBINDD_SOCKET_DIR, WINBINDD_SOCKET_NAME, 0755);
 472                 DEBUG(10, ("open_winbindd_socket: opened socket fd %d\n",
 473                            _winbindd_socket));
 474         }
 475
 476         return _winbindd_socket;
 477 }
 478
 479 int open_winbindd_priv_socket(void)
 480 {
 481         if (_winbindd_priv_socket == -1) {
 482                 _winbindd_priv_socket = create_pipe_sock(
 483                         get_winbind_priv_pipe_dir(), WINBINDD_SOCKET_NAME, 0750);
 484                 DEBUG(10, ("open_winbindd_priv_socket: opened socket fd %d\n",
 485                            _winbindd_priv_socket));
 486         }
 487
 488         return _winbindd_priv_socket;
 489 }
 490
 491 /* Close the winbindd socket */
 492
 493 void close_winbindd_socket(void)
 494 {
 495         if (_winbindd_socket != -1) {
 496                 DEBUG(10, ("close_winbindd_socket: closing socket fd %d\n",
 497                            _winbindd_socket));
 498                 close(_winbindd_socket);
 499                 _winbindd_socket = -1;
 500         }
 501         if (_winbindd_priv_socket != -1) {
 502                 DEBUG(10, ("close_winbindd_socket: closing socket fd %d\n",
 503                            _winbindd_priv_socket));
 504                 close(_winbindd_priv_socket);
 505                 _winbindd_priv_socket = -1;
 506         }
 507 }
 508
 509 /*
 510  * Client list accessor functions
 511  */
 512
 513 static struct winbindd_cli_state *_client_list;
 514 static int _num_clients;
 515
 516 /* Return list of all connected clients */
 517
 518 struct winbindd_cli_state *winbindd_client_list(void)
 519 {
 520         return _client_list;
 521 }
 522
 523 /* Add a connection to the list */
 524
 525 void winbindd_add_client(struct winbindd_cli_state *cli)
 526 {
 527         DLIST_ADD(_client_list, cli);
 528         _num_clients++;
 529 }
 530
 531 /* Remove a client from the list */
 532
 533 void winbindd_remove_client(struct winbindd_cli_state *cli)
 534 {
 535         DLIST_REMOVE(_client_list, cli);
 536         _num_clients--;
 537 }
 538
 539 /* Close all open clients */
 540
 541 void winbindd_kill_all_clients(void)
 542 {
 543         struct winbindd_cli_state *cl = winbindd_client_list();
 544
 545         DEBUG(10, ("winbindd_kill_all_clients: going postal\n"));
 546
 547         while (cl) {
 548                 struct winbindd_cli_state *next;
 549
 550                 next = cl->next;
 551                 winbindd_remove_client(cl);
 552                 cl = next;
 553         }
 554 }
 555
 556 /* Return number of open clients */
 557
 558 int winbindd_num_clients(void)
 559 {
 560         return _num_clients;
 561 }
 562
 563 /* Help with RID -> SID conversion */
 564
 565 DOM_SID *rid_to_talloced_sid(struct winbindd_domain *domain,
 566                                     TALLOC_CTX *mem_ctx,
 567                                     uint32 rid)
 568 {
 569         DOM_SID *sid;
 570         sid = talloc(mem_ctx, sizeof(*sid));
 571         if (!sid) {
 572                 smb_panic("rid_to_to_talloced_sid: talloc for DOM_SID failed!\n");
 573         }
 574         sid_copy(sid, &domain->sid);
 575         sid_append_rid(sid, rid);
 576         return sid;
 577 }
 578