1 /* $Id: isdn_ppp.c,v 1.1.2.3 2004/02/10 01:07:13 keil Exp $
2 *
3 * Linux ISDN subsystem, functions for synchronous PPP (linklevel).
4 *
5 * Copyright 1995,96 by Michael Hipp (Michael.Hipp@student.uni-tuebingen.de)
6 *
7 * This software may be used and distributed according to the terms
8 * of the GNU General Public License, incorporated herein by reference.
9 *
10 */
11
12 #include <linux/isdn.h>
13 #include <linux/poll.h>
14 #include <linux/ppp-comp.h>
15 #ifdef CONFIG_IPPP_FILTER
16 #include <linux/filter.h>
17 #endif
18
19 #include "isdn_common.h"
20 #include "isdn_ppp.h"
21 #include "isdn_net.h"
22
23 #ifndef PPP_IPX
24 #define PPP_IPX 0x002b
25 #endif
26
27 /* Prototypes */
28 static int isdn_ppp_fill_rq(unsigned char *buf, int len, int proto, int slot);
29 static int isdn_ppp_closewait(int slot);
30 static void isdn_ppp_push_higher(isdn_net_dev * net_dev, isdn_net_local * lp,
31 struct sk_buff *skb, int proto);
32 static int isdn_ppp_if_get_unit(char *namebuf);
33 static int isdn_ppp_set_compressor(struct ippp_struct *is,struct isdn_ppp_comp_data *);
34 static struct sk_buff *isdn_ppp_decompress(struct sk_buff *,
35 struct ippp_struct *,struct ippp_struct *,int *proto);
36 static void isdn_ppp_receive_ccp(isdn_net_dev * net_dev, isdn_net_local * lp,
37 struct sk_buff *skb,int proto);
38 static struct sk_buff *isdn_ppp_compress(struct sk_buff *skb_in,int *proto,
39 struct ippp_struct *is,struct ippp_struct *master,int type);
40 static void isdn_ppp_send_ccp(isdn_net_dev *net_dev, isdn_net_local *lp,
41 struct sk_buff *skb);
42
43 /* New CCP stuff */
44 static void isdn_ppp_ccp_kickup(struct ippp_struct *is);
45 static void isdn_ppp_ccp_xmit_reset(struct ippp_struct *is, int proto,
46 unsigned char code, unsigned char id,
47 unsigned char *data, int len);
48 static struct ippp_ccp_reset *isdn_ppp_ccp_reset_alloc(struct ippp_struct *is);
49 static void isdn_ppp_ccp_reset_free(struct ippp_struct *is);
50 static void isdn_ppp_ccp_reset_free_state(struct ippp_struct *is,
51 unsigned char id);
52 static void isdn_ppp_ccp_timer_callback(unsigned long closure);
53 static struct ippp_ccp_reset_state *isdn_ppp_ccp_reset_alloc_state(struct ippp_struct *is,
54 unsigned char id);
55 static void isdn_ppp_ccp_reset_trans(struct ippp_struct *is,
56 struct isdn_ppp_resetparams *rp);
57 static void isdn_ppp_ccp_reset_ack_rcvd(struct ippp_struct *is,
58 unsigned char id);
59
60
61
62 #ifdef CONFIG_ISDN_MPP
63 static ippp_bundle * isdn_ppp_bundle_arr = NULL;
64
65 static int isdn_ppp_mp_bundle_array_init(void);
66 static int isdn_ppp_mp_init( isdn_net_local * lp, ippp_bundle * add_to );
67 static void isdn_ppp_mp_receive(isdn_net_dev * net_dev, isdn_net_local * lp,
68 struct sk_buff *skb);
69 static void isdn_ppp_mp_cleanup( isdn_net_local * lp );
70
71 static int isdn_ppp_bundle(struct ippp_struct *, int unit);
72 #endif /* CONFIG_ISDN_MPP */
73
74 char *isdn_ppp_revision = "$Revision: 1.1.2.3 $";
75
76 static struct ippp_struct *ippp_table[ISDN_MAX_CHANNELS];
77
78 static struct isdn_ppp_compressor *ipc_head = NULL;
79
80 /*
81 * frame log (debug)
82 */
83 static void
isdn_ppp_frame_log(char * info,char * data,int len,int maxlen,int unit,int slot)84 isdn_ppp_frame_log(char *info, char *data, int len, int maxlen,int unit,int slot)
85 {
86 int cnt,
87 j,
88 i;
89 char buf[80];
90
91 if (len < maxlen)
92 maxlen = len;
93
94 for (i = 0, cnt = 0; cnt < maxlen; i++) {
95 for (j = 0; j < 16 && cnt < maxlen; j++, cnt++)
96 sprintf(buf + j * 3, "%02x ", (unsigned char) data[cnt]);
97 printk(KERN_DEBUG "[%d/%d].%s[%d]: %s\n",unit,slot, info, i, buf);
98 }
99 }
100
101 /*
102 * unbind isdn_net_local <=> ippp-device
103 * note: it can happen, that we hangup/free the master before the slaves
104 * in this case we bind another lp to the master device
105 */
106 int
isdn_ppp_free(isdn_net_local * lp)107 isdn_ppp_free(isdn_net_local * lp)
108 {
109 struct ippp_struct *is;
110
111 if (lp->ppp_slot < 0 || lp->ppp_slot >= ISDN_MAX_CHANNELS) {
112 printk(KERN_ERR "%s: ppp_slot(%d) out of range\n",
113 __func__, lp->ppp_slot);
114 return 0;
115 }
116
117 #ifdef CONFIG_ISDN_MPP
118 spin_lock(&lp->netdev->pb->lock);
119 #endif
120 isdn_net_rm_from_bundle(lp);
121 #ifdef CONFIG_ISDN_MPP
122 if (lp->netdev->pb->ref_ct == 1) /* last link in queue? */
123 isdn_ppp_mp_cleanup(lp);
124
125 lp->netdev->pb->ref_ct--;
126 spin_unlock(&lp->netdev->pb->lock);
127 #endif /* CONFIG_ISDN_MPP */
128 if (lp->ppp_slot < 0 || lp->ppp_slot >= ISDN_MAX_CHANNELS) {
129 printk(KERN_ERR "%s: ppp_slot(%d) now invalid\n",
130 __func__, lp->ppp_slot);
131 return 0;
132 }
133 is = ippp_table[lp->ppp_slot];
134 if ((is->state & IPPP_CONNECT))
135 isdn_ppp_closewait(lp->ppp_slot); /* force wakeup on ippp device */
136 else if (is->state & IPPP_ASSIGNED)
137 is->state = IPPP_OPEN; /* fallback to 'OPEN but not ASSIGNED' state */
138
139 if (is->debug & 0x1)
140 printk(KERN_DEBUG "isdn_ppp_free %d %lx %lx\n", lp->ppp_slot, (long) lp, (long) is->lp);
141
142 is->lp = NULL; /* link is down .. set lp to NULL */
143 lp->ppp_slot = -1; /* is this OK ?? */
144
145 return 0;
146 }
147
148 /*
149 * bind isdn_net_local <=> ippp-device
150 *
151 * This function is allways called with holding dev->lock so
152 * no additional lock is needed
153 */
154 int
isdn_ppp_bind(isdn_net_local * lp)155 isdn_ppp_bind(isdn_net_local * lp)
156 {
157 int i;
158 int unit = 0;
159 struct ippp_struct *is;
160 int retval;
161
162 if (lp->pppbind < 0) { /* device bounded to ippp device ? */
163 isdn_net_dev *net_dev = dev->netdev;
164 char exclusive[ISDN_MAX_CHANNELS]; /* exclusive flags */
165 memset(exclusive, 0, ISDN_MAX_CHANNELS);
166 while (net_dev) { /* step through net devices to find exclusive minors */
167 isdn_net_local *lp = net_dev->local;
168 if (lp->pppbind >= 0)
169 exclusive[lp->pppbind] = 1;
170 net_dev = net_dev->next;
171 }
172 /*
173 * search a free device / slot
174 */
175 for (i = 0; i < ISDN_MAX_CHANNELS; i++) {
176 if (ippp_table[i]->state == IPPP_OPEN && !exclusive[ippp_table[i]->minor]) { /* OPEN, but not connected! */
177 break;
178 }
179 }
180 } else {
181 for (i = 0; i < ISDN_MAX_CHANNELS; i++) {
182 if (ippp_table[i]->minor == lp->pppbind &&
183 (ippp_table[i]->state & IPPP_OPEN) == IPPP_OPEN)
184 break;
185 }
186 }
187
188 if (i >= ISDN_MAX_CHANNELS) {
189 printk(KERN_WARNING "isdn_ppp_bind: Can't find a (free) connection to the ipppd daemon.\n");
190 retval = -1;
191 goto out;
192 }
193 /* get unit number from interface name .. ugly! */
194 unit = isdn_ppp_if_get_unit(lp->netdev->dev->name);
195 if (unit < 0) {
196 printk(KERN_ERR "isdn_ppp_bind: illegal interface name %s.\n",
197 lp->netdev->dev->name);
198 retval = -1;
199 goto out;
200 }
201
202 lp->ppp_slot = i;
203 is = ippp_table[i];
204 is->lp = lp;
205 is->unit = unit;
206 is->state = IPPP_OPEN | IPPP_ASSIGNED; /* assigned to a netdevice but not connected */
207 #ifdef CONFIG_ISDN_MPP
208 retval = isdn_ppp_mp_init(lp, NULL);
209 if (retval < 0)
210 goto out;
211 #endif /* CONFIG_ISDN_MPP */
212
213 retval = lp->ppp_slot;
214
215 out:
216 return retval;
217 }
218
219 /*
220 * kick the ipppd on the device
221 * (wakes up daemon after B-channel connect)
222 */
223
224 void
isdn_ppp_wakeup_daemon(isdn_net_local * lp)225 isdn_ppp_wakeup_daemon(isdn_net_local * lp)
226 {
227 if (lp->ppp_slot < 0 || lp->ppp_slot >= ISDN_MAX_CHANNELS) {
228 printk(KERN_ERR "%s: ppp_slot(%d) out of range\n",
229 __func__, lp->ppp_slot);
230 return;
231 }
232 ippp_table[lp->ppp_slot]->state = IPPP_OPEN | IPPP_CONNECT | IPPP_NOBLOCK;
233 wake_up_interruptible(&ippp_table[lp->ppp_slot]->wq);
234 }
235
236 /*
237 * there was a hangup on the netdevice
238 * force wakeup of the ippp device
239 * go into 'device waits for release' state
240 */
241 static int
isdn_ppp_closewait(int slot)242 isdn_ppp_closewait(int slot)
243 {
244 struct ippp_struct *is;
245
246 if (slot < 0 || slot >= ISDN_MAX_CHANNELS) {
247 printk(KERN_ERR "%s: slot(%d) out of range\n",
248 __func__, slot);
249 return 0;
250 }
251 is = ippp_table[slot];
252 if (is->state)
253 wake_up_interruptible(&is->wq);
254 is->state = IPPP_CLOSEWAIT;
255 return 1;
256 }
257
258 /*
259 * isdn_ppp_find_slot / isdn_ppp_free_slot
260 */
261
262 static int
isdn_ppp_get_slot(void)263 isdn_ppp_get_slot(void)
264 {
265 int i;
266 for (i = 0; i < ISDN_MAX_CHANNELS; i++) {
267 if (!ippp_table[i]->state)
268 return i;
269 }
270 return -1;
271 }
272
273 /*
274 * isdn_ppp_open
275 */
276
277 int
isdn_ppp_open(int min,struct file * file)278 isdn_ppp_open(int min, struct file *file)
279 {
280 int slot;
281 struct ippp_struct *is;
282
283 if (min < 0 || min >= ISDN_MAX_CHANNELS)
284 return -ENODEV;
285
286 slot = isdn_ppp_get_slot();
287 if (slot < 0) {
288 return -EBUSY;
289 }
290 is = file->private_data = ippp_table[slot];
291
292 printk(KERN_DEBUG "ippp, open, slot: %d, minor: %d, state: %04x\n",
293 slot, min, is->state);
294
295 /* compression stuff */
296 is->link_compressor = is->compressor = NULL;
297 is->link_decompressor = is->decompressor = NULL;
298 is->link_comp_stat = is->comp_stat = NULL;
299 is->link_decomp_stat = is->decomp_stat = NULL;
300 is->compflags = 0;
301
302 is->reset = isdn_ppp_ccp_reset_alloc(is);
303
304 is->lp = NULL;
305 is->mp_seqno = 0; /* MP sequence number */
306 is->pppcfg = 0; /* ppp configuration */
307 is->mpppcfg = 0; /* mppp configuration */
308 is->last_link_seqno = -1; /* MP: maybe set to Bundle-MIN, when joining a bundle ?? */
309 is->unit = -1; /* set, when we have our interface */
310 is->mru = 1524; /* MRU, default 1524 */
311 is->maxcid = 16; /* VJ: maxcid */
312 is->tk = current;
313 init_waitqueue_head(&is->wq);
314 is->first = is->rq + NUM_RCV_BUFFS - 1; /* receive queue */
315 is->last = is->rq;
316 is->minor = min;
317 #ifdef CONFIG_ISDN_PPP_VJ
318 /*
319 * VJ header compression init
320 */
321 is->slcomp = slhc_init(16, 16); /* not necessary for 2. link in bundle */
322 #endif
323 #ifdef CONFIG_IPPP_FILTER
324 is->pass_filter = NULL;
325 is->active_filter = NULL;
326 #endif
327 is->state = IPPP_OPEN;
328
329 return 0;
330 }
331
332 /*
333 * release ippp device
334 */
335 void
isdn_ppp_release(int min,struct file * file)336 isdn_ppp_release(int min, struct file *file)
337 {
338 int i;
339 struct ippp_struct *is;
340
341 if (min < 0 || min >= ISDN_MAX_CHANNELS)
342 return;
343 is = file->private_data;
344
345 if (!is) {
346 printk(KERN_ERR "%s: no file->private_data\n", __func__);
347 return;
348 }
349 if (is->debug & 0x1)
350 printk(KERN_DEBUG "ippp: release, minor: %d %lx\n", min, (long) is->lp);
351
352 if (is->lp) { /* a lp address says: this link is still up */
353 isdn_net_dev *p = is->lp->netdev;
354
355 if (!p) {
356 printk(KERN_ERR "%s: no lp->netdev\n", __func__);
357 return;
358 }
359 is->state &= ~IPPP_CONNECT; /* -> effect: no call of wakeup */
360 /*
361 * isdn_net_hangup() calls isdn_ppp_free()
362 * isdn_ppp_free() sets is->lp to NULL and lp->ppp_slot to -1
363 * removing the IPPP_CONNECT flag omits calling of isdn_ppp_wakeup_daemon()
364 */
365 isdn_net_hangup(p->dev);
366 }
367 for (i = 0; i < NUM_RCV_BUFFS; i++) {
368 kfree(is->rq[i].buf);
369 is->rq[i].buf = NULL;
370 }
371 is->first = is->rq + NUM_RCV_BUFFS - 1; /* receive queue */
372 is->last = is->rq;
373
374 #ifdef CONFIG_ISDN_PPP_VJ
375 /* TODO: if this was the previous master: link the slcomp to the new master */
376 slhc_free(is->slcomp);
377 is->slcomp = NULL;
378 #endif
379 #ifdef CONFIG_IPPP_FILTER
380 kfree(is->pass_filter);
381 is->pass_filter = NULL;
382 kfree(is->active_filter);
383 is->active_filter = NULL;
384 #endif
385
386 /* TODO: if this was the previous master: link the stuff to the new master */
387 if(is->comp_stat)
388 is->compressor->free(is->comp_stat);
389 if(is->link_comp_stat)
390 is->link_compressor->free(is->link_comp_stat);
391 if(is->link_decomp_stat)
392 is->link_decompressor->free(is->link_decomp_stat);
393 if(is->decomp_stat)
394 is->decompressor->free(is->decomp_stat);
395 is->compressor = is->link_compressor = NULL;
396 is->decompressor = is->link_decompressor = NULL;
397 is->comp_stat = is->link_comp_stat = NULL;
398 is->decomp_stat = is->link_decomp_stat = NULL;
399
400 /* Clean up if necessary */
401 if(is->reset)
402 isdn_ppp_ccp_reset_free(is);
403
404 /* this slot is ready for new connections */
405 is->state = 0;
406 }
407
408 /*
409 * get_arg .. ioctl helper
410 */
411 static int
get_arg(void __user * b,void * val,int len)412 get_arg(void __user *b, void *val, int len)
413 {
414 if (len <= 0)
415 len = sizeof(void *);
416 if (copy_from_user(val, b, len))
417 return -EFAULT;
418 return 0;
419 }
420
421 /*
422 * set arg .. ioctl helper
423 */
424 static int
set_arg(void __user * b,void * val,int len)425 set_arg(void __user *b, void *val,int len)
426 {
427 if(len <= 0)
428 len = sizeof(void *);
429 if (copy_to_user(b, val, len))
430 return -EFAULT;
431 return 0;
432 }
433
434 #ifdef CONFIG_IPPP_FILTER
get_filter(void __user * arg,struct sock_filter ** p)435 static int get_filter(void __user *arg, struct sock_filter **p)
436 {
437 struct sock_fprog uprog;
438 struct sock_filter *code = NULL;
439 int len, err;
440
441 if (copy_from_user(&uprog, arg, sizeof(uprog)))
442 return -EFAULT;
443
444 if (!uprog.len) {
445 *p = NULL;
446 return 0;
447 }
448
449 /* uprog.len is unsigned short, so no overflow here */
450 len = uprog.len * sizeof(struct sock_filter);
451 code = kmalloc(len, GFP_KERNEL);
452 if (code == NULL)
453 return -ENOMEM;
454
455 if (copy_from_user(code, uprog.filter, len)) {
456 kfree(code);
457 return -EFAULT;
458 }
459
460 err = sk_chk_filter(code, uprog.len);
461 if (err) {
462 kfree(code);
463 return err;
464 }
465
466 *p = code;
467 return uprog.len;
468 }
469 #endif /* CONFIG_IPPP_FILTER */
470
471 /*
472 * ippp device ioctl
473 */
474 int
isdn_ppp_ioctl(int min,struct file * file,unsigned int cmd,unsigned long arg)475 isdn_ppp_ioctl(int min, struct file *file, unsigned int cmd, unsigned long arg)
476 {
477 unsigned long val;
478 int r,i,j;
479 struct ippp_struct *is;
480 isdn_net_local *lp;
481 struct isdn_ppp_comp_data data;
482 void __user *argp = (void __user *)arg;
483
484 is = (struct ippp_struct *) file->private_data;
485 lp = is->lp;
486
487 if (is->debug & 0x1)
488 printk(KERN_DEBUG "isdn_ppp_ioctl: minor: %d cmd: %x state: %x\n", min, cmd, is->state);
489
490 if (!(is->state & IPPP_OPEN))
491 return -EINVAL;
492
493 switch (cmd) {
494 case PPPIOCBUNDLE:
495 #ifdef CONFIG_ISDN_MPP
496 if (!(is->state & IPPP_CONNECT))
497 return -EINVAL;
498 if ((r = get_arg(argp, &val, sizeof(val) )))
499 return r;
500 printk(KERN_DEBUG "iPPP-bundle: minor: %d, slave unit: %d, master unit: %d\n",
501 (int) min, (int) is->unit, (int) val);
502 return isdn_ppp_bundle(is, val);
503 #else
504 return -1;
505 #endif
506 break;
507 case PPPIOCGUNIT: /* get ppp/isdn unit number */
508 if ((r = set_arg(argp, &is->unit, sizeof(is->unit) )))
509 return r;
510 break;
511 case PPPIOCGIFNAME:
512 if(!lp)
513 return -EINVAL;
514 if ((r = set_arg(argp, lp->netdev->dev->name,
515 strlen(lp->netdev->dev->name))))
516 return r;
517 break;
518 case PPPIOCGMPFLAGS: /* get configuration flags */
519 if ((r = set_arg(argp, &is->mpppcfg, sizeof(is->mpppcfg) )))
520 return r;
521 break;
522 case PPPIOCSMPFLAGS: /* set configuration flags */
523 if ((r = get_arg(argp, &val, sizeof(val) )))
524 return r;
525 is->mpppcfg = val;
526 break;
527 case PPPIOCGFLAGS: /* get configuration flags */
528 if ((r = set_arg(argp, &is->pppcfg,sizeof(is->pppcfg) )))
529 return r;
530 break;
531 case PPPIOCSFLAGS: /* set configuration flags */
532 if ((r = get_arg(argp, &val, sizeof(val) ))) {
533 return r;
534 }
535 if (val & SC_ENABLE_IP && !(is->pppcfg & SC_ENABLE_IP) && (is->state & IPPP_CONNECT)) {
536 if (lp) {
537 /* OK .. we are ready to send buffers */
538 is->pppcfg = val; /* isdn_ppp_xmit test for SC_ENABLE_IP !!! */
539 netif_wake_queue(lp->netdev->dev);
540 break;
541 }
542 }
543 is->pppcfg = val;
544 break;
545 case PPPIOCGIDLE: /* get idle time information */
546 if (lp) {
547 struct ppp_idle pidle;
548 pidle.xmit_idle = pidle.recv_idle = lp->huptimer;
549 if ((r = set_arg(argp, &pidle,sizeof(struct ppp_idle))))
550 return r;
551 }
552 break;
553 case PPPIOCSMRU: /* set receive unit size for PPP */
554 if ((r = get_arg(argp, &val, sizeof(val) )))
555 return r;
556 is->mru = val;
557 break;
558 case PPPIOCSMPMRU:
559 break;
560 case PPPIOCSMPMTU:
561 break;
562 case PPPIOCSMAXCID: /* set the maximum compression slot id */
563 if ((r = get_arg(argp, &val, sizeof(val) )))
564 return r;
565 val++;
566 if (is->maxcid != val) {
567 #ifdef CONFIG_ISDN_PPP_VJ
568 struct slcompress *sltmp;
569 #endif
570 if (is->debug & 0x1)
571 printk(KERN_DEBUG "ippp, ioctl: changed MAXCID to %ld\n", val);
572 is->maxcid = val;
573 #ifdef CONFIG_ISDN_PPP_VJ
574 sltmp = slhc_init(16, val);
575 if (!sltmp) {
576 printk(KERN_ERR "ippp, can't realloc slhc struct\n");
577 return -ENOMEM;
578 }
579 if (is->slcomp)
580 slhc_free(is->slcomp);
581 is->slcomp = sltmp;
582 #endif
583 }
584 break;
585 case PPPIOCGDEBUG:
586 if ((r = set_arg(argp, &is->debug, sizeof(is->debug) )))
587 return r;
588 break;
589 case PPPIOCSDEBUG:
590 if ((r = get_arg(argp, &val, sizeof(val) )))
591 return r;
592 is->debug = val;
593 break;
594 case PPPIOCGCOMPRESSORS:
595 {
596 unsigned long protos[8] = {0,};
597 struct isdn_ppp_compressor *ipc = ipc_head;
598 while(ipc) {
599 j = ipc->num / (sizeof(long)*8);
600 i = ipc->num % (sizeof(long)*8);
601 if(j < 8)
602 protos[j] |= (0x1<<i);
603 ipc = ipc->next;
604 }
605 if ((r = set_arg(argp,protos,8*sizeof(long) )))
606 return r;
607 }
608 break;
609 case PPPIOCSCOMPRESSOR:
610 if ((r = get_arg(argp, &data, sizeof(struct isdn_ppp_comp_data))))
611 return r;
612 return isdn_ppp_set_compressor(is, &data);
613 case PPPIOCGCALLINFO:
614 {
615 struct pppcallinfo pci;
616 memset((char *) &pci,0,sizeof(struct pppcallinfo));
617 if(lp)
618 {
619 strncpy(pci.local_num,lp->msn,63);
620 if(lp->dial) {
621 strncpy(pci.remote_num,lp->dial->num,63);
622 }
623 pci.charge_units = lp->charge;
624 if(lp->outgoing)
625 pci.calltype = CALLTYPE_OUTGOING;
626 else
627 pci.calltype = CALLTYPE_INCOMING;
628 if(lp->flags & ISDN_NET_CALLBACK)
629 pci.calltype |= CALLTYPE_CALLBACK;
630 }
631 return set_arg(argp,&pci,sizeof(struct pppcallinfo));
632 }
633 #ifdef CONFIG_IPPP_FILTER
634 case PPPIOCSPASS:
635 {
636 struct sock_filter *code;
637 int len = get_filter(argp, &code);
638 if (len < 0)
639 return len;
640 kfree(is->pass_filter);
641 is->pass_filter = code;
642 is->pass_len = len;
643 break;
644 }
645 case PPPIOCSACTIVE:
646 {
647 struct sock_filter *code;
648 int len = get_filter(argp, &code);
649 if (len < 0)
650 return len;
651 kfree(is->active_filter);
652 is->active_filter = code;
653 is->active_len = len;
654 break;
655 }
656 #endif /* CONFIG_IPPP_FILTER */
657 default:
658 break;
659 }
660 return 0;
661 }
662
663 unsigned int
isdn_ppp_poll(struct file * file,poll_table * wait)664 isdn_ppp_poll(struct file *file, poll_table * wait)
665 {
666 u_int mask;
667 struct ippp_buf_queue *bf, *bl;
668 u_long flags;
669 struct ippp_struct *is;
670
671 is = file->private_data;
672
673 if (is->debug & 0x2)
674 printk(KERN_DEBUG "isdn_ppp_poll: minor: %d\n",
675 iminor(file->f_path.dentry->d_inode));
676
677 /* just registers wait_queue hook. This doesn't really wait. */
678 poll_wait(file, &is->wq, wait);
679
680 if (!(is->state & IPPP_OPEN)) {
681 if(is->state == IPPP_CLOSEWAIT)
682 return POLLHUP;
683 printk(KERN_DEBUG "isdn_ppp: device not open\n");
684 return POLLERR;
685 }
686 /* we're always ready to send .. */
687 mask = POLLOUT | POLLWRNORM;
688
689 spin_lock_irqsave(&is->buflock, flags);
690 bl = is->last;
691 bf = is->first;
692 /*
693 * if IPPP_NOBLOCK is set we return even if we have nothing to read
694 */
695 if (bf->next != bl || (is->state & IPPP_NOBLOCK)) {
696 is->state &= ~IPPP_NOBLOCK;
697 mask |= POLLIN | POLLRDNORM;
698 }
699 spin_unlock_irqrestore(&is->buflock, flags);
700 return mask;
701 }
702
703 /*
704 * fill up isdn_ppp_read() queue ..
705 */
706
707 static int
isdn_ppp_fill_rq(unsigned char * buf,int len,int proto,int slot)708 isdn_ppp_fill_rq(unsigned char *buf, int len, int proto, int slot)
709 {
710 struct ippp_buf_queue *bf, *bl;
711 u_long flags;
712 u_char *nbuf;
713 struct ippp_struct *is;
714
715 if (slot < 0 || slot >= ISDN_MAX_CHANNELS) {
716 printk(KERN_WARNING "ippp: illegal slot(%d).\n", slot);
717 return 0;
718 }
719 is = ippp_table[slot];
720
721 if (!(is->state & IPPP_CONNECT)) {
722 printk(KERN_DEBUG "ippp: device not activated.\n");
723 return 0;
724 }
725 nbuf = kmalloc(len + 4, GFP_ATOMIC);
726 if (!nbuf) {
727 printk(KERN_WARNING "ippp: Can't alloc buf\n");
728 return 0;
729 }
730 nbuf[0] = PPP_ALLSTATIONS;
731 nbuf[1] = PPP_UI;
732 nbuf[2] = proto >> 8;
733 nbuf[3] = proto & 0xff;
734 memcpy(nbuf + 4, buf, len);
735
736 spin_lock_irqsave(&is->buflock, flags);
737 bf = is->first;
738 bl = is->last;
739
740 if (bf == bl) {
741 printk(KERN_WARNING "ippp: Queue is full; discarding first buffer\n");
742 bf = bf->next;
743 kfree(bf->buf);
744 is->first = bf;
745 }
746 bl->buf = (char *) nbuf;
747 bl->len = len + 4;
748
749 is->last = bl->next;
750 spin_unlock_irqrestore(&is->buflock, flags);
751 wake_up_interruptible(&is->wq);
752 return len;
753 }
754
755 /*
756 * read() .. non-blocking: ipppd calls it only after select()
757 * reports, that there is data
758 */
759
760 int
isdn_ppp_read(int min,struct file * file,char __user * buf,int count)761 isdn_ppp_read(int min, struct file *file, char __user *buf, int count)
762 {
763 struct ippp_struct *is;
764 struct ippp_buf_queue *b;
765 u_long flags;
766 u_char *save_buf;
767
768 is = file->private_data;
769
770 if (!(is->state & IPPP_OPEN))
771 return 0;
772
773 if (!access_ok(VERIFY_WRITE, buf, count))
774 return -EFAULT;
775
776 spin_lock_irqsave(&is->buflock, flags);
777 b = is->first->next;
778 save_buf = b->buf;
779 if (!save_buf) {
780 spin_unlock_irqrestore(&is->buflock, flags);
781 return -EAGAIN;
782 }
783 if (b->len < count)
784 count = b->len;
785 b->buf = NULL;
786 is->first = b;
787
788 spin_unlock_irqrestore(&is->buflock, flags);
789 if (copy_to_user(buf, save_buf, count))
790 count = -EFAULT;
791 kfree(save_buf);
792
793 return count;
794 }
795
796 /*
797 * ipppd wanna write a packet to the card .. non-blocking
798 */
799
800 int
isdn_ppp_write(int min,struct file * file,const char __user * buf,int count)801 isdn_ppp_write(int min, struct file *file, const char __user *buf, int count)
802 {
803 isdn_net_local *lp;
804 struct ippp_struct *is;
805 int proto;
806 unsigned char protobuf[4];
807
808 is = file->private_data;
809
810 if (!(is->state & IPPP_CONNECT))
811 return 0;
812
813 lp = is->lp;
814
815 /* -> push it directly to the lowlevel interface */
816
817 if (!lp)
818 printk(KERN_DEBUG "isdn_ppp_write: lp == NULL\n");
819 else {
820 /*
821 * Don't reset huptimer for
822 * LCP packets. (Echo requests).
823 */
824 if (copy_from_user(protobuf, buf, 4))
825 return -EFAULT;
826 proto = PPP_PROTOCOL(protobuf);
827 if (proto != PPP_LCP)
828 lp->huptimer = 0;
829
830 if (lp->isdn_device < 0 || lp->isdn_channel < 0)
831 return 0;
832
833 if ((dev->drv[lp->isdn_device]->flags & DRV_FLAG_RUNNING) &&
834 lp->dialstate == 0 &&
835 (lp->flags & ISDN_NET_CONNECTED)) {
836 unsigned short hl;
837 struct sk_buff *skb;
838 /*
839 * we need to reserve enought space in front of
840 * sk_buff. old call to dev_alloc_skb only reserved
841 * 16 bytes, now we are looking what the driver want
842 */
843 hl = dev->drv[lp->isdn_device]->interface->hl_hdrlen;
844 skb = alloc_skb(hl+count, GFP_ATOMIC);
845 if (!skb) {
846 printk(KERN_WARNING "isdn_ppp_write: out of memory!\n");
847 return count;
848 }
849 skb_reserve(skb, hl);
850 if (copy_from_user(skb_put(skb, count), buf, count))
851 {
852 kfree_skb(skb);
853 return -EFAULT;
854 }
855 if (is->debug & 0x40) {
856 printk(KERN_DEBUG "ppp xmit: len %d\n", (int) skb->len);
857 isdn_ppp_frame_log("xmit", skb->data, skb->len, 32,is->unit,lp->ppp_slot);
858 }
859
860 isdn_ppp_send_ccp(lp->netdev,lp,skb); /* keeps CCP/compression states in sync */
861
862 isdn_net_write_super(lp, skb);
863 }
864 }
865 return count;
866 }
867
868 /*
869 * init memory, structures etc.
870 */
871
872 int
isdn_ppp_init(void)873 isdn_ppp_init(void)
874 {
875 int i,
876 j;
877
878 #ifdef CONFIG_ISDN_MPP
879 if( isdn_ppp_mp_bundle_array_init() < 0 )
880 return -ENOMEM;
881 #endif /* CONFIG_ISDN_MPP */
882
883 for (i = 0; i < ISDN_MAX_CHANNELS; i++) {
884 if (!(ippp_table[i] = kzalloc(sizeof(struct ippp_struct), GFP_KERNEL))) {
885 printk(KERN_WARNING "isdn_ppp_init: Could not alloc ippp_table\n");
886 for (j = 0; j < i; j++)
887 kfree(ippp_table[j]);
888 return -1;
889 }
890 spin_lock_init(&ippp_table[i]->buflock);
891 ippp_table[i]->state = 0;
892 ippp_table[i]->first = ippp_table[i]->rq + NUM_RCV_BUFFS - 1;
893 ippp_table[i]->last = ippp_table[i]->rq;
894
895 for (j = 0; j < NUM_RCV_BUFFS; j++) {
896 ippp_table[i]->rq[j].buf = NULL;
897 ippp_table[i]->rq[j].last = ippp_table[i]->rq +
898 (NUM_RCV_BUFFS + j - 1) % NUM_RCV_BUFFS;
899 ippp_table[i]->rq[j].next = ippp_table[i]->rq + (j + 1) % NUM_RCV_BUFFS;
900 }
901 }
902 return 0;
903 }
904
905 void
isdn_ppp_cleanup(void)906 isdn_ppp_cleanup(void)
907 {
908 int i;
909
910 for (i = 0; i < ISDN_MAX_CHANNELS; i++)
911 kfree(ippp_table[i]);
912
913 #ifdef CONFIG_ISDN_MPP
914 kfree(isdn_ppp_bundle_arr);
915 #endif /* CONFIG_ISDN_MPP */
916
917 }
918
919 /*
920 * check for address/control field and skip if allowed
921 * retval != 0 -> discard packet silently
922 */
isdn_ppp_skip_ac(struct ippp_struct * is,struct sk_buff * skb)923 static int isdn_ppp_skip_ac(struct ippp_struct *is, struct sk_buff *skb)
924 {
925 if (skb->len < 1)
926 return -1;
927
928 if (skb->data[0] == 0xff) {
929 if (skb->len < 2)
930 return -1;
931
932 if (skb->data[1] != 0x03)
933 return -1;
934
935 // skip address/control (AC) field
936 skb_pull(skb, 2);
937 } else {
938 if (is->pppcfg & SC_REJ_COMP_AC)
939 // if AC compression was not negotiated, but used, discard packet
940 return -1;
941 }
942 return 0;
943 }
944
945 /*
946 * get the PPP protocol header and pull skb
947 * retval < 0 -> discard packet silently
948 */
isdn_ppp_strip_proto(struct sk_buff * skb)949 static int isdn_ppp_strip_proto(struct sk_buff *skb)
950 {
951 int proto;
952
953 if (skb->len < 1)
954 return -1;
955
956 if (skb->data[0] & 0x1) {
957 // protocol field is compressed
958 proto = skb->data[0];
959 skb_pull(skb, 1);
960 } else {
961 if (skb->len < 2)
962 return -1;
963 proto = ((int) skb->data[0] << 8) + skb->data[1];
964 skb_pull(skb, 2);
965 }
966 return proto;
967 }
968
969
970 /*
971 * handler for incoming packets on a syncPPP interface
972 */
isdn_ppp_receive(isdn_net_dev * net_dev,isdn_net_local * lp,struct sk_buff * skb)973 void isdn_ppp_receive(isdn_net_dev * net_dev, isdn_net_local * lp, struct sk_buff *skb)
974 {
975 struct ippp_struct *is;
976 int slot;
977 int proto;
978
979 BUG_ON(net_dev->local->master); // we're called with the master device always
980
981 slot = lp->ppp_slot;
982 if (slot < 0 || slot >= ISDN_MAX_CHANNELS) {
983 printk(KERN_ERR "isdn_ppp_receive: lp->ppp_slot(%d)\n",
984 lp->ppp_slot);
985 kfree_skb(skb);
986 return;
987 }
988 is = ippp_table[slot];
989
990 if (is->debug & 0x4) {
991 printk(KERN_DEBUG "ippp_receive: is:%08lx lp:%08lx slot:%d unit:%d len:%d\n",
992 (long)is,(long)lp,lp->ppp_slot,is->unit,(int) skb->len);
993 isdn_ppp_frame_log("receive", skb->data, skb->len, 32,is->unit,lp->ppp_slot);
994 }
995
996 if (isdn_ppp_skip_ac(is, skb) < 0) {
997 kfree_skb(skb);
998 return;
999 }
1000 proto = isdn_ppp_strip_proto(skb);
1001 if (proto < 0) {
1002 kfree_skb(skb);
1003 return;
1004 }
1005
1006 #ifdef CONFIG_ISDN_MPP
1007 if (is->compflags & SC_LINK_DECOMP_ON) {
1008 skb = isdn_ppp_decompress(skb, is, NULL, &proto);
1009 if (!skb) // decompression error
1010 return;
1011 }
1012
1013 if (!(is->mpppcfg & SC_REJ_MP_PROT)) { // we agreed to receive MPPP
1014 if (proto == PPP_MP) {
1015 isdn_ppp_mp_receive(net_dev, lp, skb);
1016 return;
1017 }
1018 }
1019 #endif
1020 isdn_ppp_push_higher(net_dev, lp, skb, proto);
1021 }
1022
1023 /*
1024 * we receive a reassembled frame, MPPP has been taken care of before.
1025 * address/control and protocol have been stripped from the skb
1026 * note: net_dev has to be master net_dev
1027 */
1028 static void
isdn_ppp_push_higher(isdn_net_dev * net_dev,isdn_net_local * lp,struct sk_buff * skb,int proto)1029 isdn_ppp_push_higher(isdn_net_dev * net_dev, isdn_net_local * lp, struct sk_buff *skb, int proto)
1030 {
1031 struct net_device *dev = net_dev->dev;
1032 struct ippp_struct *is, *mis;
1033 isdn_net_local *mlp = NULL;
1034 int slot;
1035
1036 slot = lp->ppp_slot;
1037 if (slot < 0 || slot >= ISDN_MAX_CHANNELS) {
1038 printk(KERN_ERR "isdn_ppp_push_higher: lp->ppp_slot(%d)\n",
1039 lp->ppp_slot);
1040 goto drop_packet;
1041 }
1042 is = ippp_table[slot];
1043
1044 if (lp->master) { // FIXME?
1045 mlp = ISDN_MASTER_PRIV(lp);
1046 slot = mlp->ppp_slot;
1047 if (slot < 0 || slot >= ISDN_MAX_CHANNELS) {
1048 printk(KERN_ERR "isdn_ppp_push_higher: master->ppp_slot(%d)\n",
1049 lp->ppp_slot);
1050 goto drop_packet;
1051 }
1052 }
1053 mis = ippp_table[slot];
1054
1055 if (is->debug & 0x10) {
1056 printk(KERN_DEBUG "push, skb %d %04x\n", (int) skb->len, proto);
1057 isdn_ppp_frame_log("rpush", skb->data, skb->len, 32,is->unit,lp->ppp_slot);
1058 }
1059 if (mis->compflags & SC_DECOMP_ON) {
1060 skb = isdn_ppp_decompress(skb, is, mis, &proto);
1061 if (!skb) // decompression error
1062 return;
1063 }
1064 switch (proto) {
1065 case PPP_IPX: /* untested */
1066 if (is->debug & 0x20)
1067 printk(KERN_DEBUG "isdn_ppp: IPX\n");
1068 skb->protocol = htons(ETH_P_IPX);
1069 break;
1070 case PPP_IP:
1071 if (is->debug & 0x20)
1072 printk(KERN_DEBUG "isdn_ppp: IP\n");
1073 skb->protocol = htons(ETH_P_IP);
1074 break;
1075 case PPP_COMP:
1076 case PPP_COMPFRAG:
1077 printk(KERN_INFO "isdn_ppp: unexpected compressed frame dropped\n");
1078 goto drop_packet;
1079 #ifdef CONFIG_ISDN_PPP_VJ
1080 case PPP_VJC_UNCOMP:
1081 if (is->debug & 0x20)
1082 printk(KERN_DEBUG "isdn_ppp: VJC_UNCOMP\n");
1083 if (net_dev->local->ppp_slot < 0) {
1084 printk(KERN_ERR "%s: net_dev->local->ppp_slot(%d) out of range\n",
1085 __func__, net_dev->local->ppp_slot);
1086 goto drop_packet;
1087 }
1088 if (slhc_remember(ippp_table[net_dev->local->ppp_slot]->slcomp, skb->data, skb->len) <= 0) {
1089 printk(KERN_WARNING "isdn_ppp: received illegal VJC_UNCOMP frame!\n");
1090 goto drop_packet;
1091 }
1092 skb->protocol = htons(ETH_P_IP);
1093 break;
1094 case PPP_VJC_COMP:
1095 if (is->debug & 0x20)
1096 printk(KERN_DEBUG "isdn_ppp: VJC_COMP\n");
1097 {
1098 struct sk_buff *skb_old = skb;
1099 int pkt_len;
1100 skb = dev_alloc_skb(skb_old->len + 128);
1101
1102 if (!skb) {
1103 printk(KERN_WARNING "%s: Memory squeeze, dropping packet.\n", dev->name);
1104 skb = skb_old;
1105 goto drop_packet;
1106 }
1107 skb_put(skb, skb_old->len + 128);
1108 skb_copy_from_linear_data(skb_old, skb->data,
1109 skb_old->len);
1110 if (net_dev->local->ppp_slot < 0) {
1111 printk(KERN_ERR "%s: net_dev->local->ppp_slot(%d) out of range\n",
1112 __func__, net_dev->local->ppp_slot);
1113 goto drop_packet;
1114 }
1115 pkt_len = slhc_uncompress(ippp_table[net_dev->local->ppp_slot]->slcomp,
1116 skb->data, skb_old->len);
1117 kfree_skb(skb_old);
1118 if (pkt_len < 0)
1119 goto drop_packet;
1120
1121 skb_trim(skb, pkt_len);
1122 skb->protocol = htons(ETH_P_IP);
1123 }
1124 break;
1125 #endif
1126 case PPP_CCP:
1127 case PPP_CCPFRAG:
1128 isdn_ppp_receive_ccp(net_dev,lp,skb,proto);
1129 /* Dont pop up ResetReq/Ack stuff to the daemon any
1130 longer - the job is done already */
1131 if(skb->data[0] == CCP_RESETREQ ||
1132 skb->data[0] == CCP_RESETACK)
1133 break;
1134 /* fall through */
1135 default:
1136 isdn_ppp_fill_rq(skb->data, skb->len, proto, lp->ppp_slot); /* push data to pppd device */
1137 kfree_skb(skb);
1138 return;
1139 }
1140
1141 #ifdef CONFIG_IPPP_FILTER
1142 /* check if the packet passes the pass and active filters
1143 * the filter instructions are constructed assuming
1144 * a four-byte PPP header on each packet (which is still present) */
1145 skb_push(skb, 4);
1146
1147 {
1148 u_int16_t *p = (u_int16_t *) skb->data;
1149
1150 *p = 0; /* indicate inbound */
1151 }
1152
1153 if (is->pass_filter
1154 && sk_run_filter(skb, is->pass_filter, is->pass_len) == 0) {
1155 if (is->debug & 0x2)
1156 printk(KERN_DEBUG "IPPP: inbound frame filtered.\n");
1157 kfree_skb(skb);
1158 return;
1159 }
1160 if (!(is->active_filter
1161 && sk_run_filter(skb, is->active_filter,
1162 is->active_len) == 0)) {
1163 if (is->debug & 0x2)
1164 printk(KERN_DEBUG "IPPP: link-active filter: reseting huptimer.\n");
1165 lp->huptimer = 0;
1166 if (mlp)
1167 mlp->huptimer = 0;
1168 }
1169 skb_pull(skb, 4);
1170 #else /* CONFIG_IPPP_FILTER */
1171 lp->huptimer = 0;
1172 if (mlp)
1173 mlp->huptimer = 0;
1174 #endif /* CONFIG_IPPP_FILTER */
1175 skb->dev = dev;
1176 skb_reset_mac_header(skb);
1177 netif_rx(skb);
1178 /* net_dev->local->stats.rx_packets++; done in isdn_net.c */
1179 return;
1180
1181 drop_packet:
1182 net_dev->local->stats.rx_dropped++;
1183 kfree_skb(skb);
1184 }
1185
1186 /*
1187 * isdn_ppp_skb_push ..
1188 * checks whether we have enough space at the beginning of the skb
1189 * and allocs a new SKB if necessary
1190 */
isdn_ppp_skb_push(struct sk_buff ** skb_p,int len)1191 static unsigned char *isdn_ppp_skb_push(struct sk_buff **skb_p,int len)
1192 {
1193 struct sk_buff *skb = *skb_p;
1194
1195 if(skb_headroom(skb) < len) {
1196 struct sk_buff *nskb = skb_realloc_headroom(skb, len);
1197
1198 if (!nskb) {
1199 printk(KERN_ERR "isdn_ppp_skb_push: can't realloc headroom!\n");
1200 dev_kfree_skb(skb);
1201 return NULL;
1202 }
1203 printk(KERN_DEBUG "isdn_ppp_skb_push:under %d %d\n",skb_headroom(skb),len);
1204 dev_kfree_skb(skb);
1205 *skb_p = nskb;
1206 return skb_push(nskb, len);
1207 }
1208 return skb_push(skb,len);
1209 }
1210
1211 /*
1212 * send ppp frame .. we expect a PIDCOMPressable proto --
1213 * (here: currently always PPP_IP,PPP_VJC_COMP,PPP_VJC_UNCOMP)
1214 *
1215 * VJ compression may change skb pointer!!! .. requeue with old
1216 * skb isn't allowed!!
1217 */
1218
1219 int
isdn_ppp_xmit(struct sk_buff * skb,struct net_device * netdev)1220 isdn_ppp_xmit(struct sk_buff *skb, struct net_device *netdev)
1221 {
1222 isdn_net_local *lp,*mlp;
1223 isdn_net_dev *nd;
1224 unsigned int proto = PPP_IP; /* 0x21 */
1225 struct ippp_struct *ipt,*ipts;
1226 int slot, retval = 0;
1227
1228 mlp = (isdn_net_local *) netdev_priv(netdev);
1229 nd = mlp->netdev; /* get master lp */
1230
1231 slot = mlp->ppp_slot;
1232 if (slot < 0 || slot >= ISDN_MAX_CHANNELS) {
1233 printk(KERN_ERR "isdn_ppp_xmit: lp->ppp_slot(%d)\n",
1234 mlp->ppp_slot);
1235 kfree_skb(skb);
1236 goto out;
1237 }
1238 ipts = ippp_table[slot];
1239
1240 if (!(ipts->pppcfg & SC_ENABLE_IP)) { /* PPP connected ? */
1241 if (ipts->debug & 0x1)
1242 printk(KERN_INFO "%s: IP frame delayed.\n", netdev->name);
1243 retval = 1;
1244 goto out;
1245 }
1246
1247 switch (ntohs(skb->protocol)) {
1248 case ETH_P_IP:
1249 proto = PPP_IP;
1250 break;
1251 case ETH_P_IPX:
1252 proto = PPP_IPX; /* untested */
1253 break;
1254 default:
1255 printk(KERN_ERR "isdn_ppp: skipped unsupported protocol: %#x.\n",
1256 skb->protocol);
1257 dev_kfree_skb(skb);
1258 goto out;
1259 }
1260
1261 lp = isdn_net_get_locked_lp(nd);
1262 if (!lp) {
1263 printk(KERN_WARNING "%s: all channels busy - requeuing!\n", netdev->name);
1264 retval = 1;
1265 goto out;
1266 }
1267 /* we have our lp locked from now on */
1268
1269 slot = lp->ppp_slot;
1270 if (slot < 0 || slot >= ISDN_MAX_CHANNELS) {
1271 printk(KERN_ERR "isdn_ppp_xmit: lp->ppp_slot(%d)\n",
1272 lp->ppp_slot);
1273 kfree_skb(skb);
1274 goto unlock;
1275 }
1276 ipt = ippp_table[slot];
1277
1278 /*
1279 * after this line .. requeueing in the device queue is no longer allowed!!!
1280 */
1281
1282 /* Pull off the fake header we stuck on earlier to keep
1283 * the fragmentation code happy.
1284 */
1285 skb_pull(skb,IPPP_MAX_HEADER);
1286
1287 #ifdef CONFIG_IPPP_FILTER
1288 /* check if we should pass this packet
1289 * the filter instructions are constructed assuming
1290 * a four-byte PPP header on each packet */
1291 *skb_push(skb, 4) = 1; /* indicate outbound */
1292
1293 {
1294 __be16 *p = (__be16 *)skb->data;
1295
1296 p++;
1297 *p = htons(proto);
1298 }
1299
1300 if (ipt->pass_filter
1301 && sk_run_filter(skb, ipt->pass_filter, ipt->pass_len) == 0) {
1302 if (ipt->debug & 0x4)
1303 printk(KERN_DEBUG "IPPP: outbound frame filtered.\n");
1304 kfree_skb(skb);
1305 goto unlock;
1306 }
1307 if (!(ipt->active_filter
1308 && sk_run_filter(skb, ipt->active_filter,
1309 ipt->active_len) == 0)) {
1310 if (ipt->debug & 0x4)
1311 printk(KERN_DEBUG "IPPP: link-active filter: reseting huptimer.\n");
1312 lp->huptimer = 0;
1313 }
1314 skb_pull(skb, 4);
1315 #else /* CONFIG_IPPP_FILTER */
1316 lp->huptimer = 0;
1317 #endif /* CONFIG_IPPP_FILTER */
1318
1319 if (ipt->debug & 0x4)
1320 printk(KERN_DEBUG "xmit skb, len %d\n", (int) skb->len);
1321 if (ipts->debug & 0x40)
1322 isdn_ppp_frame_log("xmit0", skb->data, skb->len, 32,ipts->unit,lp->ppp_slot);
1323
1324 #ifdef CONFIG_ISDN_PPP_VJ
1325 if (proto == PPP_IP && ipts->pppcfg & SC_COMP_TCP) { /* ipts here? probably yes, but check this again */
1326 struct sk_buff *new_skb;
1327 unsigned short hl;
1328 /*
1329 * we need to reserve enought space in front of
1330 * sk_buff. old call to dev_alloc_skb only reserved
1331 * 16 bytes, now we are looking what the driver want.
1332 */
1333 hl = dev->drv[lp->isdn_device]->interface->hl_hdrlen + IPPP_MAX_HEADER;
1334 /*
1335 * Note: hl might still be insufficient because the method
1336 * above does not account for a possibible MPPP slave channel
1337 * which had larger HL header space requirements than the
1338 * master.
1339 */
1340 new_skb = alloc_skb(hl+skb->len, GFP_ATOMIC);
1341 if (new_skb) {
1342 u_char *buf;
1343 int pktlen;
1344
1345 skb_reserve(new_skb, hl);
1346 new_skb->dev = skb->dev;
1347 skb_put(new_skb, skb->len);
1348 buf = skb->data;
1349
1350 pktlen = slhc_compress(ipts->slcomp, skb->data, skb->len, new_skb->data,
1351 &buf, !(ipts->pppcfg & SC_NO_TCP_CCID));
1352
1353 if (buf != skb->data) {
1354 if (new_skb->data != buf)
1355 printk(KERN_ERR "isdn_ppp: FATAL error after slhc_compress!!\n");
1356 dev_kfree_skb(skb);
1357 skb = new_skb;
1358 } else {
1359 dev_kfree_skb(new_skb);
1360 }
1361
1362 skb_trim(skb, pktlen);
1363 if (skb->data[0] & SL_TYPE_COMPRESSED_TCP) { /* cslip? style -> PPP */
1364 proto = PPP_VJC_COMP;
1365 skb->data[0] ^= SL_TYPE_COMPRESSED_TCP;
1366 } else {
1367 if (skb->data[0] >= SL_TYPE_UNCOMPRESSED_TCP)
1368 proto = PPP_VJC_UNCOMP;
1369 skb->data[0] = (skb->data[0] & 0x0f) | 0x40;
1370 }
1371 }
1372 }
1373 #endif
1374
1375 /*
1376 * normal (single link) or bundle compression
1377 */
1378 if(ipts->compflags & SC_COMP_ON) {
1379 /* We send compressed only if both down- und upstream
1380 compression is negotiated, that means, CCP is up */
1381 if(ipts->compflags & SC_DECOMP_ON) {
1382 skb = isdn_ppp_compress(skb,&proto,ipt,ipts,0);
1383 } else {
1384 printk(KERN_DEBUG "isdn_ppp: CCP not yet up - sending as-is\n");
1385 }
1386 }
1387
1388 if (ipt->debug & 0x24)
1389 printk(KERN_DEBUG "xmit2 skb, len %d, proto %04x\n", (int) skb->len, proto);
1390
1391 #ifdef CONFIG_ISDN_MPP
1392 if (ipt->mpppcfg & SC_MP_PROT) {
1393 /* we get mp_seqno from static isdn_net_local */
1394 long mp_seqno = ipts->mp_seqno;
1395 ipts->mp_seqno++;
1396 if (ipt->mpppcfg & SC_OUT_SHORT_SEQ) {
1397 unsigned char *data = isdn_ppp_skb_push(&skb, 3);
1398 if(!data)
1399 goto unlock;
1400 mp_seqno &= 0xfff;
1401 data[0] = MP_BEGIN_FRAG | MP_END_FRAG | ((mp_seqno >> 8) & 0xf); /* (B)egin & (E)ndbit .. */
1402 data[1] = mp_seqno & 0xff;
1403 data[2] = proto; /* PID compression */
1404 } else {
1405 unsigned char *data = isdn_ppp_skb_push(&skb, 5);
1406 if(!data)
1407 goto unlock;
1408 data[0] = MP_BEGIN_FRAG | MP_END_FRAG; /* (B)egin & (E)ndbit .. */
1409 data[1] = (mp_seqno >> 16) & 0xff; /* sequence number: 24bit */
1410 data[2] = (mp_seqno >> 8) & 0xff;
1411 data[3] = (mp_seqno >> 0) & 0xff;
1412 data[4] = proto; /* PID compression */
1413 }
1414 proto = PPP_MP; /* MP Protocol, 0x003d */
1415 }
1416 #endif
1417
1418 /*
1419 * 'link in bundle' compression ...
1420 */
1421 if(ipt->compflags & SC_LINK_COMP_ON)
1422 skb = isdn_ppp_compress(skb,&proto,ipt,ipts,1);
1423
1424 if( (ipt->pppcfg & SC_COMP_PROT) && (proto <= 0xff) ) {
1425 unsigned char *data = isdn_ppp_skb_push(&skb,1);
1426 if(!data)
1427 goto unlock;
1428 data[0] = proto & 0xff;
1429 }
1430 else {
1431 unsigned char *data = isdn_ppp_skb_push(&skb,2);
1432 if(!data)
1433 goto unlock;
1434 data[0] = (proto >> 8) & 0xff;
1435 data[1] = proto & 0xff;
1436 }
1437 if(!(ipt->pppcfg & SC_COMP_AC)) {
1438 unsigned char *data = isdn_ppp_skb_push(&skb,2);
1439 if(!data)
1440 goto unlock;
1441 data[0] = 0xff; /* All Stations */
1442 data[1] = 0x03; /* Unnumbered information */
1443 }
1444
1445 /* tx-stats are now updated via BSENT-callback */
1446
1447 if (ipts->debug & 0x40) {
1448 printk(KERN_DEBUG "skb xmit: len: %d\n", (int) skb->len);
1449 isdn_ppp_frame_log("xmit", skb->data, skb->len, 32,ipt->unit,lp->ppp_slot);
1450 }
1451
1452 isdn_net_writebuf_skb(lp, skb);
1453
1454 unlock:
1455 spin_unlock_bh(&lp->xmit_lock);
1456 out:
1457 return retval;
1458 }
1459
1460 #ifdef CONFIG_IPPP_FILTER
1461 /*
1462 * check if this packet may trigger auto-dial.
1463 */
1464
isdn_ppp_autodial_filter(struct sk_buff * skb,isdn_net_local * lp)1465 int isdn_ppp_autodial_filter(struct sk_buff *skb, isdn_net_local *lp)
1466 {
1467 struct ippp_struct *is = ippp_table[lp->ppp_slot];
1468 u_int16_t proto;
1469 int drop = 0;
1470
1471 switch (ntohs(skb->protocol)) {
1472 case ETH_P_IP:
1473 proto = PPP_IP;
1474 break;
1475 case ETH_P_IPX:
1476 proto = PPP_IPX;
1477 break;
1478 default:
1479 printk(KERN_ERR "isdn_ppp_autodial_filter: unsupported protocol 0x%x.\n",
1480 skb->protocol);
1481 return 1;
1482 }
1483
1484 /* the filter instructions are constructed assuming
1485 * a four-byte PPP header on each packet. we have to
1486 * temporarily remove part of the fake header stuck on
1487 * earlier.
1488 */
1489 *skb_pull(skb, IPPP_MAX_HEADER - 4) = 1; /* indicate outbound */
1490
1491 {
1492 __be16 *p = (__be16 *)skb->data;
1493
1494 p++;
1495 *p = htons(proto);
1496 }
1497
1498 drop |= is->pass_filter
1499 && sk_run_filter(skb, is->pass_filter, is->pass_len) == 0;
1500 drop |= is->active_filter
1501 && sk_run_filter(skb, is->active_filter, is->active_len) == 0;
1502
1503 skb_push(skb, IPPP_MAX_HEADER - 4);
1504 return drop;
1505 }
1506 #endif
1507 #ifdef CONFIG_ISDN_MPP
1508
1509 /* this is _not_ rfc1990 header, but something we convert both short and long
1510 * headers to for convinience's sake:
1511 * byte 0 is flags as in rfc1990
1512 * bytes 1...4 is 24-bit seqence number converted to host byte order
1513 */
1514 #define MP_HEADER_LEN 5
1515
1516 #define MP_LONGSEQ_MASK 0x00ffffff
1517 #define MP_SHORTSEQ_MASK 0x00000fff
1518 #define MP_LONGSEQ_MAX MP_LONGSEQ_MASK
1519 #define MP_SHORTSEQ_MAX MP_SHORTSEQ_MASK
1520 #define MP_LONGSEQ_MAXBIT ((MP_LONGSEQ_MASK+1)>>1)
1521 #define MP_SHORTSEQ_MAXBIT ((MP_SHORTSEQ_MASK+1)>>1)
1522
1523 /* sequence-wrap safe comparisions (for long sequence)*/
1524 #define MP_LT(a,b) ((a-b)&MP_LONGSEQ_MAXBIT)
1525 #define MP_LE(a,b) !((b-a)&MP_LONGSEQ_MAXBIT)
1526 #define MP_GT(a,b) ((b-a)&MP_LONGSEQ_MAXBIT)
1527 #define MP_GE(a,b) !((a-b)&MP_LONGSEQ_MAXBIT)
1528
1529 #define MP_SEQ(f) ((*(u32*)(f->data+1)))
1530 #define MP_FLAGS(f) (f->data[0])
1531
isdn_ppp_mp_bundle_array_init(void)1532 static int isdn_ppp_mp_bundle_array_init(void)
1533 {
1534 int i;
1535 int sz = ISDN_MAX_CHANNELS*sizeof(ippp_bundle);
1536 if( (isdn_ppp_bundle_arr = kzalloc(sz, GFP_KERNEL)) == NULL )
1537 return -ENOMEM;
1538 for (i = 0; i < ISDN_MAX_CHANNELS; i++) {
1539 spin_lock_init(&isdn_ppp_bundle_arr[i].lock);
1540 skb_queue_head_init(&isdn_ppp_bundle_arr[i].frags);
1541 }
1542 return 0;
1543 }
1544
isdn_ppp_mp_bundle_alloc(void)1545 static ippp_bundle * isdn_ppp_mp_bundle_alloc(void)
1546 {
1547 int i;
1548 for( i = 0; i < ISDN_MAX_CHANNELS; i++ )
1549 if (isdn_ppp_bundle_arr[i].ref_ct <= 0)
1550 return (isdn_ppp_bundle_arr + i);
1551 return NULL;
1552 }
1553
isdn_ppp_mp_init(isdn_net_local * lp,ippp_bundle * add_to)1554 static int isdn_ppp_mp_init( isdn_net_local * lp, ippp_bundle * add_to )
1555 {
1556 struct ippp_struct * is;
1557
1558 if (lp->ppp_slot < 0) {
1559 printk(KERN_ERR "%s: lp->ppp_slot(%d) out of range\n",
1560 __func__, lp->ppp_slot);
1561 return(-EINVAL);
1562 }
1563
1564 is = ippp_table[lp->ppp_slot];
1565 if (add_to) {
1566 if( lp->netdev->pb )
1567 lp->netdev->pb->ref_ct--;
1568 lp->netdev->pb = add_to;
1569 } else { /* first link in a bundle */
1570 is->mp_seqno = 0;
1571 if ((lp->netdev->pb = isdn_ppp_mp_bundle_alloc()) == NULL)
1572 return -ENOMEM;
1573 lp->next = lp->last = lp; /* nobody else in a queue */
1574 skb_queue_head_init(&lp->netdev->pb->frags);
1575 lp->netdev->pb->frames = 0;
1576 lp->netdev->pb->seq = UINT_MAX;
1577 }
1578 lp->netdev->pb->ref_ct++;
1579
1580 is->last_link_seqno = 0;
1581 return 0;
1582 }
1583
1584 static u32 isdn_ppp_mp_get_seq( int short_seq,
1585 struct sk_buff * skb, u32 last_seq );
1586 static void isdn_ppp_mp_discard(ippp_bundle *mp, struct sk_buff *from,
1587 struct sk_buff *to);
1588 static void isdn_ppp_mp_reassembly(isdn_net_dev *net_dev, isdn_net_local *lp,
1589 struct sk_buff *from, struct sk_buff *to,
1590 u32 lastseq);
1591 static void isdn_ppp_mp_free_skb(ippp_bundle *mp, struct sk_buff *skb);
1592 static void isdn_ppp_mp_print_recv_pkt( int slot, struct sk_buff * skb );
1593
isdn_ppp_mp_receive(isdn_net_dev * net_dev,isdn_net_local * lp,struct sk_buff * skb)1594 static void isdn_ppp_mp_receive(isdn_net_dev * net_dev, isdn_net_local * lp,
1595 struct sk_buff *skb)
1596 {
1597 struct sk_buff *newfrag, *frag, *start, *nextf;
1598 u32 newseq, minseq, thisseq;
1599 isdn_mppp_stats *stats;
1600 struct ippp_struct *is;
1601 unsigned long flags;
1602 isdn_net_local *lpq;
1603 ippp_bundle *mp;
1604 int slot;
1605
1606 spin_lock_irqsave(&net_dev->pb->lock, flags);
1607 mp = net_dev->pb;
1608 stats = &mp->stats;
1609 slot = lp->ppp_slot;
1610 if (slot < 0 || slot >= ISDN_MAX_CHANNELS) {
1611 printk(KERN_ERR "%s: lp->ppp_slot(%d)\n",
1612 __func__, lp->ppp_slot);
1613 stats->frame_drops++;
1614 dev_kfree_skb(skb);
1615 spin_unlock_irqrestore(&mp->lock, flags);
1616 return;
1617 }
1618 is = ippp_table[slot];
1619 if (++mp->frames > stats->max_queue_len)
1620 stats->max_queue_len = mp->frames;
1621
1622 if (is->debug & 0x8)
1623 isdn_ppp_mp_print_recv_pkt(lp->ppp_slot, skb);
1624
1625 newseq = isdn_ppp_mp_get_seq(is->mpppcfg & SC_IN_SHORT_SEQ,
1626 skb, is->last_link_seqno);
1627
1628 /* if this packet seq # is less than last already processed one,
1629 * toss it right away, but check for sequence start case first
1630 */
1631 if (mp->seq > MP_LONGSEQ_MAX && (newseq & MP_LONGSEQ_MAXBIT)) {
1632 mp->seq = newseq; /* the first packet: required for
1633 * rfc1990 non-compliant clients --
1634 * prevents constant packet toss */
1635 } else if( MP_LT(newseq, mp->seq) ) {
1636 stats->frame_drops++;
1637 isdn_ppp_mp_free_skb(mp, skb);
1638 spin_unlock_irqrestore(&mp->lock, flags);
1639 return;
1640 }
1641
1642 /* find the minimum received sequence number over all links */
1643 is->last_link_seqno = minseq = newseq;
1644 for (lpq = net_dev->queue;;) {
1645 slot = lpq->ppp_slot;
1646 if (slot < 0 || slot >= ISDN_MAX_CHANNELS) {
1647 printk(KERN_ERR "%s: lpq->ppp_slot(%d)\n",
1648 __func__, lpq->ppp_slot);
1649 } else {
1650 u32 lls = ippp_table[slot]->last_link_seqno;
1651 if (MP_LT(lls, minseq))
1652 minseq = lls;
1653 }
1654 if ((lpq = lpq->next) == net_dev->queue)
1655 break;
1656 }
1657 if (MP_LT(minseq, mp->seq))
1658 minseq = mp->seq; /* can't go beyond already processed
1659 * packets */
1660 newfrag = skb;
1661
1662 /* Insert new fragment into the proper sequence slot. */
1663 skb_queue_walk(&mp->frags, frag) {
1664 if (MP_SEQ(frag) == newseq) {
1665 isdn_ppp_mp_free_skb(mp, newfrag);
1666 newfrag = NULL;
1667 break;
1668 }
1669 if (MP_LT(newseq, MP_SEQ(frag))) {
1670 __skb_queue_before(&mp->frags, frag, newfrag);
1671 newfrag = NULL;
1672 break;
1673 }
1674 }
1675 if (newfrag)
1676 __skb_queue_tail(&mp->frags, newfrag);
1677
1678 frag = skb_peek(&mp->frags);
1679 start = ((MP_FLAGS(frag) & MP_BEGIN_FRAG) &&
1680 (MP_SEQ(frag) == mp->seq)) ? frag : NULL;
1681 if (!start)
1682 goto check_overflow;
1683
1684 /* main fragment traversing loop
1685 *
1686 * try to accomplish several tasks:
1687 * - reassemble any complete fragment sequence (non-null 'start'
1688 * indicates there is a continguous sequence present)
1689 * - discard any incomplete sequences that are below minseq -- due
1690 * to the fact that sender always increment sequence number, if there
1691 * is an incomplete sequence below minseq, no new fragments would
1692 * come to complete such sequence and it should be discarded
1693 *
1694 * loop completes when we accomplished the following tasks:
1695 * - we hit a gap in the sequence, so no reassembly/processing is
1696 * possible ('start' would be set to NULL)
1697 *
1698 * algorithm for this code is derived from code in the book
1699 * 'PPP Design And Debugging' by James Carlson (Addison-Wesley)
1700 */
1701 skb_queue_walk_safe(&mp->frags, frag, nextf) {
1702 thisseq = MP_SEQ(frag);
1703
1704 /* check for misplaced start */
1705 if (start != frag && (MP_FLAGS(frag) & MP_BEGIN_FRAG)) {
1706 printk(KERN_WARNING"isdn_mppp(seq %d): new "
1707 "BEGIN flag with no prior END", thisseq);
1708 stats->seqerrs++;
1709 stats->frame_drops++;
1710 isdn_ppp_mp_discard(mp, start, frag);
1711 start = frag;
1712 } else if (MP_LE(thisseq, minseq)) {
1713 if (MP_FLAGS(frag) & MP_BEGIN_FRAG)
1714 start = frag;
1715 else {
1716 if (MP_FLAGS(frag) & MP_END_FRAG)
1717 stats->frame_drops++;
1718 __skb_unlink(skb, &mp->frags);
1719 isdn_ppp_mp_free_skb(mp, frag);
1720 continue;
1721 }
1722 }
1723
1724 /* if we have end fragment, then we have full reassembly
1725 * sequence -- reassemble and process packet now
1726 */
1727 if (MP_FLAGS(frag) & MP_END_FRAG) {
1728 minseq = mp->seq = (thisseq+1) & MP_LONGSEQ_MASK;
1729 /* Reassemble the packet then dispatch it */
1730 isdn_ppp_mp_reassembly(net_dev, lp, start, frag, thisseq);
1731
1732 start = NULL;
1733 frag = NULL;
1734 }
1735
1736 /* check if need to update start pointer: if we just
1737 * reassembled the packet and sequence is contiguous
1738 * then next fragment should be the start of new reassembly
1739 * if sequence is contiguous, but we haven't reassembled yet,
1740 * keep going.
1741 * if sequence is not contiguous, either clear everyting
1742 * below low watermark and set start to the next frag or
1743 * clear start ptr.
1744 */
1745 if (nextf != (struct sk_buff *)&mp->frags &&
1746 ((thisseq+1) & MP_LONGSEQ_MASK) == MP_SEQ(nextf)) {
1747 /* if we just reassembled and the next one is here,
1748 * then start another reassembly.
1749 */
1750 if (frag == NULL) {
1751 if (MP_FLAGS(nextf) & MP_BEGIN_FRAG)
1752 start = nextf;
1753 else {
1754 printk(KERN_WARNING"isdn_mppp(seq %d):"
1755 " END flag with no following "
1756 "BEGIN", thisseq);
1757 stats->seqerrs++;
1758 }
1759 }
1760 } else {
1761 if (nextf != (struct sk_buff *)&mp->frags &&
1762 frag != NULL &&
1763 MP_LT(thisseq, minseq)) {
1764 /* we've got a break in the sequence
1765 * and we not at the end yet
1766 * and we did not just reassembled
1767 *(if we did, there wouldn't be anything before)
1768 * and we below the low watermark
1769 * discard all the frames below low watermark
1770 * and start over */
1771 stats->frame_drops++;
1772 isdn_ppp_mp_discard(mp, start, nextf);
1773 }
1774 /* break in the sequence, no reassembly */
1775 start = NULL;
1776 }
1777 if (!start)
1778 break;
1779 }
1780
1781 check_overflow:
1782 /* rather straighforward way to deal with (not very) possible
1783 * queue overflow
1784 */
1785 if (mp->frames > MP_MAX_QUEUE_LEN) {
1786 stats->overflows++;
1787 skb_queue_walk_safe(&mp->frags, frag, nextf) {
1788 if (mp->frames <= MP_MAX_QUEUE_LEN)
1789 break;
1790 __skb_unlink(frag, &mp->frags);
1791 isdn_ppp_mp_free_skb(mp, frag);
1792 }
1793 }
1794 spin_unlock_irqrestore(&mp->lock, flags);
1795 }
1796
isdn_ppp_mp_cleanup(isdn_net_local * lp)1797 static void isdn_ppp_mp_cleanup(isdn_net_local *lp)
1798 {
1799 struct sk_buff *skb, *tmp;
1800
1801 skb_queue_walk_safe(&lp->netdev->pb->frags, skb, tmp) {
1802 __skb_unlink(skb, &lp->netdev->pb->frags);
1803 isdn_ppp_mp_free_skb(lp->netdev->pb, skb);
1804 }
1805 }
1806
isdn_ppp_mp_get_seq(int short_seq,struct sk_buff * skb,u32 last_seq)1807 static u32 isdn_ppp_mp_get_seq( int short_seq,
1808 struct sk_buff * skb, u32 last_seq )
1809 {
1810 u32 seq;
1811 int flags = skb->data[0] & (MP_BEGIN_FRAG | MP_END_FRAG);
1812
1813 if( !short_seq )
1814 {
1815 seq = ntohl(*(__be32 *)skb->data) & MP_LONGSEQ_MASK;
1816 skb_push(skb,1);
1817 }
1818 else
1819 {
1820 /* convert 12-bit short seq number to 24-bit long one
1821 */
1822 seq = ntohs(*(__be16 *)skb->data) & MP_SHORTSEQ_MASK;
1823
1824 /* check for seqence wrap */
1825 if( !(seq & MP_SHORTSEQ_MAXBIT) &&
1826 (last_seq & MP_SHORTSEQ_MAXBIT) &&
1827 (unsigned long)last_seq <= MP_LONGSEQ_MAX )
1828 seq |= (last_seq + MP_SHORTSEQ_MAX+1) &
1829 (~MP_SHORTSEQ_MASK & MP_LONGSEQ_MASK);
1830 else
1831 seq |= last_seq & (~MP_SHORTSEQ_MASK & MP_LONGSEQ_MASK);
1832
1833 skb_push(skb, 3); /* put converted seqence back in skb */
1834 }
1835 *(u32*)(skb->data+1) = seq; /* put seqence back in _host_ byte
1836 * order */
1837 skb->data[0] = flags; /* restore flags */
1838 return seq;
1839 }
1840
isdn_ppp_mp_discard(ippp_bundle * mp,struct sk_buff * from,struct sk_buff * to)1841 static void isdn_ppp_mp_discard(ippp_bundle *mp, struct sk_buff *from,
1842 struct sk_buff *to)
1843 {
1844 if (from) {
1845 struct sk_buff *skb, *tmp;
1846 int freeing = 0;
1847
1848 skb_queue_walk_safe(&mp->frags, skb, tmp) {
1849 if (skb == to)
1850 break;
1851 if (skb == from)
1852 freeing = 1;
1853 if (!freeing)
1854 continue;
1855 __skb_unlink(skb, &mp->frags);
1856 isdn_ppp_mp_free_skb(mp, skb);
1857 }
1858 }
1859 }
1860
calc_tot_len(struct sk_buff_head * queue,struct sk_buff * from,struct sk_buff * to)1861 static unsigned int calc_tot_len(struct sk_buff_head *queue,
1862 struct sk_buff *from, struct sk_buff *to)
1863 {
1864 unsigned int tot_len = 0;
1865 struct sk_buff *skb;
1866 int found_start = 0;
1867
1868 skb_queue_walk(queue, skb) {
1869 if (skb == from)
1870 found_start = 1;
1871 if (!found_start)
1872 continue;
1873 tot_len += skb->len - MP_HEADER_LEN;
1874 if (skb == to)
1875 break;
1876 }
1877 return tot_len;
1878 }
1879
1880 /* Reassemble packet using fragments in the reassembly queue from
1881 * 'from' until 'to', inclusive.
1882 */
isdn_ppp_mp_reassembly(isdn_net_dev * net_dev,isdn_net_local * lp,struct sk_buff * from,struct sk_buff * to,u32 lastseq)1883 static void isdn_ppp_mp_reassembly(isdn_net_dev *net_dev, isdn_net_local *lp,
1884 struct sk_buff *from, struct sk_buff *to,
1885 u32 lastseq)
1886 {
1887 ippp_bundle *mp = net_dev->pb;
1888 unsigned int tot_len;
1889 struct sk_buff *skb;
1890 int proto;
1891
1892 if (lp->ppp_slot < 0 || lp->ppp_slot >= ISDN_MAX_CHANNELS) {
1893 printk(KERN_ERR "%s: lp->ppp_slot(%d) out of range\n",
1894 __func__, lp->ppp_slot);
1895 return;
1896 }
1897
1898 tot_len = calc_tot_len(&mp->frags, from, to);
1899
1900 if (MP_FLAGS(from) == (MP_BEGIN_FRAG | MP_END_FRAG)) {
1901 if (ippp_table[lp->ppp_slot]->debug & 0x40)
1902 printk(KERN_DEBUG "isdn_mppp: reassembly: frame %d, "
1903 "len %d\n", MP_SEQ(from), from->len);
1904 skb = from;
1905 skb_pull(skb, MP_HEADER_LEN);
1906 __skb_unlink(skb, &mp->frags);
1907 mp->frames--;
1908 } else {
1909 struct sk_buff *walk, *tmp;
1910 int found_start = 0;
1911
1912 if (ippp_table[lp->ppp_slot]->debug & 0x40)
1913 printk(KERN_DEBUG"isdn_mppp: reassembling frames %d "
1914 "to %d, len %d\n", MP_SEQ(from), lastseq,
1915 tot_len);
1916
1917 skb = dev_alloc_skb(tot_len);
1918 if (!skb)
1919 printk(KERN_ERR "isdn_mppp: cannot allocate sk buff "
1920 "of size %d\n", tot_len);
1921
1922 found_start = 0;
1923 skb_queue_walk_safe(&mp->frags, walk, tmp) {
1924 if (walk == from)
1925 found_start = 1;
1926 if (!found_start)
1927 continue;
1928
1929 if (skb) {
1930 unsigned int len = walk->len - MP_HEADER_LEN;
1931 skb_copy_from_linear_data_offset(walk, MP_HEADER_LEN,
1932 skb_put(skb, len),
1933 len);
1934 }
1935 __skb_unlink(walk, &mp->frags);
1936 isdn_ppp_mp_free_skb(mp, walk);
1937
1938 if (walk == to)
1939 break;
1940 }
1941 }
1942 if (!skb)
1943 return;
1944
1945 proto = isdn_ppp_strip_proto(skb);
1946 isdn_ppp_push_higher(net_dev, lp, skb, proto);
1947 }
1948
isdn_ppp_mp_free_skb(ippp_bundle * mp,struct sk_buff * skb)1949 static void isdn_ppp_mp_free_skb(ippp_bundle *mp, struct sk_buff *skb)
1950 {
1951 dev_kfree_skb(skb);
1952 mp->frames--;
1953 }
1954
isdn_ppp_mp_print_recv_pkt(int slot,struct sk_buff * skb)1955 static void isdn_ppp_mp_print_recv_pkt( int slot, struct sk_buff * skb )
1956 {
1957 printk(KERN_DEBUG "mp_recv: %d/%d -> %02x %02x %02x %02x %02x %02x\n",
1958 slot, (int) skb->len,
1959 (int) skb->data[0], (int) skb->data[1], (int) skb->data[2],
1960 (int) skb->data[3], (int) skb->data[4], (int) skb->data[5]);
1961 }
1962
1963 static int
isdn_ppp_bundle(struct ippp_struct * is,int unit)1964 isdn_ppp_bundle(struct ippp_struct *is, int unit)
1965 {
1966 char ifn[IFNAMSIZ + 1];
1967 isdn_net_dev *p;
1968 isdn_net_local *lp, *nlp;
1969 int rc;
1970 unsigned long flags;
1971
1972 sprintf(ifn, "ippp%d", unit);
1973 p = isdn_net_findif(ifn);
1974 if (!p) {
1975 printk(KERN_ERR "ippp_bundle: cannot find %s\n", ifn);
1976 return -EINVAL;
1977 }
1978
1979 spin_lock_irqsave(&p->pb->lock, flags);
1980
1981 nlp = is->lp;
1982 lp = p->queue;
1983 if( nlp->ppp_slot < 0 || nlp->ppp_slot >= ISDN_MAX_CHANNELS ||
1984 lp->ppp_slot < 0 || lp->ppp_slot >= ISDN_MAX_CHANNELS ) {
1985 printk(KERN_ERR "ippp_bundle: binding to invalid slot %d\n",
1986 nlp->ppp_slot < 0 || nlp->ppp_slot >= ISDN_MAX_CHANNELS ?
1987 nlp->ppp_slot : lp->ppp_slot );
1988 rc = -EINVAL;
1989 goto out;
1990 }
1991
1992 isdn_net_add_to_bundle(p, nlp);
1993
1994 ippp_table[nlp->ppp_slot]->unit = ippp_table[lp->ppp_slot]->unit;
1995
1996 /* maybe also SC_CCP stuff */
1997 ippp_table[nlp->ppp_slot]->pppcfg |= ippp_table[lp->ppp_slot]->pppcfg &
1998 (SC_ENABLE_IP | SC_NO_TCP_CCID | SC_REJ_COMP_TCP);
1999 ippp_table[nlp->ppp_slot]->mpppcfg |= ippp_table[lp->ppp_slot]->mpppcfg &
2000 (SC_MP_PROT | SC_REJ_MP_PROT | SC_OUT_SHORT_SEQ | SC_IN_SHORT_SEQ);
2001 rc = isdn_ppp_mp_init(nlp, p->pb);
2002 out:
2003 spin_unlock_irqrestore(&p->pb->lock, flags);
2004 return rc;
2005 }
2006
2007 #endif /* CONFIG_ISDN_MPP */
2008
2009 /*
2010 * network device ioctl handlers
2011 */
2012
2013 static int
isdn_ppp_dev_ioctl_stats(int slot,struct ifreq * ifr,struct net_device * dev)2014 isdn_ppp_dev_ioctl_stats(int slot, struct ifreq *ifr, struct net_device *dev)
2015 {
2016 struct ppp_stats __user *res = ifr->ifr_data;
2017 struct ppp_stats t;
2018 isdn_net_local *lp = (isdn_net_local *) netdev_priv(dev);
2019
2020 if (!access_ok(VERIFY_WRITE, res, sizeof(struct ppp_stats)))
2021 return -EFAULT;
2022
2023 /* build a temporary stat struct and copy it to user space */
2024
2025 memset(&t, 0, sizeof(struct ppp_stats));
2026 if (dev->flags & IFF_UP) {
2027 t.p.ppp_ipackets = lp->stats.rx_packets;
2028 t.p.ppp_ibytes = lp->stats.rx_bytes;
2029 t.p.ppp_ierrors = lp->stats.rx_errors;
2030 t.p.ppp_opackets = lp->stats.tx_packets;
2031 t.p.ppp_obytes = lp->stats.tx_bytes;
2032 t.p.ppp_oerrors = lp->stats.tx_errors;
2033 #ifdef CONFIG_ISDN_PPP_VJ
2034 if (slot >= 0 && ippp_table[slot]->slcomp) {
2035 struct slcompress *slcomp = ippp_table[slot]->slcomp;
2036 t.vj.vjs_packets = slcomp->sls_o_compressed + slcomp->sls_o_uncompressed;
2037 t.vj.vjs_compressed = slcomp->sls_o_compressed;
2038 t.vj.vjs_searches = slcomp->sls_o_searches;
2039 t.vj.vjs_misses = slcomp->sls_o_misses;
2040 t.vj.vjs_errorin = slcomp->sls_i_error;
2041 t.vj.vjs_tossed = slcomp->sls_i_tossed;
2042 t.vj.vjs_uncompressedin = slcomp->sls_i_uncompressed;
2043 t.vj.vjs_compressedin = slcomp->sls_i_compressed;
2044 }
2045 #endif
2046 }
2047 if (copy_to_user(res, &t, sizeof(struct ppp_stats)))
2048 return -EFAULT;
2049 return 0;
2050 }
2051
2052 int
isdn_ppp_dev_ioctl(struct net_device * dev,struct ifreq * ifr,int cmd)2053 isdn_ppp_dev_ioctl(struct net_device *dev, struct ifreq *ifr, int cmd)
2054 {
2055 int error=0;
2056 int len;
2057 isdn_net_local *lp = (isdn_net_local *) netdev_priv(dev);
2058
2059
2060 if (lp->p_encap != ISDN_NET_ENCAP_SYNCPPP)
2061 return -EINVAL;
2062
2063 switch (cmd) {
2064 #define PPP_VERSION "2.3.7"
2065 case SIOCGPPPVER:
2066 len = strlen(PPP_VERSION) + 1;
2067 if (copy_to_user(ifr->ifr_data, PPP_VERSION, len))
2068 error = -EFAULT;
2069 break;
2070
2071 case SIOCGPPPSTATS:
2072 error = isdn_ppp_dev_ioctl_stats(lp->ppp_slot, ifr, dev);
2073 break;
2074 default:
2075 error = -EINVAL;
2076 break;
2077 }
2078 return error;
2079 }
2080
2081 static int
isdn_ppp_if_get_unit(char * name)2082 isdn_ppp_if_get_unit(char *name)
2083 {
2084 int len,
2085 i,
2086 unit = 0,
2087 deci;
2088
2089 len = strlen(name);
2090
2091 if (strncmp("ippp", name, 4) || len > 8)
2092 return -1;
2093
2094 for (i = 0, deci = 1; i < len; i++, deci *= 10) {
2095 char a = name[len - i - 1];
2096 if (a >= '0' && a <= '9')
2097 unit += (a - '0') * deci;
2098 else
2099 break;
2100 }
2101 if (!i || len - i != 4)
2102 unit = -1;
2103
2104 return unit;
2105 }
2106
2107
2108 int
isdn_ppp_dial_slave(char * name)2109 isdn_ppp_dial_slave(char *name)
2110 {
2111 #ifdef CONFIG_ISDN_MPP
2112 isdn_net_dev *ndev;
2113 isdn_net_local *lp;
2114 struct net_device *sdev;
2115
2116 if (!(ndev = isdn_net_findif(name)))
2117 return 1;
2118 lp = ndev->local;
2119 if (!(lp->flags & ISDN_NET_CONNECTED))
2120 return 5;
2121
2122 sdev = lp->slave;
2123 while (sdev) {
2124 isdn_net_local *mlp = (isdn_net_local *) netdev_priv(sdev);
2125 if (!(mlp->flags & ISDN_NET_CONNECTED))
2126 break;
2127 sdev = mlp->slave;
2128 }
2129 if (!sdev)
2130 return 2;
2131
2132 isdn_net_dial_req((isdn_net_local *) netdev_priv(sdev));
2133 return 0;
2134 #else
2135 return -1;
2136 #endif
2137 }
2138
2139 int
isdn_ppp_hangup_slave(char * name)2140 isdn_ppp_hangup_slave(char *name)
2141 {
2142 #ifdef CONFIG_ISDN_MPP
2143 isdn_net_dev *ndev;
2144 isdn_net_local *lp;
2145 struct net_device *sdev;
2146
2147 if (!(ndev = isdn_net_findif(name)))
2148 return 1;
2149 lp = ndev->local;
2150 if (!(lp->flags & ISDN_NET_CONNECTED))
2151 return 5;
2152
2153 sdev = lp->slave;
2154 while (sdev) {
2155 isdn_net_local *mlp = (isdn_net_local *) netdev_priv(sdev);
2156
2157 if (mlp->slave) { /* find last connected link in chain */
2158 isdn_net_local *nlp = ISDN_SLAVE_PRIV(mlp);
2159
2160 if (!(nlp->flags & ISDN_NET_CONNECTED))
2161 break;
2162 } else if (mlp->flags & ISDN_NET_CONNECTED)
2163 break;
2164
2165 sdev = mlp->slave;
2166 }
2167 if (!sdev)
2168 return 2;
2169
2170 isdn_net_hangup(sdev);
2171 return 0;
2172 #else
2173 return -1;
2174 #endif
2175 }
2176
2177 /*
2178 * PPP compression stuff
2179 */
2180
2181
2182 /* Push an empty CCP Data Frame up to the daemon to wake it up and let it
2183 generate a CCP Reset-Request or tear down CCP altogether */
2184
isdn_ppp_ccp_kickup(struct ippp_struct * is)2185 static void isdn_ppp_ccp_kickup(struct ippp_struct *is)
2186 {
2187 isdn_ppp_fill_rq(NULL, 0, PPP_COMP, is->lp->ppp_slot);
2188 }
2189
2190 /* In-kernel handling of CCP Reset-Request and Reset-Ack is necessary,
2191 but absolutely nontrivial. The most abstruse problem we are facing is
2192 that the generation, reception and all the handling of timeouts and
2193 resends including proper request id management should be entirely left
2194 to the (de)compressor, but indeed is not covered by the current API to
2195 the (de)compressor. The API is a prototype version from PPP where only
2196 some (de)compressors have yet been implemented and all of them are
2197 rather simple in their reset handling. Especially, their is only one
2198 outstanding ResetAck at a time with all of them and ResetReq/-Acks do
2199 not have parameters. For this very special case it was sufficient to
2200 just return an error code from the decompressor and have a single
2201 reset() entry to communicate all the necessary information between
2202 the framework and the (de)compressor. Bad enough, LZS is different
2203 (and any other compressor may be different, too). It has multiple
2204 histories (eventually) and needs to Reset each of them independently
2205 and thus uses multiple outstanding Acks and history numbers as an
2206 additional parameter to Reqs/Acks.
2207 All that makes it harder to port the reset state engine into the
2208 kernel because it is not just the same simple one as in (i)pppd but
2209 it must be able to pass additional parameters and have multiple out-
2210 standing Acks. We are trying to achieve the impossible by handling
2211 reset transactions independent by their id. The id MUST change when
2212 the data portion changes, thus any (de)compressor who uses more than
2213 one resettable state must provide and recognize individual ids for
2214 each individual reset transaction. The framework itself does _only_
2215 differentiate them by id, because it has no other semantics like the
2216 (de)compressor might.
2217 This looks like a major redesign of the interface would be nice,
2218 but I don't have an idea how to do it better. */
2219
2220 /* Send a CCP Reset-Request or Reset-Ack directly from the kernel. This is
2221 getting that lengthy because there is no simple "send-this-frame-out"
2222 function above but every wrapper does a bit different. Hope I guess
2223 correct in this hack... */
2224
isdn_ppp_ccp_xmit_reset(struct ippp_struct * is,int proto,unsigned char code,unsigned char id,unsigned char * data,int len)2225 static void isdn_ppp_ccp_xmit_reset(struct ippp_struct *is, int proto,
2226 unsigned char code, unsigned char id,
2227 unsigned char *data, int len)
2228 {
2229 struct sk_buff *skb;
2230 unsigned char *p;
2231 int hl;
2232 int cnt = 0;
2233 isdn_net_local *lp = is->lp;
2234
2235 /* Alloc large enough skb */
2236 hl = dev->drv[lp->isdn_device]->interface->hl_hdrlen;
2237 skb = alloc_skb(len + hl + 16,GFP_ATOMIC);
2238 if(!skb) {
2239 printk(KERN_WARNING
2240 "ippp: CCP cannot send reset - out of memory\n");
2241 return;
2242 }
2243 skb_reserve(skb, hl);
2244
2245 /* We may need to stuff an address and control field first */
2246 if(!(is->pppcfg & SC_COMP_AC)) {
2247 p = skb_put(skb, 2);
2248 *p++ = 0xff;
2249 *p++ = 0x03;
2250 }
2251
2252 /* Stuff proto, code, id and length */
2253 p = skb_put(skb, 6);
2254 *p++ = (proto >> 8);
2255 *p++ = (proto & 0xff);
2256 *p++ = code;
2257 *p++ = id;
2258 cnt = 4 + len;
2259 *p++ = (cnt >> 8);
2260 *p++ = (cnt & 0xff);
2261
2262 /* Now stuff remaining bytes */
2263 if(len) {
2264 p = skb_put(skb, len);
2265 memcpy(p, data, len);
2266 }
2267
2268 /* skb is now ready for xmit */
2269 printk(KERN_DEBUG "Sending CCP Frame:\n");
2270 isdn_ppp_frame_log("ccp-xmit", skb->data, skb->len, 32, is->unit,lp->ppp_slot);
2271
2272 isdn_net_write_super(lp, skb);
2273 }
2274
2275 /* Allocate the reset state vector */
isdn_ppp_ccp_reset_alloc(struct ippp_struct * is)2276 static struct ippp_ccp_reset *isdn_ppp_ccp_reset_alloc(struct ippp_struct *is)
2277 {
2278 struct ippp_ccp_reset *r;
2279 r = kzalloc(sizeof(struct ippp_ccp_reset), GFP_KERNEL);
2280 if(!r) {
2281 printk(KERN_ERR "ippp_ccp: failed to allocate reset data"
2282 " structure - no mem\n");
2283 return NULL;
2284 }
2285 printk(KERN_DEBUG "ippp_ccp: allocated reset data structure %p\n", r);
2286 is->reset = r;
2287 return r;
2288 }
2289
2290 /* Destroy the reset state vector. Kill all pending timers first. */
isdn_ppp_ccp_reset_free(struct ippp_struct * is)2291 static void isdn_ppp_ccp_reset_free(struct ippp_struct *is)
2292 {
2293 unsigned int id;
2294
2295 printk(KERN_DEBUG "ippp_ccp: freeing reset data structure %p\n",
2296 is->reset);
2297 for(id = 0; id < 256; id++) {
2298 if(is->reset->rs[id]) {
2299 isdn_ppp_ccp_reset_free_state(is, (unsigned char)id);
2300 }
2301 }
2302 kfree(is->reset);
2303 is->reset = NULL;
2304 }
2305
2306 /* Free a given state and clear everything up for later reallocation */
isdn_ppp_ccp_reset_free_state(struct ippp_struct * is,unsigned char id)2307 static void isdn_ppp_ccp_reset_free_state(struct ippp_struct *is,
2308 unsigned char id)
2309 {
2310 struct ippp_ccp_reset_state *rs;
2311
2312 if(is->reset->rs[id]) {
2313 printk(KERN_DEBUG "ippp_ccp: freeing state for id %d\n", id);
2314 rs = is->reset->rs[id];
2315 /* Make sure the kernel will not call back later */
2316 if(rs->ta)
2317 del_timer(&rs->timer);
2318 is->reset->rs[id] = NULL;
2319 kfree(rs);
2320 } else {
2321 printk(KERN_WARNING "ippp_ccp: id %d is not allocated\n", id);
2322 }
2323 }
2324
2325 /* The timer callback function which is called when a ResetReq has timed out,
2326 aka has never been answered by a ResetAck */
isdn_ppp_ccp_timer_callback(unsigned long closure)2327 static void isdn_ppp_ccp_timer_callback(unsigned long closure)
2328 {
2329 struct ippp_ccp_reset_state *rs =
2330 (struct ippp_ccp_reset_state *)closure;
2331
2332 if(!rs) {
2333 printk(KERN_ERR "ippp_ccp: timer cb with zero closure.\n");
2334 return;
2335 }
2336 if(rs->ta && rs->state == CCPResetSentReq) {
2337 /* We are correct here */
2338 if(!rs->expra) {
2339 /* Hmm, there is no Ack really expected. We can clean
2340 up the state now, it will be reallocated if the
2341 decompressor insists on another reset */
2342 rs->ta = 0;
2343 isdn_ppp_ccp_reset_free_state(rs->is, rs->id);
2344 return;
2345 }
2346 printk(KERN_DEBUG "ippp_ccp: CCP Reset timed out for id %d\n",
2347 rs->id);
2348 /* Push it again */
2349 isdn_ppp_ccp_xmit_reset(rs->is, PPP_CCP, CCP_RESETREQ, rs->id,
2350 rs->data, rs->dlen);
2351 /* Restart timer */
2352 rs->timer.expires = jiffies + HZ*5;
2353 add_timer(&rs->timer);
2354 } else {
2355 printk(KERN_WARNING "ippp_ccp: timer cb in wrong state %d\n",
2356 rs->state);
2357 }
2358 }
2359
2360 /* Allocate a new reset transaction state */
isdn_ppp_ccp_reset_alloc_state(struct ippp_struct * is,unsigned char id)2361 static struct ippp_ccp_reset_state *isdn_ppp_ccp_reset_alloc_state(struct ippp_struct *is,
2362 unsigned char id)
2363 {
2364 struct ippp_ccp_reset_state *rs;
2365 if(is->reset->rs[id]) {
2366 printk(KERN_WARNING "ippp_ccp: old state exists for id %d\n",
2367 id);
2368 return NULL;
2369 } else {
2370 rs = kzalloc(sizeof(struct ippp_ccp_reset_state), GFP_KERNEL);
2371 if(!rs)
2372 return NULL;
2373 rs->state = CCPResetIdle;
2374 rs->is = is;
2375 rs->id = id;
2376 init_timer(&rs->timer);
2377 rs->timer.data = (unsigned long)rs;
2378 rs->timer.function = isdn_ppp_ccp_timer_callback;
2379 is->reset->rs[id] = rs;
2380 }
2381 return rs;
2382 }
2383
2384
2385 /* A decompressor wants a reset with a set of parameters - do what is
2386 necessary to fulfill it */
isdn_ppp_ccp_reset_trans(struct ippp_struct * is,struct isdn_ppp_resetparams * rp)2387 static void isdn_ppp_ccp_reset_trans(struct ippp_struct *is,
2388 struct isdn_ppp_resetparams *rp)
2389 {
2390 struct ippp_ccp_reset_state *rs;
2391
2392 if(rp->valid) {
2393 /* The decompressor defines parameters by itself */
2394 if(rp->rsend) {
2395 /* And he wants us to send a request */
2396 if(!(rp->idval)) {
2397 printk(KERN_ERR "ippp_ccp: decompressor must"
2398 " specify reset id\n");
2399 return;
2400 }
2401 if(is->reset->rs[rp->id]) {
2402 /* There is already a transaction in existence
2403 for this id. May be still waiting for a
2404 Ack or may be wrong. */
2405 rs = is->reset->rs[rp->id];
2406 if(rs->state == CCPResetSentReq && rs->ta) {
2407 printk(KERN_DEBUG "ippp_ccp: reset"
2408 " trans still in progress"
2409 " for id %d\n", rp->id);
2410 } else {
2411 printk(KERN_WARNING "ippp_ccp: reset"
2412 " trans in wrong state %d for"
2413 " id %d\n", rs->state, rp->id);
2414 }
2415 } else {
2416 /* Ok, this is a new transaction */
2417 printk(KERN_DEBUG "ippp_ccp: new trans for id"
2418 " %d to be started\n", rp->id);
2419 rs = isdn_ppp_ccp_reset_alloc_state(is, rp->id);
2420 if(!rs) {
2421 printk(KERN_ERR "ippp_ccp: out of mem"
2422 " allocing ccp trans\n");
2423 return;
2424 }
2425 rs->state = CCPResetSentReq;
2426 rs->expra = rp->expra;
2427 if(rp->dtval) {
2428 rs->dlen = rp->dlen;
2429 memcpy(rs->data, rp->data, rp->dlen);
2430 }
2431 /* HACK TODO - add link comp here */
2432 isdn_ppp_ccp_xmit_reset(is, PPP_CCP,
2433 CCP_RESETREQ, rs->id,
2434 rs->data, rs->dlen);
2435 /* Start the timer */
2436 rs->timer.expires = jiffies + 5*HZ;
2437 add_timer(&rs->timer);
2438 rs->ta = 1;
2439 }
2440 } else {
2441 printk(KERN_DEBUG "ippp_ccp: no reset sent\n");
2442 }
2443 } else {
2444 /* The reset params are invalid. The decompressor does not
2445 care about them, so we just send the minimal requests
2446 and increase ids only when an Ack is received for a
2447 given id */
2448 if(is->reset->rs[is->reset->lastid]) {
2449 /* There is already a transaction in existence
2450 for this id. May be still waiting for a
2451 Ack or may be wrong. */
2452 rs = is->reset->rs[is->reset->lastid];
2453 if(rs->state == CCPResetSentReq && rs->ta) {
2454 printk(KERN_DEBUG "ippp_ccp: reset"
2455 " trans still in progress"
2456 " for id %d\n", rp->id);
2457 } else {
2458 printk(KERN_WARNING "ippp_ccp: reset"
2459 " trans in wrong state %d for"
2460 " id %d\n", rs->state, rp->id);
2461 }
2462 } else {
2463 printk(KERN_DEBUG "ippp_ccp: new trans for id"
2464 " %d to be started\n", is->reset->lastid);
2465 rs = isdn_ppp_ccp_reset_alloc_state(is,
2466 is->reset->lastid);
2467 if(!rs) {
2468 printk(KERN_ERR "ippp_ccp: out of mem"
2469 " allocing ccp trans\n");
2470 return;
2471 }
2472 rs->state = CCPResetSentReq;
2473 /* We always expect an Ack if the decompressor doesn't
2474 know better */
2475 rs->expra = 1;
2476 rs->dlen = 0;
2477 /* HACK TODO - add link comp here */
2478 isdn_ppp_ccp_xmit_reset(is, PPP_CCP, CCP_RESETREQ,
2479 rs->id, NULL, 0);
2480 /* Start the timer */
2481 rs->timer.expires = jiffies + 5*HZ;
2482 add_timer(&rs->timer);
2483 rs->ta = 1;
2484 }
2485 }
2486 }
2487
2488 /* An Ack was received for this id. This means we stop the timer and clean
2489 up the state prior to calling the decompressors reset routine. */
isdn_ppp_ccp_reset_ack_rcvd(struct ippp_struct * is,unsigned char id)2490 static void isdn_ppp_ccp_reset_ack_rcvd(struct ippp_struct *is,
2491 unsigned char id)
2492 {
2493 struct ippp_ccp_reset_state *rs = is->reset->rs[id];
2494
2495 if(rs) {
2496 if(rs->ta && rs->state == CCPResetSentReq) {
2497 /* Great, we are correct */
2498 if(!rs->expra)
2499 printk(KERN_DEBUG "ippp_ccp: ResetAck received"
2500 " for id %d but not expected\n", id);
2501 } else {
2502 printk(KERN_INFO "ippp_ccp: ResetAck received out of"
2503 "sync for id %d\n", id);
2504 }
2505 if(rs->ta) {
2506 rs->ta = 0;
2507 del_timer(&rs->timer);
2508 }
2509 isdn_ppp_ccp_reset_free_state(is, id);
2510 } else {
2511 printk(KERN_INFO "ippp_ccp: ResetAck received for unknown id"
2512 " %d\n", id);
2513 }
2514 /* Make sure the simple reset stuff uses a new id next time */
2515 is->reset->lastid++;
2516 }
2517
2518 /*
2519 * decompress packet
2520 *
2521 * if master = 0, we're trying to uncompress an per-link compressed packet,
2522 * as opposed to an compressed reconstructed-from-MPPP packet.
2523 * proto is updated to protocol field of uncompressed packet.
2524 *
2525 * retval: decompressed packet,
2526 * same packet if uncompressed,
2527 * NULL if decompression error
2528 */
2529
isdn_ppp_decompress(struct sk_buff * skb,struct ippp_struct * is,struct ippp_struct * master,int * proto)2530 static struct sk_buff *isdn_ppp_decompress(struct sk_buff *skb,struct ippp_struct *is,struct ippp_struct *master,
2531 int *proto)
2532 {
2533 void *stat = NULL;
2534 struct isdn_ppp_compressor *ipc = NULL;
2535 struct sk_buff *skb_out;
2536 int len;
2537 struct ippp_struct *ri;
2538 struct isdn_ppp_resetparams rsparm;
2539 unsigned char rsdata[IPPP_RESET_MAXDATABYTES];
2540
2541 if(!master) {
2542 // per-link decompression
2543 stat = is->link_decomp_stat;
2544 ipc = is->link_decompressor;
2545 ri = is;
2546 } else {
2547 stat = master->decomp_stat;
2548 ipc = master->decompressor;
2549 ri = master;
2550 }
2551
2552 if (!ipc) {
2553 // no decompressor -> we can't decompress.
2554 printk(KERN_DEBUG "ippp: no decompressor defined!\n");
2555 return skb;
2556 }
2557 BUG_ON(!stat); // if we have a compressor, stat has been set as well
2558
2559 if((master && *proto == PPP_COMP) || (!master && *proto == PPP_COMPFRAG) ) {
2560 // compressed packets are compressed by their protocol type
2561
2562 // Set up reset params for the decompressor
2563 memset(&rsparm, 0, sizeof(rsparm));
2564 rsparm.data = rsdata;
2565 rsparm.maxdlen = IPPP_RESET_MAXDATABYTES;
2566
2567 skb_out = dev_alloc_skb(is->mru + PPP_HDRLEN);
2568 if (!skb_out) {
2569 kfree_skb(skb);
2570 printk(KERN_ERR "ippp: decomp memory allocation failure\n");
2571 return NULL;
2572 }
2573 len = ipc->decompress(stat, skb, skb_out, &rsparm);
2574 kfree_skb(skb);
2575 if (len <= 0) {
2576 switch(len) {
2577 case DECOMP_ERROR:
2578 printk(KERN_INFO "ippp: decomp wants reset %s params\n",
2579 rsparm.valid ? "with" : "without");
2580
2581 isdn_ppp_ccp_reset_trans(ri, &rsparm);
2582 break;
2583 case DECOMP_FATALERROR:
2584 ri->pppcfg |= SC_DC_FERROR;
2585 /* Kick ipppd to recognize the error */
2586 isdn_ppp_ccp_kickup(ri);
2587 break;
2588 }
2589 kfree_skb(skb_out);
2590 return NULL;
2591 }
2592 *proto = isdn_ppp_strip_proto(skb_out);
2593 if (*proto < 0) {
2594 kfree_skb(skb_out);
2595 return NULL;
2596 }
2597 return skb_out;
2598 } else {
2599 // uncompressed packets are fed through the decompressor to
2600 // update the decompressor state
2601 ipc->incomp(stat, skb, *proto);
2602 return skb;
2603 }
2604 }
2605
2606 /*
2607 * compress a frame
2608 * type=0: normal/bundle compression
2609 * =1: link compression
2610 * returns original skb if we haven't compressed the frame
2611 * and a new skb pointer if we've done it
2612 */
isdn_ppp_compress(struct sk_buff * skb_in,int * proto,struct ippp_struct * is,struct ippp_struct * master,int type)2613 static struct sk_buff *isdn_ppp_compress(struct sk_buff *skb_in,int *proto,
2614 struct ippp_struct *is,struct ippp_struct *master,int type)
2615 {
2616 int ret;
2617 int new_proto;
2618 struct isdn_ppp_compressor *compressor;
2619 void *stat;
2620 struct sk_buff *skb_out;
2621
2622 /* we do not compress control protocols */
2623 if(*proto < 0 || *proto > 0x3fff) {
2624 return skb_in;
2625 }
2626
2627 if(type) { /* type=1 => Link compression */
2628 return skb_in;
2629 }
2630 else {
2631 if(!master) {
2632 compressor = is->compressor;
2633 stat = is->comp_stat;
2634 }
2635 else {
2636 compressor = master->compressor;
2637 stat = master->comp_stat;
2638 }
2639 new_proto = PPP_COMP;
2640 }
2641
2642 if(!compressor) {
2643 printk(KERN_ERR "isdn_ppp: No compressor set!\n");
2644 return skb_in;
2645 }
2646 if(!stat) {
2647 printk(KERN_ERR "isdn_ppp: Compressor not initialized?\n");
2648 return skb_in;
2649 }
2650
2651 /* Allow for at least 150 % expansion (for now) */
2652 skb_out = alloc_skb(skb_in->len + skb_in->len/2 + 32 +
2653 skb_headroom(skb_in), GFP_ATOMIC);
2654 if(!skb_out)
2655 return skb_in;
2656 skb_reserve(skb_out, skb_headroom(skb_in));
2657
2658 ret = (compressor->compress)(stat,skb_in,skb_out,*proto);
2659 if(!ret) {
2660 dev_kfree_skb(skb_out);
2661 return skb_in;
2662 }
2663
2664 dev_kfree_skb(skb_in);
2665 *proto = new_proto;
2666 return skb_out;
2667 }
2668
2669 /*
2670 * we received a CCP frame ..
2671 * not a clean solution, but we MUST handle a few cases in the kernel
2672 */
isdn_ppp_receive_ccp(isdn_net_dev * net_dev,isdn_net_local * lp,struct sk_buff * skb,int proto)2673 static void isdn_ppp_receive_ccp(isdn_net_dev *net_dev, isdn_net_local *lp,
2674 struct sk_buff *skb,int proto)
2675 {
2676 struct ippp_struct *is;
2677 struct ippp_struct *mis;
2678 int len;
2679 struct isdn_ppp_resetparams rsparm;
2680 unsigned char rsdata[IPPP_RESET_MAXDATABYTES];
2681
2682 printk(KERN_DEBUG "Received CCP frame from peer slot(%d)\n",
2683 lp->ppp_slot);
2684 if (lp->ppp_slot < 0 || lp->ppp_slot >= ISDN_MAX_CHANNELS) {
2685 printk(KERN_ERR "%s: lp->ppp_slot(%d) out of range\n",
2686 __func__, lp->ppp_slot);
2687 return;
2688 }
2689 is = ippp_table[lp->ppp_slot];
2690 isdn_ppp_frame_log("ccp-rcv", skb->data, skb->len, 32, is->unit,lp->ppp_slot);
2691
2692 if(lp->master) {
2693 int slot = ISDN_MASTER_PRIV(lp)->ppp_slot;
2694 if (slot < 0 || slot >= ISDN_MAX_CHANNELS) {
2695 printk(KERN_ERR "%s: slot(%d) out of range\n",
2696 __func__, slot);
2697 return;
2698 }
2699 mis = ippp_table[slot];
2700 } else
2701 mis = is;
2702
2703 switch(skb->data[0]) {
2704 case CCP_CONFREQ:
2705 if(is->debug & 0x10)
2706 printk(KERN_DEBUG "Disable compression here!\n");
2707 if(proto == PPP_CCP)
2708 mis->compflags &= ~SC_COMP_ON;
2709 else
2710 is->compflags &= ~SC_LINK_COMP_ON;
2711 break;
2712 case CCP_TERMREQ:
2713 case CCP_TERMACK:
2714 if(is->debug & 0x10)
2715 printk(KERN_DEBUG "Disable (de)compression here!\n");
2716 if(proto == PPP_CCP)
2717 mis->compflags &= ~(SC_DECOMP_ON|SC_COMP_ON);
2718 else
2719 is->compflags &= ~(SC_LINK_DECOMP_ON|SC_LINK_COMP_ON);
2720 break;
2721 case CCP_CONFACK:
2722 /* if we RECEIVE an ackowledge we enable the decompressor */
2723 if(is->debug & 0x10)
2724 printk(KERN_DEBUG "Enable decompression here!\n");
2725 if(proto == PPP_CCP) {
2726 if (!mis->decompressor)
2727 break;
2728 mis->compflags |= SC_DECOMP_ON;
2729 } else {
2730 if (!is->decompressor)
2731 break;
2732 is->compflags |= SC_LINK_DECOMP_ON;
2733 }
2734 break;
2735
2736 case CCP_RESETACK:
2737 printk(KERN_DEBUG "Received ResetAck from peer\n");
2738 len = (skb->data[2] << 8) | skb->data[3];
2739 len -= 4;
2740
2741 if(proto == PPP_CCP) {
2742 /* If a reset Ack was outstanding for this id, then
2743 clean up the state engine */
2744 isdn_ppp_ccp_reset_ack_rcvd(mis, skb->data[1]);
2745 if(mis->decompressor && mis->decomp_stat)
2746 mis->decompressor->
2747 reset(mis->decomp_stat,
2748 skb->data[0],
2749 skb->data[1],
2750 len ? &skb->data[4] : NULL,
2751 len, NULL);
2752 /* TODO: This is not easy to decide here */
2753 mis->compflags &= ~SC_DECOMP_DISCARD;
2754 }
2755 else {
2756 isdn_ppp_ccp_reset_ack_rcvd(is, skb->data[1]);
2757 if(is->link_decompressor && is->link_decomp_stat)
2758 is->link_decompressor->
2759 reset(is->link_decomp_stat,
2760 skb->data[0],
2761 skb->data[1],
2762 len ? &skb->data[4] : NULL,
2763 len, NULL);
2764 /* TODO: neither here */
2765 is->compflags &= ~SC_LINK_DECOMP_DISCARD;
2766 }
2767 break;
2768
2769 case CCP_RESETREQ:
2770 printk(KERN_DEBUG "Received ResetReq from peer\n");
2771 /* Receiving a ResetReq means we must reset our compressor */
2772 /* Set up reset params for the reset entry */
2773 memset(&rsparm, 0, sizeof(rsparm));
2774 rsparm.data = rsdata;
2775 rsparm.maxdlen = IPPP_RESET_MAXDATABYTES;
2776 /* Isolate data length */
2777 len = (skb->data[2] << 8) | skb->data[3];
2778 len -= 4;
2779 if(proto == PPP_CCP) {
2780 if(mis->compressor && mis->comp_stat)
2781 mis->compressor->
2782 reset(mis->comp_stat,
2783 skb->data[0],
2784 skb->data[1],
2785 len ? &skb->data[4] : NULL,
2786 len, &rsparm);
2787 }
2788 else {
2789 if(is->link_compressor && is->link_comp_stat)
2790 is->link_compressor->
2791 reset(is->link_comp_stat,
2792 skb->data[0],
2793 skb->data[1],
2794 len ? &skb->data[4] : NULL,
2795 len, &rsparm);
2796 }
2797 /* Ack the Req as specified by rsparm */
2798 if(rsparm.valid) {
2799 /* Compressor reset handler decided how to answer */
2800 if(rsparm.rsend) {
2801 /* We should send a Frame */
2802 isdn_ppp_ccp_xmit_reset(is, proto, CCP_RESETACK,
2803 rsparm.idval ? rsparm.id
2804 : skb->data[1],
2805 rsparm.dtval ?
2806 rsparm.data : NULL,
2807 rsparm.dtval ?
2808 rsparm.dlen : 0);
2809 } else {
2810 printk(KERN_DEBUG "ResetAck suppressed\n");
2811 }
2812 } else {
2813 /* We answer with a straight reflected Ack */
2814 isdn_ppp_ccp_xmit_reset(is, proto, CCP_RESETACK,
2815 skb->data[1],
2816 len ? &skb->data[4] : NULL,
2817 len);
2818 }
2819 break;
2820 }
2821 }
2822
2823
2824 /*
2825 * Daemon sends a CCP frame ...
2826 */
2827
2828 /* TODO: Clean this up with new Reset semantics */
2829
2830 /* I believe the CCP handling as-is is done wrong. Compressed frames
2831 * should only be sent/received after CCP reaches UP state, which means
2832 * both sides have sent CONF_ACK. Currently, we handle both directions
2833 * independently, which means we may accept compressed frames too early
2834 * (supposedly not a problem), but may also mean we send compressed frames
2835 * too early, which may turn out to be a problem.
2836 * This part of state machine should actually be handled by (i)pppd, but
2837 * that's too big of a change now. --kai
2838 */
2839
2840 /* Actually, we might turn this into an advantage: deal with the RFC in
2841 * the old tradition of beeing generous on what we accept, but beeing
2842 * strict on what we send. Thus we should just
2843 * - accept compressed frames as soon as decompression is negotiated
2844 * - send compressed frames only when decomp *and* comp are negotiated
2845 * - drop rx compressed frames if we cannot decomp (instead of pushing them
2846 * up to ipppd)
2847 * and I tried to modify this file according to that. --abp
2848 */
2849
isdn_ppp_send_ccp(isdn_net_dev * net_dev,isdn_net_local * lp,struct sk_buff * skb)2850 static void isdn_ppp_send_ccp(isdn_net_dev *net_dev, isdn_net_local *lp, struct sk_buff *skb)
2851 {
2852 struct ippp_struct *mis,*is;
2853 int proto, slot = lp->ppp_slot;
2854 unsigned char *data;
2855
2856 if(!skb || skb->len < 3)
2857 return;
2858 if (slot < 0 || slot >= ISDN_MAX_CHANNELS) {
2859 printk(KERN_ERR "%s: lp->ppp_slot(%d) out of range\n",
2860 __func__, slot);
2861 return;
2862 }
2863 is = ippp_table[slot];
2864 /* Daemon may send with or without address and control field comp */
2865 data = skb->data;
2866 if(!(is->pppcfg & SC_COMP_AC) && data[0] == 0xff && data[1] == 0x03) {
2867 data += 2;
2868 if(skb->len < 5)
2869 return;
2870 }
2871
2872 proto = ((int)data[0]<<8)+data[1];
2873 if(proto != PPP_CCP && proto != PPP_CCPFRAG)
2874 return;
2875
2876 printk(KERN_DEBUG "Received CCP frame from daemon:\n");
2877 isdn_ppp_frame_log("ccp-xmit", skb->data, skb->len, 32, is->unit,lp->ppp_slot);
2878
2879 if (lp->master) {
2880 slot = ISDN_MASTER_PRIV(lp)->ppp_slot;
2881 if (slot < 0 || slot >= ISDN_MAX_CHANNELS) {
2882 printk(KERN_ERR "%s: slot(%d) out of range\n",
2883 __func__, slot);
2884 return;
2885 }
2886 mis = ippp_table[slot];
2887 } else
2888 mis = is;
2889 if (mis != is)
2890 printk(KERN_DEBUG "isdn_ppp: Ouch! Master CCP sends on slave slot!\n");
2891
2892 switch(data[2]) {
2893 case CCP_CONFREQ:
2894 if(is->debug & 0x10)
2895 printk(KERN_DEBUG "Disable decompression here!\n");
2896 if(proto == PPP_CCP)
2897 is->compflags &= ~SC_DECOMP_ON;
2898 else
2899 is->compflags &= ~SC_LINK_DECOMP_ON;
2900 break;
2901 case CCP_TERMREQ:
2902 case CCP_TERMACK:
2903 if(is->debug & 0x10)
2904 printk(KERN_DEBUG "Disable (de)compression here!\n");
2905 if(proto == PPP_CCP)
2906 is->compflags &= ~(SC_DECOMP_ON|SC_COMP_ON);
2907 else
2908 is->compflags &= ~(SC_LINK_DECOMP_ON|SC_LINK_COMP_ON);
2909 break;
2910 case CCP_CONFACK:
2911 /* if we SEND an ackowledge we can/must enable the compressor */
2912 if(is->debug & 0x10)
2913 printk(KERN_DEBUG "Enable compression here!\n");
2914 if(proto == PPP_CCP) {
2915 if (!is->compressor)
2916 break;
2917 is->compflags |= SC_COMP_ON;
2918 } else {
2919 if (!is->compressor)
2920 break;
2921 is->compflags |= SC_LINK_COMP_ON;
2922 }
2923 break;
2924 case CCP_RESETACK:
2925 /* If we send a ACK we should reset our compressor */
2926 if(is->debug & 0x10)
2927 printk(KERN_DEBUG "Reset decompression state here!\n");
2928 printk(KERN_DEBUG "ResetAck from daemon passed by\n");
2929 if(proto == PPP_CCP) {
2930 /* link to master? */
2931 if(is->compressor && is->comp_stat)
2932 is->compressor->reset(is->comp_stat, 0, 0,
2933 NULL, 0, NULL);
2934 is->compflags &= ~SC_COMP_DISCARD;
2935 }
2936 else {
2937 if(is->link_compressor && is->link_comp_stat)
2938 is->link_compressor->reset(is->link_comp_stat,
2939 0, 0, NULL, 0, NULL);
2940 is->compflags &= ~SC_LINK_COMP_DISCARD;
2941 }
2942 break;
2943 case CCP_RESETREQ:
2944 /* Just let it pass by */
2945 printk(KERN_DEBUG "ResetReq from daemon passed by\n");
2946 break;
2947 }
2948 }
2949
isdn_ppp_register_compressor(struct isdn_ppp_compressor * ipc)2950 int isdn_ppp_register_compressor(struct isdn_ppp_compressor *ipc)
2951 {
2952 ipc->next = ipc_head;
2953 ipc->prev = NULL;
2954 if(ipc_head) {
2955 ipc_head->prev = ipc;
2956 }
2957 ipc_head = ipc;
2958 return 0;
2959 }
2960
isdn_ppp_unregister_compressor(struct isdn_ppp_compressor * ipc)2961 int isdn_ppp_unregister_compressor(struct isdn_ppp_compressor *ipc)
2962 {
2963 if(ipc->prev)
2964 ipc->prev->next = ipc->next;
2965 else
2966 ipc_head = ipc->next;
2967 if(ipc->next)
2968 ipc->next->prev = ipc->prev;
2969 ipc->prev = ipc->next = NULL;
2970 return 0;
2971 }
2972
isdn_ppp_set_compressor(struct ippp_struct * is,struct isdn_ppp_comp_data * data)2973 static int isdn_ppp_set_compressor(struct ippp_struct *is, struct isdn_ppp_comp_data *data)
2974 {
2975 struct isdn_ppp_compressor *ipc = ipc_head;
2976 int ret;
2977 void *stat;
2978 int num = data->num;
2979
2980 if(is->debug & 0x10)
2981 printk(KERN_DEBUG "[%d] Set %s type %d\n",is->unit,
2982 (data->flags&IPPP_COMP_FLAG_XMIT)?"compressor":"decompressor",num);
2983
2984 /* If is has no valid reset state vector, we cannot allocate a
2985 decompressor. The decompressor would cause reset transactions
2986 sooner or later, and they need that vector. */
2987
2988 if(!(data->flags & IPPP_COMP_FLAG_XMIT) && !is->reset) {
2989 printk(KERN_ERR "ippp_ccp: no reset data structure - can't"
2990 " allow decompression.\n");
2991 return -ENOMEM;
2992 }
2993
2994 while(ipc) {
2995 if(ipc->num == num) {
2996 stat = ipc->alloc(data);
2997 if(stat) {
2998 ret = ipc->init(stat,data,is->unit,0);
2999 if(!ret) {
3000 printk(KERN_ERR "Can't init (de)compression!\n");
3001 ipc->free(stat);
3002 stat = NULL;
3003 break;
3004 }
3005 }
3006 else {
3007 printk(KERN_ERR "Can't alloc (de)compression!\n");
3008 break;
3009 }
3010
3011 if(data->flags & IPPP_COMP_FLAG_XMIT) {
3012 if(data->flags & IPPP_COMP_FLAG_LINK) {
3013 if(is->link_comp_stat)
3014 is->link_compressor->free(is->link_comp_stat);
3015 is->link_comp_stat = stat;
3016 is->link_compressor = ipc;
3017 }
3018 else {
3019 if(is->comp_stat)
3020 is->compressor->free(is->comp_stat);
3021 is->comp_stat = stat;
3022 is->compressor = ipc;
3023 }
3024 }
3025 else {
3026 if(data->flags & IPPP_COMP_FLAG_LINK) {
3027 if(is->link_decomp_stat)
3028 is->link_decompressor->free(is->link_decomp_stat);
3029 is->link_decomp_stat = stat;
3030 is->link_decompressor = ipc;
3031 }
3032 else {
3033 if(is->decomp_stat)
3034 is->decompressor->free(is->decomp_stat);
3035 is->decomp_stat = stat;
3036 is->decompressor = ipc;
3037 }
3038 }
3039 return 0;
3040 }
3041 ipc = ipc->next;
3042 }
3043 return -EINVAL;
3044 }
3045