s3:auth Make Samba3 use the new common struct auth_usersupplied_info
[abartlet/samba.git/.git] / source3 / auth / auth_compat.c
1 /* 
2    Unix SMB/CIFS implementation.
3    Password and authentication handling
4    Copyright (C) Andrew Bartlett         2001-2002
5
6    This program is free software; you can redistribute it and/or modify
7    it under the terms of the GNU General Public License as published by
8    the Free Software Foundation; either version 3 of the License, or
9    (at your option) any later version.
10
11    This program is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14    GNU General Public License for more details.
15
16    You should have received a copy of the GNU General Public License
17    along with this program.  If not, see <http://www.gnu.org/licenses/>.
18 */
19
20 #include "includes.h"
21
22 extern struct auth_context *negprot_global_auth_context;
23 extern bool global_encrypted_passwords_negotiated;
24
25 #undef DBGC_CLASS
26 #define DBGC_CLASS DBGC_AUTH
27
28 /****************************************************************************
29  COMPATIBILITY INTERFACES:
30  ***************************************************************************/
31
32 /****************************************************************************
33 check if a username/password is OK assuming the password is in plaintext
34 return True if the password is correct, False otherwise
35 ****************************************************************************/
36
37 NTSTATUS check_plaintext_password(const char *smb_name,
38                                   DATA_BLOB plaintext_blob,
39                                   struct auth_serversupplied_info **server_info)
40 {
41         struct auth_context *plaintext_auth_context = NULL;
42         struct auth_usersupplied_info *user_info = NULL;
43         uint8_t chal[8];
44         NTSTATUS nt_status;
45         if (!NT_STATUS_IS_OK(nt_status = make_auth_context_subsystem(&plaintext_auth_context))) {
46                 return nt_status;
47         }
48
49         plaintext_auth_context->get_ntlm_challenge(plaintext_auth_context,
50                                                    chal);
51
52         if (!make_user_info_for_reply(&user_info, 
53                                       smb_name, lp_workgroup(), chal,
54                                       plaintext_blob)) {
55                 return NT_STATUS_NO_MEMORY;
56         }
57
58         nt_status = plaintext_auth_context->check_ntlm_password(plaintext_auth_context, 
59                                                                 user_info, server_info); 
60
61         TALLOC_FREE(plaintext_auth_context);
62         free_user_info(&user_info);
63         return nt_status;
64 }
65
66 static NTSTATUS pass_check_smb(struct auth_context *actx,
67                                const char *smb_name,
68                                const char *domain, 
69                                DATA_BLOB lm_pwd,
70                                DATA_BLOB nt_pwd)
71
72 {
73         NTSTATUS nt_status;
74         struct auth_serversupplied_info *server_info = NULL;
75         struct auth_usersupplied_info *user_info = NULL;
76         if (actx == NULL) {
77                 return NT_STATUS_INTERNAL_ERROR;
78         }
79         make_user_info_for_reply_enc(&user_info, smb_name,
80                                      domain,
81                                      lm_pwd,
82                                      nt_pwd);
83         nt_status = actx->check_ntlm_password(actx, user_info, &server_info);
84         free_user_info(&user_info);
85         TALLOC_FREE(server_info);
86         return nt_status;
87 }
88
89 /****************************************************************************
90 check if a username/password pair is ok via the auth subsystem.
91 return True if the password is correct, False otherwise
92 ****************************************************************************/
93
94 bool password_ok(struct auth_context *actx, bool global_encrypted,
95                  const char *session_workgroup,
96                  const char *smb_name, DATA_BLOB password_blob)
97 {
98
99         DATA_BLOB null_password = data_blob_null;
100         bool encrypted = (global_encrypted && (password_blob.length == 24 || password_blob.length > 46));
101
102         if (encrypted) {
103                 /* 
104                  * The password could be either NTLM or plain LM.  Try NTLM first, 
105                  * but fall-through as required.
106                  * Vista sends NTLMv2 here - we need to try the client given workgroup.
107                  */
108                 if (session_workgroup) {
109                         if (NT_STATUS_IS_OK(pass_check_smb(actx, smb_name, session_workgroup, null_password, password_blob))) {
110                                 return True;
111                         }
112                         if (NT_STATUS_IS_OK(pass_check_smb(actx, smb_name, session_workgroup, password_blob, null_password))) {
113                                 return True;
114                         }
115                 }
116
117                 if (NT_STATUS_IS_OK(pass_check_smb(actx, smb_name, lp_workgroup(), null_password, password_blob))) {
118                         return True;
119                 }
120
121                 if (NT_STATUS_IS_OK(pass_check_smb(actx, smb_name, lp_workgroup(), password_blob, null_password))) {
122                         return True;
123                 }
124         } else {
125                 struct auth_serversupplied_info *server_info = NULL;
126                 NTSTATUS nt_status = check_plaintext_password(smb_name, password_blob, &server_info);
127                 if (NT_STATUS_IS_OK(nt_status)) {
128                         TALLOC_FREE(server_info);
129                         return True;
130                 }
131         }
132
133         return False;
134 }