602 lines
16 KiB
C
602 lines
16 KiB
C
/*
|
|
* Copyright (c) 1995 Tatu Ylonen <ylo@cs.hut.fi>, Espoo, Finland
|
|
* All rights reserved
|
|
*
|
|
* As far as I am concerned, the code I have written for this software
|
|
* can be used freely for any purpose. Any derived versions of this
|
|
* software must be clearly marked as such, and if the derived work is
|
|
* incompatible with the protocol description in the RFC file, it must be
|
|
* called by a name other than "ssh" or "Secure Shell".
|
|
*/
|
|
|
|
#include "includes.h"
|
|
RCSID("$OpenBSD: auth1.c,v 1.6 2000/10/11 20:27:23 markus Exp $");
|
|
RCSID("$FreeBSD$");
|
|
|
|
#include "xmalloc.h"
|
|
#include "rsa.h"
|
|
#include "ssh.h"
|
|
#include "packet.h"
|
|
#include "buffer.h"
|
|
#include "mpaux.h"
|
|
#include "servconf.h"
|
|
#include "compat.h"
|
|
#include "auth.h"
|
|
#include "session.h"
|
|
#include <login_cap.h>
|
|
#include <security/pam_appl.h>
|
|
|
|
#ifdef KRB5
|
|
extern krb5_context ssh_context;
|
|
krb5_principal tkt_client = NULL; /* Principal from the received ticket.
|
|
Also is used as an indication of succesful krb5 authentization. */
|
|
#endif
|
|
|
|
/* import */
|
|
extern ServerOptions options;
|
|
extern char *forced_command;
|
|
|
|
/*
|
|
* convert ssh auth msg type into description
|
|
*/
|
|
char *
|
|
get_authname(int type)
|
|
{
|
|
static char buf[1024];
|
|
switch (type) {
|
|
case SSH_CMSG_AUTH_PASSWORD:
|
|
return "password";
|
|
case SSH_CMSG_AUTH_RSA:
|
|
return "rsa";
|
|
case SSH_CMSG_AUTH_RHOSTS_RSA:
|
|
return "rhosts-rsa";
|
|
case SSH_CMSG_AUTH_RHOSTS:
|
|
return "rhosts";
|
|
#if defined(KRB4) || defined(KRB5)
|
|
case SSH_CMSG_AUTH_KERBEROS:
|
|
return "kerberos";
|
|
#endif
|
|
#ifdef SKEY
|
|
case SSH_CMSG_AUTH_TIS_RESPONSE:
|
|
return "s/key";
|
|
#endif
|
|
}
|
|
snprintf(buf, sizeof buf, "bad-auth-msg-%d", type);
|
|
return buf;
|
|
}
|
|
|
|
/*
|
|
* read packets and try to authenticate local user 'luser'.
|
|
* return if authentication is successfull. not that pw == NULL
|
|
* if the user does not exists or is not allowed to login.
|
|
* each auth method has to 'fake' authentication for nonexisting
|
|
* users.
|
|
*/
|
|
void
|
|
do_authloop(struct passwd * pw, char *luser)
|
|
{
|
|
int authenticated = 0;
|
|
int attempt = 0;
|
|
unsigned int bits;
|
|
RSA *client_host_key;
|
|
BIGNUM *n;
|
|
char *client_user, *password;
|
|
char user[1024];
|
|
unsigned int dlen;
|
|
int plen, nlen, elen;
|
|
unsigned int ulen;
|
|
int type = 0;
|
|
void (*authlog) (const char *fmt,...) = verbose;
|
|
#ifdef HAVE_LOGIN_CAP
|
|
login_cap_t *lc;
|
|
#endif /* HAVE_LOGIN_CAP */
|
|
#ifdef USE_PAM
|
|
struct inverted_pam_cookie *pam_cookie;
|
|
#endif /* USE_PAM */
|
|
#if defined(HAVE_LOGIN_CAP) || defined(LOGIN_ACCESS)
|
|
const char *from_host, *from_ip;
|
|
|
|
from_host = get_canonical_hostname();
|
|
from_ip = get_remote_ipaddr();
|
|
#endif /* HAVE_LOGIN_CAP || LOGIN_ACCESS */
|
|
#if 0
|
|
#ifdef KRB5
|
|
{
|
|
krb5_error_code ret;
|
|
|
|
ret = krb5_init_context(&ssh_context);
|
|
if (ret)
|
|
verbose("Error while initializing Kerberos V5.");
|
|
krb5_init_ets(ssh_context);
|
|
|
|
}
|
|
#endif /* KRB5 */
|
|
#endif
|
|
|
|
/* Indicate that authentication is needed. */
|
|
packet_start(SSH_SMSG_FAILURE);
|
|
packet_send();
|
|
packet_write_wait();
|
|
|
|
client_user = NULL;
|
|
|
|
for (attempt = 1;; attempt++) {
|
|
/* default to fail */
|
|
authenticated = 0;
|
|
|
|
strlcpy(user, "", sizeof user);
|
|
|
|
/* Get a packet from the client. */
|
|
type = packet_read(&plen);
|
|
|
|
/* Process the packet. */
|
|
switch (type) {
|
|
#ifdef AFS
|
|
#ifndef KRB5
|
|
case SSH_CMSG_HAVE_KRB4_TGT:
|
|
if (!options.krb4_tgt_passing) {
|
|
/* packet_get_all(); */
|
|
verbose("Kerberos v4 tgt passing disabled.");
|
|
break;
|
|
} else {
|
|
/* Accept Kerberos v4 tgt. */
|
|
char *tgt = packet_get_string(&dlen);
|
|
packet_integrity_check(plen, 4 + dlen, type);
|
|
if (!auth_krb4_tgt(pw, tgt))
|
|
verbose("Kerberos v4 tgt REFUSED for %s", luser);
|
|
xfree(tgt);
|
|
}
|
|
continue;
|
|
#endif /* !KRB5 */
|
|
case SSH_CMSG_HAVE_AFS_TOKEN:
|
|
if (!options.afs_token_passing || !k_hasafs()) {
|
|
verbose("AFS token passing disabled.");
|
|
break;
|
|
} else {
|
|
/* Accept AFS token. */
|
|
char *token_string = packet_get_string(&dlen);
|
|
packet_integrity_check(plen, 4 + dlen, type);
|
|
if (!auth_afs_token(pw, token_string))
|
|
verbose("AFS token REFUSED for %.100s", luser);
|
|
xfree(token_string);
|
|
}
|
|
continue;
|
|
#endif /* AFS */
|
|
#if defined(KRB4) || defined(KRB5)
|
|
case SSH_CMSG_AUTH_KERBEROS:
|
|
if (!options.kerberos_authentication) {
|
|
verbose("Kerberos authentication disabled.");
|
|
} else {
|
|
unsigned int length;
|
|
char *kdata = packet_get_string(&length);
|
|
packet_integrity_check(plen, 4 + length, type);
|
|
|
|
/* 4 == KRB_PROT_VERSION */
|
|
if (kdata[0] == 4) {
|
|
#ifndef KRB4
|
|
verbose("Kerberos v4 authentication disabled.");
|
|
#else
|
|
char *tkt_user = NULL;
|
|
KTEXT_ST auth;
|
|
auth.length = length;
|
|
if (auth.length < MAX_KTXT_LEN)
|
|
memcpy(auth.dat, kdata, auth.length);
|
|
|
|
authenticated = auth_krb4(pw->pw_name, &auth, &tkt_user);
|
|
|
|
if (authenticated) {
|
|
snprintf(user, sizeof user, " tktuser %s", tkt_user);
|
|
xfree(tkt_user);
|
|
}
|
|
#endif /* KRB4 */
|
|
} else {
|
|
#ifndef KRB5
|
|
verbose("Kerberos v5 authentication disabled.");
|
|
#else
|
|
krb5_data k5data;
|
|
k5data.length = length;
|
|
k5data.data = kdata;
|
|
#if 0
|
|
if (krb5_init_context(&ssh_context)) {
|
|
verbose("Error while initializing Kerberos V5.");
|
|
break;
|
|
}
|
|
krb5_init_ets(ssh_context);
|
|
#endif
|
|
/* pw->name is passed just for logging purposes */
|
|
if (auth_krb5(pw->pw_name, &k5data, &tkt_client)) {
|
|
/* authorize client against .k5login */
|
|
if (krb5_kuserok(ssh_context,
|
|
tkt_client,
|
|
pw->pw_name))
|
|
authenticated = 1;
|
|
}
|
|
#endif /* KRB5 */
|
|
}
|
|
xfree(kdata);
|
|
}
|
|
break;
|
|
#endif /* KRB4 || KRB5 */
|
|
|
|
case SSH_CMSG_AUTH_RHOSTS:
|
|
if (!options.rhosts_authentication) {
|
|
verbose("Rhosts authentication disabled.");
|
|
break;
|
|
}
|
|
/*
|
|
* Get client user name. Note that we just have to
|
|
* trust the client; this is one reason why rhosts
|
|
* authentication is insecure. (Another is
|
|
* IP-spoofing on a local network.)
|
|
*/
|
|
client_user = packet_get_string(&ulen);
|
|
packet_integrity_check(plen, 4 + ulen, type);
|
|
|
|
/* Try to authenticate using /etc/hosts.equiv and .rhosts. */
|
|
authenticated = auth_rhosts(pw, client_user);
|
|
|
|
snprintf(user, sizeof user, " ruser %s", client_user);
|
|
break;
|
|
|
|
case SSH_CMSG_AUTH_RHOSTS_RSA:
|
|
if (!options.rhosts_rsa_authentication) {
|
|
verbose("Rhosts with RSA authentication disabled.");
|
|
break;
|
|
}
|
|
/*
|
|
* Get client user name. Note that we just have to
|
|
* trust the client; root on the client machine can
|
|
* claim to be any user.
|
|
*/
|
|
client_user = packet_get_string(&ulen);
|
|
|
|
/* Get the client host key. */
|
|
client_host_key = RSA_new();
|
|
if (client_host_key == NULL)
|
|
fatal("RSA_new failed");
|
|
client_host_key->e = BN_new();
|
|
client_host_key->n = BN_new();
|
|
if (client_host_key->e == NULL || client_host_key->n == NULL)
|
|
fatal("BN_new failed");
|
|
bits = packet_get_int();
|
|
packet_get_bignum(client_host_key->e, &elen);
|
|
packet_get_bignum(client_host_key->n, &nlen);
|
|
|
|
if (bits != BN_num_bits(client_host_key->n))
|
|
verbose("Warning: keysize mismatch for client_host_key: "
|
|
"actual %d, announced %d", BN_num_bits(client_host_key->n), bits);
|
|
packet_integrity_check(plen, (4 + ulen) + 4 + elen + nlen, type);
|
|
|
|
authenticated = auth_rhosts_rsa(pw, client_user, client_host_key);
|
|
RSA_free(client_host_key);
|
|
|
|
snprintf(user, sizeof user, " ruser %s", client_user);
|
|
break;
|
|
|
|
case SSH_CMSG_AUTH_RSA:
|
|
if (!options.rsa_authentication) {
|
|
verbose("RSA authentication disabled.");
|
|
break;
|
|
}
|
|
/* RSA authentication requested. */
|
|
n = BN_new();
|
|
packet_get_bignum(n, &nlen);
|
|
packet_integrity_check(plen, nlen, type);
|
|
authenticated = auth_rsa(pw, n);
|
|
BN_clear_free(n);
|
|
break;
|
|
|
|
case SSH_CMSG_AUTH_PASSWORD:
|
|
if (!options.password_authentication) {
|
|
verbose("Password authentication disabled.");
|
|
break;
|
|
}
|
|
/*
|
|
* Read user password. It is in plain text, but was
|
|
* transmitted over the encrypted channel so it is
|
|
* not visible to an outside observer.
|
|
*/
|
|
password = packet_get_string(&dlen);
|
|
packet_integrity_check(plen, 4 + dlen, type);
|
|
|
|
#ifdef USE_PAM
|
|
/* Do PAM auth with password */
|
|
authenticated = auth_pam_password(pw, password);
|
|
#else /* !USE_PAM */
|
|
/* Try authentication with the password. */
|
|
authenticated = auth_password(pw, password);
|
|
#endif /* USE_PAM */
|
|
|
|
memset(password, 0, strlen(password));
|
|
xfree(password);
|
|
break;
|
|
|
|
#ifdef USE_PAM
|
|
case SSH_CMSG_AUTH_TIS:
|
|
debug("rcvd SSH_CMSG_AUTH_TIS: Trying PAM");
|
|
pam_cookie = ipam_start_auth("csshd", pw->pw_name);
|
|
/* We now have data available to send as a challenge */
|
|
if (pam_cookie->num_msg != 1 ||
|
|
(pam_cookie->msg[0]->msg_style != PAM_PROMPT_ECHO_OFF &&
|
|
pam_cookie->msg[0]->msg_style != PAM_PROMPT_ECHO_ON)) {
|
|
/* We got several challenges or an unknown challenge type */
|
|
ipam_free_cookie(pam_cookie);
|
|
pam_cookie = NULL;
|
|
break;
|
|
}
|
|
packet_start(SSH_SMSG_AUTH_TIS_CHALLENGE);
|
|
packet_put_string(pam_cookie->msg[0]->msg, strlen(pam_cookie->msg[0]->msg));
|
|
packet_send();
|
|
packet_write_wait();
|
|
continue;
|
|
case SSH_CMSG_AUTH_TIS_RESPONSE:
|
|
debug("rcvd SSH_CMSG_AUTH_TIS_RESPONSE");
|
|
if (pam_cookie == NULL)
|
|
break;
|
|
{
|
|
char *response = packet_get_string(&dlen);
|
|
|
|
packet_integrity_check(plen, 4 + dlen, type);
|
|
pam_cookie->resp[0]->resp = strdup(response);
|
|
xfree(response);
|
|
authenticated = ipam_complete_auth(pam_cookie);
|
|
ipam_free_cookie(pam_cookie);
|
|
pam_cookie = NULL;
|
|
}
|
|
break;
|
|
#elif defined(SKEY)
|
|
case SSH_CMSG_AUTH_TIS:
|
|
debug("rcvd SSH_CMSG_AUTH_TIS");
|
|
if (options.skey_authentication == 1) {
|
|
char *skeyinfo = pw ? opie_keyinfo(pw->pw_name) :
|
|
NULL;
|
|
if (skeyinfo == NULL) {
|
|
debug("generating fake skeyinfo for %.100s.", luser);
|
|
skeyinfo = skey_fake_keyinfo(luser);
|
|
}
|
|
if (skeyinfo != NULL) {
|
|
/* we send our s/key- in tis-challenge messages */
|
|
debug("sending challenge '%s'", skeyinfo);
|
|
packet_start(SSH_SMSG_AUTH_TIS_CHALLENGE);
|
|
packet_put_cstring(skeyinfo);
|
|
packet_send();
|
|
packet_write_wait();
|
|
continue;
|
|
}
|
|
}
|
|
break;
|
|
case SSH_CMSG_AUTH_TIS_RESPONSE:
|
|
debug("rcvd SSH_CMSG_AUTH_TIS_RESPONSE");
|
|
if (options.skey_authentication == 1) {
|
|
char *response = packet_get_string(&dlen);
|
|
debug("skey response == '%s'", response);
|
|
packet_integrity_check(plen, 4 + dlen, type);
|
|
authenticated = (pw != NULL &&
|
|
opie_haskey(pw->pw_name) == 0 &&
|
|
opie_passverify(pw->pw_name, response) != -1);
|
|
xfree(response);
|
|
}
|
|
break;
|
|
#else
|
|
case SSH_CMSG_AUTH_TIS:
|
|
/* TIS Authentication is unsupported */
|
|
log("TIS authentication unsupported.");
|
|
break;
|
|
#endif
|
|
#ifdef KRB5
|
|
case SSH_CMSG_HAVE_KERBEROS_TGT:
|
|
/* Passing krb5 ticket */
|
|
if (!options.krb5_tgt_passing
|
|
/*|| !options.krb5_authentication */) {
|
|
|
|
}
|
|
|
|
if (tkt_client == NULL) {
|
|
/* passing tgt without krb5 authentication */
|
|
}
|
|
|
|
{
|
|
krb5_data tgt;
|
|
u_int tgtlen;
|
|
tgt.data = packet_get_string(&tgtlen);
|
|
tgt.length = tgtlen;
|
|
|
|
if (!auth_krb5_tgt(luser, &tgt, tkt_client))
|
|
verbose ("Kerberos V5 TGT refused for %.100s", luser);
|
|
xfree(tgt.data);
|
|
|
|
break;
|
|
}
|
|
#endif /* KRB5 */
|
|
|
|
default:
|
|
/*
|
|
* Any unknown messages will be ignored (and failure
|
|
* returned) during authentication.
|
|
*/
|
|
log("Unknown message during authentication: type %d", type);
|
|
break;
|
|
}
|
|
if (authenticated && pw == NULL)
|
|
fatal("internal error: authenticated for pw == NULL");
|
|
|
|
/*
|
|
* Check if the user is logging in as root and root logins
|
|
* are disallowed.
|
|
* Note that root login is allowed for forced commands.
|
|
*/
|
|
if (authenticated && pw && pw->pw_uid == 0 && !options.permit_root_login) {
|
|
if (forced_command) {
|
|
log("Root login accepted for forced command.");
|
|
} else {
|
|
authenticated = 0;
|
|
log("ROOT LOGIN REFUSED FROM %.200s",
|
|
get_canonical_hostname());
|
|
}
|
|
}
|
|
|
|
#ifdef HAVE_LOGIN_CAP
|
|
if (pw != NULL) {
|
|
lc = login_getpwclass(pw);
|
|
if (lc == NULL)
|
|
lc = login_getclassbyname(NULL, pw);
|
|
if (!auth_hostok(lc, from_host, from_ip)) {
|
|
log("Denied connection for %.200s from %.200s [%.200s].",
|
|
pw->pw_name, from_host, from_ip);
|
|
packet_disconnect("Sorry, you are not allowed to connect.");
|
|
}
|
|
if (!auth_timeok(lc, time(NULL))) {
|
|
log("LOGIN %.200s REFUSED (TIME) FROM %.200s",
|
|
pw->pw_name, from_host);
|
|
packet_disconnect("Logins not available right now.");
|
|
}
|
|
login_close(lc);
|
|
lc = NULL;
|
|
}
|
|
#endif /* HAVE_LOGIN_CAP */
|
|
#ifdef LOGIN_ACCESS
|
|
if (pw != NULL && !login_access(pw->pw_name, from_host)) {
|
|
log("Denied connection for %.200s from %.200s [%.200s].",
|
|
pw->pw_name, from_host, from_ip);
|
|
packet_disconnect("Sorry, you are not allowed to connect.");
|
|
}
|
|
#endif /* LOGIN_ACCESS */
|
|
|
|
if (pw != NULL && pw->pw_uid == 0)
|
|
log("ROOT LOGIN as '%.100s' from %.100s",
|
|
pw->pw_name, get_canonical_hostname());
|
|
|
|
/* Raise logging level */
|
|
if (authenticated ||
|
|
attempt == AUTH_FAIL_LOG ||
|
|
type == SSH_CMSG_AUTH_PASSWORD)
|
|
authlog = log;
|
|
|
|
authlog("%s %s for %s%.100s from %.200s port %d%s",
|
|
authenticated ? "Accepted" : "Failed",
|
|
get_authname(type),
|
|
pw ? "" : "illegal user ",
|
|
pw && pw->pw_uid == 0 ? "ROOT" : luser,
|
|
get_remote_ipaddr(),
|
|
get_remote_port(),
|
|
user);
|
|
|
|
if (authenticated)
|
|
return;
|
|
|
|
#ifdef USE_PAM
|
|
if (authenticated && !do_pam_account(pw->pw_name, client_user))
|
|
authenticated = 0;
|
|
#endif
|
|
|
|
if (client_user != NULL) {
|
|
xfree(client_user);
|
|
client_user = NULL;
|
|
}
|
|
|
|
if (attempt > AUTH_FAIL_MAX)
|
|
packet_disconnect(AUTH_FAIL_MSG, luser);
|
|
|
|
/* Send a message indicating that the authentication attempt failed. */
|
|
packet_start(SSH_SMSG_FAILURE);
|
|
packet_send();
|
|
packet_write_wait();
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Performs authentication of an incoming connection. Session key has already
|
|
* been exchanged and encryption is enabled.
|
|
*/
|
|
void
|
|
do_authentication()
|
|
{
|
|
struct passwd *pw, pwcopy;
|
|
int plen;
|
|
unsigned int ulen;
|
|
char *user;
|
|
|
|
/* Get the name of the user that we wish to log in as. */
|
|
packet_read_expect(&plen, SSH_CMSG_USER);
|
|
|
|
/* Get the user name. */
|
|
user = packet_get_string(&ulen);
|
|
packet_integrity_check(plen, (4 + ulen), SSH_CMSG_USER);
|
|
|
|
setproctitle("%s", user);
|
|
|
|
#ifdef AFS
|
|
/* If machine has AFS, set process authentication group. */
|
|
if (k_hasafs()) {
|
|
k_setpag();
|
|
k_unlog();
|
|
}
|
|
#endif /* AFS */
|
|
|
|
/* Verify that the user is a valid user. */
|
|
pw = getpwnam(user);
|
|
if (pw && allowed_user(pw)) {
|
|
/* Take a copy of the returned structure. */
|
|
memset(&pwcopy, 0, sizeof(pwcopy));
|
|
pwcopy.pw_name = xstrdup(pw->pw_name);
|
|
pwcopy.pw_passwd = xstrdup(pw->pw_passwd);
|
|
pwcopy.pw_uid = pw->pw_uid;
|
|
pwcopy.pw_gid = pw->pw_gid;
|
|
pwcopy.pw_class = xstrdup(pw->pw_class);
|
|
pwcopy.pw_dir = xstrdup(pw->pw_dir);
|
|
pwcopy.pw_shell = xstrdup(pw->pw_shell);
|
|
pwcopy.pw_expire = pw->pw_expire;
|
|
pwcopy.pw_change = pw->pw_change;
|
|
pw = &pwcopy;
|
|
} else {
|
|
pw = NULL;
|
|
}
|
|
|
|
#ifdef USE_PAM
|
|
if (pw != NULL)
|
|
start_pam(pw);
|
|
#endif
|
|
/*
|
|
* If we are not running as root, the user must have the same uid as
|
|
* the server.
|
|
*/
|
|
if (getuid() != 0 && pw && pw->pw_uid != getuid())
|
|
packet_disconnect("Cannot change user when server not running as root.");
|
|
|
|
debug("Attempting authentication for %s%.100s.", pw ? "" : "illegal user ", user);
|
|
|
|
/* If the user has no password, accept authentication immediately. */
|
|
if (options.password_authentication &&
|
|
#ifdef KRB5
|
|
!options.kerberos_authentication &&
|
|
#endif /* KRB5 */
|
|
#ifdef KRB4
|
|
(!options.kerberos_authentication || options.krb4_or_local_passwd) &&
|
|
#endif /* KRB4 */
|
|
#ifdef USE_PAM
|
|
auth_pam_password(pw, "")
|
|
#else /* !USE_PAM */
|
|
auth_password(pw, "")
|
|
#endif /* USE_PAM */
|
|
) {
|
|
/* Authentication with empty password succeeded. */
|
|
log("Login for user %s from %.100s, accepted without authentication.",
|
|
user, get_remote_ipaddr());
|
|
} else {
|
|
/* Loop until the user has been authenticated or the
|
|
connection is closed, do_authloop() returns only if
|
|
authentication is successfull */
|
|
do_authloop(pw, user);
|
|
}
|
|
if (pw == NULL)
|
|
fatal("internal error, authentication successfull for user '%.100s'", user);
|
|
|
|
/* The user has been authenticated and accepted. */
|
|
packet_start(SSH_SMSG_SUCCESS);
|
|
packet_send();
|
|
packet_write_wait();
|
|
|
|
/* Perform session preparation. */
|
|
do_authenticated(pw);
|
|
}
|