]> git.ozlabs.org Git - ppp.git/blobdiff - pppd/chap_ms.c
squish a compile warning
[ppp.git] / pppd / chap_ms.c
index e9946c9d8d6544fd770fd9406189e5a52af3b05b..9a87122f3451e6de051cbe0f3e0818b502b4cbd7 100644 (file)
  *   Implemented MS-CHAPv2 functionality, heavily based on sample
  *   implementation in RFC 2759.  Implemented MPPE functionality,
  *   heavily based on sample implementation in RFC 3079.
- *   Copyright (c) 2002 Google, Inc.
+ *
+ * Copyright (c) 2002 Google, Inc.  All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ *
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ *
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in
+ *    the documentation and/or other materials provided with the
+ *    distribution.
+ *
+ * 3. The name(s) of the authors of this software must not be used to
+ *    endorse or promote products derived from this software without
+ *    prior written permission.
+ *
+ * THE AUTHORS OF THIS SOFTWARE DISCLAIM ALL WARRANTIES WITH REGARD TO
+ * THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
+ * AND FITNESS, IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY
+ * SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+ * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN
+ * AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
+ * OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+ *
  */
 
-#define RCSID  "$Id: chap_ms.c,v 1.25 2002/12/04 23:03:32 paulus Exp $"
+#define RCSID  "$Id: chap_ms.c,v 1.33 2004/11/12 09:57:43 paulus Exp $"
 
 #ifdef CHAPMS
 
 #include <unistd.h>
 
 #include "pppd.h"
-#include "chap.h"
+#include "chap-new.h"
 #include "chap_ms.h"
 #include "md4.h"
 #include "sha1.h"
 #include "pppcrypt.h"
+#include "magic.h"
 
 static const char rcsid[] = RCSID;
 
 
-static void    ChallengeHash __P((u_char[16], u_char *, char *, u_char[8]));
 static void    ascii2unicode __P((char[], int, u_char[]));
 static void    NTPasswordHash __P((char *, int, u_char[MD4_SIGNATURE_SIZE]));
 static void    ChallengeResponse __P((u_char *, u_char *, u_char[24]));
 static void    ChapMS_NT __P((u_char *, char *, int, u_char[24]));
 static void    ChapMS2_NT __P((char *, u_char[16], char *, char *, int,
                                u_char[24]));
-static void    GenerateAuthenticatorResponse __P((char*, int, u_char[24],
-                                                  u_char[16], u_char *,
-                                                  char *, u_char[41]));
+static void    GenerateAuthenticatorResponsePlain
+                       __P((char*, int, u_char[24], u_char[16], u_char *,
+                            char *, u_char[41]));
 #ifdef MSLANMAN
 static void    ChapMS_LANMan __P((u_char *, char *, int, MS_ChapResponse *));
 #endif
@@ -89,8 +115,6 @@ static void  Set_Start_Key __P((u_char *, char *, int));
 static void    SetMasterKeys __P((char *, int, u_char[24], int));
 #endif
 
-extern double drand48 __P((void));
-
 #ifdef MSLANMAN
 bool   ms_lanman = 0;          /* Use LanMan password instead of NT */
                                /* Has meaning only with MS-CHAP challenges */
@@ -99,8 +123,326 @@ bool       ms_lanman = 0;          /* Use LanMan password instead of NT */
 #ifdef MPPE
 u_char mppe_send_key[MPPE_MAX_KEY_LEN];
 u_char mppe_recv_key[MPPE_MAX_KEY_LEN];
+int mppe_keys_set = 0;         /* Have the MPPE keys been set? */
+
+#ifdef DEBUGMPPEKEY
+/* For MPPE debug */
+/* Use "[]|}{?/><,`!2&&(" (sans quotes) for RFC 3079 MS-CHAPv2 test value */
+static char *mschap_challenge = NULL;
+/* Use "!@\#$%^&*()_+:3|~" (sans quotes, backslash is to escape #) for ... */
+static char *mschap2_peer_challenge = NULL;
 #endif
 
+#include "fsm.h"               /* Need to poke MPPE options */
+#include "ccp.h"
+#include <net/ppp-comp.h>
+#endif
+
+/*
+ * Command-line options.
+ */
+static option_t chapms_option_list[] = {
+#ifdef MSLANMAN
+       { "ms-lanman", o_bool, &ms_lanman,
+         "Use LanMan passwd when using MS-CHAP", 1 },
+#endif
+#ifdef DEBUGMPPEKEY
+       { "mschap-challenge", o_string, &mschap_challenge,
+         "specify CHAP challenge" },
+       { "mschap2-peer-challenge", o_string, &mschap2_peer_challenge,
+         "specify CHAP peer challenge" },
+#endif
+       { NULL }
+};
+
+/*
+ * chapms_generate_challenge - generate a challenge for MS-CHAP.
+ * For MS-CHAP the challenge length is fixed at 8 bytes.
+ * The length goes in challenge[0] and the actual challenge starts
+ * at challenge[1].
+ */
+static void
+chapms_generate_challenge(unsigned char *challenge)
+{
+       *challenge++ = 8;
+#ifdef DEBUGMPPEKEY
+       if (mschap_challenge && strlen(mschap_challenge) == 8)
+               memcpy(challenge, mschap_challenge, 8);
+       else
+#endif
+               random_bytes(challenge, 8);
+}
+
+static void
+chapms2_generate_challenge(unsigned char *challenge)
+{
+       *challenge++ = 16;
+#ifdef DEBUGMPPEKEY
+       if (mschap_challenge && strlen(mschap_challenge) == 16)
+               memcpy(challenge, mschap_challenge, 16);
+       else
+#endif
+               random_bytes(challenge, 16);
+}
+
+static int
+chapms_verify_response(int id, char *name,
+                      unsigned char *secret, int secret_len,
+                      unsigned char *challenge, unsigned char *response,
+                      char *message, int message_space)
+{
+       MS_ChapResponse *rmd;
+       MS_ChapResponse md;
+       int diff;
+       int challenge_len, response_len;
+
+       challenge_len = *challenge++;   /* skip length, is 8 */
+       response_len = *response++;
+       if (response_len != MS_CHAP_RESPONSE_LEN)
+               goto bad;
+
+       rmd = (MS_ChapResponse *) response;
+
+#ifndef MSLANMAN
+       if (!rmd->UseNT[0]) {
+               /* Should really propagate this into the error packet. */
+               notice("Peer request for LANMAN auth not supported");
+               goto bad;
+       }
+#endif
+
+       /* Generate the expected response. */
+       ChapMS(challenge, (char *)secret, secret_len, &md);
+
+#ifdef MSLANMAN
+       /* Determine which part of response to verify against */
+       if (!rmd->UseNT[0])
+               diff = memcmp(&rmd->LANManResp, &md.LANManResp,
+                             sizeof(md.LANManResp));
+       else
+#endif
+               diff = memcmp(&rmd->NTResp, &md.NTResp, sizeof(md.NTResp));
+
+       if (diff == 0) {
+               slprintf(message, message_space, "Access granted");
+               return 1;
+       }
+
+ bad:
+       /* See comments below for MS-CHAP V2 */
+       slprintf(message, message_space, "E=691 R=1 C=%0.*B V=0",
+                challenge_len, challenge);
+       return 0;
+}
+
+static int
+chapms2_verify_response(int id, char *name,
+                       unsigned char *secret, int secret_len,
+                       unsigned char *challenge, unsigned char *response,
+                       char *message, int message_space)
+{
+       MS_Chap2Response *rmd;
+       MS_Chap2Response md;
+       char saresponse[MS_AUTH_RESPONSE_LENGTH+1];
+       int challenge_len, response_len;
+
+       challenge_len = *challenge++;   /* skip length, is 16 */
+       response_len = *response++;
+       if (response_len != MS_CHAP2_RESPONSE_LEN)
+               goto bad;       /* not even the right length */
+
+       rmd = (MS_Chap2Response *) response;
+
+       /* Generate the expected response and our mutual auth. */
+       ChapMS2(challenge, rmd->PeerChallenge, name,
+               (char *)secret, secret_len, &md,
+               (unsigned char *)saresponse, MS_CHAP2_AUTHENTICATOR);
+
+       /* compare MDs and send the appropriate status */
+       /*
+        * Per RFC 2759, success message must be formatted as
+        *     "S=<auth_string> M=<message>"
+        * where
+        *     <auth_string> is the Authenticator Response (mutual auth)
+        *     <message> is a text message
+        *
+        * However, some versions of Windows (win98 tested) do not know
+        * about the M=<message> part (required per RFC 2759) and flag
+        * it as an error (reported incorrectly as an encryption error
+        * to the user).  Since the RFC requires it, and it can be
+        * useful information, we supply it if the peer is a conforming
+        * system.  Luckily (?), win98 sets the Flags field to 0x04
+        * (contrary to RFC requirements) so we can use that to
+        * distinguish between conforming and non-conforming systems.
+        *
+        * Special thanks to Alex Swiridov <say@real.kharkov.ua> for
+        * help debugging this.
+        */
+       if (memcmp(md.NTResp, rmd->NTResp, sizeof(md.NTResp)) == 0) {
+               if (rmd->Flags[0])
+                       slprintf(message, message_space, "S=%s", saresponse);
+               else
+                       slprintf(message, message_space, "S=%s M=%s",
+                                saresponse, "Access granted");
+               return 1;
+       }
+
+ bad:
+       /*
+        * Failure message must be formatted as
+        *     "E=e R=r C=c V=v M=m"
+        * where
+        *     e = error code (we use 691, ERROR_AUTHENTICATION_FAILURE)
+        *     r = retry (we use 1, ok to retry)
+        *     c = challenge to use for next response, we reuse previous
+        *     v = Change Password version supported, we use 0
+        *     m = text message
+        *
+        * The M=m part is only for MS-CHAPv2.  Neither win2k nor
+        * win98 (others untested) display the message to the user anyway.
+        * They also both ignore the E=e code.
+        *
+        * Note that it's safe to reuse the same challenge as we don't
+        * actually accept another response based on the error message
+        * (and no clients try to resend a response anyway).
+        *
+        * Basically, this whole bit is useless code, even the small
+        * implementation here is only because of overspecification.
+        */
+       slprintf(message, message_space, "E=691 R=1 C=%0.*B V=0 M=%s",
+                challenge_len, challenge, "Access denied");
+       return 0;
+}
+
+static void
+chapms_make_response(unsigned char *response, int id, char *our_name,
+                    unsigned char *challenge, char *secret, int secret_len,
+                    unsigned char *private)
+{
+       challenge++;    /* skip length, should be 8 */
+       *response++ = MS_CHAP_RESPONSE_LEN;
+       ChapMS(challenge, secret, secret_len, (MS_ChapResponse *) response);
+}
+
+static void
+chapms2_make_response(unsigned char *response, int id, char *our_name,
+                     unsigned char *challenge, char *secret, int secret_len,
+                     unsigned char *private)
+{
+       challenge++;    /* skip length, should be 16 */
+       *response++ = MS_CHAP2_RESPONSE_LEN;
+       ChapMS2(challenge,
+#ifdef DEBUGMPPEKEY
+               mschap2_peer_challenge,
+#else
+               NULL,
+#endif
+               our_name, secret, secret_len,
+               (MS_Chap2Response *) response, private,
+               MS_CHAP2_AUTHENTICATEE);
+}
+
+static int
+chapms2_check_success(unsigned char *msg, int len, unsigned char *private)
+{
+       if ((len < MS_AUTH_RESPONSE_LENGTH + 2) ||
+           strncmp((char *)msg, "S=", 2) != 0) {
+               /* Packet does not start with "S=" */
+               error("MS-CHAPv2 Success packet is badly formed.");
+               return 0;
+       }
+       msg += 2;
+       len -= 2;
+       if (len < MS_AUTH_RESPONSE_LENGTH
+           || memcmp(msg, private, MS_AUTH_RESPONSE_LENGTH)) {
+               /* Authenticator Response did not match expected. */
+               error("MS-CHAPv2 mutual authentication failed.");
+               return 0;
+       }
+       /* Authenticator Response matches. */
+       msg += MS_AUTH_RESPONSE_LENGTH; /* Eat it */
+       len -= MS_AUTH_RESPONSE_LENGTH;
+       if ((len >= 3) && !strncmp((char *)msg, " M=", 3)) {
+               msg += 3; /* Eat the delimiter */
+       } else if (len) {
+               /* Packet has extra text which does not begin " M=" */
+               error("MS-CHAPv2 Success packet is badly formed.");
+               return 0;
+       }
+       return 1;
+}
+
+static void
+chapms_handle_failure(unsigned char *inp, int len)
+{
+       int err;
+       char *p, *msg;
+
+       /* We want a null-terminated string for strxxx(). */
+       msg = malloc(len + 1);
+       if (!msg) {
+               notice("Out of memory in chapms_handle_failure");
+               return;
+       }
+       BCOPY(inp, msg, len);
+       msg[len] = 0;
+       p = msg;
+
+       /*
+        * Deal with MS-CHAP formatted failure messages; just print the
+        * M=<message> part (if any).  For MS-CHAP we're not really supposed
+        * to use M=<message>, but it shouldn't hurt.  See
+        * chapms[2]_verify_response.
+        */
+       if (!strncmp(p, "E=", 2))
+               err = strtol(p, NULL, 10); /* Remember the error code. */
+       else
+               goto print_msg; /* Message is badly formatted. */
+
+       if (len && ((p = strstr(p, " M=")) != NULL)) {
+               /* M=<message> field found. */
+               p += 3;
+       } else {
+               /* No M=<message>; use the error code. */
+               switch (err) {
+               case MS_CHAP_ERROR_RESTRICTED_LOGON_HOURS:
+                       p = "E=646 Restricted logon hours";
+                       break;
+
+               case MS_CHAP_ERROR_ACCT_DISABLED:
+                       p = "E=647 Account disabled";
+                       break;
+
+               case MS_CHAP_ERROR_PASSWD_EXPIRED:
+                       p = "E=648 Password expired";
+                       break;
+
+               case MS_CHAP_ERROR_NO_DIALIN_PERMISSION:
+                       p = "E=649 No dialin permission";
+                       break;
+
+               case MS_CHAP_ERROR_AUTHENTICATION_FAILURE:
+                       p = "E=691 Authentication failure";
+                       break;
+
+               case MS_CHAP_ERROR_CHANGING_PASSWORD:
+                       /* Should never see this, we don't support Change Password. */
+                       p = "E=709 Error changing password";
+                       break;
+
+               default:
+                       free(msg);
+                       error("Unknown MS-CHAP authentication failure: %.*v",
+                             len, inp);
+                       return;
+               }
+       }
+print_msg:
+       if (p != NULL)
+               error("MS-CHAP authentication failed: %v", p);
+       free(msg);
+}
+
 static void
 ChallengeResponse(u_char *challenge,
                  u_char PasswordHash[MD4_SIGNATURE_SIZE],
@@ -128,7 +470,7 @@ ChallengeResponse(u_char *challenge,
 #endif
 }
 
-static void
+void
 ChallengeHash(u_char PeerChallenge[16], u_char *rchallenge,
              char *username, u_char Challenge[8])
     
@@ -146,7 +488,7 @@ ChallengeHash(u_char PeerChallenge[16], u_char *rchallenge,
     SHA1_Init(&sha1Context);
     SHA1_Update(&sha1Context, PeerChallenge, 16);
     SHA1_Update(&sha1Context, rchallenge, 16);
-    SHA1_Update(&sha1Context, user, strlen(user));
+    SHA1_Update(&sha1Context, (unsigned char *)user, strlen(user));
     SHA1_Final(sha1Hash, &sha1Context);
 
     BCOPY(sha1Hash, Challenge, 8);
@@ -181,7 +523,7 @@ NTPasswordHash(char *secret, int secret_len, u_char hash[MD4_SIGNATURE_SIZE])
     MD4_CTX            md4Context;
 
     MD4Init(&md4Context);
-    MD4Update(&md4Context, secret, mdlen);
+    MD4Update(&md4Context, (unsigned char *)secret, mdlen);
     MD4Final(hash, &md4Context);
 
 }
@@ -195,7 +537,7 @@ ChapMS_NT(u_char *rchallenge, char *secret, int secret_len,
 
     /* Hash the Unicode version of the secret (== password). */
     ascii2unicode(secret, secret_len, unicodePassword);
-    NTPasswordHash(unicodePassword, secret_len * 2, PasswordHash);
+    NTPasswordHash((char *)unicodePassword, secret_len * 2, PasswordHash);
 
     ChallengeResponse(rchallenge, PasswordHash, NTResponse);
 }
@@ -208,11 +550,12 @@ ChapMS2_NT(char *rchallenge, u_char PeerChallenge[16], char *username,
     u_char     PasswordHash[MD4_SIGNATURE_SIZE];
     u_char     Challenge[8];
 
-    ChallengeHash(PeerChallenge, rchallenge, username, Challenge);
+    ChallengeHash(PeerChallenge, (unsigned char *)rchallenge, username,
+                 Challenge);
 
     /* Hash the Unicode version of the secret (== password). */
     ascii2unicode(secret, secret_len, unicodePassword);
-    NTPasswordHash(unicodePassword, secret_len * 2, PasswordHash);
+    NTPasswordHash((char *)unicodePassword, secret_len * 2, PasswordHash);
 
     ChallengeResponse(Challenge, PasswordHash, NTResponse);
 }
@@ -241,8 +584,8 @@ ChapMS_LANMan(u_char *rchallenge, char *secret, int secret_len,
 #endif
 
 
-static void
-GenerateAuthenticatorResponse(char *secret, int secret_len,
+void
+GenerateAuthenticatorResponse(u_char PasswordHashHash[MD4_SIGNATURE_SIZE],
                              u_char NTResponse[24], u_char PeerChallenge[16],
                              u_char *rchallenge, char *username,
                              u_char authResponse[MS_AUTH_RESPONSE_LENGTH+1])
@@ -264,19 +607,11 @@ GenerateAuthenticatorResponse(char *secret, int secret_len,
 
     int                i;
     SHA1_CTX   sha1Context;
-    u_char     unicodePassword[MAX_NT_PASSWORD * 2];
-    u_char     PasswordHash[MD4_SIGNATURE_SIZE];
-    u_char     PasswordHashHash[MD4_SIGNATURE_SIZE];
     u_char     Digest[SHA1_SIGNATURE_SIZE];
     u_char     Challenge[8];
 
-    /* Hash (x2) the Unicode version of the secret (== password). */
-    ascii2unicode(secret, secret_len, unicodePassword);
-    NTPasswordHash(unicodePassword, secret_len * 2, PasswordHash);
-    NTPasswordHash(PasswordHash, sizeof(PasswordHash), PasswordHashHash);
-
     SHA1_Init(&sha1Context);
-    SHA1_Update(&sha1Context, PasswordHashHash, sizeof(PasswordHashHash));
+    SHA1_Update(&sha1Context, PasswordHashHash, MD4_SIGNATURE_SIZE);
     SHA1_Update(&sha1Context, NTResponse, 24);
     SHA1_Update(&sha1Context, Magic1, sizeof(Magic1));
     SHA1_Final(Digest, &sha1Context);
@@ -291,7 +626,29 @@ GenerateAuthenticatorResponse(char *secret, int secret_len,
 
     /* Convert to ASCII hex string. */
     for (i = 0; i < MAX((MS_AUTH_RESPONSE_LENGTH / 2), sizeof(Digest)); i++)
-       sprintf(&authResponse[i * 2], "%02X", Digest[i]);
+       sprintf((char *)&authResponse[i * 2], "%02X", Digest[i]);
+}
+
+
+static void
+GenerateAuthenticatorResponsePlain
+               (char *secret, int secret_len,
+                u_char NTResponse[24], u_char PeerChallenge[16],
+                u_char *rchallenge, char *username,
+                u_char authResponse[MS_AUTH_RESPONSE_LENGTH+1])
+{
+    u_char     unicodePassword[MAX_NT_PASSWORD * 2];
+    u_char     PasswordHash[MD4_SIGNATURE_SIZE];
+    u_char     PasswordHashHash[MD4_SIGNATURE_SIZE];
+
+    /* Hash (x2) the Unicode version of the secret (== password). */
+    ascii2unicode(secret, secret_len, unicodePassword);
+    NTPasswordHash((char *)unicodePassword, secret_len * 2, PasswordHash);
+    NTPasswordHash((char *)PasswordHash, sizeof(PasswordHash),
+                  PasswordHashHash);
+
+    GenerateAuthenticatorResponse(PasswordHashHash, NTResponse, PeerChallenge,
+                                 rchallenge, username, authResponse);
 }
 
 
@@ -315,6 +672,8 @@ mppe_set_keys(u_char *rchallenge, u_char PasswordHashHash[MD4_SIGNATURE_SIZE])
     /* Same key in both directions. */
     BCOPY(Digest, mppe_send_key, sizeof(mppe_send_key));
     BCOPY(Digest, mppe_recv_key, sizeof(mppe_recv_key));
+
+    mppe_keys_set = 1;
 }
 
 /*
@@ -337,14 +696,15 @@ Set_Start_Key(u_char *rchallenge, char *secret, int secret_len)
 
 /*
  * Set mppe_xxxx_key from MS-CHAPv2 credentials. (see RFC 3079)
+ *
+ * This helper function used in the Winbind module, which gets the
+ * NTHashHash from the server.
  */
-static void
-SetMasterKeys(char *secret, int secret_len, u_char NTResponse[24], int IsServer)
+void
+mppe_set_keys2(u_char PasswordHashHash[MD4_SIGNATURE_SIZE],
+              u_char NTResponse[24], int IsServer)
 {
     SHA1_CTX   sha1Context;
-    u_char     unicodePassword[MAX_NT_PASSWORD * 2];
-    u_char     PasswordHash[MD4_SIGNATURE_SIZE];
-    u_char     PasswordHashHash[MD4_SIGNATURE_SIZE];
     u_char     MasterKey[SHA1_SIGNATURE_SIZE]; /* >= MPPE_MAX_KEY_LEN */
     u_char     Digest[SHA1_SIGNATURE_SIZE];    /* >= MPPE_MAX_KEY_LEN */
 
@@ -390,13 +750,8 @@ SetMasterKeys(char *secret, int secret_len, u_char NTResponse[24], int IsServer)
          0x6b, 0x65, 0x79, 0x2e };
     u_char *s;
 
-    /* Hash (x2) the Unicode version of the secret (== password). */
-    ascii2unicode(secret, secret_len, unicodePassword);
-    NTPasswordHash(unicodePassword, secret_len * 2, PasswordHash);
-    NTPasswordHash(PasswordHash, sizeof(PasswordHash), PasswordHashHash);
-
     SHA1_Init(&sha1Context);
-    SHA1_Update(&sha1Context, PasswordHashHash, sizeof(PasswordHashHash));
+    SHA1_Update(&sha1Context, PasswordHashHash, MD4_SIGNATURE_SIZE);
     SHA1_Update(&sha1Context, NTResponse, 24);
     SHA1_Update(&sha1Context, Magic1, sizeof(Magic1));
     SHA1_Final(MasterKey, &sha1Context);
@@ -432,18 +787,33 @@ SetMasterKeys(char *secret, int secret_len, u_char NTResponse[24], int IsServer)
     SHA1_Final(Digest, &sha1Context);
 
     BCOPY(Digest, mppe_recv_key, sizeof(mppe_recv_key));
+
+    mppe_keys_set = 1;
+}
+
+/*
+ * Set mppe_xxxx_key from MS-CHAPv2 credentials. (see RFC 3079)
+ */
+static void
+SetMasterKeys(char *secret, int secret_len, u_char NTResponse[24], int IsServer)
+{
+    u_char     unicodePassword[MAX_NT_PASSWORD * 2];
+    u_char     PasswordHash[MD4_SIGNATURE_SIZE];
+    u_char     PasswordHashHash[MD4_SIGNATURE_SIZE];
+    /* Hash (x2) the Unicode version of the secret (== password). */
+    ascii2unicode(secret, secret_len, unicodePassword);
+    NTPasswordHash(unicodePassword, secret_len * 2, PasswordHash);
+    NTPasswordHash(PasswordHash, sizeof(PasswordHash), PasswordHashHash);
+    mppe_set_keys2(PasswordHashHash, NTResponse, IsServer);
 }
 
 #endif /* MPPE */
 
 
 void
-ChapMS(chap_state *cstate, u_char *rchallenge, char *secret, int secret_len,
+ChapMS(u_char *rchallenge, char *secret, int secret_len,
        MS_ChapResponse *response)
 {
-#if 0
-    CHAPDEBUG((LOG_INFO, "ChapMS: secret is '%.*s'", secret_len, secret));
-#endif
     BZERO(response, sizeof(*response));
 
     ChapMS_NT(rchallenge, secret, secret_len, response->NTResp);
@@ -457,8 +827,6 @@ ChapMS(chap_state *cstate, u_char *rchallenge, char *secret, int secret_len,
     response->UseNT[0] = 1;
 #endif
 
-    cstate->resp_length = MS_CHAP_RESPONSE_LEN;
-
 #ifdef MPPE
     Set_Start_Key(rchallenge, secret, secret_len);
 #endif
@@ -476,9 +844,9 @@ ChapMS(chap_state *cstate, u_char *rchallenge, char *secret, int secret_len,
  * Authenticator Response.
  */
 void
-ChapMS2(chap_state *cstate, u_char *rchallenge, u_char *PeerChallenge,
+ChapMS2(u_char *rchallenge, u_char *PeerChallenge,
        char *user, char *secret, int secret_len, MS_Chap2Response *response,
-       u_char authResponse[MS_AUTH_RESPONSE_LENGTH+1], int authenticator)
+       u_char authResponse[], int authenticator)
 {
     /* ARGSUSED */
     u_char *p = response->PeerChallenge;
@@ -495,20 +863,76 @@ ChapMS2(chap_state *cstate, u_char *rchallenge, u_char *PeerChallenge,
              sizeof(response->PeerChallenge));
 
     /* Generate the NT-Response */
-    ChapMS2_NT(rchallenge, response->PeerChallenge, user,
+    ChapMS2_NT((char *)rchallenge, response->PeerChallenge, user,
               secret, secret_len, response->NTResp);
 
     /* Generate the Authenticator Response. */
-    GenerateAuthenticatorResponse(secret, secret_len, response->NTResp,
-                                 response->PeerChallenge, rchallenge,
-                                 user, authResponse);
-
-    cstate->resp_length = MS_CHAP2_RESPONSE_LEN;
+    GenerateAuthenticatorResponsePlain(secret, secret_len, response->NTResp,
+                                      response->PeerChallenge, rchallenge,
+                                      user, authResponse);
 
 #ifdef MPPE
     SetMasterKeys(secret, secret_len, response->NTResp, authenticator);
 #endif
 }
 
+#ifdef MPPE
+/*
+ * Set MPPE options from plugins.
+ */
+void
+set_mppe_enc_types(int policy, int types)
+{
+    /* Early exit for unknown policies. */
+    if (policy != MPPE_ENC_POL_ENC_ALLOWED ||
+       policy != MPPE_ENC_POL_ENC_REQUIRED)
+       return;
+
+    /* Don't modify MPPE if it's optional and wasn't already configured. */
+    if (policy == MPPE_ENC_POL_ENC_ALLOWED && !ccp_wantoptions[0].mppe)
+       return;
+
+    /*
+     * Disable undesirable encryption types.  Note that we don't ENABLE
+     * any encryption types, to avoid overriding manual configuration.
+     */
+    switch(types) {
+       case MPPE_ENC_TYPES_RC4_40:
+           ccp_wantoptions[0].mppe &= ~MPPE_OPT_128;   /* disable 128-bit */
+           break;
+       case MPPE_ENC_TYPES_RC4_128:
+           ccp_wantoptions[0].mppe &= ~MPPE_OPT_40;    /* disable 40-bit */
+           break;
+       default:
+           break;
+    }
+}
+#endif /* MPPE */
+
+static struct chap_digest_type chapms_digest = {
+       CHAP_MICROSOFT,         /* code */
+       chapms_generate_challenge,
+       chapms_verify_response,
+       chapms_make_response,
+       NULL,                   /* check_success */
+       chapms_handle_failure,
+};
+
+static struct chap_digest_type chapms2_digest = {
+       CHAP_MICROSOFT_V2,      /* code */
+       chapms2_generate_challenge,
+       chapms2_verify_response,
+       chapms2_make_response,
+       chapms2_check_success,
+       chapms_handle_failure,
+};
+
+void
+chapms_init(void)
+{
+       chap_register_digest(&chapms_digest);
+       chap_register_digest(&chapms2_digest);
+       add_options(chapms_option_list);
+}
 
 #endif /* CHAPMS */