source3/auth/auth_util.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    Authentication utility functions
   4    Copyright (C) Andrew Tridgell 1992-1998
   5    Copyright (C) Andrew Bartlett 2001
   6    Copyright (C) Jeremy Allison 2000-2001
   7    Copyright (C) Rafal Szczesniak 2002
   8    Copyright (C) Volker Lendecke 2006
   9
  10    This program is free software; you can redistribute it and/or modify
  11    it under the terms of the GNU General Public License as published by
  12    the Free Software Foundation; either version 3 of the License, or
  13    (at your option) any later version.
  14
  15    This program is distributed in the hope that it will be useful,
  16    but WITHOUT ANY WARRANTY; without even the implied warranty of
  17    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18    GNU General Public License for more details.
  19
  20    You should have received a copy of the GNU General Public License
  21    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  22 */
  23
  24 #include "includes.h"
  25 #include "smbd/globals.h"
  26 #include "../libcli/auth/libcli_auth.h"
  27 #include "../lib/crypto/arcfour.h"
  28 #include "rpc_client/init_lsa.h"
  29
  30 #undef DBGC_CLASS
  31 #define DBGC_CLASS DBGC_AUTH
  32
  33 /****************************************************************************
  34  Create a UNIX user on demand.
  35 ****************************************************************************/
  36
  37 static int _smb_create_user(const char *domain, const char *unix_username, const char *homedir)
  38 {
  39         TALLOC_CTX *ctx = talloc_tos();
  40         char *add_script;
  41         int ret;
  42
  43         add_script = talloc_strdup(ctx, lp_adduser_script());
  44         if (!add_script || !*add_script) {
  45                 return -1;
  46         }
  47         add_script = talloc_all_string_sub(ctx,
  48                                 add_script,
  49                                 "%u",
  50                                 unix_username);
  51         if (!add_script) {
  52                 return -1;
  53         }
  54         if (domain) {
  55                 add_script = talloc_all_string_sub(ctx,
  56                                         add_script,
  57                                         "%D",
  58                                         domain);
  59                 if (!add_script) {
  60                         return -1;
  61                 }
  62         }
  63         if (homedir) {
  64                 add_script = talloc_all_string_sub(ctx,
  65                                 add_script,
  66                                 "%H",
  67                                 homedir);
  68                 if (!add_script) {
  69                         return -1;
  70                 }
  71         }
  72         ret = smbrun(add_script,NULL);
  73         flush_pwnam_cache();
  74         DEBUG(ret ? 0 : 3,
  75                 ("smb_create_user: Running the command `%s' gave %d\n",
  76                  add_script,ret));
  77         return ret;
  78 }
  79
  80 /****************************************************************************
  81  Create an auth_usersupplied_data structure after appropriate mapping.
  82 ****************************************************************************/
  83
  84 NTSTATUS make_user_info_map(struct auth_usersupplied_info **user_info,
  85                             const char *smb_name,
  86                             const char *client_domain,
  87                             const char *workstation_name,
  88                             DATA_BLOB *lm_pwd,
  89                             DATA_BLOB *nt_pwd,
  90                             const struct samr_Password *lm_interactive_pwd,
  91                             const struct samr_Password *nt_interactive_pwd,
  92                             const char *plaintext,
  93                             enum auth_password_state password_state)
  94 {
  95         const char *domain;
  96         NTSTATUS result;
  97         bool was_mapped;
  98         fstring internal_username;
  99         fstrcpy(internal_username, smb_name);
 100         was_mapped = map_username(internal_username);
 101
 102         DEBUG(5, ("Mapping user [%s]\\[%s] from workstation [%s]\n",
 103                  client_domain, smb_name, workstation_name));
 104
 105         domain = client_domain;
 106
 107         /* If you connect to a Windows domain member using a bogus domain name,
 108          * the Windows box will map the BOGUS\user to SAMNAME\user.  Thus, if
 109          * the Windows box is a DC the name will become DOMAIN\user and be
 110          * authenticated against AD, if the Windows box is a member server but
 111          * not a DC the name will become WORKSTATION\user.  A standalone
 112          * non-domain member box will also map to WORKSTATION\user.
 113          * This also deals with the client passing in a "" domain */
 114
 115         if (!is_trusted_domain(domain) &&
 116             !strequal(domain, my_sam_name()))
 117         {
 118                 if (lp_map_untrusted_to_domain())
 119                         domain = my_sam_name();
 120                 else
 121                         domain = get_global_sam_name();
 122                 DEBUG(5, ("Mapped domain from [%s] to [%s] for user [%s] from "
 123                           "workstation [%s]\n",
 124                           client_domain, domain, smb_name, workstation_name));
 125         }
 126
 127         /* We know that the given domain is trusted (and we are allowing them),
 128          * it is our global SAM name, or for legacy behavior it is our
 129          * primary domain name */
 130
 131         result = make_user_info(user_info, smb_name, internal_username,
 132                               client_domain, domain, workstation_name,
 133                               lm_pwd, nt_pwd,
 134                               lm_interactive_pwd, nt_interactive_pwd,
 135                               plaintext, password_state);
 136         if (NT_STATUS_IS_OK(result)) {
 137                 /* We have tried mapping */
 138                 (*user_info)->mapped_state = True;
 139                 /* did we actually map the user to a different name? */
 140                 (*user_info)->was_mapped = was_mapped;
 141         }
 142         return result;
 143 }
 144
 145 /****************************************************************************
 146  Create an auth_usersupplied_data, making the DATA_BLOBs here.
 147  Decrypt and encrypt the passwords.
 148 ****************************************************************************/
 149
 150 bool make_user_info_netlogon_network(struct auth_usersupplied_info **user_info,
 151                                      const char *smb_name,
 152                                      const char *client_domain,
 153                                      const char *workstation_name,
 154                                      uint32 logon_parameters,
 155                                      const uchar *lm_network_pwd,
 156                                      int lm_pwd_len,
 157                                      const uchar *nt_network_pwd,
 158                                      int nt_pwd_len)
 159 {
 160         bool ret;
 161         NTSTATUS status;
 162         DATA_BLOB lm_blob = data_blob(lm_network_pwd, lm_pwd_len);
 163         DATA_BLOB nt_blob = data_blob(nt_network_pwd, nt_pwd_len);
 164
 165         status = make_user_info_map(user_info,
 166                                     smb_name, client_domain,
 167                                     workstation_name,
 168                                     lm_pwd_len ? &lm_blob : NULL,
 169                                     nt_pwd_len ? &nt_blob : NULL,
 170                                     NULL, NULL, NULL,
 171                                     AUTH_PASSWORD_RESPONSE);
 172
 173         if (NT_STATUS_IS_OK(status)) {
 174                 (*user_info)->logon_parameters = logon_parameters;
 175         }
 176         ret = NT_STATUS_IS_OK(status) ? True : False;
 177
 178         data_blob_free(&lm_blob);
 179         data_blob_free(&nt_blob);
 180         return ret;
 181 }
 182
 183 /****************************************************************************
 184  Create an auth_usersupplied_data, making the DATA_BLOBs here.
 185  Decrypt and encrypt the passwords.
 186 ****************************************************************************/
 187
 188 bool make_user_info_netlogon_interactive(struct auth_usersupplied_info **user_info,
 189                                          const char *smb_name,
 190                                          const char *client_domain,
 191                                          const char *workstation_name,
 192                                          uint32 logon_parameters,
 193                                          const uchar chal[8],
 194                                          const uchar lm_interactive_pwd[16],
 195                                          const uchar nt_interactive_pwd[16],
 196                                          const uchar *dc_sess_key)
 197 {
 198         struct samr_Password lm_pwd;
 199         struct samr_Password nt_pwd;
 200         unsigned char local_lm_response[24];
 201         unsigned char local_nt_response[24];
 202         unsigned char key[16];
 203
 204         memcpy(key, dc_sess_key, 16);
 205
 206         if (lm_interactive_pwd)
 207                 memcpy(lm_pwd.hash, lm_interactive_pwd, sizeof(lm_pwd.hash));
 208
 209         if (nt_interactive_pwd)
 210                 memcpy(nt_pwd.hash, nt_interactive_pwd, sizeof(nt_pwd.hash));
 211
 212 #ifdef DEBUG_PASSWORD
 213         DEBUG(100,("key:"));
 214         dump_data(100, key, sizeof(key));
 215
 216         DEBUG(100,("lm owf password:"));
 217         dump_data(100, lm_pwd.hash, sizeof(lm_pwd.hash));
 218
 219         DEBUG(100,("nt owf password:"));
 220         dump_data(100, nt_pwd.hash, sizeof(nt_pwd.hash));
 221 #endif
 222
 223         if (lm_interactive_pwd)
 224                 arcfour_crypt(lm_pwd.hash, key, sizeof(lm_pwd.hash));
 225
 226         if (nt_interactive_pwd)
 227                 arcfour_crypt(nt_pwd.hash, key, sizeof(nt_pwd.hash));
 228
 229 #ifdef DEBUG_PASSWORD
 230         DEBUG(100,("decrypt of lm owf password:"));
 231         dump_data(100, lm_pwd.hash, sizeof(lm_pwd));
 232
 233         DEBUG(100,("decrypt of nt owf password:"));
 234         dump_data(100, nt_pwd.hash, sizeof(nt_pwd));
 235 #endif
 236
 237         if (lm_interactive_pwd)
 238                 SMBOWFencrypt(lm_pwd.hash, chal,
 239                               local_lm_response);
 240
 241         if (nt_interactive_pwd)
 242                 SMBOWFencrypt(nt_pwd.hash, chal,
 243                               local_nt_response);
 244
 245         /* Password info paranoia */
 246         ZERO_STRUCT(key);
 247
 248         {
 249                 bool ret;
 250                 NTSTATUS nt_status;
 251                 DATA_BLOB local_lm_blob;
 252                 DATA_BLOB local_nt_blob;
 253
 254                 if (lm_interactive_pwd) {
 255                         local_lm_blob = data_blob(local_lm_response,
 256                                                   sizeof(local_lm_response));
 257                 }
 258
 259                 if (nt_interactive_pwd) {
 260                         local_nt_blob = data_blob(local_nt_response,
 261                                                   sizeof(local_nt_response));
 262                 }
 263
 264                 nt_status = make_user_info_map(
 265                         user_info,
 266                         smb_name, client_domain, workstation_name,
 267                         lm_interactive_pwd ? &local_lm_blob : NULL,
 268                         nt_interactive_pwd ? &local_nt_blob : NULL,
 269                         lm_interactive_pwd ? &lm_pwd : NULL,
 270                         nt_interactive_pwd ? &nt_pwd : NULL,
 271                         NULL, AUTH_PASSWORD_HASH);
 272
 273                 if (NT_STATUS_IS_OK(nt_status)) {
 274                         (*user_info)->logon_parameters = logon_parameters;
 275                 }
 276
 277                 ret = NT_STATUS_IS_OK(nt_status) ? True : False;
 278                 data_blob_free(&local_lm_blob);
 279                 data_blob_free(&local_nt_blob);
 280                 return ret;
 281         }
 282 }
 283
 284
 285 /****************************************************************************
 286  Create an auth_usersupplied_data structure
 287 ****************************************************************************/
 288
 289 bool make_user_info_for_reply(struct auth_usersupplied_info **user_info,
 290                               const char *smb_name,
 291                               const char *client_domain,
 292                               const uint8 chal[8],
 293                               DATA_BLOB plaintext_password)
 294 {
 295
 296         DATA_BLOB local_lm_blob;
 297         DATA_BLOB local_nt_blob;
 298         NTSTATUS ret = NT_STATUS_UNSUCCESSFUL;
 299         char *plaintext_password_string;
 300         /*
 301          * Not encrypted - do so.
 302          */
 303
 304         DEBUG(5,("make_user_info_for_reply: User passwords not in encrypted "
 305                  "format.\n"));
 306         if (plaintext_password.data && plaintext_password.length) {
 307                 unsigned char local_lm_response[24];
 308
 309 #ifdef DEBUG_PASSWORD
 310                 DEBUG(10,("Unencrypted password (len %d):\n",
 311                           (int)plaintext_password.length));
 312                 dump_data(100, plaintext_password.data,
 313                           plaintext_password.length);
 314 #endif
 315
 316                 SMBencrypt( (const char *)plaintext_password.data,
 317                             (const uchar*)chal, local_lm_response);
 318                 local_lm_blob = data_blob(local_lm_response, 24);
 319
 320                 /* We can't do an NT hash here, as the password needs to be
 321                    case insensitive */
 322                 local_nt_blob = data_blob_null;
 323         } else {
 324                 local_lm_blob = data_blob_null;
 325                 local_nt_blob = data_blob_null;
 326         }
 327
 328         plaintext_password_string = talloc_strndup(talloc_tos(),
 329                                                    (const char *)plaintext_password.data,
 330                                                    plaintext_password.length);
 331         if (!plaintext_password_string) {
 332                 return False;
 333         }
 334
 335         ret = make_user_info_map(
 336                 user_info, smb_name, client_domain,
 337                 get_remote_machine_name(),
 338                 local_lm_blob.data ? &local_lm_blob : NULL,
 339                 local_nt_blob.data ? &local_nt_blob : NULL,
 340                 NULL, NULL,
 341                 plaintext_password_string,
 342                 AUTH_PASSWORD_PLAIN);
 343
 344         if (plaintext_password_string) {
 345                 memset(plaintext_password_string, '\0', strlen(plaintext_password_string));
 346                 talloc_free(plaintext_password_string);
 347         }
 348
 349         data_blob_free(&local_lm_blob);
 350         return NT_STATUS_IS_OK(ret) ? True : False;
 351 }
 352
 353 /****************************************************************************
 354  Create an auth_usersupplied_data structure
 355 ****************************************************************************/
 356
 357 NTSTATUS make_user_info_for_reply_enc(struct auth_usersupplied_info **user_info,
 358                                       const char *smb_name,
 359                                       const char *client_domain,
 360                                       DATA_BLOB lm_resp, DATA_BLOB nt_resp)
 361 {
 362         return make_user_info_map(user_info, smb_name,
 363                                   client_domain,
 364                                   get_remote_machine_name(),
 365                                   lm_resp.data && (lm_resp.length > 0) ? &lm_resp : NULL,
 366                                   nt_resp.data && (nt_resp.length > 0) ? &nt_resp : NULL,
 367                                   NULL, NULL, NULL,
 368                                   AUTH_PASSWORD_RESPONSE);
 369 }
 370
 371 /****************************************************************************
 372  Create a guest user_info blob, for anonymous authenticaion.
 373 ****************************************************************************/
 374
 375 bool make_user_info_guest(struct auth_usersupplied_info **user_info)
 376 {
 377         NTSTATUS nt_status;
 378
 379         nt_status = make_user_info(user_info,
 380                                    "","",
 381                                    "","",
 382                                    "",
 383                                    NULL, NULL,
 384                                    NULL, NULL,
 385                                    NULL,
 386                                    AUTH_PASSWORD_RESPONSE);
 387
 388         return NT_STATUS_IS_OK(nt_status) ? True : False;
 389 }
 390
 391 static NTSTATUS log_nt_token(NT_USER_TOKEN *token)
 392 {
 393         TALLOC_CTX *frame = talloc_stackframe();
 394         char *command;
 395         char *group_sidstr;
 396         size_t i;
 397
 398         if ((lp_log_nt_token_command() == NULL) ||
 399             (strlen(lp_log_nt_token_command()) == 0)) {
 400                 TALLOC_FREE(frame);
 401                 return NT_STATUS_OK;
 402         }
 403
 404         group_sidstr = talloc_strdup(frame, "");
 405         for (i=1; i<token->num_sids; i++) {
 406                 group_sidstr = talloc_asprintf(
 407                         frame, "%s %s", group_sidstr,
 408                         sid_string_talloc(frame, &token->sids[i]));
 409         }
 410
 411         command = talloc_string_sub(
 412                 frame, lp_log_nt_token_command(),
 413                 "%s", sid_string_talloc(frame, &token->sids[0]));
 414         command = talloc_string_sub(frame, command, "%t", group_sidstr);
 415
 416         if (command == NULL) {
 417                 TALLOC_FREE(frame);
 418                 return NT_STATUS_NO_MEMORY;
 419         }
 420
 421         DEBUG(8, ("running command: [%s]\n", command));
 422         if (smbrun(command, NULL) != 0) {
 423                 DEBUG(0, ("Could not log NT token\n"));
 424                 TALLOC_FREE(frame);
 425                 return NT_STATUS_ACCESS_DENIED;
 426         }
 427
 428         TALLOC_FREE(frame);
 429         return NT_STATUS_OK;
 430 }
 431
 432 /*
 433  * Create the token to use from server_info->info3 and
 434  * server_info->sids (the info3/sam groups). Find the unix gids.
 435  */
 436
 437 NTSTATUS create_local_token(struct auth_serversupplied_info *server_info)
 438 {
 439         NTSTATUS status;
 440         size_t i;
 441         struct dom_sid tmp_sid;
 442
 443         /*
 444          * If winbind is not around, we can not make much use of the SIDs the
 445          * domain controller provided us with. Likewise if the user name was
 446          * mapped to some local unix user.
 447          */
 448
 449         if (((lp_server_role() == ROLE_DOMAIN_MEMBER) && !winbind_ping()) ||
 450             (server_info->nss_token)) {
 451                 status = create_token_from_username(server_info,
 452                                                     server_info->unix_name,
 453                                                     server_info->guest,
 454                                                     &server_info->utok.uid,
 455                                                     &server_info->utok.gid,
 456                                                     &server_info->unix_name,
 457                                                     &server_info->ptok);
 458
 459         } else {
 460                 status = create_local_nt_token_from_info3(server_info,
 461                                                           server_info->guest,
 462                                                           server_info->info3,
 463                                                           &server_info->extra,
 464                                                           &server_info->ptok);
 465         }
 466
 467         if (!NT_STATUS_IS_OK(status)) {
 468                 return status;
 469         }
 470
 471         /* Convert the SIDs to gids. */
 472
 473         server_info->utok.ngroups = 0;
 474         server_info->utok.groups = NULL;
 475
 476         /* Start at index 1, where the groups start. */
 477
 478         for (i=1; i<server_info->ptok->num_sids; i++) {
 479                 gid_t gid;
 480                 struct dom_sid *sid = &server_info->ptok->sids[i];
 481
 482                 if (!sid_to_gid(sid, &gid)) {
 483                         DEBUG(10, ("Could not convert SID %s to gid, "
 484                                    "ignoring it\n", sid_string_dbg(sid)));
 485                         continue;
 486                 }
 487                 add_gid_to_array_unique(server_info, gid,
 488                                         &server_info->utok.groups,
 489                                         &server_info->utok.ngroups);
 490         }
 491
 492         /*
 493          * Add the "Unix Group" SID for each gid to catch mapped groups
 494          * and their Unix equivalent.  This is to solve the backwards
 495          * compatibility problem of 'valid users = +ntadmin' where
 496          * ntadmin has been paired with "Domain Admins" in the group
 497          * mapping table.  Otherwise smb.conf would need to be changed
 498          * to 'valid user = "Domain Admins"'.  --jerry
 499          *
 500          * For consistency we also add the "Unix User" SID,
 501          * so that the complete unix token is represented within
 502          * the nt token.
 503          */
 504
 505         uid_to_unix_users_sid(server_info->utok.uid, &tmp_sid);
 506
 507         add_sid_to_array_unique(server_info->ptok, &tmp_sid,
 508                                 &server_info->ptok->sids,
 509                                 &server_info->ptok->num_sids);
 510
 511         for ( i=0; i<server_info->utok.ngroups; i++ ) {
 512                 gid_to_unix_groups_sid(server_info->utok.groups[i], &tmp_sid);
 513                 add_sid_to_array_unique(server_info->ptok, &tmp_sid,
 514                                         &server_info->ptok->sids,
 515                                         &server_info->ptok->num_sids);
 516         }
 517
 518         debug_nt_user_token(DBGC_AUTH, 10, server_info->ptok);
 519         debug_unix_user_token(DBGC_AUTH, 10,
 520                               server_info->utok.uid,
 521                               server_info->utok.gid,
 522                               server_info->utok.ngroups,
 523                               server_info->utok.groups);
 524
 525         status = log_nt_token(server_info->ptok);
 526         return status;
 527 }
 528
 529 /***************************************************************************
 530  Make (and fill) a server_info struct from a 'struct passwd' by conversion
 531  to a struct samu
 532 ***************************************************************************/
 533
 534 NTSTATUS make_server_info_pw(struct auth_serversupplied_info **server_info,
 535                              char *unix_username,
 536                              struct passwd *pwd)
 537 {
 538         NTSTATUS status;
 539         struct samu *sampass = NULL;
 540         char *qualified_name = NULL;
 541         TALLOC_CTX *mem_ctx = NULL;
 542         struct dom_sid u_sid;
 543         enum lsa_SidType type;
 544         struct auth_serversupplied_info *result;
 545
 546         /*
 547          * The SID returned in server_info->sam_account is based
 548          * on our SAM sid even though for a pure UNIX account this should
 549          * not be the case as it doesn't really exist in the SAM db.
 550          * This causes lookups on "[in]valid users" to fail as they
 551          * will lookup this name as a "Unix User" SID to check against
 552          * the user token. Fix this by adding the "Unix User"\unix_username
 553          * SID to the sid array. The correct fix should probably be
 554          * changing the server_info->sam_account user SID to be a
 555          * S-1-22 Unix SID, but this might break old configs where
 556          * plaintext passwords were used with no SAM backend.
 557          */
 558
 559         mem_ctx = talloc_init("make_server_info_pw_tmp");
 560         if (!mem_ctx) {
 561                 return NT_STATUS_NO_MEMORY;
 562         }
 563
 564         qualified_name = talloc_asprintf(mem_ctx, "%s\\%s",
 565                                         unix_users_domain_name(),
 566                                         unix_username );
 567         if (!qualified_name) {
 568                 TALLOC_FREE(mem_ctx);
 569                 return NT_STATUS_NO_MEMORY;
 570         }
 571
 572         if (!lookup_name(mem_ctx, qualified_name, LOOKUP_NAME_ALL,
 573                                                 NULL, NULL,
 574                                                 &u_sid, &type)) {
 575                 TALLOC_FREE(mem_ctx);
 576                 return NT_STATUS_NO_SUCH_USER;
 577         }
 578
 579         TALLOC_FREE(mem_ctx);
 580
 581         if (type != SID_NAME_USER) {
 582                 return NT_STATUS_NO_SUCH_USER;
 583         }
 584
 585         if ( !(sampass = samu_new( NULL )) ) {
 586                 return NT_STATUS_NO_MEMORY;
 587         }
 588
 589         status = samu_set_unix( sampass, pwd );
 590         if (!NT_STATUS_IS_OK(status)) {
 591                 return status;
 592         }
 593
 594         /* In pathological cases the above call can set the account
 595          * name to the DOMAIN\username form. Reset the account name
 596          * using unix_username */
 597         pdb_set_username(sampass, unix_username, PDB_SET);
 598
 599         /* set the user sid to be the calculated u_sid */
 600         pdb_set_user_sid(sampass, &u_sid, PDB_SET);
 601
 602         result = make_server_info(NULL);
 603         if (result == NULL) {
 604                 TALLOC_FREE(sampass);
 605                 return NT_STATUS_NO_MEMORY;
 606         }
 607
 608         status = samu_to_SamInfo3(result, sampass, global_myname(),
 609                                   &result->info3, &result->extra);
 610         TALLOC_FREE(sampass);
 611         if (!NT_STATUS_IS_OK(status)) {
 612                 DEBUG(10, ("Failed to convert samu to info3: %s\n",
 613                            nt_errstr(status)));
 614                 TALLOC_FREE(result);
 615                 return status;
 616         }
 617
 618         result->unix_name = talloc_strdup(result, unix_username);
 619         result->sanitized_username = sanitize_username(result, unix_username);
 620
 621         if ((result->unix_name == NULL)
 622             || (result->sanitized_username == NULL)) {
 623                 TALLOC_FREE(result);
 624                 return NT_STATUS_NO_MEMORY;
 625         }
 626
 627         result->utok.uid = pwd->pw_uid;
 628         result->utok.gid = pwd->pw_gid;
 629
 630         *server_info = result;
 631
 632         return NT_STATUS_OK;
 633 }
 634
 635 static NTSTATUS get_guest_info3(TALLOC_CTX *mem_ctx,
 636                                 struct netr_SamInfo3 *info3)
 637 {
 638         const char *guest_account = lp_guestaccount();
 639         struct dom_sid domain_sid;
 640         struct passwd *pwd;
 641         const char *tmp;
 642
 643         pwd = getpwnam_alloc(mem_ctx, guest_account);
 644         if (pwd == NULL) {
 645                 DEBUG(0,("SamInfo3_for_guest: Unable to locate guest "
 646                          "account [%s]!\n", guest_account));
 647                 return NT_STATUS_NO_SUCH_USER;
 648         }
 649
 650         /* Set acount name */
 651         tmp = talloc_strdup(mem_ctx, pwd->pw_name);
 652         if (tmp == NULL) {
 653                 return NT_STATUS_NO_MEMORY;
 654         }
 655         init_lsa_String(&info3->base.account_name, tmp);
 656
 657         /* Set domain name */
 658         tmp = talloc_strdup(mem_ctx, get_global_sam_name());
 659         if (tmp == NULL) {
 660                 return NT_STATUS_NO_MEMORY;
 661         }
 662         init_lsa_StringLarge(&info3->base.domain, tmp);
 663
 664         /* Domain sid */
 665         sid_copy(&domain_sid, get_global_sam_sid());
 666
 667         info3->base.domain_sid = sid_dup_talloc(mem_ctx, &domain_sid);
 668         if (info3->base.domain_sid == NULL) {
 669                 return NT_STATUS_NO_MEMORY;
 670         }
 671
 672         /* Guest rid */
 673         info3->base.rid = DOMAIN_RID_GUEST;
 674
 675         /* Primary gid */
 676         info3->base.primary_gid = BUILTIN_RID_GUESTS;
 677
 678         TALLOC_FREE(pwd);
 679         return NT_STATUS_OK;
 680 }
 681
 682 /***************************************************************************
 683  Make (and fill) a user_info struct for a guest login.
 684  This *must* succeed for smbd to start. If there is no mapping entry for
 685  the guest gid, then create one.
 686 ***************************************************************************/
 687
 688 static NTSTATUS make_new_server_info_guest(struct auth_serversupplied_info **server_info)
 689 {
 690         static const char zeros[16] = {0};
 691         const char *guest_account = lp_guestaccount();
 692         const char *domain = global_myname();
 693         struct netr_SamInfo3 info3;
 694         TALLOC_CTX *tmp_ctx;
 695         NTSTATUS status;
 696         fstring tmp;
 697
 698         tmp_ctx = talloc_stackframe();
 699         if (tmp_ctx == NULL) {
 700                 return NT_STATUS_NO_MEMORY;
 701         }
 702
 703         ZERO_STRUCT(info3);
 704
 705         status = get_guest_info3(tmp_ctx, &info3);
 706         if (!NT_STATUS_IS_OK(status)) {
 707                 goto done;
 708         }
 709
 710         status = make_server_info_info3(tmp_ctx,
 711                                         guest_account,
 712                                         domain,
 713                                         server_info,
 714                                         &info3);
 715         if (!NT_STATUS_IS_OK(status)) {
 716                 goto done;
 717         }
 718
 719         (*server_info)->guest = True;
 720
 721         status = create_local_token(*server_info);
 722         if (!NT_STATUS_IS_OK(status)) {
 723                 DEBUG(10, ("create_local_token failed: %s\n",
 724                            nt_errstr(status)));
 725                 goto done;
 726         }
 727
 728         /* annoying, but the Guest really does have a session key, and it is
 729            all zeros! */
 730         (*server_info)->user_session_key = data_blob(zeros, sizeof(zeros));
 731         (*server_info)->lm_session_key = data_blob(zeros, sizeof(zeros));
 732
 733         alpha_strcpy(tmp, (*server_info)->info3->base.account_name.string,
 734                      ". _-$", sizeof(tmp));
 735         (*server_info)->sanitized_username = talloc_strdup(*server_info, tmp);
 736
 737         status = NT_STATUS_OK;
 738 done:
 739         TALLOC_FREE(tmp_ctx);
 740         return NT_STATUS_OK;
 741 }
 742
 743 /***************************************************************************
 744  Make (and fill) a user_info struct for a system user login.
 745  This *must* succeed for smbd to start.
 746 ***************************************************************************/
 747
 748 static NTSTATUS make_new_server_info_system(TALLOC_CTX *mem_ctx,
 749                                             struct auth_serversupplied_info **server_info)
 750 {
 751         struct passwd *pwd;
 752         NTSTATUS status;
 753
 754         pwd = getpwuid_alloc(mem_ctx, sec_initial_uid());
 755         if (pwd == NULL) {
 756                 return NT_STATUS_NO_MEMORY;
 757         }
 758
 759         status = make_serverinfo_from_username(mem_ctx,
 760                                              pwd->pw_name,
 761                                              false,
 762                                              server_info);
 763         if (!NT_STATUS_IS_OK(status)) {
 764                 return status;
 765         }
 766
 767         (*server_info)->system = true;
 768
 769         return NT_STATUS_OK;
 770 }
 771
 772 /****************************************************************************
 773   Fake a auth_serversupplied_info just from a username
 774 ****************************************************************************/
 775
 776 NTSTATUS make_serverinfo_from_username(TALLOC_CTX *mem_ctx,
 777                                        const char *username,
 778                                        bool is_guest,
 779                                        struct auth_serversupplied_info **presult)
 780 {
 781         struct auth_serversupplied_info *result;
 782         struct passwd *pwd;
 783         NTSTATUS status;
 784
 785         pwd = getpwnam_alloc(talloc_tos(), username);
 786         if (pwd == NULL) {
 787                 return NT_STATUS_NO_SUCH_USER;
 788         }
 789
 790         status = make_server_info_pw(&result, pwd->pw_name, pwd);
 791
 792         TALLOC_FREE(pwd);
 793
 794         if (!NT_STATUS_IS_OK(status)) {
 795                 return status;
 796         }
 797
 798         result->nss_token = true;
 799         result->guest = is_guest;
 800
 801         status = create_local_token(result);
 802
 803         if (!NT_STATUS_IS_OK(status)) {
 804                 TALLOC_FREE(result);
 805                 return status;
 806         }
 807
 808         *presult = result;
 809         return NT_STATUS_OK;
 810 }
 811
 812
 813 struct auth_serversupplied_info *copy_serverinfo(TALLOC_CTX *mem_ctx,
 814                                                  const struct auth_serversupplied_info *src)
 815 {
 816         struct auth_serversupplied_info *dst;
 817
 818         dst = make_server_info(mem_ctx);
 819         if (dst == NULL) {
 820                 return NULL;
 821         }
 822
 823         dst->guest = src->guest;
 824         dst->system = src->system;
 825         dst->utok.uid = src->utok.uid;
 826         dst->utok.gid = src->utok.gid;
 827         dst->utok.ngroups = src->utok.ngroups;
 828         if (src->utok.ngroups != 0) {
 829                 dst->utok.groups = (gid_t *)TALLOC_MEMDUP(
 830                         dst, src->utok.groups,
 831                         sizeof(gid_t)*dst->utok.ngroups);
 832         } else {
 833                 dst->utok.groups = NULL;
 834         }
 835
 836         if (src->ptok) {
 837                 dst->ptok = dup_nt_token(dst, src->ptok);
 838                 if (!dst->ptok) {
 839                         TALLOC_FREE(dst);
 840                         return NULL;
 841                 }
 842         }
 843
 844         dst->user_session_key = data_blob_talloc( dst, src->user_session_key.data,
 845                                                 src->user_session_key.length);
 846
 847         dst->lm_session_key = data_blob_talloc(dst, src->lm_session_key.data,
 848                                                 src->lm_session_key.length);
 849
 850         dst->info3 = copy_netr_SamInfo3(dst, src->info3);
 851         if (!dst->info3) {
 852                 TALLOC_FREE(dst);
 853                 return NULL;
 854         }
 855         dst->extra = src->extra;
 856
 857         dst->pam_handle = NULL;
 858         dst->unix_name = talloc_strdup(dst, src->unix_name);
 859         if (!dst->unix_name) {
 860                 TALLOC_FREE(dst);
 861                 return NULL;
 862         }
 863
 864         dst->sanitized_username = talloc_strdup(dst, src->sanitized_username);
 865         if (!dst->sanitized_username) {
 866                 TALLOC_FREE(dst);
 867                 return NULL;
 868         }
 869
 870         return dst;
 871 }
 872
 873 /*
 874  * Set a new session key. Used in the rpc server where we have to override the
 875  * SMB level session key with SystemLibraryDTC
 876  */
 877
 878 bool server_info_set_session_key(struct auth_serversupplied_info *info,
 879                                  DATA_BLOB session_key)
 880 {
 881         TALLOC_FREE(info->user_session_key.data);
 882
 883         info->user_session_key = data_blob_talloc(
 884                 info, session_key.data, session_key.length);
 885
 886         return (info->user_session_key.data != NULL);
 887 }
 888
 889 static struct auth_serversupplied_info *guest_info = NULL;
 890
 891 bool init_guest_info(void)
 892 {
 893         if (guest_info != NULL)
 894                 return True;
 895
 896         return NT_STATUS_IS_OK(make_new_server_info_guest(&guest_info));
 897 }
 898
 899 NTSTATUS make_server_info_guest(TALLOC_CTX *mem_ctx,
 900                                 struct auth_serversupplied_info **server_info)
 901 {
 902         *server_info = copy_serverinfo(mem_ctx, guest_info);
 903         return (*server_info != NULL) ? NT_STATUS_OK : NT_STATUS_NO_MEMORY;
 904 }
 905
 906 static struct auth_serversupplied_info *system_info = NULL;
 907
 908 bool init_system_info(void)
 909 {
 910         if (system_info != NULL)
 911                 return True;
 912
 913         return NT_STATUS_IS_OK(make_new_server_info_system(talloc_autofree_context(), &system_info));
 914 }
 915
 916 NTSTATUS make_server_info_system(TALLOC_CTX *mem_ctx,
 917                                 struct auth_serversupplied_info **server_info)
 918 {
 919         if (system_info == NULL) return NT_STATUS_UNSUCCESSFUL;
 920         *server_info = copy_serverinfo(mem_ctx, system_info);
 921         return (*server_info != NULL) ? NT_STATUS_OK : NT_STATUS_NO_MEMORY;
 922 }
 923
 924 bool copy_current_user(struct current_user *dst, struct current_user *src)
 925 {
 926         gid_t *groups;
 927         NT_USER_TOKEN *nt_token;
 928
 929         groups = (gid_t *)memdup(src->ut.groups,
 930                                  sizeof(gid_t) * src->ut.ngroups);
 931         if ((src->ut.ngroups != 0) && (groups == NULL)) {
 932                 return False;
 933         }
 934
 935         nt_token = dup_nt_token(NULL, src->nt_user_token);
 936         if (nt_token == NULL) {
 937                 SAFE_FREE(groups);
 938                 return False;
 939         }
 940
 941         dst->conn = src->conn;
 942         dst->vuid = src->vuid;
 943         dst->ut.uid = src->ut.uid;
 944         dst->ut.gid = src->ut.gid;
 945         dst->ut.ngroups = src->ut.ngroups;
 946         dst->ut.groups = groups;
 947         dst->nt_user_token = nt_token;
 948         return True;
 949 }
 950
 951 /***************************************************************************
 952  Purely internal function for make_server_info_info3
 953 ***************************************************************************/
 954
 955 static NTSTATUS check_account(TALLOC_CTX *mem_ctx, const char *domain,
 956                               const char *username, char **found_username,
 957                               struct passwd **pwd,
 958                               bool *username_was_mapped)
 959 {
 960         fstring dom_user, lower_username;
 961         fstring real_username;
 962         struct passwd *passwd;
 963
 964         fstrcpy( lower_username, username );
 965         strlower_m( lower_username );
 966
 967         fstr_sprintf(dom_user, "%s%c%s", domain, *lp_winbind_separator(),
 968                 lower_username);
 969
 970         /* Get the passwd struct.  Try to create the account if necessary. */
 971
 972         *username_was_mapped = map_username(dom_user);
 973
 974         passwd = smb_getpwnam( NULL, dom_user, real_username, True );
 975         if (!passwd) {
 976                 DEBUG(3, ("Failed to find authenticated user %s via "
 977                           "getpwnam(), denying access.\n", dom_user));
 978                 return NT_STATUS_NO_SUCH_USER;
 979         }
 980
 981         *pwd = passwd;
 982
 983         /* This is pointless -- there is no suport for differing
 984            unix and windows names.  Make sure to always store the
 985            one we actually looked up and succeeded. Have I mentioned
 986            why I hate the 'winbind use default domain' parameter?
 987                                          --jerry              */
 988
 989         *found_username = talloc_strdup( mem_ctx, real_username );
 990
 991         return NT_STATUS_OK;
 992 }
 993
 994 /****************************************************************************
 995  Wrapper to allow the getpwnam() call to strip the domain name and
 996  try again in case a local UNIX user is already there.  Also run through
 997  the username if we fallback to the username only.
 998  ****************************************************************************/
 999
1000 struct passwd *smb_getpwnam( TALLOC_CTX *mem_ctx, const char *domuser,
1001                              fstring save_username, bool create )
1002 {
1003         struct passwd *pw = NULL;
1004         char *p;
1005         fstring username;
1006
1007         /* we only save a copy of the username it has been mangled
1008            by winbindd use default domain */
1009
1010         save_username[0] = '\0';
1011
1012         /* don't call map_username() here since it has to be done higher
1013            up the stack so we don't call it multiple times */
1014
1015         fstrcpy( username, domuser );
1016
1017         p = strchr_m( username, *lp_winbind_separator() );
1018
1019         /* code for a DOMAIN\user string */
1020
1021         if ( p ) {
1022                 fstring strip_username;
1023
1024                 pw = Get_Pwnam_alloc( mem_ctx, domuser );
1025                 if ( pw ) {
1026                         /* make sure we get the case of the username correct */
1027                         /* work around 'winbind use default domain = yes' */
1028
1029                         if ( !strchr_m( pw->pw_name, *lp_winbind_separator() ) ) {
1030                                 char *domain;
1031
1032                                 /* split the domain and username into 2 strings */
1033                                 *p = '\0';
1034                                 domain = username;
1035
1036                                 fstr_sprintf(save_username, "%s%c%s", domain, *lp_winbind_separator(), pw->pw_name);
1037                         }
1038                         else
1039                                 fstrcpy( save_username, pw->pw_name );
1040
1041                         /* whew -- done! */
1042                         return pw;
1043                 }
1044
1045                 /* setup for lookup of just the username */
1046                 /* remember that p and username are overlapping memory */
1047
1048                 p++;
1049                 fstrcpy( strip_username, p );
1050                 fstrcpy( username, strip_username );
1051         }
1052
1053         /* just lookup a plain username */
1054
1055         pw = Get_Pwnam_alloc(mem_ctx, username);
1056
1057         /* Create local user if requested but only if winbindd
1058            is not running.  We need to protect against cases
1059            where winbindd is failing and then prematurely
1060            creating users in /etc/passwd */
1061
1062         if ( !pw && create && !winbind_ping() ) {
1063                 /* Don't add a machine account. */
1064                 if (username[strlen(username)-1] == '$')
1065                         return NULL;
1066
1067                 _smb_create_user(NULL, username, NULL);
1068                 pw = Get_Pwnam_alloc(mem_ctx, username);
1069         }
1070
1071         /* one last check for a valid passwd struct */
1072
1073         if ( pw )
1074                 fstrcpy( save_username, pw->pw_name );
1075
1076         return pw;
1077 }
1078
1079 /***************************************************************************
1080  Make a server_info struct from the info3 returned by a domain logon
1081 ***************************************************************************/
1082
1083 NTSTATUS make_server_info_info3(TALLOC_CTX *mem_ctx,
1084                                 const char *sent_nt_username,
1085                                 const char *domain,
1086                                 struct auth_serversupplied_info **server_info,
1087                                 struct netr_SamInfo3 *info3)
1088 {
1089         static const char zeros[16] = {0, };
1090
1091         NTSTATUS nt_status = NT_STATUS_OK;
1092         char *found_username = NULL;
1093         const char *nt_domain;
1094         const char *nt_username;
1095         bool username_was_mapped;
1096         struct passwd *pwd;
1097         struct auth_serversupplied_info *result;
1098         struct dom_sid *group_sid;
1099         struct netr_SamInfo3 *i3;
1100
1101         /*
1102            Here is where we should check the list of
1103            trusted domains, and verify that the SID
1104            matches.
1105         */
1106
1107         nt_username = talloc_strdup(mem_ctx, info3->base.account_name.string);
1108         if (!nt_username) {
1109                 /* If the server didn't give us one, just use the one we sent
1110                  * them */
1111                 nt_username = sent_nt_username;
1112         }
1113
1114         nt_domain = talloc_strdup(mem_ctx, info3->base.domain.string);
1115         if (!nt_domain) {
1116                 /* If the server didn't give us one, just use the one we sent
1117                  * them */
1118                 nt_domain = domain;
1119         }
1120
1121         /* If getpwnam() fails try the add user script (2.2.x behavior).
1122
1123            We use the _unmapped_ username here in an attempt to provide
1124            consistent username mapping behavior between kerberos and NTLM[SSP]
1125            authentication in domain mode security.  I.E. Username mapping
1126            should be applied to the fully qualified username
1127            (e.g. DOMAIN\user) and not just the login name.  Yes this means we
1128            called map_username() unnecessarily in make_user_info_map() but
1129            that is how the current code is designed.  Making the change here
1130            is the least disruptive place.  -- jerry */
1131
1132         /* this call will try to create the user if necessary */
1133
1134         nt_status = check_account(mem_ctx, nt_domain, sent_nt_username,
1135                                      &found_username, &pwd,
1136                                      &username_was_mapped);
1137
1138         if (!NT_STATUS_IS_OK(nt_status)) {
1139                 return nt_status;
1140         }
1141
1142         result = make_server_info(NULL);
1143         if (result == NULL) {
1144                 DEBUG(4, ("make_server_info failed!\n"));
1145                 return NT_STATUS_NO_MEMORY;
1146         }
1147
1148         result->unix_name = talloc_strdup(result, found_username);
1149
1150         result->sanitized_username = sanitize_username(result,
1151                                                        result->unix_name);
1152         if (result->sanitized_username == NULL) {
1153                 TALLOC_FREE(result);
1154                 return NT_STATUS_NO_MEMORY;
1155         }
1156
1157         /* copy in the info3 */
1158         result->info3 = i3 = copy_netr_SamInfo3(result, info3);
1159         if (result->info3 == NULL) {
1160                 TALLOC_FREE(result);
1161                 return NT_STATUS_NO_MEMORY;
1162         }
1163
1164         /* Fill in the unix info we found on the way */
1165         result->utok.uid = pwd->pw_uid;
1166         result->utok.gid = pwd->pw_gid;
1167
1168         /* We can't just trust that the primary group sid sent us is something
1169          * we can really use. Obtain the useable sid, and store the original
1170          * one as an additional group if it had to be replaced */
1171         nt_status = get_primary_group_sid(mem_ctx, found_username,
1172                                           &pwd, &group_sid);
1173         if (!NT_STATUS_IS_OK(nt_status)) {
1174                 TALLOC_FREE(result);
1175                 return nt_status;
1176         }
1177
1178         /* store and check if it is the same we got originally */
1179         sid_peek_rid(group_sid, &i3->base.primary_gid);
1180         if (i3->base.primary_gid != info3->base.primary_gid) {
1181                 uint32_t n = i3->base.groups.count;
1182                 /* not the same, store the original as an additional group */
1183                 i3->base.groups.rids =
1184                         talloc_realloc(i3, i3->base.groups.rids,
1185                                         struct samr_RidWithAttribute, n + 1);
1186                 if (i3->base.groups.rids == NULL) {
1187                         TALLOC_FREE(result);
1188                         return NT_STATUS_NO_MEMORY;
1189                 }
1190                 i3->base.groups.rids[n].rid = info3->base.primary_gid;
1191                 i3->base.groups.rids[n].attributes = SE_GROUP_ENABLED;
1192                 i3->base.groups.count = n + 1;
1193         }
1194
1195         /* ensure we are never given NULL session keys */
1196
1197         if (memcmp(info3->base.key.key, zeros, sizeof(zeros)) == 0) {
1198                 result->user_session_key = data_blob_null;
1199         } else {
1200                 result->user_session_key = data_blob_talloc(
1201                         result, info3->base.key.key,
1202                         sizeof(info3->base.key.key));
1203         }
1204
1205         if (memcmp(info3->base.LMSessKey.key, zeros, 8) == 0) {
1206                 result->lm_session_key = data_blob_null;
1207         } else {
1208                 result->lm_session_key = data_blob_talloc(
1209                         result, info3->base.LMSessKey.key,
1210                         sizeof(info3->base.LMSessKey.key));
1211         }
1212
1213         result->nss_token |= username_was_mapped;
1214
1215         *server_info = result;
1216
1217         return NT_STATUS_OK;
1218 }
1219
1220 /*****************************************************************************
1221  Make a server_info struct from the wbcAuthUserInfo returned by a domain logon
1222 ******************************************************************************/
1223
1224 NTSTATUS make_server_info_wbcAuthUserInfo(TALLOC_CTX *mem_ctx,
1225                                           const char *sent_nt_username,
1226                                           const char *domain,
1227                                           const struct wbcAuthUserInfo *info,
1228                                           struct auth_serversupplied_info **server_info)
1229 {
1230         struct netr_SamInfo3 *info3;
1231
1232         info3 = wbcAuthUserInfo_to_netr_SamInfo3(mem_ctx, info);
1233         if (!info3) {
1234                 return NT_STATUS_NO_MEMORY;
1235         }
1236
1237         return make_server_info_info3(mem_ctx,
1238                                       sent_nt_username, domain,
1239                                       server_info, info3);
1240 }
1241
1242 /**
1243  * Verify whether or not given domain is trusted.
1244  *
1245  * @param domain_name name of the domain to be verified
1246  * @return true if domain is one of the trusted ones or
1247  *         false if otherwise
1248  **/
1249
1250 bool is_trusted_domain(const char* dom_name)
1251 {
1252         struct dom_sid trustdom_sid;
1253         bool ret;
1254
1255         /* no trusted domains for a standalone server */
1256
1257         if ( lp_server_role() == ROLE_STANDALONE )
1258                 return False;
1259
1260         if (dom_name == NULL || dom_name[0] == '\0') {
1261                 return false;
1262         }
1263
1264         if (strequal(dom_name, get_global_sam_name())) {
1265                 return false;
1266         }
1267
1268         /* if we are a DC, then check for a direct trust relationships */
1269
1270         if ( IS_DC ) {
1271                 become_root();
1272                 DEBUG (5,("is_trusted_domain: Checking for domain trust with "
1273                           "[%s]\n", dom_name ));
1274                 ret = pdb_get_trusteddom_pw(dom_name, NULL, NULL, NULL);
1275                 unbecome_root();
1276                 if (ret)
1277                         return True;
1278         }
1279         else {
1280                 wbcErr result;
1281
1282                 /* If winbind is around, ask it */
1283
1284                 result = wb_is_trusted_domain(dom_name);
1285
1286                 if (result == WBC_ERR_SUCCESS) {
1287                         return True;
1288                 }
1289
1290                 if (result == WBC_ERR_DOMAIN_NOT_FOUND) {
1291                         /* winbind could not find the domain */
1292                         return False;
1293                 }
1294
1295                 /* The only other possible result is that winbind is not up
1296                    and running. We need to update the trustdom_cache
1297                    ourselves */
1298
1299                 update_trustdom_cache();
1300         }
1301
1302         /* now the trustdom cache should be available a DC could still
1303          * have a transitive trust so fall back to the cache of trusted
1304          * domains (like a domain member would use  */
1305
1306         if ( trustdom_cache_fetch(dom_name, &trustdom_sid) ) {
1307                 return True;
1308         }
1309
1310         return False;
1311 }
1312