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