2 * Copyright 1998 Juniper Networks, Inc.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 #include <syslog.h> /* XXX */
36 #include <security/pam_modules.h>
38 #include "pam_mod_misc.h"
41 pam_sm_authenticate(pam_handle_t *pamh, int flags, int argc,
56 for (i = 0; i < argc; i++)
57 pam_std_option(&options, argv[i]);
59 * It doesn't make sense to use a password that has already been
60 * typed in, since we haven't presented the challenge to the user
63 options &= ~(PAM_OPT_USE_FIRST_PASS | PAM_OPT_TRY_FIRST_PASS);
64 if ((retval = pam_get_user(pamh, &user, NULL)) != PAM_SUCCESS)
66 if (skeyinfo(&skey, user, challenge) != 0)
68 snprintf(prompt, sizeof prompt, "%s\nPassword: ", challenge);
69 if ((retval = pam_get_pass(pamh, &response, prompt, options)) !=
72 if (response[0] == '\0' && !(options & PAM_OPT_ECHO_PASS)) {
73 options |= PAM_OPT_ECHO_PASS;
74 snprintf(prompt, sizeof prompt,
75 "%s\nPassword [echo on]: ", challenge);
76 if ((retval = pam_get_pass(pamh, &response, prompt,
77 options)) != PAM_SUCCESS)
81 * Skeyinfo closed the database file, so we have to call skeylookup
84 if ((e = skeylookup(&skey, user)) != 0) {
86 syslog(LOG_ERR, "Error opening S/Key database");
87 return PAM_SERVICE_ERR;
91 /* We have to copy the response, because skeyverify mucks with it. */
92 snprintf(resp_buf, sizeof resp_buf, "%s", response);
94 * Skeyverify is supposed to return -1 only if an error occurs.
95 * But it returns -1 even if the response string isn't in the form
96 * it expects. Thus we can't log an error and can only check for
97 * success or lack thereof.
99 return skeyverify(&skey, resp_buf) == 0 ? PAM_SUCCESS : PAM_AUTH_ERR;
103 pam_sm_setcred(pam_handle_t *pamh, int flags, int argc, const char **argv)