289bf4bd8e3f161e54dd9972efe404cd87ccb2e5
[samba.git] / source3 / libsmb / passchange.c
1 /* 
2    Unix SMB/CIFS implementation.
3    SMB client password change routine
4    Copyright (C) Andrew Tridgell 1994-1998
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 #include "../librpc/gen_ndr/ndr_samr.h"
22 #include "rpc_client/cli_pipe.h"
23 #include "rpc_client/cli_samr.h"
24 #include "libsmb/clirap.h"
25
26 /*************************************************************
27  Change a password on a remote machine using IPC calls.
28 *************************************************************/
29
30 NTSTATUS remote_password_change(const char *remote_machine, const char *user_name, 
31                                 const char *old_passwd, const char *new_passwd,
32                                 char **err_str)
33 {
34         struct nmb_name calling, called;
35         struct cli_state *cli = NULL;
36         struct rpc_pipe_client *pipe_hnd = NULL;
37         struct sockaddr_storage ss;
38         char *user, *domain, *p;
39
40         NTSTATUS result;
41         bool pass_must_change = False;
42
43         user = talloc_strdup(talloc_tos(), user_name);
44         SMB_ASSERT(user != NULL);
45         domain = talloc_strdup(talloc_tos(), "");
46         SMB_ASSERT(domain != NULL);
47
48         /* allow usernames of the form domain\\user or domain/user */
49         if ((p = strchr_m(user,'\\')) || (p = strchr_m(user,'/')) ||
50             (p = strchr_m(user,*lp_winbind_separator()))) {
51                 *p = 0;
52                 domain = user;
53                 user = p+1;
54         }
55
56         *err_str = NULL;
57
58         if(!resolve_name( remote_machine, &ss, 0x20, false)) {
59                 if (asprintf(err_str, "Unable to find an IP address for machine "
60                          "%s.\n", remote_machine) == -1) {
61                         *err_str = NULL;
62                 }
63                 return NT_STATUS_UNSUCCESSFUL;
64         }
65
66         cli = cli_initialise();
67         if (!cli) {
68                 return NT_STATUS_NO_MEMORY;
69         }
70
71         result = cli_connect(cli, remote_machine, &ss);
72         if (!NT_STATUS_IS_OK(result)) {
73                 if (asprintf(err_str, "Unable to connect to SMB server on "
74                          "machine %s. Error was : %s.\n",
75                          remote_machine, nt_errstr(result))==-1) {
76                         *err_str = NULL;
77                 }
78                 cli_shutdown(cli);
79                 return result;
80         }
81
82         make_nmb_name(&calling, global_myname() , 0x0);
83         make_nmb_name(&called , remote_machine, 0x20);
84
85         if (!cli_session_request(cli, &calling, &called)) {
86                 if (asprintf(err_str, "machine %s rejected the session setup. "
87                          "Error was : %s.\n",
88                          remote_machine, cli_errstr(cli)) == -1) {
89                         *err_str = NULL;
90                 }
91                 result = cli_nt_error(cli);
92                 cli_shutdown(cli);
93                 return result;
94         }
95
96         cli->protocol = PROTOCOL_NT1;
97
98         result = cli_negprot(cli);
99
100         if (!NT_STATUS_IS_OK(result)) {
101                 if (asprintf(err_str, "machine %s rejected the negotiate "
102                          "protocol. Error was : %s.\n",        
103                          remote_machine, nt_errstr(result)) == -1) {
104                         *err_str = NULL;
105                 }
106                 result = cli_nt_error(cli);
107                 cli_shutdown(cli);
108                 return result;
109         }
110
111         /* Given things like SMB signing, restrict anonymous and the like, 
112            try an authenticated connection first */
113         result = cli_session_setup(cli, user_name,
114                                    old_passwd, strlen(old_passwd)+1,
115                                    old_passwd, strlen(old_passwd)+1, "");
116
117         if (!NT_STATUS_IS_OK(result)) {
118
119                 /* Password must change or Password expired are the only valid
120                  * error conditions here from where we can proceed, the rest like
121                  * account locked out or logon failure will lead to errors later
122                  * anyway */
123
124                 if (!NT_STATUS_EQUAL(result, NT_STATUS_PASSWORD_MUST_CHANGE) &&
125                     !NT_STATUS_EQUAL(result, NT_STATUS_PASSWORD_EXPIRED)) {
126                         if (asprintf(err_str, "Could not connect to machine %s: "
127                                  "%s\n", remote_machine, cli_errstr(cli)) == -1) {
128                                 *err_str = NULL;
129                         }
130                         cli_shutdown(cli);
131                         return result;
132                 }
133
134                 pass_must_change = True;
135
136                 /*
137                  * We should connect as the anonymous user here, in case
138                  * the server has "must change password" checked...
139                  * Thanks to <Nicholas.S.Jenkins@cdc.com> for this fix.
140                  */
141
142                 result = cli_session_setup(cli, "", "", 0, "", 0, "");
143
144                 if (!NT_STATUS_IS_OK(result)) {
145                         if (asprintf(err_str, "machine %s rejected the session "
146                                  "setup. Error was : %s.\n",        
147                                  remote_machine, cli_errstr(cli)) == -1) {
148                                 *err_str = NULL;
149                         }
150                         cli_shutdown(cli);
151                         return result;
152                 }
153
154                 result = cli_init_creds(cli, "", "", NULL);
155                 if (!NT_STATUS_IS_OK(result)) {
156                         cli_shutdown(cli);
157                         return result;
158                 }
159         } else {
160                 result = cli_init_creds(cli, user, domain, old_passwd);
161                 if (!NT_STATUS_IS_OK(result)) {
162                         cli_shutdown(cli);
163                         return result;
164                 }
165         }
166
167         result = cli_tcon_andx(cli, "IPC$", "IPC", "", 1);
168         if (!NT_STATUS_IS_OK(result)) {
169                 if (asprintf(err_str, "machine %s rejected the tconX on the "
170                              "IPC$ share. Error was : %s.\n",
171                              remote_machine, nt_errstr(result))) {
172                         *err_str = NULL;
173                 }
174                 cli_shutdown(cli);
175                 return result;
176         }
177
178         /* Try not to give the password away too easily */
179
180         if (!pass_must_change) {
181                 result = cli_rpc_pipe_open_ntlmssp(cli,
182                                                    &ndr_table_samr.syntax_id,
183                                                    NCACN_NP,
184                                                    DCERPC_AUTH_LEVEL_PRIVACY,
185                                                    domain, user,
186                                                    old_passwd,
187                                                    &pipe_hnd);
188         } else {
189                 /*
190                  * If the user password must be changed the ntlmssp bind will
191                  * fail the same way as the session setup above did. The
192                  * difference ist that with a pipe bind we don't get a good
193                  * error message, the result will be that the rpc call below
194                  * will just fail. So we do it anonymously, there's no other
195                  * way.
196                  */
197                 result = cli_rpc_pipe_open_noauth(
198                         cli, &ndr_table_samr.syntax_id, &pipe_hnd);
199         }
200
201         if (!NT_STATUS_IS_OK(result)) {
202                 if (lp_client_lanman_auth()) {
203                         /* Use the old RAP method. */
204                         if (!cli_oem_change_password(cli, user_name, new_passwd, old_passwd)) {
205                                 if (asprintf(err_str, "machine %s rejected the "
206                                          "password change: Error was : %s.\n",
207                                          remote_machine, cli_errstr(cli)) == -1) {
208                                         *err_str = NULL;
209                                 }
210                                 result = cli_nt_error(cli);
211                                 cli_shutdown(cli);
212                                 return result;
213                         }
214                 } else {
215                         if (asprintf(err_str, "SAMR connection to machine %s "
216                                  "failed. Error was %s, but LANMAN password "
217                                  "changes are disabled\n",
218                                  remote_machine, nt_errstr(result)) == -1) {
219                                 *err_str = NULL;
220                         }
221                         result = cli_nt_error(cli);
222                         cli_shutdown(cli);
223                         return result;
224                 }
225         }
226
227         result = rpccli_samr_chgpasswd_user2(pipe_hnd, talloc_tos(),
228                                              user_name, new_passwd, old_passwd);
229         if (NT_STATUS_IS_OK(result)) {
230                 /* Great - it all worked! */
231                 cli_shutdown(cli);
232                 return NT_STATUS_OK;
233
234         } else if (!(NT_STATUS_EQUAL(result, NT_STATUS_ACCESS_DENIED) 
235                      || NT_STATUS_EQUAL(result, NT_STATUS_UNSUCCESSFUL))) {
236                 /* it failed, but for reasons such as wrong password, too short etc ... */
237
238                 if (asprintf(err_str, "machine %s rejected the password change: "
239                          "Error was : %s.\n",
240                          remote_machine, get_friendly_nt_error_msg(result)) == -1) {
241                         *err_str = NULL;
242                 }
243                 cli_shutdown(cli);
244                 return result;
245         }
246
247         /* OK, that failed, so try again... */
248         TALLOC_FREE(pipe_hnd);
249
250         /* Try anonymous NTLMSSP... */
251         result = cli_init_creds(cli, "", "", NULL);
252         if (!NT_STATUS_IS_OK(result)) {
253                 cli_shutdown(cli);
254                 return result;
255         }
256
257         result = NT_STATUS_UNSUCCESSFUL;
258
259         /* OK, this is ugly, but... try an anonymous pipe. */
260         result = cli_rpc_pipe_open_noauth(cli, &ndr_table_samr.syntax_id,
261                                           &pipe_hnd);
262
263         if ( NT_STATUS_IS_OK(result) &&
264                 (NT_STATUS_IS_OK(result = rpccli_samr_chgpasswd_user2(
265                                          pipe_hnd, talloc_tos(), user_name,
266                                          new_passwd, old_passwd)))) {
267                 /* Great - it all worked! */
268                 cli_shutdown(cli);
269                 return NT_STATUS_OK;
270         } else {
271                 if (!(NT_STATUS_EQUAL(result, NT_STATUS_ACCESS_DENIED) 
272                       || NT_STATUS_EQUAL(result, NT_STATUS_UNSUCCESSFUL))) {
273                         /* it failed, but again it was due to things like new password too short */
274
275                         if (asprintf(err_str, "machine %s rejected the "
276                                  "(anonymous) password change: Error was : "
277                                  "%s.\n", remote_machine,
278                                  get_friendly_nt_error_msg(result)) == -1) {
279                                 *err_str = NULL;
280                         }
281                         cli_shutdown(cli);
282                         return result;
283                 }
284
285                 /* We have failed to change the user's password, and we think the server
286                    just might not support SAMR password changes, so fall back */
287
288                 if (lp_client_lanman_auth()) {
289                         /* Use the old RAP method. */
290                         if (cli_oem_change_password(cli, user_name, new_passwd, old_passwd)) {
291                                 /* SAMR failed, but the old LanMan protocol worked! */
292
293                                 cli_shutdown(cli);
294                                 return NT_STATUS_OK;
295                         }
296                         if (asprintf(err_str, "machine %s rejected the password "
297                                  "change: Error was : %s.\n",
298                                  remote_machine, cli_errstr(cli)) == -1) {
299                                 *err_str = NULL;
300                         }
301                         result = cli_nt_error(cli);
302                         cli_shutdown(cli);
303                         return result;
304                 } else {
305                         if (asprintf(err_str, "SAMR connection to machine %s "
306                                  "failed. Error was %s, but LANMAN password "
307                                  "changes are disabled\n",
308                                 nt_errstr(result), remote_machine) == -1) {
309                                 *err_str = NULL;
310                         }
311                         cli_shutdown(cli);
312                         return NT_STATUS_UNSUCCESSFUL;
313                 }
314         }
315 }