gssapi: check for gss_acquire_cred_from
[Samba.git] / source3 / libads / util.c
blobb0754be3f56dca37e5c2d7029bdb2be53a7f8d13
1 /*
2 Unix SMB/CIFS implementation.
3 krb5 set password implementation
4 Copyright (C) Remus Koos 2001 (remuskoos@yahoo.com)
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.
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.
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/>.
20 #include "includes.h"
21 #include "ads.h"
22 #include "secrets.h"
24 #ifdef HAVE_KRB5
26 ADS_STATUS ads_change_trust_account_password(ADS_STRUCT *ads, char *host_principal)
28 char *password;
29 char *new_password;
30 ADS_STATUS ret;
31 enum netr_SchannelType sec_channel_type;
33 if ((password = secrets_fetch_machine_password(lp_workgroup(), NULL, &sec_channel_type)) == NULL) {
34 DEBUG(1,("Failed to retrieve password for principal %s\n", host_principal));
35 return ADS_ERROR_SYSTEM(ENOENT);
38 new_password = trust_pw_new_value(talloc_tos(), SEC_CHAN_WKSTA, SEC_ADS);
39 if (new_password == NULL) {
40 ret = ADS_ERROR_SYSTEM(errno);
41 DEBUG(1,("Failed to generate machine password\n"));
42 goto failed;
45 ret = kerberos_set_password(ads->auth.kdc_server, host_principal, password, host_principal, new_password, ads->auth.time_offset);
47 if (!ADS_ERR_OK(ret)) {
48 goto failed;
51 if (!secrets_store_machine_password(new_password, lp_workgroup(), sec_channel_type)) {
52 DEBUG(1,("Failed to save machine password\n"));
53 ret = ADS_ERROR_SYSTEM(EACCES);
54 goto failed;
57 failed:
58 SAFE_FREE(password);
59 return ret;
61 #endif