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->user_sids[i]));
 409         }
 410
 411         command = talloc_string_sub(
 412                 frame, lp_log_nt_token_command(),
 413                 "%s", sid_string_talloc(frame, &token->user_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->user_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->user_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->user_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         NTSTATUS status;
 643
 644         pwd = getpwnam_alloc(mem_ctx, guest_account);
 645         if (pwd == NULL) {
 646                 DEBUG(0,("SamInfo3_for_guest: Unable to locate guest "
 647                          "account [%s]!\n", guest_account));
 648                 return NT_STATUS_NO_SUCH_USER;
 649         }
 650
 651         /* Set acount name */
 652         tmp = talloc_strdup(mem_ctx, pwd->pw_name);
 653         if (tmp == NULL) {
 654                 return NT_STATUS_NO_MEMORY;
 655         }
 656         init_lsa_String(&info3->base.account_name, tmp);
 657
 658         /* Set domain name */
 659         tmp = talloc_strdup(mem_ctx, get_global_sam_name());
 660         if (tmp == NULL) {
 661                 return NT_STATUS_NO_MEMORY;
 662         }
 663         init_lsa_StringLarge(&info3->base.domain, tmp);
 664
 665         /* Domain sid */
 666         sid_copy(&domain_sid, get_global_sam_sid());
 667
 668         info3->base.domain_sid = sid_dup_talloc(mem_ctx, &domain_sid);
 669         if (info3->base.domain_sid == NULL) {
 670                 return NT_STATUS_NO_MEMORY;
 671         }
 672
 673         /* Guest rid */
 674         info3->base.rid = DOMAIN_RID_GUEST;
 675
 676         /* Primary gid */
 677         info3->base.primary_gid = BUILTIN_RID_GUESTS;
 678
 679         TALLOC_FREE(pwd);
 680         return status;
 681 }
 682
 683 /***************************************************************************
 684  Make (and fill) a user_info struct for a guest login.
 685  This *must* succeed for smbd to start. If there is no mapping entry for
 686  the guest gid, then create one.
 687 ***************************************************************************/
 688
 689 static NTSTATUS make_new_server_info_guest(struct auth_serversupplied_info **server_info)
 690 {
 691         static const char zeros[16] = {0};
 692         const char *guest_account = lp_guestaccount();
 693         const char *domain = global_myname();
 694         struct netr_SamInfo3 info3;
 695         TALLOC_CTX *tmp_ctx;
 696         NTSTATUS status;
 697         fstring tmp;
 698
 699         tmp_ctx = talloc_stackframe();
 700         if (tmp_ctx == NULL) {
 701                 return NT_STATUS_NO_MEMORY;
 702         }
 703
 704         ZERO_STRUCT(info3);
 705
 706         status = get_guest_info3(tmp_ctx, &info3);
 707         if (!NT_STATUS_IS_OK(status)) {
 708                 goto done;
 709         }
 710
 711         status = make_server_info_info3(tmp_ctx,
 712                                         guest_account,
 713                                         domain,
 714                                         server_info,
 715                                         &info3);
 716         if (!NT_STATUS_IS_OK(status)) {
 717                 goto done;
 718         }
 719
 720         (*server_info)->guest = True;
 721
 722         status = create_local_token(*server_info);
 723         if (!NT_STATUS_IS_OK(status)) {
 724                 DEBUG(10, ("create_local_token failed: %s\n",
 725                            nt_errstr(status)));
 726                 goto done;
 727         }
 728
 729         /* annoying, but the Guest really does have a session key, and it is
 730            all zeros! */
 731         (*server_info)->user_session_key = data_blob(zeros, sizeof(zeros));
 732         (*server_info)->lm_session_key = data_blob(zeros, sizeof(zeros));
 733
 734         alpha_strcpy(tmp, (*server_info)->info3->base.account_name.string,
 735                      ". _-$", sizeof(tmp));
 736         (*server_info)->sanitized_username = talloc_strdup(*server_info, tmp);
 737
 738         status = NT_STATUS_OK;
 739 done:
 740         TALLOC_FREE(tmp_ctx);
 741         return NT_STATUS_OK;
 742 }
 743
 744 /***************************************************************************
 745  Make (and fill) a user_info struct for a system user login.
 746  This *must* succeed for smbd to start.
 747 ***************************************************************************/
 748
 749 static NTSTATUS make_new_server_info_system(TALLOC_CTX *mem_ctx,
 750                                             struct auth_serversupplied_info **server_info)
 751 {
 752         struct passwd *pwd;
 753         NTSTATUS status;
 754
 755         pwd = getpwuid_alloc(mem_ctx, sec_initial_uid());
 756         if (pwd == NULL) {
 757                 return NT_STATUS_NO_MEMORY;
 758         }
 759
 760         status = make_serverinfo_from_username(mem_ctx,
 761                                              pwd->pw_name,
 762                                              false,
 763                                              server_info);
 764         if (!NT_STATUS_IS_OK(status)) {
 765                 return status;
 766         }
 767
 768         (*server_info)->system = true;
 769
 770         return NT_STATUS_OK;
 771 }
 772
 773 /****************************************************************************
 774   Fake a auth_serversupplied_info just from a username
 775 ****************************************************************************/
 776
 777 NTSTATUS make_serverinfo_from_username(TALLOC_CTX *mem_ctx,
 778                                        const char *username,
 779                                        bool is_guest,
 780                                        struct auth_serversupplied_info **presult)
 781 {
 782         struct auth_serversupplied_info *result;
 783         struct passwd *pwd;
 784         NTSTATUS status;
 785
 786         pwd = getpwnam_alloc(talloc_tos(), username);
 787         if (pwd == NULL) {
 788                 return NT_STATUS_NO_SUCH_USER;
 789         }
 790
 791         status = make_server_info_pw(&result, pwd->pw_name, pwd);
 792
 793         TALLOC_FREE(pwd);
 794
 795         if (!NT_STATUS_IS_OK(status)) {
 796                 return status;
 797         }
 798
 799         result->nss_token = true;
 800         result->guest = is_guest;
 801
 802         status = create_local_token(result);
 803
 804         if (!NT_STATUS_IS_OK(status)) {
 805                 TALLOC_FREE(result);
 806                 return status;
 807         }
 808
 809         *presult = result;
 810         return NT_STATUS_OK;
 811 }
 812
 813
 814 struct auth_serversupplied_info *copy_serverinfo(TALLOC_CTX *mem_ctx,
 815                                                  const struct auth_serversupplied_info *src)
 816 {
 817         struct auth_serversupplied_info *dst;
 818
 819         dst = make_server_info(mem_ctx);
 820         if (dst == NULL) {
 821                 return NULL;
 822         }
 823
 824         dst->guest = src->guest;
 825         dst->system = src->system;
 826         dst->utok.uid = src->utok.uid;
 827         dst->utok.gid = src->utok.gid;
 828         dst->utok.ngroups = src->utok.ngroups;
 829         if (src->utok.ngroups != 0) {
 830                 dst->utok.groups = (gid_t *)TALLOC_MEMDUP(
 831                         dst, src->utok.groups,
 832                         sizeof(gid_t)*dst->utok.ngroups);
 833         } else {
 834                 dst->utok.groups = NULL;
 835         }
 836
 837         if (src->ptok) {
 838                 dst->ptok = dup_nt_token(dst, src->ptok);
 839                 if (!dst->ptok) {
 840                         TALLOC_FREE(dst);
 841                         return NULL;
 842                 }
 843         }
 844
 845         dst->user_session_key = data_blob_talloc( dst, src->user_session_key.data,
 846                                                 src->user_session_key.length);
 847
 848         dst->lm_session_key = data_blob_talloc(dst, src->lm_session_key.data,
 849                                                 src->lm_session_key.length);
 850
 851         dst->info3 = copy_netr_SamInfo3(dst, src->info3);
 852         if (!dst->info3) {
 853                 TALLOC_FREE(dst);
 854                 return NULL;
 855         }
 856         dst->extra = src->extra;
 857
 858         dst->pam_handle = NULL;
 859         dst->unix_name = talloc_strdup(dst, src->unix_name);
 860         if (!dst->unix_name) {
 861                 TALLOC_FREE(dst);
 862                 return NULL;
 863         }
 864
 865         dst->sanitized_username = talloc_strdup(dst, src->sanitized_username);
 866         if (!dst->sanitized_username) {
 867                 TALLOC_FREE(dst);
 868                 return NULL;
 869         }
 870
 871         return dst;
 872 }
 873
 874 /*
 875  * Set a new session key. Used in the rpc server where we have to override the
 876  * SMB level session key with SystemLibraryDTC
 877  */
 878
 879 bool server_info_set_session_key(struct auth_serversupplied_info *info,
 880                                  DATA_BLOB session_key)
 881 {
 882         TALLOC_FREE(info->user_session_key.data);
 883
 884         info->user_session_key = data_blob_talloc(
 885                 info, session_key.data, session_key.length);
 886
 887         return (info->user_session_key.data != NULL);
 888 }
 889
 890 static struct auth_serversupplied_info *guest_info = NULL;
 891
 892 bool init_guest_info(void)
 893 {
 894         if (guest_info != NULL)
 895                 return True;
 896
 897         return NT_STATUS_IS_OK(make_new_server_info_guest(&guest_info));
 898 }
 899
 900 NTSTATUS make_server_info_guest(TALLOC_CTX *mem_ctx,
 901                                 struct auth_serversupplied_info **server_info)
 902 {
 903         *server_info = copy_serverinfo(mem_ctx, guest_info);
 904         return (*server_info != NULL) ? NT_STATUS_OK : NT_STATUS_NO_MEMORY;
 905 }
 906
 907 static struct auth_serversupplied_info *system_info = NULL;
 908
 909 bool init_system_info(void)
 910 {
 911         if (system_info != NULL)
 912                 return True;
 913
 914         return NT_STATUS_IS_OK(make_new_server_info_system(talloc_autofree_context(), &system_info));
 915 }
 916
 917 NTSTATUS make_server_info_system(TALLOC_CTX *mem_ctx,
 918                                 struct auth_serversupplied_info **server_info)
 919 {
 920         if (system_info == NULL) return NT_STATUS_UNSUCCESSFUL;
 921         *server_info = copy_serverinfo(mem_ctx, system_info);
 922         return (*server_info != NULL) ? NT_STATUS_OK : NT_STATUS_NO_MEMORY;
 923 }
 924
 925 bool copy_current_user(struct current_user *dst, struct current_user *src)
 926 {
 927         gid_t *groups;
 928         NT_USER_TOKEN *nt_token;
 929
 930         groups = (gid_t *)memdup(src->ut.groups,
 931                                  sizeof(gid_t) * src->ut.ngroups);
 932         if ((src->ut.ngroups != 0) && (groups == NULL)) {
 933                 return False;
 934         }
 935
 936         nt_token = dup_nt_token(NULL, src->nt_user_token);
 937         if (nt_token == NULL) {
 938                 SAFE_FREE(groups);
 939                 return False;
 940         }
 941
 942         dst->conn = src->conn;
 943         dst->vuid = src->vuid;
 944         dst->ut.uid = src->ut.uid;
 945         dst->ut.gid = src->ut.gid;
 946         dst->ut.ngroups = src->ut.ngroups;
 947         dst->ut.groups = groups;
 948         dst->nt_user_token = nt_token;
 949         return True;
 950 }
 951
 952 /***************************************************************************
 953  Purely internal function for make_server_info_info3
 954 ***************************************************************************/
 955
 956 static NTSTATUS check_account(TALLOC_CTX *mem_ctx, const char *domain,
 957                               const char *username, char **found_username,
 958                               struct passwd **pwd,
 959                               bool *username_was_mapped)
 960 {
 961         fstring dom_user, lower_username;
 962         fstring real_username;
 963         struct passwd *passwd;
 964
 965         fstrcpy( lower_username, username );
 966         strlower_m( lower_username );
 967
 968         fstr_sprintf(dom_user, "%s%c%s", domain, *lp_winbind_separator(),
 969                 lower_username);
 970
 971         /* Get the passwd struct.  Try to create the account if necessary. */
 972
 973         *username_was_mapped = map_username(dom_user);
 974
 975         passwd = smb_getpwnam( NULL, dom_user, real_username, True );
 976         if (!passwd) {
 977                 DEBUG(3, ("Failed to find authenticated user %s via "
 978                           "getpwnam(), denying access.\n", dom_user));
 979                 return NT_STATUS_NO_SUCH_USER;
 980         }
 981
 982         *pwd = passwd;
 983
 984         /* This is pointless -- there is no suport for differing
 985            unix and windows names.  Make sure to always store the
 986            one we actually looked up and succeeded. Have I mentioned
 987            why I hate the 'winbind use default domain' parameter?
 988                                          --jerry              */
 989
 990         *found_username = talloc_strdup( mem_ctx, real_username );
 991
 992         return NT_STATUS_OK;
 993 }
 994
 995 /****************************************************************************
 996  Wrapper to allow the getpwnam() call to strip the domain name and
 997  try again in case a local UNIX user is already there.  Also run through
 998  the username if we fallback to the username only.
 999  ****************************************************************************/
1000
1001 struct passwd *smb_getpwnam( TALLOC_CTX *mem_ctx, const char *domuser,
1002                              fstring save_username, bool create )
1003 {
1004         struct passwd *pw = NULL;
1005         char *p;
1006         fstring username;
1007
1008         /* we only save a copy of the username it has been mangled
1009            by winbindd use default domain */
1010
1011         save_username[0] = '\0';
1012
1013         /* don't call map_username() here since it has to be done higher
1014            up the stack so we don't call it multiple times */
1015
1016         fstrcpy( username, domuser );
1017
1018         p = strchr_m( username, *lp_winbind_separator() );
1019
1020         /* code for a DOMAIN\user string */
1021
1022         if ( p ) {
1023                 fstring strip_username;
1024
1025                 pw = Get_Pwnam_alloc( mem_ctx, domuser );
1026                 if ( pw ) {
1027                         /* make sure we get the case of the username correct */
1028                         /* work around 'winbind use default domain = yes' */
1029
1030                         if ( !strchr_m( pw->pw_name, *lp_winbind_separator() ) ) {
1031                                 char *domain;
1032
1033                                 /* split the domain and username into 2 strings */
1034                                 *p = '\0';
1035                                 domain = username;
1036
1037                                 fstr_sprintf(save_username, "%s%c%s", domain, *lp_winbind_separator(), pw->pw_name);
1038                         }
1039                         else
1040                                 fstrcpy( save_username, pw->pw_name );
1041
1042                         /* whew -- done! */
1043                         return pw;
1044                 }
1045
1046                 /* setup for lookup of just the username */
1047                 /* remember that p and username are overlapping memory */
1048
1049                 p++;
1050                 fstrcpy( strip_username, p );
1051                 fstrcpy( username, strip_username );
1052         }
1053
1054         /* just lookup a plain username */
1055
1056         pw = Get_Pwnam_alloc(mem_ctx, username);
1057
1058         /* Create local user if requested but only if winbindd
1059            is not running.  We need to protect against cases
1060            where winbindd is failing and then prematurely
1061            creating users in /etc/passwd */
1062
1063         if ( !pw && create && !winbind_ping() ) {
1064                 /* Don't add a machine account. */
1065                 if (username[strlen(username)-1] == '$')
1066                         return NULL;
1067
1068                 _smb_create_user(NULL, username, NULL);
1069                 pw = Get_Pwnam_alloc(mem_ctx, username);
1070         }
1071
1072         /* one last check for a valid passwd struct */
1073
1074         if ( pw )
1075                 fstrcpy( save_username, pw->pw_name );
1076
1077         return pw;
1078 }
1079
1080 /***************************************************************************
1081  Make a server_info struct from the info3 returned by a domain logon
1082 ***************************************************************************/
1083
1084 NTSTATUS make_server_info_info3(TALLOC_CTX *mem_ctx,
1085                                 const char *sent_nt_username,
1086                                 const char *domain,
1087                                 struct auth_serversupplied_info **server_info,
1088                                 struct netr_SamInfo3 *info3)
1089 {
1090         static const char zeros[16] = {0, };
1091
1092         NTSTATUS nt_status = NT_STATUS_OK;
1093         char *found_username = NULL;
1094         const char *nt_domain;
1095         const char *nt_username;
1096         bool username_was_mapped;
1097         struct passwd *pwd;
1098         struct auth_serversupplied_info *result;
1099         struct dom_sid *group_sid;
1100         struct netr_SamInfo3 *i3;
1101
1102         /*
1103            Here is where we should check the list of
1104            trusted domains, and verify that the SID
1105            matches.
1106         */
1107
1108         nt_username = talloc_strdup(mem_ctx, info3->base.account_name.string);
1109         if (!nt_username) {
1110                 /* If the server didn't give us one, just use the one we sent
1111                  * them */
1112                 nt_username = sent_nt_username;
1113         }
1114
1115         nt_domain = talloc_strdup(mem_ctx, info3->base.domain.string);
1116         if (!nt_domain) {
1117                 /* If the server didn't give us one, just use the one we sent
1118                  * them */
1119                 nt_domain = domain;
1120         }
1121
1122         /* If getpwnam() fails try the add user script (2.2.x behavior).
1123
1124            We use the _unmapped_ username here in an attempt to provide
1125            consistent username mapping behavior between kerberos and NTLM[SSP]
1126            authentication in domain mode security.  I.E. Username mapping
1127            should be applied to the fully qualified username
1128            (e.g. DOMAIN\user) and not just the login name.  Yes this means we
1129            called map_username() unnecessarily in make_user_info_map() but
1130            that is how the current code is designed.  Making the change here
1131            is the least disruptive place.  -- jerry */
1132
1133         /* this call will try to create the user if necessary */
1134
1135         nt_status = check_account(mem_ctx, nt_domain, sent_nt_username,
1136                                      &found_username, &pwd,
1137                                      &username_was_mapped);
1138
1139         if (!NT_STATUS_IS_OK(nt_status)) {
1140                 return nt_status;
1141         }
1142
1143         result = make_server_info(NULL);
1144         if (result == NULL) {
1145                 DEBUG(4, ("make_server_info failed!\n"));
1146                 return NT_STATUS_NO_MEMORY;
1147         }
1148
1149         result->unix_name = talloc_strdup(result, found_username);
1150
1151         result->sanitized_username = sanitize_username(result,
1152                                                        result->unix_name);
1153         if (result->sanitized_username == NULL) {
1154                 TALLOC_FREE(result);
1155                 return NT_STATUS_NO_MEMORY;
1156         }
1157
1158         /* copy in the info3 */
1159         result->info3 = i3 = copy_netr_SamInfo3(result, info3);
1160         if (result->info3 == NULL) {
1161                 TALLOC_FREE(result);
1162                 return NT_STATUS_NO_MEMORY;
1163         }
1164
1165         /* Fill in the unix info we found on the way */
1166         result->utok.uid = pwd->pw_uid;
1167         result->utok.gid = pwd->pw_gid;
1168
1169         /* We can't just trust that the primary group sid sent us is something
1170          * we can really use. Obtain the useable sid, and store the original
1171          * one as an additional group if it had to be replaced */
1172         nt_status = get_primary_group_sid(mem_ctx, found_username,
1173                                           &pwd, &group_sid);
1174         if (!NT_STATUS_IS_OK(nt_status)) {
1175                 TALLOC_FREE(result);
1176                 return nt_status;
1177         }
1178
1179         /* store and check if it is the same we got originally */
1180         sid_peek_rid(group_sid, &i3->base.primary_gid);
1181         if (i3->base.primary_gid != info3->base.primary_gid) {
1182                 uint32_t n = i3->base.groups.count;
1183                 /* not the same, store the original as an additional group */
1184                 i3->base.groups.rids =
1185                         talloc_realloc(i3, i3->base.groups.rids,
1186                                         struct samr_RidWithAttribute, n + 1);
1187                 if (i3->base.groups.rids == NULL) {
1188                         TALLOC_FREE(result);
1189                         return NT_STATUS_NO_MEMORY;
1190                 }
1191                 i3->base.groups.rids[n].rid = info3->base.primary_gid;
1192                 i3->base.groups.rids[n].attributes = SE_GROUP_ENABLED;
1193                 i3->base.groups.count = n + 1;
1194         }
1195
1196         /* ensure we are never given NULL session keys */
1197
1198         if (memcmp(info3->base.key.key, zeros, sizeof(zeros)) == 0) {
1199                 result->user_session_key = data_blob_null;
1200         } else {
1201                 result->user_session_key = data_blob_talloc(
1202                         result, info3->base.key.key,
1203                         sizeof(info3->base.key.key));
1204         }
1205
1206         if (memcmp(info3->base.LMSessKey.key, zeros, 8) == 0) {
1207                 result->lm_session_key = data_blob_null;
1208         } else {
1209                 result->lm_session_key = data_blob_talloc(
1210                         result, info3->base.LMSessKey.key,
1211                         sizeof(info3->base.LMSessKey.key));
1212         }
1213
1214         result->nss_token |= username_was_mapped;
1215
1216         *server_info = result;
1217
1218         return NT_STATUS_OK;
1219 }
1220
1221 /*****************************************************************************
1222  Make a server_info struct from the wbcAuthUserInfo returned by a domain logon
1223 ******************************************************************************/
1224
1225 NTSTATUS make_server_info_wbcAuthUserInfo(TALLOC_CTX *mem_ctx,
1226                                           const char *sent_nt_username,
1227                                           const char *domain,
1228                                           const struct wbcAuthUserInfo *info,
1229                                           struct auth_serversupplied_info **server_info)
1230 {
1231         struct netr_SamInfo3 *info3;
1232
1233         info3 = wbcAuthUserInfo_to_netr_SamInfo3(mem_ctx, info);
1234         if (!info3) {
1235                 return NT_STATUS_NO_MEMORY;
1236         }
1237
1238         return make_server_info_info3(mem_ctx,
1239                                       sent_nt_username, domain,
1240                                       server_info, info3);
1241 }
1242
1243 /**
1244  * Verify whether or not given domain is trusted.
1245  *
1246  * @param domain_name name of the domain to be verified
1247  * @return true if domain is one of the trusted ones or
1248  *         false if otherwise
1249  **/
1250
1251 bool is_trusted_domain(const char* dom_name)
1252 {
1253         struct dom_sid trustdom_sid;
1254         bool ret;
1255
1256         /* no trusted domains for a standalone server */
1257
1258         if ( lp_server_role() == ROLE_STANDALONE )
1259                 return False;
1260
1261         if (dom_name == NULL || dom_name[0] == '\0') {
1262                 return false;
1263         }
1264
1265         if (strequal(dom_name, get_global_sam_name())) {
1266                 return false;
1267         }
1268
1269         /* if we are a DC, then check for a direct trust relationships */
1270
1271         if ( IS_DC ) {
1272                 become_root();
1273                 DEBUG (5,("is_trusted_domain: Checking for domain trust with "
1274                           "[%s]\n", dom_name ));
1275                 ret = pdb_get_trusteddom_pw(dom_name, NULL, NULL, NULL);
1276                 unbecome_root();
1277                 if (ret)
1278                         return True;
1279         }
1280         else {
1281                 wbcErr result;
1282
1283                 /* If winbind is around, ask it */
1284
1285                 result = wb_is_trusted_domain(dom_name);
1286
1287                 if (result == WBC_ERR_SUCCESS) {
1288                         return True;
1289                 }
1290
1291                 if (result == WBC_ERR_DOMAIN_NOT_FOUND) {
1292                         /* winbind could not find the domain */
1293                         return False;
1294                 }
1295
1296                 /* The only other possible result is that winbind is not up
1297                    and running. We need to update the trustdom_cache
1298                    ourselves */
1299
1300                 update_trustdom_cache();
1301         }
1302
1303         /* now the trustdom cache should be available a DC could still
1304          * have a transitive trust so fall back to the cache of trusted
1305          * domains (like a domain member would use  */
1306
1307         if ( trustdom_cache_fetch(dom_name, &trustdom_sid) ) {
1308                 return True;
1309         }
1310
1311         return False;
1312 }
1313