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