r13316: Let the carnage begin....
[tprouty/samba.git] / source / pam_smbpass / pam_smb_auth.c
1 /* Unix NT password database implementation, version 0.7.5.
2  *
3  * This program is free software; you can redistribute it and/or modify it under
4  * the terms of the GNU General Public License as published by the Free
5  * Software Foundation; either version 2 of the License, or (at your option)
6  * any later version.
7  *
8  * This program is distributed in the hope that it will be useful, but WITHOUT
9  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
10  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
11  * more details.
12  *
13  * You should have received a copy of the GNU General Public License along with
14  * this program; if not, write to the Free Software Foundation, Inc., 675
15  * Mass Ave, Cambridge, MA 02139, USA.
16 */
17
18 /* indicate the following groups are defined */
19 #define PAM_SM_AUTH
20
21 #include "includes.h"
22 #include "debug.h"
23
24 #ifndef LINUX
25
26 /* This is only used in the Sun implementation. */
27 #include <security/pam_appl.h>
28
29 #endif  /* LINUX */
30
31 #include <security/pam_modules.h>
32
33 #include "general.h"
34
35 #include "support.h"
36
37 #define AUTH_RETURN                                             \
38 do {                                                            \
39         /* Restore application signal handler */                \
40         CatchSignal(SIGPIPE, SIGNAL_CAST oldsig_handler);       \
41         if(ret_data) {                                          \
42                 *ret_data = retval;                             \
43                 pam_set_data( pamh, "smb_setcred_return"        \
44                               , (void *) ret_data, NULL );      \
45         }                                                       \
46         return retval;                                          \
47 } while (0)
48
49 static int _smb_add_user(pam_handle_t *pamh, unsigned int ctrl,
50                          const char *name, SAM_ACCOUNT *sampass, BOOL exist);
51
52
53 /*
54  * pam_sm_authenticate() authenticates users against the samba password file.
55  *
56  *      First, obtain the password from the user. Then use a
57  *      routine in 'support.c' to authenticate the user.
58  */
59
60 #define _SMB_AUTHTOK  "-SMB-PASS"
61
62 int pam_sm_authenticate(pam_handle_t *pamh, int flags,
63                         int argc, const char **argv)
64 {
65     unsigned int ctrl;
66     int retval, *ret_data = NULL;
67     SAM_ACCOUNT *sampass = NULL;
68     extern BOOL in_client;
69     const char *name;
70     void (*oldsig_handler)(int);
71     BOOL found;
72
73     /* Points to memory managed by the PAM library. Do not free. */
74     char *p = NULL;
75
76
77     /* Samba initialization. */
78     setup_logging("pam_smbpass",False);
79     in_client = True;
80
81     ctrl = set_ctrl(flags, argc, argv);
82
83     /* Get a few bytes so we can pass our return value to
84        pam_sm_setcred(). */
85     ret_data = SMB_MALLOC_P(int);
86
87     /* we need to do this before we call AUTH_RETURN */
88     /* Getting into places that might use LDAP -- protect the app
89        from a SIGPIPE it's not expecting */
90     oldsig_handler = CatchSignal(SIGPIPE, SIGNAL_CAST SIG_IGN);
91
92     /* get the username */
93     retval = pam_get_user( pamh, &name, "Username: " );
94     if ( retval != PAM_SUCCESS ) {
95         if (on( SMB_DEBUG, ctrl )) {
96             _log_err(LOG_DEBUG, "auth: could not identify user");
97         }
98         AUTH_RETURN;
99     }
100     if (on( SMB_DEBUG, ctrl )) {
101         _log_err( LOG_DEBUG, "username [%s] obtained", name );
102     }
103
104     if (!initialize_password_db(True)) {
105         _log_err( LOG_ALERT, "Cannot access samba password database" );
106         retval = PAM_AUTHINFO_UNAVAIL;
107         AUTH_RETURN;
108     }
109
110     pdb_init_sam(&sampass);
111     
112     found = pdb_getsampwnam( sampass, name );
113
114     if (on( SMB_MIGRATE, ctrl )) {
115         retval = _smb_add_user(pamh, ctrl, name, sampass, found);
116         pdb_free_sam(&sampass);
117         AUTH_RETURN;
118     }
119
120     if (!found) {
121         _log_err(LOG_ALERT, "Failed to find entry for user %s.", name);
122         retval = PAM_USER_UNKNOWN;
123         pdb_free_sam(&sampass);
124         sampass = NULL;
125         AUTH_RETURN;
126     }
127    
128     /* if this user does not have a password... */
129
130     if (_smb_blankpasswd( ctrl, sampass )) {
131         pdb_free_sam(&sampass);
132         retval = PAM_SUCCESS;
133         AUTH_RETURN;
134     }
135
136     /* get this user's authentication token */
137
138     retval = _smb_read_password(pamh, ctrl, NULL, "Password: ", NULL, _SMB_AUTHTOK, &p);
139     if (retval != PAM_SUCCESS ) {
140         _log_err(LOG_CRIT, "auth: no password provided for [%s]"
141                  , name);
142         pdb_free_sam(&sampass);
143         AUTH_RETURN;
144     }
145
146     /* verify the password of this user */
147
148     retval = _smb_verify_password( pamh, sampass, p, ctrl );
149     pdb_free_sam(&sampass);
150     p = NULL;
151     AUTH_RETURN;
152 }
153
154 /*
155  * This function is for setting samba credentials.  If anyone comes up
156  * with any credentials they think should be set, let me know.
157  */
158
159 int pam_sm_setcred(pam_handle_t *pamh, int flags,
160                    int argc, const char **argv)
161 {
162     int retval, *pretval = NULL;
163
164     retval = PAM_SUCCESS;
165
166     pam_get_data(pamh, "smb_setcred_return", (const void **) &pretval);
167     if(pretval) {
168         retval = *pretval;
169         SAFE_FREE(pretval);
170     }
171     pam_set_data(pamh, "smb_setcred_return", NULL, NULL);
172
173     return retval;
174 }
175
176
177 /* Helper function for adding a user to the db. */
178 static int _smb_add_user(pam_handle_t *pamh, unsigned int ctrl,
179                          const char *name, SAM_ACCOUNT *sampass, BOOL exist)
180 {
181     pstring err_str;
182     pstring msg_str;
183     const char *pass = NULL;
184     int retval;
185
186     err_str[0] = '\0';
187     msg_str[0] = '\0';
188
189     /* Get the authtok; if we don't have one, silently fail. */
190     retval = pam_get_item( pamh, PAM_AUTHTOK, (const void **) &pass );
191
192     if (retval != PAM_SUCCESS) {
193         _log_err( LOG_ALERT
194                   , "pam_get_item returned error to pam_sm_authenticate" );
195         return PAM_AUTHTOK_RECOVER_ERR;
196     } else if (pass == NULL) {
197         return PAM_AUTHTOK_RECOVER_ERR;
198     }
199
200     /* Add the user to the db if they aren't already there. */
201    if (!exist) {
202         retval = NT_STATUS_IS_OK(local_password_change( name, LOCAL_ADD_USER|LOCAL_SET_PASSWORD,
203                                          pass, err_str,
204                                          sizeof(err_str),
205                                          msg_str, sizeof(msg_str) ));
206         if (!retval && *err_str)
207         {
208             err_str[PSTRING_LEN-1] = '\0';
209             make_remark( pamh, ctrl, PAM_ERROR_MSG, err_str );
210         }
211         else if (*msg_str)
212         {
213             msg_str[PSTRING_LEN-1] = '\0';
214             make_remark( pamh, ctrl, PAM_TEXT_INFO, msg_str );
215         }
216         pass = NULL;
217
218         return PAM_IGNORE;
219    }
220    else {
221     /* mimick 'update encrypted' as long as the 'no pw req' flag is not set */
222     if ( pdb_get_acct_ctrl(sampass) & ~ACB_PWNOTREQ )
223     {
224         retval = NT_STATUS_IS_OK(local_password_change( name, LOCAL_SET_PASSWORD, pass, err_str, sizeof(err_str),
225                                          msg_str, sizeof(msg_str) ));
226         if (!retval && *err_str)
227         {
228             err_str[PSTRING_LEN-1] = '\0';
229             make_remark( pamh, ctrl, PAM_ERROR_MSG, err_str );
230         }
231         else if (*msg_str)
232         {
233             msg_str[PSTRING_LEN-1] = '\0';
234             make_remark( pamh, ctrl, PAM_TEXT_INFO, msg_str );
235         }
236     }
237    }
238     
239     pass = NULL;
240
241     return PAM_IGNORE;
242 }
243
244
245 /* static module data */
246 #ifdef PAM_STATIC
247 struct pam_module _pam_smbpass_auth_modstruct = {
248      "pam_smbpass",
249      pam_sm_authenticate,
250      pam_sm_setcred,
251      NULL,
252      NULL,
253      NULL,
254      NULL
255 };
256 #endif
257