r13590: * replace all pdb_init_sam[_talloc]() calls with samu_new()
[kai/samba-autobuild/.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 /*
38  * pam_sm_acct_mgmt() verifies whether or not the account is disabled.
39  *
40  */
41
42 int pam_sm_acct_mgmt( pam_handle_t *pamh, int flags,
43                       int argc, const char **argv )
44 {
45     unsigned int ctrl;
46     int retval;
47
48     const char *name;
49     struct samu *sampass = NULL;
50     void (*oldsig_handler)(int);
51     extern BOOL in_client;
52
53     /* Samba initialization. */
54     setup_logging( "pam_smbpass", False );
55     in_client = True;
56
57     ctrl = set_ctrl( flags, argc, argv );
58
59     /* get the username */
60
61     retval = pam_get_user( pamh, &name, "Username: " );
62     if (retval != PAM_SUCCESS) {
63         if (on( SMB_DEBUG, ctrl )) {
64             _log_err( LOG_DEBUG, "acct: could not identify user" );
65         }
66         return retval;
67     }
68     if (on( SMB_DEBUG, ctrl )) {
69         _log_err( LOG_DEBUG, "acct: username [%s] obtained", name );
70     }
71
72     /* Getting into places that might use LDAP -- protect the app
73        from a SIGPIPE it's not expecting */
74     oldsig_handler = CatchSignal(SIGPIPE, SIGNAL_CAST SIG_IGN);
75     if (!initialize_password_db(True)) {
76         _log_err( LOG_ALERT, "Cannot access samba password database" );
77         CatchSignal(SIGPIPE, SIGNAL_CAST oldsig_handler);
78         return PAM_AUTHINFO_UNAVAIL;
79     }
80
81     /* Get the user's record. */
82
83     if ( (sampass = samu_new( NULL )) != NULL ) {
84         pdb_getsampwnam(sampass, name );
85     } 
86
87     /* check for lookup failure */
88     if ( !sampass || !strlen(pdb_get_username(sampass)) ) {
89         CatchSignal(SIGPIPE, SIGNAL_CAST oldsig_handler);
90         return PAM_USER_UNKNOWN;
91     }
92
93     if (pdb_get_acct_ctrl(sampass) & ACB_DISABLED) {
94         if (on( SMB_DEBUG, ctrl )) {
95             _log_err( LOG_DEBUG
96                       , "acct: account %s is administratively disabled", name );
97         }
98         make_remark( pamh, ctrl, PAM_ERROR_MSG
99                      , "Your account has been disabled; "
100                        "please see your system administrator." );
101
102         CatchSignal(SIGPIPE, SIGNAL_CAST oldsig_handler);
103         return PAM_ACCT_EXPIRED;
104     }
105
106     /* TODO: support for expired passwords. */
107
108     CatchSignal(SIGPIPE, SIGNAL_CAST oldsig_handler);
109     return PAM_SUCCESS;
110 }
111
112 /* static module data */
113 #ifdef PAM_STATIC
114 struct pam_module _pam_smbpass_acct_modstruct = {
115      "pam_smbpass",
116      NULL,
117      NULL,
118      pam_sm_acct_mgmt,
119      NULL,
120      NULL,
121      NULL
122 };
123 #endif
124