sys/netproto/ncp/ncp_login.c

   1 /*
   2  * Copyright (c) 1999, Boris Popov
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   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.
  13  * 3. All advertising materials mentioning features or use of this software
  14  *    must display the following acknowledgement:
  15  *    This product includes software developed by Boris Popov.
  16  * 4. Neither the name of the author nor the names of any co-contributors
  17  *    may be used to endorse or promote products derived from this software
  18  *    without specific prior written permission.
  19  *
  20  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  23  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  30  * SUCH DAMAGE.
  31  *
  32  * $FreeBSD: src/sys/netncp/ncp_login.c,v 1.2 1999/10/12 10:36:59 bp Exp $
  33  */
  34 #include <sys/param.h>
  35 #include <sys/errno.h>
  36 #include <sys/malloc.h>
  37 #include <sys/systm.h>
  38 #include <sys/proc.h>
  39 #include <sys/socket.h>
  40
  41 #include <netncp/ncp.h>
  42 #include <netncp/ncp_conn.h>
  43 #include <netncp/ncp_subr.h>
  44 #include <netncp/ncp_ncp.h>
  45 #include <netncp/ncp_rq.h>
  46 #include <netncp/ncp_nls.h>
  47 #include <netncp/nwerror.h>
  48
  49 static int  ncp_login_encrypted(struct ncp_conn *conn, struct ncp_bindery_object *object,
  50                     unsigned char *key, unsigned char *passwd,
  51                     struct proc *p, struct ucred *cred);
  52 static int ncp_login_unencrypted(struct ncp_conn *conn, u_int16_t object_type,
  53                     char *object_name, unsigned char *passwd,
  54                     struct proc *p, struct ucred *cred);
  55 static int  ncp_sign_start(struct ncp_conn *conn, char *logindata);
  56 static int  ncp_get_encryption_key(struct ncp_conn *conn, char *target);
  57
  58 /*
  59  * Initialize packet signatures. They a slightly modified MD4.
  60  * The first 16 bytes of logindata are the shuffled password,
  61  * the last 8 bytes the encryption key as received from the server.
  62  */
  63 int
  64 ncp_sign_start(struct ncp_conn *conn, char *logindata) {
  65         char msg[64];
  66         u_int32_t state[4];
  67
  68         memcpy(msg, logindata, 24);
  69         memcpy(msg + 24, "Authorized NetWare Client", 25);
  70         bzero(msg + 24 + 25, sizeof(msg) - 24 - 25);
  71
  72         conn->sign_state[0] = 0x67452301;
  73         conn->sign_state[1] = 0xefcdab89;
  74         conn->sign_state[2] = 0x98badcfe;
  75         conn->sign_state[3] = 0x10325476;
  76         ncp_sign(conn->sign_state, msg, state);
  77         conn->sign_root[0] = state[0];
  78         conn->sign_root[1] = state[1];
  79         conn->flags |= NCPFL_SIGNACTIVE;
  80         return 0;
  81 }
  82
  83 /*
  84  * target is a 8-byte buffer
  85  */
  86 int
  87 ncp_get_encryption_key(struct ncp_conn *conn, char *target) {
  88         int error;
  89         DECLARE_RQ;
  90
  91         NCP_RQ_HEAD_S(23,23,conn->procp,conn->ucred);
  92         checkbad(ncp_request(conn,rqp));
  93         if (rqp->rpsize < 8) {
  94                 NCPFATAL("rpsize=%d < 8\n", rqp->rpsize);
  95                 return EIO;
  96         }
  97         ncp_rp_mem(rqp, target, 8);
  98         NCP_RQ_EXIT;
  99         return error;
 100 }
 101
 102 int
 103 ncp_login_object(struct ncp_conn *conn, unsigned char *username,
 104                 int login_type, unsigned char *password,
 105                 struct proc *p,struct ucred *cred)
 106 {
 107         int error;
 108         unsigned char ncp_key[8];
 109         struct ncp_bindery_object user;
 110
 111         if ((error = ncp_get_encryption_key(conn, ncp_key)) != 0) {
 112                 printf("%s: Warning: use unencrypted login\n", __FUNCTION__);
 113                 return ncp_login_unencrypted(conn, login_type, username, password,p,cred);
 114         }
 115         if ((error = ncp_get_bindery_object_id(conn, login_type, username, &user,p,cred)) != 0) {
 116                 return error;
 117         }
 118         error = ncp_login_encrypted(conn, &user, ncp_key, password,p,cred);
 119         return error;
 120 }
 121
 122 int
 123 ncp_login_encrypted(struct ncp_conn *conn, struct ncp_bindery_object *object,
 124                     unsigned char *key, unsigned char *passwd,
 125                     struct proc *p,struct ucred *cred) {
 126         u_int32_t tmpID = htonl(object->object_id);
 127         u_char buf[16 + 8];
 128         u_char encrypted[8];
 129         int error;
 130         DECLARE_RQ;
 131
 132         nw_keyhash((u_char*)&tmpID, passwd, strlen(passwd), buf);
 133         nw_encrypt(key, buf, encrypted);
 134
 135         NCP_RQ_HEAD_S(23,24,p,cred);
 136         ncp_rq_mem(rqp, encrypted, 8);
 137         ncp_rq_word_hl(rqp, object->object_type);
 138         ncp_rq_pstring(rqp, object->object_name);
 139         error = ncp_request(conn, rqp);
 140         NCP_RQ_EXIT_NB;
 141         if (conn->flags & NCPFL_SIGNWANTED) {
 142                 if (error == 0 || error == NWE_PASSWORD_EXPIRED) {
 143                         memcpy(buf + 16, key, 8);
 144                         error = ncp_sign_start(conn, buf);
 145                 }
 146         }
 147         return error;
 148 }
 149
 150 int
 151 ncp_login_unencrypted(struct ncp_conn *conn, u_int16_t object_type,
 152                     char *object_name, unsigned char *passwd,
 153                     struct proc *p, struct ucred *cred)
 154 {
 155         int error;
 156         DECLARE_RQ;
 157
 158         NCP_RQ_HEAD_S(23,20,conn->procp,conn->ucred);
 159         ncp_rq_word_hl(rqp, object_type);
 160         ncp_rq_pstring(rqp, object_name);
 161         ncp_rq_pstring(rqp, passwd);
 162         error = ncp_request(conn,rqp);
 163         NCP_RQ_EXIT_NB;
 164         return error;
 165 }
 166
 167 /*
 168  * Login to specified server with username and password.
 169  * conn should be locked.
 170  */
 171 int
 172 ncp_login(struct ncp_conn *conn, char *user, int objtype, char *password,
 173           struct proc *p, struct ucred *cred) {
 174         int error;
 175
 176         if (ncp_suser(cred) != 0 && cred->cr_uid != conn->nc_owner->cr_uid)
 177                 return EACCES;
 178         if (conn->flags & NCPFL_LOGGED) return EALREADY;
 179         if ((conn->flags & NCPFL_ATTACHED) == 0) return ENOTCONN;
 180         conn->li.user = ncp_str_dup(user);
 181         conn->li.password = ncp_str_dup(password);
 182         if (conn->li.user == NULL || conn->li.password == NULL) {
 183                 error = EINVAL;
 184                 goto bad;
 185         }
 186         ncp_str_upper(conn->li.user);
 187         if ((conn->li.opt & NCP_OPT_NOUPCASEPASS) == 0)
 188                 ncp_str_upper(conn->li.password);
 189         checkbad(ncp_login_object(conn, conn->li.user, objtype, conn->li.password,p,cred));
 190         conn->li.objtype = objtype;
 191         conn->flags |= NCPFL_LOGGED;
 192         return 0;
 193 bad:
 194         if (conn->li.user) free(conn->li.user, M_NCPDATA);
 195         if (conn->li.password) free(conn->li.password, M_NCPDATA);
 196         conn->li.user = conn->li.password = NULL;
 197         return error;
 198 }