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