RFC1144: add slhc code from linux kernel
SLHC is an Implementation of RFC1144 TCP/IP header compression. We will need RFC1144 compression to compress GPRS TCP/IP traffic. The implementation pushed with this commit was taken from: git://git.kernel.org/pub/scm/linux/kernel/git/stable/linux-stable.git commit 29b4817d4018df78086157ea3a55c1d9424a7cfc Change-Id: Ied69c143678dc4a64cecc671f5c4dfebe19d8519
This commit is contained in:
parent
22611be3d9
commit
b3e116c74d
|
@ -0,0 +1,183 @@
|
|||
#ifndef _SLHC_H
|
||||
#define _SLHC_H
|
||||
/*
|
||||
* Definitions for tcp compression routines.
|
||||
*
|
||||
* $Header: slcompress.h,v 1.10 89/12/31 08:53:02 van Exp $
|
||||
*
|
||||
* Copyright (c) 1989 Regents of the University of California.
|
||||
* All rights reserved.
|
||||
*
|
||||
* Redistribution and use in source and binary forms are permitted
|
||||
* provided that the above copyright notice and this paragraph are
|
||||
* duplicated in all such forms and that any documentation,
|
||||
* advertising materials, and other materials related to such
|
||||
* distribution and use acknowledge that the software was developed
|
||||
* by the University of California, Berkeley. The name of the
|
||||
* University may not be used to endorse or promote products derived
|
||||
* from this software without specific prior written permission.
|
||||
* THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
|
||||
* IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
|
||||
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
|
||||
*
|
||||
* Van Jacobson (van@helios.ee.lbl.gov), Dec 31, 1989:
|
||||
* - Initial distribution.
|
||||
*
|
||||
*
|
||||
* modified for KA9Q Internet Software Package by
|
||||
* Katie Stevens (dkstevens@ucdavis.edu)
|
||||
* University of California, Davis
|
||||
* Computing Services
|
||||
* - 01-31-90 initial adaptation
|
||||
*
|
||||
* - Feb 1991 Bill_Simpson@um.cc.umich.edu
|
||||
* variable number of conversation slots
|
||||
* allow zero or one slots
|
||||
* separate routines
|
||||
* status display
|
||||
*/
|
||||
|
||||
/*
|
||||
* Compressed packet format:
|
||||
*
|
||||
* The first octet contains the packet type (top 3 bits), TCP
|
||||
* 'push' bit, and flags that indicate which of the 4 TCP sequence
|
||||
* numbers have changed (bottom 5 bits). The next octet is a
|
||||
* conversation number that associates a saved IP/TCP header with
|
||||
* the compressed packet. The next two octets are the TCP checksum
|
||||
* from the original datagram. The next 0 to 15 octets are
|
||||
* sequence number changes, one change per bit set in the header
|
||||
* (there may be no changes and there are two special cases where
|
||||
* the receiver implicitly knows what changed -- see below).
|
||||
*
|
||||
* There are 5 numbers which can change (they are always inserted
|
||||
* in the following order): TCP urgent pointer, window,
|
||||
* acknowledgment, sequence number and IP ID. (The urgent pointer
|
||||
* is different from the others in that its value is sent, not the
|
||||
* change in value.) Since typical use of SLIP links is biased
|
||||
* toward small packets (see comments on MTU/MSS below), changes
|
||||
* use a variable length coding with one octet for numbers in the
|
||||
* range 1 - 255 and 3 octets (0, MSB, LSB) for numbers in the
|
||||
* range 256 - 65535 or 0. (If the change in sequence number or
|
||||
* ack is more than 65535, an uncompressed packet is sent.)
|
||||
*/
|
||||
|
||||
/*
|
||||
* Packet types (must not conflict with IP protocol version)
|
||||
*
|
||||
* The top nibble of the first octet is the packet type. There are
|
||||
* three possible types: IP (not proto TCP or tcp with one of the
|
||||
* control flags set); uncompressed TCP (a normal IP/TCP packet but
|
||||
* with the 8-bit protocol field replaced by an 8-bit connection id --
|
||||
* this type of packet syncs the sender & receiver); and compressed
|
||||
* TCP (described above).
|
||||
*
|
||||
* LSB of 4-bit field is TCP "PUSH" bit (a worthless anachronism) and
|
||||
* is logically part of the 4-bit "changes" field that follows. Top
|
||||
* three bits are actual packet type. For backward compatibility
|
||||
* and in the interest of conserving bits, numbers are chosen so the
|
||||
* IP protocol version number (4) which normally appears in this nibble
|
||||
* means "IP packet".
|
||||
*/
|
||||
|
||||
|
||||
#include <linux/ip.h>
|
||||
#include <linux/tcp.h>
|
||||
|
||||
/* SLIP compression masks for len/vers byte */
|
||||
#define SL_TYPE_IP 0x40
|
||||
#define SL_TYPE_UNCOMPRESSED_TCP 0x70
|
||||
#define SL_TYPE_COMPRESSED_TCP 0x80
|
||||
#define SL_TYPE_ERROR 0x00
|
||||
|
||||
/* Bits in first octet of compressed packet */
|
||||
#define NEW_C 0x40 /* flag bits for what changed in a packet */
|
||||
#define NEW_I 0x20
|
||||
#define NEW_S 0x08
|
||||
#define NEW_A 0x04
|
||||
#define NEW_W 0x02
|
||||
#define NEW_U 0x01
|
||||
|
||||
/* reserved, special-case values of above */
|
||||
#define SPECIAL_I (NEW_S|NEW_W|NEW_U) /* echoed interactive traffic */
|
||||
#define SPECIAL_D (NEW_S|NEW_A|NEW_W|NEW_U) /* unidirectional data */
|
||||
#define SPECIALS_MASK (NEW_S|NEW_A|NEW_W|NEW_U)
|
||||
|
||||
#define TCP_PUSH_BIT 0x10
|
||||
|
||||
/*
|
||||
* data type and sizes conversion assumptions:
|
||||
*
|
||||
* VJ code KA9Q style generic
|
||||
* u_char byte_t unsigned char 8 bits
|
||||
* u_short int16 unsigned short 16 bits
|
||||
* u_int int16 unsigned short 16 bits
|
||||
* u_long unsigned long unsigned long 32 bits
|
||||
* int int32 long 32 bits
|
||||
*/
|
||||
|
||||
typedef __u8 byte_t;
|
||||
typedef __u32 int32;
|
||||
|
||||
/*
|
||||
* "state" data for each active tcp conversation on the wire. This is
|
||||
* basically a copy of the entire IP/TCP header from the last packet
|
||||
* we saw from the conversation together with a small identifier
|
||||
* the transmit & receive ends of the line use to locate saved header.
|
||||
*/
|
||||
struct cstate {
|
||||
byte_t cs_this; /* connection id number (xmit) */
|
||||
struct cstate *next; /* next in ring (xmit) */
|
||||
struct iphdr cs_ip; /* ip/tcp hdr from most recent packet */
|
||||
struct tcphdr cs_tcp;
|
||||
unsigned char cs_ipopt[64];
|
||||
unsigned char cs_tcpopt[64];
|
||||
int cs_hsize;
|
||||
};
|
||||
#define NULLSLSTATE (struct cstate *)0
|
||||
|
||||
/*
|
||||
* all the state data for one serial line (we need one of these per line).
|
||||
*/
|
||||
struct slcompress {
|
||||
struct cstate *tstate; /* transmit connection states (array)*/
|
||||
struct cstate *rstate; /* receive connection states (array)*/
|
||||
|
||||
byte_t tslot_limit; /* highest transmit slot id (0-l)*/
|
||||
byte_t rslot_limit; /* highest receive slot id (0-l)*/
|
||||
|
||||
byte_t xmit_oldest; /* oldest xmit in ring */
|
||||
byte_t xmit_current; /* most recent xmit id */
|
||||
byte_t recv_current; /* most recent rcvd id */
|
||||
|
||||
byte_t flags;
|
||||
#define SLF_TOSS 0x01 /* tossing rcvd frames until id received */
|
||||
|
||||
int32 sls_o_nontcp; /* outbound non-TCP packets */
|
||||
int32 sls_o_tcp; /* outbound TCP packets */
|
||||
int32 sls_o_uncompressed; /* outbound uncompressed packets */
|
||||
int32 sls_o_compressed; /* outbound compressed packets */
|
||||
int32 sls_o_searches; /* searches for connection state */
|
||||
int32 sls_o_misses; /* times couldn't find conn. state */
|
||||
|
||||
int32 sls_i_uncompressed; /* inbound uncompressed packets */
|
||||
int32 sls_i_compressed; /* inbound compressed packets */
|
||||
int32 sls_i_error; /* inbound error packets */
|
||||
int32 sls_i_tossed; /* inbound packets tossed because of error */
|
||||
|
||||
int32 sls_i_runt;
|
||||
int32 sls_i_badcheck;
|
||||
};
|
||||
#define NULLSLCOMPR (struct slcompress *)0
|
||||
|
||||
/* In slhc.c: */
|
||||
struct slcompress *slhc_init(int rslots, int tslots);
|
||||
void slhc_free(struct slcompress *comp);
|
||||
|
||||
int slhc_compress(struct slcompress *comp, unsigned char *icp, int isize,
|
||||
unsigned char *ocp, unsigned char **cpp, int compress_cid);
|
||||
int slhc_uncompress(struct slcompress *comp, unsigned char *icp, int isize);
|
||||
int slhc_remember(struct slcompress *comp, unsigned char *icp, int isize);
|
||||
int slhc_toss(struct slcompress *comp);
|
||||
|
||||
#endif /* _SLHC_H */
|
|
@ -0,0 +1,744 @@
|
|||
/*
|
||||
* Routines to compress and uncompress tcp packets (for transmission
|
||||
* over low speed serial lines).
|
||||
*
|
||||
* Copyright (c) 1989 Regents of the University of California.
|
||||
* All rights reserved.
|
||||
*
|
||||
* Redistribution and use in source and binary forms are permitted
|
||||
* provided that the above copyright notice and this paragraph are
|
||||
* duplicated in all such forms and that any documentation,
|
||||
* advertising materials, and other materials related to such
|
||||
* distribution and use acknowledge that the software was developed
|
||||
* by the University of California, Berkeley. The name of the
|
||||
* University may not be used to endorse or promote products derived
|
||||
* from this software without specific prior written permission.
|
||||
* THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
|
||||
* IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
|
||||
* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
|
||||
*
|
||||
* Van Jacobson (van@helios.ee.lbl.gov), Dec 31, 1989:
|
||||
* - Initial distribution.
|
||||
*
|
||||
*
|
||||
* modified for KA9Q Internet Software Package by
|
||||
* Katie Stevens (dkstevens@ucdavis.edu)
|
||||
* University of California, Davis
|
||||
* Computing Services
|
||||
* - 01-31-90 initial adaptation (from 1.19)
|
||||
* PPP.05 02-15-90 [ks]
|
||||
* PPP.08 05-02-90 [ks] use PPP protocol field to signal compression
|
||||
* PPP.15 09-90 [ks] improve mbuf handling
|
||||
* PPP.16 11-02 [karn] substantially rewritten to use NOS facilities
|
||||
*
|
||||
* - Feb 1991 Bill_Simpson@um.cc.umich.edu
|
||||
* variable number of conversation slots
|
||||
* allow zero or one slots
|
||||
* separate routines
|
||||
* status display
|
||||
* - Jul 1994 Dmitry Gorodchanin
|
||||
* Fixes for memory leaks.
|
||||
* - Oct 1994 Dmitry Gorodchanin
|
||||
* Modularization.
|
||||
* - Jan 1995 Bjorn Ekwall
|
||||
* Use ip_fast_csum from ip.h
|
||||
* - July 1995 Christos A. Polyzols
|
||||
* Spotted bug in tcp option checking
|
||||
*
|
||||
*
|
||||
* This module is a difficult issue. It's clearly inet code but it's also clearly
|
||||
* driver code belonging close to PPP and SLIP
|
||||
*/
|
||||
|
||||
#include <linux/module.h>
|
||||
#include <linux/slab.h>
|
||||
#include <linux/types.h>
|
||||
#include <linux/string.h>
|
||||
#include <linux/errno.h>
|
||||
#include <linux/kernel.h>
|
||||
#include <net/slhc_vj.h>
|
||||
|
||||
#ifdef CONFIG_INET
|
||||
/* Entire module is for IP only */
|
||||
#include <linux/mm.h>
|
||||
#include <linux/socket.h>
|
||||
#include <linux/sockios.h>
|
||||
#include <linux/termios.h>
|
||||
#include <linux/in.h>
|
||||
#include <linux/fcntl.h>
|
||||
#include <linux/inet.h>
|
||||
#include <linux/netdevice.h>
|
||||
#include <net/ip.h>
|
||||
#include <net/protocol.h>
|
||||
#include <net/icmp.h>
|
||||
#include <net/tcp.h>
|
||||
#include <linux/skbuff.h>
|
||||
#include <net/sock.h>
|
||||
#include <linux/timer.h>
|
||||
#include <asm/uaccess.h>
|
||||
#include <net/checksum.h>
|
||||
#include <asm/unaligned.h>
|
||||
|
||||
static unsigned char *encode(unsigned char *cp, unsigned short n);
|
||||
static long decode(unsigned char **cpp);
|
||||
static unsigned char * put16(unsigned char *cp, unsigned short x);
|
||||
static unsigned short pull16(unsigned char **cpp);
|
||||
|
||||
/* Allocate compression data structure
|
||||
* slots must be in range 0 to 255 (zero meaning no compression)
|
||||
* Returns pointer to structure or ERR_PTR() on error.
|
||||
*/
|
||||
struct slcompress *
|
||||
slhc_init(int rslots, int tslots)
|
||||
{
|
||||
register short i;
|
||||
register struct cstate *ts;
|
||||
struct slcompress *comp;
|
||||
|
||||
if (rslots < 0 || rslots > 255 || tslots < 0 || tslots > 255)
|
||||
return ERR_PTR(-EINVAL);
|
||||
|
||||
comp = kzalloc(sizeof(struct slcompress), GFP_KERNEL);
|
||||
if (! comp)
|
||||
goto out_fail;
|
||||
|
||||
if (rslots > 0) {
|
||||
size_t rsize = rslots * sizeof(struct cstate);
|
||||
comp->rstate = kzalloc(rsize, GFP_KERNEL);
|
||||
if (! comp->rstate)
|
||||
goto out_free;
|
||||
comp->rslot_limit = rslots - 1;
|
||||
}
|
||||
|
||||
if (tslots > 0) {
|
||||
size_t tsize = tslots * sizeof(struct cstate);
|
||||
comp->tstate = kzalloc(tsize, GFP_KERNEL);
|
||||
if (! comp->tstate)
|
||||
goto out_free2;
|
||||
comp->tslot_limit = tslots - 1;
|
||||
}
|
||||
|
||||
comp->xmit_oldest = 0;
|
||||
comp->xmit_current = 255;
|
||||
comp->recv_current = 255;
|
||||
/*
|
||||
* don't accept any packets with implicit index until we get
|
||||
* one with an explicit index. Otherwise the uncompress code
|
||||
* will try to use connection 255, which is almost certainly
|
||||
* out of range
|
||||
*/
|
||||
comp->flags |= SLF_TOSS;
|
||||
|
||||
if ( tslots > 0 ) {
|
||||
ts = comp->tstate;
|
||||
for(i = comp->tslot_limit; i > 0; --i){
|
||||
ts[i].cs_this = i;
|
||||
ts[i].next = &(ts[i - 1]);
|
||||
}
|
||||
ts[0].next = &(ts[comp->tslot_limit]);
|
||||
ts[0].cs_this = 0;
|
||||
}
|
||||
return comp;
|
||||
|
||||
out_free2:
|
||||
kfree(comp->rstate);
|
||||
out_free:
|
||||
kfree(comp);
|
||||
out_fail:
|
||||
return ERR_PTR(-ENOMEM);
|
||||
}
|
||||
|
||||
|
||||
/* Free a compression data structure */
|
||||
void
|
||||
slhc_free(struct slcompress *comp)
|
||||
{
|
||||
if ( comp == NULLSLCOMPR )
|
||||
return;
|
||||
|
||||
if ( comp->tstate != NULLSLSTATE )
|
||||
kfree( comp->tstate );
|
||||
|
||||
if ( comp->rstate != NULLSLSTATE )
|
||||
kfree( comp->rstate );
|
||||
|
||||
kfree( comp );
|
||||
}
|
||||
|
||||
|
||||
/* Put a short in host order into a char array in network order */
|
||||
static inline unsigned char *
|
||||
put16(unsigned char *cp, unsigned short x)
|
||||
{
|
||||
*cp++ = x >> 8;
|
||||
*cp++ = x;
|
||||
|
||||
return cp;
|
||||
}
|
||||
|
||||
|
||||
/* Encode a number */
|
||||
static unsigned char *
|
||||
encode(unsigned char *cp, unsigned short n)
|
||||
{
|
||||
if(n >= 256 || n == 0){
|
||||
*cp++ = 0;
|
||||
cp = put16(cp,n);
|
||||
} else {
|
||||
*cp++ = n;
|
||||
}
|
||||
return cp;
|
||||
}
|
||||
|
||||
/* Pull a 16-bit integer in host order from buffer in network byte order */
|
||||
static unsigned short
|
||||
pull16(unsigned char **cpp)
|
||||
{
|
||||
short rval;
|
||||
|
||||
rval = *(*cpp)++;
|
||||
rval <<= 8;
|
||||
rval |= *(*cpp)++;
|
||||
return rval;
|
||||
}
|
||||
|
||||
/* Decode a number */
|
||||
static long
|
||||
decode(unsigned char **cpp)
|
||||
{
|
||||
register int x;
|
||||
|
||||
x = *(*cpp)++;
|
||||
if(x == 0){
|
||||
return pull16(cpp) & 0xffff; /* pull16 returns -1 on error */
|
||||
} else {
|
||||
return x & 0xff; /* -1 if PULLCHAR returned error */
|
||||
}
|
||||
}
|
||||
|
||||
/*
|
||||
* icp and isize are the original packet.
|
||||
* ocp is a place to put a copy if necessary.
|
||||
* cpp is initially a pointer to icp. If the copy is used,
|
||||
* change it to ocp.
|
||||
*/
|
||||
|
||||
int
|
||||
slhc_compress(struct slcompress *comp, unsigned char *icp, int isize,
|
||||
unsigned char *ocp, unsigned char **cpp, int compress_cid)
|
||||
{
|
||||
register struct cstate *ocs = &(comp->tstate[comp->xmit_oldest]);
|
||||
register struct cstate *lcs = ocs;
|
||||
register struct cstate *cs = lcs->next;
|
||||
register unsigned long deltaS, deltaA;
|
||||
register short changes = 0;
|
||||
int hlen;
|
||||
unsigned char new_seq[16];
|
||||
register unsigned char *cp = new_seq;
|
||||
struct iphdr *ip;
|
||||
struct tcphdr *th, *oth;
|
||||
__sum16 csum;
|
||||
|
||||
|
||||
/*
|
||||
* Don't play with runt packets.
|
||||
*/
|
||||
|
||||
if(isize<sizeof(struct iphdr))
|
||||
return isize;
|
||||
|
||||
ip = (struct iphdr *) icp;
|
||||
|
||||
/* Bail if this packet isn't TCP, or is an IP fragment */
|
||||
if (ip->protocol != IPPROTO_TCP || (ntohs(ip->frag_off) & 0x3fff)) {
|
||||
/* Send as regular IP */
|
||||
if(ip->protocol != IPPROTO_TCP)
|
||||
comp->sls_o_nontcp++;
|
||||
else
|
||||
comp->sls_o_tcp++;
|
||||
return isize;
|
||||
}
|
||||
/* Extract TCP header */
|
||||
|
||||
th = (struct tcphdr *)(((unsigned char *)ip) + ip->ihl*4);
|
||||
hlen = ip->ihl*4 + th->doff*4;
|
||||
|
||||
/* Bail if the TCP packet isn't `compressible' (i.e., ACK isn't set or
|
||||
* some other control bit is set). Also uncompressible if
|
||||
* it's a runt.
|
||||
*/
|
||||
if(hlen > isize || th->syn || th->fin || th->rst ||
|
||||
! (th->ack)){
|
||||
/* TCP connection stuff; send as regular IP */
|
||||
comp->sls_o_tcp++;
|
||||
return isize;
|
||||
}
|
||||
/*
|
||||
* Packet is compressible -- we're going to send either a
|
||||
* COMPRESSED_TCP or UNCOMPRESSED_TCP packet. Either way,
|
||||
* we need to locate (or create) the connection state.
|
||||
*
|
||||
* States are kept in a circularly linked list with
|
||||
* xmit_oldest pointing to the end of the list. The
|
||||
* list is kept in lru order by moving a state to the
|
||||
* head of the list whenever it is referenced. Since
|
||||
* the list is short and, empirically, the connection
|
||||
* we want is almost always near the front, we locate
|
||||
* states via linear search. If we don't find a state
|
||||
* for the datagram, the oldest state is (re-)used.
|
||||
*/
|
||||
for ( ; ; ) {
|
||||
if( ip->saddr == cs->cs_ip.saddr
|
||||
&& ip->daddr == cs->cs_ip.daddr
|
||||
&& th->source == cs->cs_tcp.source
|
||||
&& th->dest == cs->cs_tcp.dest)
|
||||
goto found;
|
||||
|
||||
/* if current equal oldest, at end of list */
|
||||
if ( cs == ocs )
|
||||
break;
|
||||
lcs = cs;
|
||||
cs = cs->next;
|
||||
comp->sls_o_searches++;
|
||||
}
|
||||
/*
|
||||
* Didn't find it -- re-use oldest cstate. Send an
|
||||
* uncompressed packet that tells the other side what
|
||||
* connection number we're using for this conversation.
|
||||
*
|
||||
* Note that since the state list is circular, the oldest
|
||||
* state points to the newest and we only need to set
|
||||
* xmit_oldest to update the lru linkage.
|
||||
*/
|
||||
comp->sls_o_misses++;
|
||||
comp->xmit_oldest = lcs->cs_this;
|
||||
goto uncompressed;
|
||||
|
||||
found:
|
||||
/*
|
||||
* Found it -- move to the front on the connection list.
|
||||
*/
|
||||
if(lcs == ocs) {
|
||||
/* found at most recently used */
|
||||
} else if (cs == ocs) {
|
||||
/* found at least recently used */
|
||||
comp->xmit_oldest = lcs->cs_this;
|
||||
} else {
|
||||
/* more than 2 elements */
|
||||
lcs->next = cs->next;
|
||||
cs->next = ocs->next;
|
||||
ocs->next = cs;
|
||||
}
|
||||
|
||||
/*
|
||||
* Make sure that only what we expect to change changed.
|
||||
* Check the following:
|
||||
* IP protocol version, header length & type of service.
|
||||
* The "Don't fragment" bit.
|
||||
* The time-to-live field.
|
||||
* The TCP header length.
|
||||
* IP options, if any.
|
||||
* TCP options, if any.
|
||||
* If any of these things are different between the previous &
|
||||
* current datagram, we send the current datagram `uncompressed'.
|
||||
*/
|
||||
oth = &cs->cs_tcp;
|
||||
|
||||
if(ip->version != cs->cs_ip.version || ip->ihl != cs->cs_ip.ihl
|
||||
|| ip->tos != cs->cs_ip.tos
|
||||
|| (ip->frag_off & htons(0x4000)) != (cs->cs_ip.frag_off & htons(0x4000))
|
||||
|| ip->ttl != cs->cs_ip.ttl
|
||||
|| th->doff != cs->cs_tcp.doff
|
||||
|| (ip->ihl > 5 && memcmp(ip+1,cs->cs_ipopt,((ip->ihl)-5)*4) != 0)
|
||||
|| (th->doff > 5 && memcmp(th+1,cs->cs_tcpopt,((th->doff)-5)*4) != 0)){
|
||||
goto uncompressed;
|
||||
}
|
||||
|
||||
/*
|
||||
* Figure out which of the changing fields changed. The
|
||||
* receiver expects changes in the order: urgent, window,
|
||||
* ack, seq (the order minimizes the number of temporaries
|
||||
* needed in this section of code).
|
||||
*/
|
||||
if(th->urg){
|
||||
deltaS = ntohs(th->urg_ptr);
|
||||
cp = encode(cp,deltaS);
|
||||
changes |= NEW_U;
|
||||
} else if(th->urg_ptr != oth->urg_ptr){
|
||||
/* argh! URG not set but urp changed -- a sensible
|
||||
* implementation should never do this but RFC793
|
||||
* doesn't prohibit the change so we have to deal
|
||||
* with it. */
|
||||
goto uncompressed;
|
||||
}
|
||||
if((deltaS = ntohs(th->window) - ntohs(oth->window)) != 0){
|
||||
cp = encode(cp,deltaS);
|
||||
changes |= NEW_W;
|
||||
}
|
||||
if((deltaA = ntohl(th->ack_seq) - ntohl(oth->ack_seq)) != 0L){
|
||||
if(deltaA > 0x0000ffff)
|
||||
goto uncompressed;
|
||||
cp = encode(cp,deltaA);
|
||||
changes |= NEW_A;
|
||||
}
|
||||
if((deltaS = ntohl(th->seq) - ntohl(oth->seq)) != 0L){
|
||||
if(deltaS > 0x0000ffff)
|
||||
goto uncompressed;
|
||||
cp = encode(cp,deltaS);
|
||||
changes |= NEW_S;
|
||||
}
|
||||
|
||||
switch(changes){
|
||||
case 0: /* Nothing changed. If this packet contains data and the
|
||||
* last one didn't, this is probably a data packet following
|
||||
* an ack (normal on an interactive connection) and we send
|
||||
* it compressed. Otherwise it's probably a retransmit,
|
||||
* retransmitted ack or window probe. Send it uncompressed
|
||||
* in case the other side missed the compressed version.
|
||||
*/
|
||||
if(ip->tot_len != cs->cs_ip.tot_len &&
|
||||
ntohs(cs->cs_ip.tot_len) == hlen)
|
||||
break;
|
||||
goto uncompressed;
|
||||
case SPECIAL_I:
|
||||
case SPECIAL_D:
|
||||
/* actual changes match one of our special case encodings --
|
||||
* send packet uncompressed.
|
||||
*/
|
||||
goto uncompressed;
|
||||
case NEW_S|NEW_A:
|
||||
if(deltaS == deltaA &&
|
||||
deltaS == ntohs(cs->cs_ip.tot_len) - hlen){
|
||||
/* special case for echoed terminal traffic */
|
||||
changes = SPECIAL_I;
|
||||
cp = new_seq;
|
||||
}
|
||||
break;
|
||||
case NEW_S:
|
||||
if(deltaS == ntohs(cs->cs_ip.tot_len) - hlen){
|
||||
/* special case for data xfer */
|
||||
changes = SPECIAL_D;
|
||||
cp = new_seq;
|
||||
}
|
||||
break;
|
||||
}
|
||||
deltaS = ntohs(ip->id) - ntohs(cs->cs_ip.id);
|
||||
if(deltaS != 1){
|
||||
cp = encode(cp,deltaS);
|
||||
changes |= NEW_I;
|
||||
}
|
||||
if(th->psh)
|
||||
changes |= TCP_PUSH_BIT;
|
||||
/* Grab the cksum before we overwrite it below. Then update our
|
||||
* state with this packet's header.
|
||||
*/
|
||||
csum = th->check;
|
||||
memcpy(&cs->cs_ip,ip,20);
|
||||
memcpy(&cs->cs_tcp,th,20);
|
||||
/* We want to use the original packet as our compressed packet.
|
||||
* (cp - new_seq) is the number of bytes we need for compressed
|
||||
* sequence numbers. In addition we need one byte for the change
|
||||
* mask, one for the connection id and two for the tcp checksum.
|
||||
* So, (cp - new_seq) + 4 bytes of header are needed.
|
||||
*/
|
||||
deltaS = cp - new_seq;
|
||||
if(compress_cid == 0 || comp->xmit_current != cs->cs_this){
|
||||
cp = ocp;
|
||||
*cpp = ocp;
|
||||
*cp++ = changes | NEW_C;
|
||||
*cp++ = cs->cs_this;
|
||||
comp->xmit_current = cs->cs_this;
|
||||
} else {
|
||||
cp = ocp;
|
||||
*cpp = ocp;
|
||||
*cp++ = changes;
|
||||
}
|
||||
*(__sum16 *)cp = csum;
|
||||
cp += 2;
|
||||
/* deltaS is now the size of the change section of the compressed header */
|
||||
memcpy(cp,new_seq,deltaS); /* Write list of deltas */
|
||||
memcpy(cp+deltaS,icp+hlen,isize-hlen);
|
||||
comp->sls_o_compressed++;
|
||||
ocp[0] |= SL_TYPE_COMPRESSED_TCP;
|
||||
return isize - hlen + deltaS + (cp - ocp);
|
||||
|
||||
/* Update connection state cs & send uncompressed packet (i.e.,
|
||||
* a regular ip/tcp packet but with the 'conversation id' we hope
|
||||
* to use on future compressed packets in the protocol field).
|
||||
*/
|
||||
uncompressed:
|
||||
memcpy(&cs->cs_ip,ip,20);
|
||||
memcpy(&cs->cs_tcp,th,20);
|
||||
if (ip->ihl > 5)
|
||||
memcpy(cs->cs_ipopt, ip+1, ((ip->ihl) - 5) * 4);
|
||||
if (th->doff > 5)
|
||||
memcpy(cs->cs_tcpopt, th+1, ((th->doff) - 5) * 4);
|
||||
comp->xmit_current = cs->cs_this;
|
||||
comp->sls_o_uncompressed++;
|
||||
memcpy(ocp, icp, isize);
|
||||
*cpp = ocp;
|
||||
ocp[9] = cs->cs_this;
|
||||
ocp[0] |= SL_TYPE_UNCOMPRESSED_TCP;
|
||||
return isize;
|
||||
}
|
||||
|
||||
|
||||
int
|
||||
slhc_uncompress(struct slcompress *comp, unsigned char *icp, int isize)
|
||||
{
|
||||
register int changes;
|
||||
long x;
|
||||
register struct tcphdr *thp;
|
||||
register struct iphdr *ip;
|
||||
register struct cstate *cs;
|
||||
int len, hdrlen;
|
||||
unsigned char *cp = icp;
|
||||
|
||||
/* We've got a compressed packet; read the change byte */
|
||||
comp->sls_i_compressed++;
|
||||
if(isize < 3){
|
||||
comp->sls_i_error++;
|
||||
return 0;
|
||||
}
|
||||
changes = *cp++;
|
||||
if(changes & NEW_C){
|
||||
/* Make sure the state index is in range, then grab the state.
|
||||
* If we have a good state index, clear the 'discard' flag.
|
||||
*/
|
||||
x = *cp++; /* Read conn index */
|
||||
if(x < 0 || x > comp->rslot_limit)
|
||||
goto bad;
|
||||
|
||||
comp->flags &=~ SLF_TOSS;
|
||||
comp->recv_current = x;
|
||||
} else {
|
||||
/* this packet has an implicit state index. If we've
|
||||
* had a line error since the last time we got an
|
||||
* explicit state index, we have to toss the packet. */
|
||||
if(comp->flags & SLF_TOSS){
|
||||
comp->sls_i_tossed++;
|
||||
return 0;
|
||||
}
|
||||
}
|
||||
cs = &comp->rstate[comp->recv_current];
|
||||
thp = &cs->cs_tcp;
|
||||
ip = &cs->cs_ip;
|
||||
|
||||
thp->check = *(__sum16 *)cp;
|
||||
cp += 2;
|
||||
|
||||
thp->psh = (changes & TCP_PUSH_BIT) ? 1 : 0;
|
||||
/*
|
||||
* we can use the same number for the length of the saved header and
|
||||
* the current one, because the packet wouldn't have been sent
|
||||
* as compressed unless the options were the same as the previous one
|
||||
*/
|
||||
|
||||
hdrlen = ip->ihl * 4 + thp->doff * 4;
|
||||
|
||||
switch(changes & SPECIALS_MASK){
|
||||
case SPECIAL_I: /* Echoed terminal traffic */
|
||||
{
|
||||
register short i;
|
||||
i = ntohs(ip->tot_len) - hdrlen;
|
||||
thp->ack_seq = htonl( ntohl(thp->ack_seq) + i);
|
||||
thp->seq = htonl( ntohl(thp->seq) + i);
|
||||
}
|
||||
break;
|
||||
|
||||
case SPECIAL_D: /* Unidirectional data */
|
||||
thp->seq = htonl( ntohl(thp->seq) +
|
||||
ntohs(ip->tot_len) - hdrlen);
|
||||
break;
|
||||
|
||||
default:
|
||||
if(changes & NEW_U){
|
||||
thp->urg = 1;
|
||||
if((x = decode(&cp)) == -1) {
|
||||
goto bad;
|
||||
}
|
||||
thp->urg_ptr = htons(x);
|
||||
} else
|
||||
thp->urg = 0;
|
||||
if(changes & NEW_W){
|
||||
if((x = decode(&cp)) == -1) {
|
||||
goto bad;
|
||||
}
|
||||
thp->window = htons( ntohs(thp->window) + x);
|
||||
}
|
||||
if(changes & NEW_A){
|
||||
if((x = decode(&cp)) == -1) {
|
||||
goto bad;
|
||||
}
|
||||
thp->ack_seq = htonl( ntohl(thp->ack_seq) + x);
|
||||
}
|
||||
if(changes & NEW_S){
|
||||
if((x = decode(&cp)) == -1) {
|
||||
goto bad;
|
||||
}
|
||||
thp->seq = htonl( ntohl(thp->seq) + x);
|
||||
}
|
||||
break;
|
||||
}
|
||||
if(changes & NEW_I){
|
||||
if((x = decode(&cp)) == -1) {
|
||||
goto bad;
|
||||
}
|
||||
ip->id = htons (ntohs (ip->id) + x);
|
||||
} else
|
||||
ip->id = htons (ntohs (ip->id) + 1);
|
||||
|
||||
/*
|
||||
* At this point, cp points to the first byte of data in the
|
||||
* packet. Put the reconstructed TCP and IP headers back on the
|
||||
* packet. Recalculate IP checksum (but not TCP checksum).
|
||||
*/
|
||||
|
||||
len = isize - (cp - icp);
|
||||
if (len < 0)
|
||||
goto bad;
|
||||
len += hdrlen;
|
||||
ip->tot_len = htons(len);
|
||||
ip->check = 0;
|
||||
|
||||
memmove(icp + hdrlen, cp, len - hdrlen);
|
||||
|
||||
cp = icp;
|
||||
memcpy(cp, ip, 20);
|
||||
cp += 20;
|
||||
|
||||
if (ip->ihl > 5) {
|
||||
memcpy(cp, cs->cs_ipopt, (ip->ihl - 5) * 4);
|
||||
cp += (ip->ihl - 5) * 4;
|
||||
}
|
||||
|
||||
put_unaligned(ip_fast_csum(icp, ip->ihl),
|
||||
&((struct iphdr *)icp)->check);
|
||||
|
||||
memcpy(cp, thp, 20);
|
||||
cp += 20;
|
||||
|
||||
if (thp->doff > 5) {
|
||||
memcpy(cp, cs->cs_tcpopt, ((thp->doff) - 5) * 4);
|
||||
cp += ((thp->doff) - 5) * 4;
|
||||
}
|
||||
|
||||
return len;
|
||||
bad:
|
||||
comp->sls_i_error++;
|
||||
return slhc_toss( comp );
|
||||
}
|
||||
|
||||
|
||||
int
|
||||
slhc_remember(struct slcompress *comp, unsigned char *icp, int isize)
|
||||
{
|
||||
register struct cstate *cs;
|
||||
unsigned ihl;
|
||||
|
||||
unsigned char index;
|
||||
|
||||
if(isize < 20) {
|
||||
/* The packet is shorter than a legal IP header */
|
||||
comp->sls_i_runt++;
|
||||
return slhc_toss( comp );
|
||||
}
|
||||
/* Peek at the IP header's IHL field to find its length */
|
||||
ihl = icp[0] & 0xf;
|
||||
if(ihl < 20 / 4){
|
||||
/* The IP header length field is too small */
|
||||
comp->sls_i_runt++;
|
||||
return slhc_toss( comp );
|
||||
}
|
||||
index = icp[9];
|
||||
icp[9] = IPPROTO_TCP;
|
||||
|
||||
if (ip_fast_csum(icp, ihl)) {
|
||||
/* Bad IP header checksum; discard */
|
||||
comp->sls_i_badcheck++;
|
||||
return slhc_toss( comp );
|
||||
}
|
||||
if(index > comp->rslot_limit) {
|
||||
comp->sls_i_error++;
|
||||
return slhc_toss(comp);
|
||||
}
|
||||
|
||||
/* Update local state */
|
||||
cs = &comp->rstate[comp->recv_current = index];
|
||||
comp->flags &=~ SLF_TOSS;
|
||||
memcpy(&cs->cs_ip,icp,20);
|
||||
memcpy(&cs->cs_tcp,icp + ihl*4,20);
|
||||
if (ihl > 5)
|
||||
memcpy(cs->cs_ipopt, icp + sizeof(struct iphdr), (ihl - 5) * 4);
|
||||
if (cs->cs_tcp.doff > 5)
|
||||
memcpy(cs->cs_tcpopt, icp + ihl*4 + sizeof(struct tcphdr), (cs->cs_tcp.doff - 5) * 4);
|
||||
cs->cs_hsize = ihl*2 + cs->cs_tcp.doff*2;
|
||||
/* Put headers back on packet
|
||||
* Neither header checksum is recalculated
|
||||
*/
|
||||
comp->sls_i_uncompressed++;
|
||||
return isize;
|
||||
}
|
||||
|
||||
int
|
||||
slhc_toss(struct slcompress *comp)
|
||||
{
|
||||
if ( comp == NULLSLCOMPR )
|
||||
return 0;
|
||||
|
||||
comp->flags |= SLF_TOSS;
|
||||
return 0;
|
||||
}
|
||||
|
||||
#else /* CONFIG_INET */
|
||||
|
||||
int
|
||||
slhc_toss(struct slcompress *comp)
|
||||
{
|
||||
printk(KERN_DEBUG "Called IP function on non IP-system: slhc_toss");
|
||||
return -EINVAL;
|
||||
}
|
||||
int
|
||||
slhc_uncompress(struct slcompress *comp, unsigned char *icp, int isize)
|
||||
{
|
||||
printk(KERN_DEBUG "Called IP function on non IP-system: slhc_uncompress");
|
||||
return -EINVAL;
|
||||
}
|
||||
int
|
||||
slhc_compress(struct slcompress *comp, unsigned char *icp, int isize,
|
||||
unsigned char *ocp, unsigned char **cpp, int compress_cid)
|
||||
{
|
||||
printk(KERN_DEBUG "Called IP function on non IP-system: slhc_compress");
|
||||
return -EINVAL;
|
||||
}
|
||||
|
||||
int
|
||||
slhc_remember(struct slcompress *comp, unsigned char *icp, int isize)
|
||||
{
|
||||
printk(KERN_DEBUG "Called IP function on non IP-system: slhc_remember");
|
||||
return -EINVAL;
|
||||
}
|
||||
|
||||
void
|
||||
slhc_free(struct slcompress *comp)
|
||||
{
|
||||
printk(KERN_DEBUG "Called IP function on non IP-system: slhc_free");
|
||||
}
|
||||
struct slcompress *
|
||||
slhc_init(int rslots, int tslots)
|
||||
{
|
||||
printk(KERN_DEBUG "Called IP function on non IP-system: slhc_init");
|
||||
return NULL;
|
||||
}
|
||||
|
||||
#endif /* CONFIG_INET */
|
||||
|
||||
/* VJ header compression */
|
||||
EXPORT_SYMBOL(slhc_init);
|
||||
EXPORT_SYMBOL(slhc_free);
|
||||
EXPORT_SYMBOL(slhc_remember);
|
||||
EXPORT_SYMBOL(slhc_compress);
|
||||
EXPORT_SYMBOL(slhc_uncompress);
|
||||
EXPORT_SYMBOL(slhc_toss);
|
||||
|
||||
MODULE_LICENSE("Dual BSD/GPL");
|
Loading…
Reference in New Issue