pam_group.c revision 1.2 1 1.2 christos /* $NetBSD: pam_group.c,v 1.2 2004/12/12 08:18:44 christos Exp $ */
2 1.2 christos
3 1.1 christos /*-
4 1.1 christos * Copyright (c) 2003 Networks Associates Technology, Inc.
5 1.1 christos * All rights reserved.
6 1.1 christos *
7 1.1 christos * Portions of this software were developed for the FreeBSD Project by
8 1.1 christos * ThinkSec AS and NAI Labs, the Security Research Division of Network
9 1.1 christos * Associates, Inc. under DARPA/SPAWAR contract N66001-01-C-8035
10 1.1 christos * ("CBOSS"), as part of the DARPA CHATS research program.
11 1.1 christos *
12 1.1 christos * Redistribution and use in source and binary forms, with or without
13 1.1 christos * modification, are permitted provided that the following conditions
14 1.1 christos * are met:
15 1.1 christos * 1. Redistributions of source code must retain the above copyright
16 1.1 christos * notice, this list of conditions and the following disclaimer.
17 1.1 christos * 2. Redistributions in binary form must reproduce the above copyright
18 1.1 christos * notice, this list of conditions and the following disclaimer in the
19 1.1 christos * documentation and/or other materials provided with the distribution.
20 1.1 christos * 3. The name of the author may not be used to endorse or promote
21 1.1 christos * products derived from this software without specific prior written
22 1.1 christos * permission.
23 1.1 christos *
24 1.1 christos * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
25 1.1 christos * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 1.1 christos * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 1.1 christos * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
28 1.1 christos * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 1.1 christos * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 1.1 christos * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 1.1 christos * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 1.1 christos * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 1.1 christos * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 1.1 christos * SUCH DAMAGE.
35 1.1 christos */
36 1.1 christos
37 1.1 christos #include <sys/cdefs.h>
38 1.2 christos #ifdef __FreeBSD__
39 1.1 christos __FBSDID("$FreeBSD: src/lib/libpam/modules/pam_group/pam_group.c,v 1.4 2003/12/11 13:55:15 des Exp $");
40 1.2 christos #else
41 1.2 christos __RCSID("$NetBSD: pam_group.c,v 1.2 2004/12/12 08:18:44 christos Exp $");
42 1.2 christos #endif
43 1.1 christos
44 1.1 christos #include <sys/types.h>
45 1.1 christos
46 1.1 christos #include <grp.h>
47 1.1 christos #include <pwd.h>
48 1.1 christos #include <stdarg.h>
49 1.1 christos #include <stdio.h>
50 1.1 christos #include <string.h>
51 1.1 christos #include <syslog.h>
52 1.1 christos #include <unistd.h>
53 1.1 christos
54 1.1 christos #define PAM_SM_AUTH
55 1.1 christos
56 1.1 christos #include <security/pam_appl.h>
57 1.1 christos #include <security/pam_modules.h>
58 1.1 christos #include <security/openpam.h>
59 1.1 christos
60 1.1 christos
61 1.1 christos PAM_EXTERN int
62 1.1 christos pam_sm_authenticate(pam_handle_t *pamh, int flags __unused,
63 1.1 christos int argc __unused, const char *argv[] __unused)
64 1.1 christos {
65 1.1 christos const char *group, *user;
66 1.1 christos const void *ruser;
67 1.1 christos char *const *list;
68 1.1 christos struct passwd *pwd;
69 1.1 christos struct group *grp;
70 1.1 christos
71 1.1 christos /* get target account */
72 1.1 christos if (pam_get_user(pamh, &user, NULL) != PAM_SUCCESS ||
73 1.1 christos user == NULL || (pwd = getpwnam(user)) == NULL)
74 1.1 christos return (PAM_AUTH_ERR);
75 1.1 christos if (pwd->pw_uid != 0 && openpam_get_option(pamh, "root_only"))
76 1.1 christos return (PAM_IGNORE);
77 1.1 christos
78 1.1 christos /* get applicant */
79 1.1 christos if (pam_get_item(pamh, PAM_RUSER, &ruser) != PAM_SUCCESS
80 1.1 christos || ruser == NULL || (pwd = getpwnam(ruser)) == NULL)
81 1.1 christos return (PAM_AUTH_ERR);
82 1.1 christos
83 1.1 christos /* get regulating group */
84 1.1 christos if ((group = openpam_get_option(pamh, "group")) == NULL)
85 1.1 christos group = "wheel";
86 1.1 christos if ((grp = getgrnam(group)) == NULL || grp->gr_mem == NULL)
87 1.1 christos goto failed;
88 1.1 christos
89 1.1 christos /* check if the group is empty */
90 1.1 christos if (*grp->gr_mem == NULL)
91 1.1 christos goto failed;
92 1.1 christos
93 1.1 christos /* check membership */
94 1.1 christos if (pwd->pw_gid == grp->gr_gid)
95 1.1 christos goto found;
96 1.1 christos for (list = grp->gr_mem; *list != NULL; ++list)
97 1.1 christos if (strcmp(*list, pwd->pw_name) == 0)
98 1.1 christos goto found;
99 1.1 christos
100 1.1 christos not_found:
101 1.1 christos if (openpam_get_option(pamh, "deny"))
102 1.1 christos return (PAM_SUCCESS);
103 1.1 christos return (PAM_AUTH_ERR);
104 1.1 christos found:
105 1.1 christos if (openpam_get_option(pamh, "deny"))
106 1.1 christos return (PAM_AUTH_ERR);
107 1.1 christos return (PAM_SUCCESS);
108 1.1 christos failed:
109 1.1 christos if (openpam_get_option(pamh, "fail_safe"))
110 1.1 christos goto found;
111 1.1 christos else
112 1.1 christos goto not_found;
113 1.1 christos }
114 1.1 christos
115 1.1 christos PAM_EXTERN int
116 1.1 christos pam_sm_setcred(pam_handle_t * pamh __unused, int flags __unused,
117 1.1 christos int argc __unused, const char *argv[] __unused)
118 1.1 christos {
119 1.1 christos
120 1.1 christos return (PAM_SUCCESS);
121 1.1 christos }
122 1.1 christos
123 1.1 christos PAM_MODULE_ENTRY("pam_group");
124