packages: sort network related packages into package/network/
[openwrt/svn-archive/archive.git] / package / network / services / ppp / patches / 201-mppe_mppc_1.1.patch
1 pppd: add support for MPPE and MPPC encryption and compression protocols
2
3 This is a forward ported version of ppp-2.4.3-mppe-mppc-1.1.patch.gz found on
4 http://mppe-mppc.alphacron.de/ .
5
6 Signed-off-by: Jo-Philipp Wich <jow@openwrt.org>
7
8 --- a/include/linux/ppp-comp.h
9 +++ b/include/linux/ppp-comp.h
10 @@ -36,7 +36,7 @@
11 */
12
13 /*
14 - * ==FILEVERSION 20020319==
15 + * ==FILEVERSION 20020715==
16 *
17 * NOTE TO MAINTAINERS:
18 * If you modify this file at all, please set the above date.
19 @@ -201,6 +201,33 @@ struct compressor {
20 #define CI_MPPE 18 /* config option for MPPE */
21 #define CILEN_MPPE 6 /* length of config option */
22
23 +/* MPPE/MPPC definitions by J.D.*/
24 +#define MPPE_STATELESS MPPE_H_BIT /* configuration bit H */
25 +#define MPPE_40BIT MPPE_L_BIT /* configuration bit L */
26 +#define MPPE_56BIT MPPE_M_BIT /* configuration bit M */
27 +#define MPPE_128BIT MPPE_S_BIT /* configuration bit S */
28 +#define MPPE_MPPC MPPE_C_BIT /* configuration bit C */
29 +
30 +/*
31 + * Definitions for Stac LZS.
32 + */
33 +
34 +#define CI_LZS 17 /* config option for Stac LZS */
35 +#define CILEN_LZS 5 /* length of config option */
36 +
37 +#define LZS_OVHD 4 /* max. LZS overhead */
38 +#define LZS_HIST_LEN 2048 /* LZS history size */
39 +#define LZS_MAX_CCOUNT 0x0FFF /* max. coherency counter value */
40 +
41 +#define LZS_MODE_NONE 0
42 +#define LZS_MODE_LCB 1
43 +#define LZS_MODE_CRC 2
44 +#define LZS_MODE_SEQ 3
45 +#define LZS_MODE_EXT 4
46 +
47 +#define LZS_EXT_BIT_FLUSHED 0x80 /* bit A */
48 +#define LZS_EXT_BIT_COMP 0x20 /* bit C */
49 +
50 /*
51 * Definitions for other, as yet unsupported, compression methods.
52 */
53 --- a/include/net/ppp-comp.h
54 +++ b/include/net/ppp-comp.h
55 @@ -168,6 +168,33 @@ struct compressor {
56 #define CI_MPPE 18 /* config option for MPPE */
57 #define CILEN_MPPE 6 /* length of config option */
58
59 +/* MPPE/MPPC definitions by J.D.*/
60 +#define MPPE_STATELESS MPPE_H_BIT /* configuration bit H */
61 +#define MPPE_40BIT MPPE_L_BIT /* configuration bit L */
62 +#define MPPE_56BIT MPPE_M_BIT /* configuration bit M */
63 +#define MPPE_128BIT MPPE_S_BIT /* configuration bit S */
64 +#define MPPE_MPPC MPPE_C_BIT /* configuration bit C */
65 +
66 +/*
67 + * Definitions for Stac LZS.
68 + */
69 +
70 +#define CI_LZS 17 /* config option for Stac LZS */
71 +#define CILEN_LZS 5 /* length of config option */
72 +
73 +#define LZS_OVHD 4 /* max. LZS overhead */
74 +#define LZS_HIST_LEN 2048 /* LZS history size */
75 +#define LZS_MAX_CCOUNT 0x0FFF /* max. coherency counter value */
76 +
77 +#define LZS_MODE_NONE 0
78 +#define LZS_MODE_LCB 1
79 +#define LZS_MODE_CRC 2
80 +#define LZS_MODE_SEQ 3
81 +#define LZS_MODE_EXT 4
82 +
83 +#define LZS_EXT_BIT_FLUSHED 0x80 /* bit A */
84 +#define LZS_EXT_BIT_COMP 0x20 /* bit C */
85 +
86 /*
87 * Definitions for other, as yet unsupported, compression methods.
88 */
89 --- a/pppd/ccp.c
90 +++ b/pppd/ccp.c
91 @@ -62,12 +62,10 @@ static int setdeflate __P((char **));
92 static char bsd_value[8];
93 static char deflate_value[8];
94
95 -/*
96 - * Option variables.
97 - */
98 #ifdef MPPE
99 -bool refuse_mppe_stateful = 1; /* Allow stateful mode? */
100 -#endif
101 +static int setmppe(char **);
102 +static int setnomppe(void);
103 +#endif /* MPPE */
104
105 static option_t ccp_option_list[] = {
106 { "noccp", o_bool, &ccp_protent.enabled_flag,
107 @@ -108,54 +106,36 @@ static option_t ccp_option_list[] = {
108 "don't allow Predictor-1", OPT_ALIAS | OPT_PRIOSUB | OPT_A2CLR,
109 &ccp_allowoptions[0].predictor_1 },
110
111 + { "lzs", o_bool, &ccp_wantoptions[0].lzs,
112 + "request Stac LZS", 1, &ccp_allowoptions[0].lzs, OPT_PRIO },
113 + { "+lzs", o_bool, &ccp_wantoptions[0].lzs,
114 + "request Stac LZS", 1, &ccp_allowoptions[0].lzs, OPT_ALIAS | OPT_PRIO },
115 + { "nolzs", o_bool, &ccp_wantoptions[0].lzs,
116 + "don't allow Stac LZS", OPT_PRIOSUB | OPT_A2CLR,
117 + &ccp_allowoptions[0].lzs },
118 + { "-lzs", o_bool, &ccp_wantoptions[0].lzs,
119 + "don't allow Stac LZS", OPT_ALIAS | OPT_PRIOSUB | OPT_A2CLR,
120 + &ccp_allowoptions[0].lzs },
121 +
122 #ifdef MPPE
123 - /* MPPE options are symmetrical ... we only set wantoptions here */
124 - { "require-mppe", o_bool, &ccp_wantoptions[0].mppe,
125 - "require MPPE encryption",
126 - OPT_PRIO | MPPE_OPT_40 | MPPE_OPT_128 },
127 - { "+mppe", o_bool, &ccp_wantoptions[0].mppe,
128 - "require MPPE encryption",
129 - OPT_ALIAS | OPT_PRIO | MPPE_OPT_40 | MPPE_OPT_128 },
130 - { "nomppe", o_bool, &ccp_wantoptions[0].mppe,
131 - "don't allow MPPE encryption", OPT_PRIO },
132 - { "-mppe", o_bool, &ccp_wantoptions[0].mppe,
133 - "don't allow MPPE encryption", OPT_ALIAS | OPT_PRIO },
134 -
135 - /* We use ccp_allowoptions[0].mppe as a junk var ... it is reset later */
136 - { "require-mppe-40", o_bool, &ccp_allowoptions[0].mppe,
137 - "require MPPE 40-bit encryption", OPT_PRIO | OPT_A2OR | MPPE_OPT_40,
138 - &ccp_wantoptions[0].mppe },
139 - { "+mppe-40", o_bool, &ccp_allowoptions[0].mppe,
140 - "require MPPE 40-bit encryption", OPT_PRIO | OPT_A2OR | MPPE_OPT_40,
141 - &ccp_wantoptions[0].mppe },
142 - { "nomppe-40", o_bool, &ccp_allowoptions[0].mppe,
143 - "don't allow MPPE 40-bit encryption",
144 - OPT_PRIOSUB | OPT_A2CLRB | MPPE_OPT_40, &ccp_wantoptions[0].mppe },
145 - { "-mppe-40", o_bool, &ccp_allowoptions[0].mppe,
146 - "don't allow MPPE 40-bit encryption",
147 - OPT_ALIAS | OPT_PRIOSUB | OPT_A2CLRB | MPPE_OPT_40,
148 - &ccp_wantoptions[0].mppe },
149 -
150 - { "require-mppe-128", o_bool, &ccp_allowoptions[0].mppe,
151 - "require MPPE 128-bit encryption", OPT_PRIO | OPT_A2OR | MPPE_OPT_128,
152 - &ccp_wantoptions[0].mppe },
153 - { "+mppe-128", o_bool, &ccp_allowoptions[0].mppe,
154 - "require MPPE 128-bit encryption",
155 - OPT_ALIAS | OPT_PRIO | OPT_A2OR | MPPE_OPT_128,
156 - &ccp_wantoptions[0].mppe },
157 - { "nomppe-128", o_bool, &ccp_allowoptions[0].mppe,
158 - "don't allow MPPE 128-bit encryption",
159 - OPT_PRIOSUB | OPT_A2CLRB | MPPE_OPT_128, &ccp_wantoptions[0].mppe },
160 - { "-mppe-128", o_bool, &ccp_allowoptions[0].mppe,
161 - "don't allow MPPE 128-bit encryption",
162 - OPT_ALIAS | OPT_PRIOSUB | OPT_A2CLRB | MPPE_OPT_128,
163 - &ccp_wantoptions[0].mppe },
164 -
165 - /* strange one; we always request stateless, but will we allow stateful? */
166 - { "mppe-stateful", o_bool, &refuse_mppe_stateful,
167 - "allow MPPE stateful mode", OPT_PRIO },
168 - { "nomppe-stateful", o_bool, &refuse_mppe_stateful,
169 - "disallow MPPE stateful mode", OPT_PRIO | 1 },
170 + { "mppc", o_bool, &ccp_wantoptions[0].mppc,
171 + "request MPPC compression", 1, &ccp_allowoptions[0].mppc },
172 + { "+mppc", o_bool, &ccp_wantoptions[0].mppc,
173 + "request MPPC compression", 1, &ccp_allowoptions[0].mppc, OPT_ALIAS },
174 + { "nomppc", o_bool, &ccp_wantoptions[0].mppc,
175 + "don't allow MPPC compression", OPT_PRIOSUB | OPT_A2CLR,
176 + &ccp_allowoptions[0].mppc },
177 + { "-mppc", o_bool, &ccp_wantoptions[0].mppc,
178 + "don't allow MPPC compression", OPT_ALIAS | OPT_PRIOSUB | OPT_A2CLR,
179 + &ccp_allowoptions[0].mppc },
180 + { "mppe", o_special, (void *)setmppe,
181 + "request MPPE encryption" },
182 + { "+mppe", o_special, (void *)setmppe,
183 + "request MPPE encryption" },
184 + { "nomppe", o_special_noarg, (void *)setnomppe,
185 + "don't allow MPPE encryption" },
186 + { "-mppe", o_special_noarg, (void *)setnomppe,
187 + "don't allow MPPE encryption" },
188 #endif /* MPPE */
189
190 { NULL }
191 @@ -241,7 +221,7 @@ static fsm_callbacks ccp_callbacks = {
192 */
193 #define ANY_COMPRESS(opt) ((opt).deflate || (opt).bsd_compress \
194 || (opt).predictor_1 || (opt).predictor_2 \
195 - || (opt).mppe)
196 + || (opt).lzs || (opt).mppc || (opt).mppe)
197
198 /*
199 * Local state (mainly for handling reset-reqs and reset-acks).
200 @@ -344,6 +324,100 @@ setdeflate(argv)
201 return 1;
202 }
203
204 +#ifdef MPPE
205 +/*
206 + * Functions called from config options
207 + */
208 +/*
209 + MPPE suboptions:
210 + required - require MPPE; disconnect if peer doesn't support it
211 + stateless - use stateless mode
212 + no40 - disable 40 bit keys
213 + no56 - disable 56 bit keys
214 + no128 - disable 128 bit keys
215 +*/
216 +int setmppe(char **argv)
217 +{
218 + int i;
219 + char *str, cmdbuf[16];
220 +
221 + ccp_allowoptions[0].mppe = 1;
222 + ccp_allowoptions[0].mppe_40 = 1;
223 + ccp_allowoptions[0].mppe_56 = 1;
224 + ccp_allowoptions[0].mppe_128 = 1;
225 + ccp_allowoptions[0].mppe_stateless = 0;
226 + ccp_wantoptions[0].mppe = 0;
227 +
228 + str = *argv;
229 +
230 + while (1) {
231 + i = 0;
232 + memset(cmdbuf, '\0', 16);
233 + while ((i < 16) && (*str != ',') && (*str != '\0'))
234 + cmdbuf[i++] = *str++;
235 + cmdbuf[i] = '\0';
236 + if (!strncasecmp(cmdbuf, "no40", strlen("no40"))) {
237 + ccp_allowoptions[0].mppe_40 = 0;
238 + goto next_param;
239 + } else if (!strncasecmp(cmdbuf, "no56", strlen("no56"))) {
240 + ccp_allowoptions[0].mppe_56 = 0;
241 + goto next_param;
242 + } else if (!strncasecmp(cmdbuf, "no128", strlen("no128"))) {
243 + ccp_allowoptions[0].mppe_128 = 0;
244 + goto next_param;
245 + } else if (!strncasecmp(cmdbuf, "stateless", strlen("stateless"))) {
246 + ccp_allowoptions[0].mppe_stateless = 1;
247 + goto next_param;
248 + } else if (!strncasecmp(cmdbuf, "required", strlen("required"))) {
249 + ccp_wantoptions[0].mppe = 1;
250 + goto next_param;
251 + } else {
252 + option_error("invalid parameter '%s' for mppe option", cmdbuf);
253 + return 0;
254 + }
255 +
256 + next_param:
257 + if (*str == ',') {
258 + str++;
259 + continue;
260 + }
261 + if (*str == '\0') {
262 + if (!(ccp_allowoptions[0].mppe_40 || ccp_allowoptions[0].mppe_56 ||
263 + ccp_allowoptions[0].mppe_128)) {
264 + if (ccp_wantoptions[0].mppe == 1) {
265 + option_error("You require MPPE but you have switched off "
266 + "all encryption key lengths.");
267 + return 0;
268 + }
269 + ccp_wantoptions[0].mppe = ccp_allowoptions[0].mppe = 0;
270 + ccp_wantoptions[0].mppe_stateless =
271 + ccp_allowoptions[0].mppe_stateless = 0;
272 + } else {
273 + ccp_allowoptions[0].mppe = 1;
274 + ccp_wantoptions[0].mppe_stateless =
275 + ccp_allowoptions[0].mppe_stateless;
276 + if (ccp_wantoptions[0].mppe == 1) {
277 + ccp_wantoptions[0].mppe_40 = ccp_allowoptions[0].mppe_40;
278 + ccp_wantoptions[0].mppe_56 = ccp_allowoptions[0].mppe_56;
279 + ccp_wantoptions[0].mppe_128 = ccp_allowoptions[0].mppe_128;
280 + }
281 + }
282 + return 1;
283 + }
284 + }
285 +}
286 +
287 +int setnomppe(void)
288 +{
289 + ccp_wantoptions[0].mppe = ccp_allowoptions[0].mppe = 0;
290 + ccp_wantoptions[0].mppe_40 = ccp_allowoptions[0].mppe_40 = 0;
291 + ccp_wantoptions[0].mppe_56 = ccp_allowoptions[0].mppe_56 = 0;
292 + ccp_wantoptions[0].mppe_128 = ccp_allowoptions[0].mppe_128 = 0;
293 + ccp_wantoptions[0].mppe_stateless = ccp_allowoptions[0].mppe_stateless = 0;
294 + return 1;
295 +}
296 +#endif /* MPPE */
297 +
298 /*
299 * ccp_init - initialize CCP.
300 */
301 @@ -378,6 +452,30 @@ ccp_init(unit)
302 ccp_allowoptions[0].bsd_bits = BSD_MAX_BITS;
303
304 ccp_allowoptions[0].predictor_1 = 1;
305 +
306 + ccp_wantoptions[0].lzs = 0; /* Stac LZS - will be enabled in the future */
307 + ccp_wantoptions[0].lzs_mode = LZS_MODE_SEQ;
308 + ccp_wantoptions[0].lzs_hists = 1;
309 + ccp_allowoptions[0].lzs = 0; /* Stac LZS - will be enabled in the future */
310 + ccp_allowoptions[0].lzs_mode = LZS_MODE_SEQ;
311 + ccp_allowoptions[0].lzs_hists = 1;
312 +
313 +#ifdef MPPE
314 + /* by default allow and request MPPC... */
315 + ccp_wantoptions[0].mppc = ccp_allowoptions[0].mppc = 1;
316 +
317 + /* ... and allow but don't request MPPE */
318 + ccp_allowoptions[0].mppe = 1;
319 + ccp_allowoptions[0].mppe_40 = 1;
320 + ccp_allowoptions[0].mppe_56 = 1;
321 + ccp_allowoptions[0].mppe_128 = 1;
322 + ccp_allowoptions[0].mppe_stateless = 1;
323 + ccp_wantoptions[0].mppe = 0;
324 + ccp_wantoptions[0].mppe_40 = 0;
325 + ccp_wantoptions[0].mppe_56 = 0;
326 + ccp_wantoptions[0].mppe_128 = 0;
327 + ccp_wantoptions[0].mppe_stateless = 0;
328 +#endif /* MPPE */
329 }
330
331 /*
332 @@ -455,11 +553,11 @@ ccp_input(unit, p, len)
333 if (oldstate == OPENED && p[0] == TERMREQ && f->state != OPENED) {
334 notice("Compression disabled by peer.");
335 #ifdef MPPE
336 - if (ccp_gotoptions[unit].mppe) {
337 + if (ccp_wantoptions[unit].mppe) {
338 error("MPPE disabled, closing LCP");
339 lcp_close(unit, "MPPE disabled by peer");
340 }
341 -#endif
342 +#endif /* MPPE */
343 }
344
345 /*
346 @@ -487,6 +585,15 @@ ccp_extcode(f, code, id, p, len)
347 break;
348 /* send a reset-ack, which the transmitter will see and
349 reset its compression state. */
350 +
351 + /* In case of MPPE/MPPC or LZS we shouldn't send CCP_RESETACK,
352 + but we do it in order to reset compressor; CCP_RESETACK is
353 + then silently discarded. See functions ppp_send_frame and
354 + ppp_ccp_peek in ppp_generic.c (Linux only !!!). All the
355 + confusion is caused by the fact that CCP code is splited
356 + into two parts - one part is handled by pppd, the other one
357 + is handled by kernel. */
358 +
359 fsm_sdata(f, CCP_RESETACK, id, NULL, 0);
360 break;
361
362 @@ -515,12 +622,11 @@ ccp_protrej(unit)
363 fsm_lowerdown(&ccp_fsm[unit]);
364
365 #ifdef MPPE
366 - if (ccp_gotoptions[unit].mppe) {
367 + if (ccp_wantoptions[unit].mppe) {
368 error("MPPE required but peer negotiation failed");
369 lcp_close(unit, "MPPE required but peer negotiation failed");
370 }
371 -#endif
372 -
373 +#endif /* MPPE */
374 }
375
376 /*
377 @@ -537,7 +643,7 @@ ccp_resetci(f)
378 all_rejected[f->unit] = 0;
379
380 #ifdef MPPE
381 - if (go->mppe) {
382 + if (go->mppe || go->mppc) {
383 ccp_options *ao = &ccp_allowoptions[f->unit];
384 int auth_mschap_bits = auth_done[f->unit];
385 int numbits;
386 @@ -551,80 +657,109 @@ ccp_resetci(f)
387 * NB: If MPPE is required, all other compression opts are invalid.
388 * So, we return right away if we can't do it.
389 */
390 + if (ccp_wantoptions[f->unit].mppe) {
391 + /* Leave only the mschap auth bits set */
392 + auth_mschap_bits &= (CHAP_MS_WITHPEER | CHAP_MS_PEER |
393 + CHAP_MS2_WITHPEER | CHAP_MS2_PEER);
394 + /* Count the mschap auths */
395 + auth_mschap_bits >>= CHAP_MS_SHIFT;
396 + numbits = 0;
397 + do {
398 + numbits += auth_mschap_bits & 1;
399 + auth_mschap_bits >>= 1;
400 + } while (auth_mschap_bits);
401 + if (numbits > 1) {
402 + error("MPPE required, but auth done in both directions.");
403 + lcp_close(f->unit, "MPPE required but not available");
404 + return;
405 + }
406 + if (!numbits) {
407 + error("MPPE required, but MS-CHAP[v2] auth not performed.");
408 + lcp_close(f->unit, "MPPE required but not available");
409 + return;
410 + }
411
412 - /* Leave only the mschap auth bits set */
413 - auth_mschap_bits &= (CHAP_MS_WITHPEER | CHAP_MS_PEER |
414 - CHAP_MS2_WITHPEER | CHAP_MS2_PEER);
415 - /* Count the mschap auths */
416 - auth_mschap_bits >>= CHAP_MS_SHIFT;
417 - numbits = 0;
418 - do {
419 - numbits += auth_mschap_bits & 1;
420 - auth_mschap_bits >>= 1;
421 - } while (auth_mschap_bits);
422 - if (numbits > 1) {
423 - error("MPPE required, but auth done in both directions.");
424 - lcp_close(f->unit, "MPPE required but not available");
425 - return;
426 - }
427 - if (!numbits) {
428 - error("MPPE required, but MS-CHAP[v2] auth not performed.");
429 - lcp_close(f->unit, "MPPE required but not available");
430 - return;
431 - }
432 -
433 - /* A plugin (eg radius) may not have obtained key material. */
434 - if (!mppe_keys_set) {
435 - error("MPPE required, but keys are not available. "
436 - "Possible plugin problem?");
437 - lcp_close(f->unit, "MPPE required but not available");
438 - return;
439 - }
440 -
441 - /* LM auth not supported for MPPE */
442 - if (auth_done[f->unit] & (CHAP_MS_WITHPEER | CHAP_MS_PEER)) {
443 - /* This might be noise */
444 - if (go->mppe & MPPE_OPT_40) {
445 - notice("Disabling 40-bit MPPE; MS-CHAP LM not supported");
446 - go->mppe &= ~MPPE_OPT_40;
447 - ccp_wantoptions[f->unit].mppe &= ~MPPE_OPT_40;
448 + /* A plugin (eg radius) may not have obtained key material. */
449 + if (!mppe_keys_set) {
450 + error("MPPE required, but keys are not available. "
451 + "Possible plugin problem?");
452 + lcp_close(f->unit, "MPPE required but not available");
453 + return;
454 }
455 }
456
457 - /* Last check: can we actually negotiate something? */
458 - if (!(go->mppe & (MPPE_OPT_40 | MPPE_OPT_128))) {
459 - /* Could be misconfig, could be 40-bit disabled above. */
460 - error("MPPE required, but both 40-bit and 128-bit disabled.");
461 - lcp_close(f->unit, "MPPE required but not available");
462 - return;
463 + /*
464 + * Check whether the kernel knows about the various
465 + * compression methods we might request. Key material
466 + * unimportant here.
467 + */
468 + if (go->mppc) {
469 + opt_buf[0] = CI_MPPE;
470 + opt_buf[1] = CILEN_MPPE;
471 + opt_buf[2] = 0;
472 + opt_buf[3] = 0;
473 + opt_buf[4] = 0;
474 + opt_buf[5] = MPPE_MPPC;
475 + if (ccp_test(f->unit, opt_buf, CILEN_MPPE, 0) <= 0)
476 + go->mppc = 0;
477 + }
478 + if (go->mppe_40) {
479 + opt_buf[0] = CI_MPPE;
480 + opt_buf[1] = CILEN_MPPE;
481 + opt_buf[2] = MPPE_STATELESS;
482 + opt_buf[3] = 0;
483 + opt_buf[4] = 0;
484 + opt_buf[5] = MPPE_40BIT;
485 + if (ccp_test(f->unit, opt_buf, CILEN_MPPE + MPPE_MAX_KEY_LEN, 0) <= 0)
486 + go->mppe_40 = 0;
487 + }
488 + if (go->mppe_56) {
489 + opt_buf[0] = CI_MPPE;
490 + opt_buf[1] = CILEN_MPPE;
491 + opt_buf[2] = MPPE_STATELESS;
492 + opt_buf[3] = 0;
493 + opt_buf[4] = 0;
494 + opt_buf[5] = MPPE_56BIT;
495 + if (ccp_test(f->unit, opt_buf, CILEN_MPPE + MPPE_MAX_KEY_LEN, 0) <= 0)
496 + go->mppe_56 = 0;
497 + }
498 + if (go->mppe_128) {
499 + opt_buf[0] = CI_MPPE;
500 + opt_buf[1] = CILEN_MPPE;
501 + opt_buf[2] = MPPE_STATELESS;
502 + opt_buf[3] = 0;
503 + opt_buf[4] = 0;
504 + opt_buf[5] = MPPE_128BIT;
505 + if (ccp_test(f->unit, opt_buf, CILEN_MPPE + MPPE_MAX_KEY_LEN, 0) <= 0)
506 + go->mppe_128 = 0;
507 + }
508 + if (!go->mppe_40 && !go->mppe_56 && !go->mppe_128) {
509 + if (ccp_wantoptions[f->unit].mppe) {
510 + error("MPPE required, but kernel has no support.");
511 + lcp_close(f->unit, "MPPE required but not available");
512 + }
513 + go->mppe = go->mppe_stateless = 0;
514 + } else {
515 + /* MPPE is not compatible with other compression types */
516 + if (ccp_wantoptions[f->unit].mppe) {
517 + ao->bsd_compress = go->bsd_compress = 0;
518 + ao->predictor_1 = go->predictor_1 = 0;
519 + ao->predictor_2 = go->predictor_2 = 0;
520 + ao->deflate = go->deflate = 0;
521 + ao->lzs = go->lzs = 0;
522 + }
523 }
524 -
525 - /* sync options */
526 - ao->mppe = go->mppe;
527 - /* MPPE is not compatible with other compression types */
528 - ao->bsd_compress = go->bsd_compress = 0;
529 - ao->predictor_1 = go->predictor_1 = 0;
530 - ao->predictor_2 = go->predictor_2 = 0;
531 - ao->deflate = go->deflate = 0;
532 }
533 #endif /* MPPE */
534 -
535 - /*
536 - * Check whether the kernel knows about the various
537 - * compression methods we might request.
538 - */
539 -#ifdef MPPE
540 - if (go->mppe) {
541 - opt_buf[0] = CI_MPPE;
542 - opt_buf[1] = CILEN_MPPE;
543 - MPPE_OPTS_TO_CI(go->mppe, &opt_buf[2]);
544 - /* Key material unimportant here. */
545 - if (ccp_test(f->unit, opt_buf, CILEN_MPPE + MPPE_MAX_KEY_LEN, 0) <= 0) {
546 - error("MPPE required, but kernel has no support.");
547 - lcp_close(f->unit, "MPPE required but not available");
548 - }
549 + if (go->lzs) {
550 + opt_buf[0] = CI_LZS;
551 + opt_buf[1] = CILEN_LZS;
552 + opt_buf[2] = go->lzs_hists >> 8;
553 + opt_buf[3] = go->lzs_hists & 0xff;
554 + opt_buf[4] = LZS_MODE_SEQ;
555 + if (ccp_test(f->unit, opt_buf, CILEN_LZS, 0) <= 0)
556 + go->lzs = 0;
557 }
558 -#endif
559 if (go->bsd_compress) {
560 opt_buf[0] = CI_BSD_COMPRESS;
561 opt_buf[1] = CILEN_BSD_COMPRESS;
562 @@ -679,7 +814,8 @@ ccp_cilen(f)
563 + (go->deflate? CILEN_DEFLATE: 0)
564 + (go->predictor_1? CILEN_PREDICTOR_1: 0)
565 + (go->predictor_2? CILEN_PREDICTOR_2: 0)
566 - + (go->mppe? CILEN_MPPE: 0);
567 + + (go->lzs? CILEN_LZS: 0)
568 + + ((go->mppe || go->mppc)? CILEN_MPPE: 0);
569 }
570
571 /*
572 @@ -693,6 +829,8 @@ ccp_addci(f, p, lenp)
573 {
574 int res;
575 ccp_options *go = &ccp_gotoptions[f->unit];
576 + ccp_options *ao = &ccp_allowoptions[f->unit];
577 + ccp_options *wo = &ccp_wantoptions[f->unit];
578 u_char *p0 = p;
579
580 /*
581 @@ -701,22 +839,43 @@ ccp_addci(f, p, lenp)
582 * in case it gets Acked.
583 */
584 #ifdef MPPE
585 - if (go->mppe) {
586 + if (go->mppe || go->mppc || (!wo->mppe && ao->mppe)) {
587 u_char opt_buf[CILEN_MPPE + MPPE_MAX_KEY_LEN];
588
589 - p[0] = opt_buf[0] = CI_MPPE;
590 - p[1] = opt_buf[1] = CILEN_MPPE;
591 - MPPE_OPTS_TO_CI(go->mppe, &p[2]);
592 - MPPE_OPTS_TO_CI(go->mppe, &opt_buf[2]);
593 + p[0] = CI_MPPE;
594 + p[1] = CILEN_MPPE;
595 + p[2] = (go->mppe_stateless ? MPPE_STATELESS : 0);
596 + p[3] = 0;
597 + p[4] = 0;
598 + p[5] = (go->mppe_40 ? MPPE_40BIT : 0) | (go->mppe_56 ? MPPE_56BIT : 0) |
599 + (go->mppe_128 ? MPPE_128BIT : 0) | (go->mppc ? MPPE_MPPC : 0);
600 +
601 + BCOPY(p, opt_buf, CILEN_MPPE);
602 BCOPY(mppe_recv_key, &opt_buf[CILEN_MPPE], MPPE_MAX_KEY_LEN);
603 res = ccp_test(f->unit, opt_buf, CILEN_MPPE + MPPE_MAX_KEY_LEN, 0);
604 - if (res > 0)
605 + if (res > 0) {
606 p += CILEN_MPPE;
607 - else
608 + } else {
609 /* This shouldn't happen, we've already tested it! */
610 - lcp_close(f->unit, "MPPE required but not available in kernel");
611 + go->mppe = go->mppe_40 = go->mppe_56 = go->mppe_128 =
612 + go->mppe_stateless = go->mppc = 0;
613 + if (ccp_wantoptions[f->unit].mppe)
614 + lcp_close(f->unit, "MPPE required but not available in kernel");
615 + }
616 + }
617 +#endif /* MPPE */
618 + if (go->lzs) {
619 + p[0] = CI_LZS;
620 + p[1] = CILEN_LZS;
621 + p[2] = go->lzs_hists >> 8;
622 + p[3] = go->lzs_hists & 0xff;
623 + p[4] = LZS_MODE_SEQ;
624 + res = ccp_test(f->unit, p, CILEN_LZS, 0);
625 + if (res > 0) {
626 + p += CILEN_LZS;
627 + } else
628 + go->lzs = 0;
629 }
630 -#endif
631 if (go->deflate) {
632 p[0] = go->deflate_correct? CI_DEFLATE: CI_DEFLATE_DRAFT;
633 p[1] = CILEN_DEFLATE;
634 @@ -802,7 +961,7 @@ ccp_addci(f, p, lenp)
635
636 /*
637 * ccp_ackci - process a received configure-ack, and return
638 - * 1 iff the packet was OK.
639 + * 1 if the packet was OK.
640 */
641 static int
642 ccp_ackci(f, p, len)
643 @@ -811,24 +970,44 @@ ccp_ackci(f, p, len)
644 int len;
645 {
646 ccp_options *go = &ccp_gotoptions[f->unit];
647 + ccp_options *ao = &ccp_allowoptions[f->unit];
648 + ccp_options *wo = &ccp_wantoptions[f->unit];
649 u_char *p0 = p;
650
651 #ifdef MPPE
652 - if (go->mppe) {
653 - u_char opt_buf[CILEN_MPPE];
654 -
655 - opt_buf[0] = CI_MPPE;
656 - opt_buf[1] = CILEN_MPPE;
657 - MPPE_OPTS_TO_CI(go->mppe, &opt_buf[2]);
658 - if (len < CILEN_MPPE || memcmp(opt_buf, p, CILEN_MPPE))
659 + if (go->mppe || go->mppc || (!wo->mppe && ao->mppe)) {
660 + if (len < CILEN_MPPE
661 + || p[1] != CILEN_MPPE || p[0] != CI_MPPE
662 + || p[2] != (go->mppe_stateless ? MPPE_STATELESS : 0)
663 + || p[3] != 0
664 + || p[4] != 0
665 + || (p[5] != ((go->mppe_40 ? MPPE_40BIT : 0) |
666 + (go->mppc ? MPPE_MPPC : 0))
667 + && p[5] != ((go->mppe_56 ? MPPE_56BIT : 0) |
668 + (go->mppc ? MPPE_MPPC : 0))
669 + && p[5] != ((go->mppe_128 ? MPPE_128BIT : 0) |
670 + (go->mppc ? MPPE_MPPC : 0))))
671 return 0;
672 + if (go->mppe_40 || go->mppe_56 || go->mppe_128)
673 + go->mppe = 1;
674 p += CILEN_MPPE;
675 len -= CILEN_MPPE;
676 + /* Cope with first/fast ack */
677 + if (p == p0 && len == 0)
678 + return 1;
679 + }
680 +#endif /* MPPE */
681 + if (go->lzs) {
682 + if (len < CILEN_LZS || p[0] != CI_LZS || p[1] != CILEN_LZS
683 + || p[2] != go->lzs_hists>>8 || p[3] != (go->lzs_hists&0xff)
684 + || p[4] != LZS_MODE_SEQ)
685 + return 0;
686 + p += CILEN_LZS;
687 + len -= CILEN_LZS;
688 /* XXX Cope with first/fast ack */
689 - if (len == 0)
690 + if (p == p0 && len == 0)
691 return 1;
692 }
693 -#endif
694 if (go->deflate) {
695 if (len < CILEN_DEFLATE
696 || p[0] != (go->deflate_correct? CI_DEFLATE: CI_DEFLATE_DRAFT)
697 @@ -901,6 +1080,8 @@ ccp_nakci(f, p, len, treat_as_reject)
698 int treat_as_reject;
699 {
700 ccp_options *go = &ccp_gotoptions[f->unit];
701 + ccp_options *ao = &ccp_allowoptions[f->unit];
702 + ccp_options *wo = &ccp_wantoptions[f->unit];
703 ccp_options no; /* options we've seen already */
704 ccp_options try; /* options to ask for next time */
705
706 @@ -908,28 +1089,100 @@ ccp_nakci(f, p, len, treat_as_reject)
707 try = *go;
708
709 #ifdef MPPE
710 - if (go->mppe && len >= CILEN_MPPE
711 - && p[0] == CI_MPPE && p[1] == CILEN_MPPE) {
712 - no.mppe = 1;
713 - /*
714 - * Peer wants us to use a different strength or other setting.
715 - * Fail if we aren't willing to use his suggestion.
716 - */
717 - MPPE_CI_TO_OPTS(&p[2], try.mppe);
718 - if ((try.mppe & MPPE_OPT_STATEFUL) && refuse_mppe_stateful) {
719 - error("Refusing MPPE stateful mode offered by peer");
720 - try.mppe = 0;
721 - } else if (((go->mppe | MPPE_OPT_STATEFUL) & try.mppe) != try.mppe) {
722 - /* Peer must have set options we didn't request (suggest) */
723 - try.mppe = 0;
724 - }
725 + if ((go->mppe || go->mppc || (!wo->mppe && ao->mppe)) &&
726 + len >= CILEN_MPPE && p[0] == CI_MPPE && p[1] == CILEN_MPPE) {
727
728 - if (!try.mppe) {
729 - error("MPPE required but peer negotiation failed");
730 - lcp_close(f->unit, "MPPE required but peer negotiation failed");
731 + if (go->mppc) {
732 + no.mppc = 1;
733 + if (!(p[5] & MPPE_MPPC))
734 + try.mppc = 0;
735 + }
736 +
737 + if (go->mppe)
738 + no.mppe = 1;
739 + if (go->mppe_40)
740 + no.mppe_40 = 1;
741 + if (go->mppe_56)
742 + no.mppe_56 = 1;
743 + if (go->mppe_128)
744 + no.mppe_128 = 1;
745 + if (go->mppe_stateless)
746 + no.mppe_stateless = 1;
747 +
748 + if (ao->mppe_40) {
749 + if ((p[5] & MPPE_40BIT))
750 + try.mppe_40 = 1;
751 + else
752 + try.mppe_40 = (p[5] == 0) ? 1 : 0;
753 + }
754 + if (ao->mppe_56) {
755 + if ((p[5] & MPPE_56BIT))
756 + try.mppe_56 = 1;
757 + else
758 + try.mppe_56 = (p[5] == 0) ? 1 : 0;
759 + }
760 + if (ao->mppe_128) {
761 + if ((p[5] & MPPE_128BIT))
762 + try.mppe_128 = 1;
763 + else
764 + try.mppe_128 = (p[5] == 0) ? 1 : 0;
765 + }
766 +
767 + if (ao->mppe_stateless) {
768 + if ((p[2] & MPPE_STATELESS) || wo->mppe_stateless)
769 + try.mppe_stateless = 1;
770 + else
771 + try.mppe_stateless = 0;
772 + }
773 +
774 + if (!try.mppe_56 && !try.mppe_40 && !try.mppe_128) {
775 + try.mppe = try.mppe_stateless = 0;
776 + if (wo->mppe) {
777 + /* we require encryption, but peer doesn't support it
778 + so we close connection */
779 + wo->mppc = wo->mppe = wo->mppe_stateless = wo->mppe_40 =
780 + wo->mppe_56 = wo->mppe_128 = 0;
781 + lcp_close(f->unit, "MPPE required but cannot negotiate MPPE "
782 + "key length");
783 + }
784 + }
785 + if (wo->mppe && (wo->mppe_40 != try.mppe_40) &&
786 + (wo->mppe_56 != try.mppe_56) && (wo->mppe_128 != try.mppe_128)) {
787 + /* cannot negotiate key length */
788 + wo->mppc = wo->mppe = wo->mppe_stateless = wo->mppe_40 =
789 + wo->mppe_56 = wo->mppe_128 = 0;
790 + lcp_close(f->unit, "Cannot negotiate MPPE key length");
791 }
792 + if (try.mppe_40 && try.mppe_56 && try.mppe_128)
793 + try.mppe_40 = try.mppe_56 = 0;
794 + else
795 + if (try.mppe_56 && try.mppe_128)
796 + try.mppe_56 = 0;
797 + else
798 + if (try.mppe_40 && try.mppe_128)
799 + try.mppe_40 = 0;
800 + else
801 + if (try.mppe_40 && try.mppe_56)
802 + try.mppe_40 = 0;
803 +
804 + p += CILEN_MPPE;
805 + len -= CILEN_MPPE;
806 }
807 #endif /* MPPE */
808 +
809 + if (go->lzs && len >= CILEN_LZS && p[0] == CI_LZS && p[1] == CILEN_LZS) {
810 + no.lzs = 1;
811 + if (((p[2]<<8)|p[3]) > 1 || (p[4] != LZS_MODE_SEQ &&
812 + p[4] != LZS_MODE_EXT))
813 + try.lzs = 0;
814 + else {
815 + try.lzs_mode = p[4];
816 + try.lzs_hists = (p[2] << 8) | p[3];
817 + }
818 + p += CILEN_LZS;
819 + len -= CILEN_LZS;
820 + }
821 +
822 if (go->deflate && len >= CILEN_DEFLATE
823 && p[0] == (go->deflate_correct? CI_DEFLATE: CI_DEFLATE_DRAFT)
824 && p[1] == CILEN_DEFLATE) {
825 @@ -1002,14 +1255,50 @@ ccp_rejci(f, p, len)
826 return -1;
827
828 #ifdef MPPE
829 - if (go->mppe && len >= CILEN_MPPE
830 + if ((go->mppe || go->mppc) && len >= CILEN_MPPE
831 && p[0] == CI_MPPE && p[1] == CILEN_MPPE) {
832 - error("MPPE required but peer refused");
833 - lcp_close(f->unit, "MPPE required but peer refused");
834 + ccp_options *wo = &ccp_wantoptions[f->unit];
835 + if (p[2] != (go->mppe_stateless ? MPPE_STATELESS : 0) ||
836 + p[3] != 0 ||
837 + p[4] != 0 ||
838 + p[5] != ((go->mppe_40 ? MPPE_40BIT : 0) |
839 + (go->mppe_56 ? MPPE_56BIT : 0) |
840 + (go->mppe_128 ? MPPE_128BIT : 0) |
841 + (go->mppc ? MPPE_MPPC : 0)))
842 + return 0;
843 + if (go->mppc)
844 + try.mppc = 0;
845 + if (go->mppe) {
846 + try.mppe = 0;
847 + if (go->mppe_40)
848 + try.mppe_40 = 0;
849 + if (go->mppe_56)
850 + try.mppe_56 = 0;
851 + if (go->mppe_128)
852 + try.mppe_128 = 0;
853 + if (go->mppe_stateless)
854 + try.mppe_stateless = 0;
855 + if (!try.mppe_56 && !try.mppe_40 && !try.mppe_128)
856 + try.mppe = try.mppe_stateless = 0;
857 + if (wo->mppe) { /* we want MPPE but cannot negotiate key length */
858 + wo->mppc = wo->mppe = wo->mppe_stateless = wo->mppe_40 =
859 + wo->mppe_56 = wo->mppe_128 = 0;
860 + lcp_close(f->unit, "MPPE required but cannot negotiate MPPE "
861 + "key length");
862 + }
863 + }
864 p += CILEN_MPPE;
865 len -= CILEN_MPPE;
866 }
867 -#endif
868 +#endif /* MPPE */
869 + if (go->lzs && len >= CILEN_LZS && p[0] == CI_LZS && p[1] == CILEN_LZS) {
870 + if (p[2] != go->lzs_hists>>8 || p[3] != (go->lzs_hists&0xff)
871 + || p[4] != go->lzs_mode)
872 + return 0;
873 + try.lzs = 0;
874 + p += CILEN_LZS;
875 + len -= CILEN_LZS;
876 + }
877 if (go->deflate_correct && len >= CILEN_DEFLATE
878 && p[0] == CI_DEFLATE && p[1] == CILEN_DEFLATE) {
879 if (p[2] != DEFLATE_MAKE_OPT(go->deflate_size)
880 @@ -1073,14 +1362,15 @@ ccp_reqci(f, p, lenp, dont_nak)
881 int dont_nak;
882 {
883 int ret, newret, res;
884 - u_char *p0, *retp;
885 + u_char *p0, *retp, p2, p5;
886 int len, clen, type, nb;
887 ccp_options *ho = &ccp_hisoptions[f->unit];
888 ccp_options *ao = &ccp_allowoptions[f->unit];
889 + ccp_options *wo = &ccp_wantoptions[f->unit];
890 #ifdef MPPE
891 - bool rej_for_ci_mppe = 1; /* Are we rejecting based on a bad/missing */
892 - /* CI_MPPE, or due to other options? */
893 -#endif
894 + u_char opt_buf[CILEN_MPPE + MPPE_MAX_KEY_LEN];
895 +/* int mtu; */
896 +#endif /* MPPE */
897
898 ret = CONFACK;
899 retp = p0 = p;
900 @@ -1103,106 +1393,302 @@ ccp_reqci(f, p, lenp, dont_nak)
901 switch (type) {
902 #ifdef MPPE
903 case CI_MPPE:
904 - if (!ao->mppe || clen != CILEN_MPPE) {
905 + if ((!ao->mppc && !ao->mppe) || clen != CILEN_MPPE) {
906 newret = CONFREJ;
907 break;
908 }
909 - MPPE_CI_TO_OPTS(&p[2], ho->mppe);
910 -
911 - /* Nak if anything unsupported or unknown are set. */
912 - if (ho->mppe & MPPE_OPT_UNSUPPORTED) {
913 - newret = CONFNAK;
914 - ho->mppe &= ~MPPE_OPT_UNSUPPORTED;
915 - }
916 - if (ho->mppe & MPPE_OPT_UNKNOWN) {
917 + p2 = p[2];
918 + p5 = p[5];
919 + /* not sure what they want, tell 'em what we got */
920 + if (((p[2] & ~MPPE_STATELESS) != 0 || p[3] != 0 || p[4] != 0 ||
921 + (p[5] & ~(MPPE_40BIT | MPPE_56BIT | MPPE_128BIT |
922 + MPPE_MPPC)) != 0 || p[5] == 0) ||
923 + (p[2] == 0 && p[3] == 0 && p[4] == 0 && p[5] == 0)) {
924 newret = CONFNAK;
925 - ho->mppe &= ~MPPE_OPT_UNKNOWN;
926 - }
927 -
928 - /* Check state opt */
929 - if (ho->mppe & MPPE_OPT_STATEFUL) {
930 - /*
931 - * We can Nak and request stateless, but it's a
932 - * lot easier to just assume the peer will request
933 - * it if he can do it; stateful mode is bad over
934 - * the Internet -- which is where we expect MPPE.
935 - */
936 - if (refuse_mppe_stateful) {
937 - error("Refusing MPPE stateful mode offered by peer");
938 - newret = CONFREJ;
939 - break;
940 + p[2] = (wo->mppe_stateless ? MPPE_STATELESS : 0);
941 + p[3] = 0;
942 + p[4] = 0;
943 + p[5] = (wo->mppe_40 ? MPPE_40BIT : 0) |
944 + (wo->mppe_56 ? MPPE_56BIT : 0) |
945 + (wo->mppe_128 ? MPPE_128BIT : 0) |
946 + (wo->mppc ? MPPE_MPPC : 0);
947 + break;
948 + }
949 +
950 + if ((p[5] & MPPE_MPPC)) {
951 + if (ao->mppc) {
952 + ho->mppc = 1;
953 + BCOPY(p, opt_buf, CILEN_MPPE);
954 + opt_buf[2] = opt_buf[3] = opt_buf[4] = 0;
955 + opt_buf[5] = MPPE_MPPC;
956 + if (ccp_test(f->unit, opt_buf, CILEN_MPPE, 1) <= 0) {
957 + ho->mppc = 0;
958 + p[5] &= ~MPPE_MPPC;
959 + newret = CONFNAK;
960 + }
961 + } else {
962 + newret = CONFREJ;
963 + if (wo->mppe || ao->mppe) {
964 + p[5] &= ~MPPE_MPPC;
965 + newret = CONFNAK;
966 + }
967 }
968 }
969 -
970 - /* Find out which of {S,L} are set. */
971 - if ((ho->mppe & MPPE_OPT_128)
972 - && (ho->mppe & MPPE_OPT_40)) {
973 - /* Both are set, negotiate the strongest. */
974 - newret = CONFNAK;
975 - if (ao->mppe & MPPE_OPT_128)
976 - ho->mppe &= ~MPPE_OPT_40;
977 - else if (ao->mppe & MPPE_OPT_40)
978 - ho->mppe &= ~MPPE_OPT_128;
979 - else {
980 - newret = CONFREJ;
981 - break;
982 - }
983 - } else if (ho->mppe & MPPE_OPT_128) {
984 - if (!(ao->mppe & MPPE_OPT_128)) {
985 - newret = CONFREJ;
986 - break;
987 - }
988 - } else if (ho->mppe & MPPE_OPT_40) {
989 - if (!(ao->mppe & MPPE_OPT_40)) {
990 - newret = CONFREJ;
991 - break;
992 - }
993 + if (ao->mppe)
994 + ho->mppe = 1;
995 +
996 + if ((p[2] & MPPE_STATELESS)) {
997 + if (ao->mppe_stateless) {
998 + if (wo->mppe_stateless)
999 + ho->mppe_stateless = 1;
1000 + else {
1001 + newret = CONFNAK;
1002 + if (!dont_nak)
1003 + p[2] &= ~MPPE_STATELESS;
1004 + }
1005 + } else {
1006 + newret = CONFNAK;
1007 + if (!dont_nak)
1008 + p[2] &= ~MPPE_STATELESS;
1009 + }
1010 + } else {
1011 + if (wo->mppe_stateless && !dont_nak) {
1012 + wo->mppe_stateless = 0;
1013 + newret = CONFNAK;
1014 + p[2] |= MPPE_STATELESS;
1015 + }
1016 + }
1017 +
1018 + if ((p[5] & ~MPPE_MPPC) == (MPPE_40BIT|MPPE_56BIT|MPPE_128BIT)) {
1019 + newret = CONFNAK;
1020 + if (ao->mppe_128) {
1021 + ho->mppe_128 = 1;
1022 + p[5] &= ~(MPPE_40BIT|MPPE_56BIT);
1023 + BCOPY(p, opt_buf, CILEN_MPPE);
1024 + BCOPY(mppe_send_key, &opt_buf[CILEN_MPPE],
1025 + MPPE_MAX_KEY_LEN);
1026 + if (ccp_test(f->unit, opt_buf, CILEN_MPPE +
1027 + MPPE_MAX_KEY_LEN, 1) <= 0) {
1028 + ho->mppe_128 = 0;
1029 + p[5] |= (MPPE_40BIT|MPPE_56BIT);
1030 + p[5] &= ~MPPE_128BIT;
1031 + goto check_mppe_56_40;
1032 + }
1033 + goto check_mppe;
1034 + }
1035 + p[5] &= ~MPPE_128BIT;
1036 + goto check_mppe_56_40;
1037 + }
1038 + if ((p[5] & ~MPPE_MPPC) == (MPPE_56BIT|MPPE_128BIT)) {
1039 + newret = CONFNAK;
1040 + if (ao->mppe_128) {
1041 + ho->mppe_128 = 1;
1042 + p[5] &= ~MPPE_56BIT;
1043 + BCOPY(p, opt_buf, CILEN_MPPE);
1044 + BCOPY(mppe_send_key, &opt_buf[CILEN_MPPE],
1045 + MPPE_MAX_KEY_LEN);
1046 + if (ccp_test(f->unit, opt_buf, CILEN_MPPE +
1047 + MPPE_MAX_KEY_LEN, 1) <= 0) {
1048 + ho->mppe_128 = 0;
1049 + p[5] |= MPPE_56BIT;
1050 + p[5] &= ~MPPE_128BIT;
1051 + goto check_mppe_56;
1052 + }
1053 + goto check_mppe;
1054 + }
1055 + p[5] &= ~MPPE_128BIT;
1056 + goto check_mppe_56;
1057 + }
1058 + if ((p[5] & ~MPPE_MPPC) == (MPPE_40BIT|MPPE_128BIT)) {
1059 + newret = CONFNAK;
1060 + if (ao->mppe_128) {
1061 + ho->mppe_128 = 1;
1062 + p[5] &= ~MPPE_40BIT;
1063 + BCOPY(p, opt_buf, CILEN_MPPE);
1064 + BCOPY(mppe_send_key, &opt_buf[CILEN_MPPE],
1065 + MPPE_MAX_KEY_LEN);
1066 + if (ccp_test(f->unit, opt_buf, CILEN_MPPE +
1067 + MPPE_MAX_KEY_LEN, 1) <= 0) {
1068 + ho->mppe_128 = 0;
1069 + p[5] |= MPPE_40BIT;
1070 + p[5] &= ~MPPE_128BIT;
1071 + goto check_mppe_40;
1072 + }
1073 + goto check_mppe;
1074 + }
1075 + p[5] &= ~MPPE_128BIT;
1076 + goto check_mppe_40;
1077 + }
1078 + if ((p[5] & ~MPPE_MPPC) == MPPE_128BIT) {
1079 + if (ao->mppe_128) {
1080 + ho->mppe_128 = 1;
1081 + BCOPY(p, opt_buf, CILEN_MPPE);
1082 + BCOPY(mppe_send_key, &opt_buf[CILEN_MPPE],
1083 + MPPE_MAX_KEY_LEN);
1084 + if (ccp_test(f->unit, opt_buf, CILEN_MPPE +
1085 + MPPE_MAX_KEY_LEN, 1) <= 0) {
1086 + ho->mppe_128 = 0;
1087 + p[5] &= ~MPPE_128BIT;
1088 + newret = CONFNAK;
1089 + }
1090 + goto check_mppe;
1091 + }
1092 + p[5] &= ~MPPE_128BIT;
1093 + newret = CONFNAK;
1094 + goto check_mppe;
1095 + }
1096 + check_mppe_56_40:
1097 + if ((p[5] & ~MPPE_MPPC) == (MPPE_40BIT|MPPE_56BIT)) {
1098 + newret = CONFNAK;
1099 + if (ao->mppe_56) {
1100 + ho->mppe_56 = 1;
1101 + p[5] &= ~MPPE_40BIT;
1102 + BCOPY(p, opt_buf, CILEN_MPPE);
1103 + BCOPY(mppe_send_key, &opt_buf[CILEN_MPPE],
1104 + MPPE_MAX_KEY_LEN);
1105 + if (ccp_test(f->unit, opt_buf, CILEN_MPPE +
1106 + MPPE_MAX_KEY_LEN, 1) <= 0) {
1107 + ho->mppe_56 = 0;
1108 + p[5] |= MPPE_40BIT;
1109 + p[5] &= ~MPPE_56BIT;
1110 + newret = CONFNAK;
1111 + goto check_mppe_40;
1112 + }
1113 + goto check_mppe;
1114 + }
1115 + p[5] &= ~MPPE_56BIT;
1116 + goto check_mppe_40;
1117 + }
1118 + check_mppe_56:
1119 + if ((p[5] & ~MPPE_MPPC) == MPPE_56BIT) {
1120 + if (ao->mppe_56) {
1121 + ho->mppe_56 = 1;
1122 + BCOPY(p, opt_buf, CILEN_MPPE);
1123 + BCOPY(mppe_send_key, &opt_buf[CILEN_MPPE],
1124 + MPPE_MAX_KEY_LEN);
1125 + if (ccp_test(f->unit, opt_buf, CILEN_MPPE +
1126 + MPPE_MAX_KEY_LEN, 1) <= 0) {
1127 + ho->mppe_56 = 0;
1128 + p[5] &= ~MPPE_56BIT;
1129 + newret = CONFNAK;
1130 + }
1131 + goto check_mppe;
1132 + }
1133 + p[5] &= ~MPPE_56BIT;
1134 + newret = CONFNAK;
1135 + goto check_mppe;
1136 + }
1137 + check_mppe_40:
1138 + if ((p[5] & ~MPPE_MPPC) == MPPE_40BIT) {
1139 + if (ao->mppe_40) {
1140 + ho->mppe_40 = 1;
1141 + BCOPY(p, opt_buf, CILEN_MPPE);
1142 + BCOPY(mppe_send_key, &opt_buf[CILEN_MPPE],
1143 + MPPE_MAX_KEY_LEN);
1144 + if (ccp_test(f->unit, opt_buf, CILEN_MPPE +
1145 + MPPE_MAX_KEY_LEN, 1) <= 0) {
1146 + ho->mppe_40 = 0;
1147 + p[5] &= ~MPPE_40BIT;
1148 + newret = CONFNAK;
1149 + }
1150 + goto check_mppe;
1151 + }
1152 + p[5] &= ~MPPE_40BIT;
1153 + }
1154 +
1155 + check_mppe:
1156 + if (!ho->mppe_40 && !ho->mppe_56 && !ho->mppe_128) {
1157 + if (wo->mppe_40 || wo->mppe_56 || wo->mppe_128) {
1158 + newret = CONFNAK;
1159 + p[2] |= (wo->mppe_stateless ? MPPE_STATELESS : 0);
1160 + p[5] |= (wo->mppe_40 ? MPPE_40BIT : 0) |
1161 + (wo->mppe_56 ? MPPE_56BIT : 0) |
1162 + (wo->mppe_128 ? MPPE_128BIT : 0) |
1163 + (wo->mppc ? MPPE_MPPC : 0);
1164 + } else {
1165 + ho->mppe = ho->mppe_stateless = 0;
1166 + }
1167 } else {
1168 - /* Neither are set. */
1169 - /* We cannot accept this. */
1170 - newret = CONFNAK;
1171 - /* Give the peer our idea of what can be used,
1172 - so it can choose and confirm */
1173 - ho->mppe = ao->mppe;
1174 - }
1175 -
1176 - /* rebuild the opts */
1177 - MPPE_OPTS_TO_CI(ho->mppe, &p[2]);
1178 - if (newret == CONFACK) {
1179 - u_char opt_buf[CILEN_MPPE + MPPE_MAX_KEY_LEN];
1180 - int mtu;
1181 -
1182 - BCOPY(p, opt_buf, CILEN_MPPE);
1183 - BCOPY(mppe_send_key, &opt_buf[CILEN_MPPE],
1184 - MPPE_MAX_KEY_LEN);
1185 - if (ccp_test(f->unit, opt_buf,
1186 - CILEN_MPPE + MPPE_MAX_KEY_LEN, 1) <= 0) {
1187 - /* This shouldn't happen, we've already tested it! */
1188 - error("MPPE required, but kernel has no support.");
1189 - lcp_close(f->unit, "MPPE required but not available");
1190 - newret = CONFREJ;
1191 - break;
1192 - }
1193 - /*
1194 - * We need to decrease the interface MTU by MPPE_PAD
1195 - * because MPPE frames **grow**. The kernel [must]
1196 - * allocate MPPE_PAD extra bytes in xmit buffers.
1197 - */
1198 - mtu = netif_get_mtu(f->unit);
1199 - if (mtu)
1200 - netif_set_mtu(f->unit, mtu - MPPE_PAD);
1201 - else
1202 - newret = CONFREJ;
1203 - }
1204 -
1205 - /*
1206 - * We have accepted MPPE or are willing to negotiate
1207 - * MPPE parameters. A CONFREJ is due to subsequent
1208 - * (non-MPPE) processing.
1209 - */
1210 - rej_for_ci_mppe = 0;
1211 - break;
1212 -#endif /* MPPE */
1213 + /* MPPE is not compatible with other compression types */
1214 + if (wo->mppe) {
1215 + ao->bsd_compress = 0;
1216 + ao->predictor_1 = 0;
1217 + ao->predictor_2 = 0;
1218 + ao->deflate = 0;
1219 + ao->lzs = 0;
1220 + }
1221 + }
1222 + if ((!ho->mppc || !ao->mppc) && !ho->mppe) {
1223 + p[2] = p2;
1224 + p[5] = p5;
1225 + newret = CONFREJ;
1226 + break;
1227 + }
1228 +
1229 + /*
1230 + * I have commented the code below because according to RFC1547
1231 + * MTU is only information for higher level protocols about
1232 + * "the maximum allowable length for a packet (q.v.) transmitted
1233 + * over a point-to-point link without incurring network layer
1234 + * fragmentation." Of course a PPP implementation should be able
1235 + * to handle overhead added by MPPE - in our case apropriate code
1236 + * is located in drivers/net/ppp_generic.c in the kernel sources.
1237 + *
1238 + * According to RFC1661:
1239 + * - when negotiated MRU is less than 1500 octets, a PPP
1240 + * implementation must still be able to receive at least 1500
1241 + * octets,
1242 + * - when PFC is negotiated, a PPP implementation is still
1243 + * required to receive frames with uncompressed protocol field.
1244 + *
1245 + * So why not to handle MPPE overhead without changing MTU value?
1246 + * I am sure that RFC3078, unfortunately silently, assumes that.
1247 + */
1248 +
1249 + /*
1250 + * We need to decrease the interface MTU by MPPE_PAD
1251 + * because MPPE frames **grow**. The kernel [must]
1252 + * allocate MPPE_PAD extra bytes in xmit buffers.
1253 + */
1254 + /*
1255 + mtu = netif_get_mtu(f->unit);
1256 + if (mtu) {
1257 + netif_set_mtu(f->unit, mtu - MPPE_PAD);
1258 + } else {
1259 + newret = CONFREJ;
1260 + if (ccp_wantoptions[f->unit].mppe) {
1261 + error("Cannot adjust MTU needed by MPPE.");
1262 + lcp_close(f->unit, "Cannot adjust MTU needed by MPPE.");
1263 + }
1264 + }
1265 + */
1266 + break;
1267 + #endif /* MPPE */
1268 +
1269 + case CI_LZS:
1270 + if (!ao->lzs || clen != CILEN_LZS) {
1271 + newret = CONFREJ;
1272 + break;
1273 + }
1274 +
1275 + ho->lzs = 1;
1276 + ho->lzs_hists = (p[2] << 8) | p[3];
1277 + ho->lzs_mode = p[4];
1278 + if ((ho->lzs_hists != ao->lzs_hists) ||
1279 + (ho->lzs_mode != ao->lzs_mode)) {
1280 + newret = CONFNAK;
1281 + if (!dont_nak) {
1282 + p[2] = ao->lzs_hists >> 8;
1283 + p[3] = ao->lzs_hists & 0xff;
1284 + p[4] = ao->lzs_mode;
1285 + } else
1286 + break;
1287 + }
1288 +
1289 + if (p == p0 && ccp_test(f->unit, p, CILEN_LZS, 1) <= 0) {
1290 + newret = CONFREJ;
1291 + }
1292 + break;
1293 case CI_DEFLATE:
1294 case CI_DEFLATE_DRAFT:
1295 if (!ao->deflate || clen != CILEN_DEFLATE
1296 @@ -1344,12 +1830,6 @@ ccp_reqci(f, p, lenp, dont_nak)
1297 else
1298 *lenp = retp - p0;
1299 }
1300 -#ifdef MPPE
1301 - if (ret == CONFREJ && ao->mppe && rej_for_ci_mppe) {
1302 - error("MPPE required but peer negotiation failed");
1303 - lcp_close(f->unit, "MPPE required but peer negotiation failed");
1304 - }
1305 -#endif
1306 return ret;
1307 }
1308
1309 @@ -1371,24 +1851,35 @@ method_name(opt, opt2)
1310 char *p = result;
1311 char *q = result + sizeof(result); /* 1 past result */
1312
1313 - slprintf(p, q - p, "MPPE ");
1314 - p += 5;
1315 - if (opt->mppe & MPPE_OPT_128) {
1316 - slprintf(p, q - p, "128-bit ");
1317 - p += 8;
1318 - }
1319 - if (opt->mppe & MPPE_OPT_40) {
1320 - slprintf(p, q - p, "40-bit ");
1321 - p += 7;
1322 - }
1323 - if (opt->mppe & MPPE_OPT_STATEFUL)
1324 - slprintf(p, q - p, "stateful");
1325 - else
1326 - slprintf(p, q - p, "stateless");
1327 -
1328 + if (opt->mppe) {
1329 + if (opt->mppc) {
1330 + slprintf(p, q - p, "MPPC/MPPE ");
1331 + p += 10;
1332 + } else {
1333 + slprintf(p, q - p, "MPPE ");
1334 + p += 5;
1335 + }
1336 + if (opt->mppe_128) {
1337 + slprintf(p, q - p, "128-bit ");
1338 + p += 8;
1339 + } else if (opt->mppe_56) {
1340 + slprintf(p, q - p, "56-bit ");
1341 + p += 7;
1342 + } else if (opt->mppe_40) {
1343 + slprintf(p, q - p, "40-bit ");
1344 + p += 7;
1345 + }
1346 + if (opt->mppe_stateless)
1347 + slprintf(p, q - p, "stateless");
1348 + else
1349 + slprintf(p, q - p, "stateful");
1350 + } else if (opt->mppc)
1351 + slprintf(p, q - p, "MPPC");
1352 break;
1353 }
1354 -#endif
1355 +#endif /* MPPE */
1356 + case CI_LZS:
1357 + return "Stac LZS";
1358 case CI_DEFLATE:
1359 case CI_DEFLATE_DRAFT:
1360 if (opt2 != NULL && opt2->deflate_size != opt->deflate_size)
1361 @@ -1444,12 +1935,12 @@ ccp_up(f)
1362 } else if (ANY_COMPRESS(*ho))
1363 notice("%s transmit compression enabled", method_name(ho, NULL));
1364 #ifdef MPPE
1365 - if (go->mppe) {
1366 + if (go->mppe || go->mppc) {
1367 BZERO(mppe_recv_key, MPPE_MAX_KEY_LEN);
1368 BZERO(mppe_send_key, MPPE_MAX_KEY_LEN);
1369 continue_networks(f->unit); /* Bring up IP et al */
1370 }
1371 -#endif
1372 +#endif /* MPPE */
1373 }
1374
1375 /*
1376 @@ -1472,7 +1963,7 @@ ccp_down(f)
1377 lcp_close(f->unit, "MPPE disabled");
1378 }
1379 }
1380 -#endif
1381 +#endif /* MPPE */
1382 }
1383
1384 /*
1385 @@ -1532,24 +2023,28 @@ ccp_printpkt(p, plen, printer, arg)
1386 #ifdef MPPE
1387 case CI_MPPE:
1388 if (optlen >= CILEN_MPPE) {
1389 - u_char mppe_opts;
1390 -
1391 - MPPE_CI_TO_OPTS(&p[2], mppe_opts);
1392 - printer(arg, "mppe %s %s %s %s %s %s%s",
1393 - (p[2] & MPPE_H_BIT)? "+H": "-H",
1394 - (p[5] & MPPE_M_BIT)? "+M": "-M",
1395 - (p[5] & MPPE_S_BIT)? "+S": "-S",
1396 - (p[5] & MPPE_L_BIT)? "+L": "-L",
1397 + printer(arg, "mppe %s %s %s %s %s %s",
1398 + (p[2] & MPPE_STATELESS)? "+H": "-H",
1399 + (p[5] & MPPE_56BIT)? "+M": "-M",
1400 + (p[5] & MPPE_128BIT)? "+S": "-S",
1401 + (p[5] & MPPE_40BIT)? "+L": "-L",
1402 (p[5] & MPPE_D_BIT)? "+D": "-D",
1403 - (p[5] & MPPE_C_BIT)? "+C": "-C",
1404 - (mppe_opts & MPPE_OPT_UNKNOWN)? " +U": "");
1405 - if (mppe_opts & MPPE_OPT_UNKNOWN)
1406 + (p[5] & MPPE_MPPC)? "+C": "-C");
1407 + if ((p[5] & ~(MPPE_56BIT | MPPE_128BIT | MPPE_40BIT |
1408 + MPPE_D_BIT | MPPE_MPPC)) ||
1409 + (p[2] & ~MPPE_STATELESS))
1410 printer(arg, " (%.2x %.2x %.2x %.2x)",
1411 p[2], p[3], p[4], p[5]);
1412 p += CILEN_MPPE;
1413 }
1414 break;
1415 -#endif
1416 +#endif /* MPPE */
1417 + case CI_LZS:
1418 + if (optlen >= CILEN_LZS) {
1419 + printer(arg, "lzs %.2x %.2x %.2x", p[2], p[3], p[4]);
1420 + p += CILEN_LZS;
1421 + }
1422 + break;
1423 case CI_DEFLATE:
1424 case CI_DEFLATE_DRAFT:
1425 if (optlen >= CILEN_DEFLATE) {
1426 @@ -1635,6 +2130,7 @@ ccp_datainput(unit, pkt, len)
1427 error("Lost compression sync: disabling compression");
1428 ccp_close(unit, "Lost compression sync");
1429 #ifdef MPPE
1430 + /* My module dosn't need this. J.D., 2003-07-06 */
1431 /*
1432 * If we were doing MPPE, we must also take the link down.
1433 */
1434 @@ -1642,9 +2138,18 @@ ccp_datainput(unit, pkt, len)
1435 error("Too many MPPE errors, closing LCP");
1436 lcp_close(unit, "Too many MPPE errors");
1437 }
1438 -#endif
1439 +#endif /* MPPE */
1440 } else {
1441 /*
1442 + * When LZS or MPPE/MPPC is negotiated we just send CCP_RESETREQ
1443 + * and don't wait for CCP_RESETACK
1444 + */
1445 + if ((ccp_gotoptions[f->unit].method == CI_LZS) ||
1446 + (ccp_gotoptions[f->unit].method == CI_MPPE)) {
1447 + fsm_sdata(f, CCP_RESETREQ, f->reqid = ++f->id, NULL, 0);
1448 + return;
1449 + }
1450 + /*
1451 * Send a reset-request to reset the peer's compressor.
1452 * We don't do that if we are still waiting for an
1453 * acknowledgement to a previous reset-request.
1454 --- a/pppd/ccp.h
1455 +++ b/pppd/ccp.h
1456 @@ -37,9 +37,17 @@ typedef struct ccp_options {
1457 bool predictor_2; /* do Predictor-2? */
1458 bool deflate_correct; /* use correct code for deflate? */
1459 bool deflate_draft; /* use draft RFC code for deflate? */
1460 + bool lzs; /* do Stac LZS? */
1461 + bool mppc; /* do MPPC? */
1462 bool mppe; /* do MPPE? */
1463 + bool mppe_40; /* allow 40 bit encryption? */
1464 + bool mppe_56; /* allow 56 bit encryption? */
1465 + bool mppe_128; /* allow 128 bit encryption? */
1466 + bool mppe_stateless; /* allow stateless encryption */
1467 u_short bsd_bits; /* # bits/code for BSD Compress */
1468 u_short deflate_size; /* lg(window size) for Deflate */
1469 + u_short lzs_mode; /* LZS check mode */
1470 + u_short lzs_hists; /* number of LZS histories */
1471 short method; /* code for chosen compression method */
1472 } ccp_options;
1473
1474 --- a/pppd/chap_ms.c
1475 +++ b/pppd/chap_ms.c
1476 @@ -898,13 +898,17 @@ set_mppe_enc_types(int policy, int types
1477 /*
1478 * Disable undesirable encryption types. Note that we don't ENABLE
1479 * any encryption types, to avoid overriding manual configuration.
1480 + *
1481 + * It seems that 56 bit keys are unsupported in MS-RADIUS (see RFC 2548)
1482 */
1483 switch(types) {
1484 case MPPE_ENC_TYPES_RC4_40:
1485 - ccp_wantoptions[0].mppe &= ~MPPE_OPT_128; /* disable 128-bit */
1486 + ccp_wantoptions[0].mppe_128 = 0; /* disable 128-bit */
1487 + ccp_wantoptions[0].mppe_56 = 0; /* disable 56-bit */
1488 break;
1489 case MPPE_ENC_TYPES_RC4_128:
1490 - ccp_wantoptions[0].mppe &= ~MPPE_OPT_40; /* disable 40-bit */
1491 + ccp_wantoptions[0].mppe_56 = 0; /* disable 56-bit */
1492 + ccp_wantoptions[0].mppe_40 = 0; /* disable 40-bit */
1493 break;
1494 default:
1495 break;