1 /* $NetBSD: pam_ftpusers.c,v 1.6 2012/01/03 19:02:55 christos Exp $ */
2
3 /*-
4 * Copyright (c) 2001 Networks Associates Technology, Inc.
5 * All rights reserved.
6 *
7 * This software was developed for the FreeBSD Project by ThinkSec AS and
8 * NAI Labs, the Security Research Division of Network Associates, Inc.
9 * under DARPA/SPAWAR contract N66001-01-C-8035 ("CBOSS"), as part of the
10 * DARPA CHATS research program.
11 *
12 * Redistribution and use in source and binary forms, with or without
13 * modification, are permitted provided that the following conditions
14 * are met:
15 * 1. Redistributions of source code must retain the above copyright
16 * notice, this list of conditions and the following disclaimer.
17 * 2. Redistributions in binary form must reproduce the above copyright
18 * notice, this list of conditions and the following disclaimer in the
19 * documentation and/or other materials provided with the distribution.
20 * 3. The name of the author may not be used to endorse or promote
21 * products derived from this software without specific prior written
22 * permission.
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 * SUCH DAMAGE.
35 */
36
37 #include <sys/cdefs.h>
38 #ifdef __FreeBSD__
39 __FBSDID("$FreeBSD: src/lib/libpam/modules/pam_ftpusers/pam_ftpusers.c,v 1.1 2002/05/08 00:30:10 des Exp $");
40 #else
41 __RCSID("$NetBSD: pam_ftpusers.c,v 1.6 2012/01/03 19:02:55 christos Exp $");
42 #endif
43
44 #include <ctype.h>
45 #include <grp.h>
46 #include <paths.h>
47 #include <pwd.h>
48 #include <stdio.h>
49 #include <errno.h>
50 #include <stdlib.h>
51 #include <string.h>
52
53 #define PAM_SM_ACCOUNT
54
55 #include <security/pam_appl.h>
56 #include <security/pam_modules.h>
57 #include <security/pam_mod_misc.h>
58 #include <security/openpam.h>
59
60 PAM_EXTERN int
pam_sm_acct_mgmt(pam_handle_t * pamh,int flags __unused,int argc __unused,const char * argv[]__unused)61 pam_sm_acct_mgmt(pam_handle_t *pamh, int flags __unused,
62 int argc __unused, const char *argv[] __unused)
63 {
64 struct passwd *pwd, pwres;
65 struct group *grp, grres;
66 const char *user;
67 int pam_err, found, allow;
68 char *line, *name, **mem;
69 size_t len, ulen;
70 FILE *f;
71 char pwbuf[1024], grbuf[1024];
72
73 pam_err = pam_get_user(pamh, &user, NULL);
74 if (pam_err != PAM_SUCCESS)
75 return (pam_err);
76 if (user == NULL ||
77 getpwnam_r(user, &pwres, pwbuf, sizeof(pwbuf), &pwd) != 0 ||
78 pwd == NULL)
79 return (PAM_SERVICE_ERR);
80
81 found = 0;
82 ulen = strlen(user);
83 if ((f = fopen(_PATH_FTPUSERS, "r")) == NULL) {
84 PAM_LOG("%s: %s", _PATH_FTPUSERS, strerror(errno));
85 goto done;
86 }
87 while (!found && (line = fgetln(f, &len)) != NULL) {
88 if (*line == '#')
89 continue;
90 while (len > 0 && isspace((unsigned char)line[len - 1]))
91 --len;
92 if (len == 0)
93 continue;
94 /* simple case first */
95 if (*line != '@') {
96 if (len == ulen && strncmp(user, line, len) == 0)
97 found = 1;
98 continue;
99 }
100 /* member of specified group? */
101 asprintf(&name, "%.*s", (int)len - 1, line + 1);
102 if (name == NULL) {
103 fclose(f);
104 return (PAM_BUF_ERR);
105 }
106 (void)getgrnam_r(name, &grres, grbuf, sizeof(grbuf), &grp);
107 free(name);
108 if (grp == NULL)
109 continue;
110 for (mem = grp->gr_mem; mem && *mem && !found; ++mem)
111 if (strcmp(user, *mem) == 0)
112 found = 1;
113 }
114 done:
115 allow = (openpam_get_option(pamh, "disallow") == NULL);
116 if (found)
117 pam_err = allow ? PAM_SUCCESS : PAM_AUTH_ERR;
118 else
119 pam_err = allow ? PAM_AUTH_ERR : PAM_SUCCESS;
120 if (f != NULL)
121 fclose(f);
122 return (pam_err);
123 }
124
125 PAM_MODULE_ENTRY("pam_ftpusers");
126