source: openpam/trunk/lib/pam_start.c @ 21

Last change on this file since 21 was 21, checked in by Dag-Erling Smørgrav, 19 years ago

Move linker-related code out into a separate file so it'll be easier
to restructure it later on.

Sponsored by: DARPA, NAI Labs

  • Property svn:keywords set to Id LastChangedRevision HeadURL LastChangedDate LastChangedBy
File size: 7.1 KB
Line 
1/*-
2 * Copyright (c) 2002 Networks Associates Technologies, Inc.
3 * All rights reserved.
4 *
5 * This software was developed for the FreeBSD Project by ThinkSec AS and
6 * NAI Labs, the Security Research Division of Network Associates, Inc.
7 * under DARPA/SPAWAR contract N66001-01-C-8035 ("CBOSS"), as part of the
8 * DARPA CHATS research program.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 *    notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 *    notice, this list of conditions and the following disclaimer in the
17 *    documentation and/or other materials provided with the distribution.
18 * 3. The name of the author may not be used to endorse or promote
19 *    products derived from this software without specific prior written
20 *    permission.
21 *
22 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
23 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
26 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 * SUCH DAMAGE.
33 *
34 * $Id: pam_start.c 21 2002-02-02 18:37:08Z des $
35 */
36
37#include <ctype.h>
38#include <errno.h>
39#include <stdio.h>
40#include <stdlib.h>
41#include <string.h>
42
43#include <security/pam_appl.h>
44
45#include "openpam_impl.h"
46
47static int _pam_configure_service(pam_handle_t *pamh, const char *service);
48
49/*
50 * XSSO 4.2.1
51 * XSSO 6 page 89
52 *
53 * Initiate a PAM transaction
54 */
55
56int
57pam_start(const char *service,
58        const char *user,
59        const struct pam_conv *pam_conv,
60        pam_handle_t **pamh)
61{
62        struct pam_handle *ph;
63        int r;
64
65        if ((ph = calloc(1, sizeof(*ph))) == NULL)
66                return (PAM_BUF_ERR);
67        if ((r = pam_set_item(ph, PAM_SERVICE, service)) != PAM_SUCCESS)
68                goto fail;
69        if ((r = pam_set_item(ph, PAM_USER, user)) != PAM_SUCCESS)
70                goto fail;
71        if ((r = pam_set_item(ph, PAM_CONV, pam_conv)) != PAM_SUCCESS)
72                goto fail;
73
74        if ((r = _pam_configure_service(ph, service)) != PAM_SUCCESS &&
75            r != PAM_BUF_ERR)
76                r = _pam_configure_service(ph, PAM_OTHER);
77        if (r != PAM_SUCCESS)
78                goto fail;
79
80        *pamh = ph;
81        openpam_log(PAM_LOG_DEBUG, "pam_start(\"%s\") succeeded", service);
82        return (PAM_SUCCESS);
83
84 fail:
85        pam_end(ph, r);
86        return (r);
87}
88
89#define PAM_CONF_STYLE  0
90#define PAM_D_STYLE     1
91#define MAX_LINE_LEN    1024
92
93static int
94_pam_read_policy_file(pam_handle_t *pamh,
95        const char *service,
96        const char *filename,
97        int style)
98{
99        char buf[MAX_LINE_LEN], *p, *q;
100        int ch, chain, flag, line, n, r;
101        size_t len;
102        FILE *f;
103
104        n = 0;
105
106        if ((f = fopen(filename, "r")) == NULL) {
107                openpam_log(errno == ENOENT ? PAM_LOG_DEBUG : PAM_LOG_NOTICE,
108                    "%s: %m", filename);
109                return (0);
110        }
111        openpam_log(PAM_LOG_DEBUG, "looking for '%s' in %s",
112            service, filename);
113
114        for (line = 1; fgets(buf, MAX_LINE_LEN, f) != NULL; ++line) {
115                if ((len = strlen(buf)) == 0)
116                        continue;
117
118                /* check for overflow */
119                if (buf[--len] != '\n' && !feof(f)) {
120                        openpam_log(PAM_LOG_ERROR, "%s: line %d too long",
121                            filename, line);
122                        openpam_log(PAM_LOG_ERROR, "%s: ignoring line %d",
123                            filename, line);
124                        while ((ch = fgetc(f)) != EOF)
125                                if (ch == '\n')
126                                        break;
127                        continue;
128                }
129
130                /* strip comments and trailing whitespace */
131                if ((p = strchr(buf, '#')) != NULL)
132                        len = p - buf ? p - buf - 1 : p - buf;
133                while (len > 0 && isspace(buf[len]))
134                        --len;
135                if (len == 0)
136                        continue;
137                buf[len] = '\0';
138                p = q = buf;
139
140                /* check service name */
141                if (style == PAM_CONF_STYLE) {
142                        for (q = p = buf; *q != '\0' && !isspace(*q); ++q)
143                                /* nothing */;
144                        if (*q == '\0')
145                                goto syntax_error;
146                        *q++ = '\0';
147                        if (strcmp(p, service) != 0)
148                                continue;
149                        openpam_log(PAM_LOG_DEBUG, "%s: line %d matches '%s'",
150                            filename, line, service);
151                }
152
153
154                /* get module type */
155                for (p = q; isspace(*p); ++p)
156                        /* nothing */;
157                for (q = p; *q != '\0' && !isspace(*q); ++q)
158                        /* nothing */;
159                if (q == p || *q == '\0')
160                        goto syntax_error;
161                *q++ = '\0';
162                if (strcmp(p, "auth") == 0) {
163                        chain = PAM_AUTH;
164                } else if (strcmp(p, "account") == 0) {
165                        chain = PAM_ACCOUNT;
166                } else if (strcmp(p, "session") == 0) {
167                        chain = PAM_SESSION;
168                } else if (strcmp(p, "password") == 0) {
169                        chain = PAM_PASSWORD;
170                } else {
171                        openpam_log(PAM_LOG_ERROR,
172                            "%s: invalid module type on line %d: '%s'",
173                            filename, line, p);
174                        continue;
175                }
176
177                /* get control flag */
178                for (p = q; isspace(*p); ++p)
179                        /* nothing */;
180                for (q = p; *q != '\0' && !isspace(*q); ++q)
181                        /* nothing */;
182                if (q == p || *q == '\0')
183                        goto syntax_error;
184                *q++ = '\0';
185                if (strcmp(p, "required") == 0) {
186                        flag = PAM_REQUIRED;
187                } else if (strcmp(p, "requisite") == 0) {
188                        flag = PAM_REQUISITE;
189                } else if (strcmp(p, "sufficient") == 0) {
190                        flag = PAM_SUFFICIENT;
191                } else if (strcmp(p, "optional") == 0) {
192                        flag = PAM_OPTIONAL;
193                } else {
194                        openpam_log(PAM_LOG_ERROR,
195                            "%s: invalid control flag on line %d: '%s'",
196                            filename, line, p);
197                        continue;
198                }
199
200                /* get module name */
201                for (p = q; isspace(*p); ++p)
202                        /* nothing */;
203                for (q = p; *q != '\0' && !isspace(*q); ++q)
204                        /* nothing */;
205                if (q == p)
206                        goto syntax_error;
207
208                /* get options */
209                if (*q != '\0') {
210                        *q++ = 0;
211                        while (isspace(*q))
212                                ++q;
213                }
214
215                /*
216                 * Finally, add the module at the end of the
217                 * appropriate chain and bump the counter.
218                 */
219                if ((r = openpam_add_module(pamh, chain, flag, p, q)) !=
220                    PAM_SUCCESS)
221                        return (-r);
222                ++n;
223                continue;
224 syntax_error:
225                openpam_log(PAM_LOG_ERROR, "%s: syntax error on line %d",
226                    filename, line);
227                openpam_log(PAM_LOG_DEBUG, "%s: line %d: [%s]",
228                    filename, line, q);
229                openpam_log(PAM_LOG_ERROR, "%s: ignoring line %d",
230                    filename, line);
231        }
232
233        if (ferror(f))
234                openpam_log(PAM_LOG_ERROR, "%s: %m", filename);
235
236        fclose(f);
237        return (n);
238}
239
240static const char *_pam_policy_path[] = {
241        "/etc/pam.d/",
242        "/etc/pam.conf",
243        "/usr/local/etc/pam.d/",
244        NULL
245};
246
247static int
248_pam_configure_service(pam_handle_t *pamh,
249        const char *service)
250{
251        const char **path;
252        char *filename;
253        size_t len;
254        int r;
255
256        for (path = _pam_policy_path; *path != NULL; ++path) {
257                len = strlen(*path);
258                if ((*path)[len - 1] == '/') {
259                        filename = malloc(len + strlen(service) + 1);
260                        if (filename == NULL) {
261                                openpam_log(PAM_LOG_ERROR, "malloc(): %m");
262                                return (PAM_BUF_ERR);
263                        }
264                        strcpy(filename, *path);
265                        strcat(filename, service);
266                        r = _pam_read_policy_file(pamh,
267                            service, filename, PAM_D_STYLE);
268                        free(filename);
269                } else {
270                        r = _pam_read_policy_file(pamh,
271                            service, *path, PAM_CONF_STYLE);
272                }
273                if (r < 0)
274                        return (-r);
275                if (r > 0)
276                        return (PAM_SUCCESS);
277        }
278
279        return (PAM_SYSTEM_ERR);
280}
Note: See TracBrowser for help on using the repository browser.