Tidyup formatting a bit (spaces->tabs) whilst reading new code to understand
[kai/samba.git] / source3 / libsmb / pwd_cache.c
1 /* 
2    Unix SMB/Netbios implementation.
3    Version 1.9.
4    Password cacheing.  obfuscation is planned
5    Copyright (C) Luke Kenneth Casson Leighton 1996-1998
6    
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 2 of the License, or
10    (at your option) any later version.
11    
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16    
17    You should have received a copy of the GNU General Public License
18    along with this program; if not, write to the Free Software
19    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20 */
21
22 #include "includes.h"
23
24 /****************************************************************************
25  Initialises a password structure.
26 ****************************************************************************/
27
28 void pwd_init(struct pwd_info *pwd)
29 {
30         memset((char *)pwd->password  , '\0', sizeof(pwd->password  ));
31         memset((char *)pwd->smb_lm_pwd, '\0', sizeof(pwd->smb_lm_pwd));
32         memset((char *)pwd->smb_nt_pwd, '\0', sizeof(pwd->smb_nt_pwd));
33         memset((char *)pwd->smb_lm_owf, '\0', sizeof(pwd->smb_lm_owf));
34         memset((char *)pwd->smb_nt_owf, '\0', sizeof(pwd->smb_nt_owf));
35
36         pwd->null_pwd  = True; /* safest option... */
37         pwd->cleartext = False;
38         pwd->crypted   = False;
39 }
40
41 /****************************************************************************
42  Returns NULL password flag.
43 ****************************************************************************/
44
45 BOOL pwd_is_nullpwd(const struct pwd_info *pwd)
46 {
47         return pwd->null_pwd;
48 }
49
50 /****************************************************************************
51  Compares two passwords.  hmm, not as trivial as expected.  hmm.
52 ****************************************************************************/
53
54 BOOL pwd_compare(const struct pwd_info *pwd1, const struct pwd_info *pwd2)
55 {
56         if (pwd1->cleartext && pwd2->cleartext) {
57                 if (strequal(pwd1->password, pwd2->password))
58                         return True;
59         }
60         if (pwd1->null_pwd && pwd2->null_pwd)
61                 return True;
62
63         if (!pwd1->null_pwd  && !pwd2->null_pwd &&
64             !pwd1->cleartext && !pwd2->cleartext) {
65 #ifdef DEBUG_PASSWORD
66                 DEBUG(100,("pwd compare: nt#\n"));
67                 dump_data(100, pwd1->smb_nt_pwd, 16);
68                 dump_data(100, pwd2->smb_nt_pwd, 16);
69 #endif
70                 if (memcmp(pwd1->smb_nt_pwd, pwd2->smb_nt_pwd, 16) == 0)
71                         return True;
72 #ifdef DEBUG_PASSWORD
73                 DEBUG(100,("pwd compare: lm#\n"));
74                 dump_data(100, pwd1->smb_lm_pwd, 16);
75                 dump_data(100, pwd2->smb_lm_pwd, 16);
76 #endif
77                 if (memcmp(pwd1->smb_lm_pwd, pwd2->smb_lm_pwd, 16) == 0)
78                         return True;
79         }
80         return False;
81 }
82
83 /****************************************************************************
84  Reads a password.
85 ****************************************************************************/
86
87 void pwd_read(struct pwd_info *pwd, char *passwd_report, BOOL do_encrypt)
88 {
89         /* grab a password */
90         char *user_pass;
91
92         pwd_init(pwd);
93
94         user_pass = (char*)getpass(passwd_report);
95
96         /*
97          * Do not assume that an empty string is a NULL password.
98          * If you do this will break the session key generation for
99          * and account with an emtpy password.  If you wish to use
100          * a NULL password, use the -N option to smbclient and rpcclient
101          * --jerry
102          */
103 #if 0
104         if (user_pass == NULL || user_pass[0] == 0)
105                 pwd_set_nullpwd(pwd);
106         else if (do_encrypt)
107 #endif
108         if (do_encrypt)
109                 pwd_make_lm_nt_16(pwd, user_pass);
110         else
111                 pwd_set_cleartext(pwd, user_pass);
112 }
113
114 /****************************************************************************
115  Stores a cleartext password.
116 ****************************************************************************/
117
118 void pwd_set_nullpwd(struct pwd_info *pwd)
119 {
120         pwd_init(pwd);
121
122         pwd->cleartext = False;
123         pwd->null_pwd  = True;
124         pwd->crypted   = False;
125 }
126
127 /****************************************************************************
128  Stores a cleartext password.
129 ****************************************************************************/
130
131 void pwd_set_cleartext(struct pwd_info *pwd, char *clr)
132 {
133         pwd_init(pwd);
134         push_ascii_fstring(pwd->password, clr);
135         pwd->cleartext = True;
136         pwd->null_pwd  = False;
137         pwd->crypted   = False;
138 }
139
140 /****************************************************************************
141  Gets a cleartext password.
142 ****************************************************************************/
143
144 void pwd_get_cleartext(struct pwd_info *pwd, char *clr)
145 {
146         if (pwd->cleartext)
147                 fstrcpy(clr, pwd->password);
148         else
149                 clr[0] = 0;
150 }
151
152 /****************************************************************************
153  Stores lm and nt hashed passwords.
154 ****************************************************************************/
155
156 void pwd_set_lm_nt_16(struct pwd_info *pwd, uchar lm_pwd[16], uchar nt_pwd[16])
157 {
158         pwd_init(pwd);
159
160         if (lm_pwd)
161                 memcpy(pwd->smb_lm_pwd, lm_pwd, 16);
162         else
163                 memset((char *)pwd->smb_lm_pwd, '\0', 16);
164
165         if (nt_pwd)
166                 memcpy(pwd->smb_nt_pwd, nt_pwd, 16);
167         else
168                 memset((char *)pwd->smb_nt_pwd, '\0', 16);
169
170         pwd->null_pwd  = False;
171         pwd->cleartext = False;
172         pwd->crypted   = False;
173 }
174
175 /****************************************************************************
176  Gets lm and nt hashed passwords.
177 ****************************************************************************/
178
179 void pwd_get_lm_nt_16(struct pwd_info *pwd, uchar lm_pwd[16], uchar nt_pwd[16])
180 {
181         if (lm_pwd != NULL)
182                 memcpy(lm_pwd, pwd->smb_lm_pwd, 16);
183         if (nt_pwd != NULL)
184                 memcpy(nt_pwd, pwd->smb_nt_pwd, 16);
185 }
186
187 /****************************************************************************
188  Makes lm and nt hashed passwords.
189 ****************************************************************************/
190
191 void pwd_make_lm_nt_16(struct pwd_info *pwd, char *clr)
192 {
193         pstring dos_passwd;
194
195         pwd_init(pwd);
196
197         push_ascii_pstring(dos_passwd, clr);
198
199         nt_lm_owf_gen(dos_passwd, pwd->smb_nt_pwd, pwd->smb_lm_pwd);
200         pwd->null_pwd  = False;
201         pwd->cleartext = False;
202         pwd->crypted = False;
203 }
204
205 /****************************************************************************
206  Makes lm and nt OWF crypts.
207 ****************************************************************************/
208
209 void pwd_make_lm_nt_owf(struct pwd_info *pwd, uchar cryptkey[8])
210 {
211
212 #ifdef DEBUG_PASSWORD
213         DEBUG(100,("client cryptkey: "));
214         dump_data(100, (char *)cryptkey, 8);
215 #endif
216
217         SMBOWFencrypt(pwd->smb_nt_pwd, cryptkey, pwd->smb_nt_owf);
218
219 #ifdef DEBUG_PASSWORD
220         DEBUG(100,("nt_owf_passwd: "));
221         dump_data(100, (char *)pwd->smb_nt_owf, sizeof(pwd->smb_nt_owf));
222         DEBUG(100,("nt_sess_pwd: "));
223         dump_data(100, (char *)pwd->smb_nt_pwd, sizeof(pwd->smb_nt_pwd));
224 #endif
225
226         SMBOWFencrypt(pwd->smb_lm_pwd, cryptkey, pwd->smb_lm_owf);
227
228 #ifdef DEBUG_PASSWORD
229         DEBUG(100,("lm_owf_passwd: "));
230         dump_data(100, (char *)pwd->smb_lm_owf, sizeof(pwd->smb_lm_owf));
231         DEBUG(100,("lm_sess_pwd: "));
232         dump_data(100, (char *)pwd->smb_lm_pwd, sizeof(pwd->smb_lm_pwd));
233 #endif
234
235         pwd->crypted = True;
236 }
237
238 /****************************************************************************
239  Gets lm and nt crypts.
240 ****************************************************************************/
241
242 void pwd_get_lm_nt_owf(struct pwd_info *pwd, uchar lm_owf[24], uchar nt_owf[24])
243 {
244         if (lm_owf != NULL)
245                 memcpy(lm_owf, pwd->smb_lm_owf, 24);
246         if (nt_owf != NULL)
247                 memcpy(nt_owf, pwd->smb_nt_owf, 24);
248 }