Added Steve Langasek <vorlon@netexpress.net> pam_smbpass PAM module code.
[kai/samba.git] / source / pam_smbpass / pam_smb_acct.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_ACCT
20
21 #include "includes.h"
22
23 #ifndef LINUX
24
25 /* This is only used in the Sun implementation. */
26 #include <security/pam_appl.h>
27
28 #endif  /* LINUX */
29
30 #include <security/pam_modules.h>
31
32 #include "general.h"
33
34 #include "support.h"
35
36 /*
37  * pam_sm_acct_mgmt() verifies whether or not the account is disabled.
38  *
39  */
40
41 int pam_sm_acct_mgmt( pam_handle_t *pamh, int flags,
42                       int argc, const char **argv )
43 {
44     unsigned int ctrl;
45     int retval;
46
47     const char *name;
48     const char *p;
49     struct smb_passwd *smb_pwent = NULL;
50
51     extern BOOL in_client;
52
53     /* Samba initialization. */
54     setup_logging( "pam_smbpass", False );
55     charset_initialise();
56     in_client = True;
57
58     ctrl = set_ctrl( flags, argc, argv );
59
60     /* get the username */
61
62     retval = pam_get_user( pamh, &name, "Username: " );
63     if (retval != PAM_SUCCESS) {
64         if (on( SMB_DEBUG, ctrl )) {
65             _log_err( LOG_DEBUG, "acct: could not identify user" );
66         }
67         return retval;
68     }
69     if (on( SMB_DEBUG, ctrl )) {
70         _log_err( LOG_DEBUG, "acct: username [%s] obtained", name );
71     }
72
73     if (!initialize_password_db()) {
74         _log_err( LOG_ALERT, "Cannot access samba password database" );
75         return PAM_AUTHINFO_UNAVAIL;
76     }
77
78     /* Get the user's record. */
79     smb_pwent = getsmbpwnam( name );
80
81     if (!smb_pwent)
82         return PAM_USER_UNKNOWN;
83
84     if (smb_pwent->acct_ctrl & ACB_DISABLED) {
85         if (on( SMB_DEBUG, ctrl )) {
86             _log_err( LOG_DEBUG
87                       , "acct: account %s is administratively disabled", name );
88         }
89         make_remark( pamh, ctrl, PAM_ERROR_MSG
90                      , "Your account has been disabled; "
91                        "please see your system administrator." );
92
93         return PAM_ACCT_EXPIRED;
94     }
95
96     /* TODO: support for expired passwords. */
97
98     return PAM_SUCCESS;
99 }
100
101 /* static module data */
102 #ifdef PAM_STATIC
103 struct pam_module _pam_smbpass_acct_modstruct = {
104      "pam_smbpass",
105      NULL,
106      NULL,
107      pam_sm_acct_mgmt,
108      NULL,
109      NULL,
110      NULL
111 };
112 #endif
113