1*d6eebaa4SHervé Poussineau /*
2*d6eebaa4SHervé Poussineau  * pppcrypt.c - PPP/DES linkage for MS-CHAP and EAP SRP-SHA1
3*d6eebaa4SHervé Poussineau  *
4*d6eebaa4SHervé Poussineau  * Extracted from chap_ms.c by James Carlson.
5*d6eebaa4SHervé Poussineau  *
6*d6eebaa4SHervé Poussineau  * Copyright (c) 1995 Eric Rosenquist.  All rights reserved.
7*d6eebaa4SHervé Poussineau  *
8*d6eebaa4SHervé Poussineau  * Redistribution and use in source and binary forms, with or without
9*d6eebaa4SHervé Poussineau  * modification, are permitted provided that the following conditions
10*d6eebaa4SHervé Poussineau  * are met:
11*d6eebaa4SHervé Poussineau  *
12*d6eebaa4SHervé Poussineau  * 1. Redistributions of source code must retain the above copyright
13*d6eebaa4SHervé Poussineau  *    notice, this list of conditions and the following disclaimer.
14*d6eebaa4SHervé Poussineau  *
15*d6eebaa4SHervé Poussineau  * 2. Redistributions in binary form must reproduce the above copyright
16*d6eebaa4SHervé Poussineau  *    notice, this list of conditions and the following disclaimer in
17*d6eebaa4SHervé Poussineau  *    the documentation and/or other materials provided with the
18*d6eebaa4SHervé Poussineau  *    distribution.
19*d6eebaa4SHervé Poussineau  *
20*d6eebaa4SHervé Poussineau  * 3. The name(s) of the authors of this software must not be used to
21*d6eebaa4SHervé Poussineau  *    endorse or promote products derived from this software without
22*d6eebaa4SHervé Poussineau  *    prior written permission.
23*d6eebaa4SHervé Poussineau  *
24*d6eebaa4SHervé Poussineau  * THE AUTHORS OF THIS SOFTWARE DISCLAIM ALL WARRANTIES WITH REGARD TO
25*d6eebaa4SHervé Poussineau  * THIS SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
26*d6eebaa4SHervé Poussineau  * AND FITNESS, IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY
27*d6eebaa4SHervé Poussineau  * SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
28*d6eebaa4SHervé Poussineau  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN
29*d6eebaa4SHervé Poussineau  * AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING
30*d6eebaa4SHervé Poussineau  * OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
31*d6eebaa4SHervé Poussineau  */
32*d6eebaa4SHervé Poussineau 
33*d6eebaa4SHervé Poussineau #include "netif/ppp/ppp_opts.h"
34*d6eebaa4SHervé Poussineau #if PPP_SUPPORT && MSCHAP_SUPPORT /* don't build if not necessary */
35*d6eebaa4SHervé Poussineau 
36*d6eebaa4SHervé Poussineau #include "netif/ppp/ppp_impl.h"
37*d6eebaa4SHervé Poussineau 
38*d6eebaa4SHervé Poussineau #include "netif/ppp/pppcrypt.h"
39*d6eebaa4SHervé Poussineau 
40*d6eebaa4SHervé Poussineau 
pppcrypt_get_7bits(u_char * input,int startBit)41*d6eebaa4SHervé Poussineau static u_char pppcrypt_get_7bits(u_char *input, int startBit) {
42*d6eebaa4SHervé Poussineau 	unsigned int word;
43*d6eebaa4SHervé Poussineau 
44*d6eebaa4SHervé Poussineau 	word  = (unsigned)input[startBit / 8] << 8;
45*d6eebaa4SHervé Poussineau 	word |= (unsigned)input[startBit / 8 + 1];
46*d6eebaa4SHervé Poussineau 
47*d6eebaa4SHervé Poussineau 	word >>= 15 - (startBit % 8 + 7);
48*d6eebaa4SHervé Poussineau 
49*d6eebaa4SHervé Poussineau 	return word & 0xFE;
50*d6eebaa4SHervé Poussineau }
51*d6eebaa4SHervé Poussineau 
52*d6eebaa4SHervé Poussineau /* IN  56 bit DES key missing parity bits
53*d6eebaa4SHervé Poussineau  * OUT 64 bit DES key with parity bits added
54*d6eebaa4SHervé Poussineau  */
pppcrypt_56_to_64_bit_key(u_char * key,u_char * des_key)55*d6eebaa4SHervé Poussineau void pppcrypt_56_to_64_bit_key(u_char *key, u_char * des_key) {
56*d6eebaa4SHervé Poussineau 	des_key[0] = pppcrypt_get_7bits(key,  0);
57*d6eebaa4SHervé Poussineau 	des_key[1] = pppcrypt_get_7bits(key,  7);
58*d6eebaa4SHervé Poussineau 	des_key[2] = pppcrypt_get_7bits(key, 14);
59*d6eebaa4SHervé Poussineau 	des_key[3] = pppcrypt_get_7bits(key, 21);
60*d6eebaa4SHervé Poussineau 	des_key[4] = pppcrypt_get_7bits(key, 28);
61*d6eebaa4SHervé Poussineau 	des_key[5] = pppcrypt_get_7bits(key, 35);
62*d6eebaa4SHervé Poussineau 	des_key[6] = pppcrypt_get_7bits(key, 42);
63*d6eebaa4SHervé Poussineau 	des_key[7] = pppcrypt_get_7bits(key, 49);
64*d6eebaa4SHervé Poussineau }
65*d6eebaa4SHervé Poussineau 
66*d6eebaa4SHervé Poussineau #endif /* PPP_SUPPORT && MSCHAP_SUPPORT */
67