URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [linux/] [linux-2.4/] [net/] [sched/] [sch_teql.c] - Blame information for rev 1275

Go to most recent revision | Details | Compare with Previous | View Log


/* net/sched/sch_teql.c "True" (or "trivial") link equalizer.
 *
 *              This program is free software; you can redistribute it and/or
 *              modify it under the terms of the GNU General Public License
 *              as published by the Free Software Foundation; either version
 *              2 of the License, or (at your option) any later version.
 *
 * Authors:     Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
 */
 
#include <linux/module.h>
#include <asm/uaccess.h>
#include <asm/system.h>
#include <asm/bitops.h>
#include <linux/types.h>
#include <linux/kernel.h>
#include <linux/sched.h>
#include <linux/string.h>
#include <linux/mm.h>
#include <linux/socket.h>
#include <linux/sockios.h>
#include <linux/in.h>
#include <linux/errno.h>
#include <linux/interrupt.h>
#include <linux/if_ether.h>
#include <linux/inet.h>
#include <linux/netdevice.h>
#include <linux/etherdevice.h>
#include <linux/notifier.h>
#include <linux/init.h>
#include <net/ip.h>
#include <net/route.h>
#include <linux/skbuff.h>
#include <net/sock.h>
#include <net/pkt_sched.h>
 
/*
   How to setup it.
   ----------------
 
   After loading this module you will find a new device teqlN
   and new qdisc with the same name. To join a slave to the equalizer
   you should just set this qdisc on a device f.e.
 
   # tc qdisc add dev eth0 root teql0
   # tc qdisc add dev eth1 root teql0
 
   That's all. Full PnP 8)
 
   Applicability.
   --------------
 
   1. Slave devices MUST be active devices, i.e., they must raise the tbusy
      signal and generate EOI events. If you want to equalize virtual devices
      like tunnels, use a normal eql device.
   2. This device puts no limitations on physical slave characteristics
      f.e. it will equalize 9600baud line and 100Mb ethernet perfectly :-)
      Certainly, large difference in link speeds will make the resulting
      eqalized link unusable, because of huge packet reordering.
      I estimate an upper useful difference as ~10 times.
   3. If the slave requires address resolution, only protocols using
      neighbour cache (IPv4/IPv6) will work over the equalized link.
      Other protocols are still allowed to use the slave device directly,
      which will not break load balancing, though native slave
      traffic will have the highest priority.  */
 
struct teql_master
{
        struct Qdisc_ops qops;
        struct net_device dev;
        struct Qdisc *slaves;
        struct net_device_stats stats;
};
 
struct teql_sched_data
{
        struct Qdisc *next;
        struct teql_master *m;
        struct neighbour *ncache;
        struct sk_buff_head q;
};
 
#define NEXT_SLAVE(q) (((struct teql_sched_data*)((q)->data))->next)
 
#define FMASK (IFF_BROADCAST|IFF_POINTOPOINT|IFF_BROADCAST)
 
/* "teql*" qdisc routines */
 
static int
teql_enqueue(struct sk_buff *skb, struct Qdisc* sch)
{
        struct net_device *dev = sch->dev;
        struct teql_sched_data *q = (struct teql_sched_data *)sch->data;
 
        __skb_queue_tail(&q->q, skb);
        if (q->q.qlen <= dev->tx_queue_len) {
                sch->stats.bytes += skb->len;
                sch->stats.packets++;
                return 0;
        }
 
        __skb_unlink(skb, &q->q);
        kfree_skb(skb);
        sch->stats.drops++;
        return NET_XMIT_DROP;
}
 
static int
teql_requeue(struct sk_buff *skb, struct Qdisc* sch)
{
        struct teql_sched_data *q = (struct teql_sched_data *)sch->data;
 
        __skb_queue_head(&q->q, skb);
        return 0;
}
 
static struct sk_buff *
teql_dequeue(struct Qdisc* sch)
{
        struct teql_sched_data *dat = (struct teql_sched_data *)sch->data;
        struct sk_buff *skb;
 
        skb = __skb_dequeue(&dat->q);
        if (skb == NULL) {
                struct net_device *m = dat->m->dev.qdisc->dev;
                if (m) {
                        dat->m->slaves = sch;
                        netif_wake_queue(m);
                }
        }
        sch->q.qlen = dat->q.qlen + dat->m->dev.qdisc->q.qlen;
        return skb;
}
 
static __inline__ void
teql_neigh_release(struct neighbour *n)
{
        if (n)
                neigh_release(n);
}
 
static void
teql_reset(struct Qdisc* sch)
{
        struct teql_sched_data *dat = (struct teql_sched_data *)sch->data;
 
        skb_queue_purge(&dat->q);
        sch->q.qlen = 0;
        teql_neigh_release(xchg(&dat->ncache, NULL));
}
 
static void
teql_destroy(struct Qdisc* sch)
{
        struct Qdisc *q, *prev;
        struct teql_sched_data *dat = (struct teql_sched_data *)sch->data;
        struct teql_master *master = dat->m;
 
        if ((prev = master->slaves) != NULL) {
                do {
                        q = NEXT_SLAVE(prev);
                        if (q == sch) {
                                NEXT_SLAVE(prev) = NEXT_SLAVE(q);
                                if (q == master->slaves) {
                                        master->slaves = NEXT_SLAVE(q);
                                        if (q == master->slaves) {
                                                master->slaves = NULL;
                                                spin_lock_bh(&master->dev.queue_lock);
                                                qdisc_reset(master->dev.qdisc);
                                                spin_unlock_bh(&master->dev.queue_lock);
                                        }
                                }
                                skb_queue_purge(&dat->q);
                                teql_neigh_release(xchg(&dat->ncache, NULL));
                                break;
                        }
 
                } while ((prev = q) != master->slaves);
        }
 
        MOD_DEC_USE_COUNT;
}
 
static int teql_qdisc_init(struct Qdisc *sch, struct rtattr *opt)
{
        struct net_device *dev = sch->dev;
        struct teql_master *m = (struct teql_master*)sch->ops;
        struct teql_sched_data *q = (struct teql_sched_data *)sch->data;
 
        if (dev->hard_header_len > m->dev.hard_header_len)
                return -EINVAL;
 
        if (&m->dev == dev)
                return -ELOOP;
 
        q->m = m;
 
        skb_queue_head_init(&q->q);
 
        if (m->slaves) {
                if (m->dev.flags & IFF_UP) {
                        if ((m->dev.flags&IFF_POINTOPOINT && !(dev->flags&IFF_POINTOPOINT))
                            || (m->dev.flags&IFF_BROADCAST && !(dev->flags&IFF_BROADCAST))
                            || (m->dev.flags&IFF_MULTICAST && !(dev->flags&IFF_MULTICAST))
                            || dev->mtu < m->dev.mtu)
                                return -EINVAL;
                } else {
                        if (!(dev->flags&IFF_POINTOPOINT))
                                m->dev.flags &= ~IFF_POINTOPOINT;
                        if (!(dev->flags&IFF_BROADCAST))
                                m->dev.flags &= ~IFF_BROADCAST;
                        if (!(dev->flags&IFF_MULTICAST))
                                m->dev.flags &= ~IFF_MULTICAST;
                        if (dev->mtu < m->dev.mtu)
                                m->dev.mtu = dev->mtu;
                }
                q->next = NEXT_SLAVE(m->slaves);
                NEXT_SLAVE(m->slaves) = sch;
        } else {
                q->next = sch;
                m->slaves = sch;
                m->dev.mtu = dev->mtu;
                m->dev.flags = (m->dev.flags&~FMASK)|(dev->flags&FMASK);
        }
 
        MOD_INC_USE_COUNT;
        return 0;
}
 
/* "teql*" netdevice routines */
 
static int
__teql_resolve(struct sk_buff *skb, struct sk_buff *skb_res, struct net_device *dev)
{
        struct teql_sched_data *q = (void*)dev->qdisc->data;
        struct neighbour *mn = skb->dst->neighbour;
        struct neighbour *n = q->ncache;
 
        if (mn->tbl == NULL)
                return -EINVAL;
        if (n && n->tbl == mn->tbl &&
            memcmp(n->primary_key, mn->primary_key, mn->tbl->key_len) == 0) {
                atomic_inc(&n->refcnt);
        } else {
                n = __neigh_lookup_errno(mn->tbl, mn->primary_key, dev);
                if (IS_ERR(n))
                        return PTR_ERR(n);
        }
        if (neigh_event_send(n, skb_res) == 0) {
                int err;
                read_lock(&n->lock);
                err = dev->hard_header(skb, dev, ntohs(skb->protocol), n->ha, NULL, skb->len);
                read_unlock(&n->lock);
                if (err < 0) {
                        neigh_release(n);
                        return -EINVAL;
                }
                teql_neigh_release(xchg(&q->ncache, n));
                return 0;
        }
        neigh_release(n);
        return (skb_res == NULL) ? -EAGAIN : 1;
}
 
static __inline__ int
teql_resolve(struct sk_buff *skb, struct sk_buff *skb_res, struct net_device *dev)
{
        if (dev->hard_header == NULL ||
            skb->dst == NULL ||
            skb->dst->neighbour == NULL)
                return 0;
        return __teql_resolve(skb, skb_res, dev);
}
 
static int teql_master_xmit(struct sk_buff *skb, struct net_device *dev)
{
        struct teql_master *master = (void*)dev->priv;
        struct Qdisc *start, *q;
        int busy;
        int nores;
        int len = skb->len;
        struct sk_buff *skb_res = NULL;
 
        start = master->slaves;
 
restart:
        nores = 0;
        busy = 0;
 
        if ((q = start) == NULL)
                goto drop;
 
        do {
                struct net_device *slave = q->dev;
 
                if (slave->qdisc_sleeping != q)
                        continue;
                if (netif_queue_stopped(slave) || ! netif_running(slave)) {
                        busy = 1;
                        continue;
                }
 
                switch (teql_resolve(skb, skb_res, slave)) {
                case 0:
                        if (spin_trylock(&slave->xmit_lock)) {
                                slave->xmit_lock_owner = smp_processor_id();
                                if (!netif_queue_stopped(slave) &&
                                    slave->hard_start_xmit(skb, slave) == 0) {
                                        slave->xmit_lock_owner = -1;
                                        spin_unlock(&slave->xmit_lock);
                                        master->slaves = NEXT_SLAVE(q);
                                        netif_wake_queue(dev);
                                        master->stats.tx_packets++;
                                        master->stats.tx_bytes += len;
                                        return 0;
                                }
                                slave->xmit_lock_owner = -1;
                                spin_unlock(&slave->xmit_lock);
                        }
                        if (netif_queue_stopped(dev))
                                busy = 1;
                        break;
                case 1:
                        master->slaves = NEXT_SLAVE(q);
                        return 0;
                default:
                        nores = 1;
                        break;
                }
                __skb_pull(skb, skb->nh.raw - skb->data);
        } while ((q = NEXT_SLAVE(q)) != start);
 
        if (nores && skb_res == NULL) {
                skb_res = skb;
                goto restart;
        }
 
        if (busy) {
                netif_stop_queue(dev);
                return 1;
        }
        master->stats.tx_errors++;
 
drop:
        master->stats.tx_dropped++;
        dev_kfree_skb(skb);
        return 0;
}
 
static int teql_master_open(struct net_device *dev)
{
        struct Qdisc * q;
        struct teql_master *m = (void*)dev->priv;
        int mtu = 0xFFFE;
        unsigned flags = IFF_NOARP|IFF_MULTICAST;
 
        if (m->slaves == NULL)
                return -EUNATCH;
 
        flags = FMASK;
 
        q = m->slaves;
        do {
                struct net_device *slave = q->dev;
 
                if (slave == NULL)
                        return -EUNATCH;
 
                if (slave->mtu < mtu)
                        mtu = slave->mtu;
                if (slave->hard_header_len > LL_MAX_HEADER)
                        return -EINVAL;
 
                /* If all the slaves are BROADCAST, master is BROADCAST
                   If all the slaves are PtP, master is PtP
                   Otherwise, master is NBMA.
                 */
                if (!(slave->flags&IFF_POINTOPOINT))
                        flags &= ~IFF_POINTOPOINT;
                if (!(slave->flags&IFF_BROADCAST))
                        flags &= ~IFF_BROADCAST;
                if (!(slave->flags&IFF_MULTICAST))
                        flags &= ~IFF_MULTICAST;
        } while ((q = NEXT_SLAVE(q)) != m->slaves);
 
        m->dev.mtu = mtu;
        m->dev.flags = (m->dev.flags&~FMASK) | flags;
        netif_start_queue(&m->dev);
        MOD_INC_USE_COUNT;
        return 0;
}
 
static int teql_master_close(struct net_device *dev)
{
        netif_stop_queue(dev);
        MOD_DEC_USE_COUNT;
        return 0;
}
 
static struct net_device_stats *teql_master_stats(struct net_device *dev)
{
        struct teql_master *m = (void*)dev->priv;
        return &m->stats;
}
 
static int teql_master_mtu(struct net_device *dev, int new_mtu)
{
        struct teql_master *m = (void*)dev->priv;
        struct Qdisc *q;
 
        if (new_mtu < 68)
                return -EINVAL;
 
        q = m->slaves;
        if (q) {
                do {
                        if (new_mtu > q->dev->mtu)
                                return -EINVAL;
                } while ((q=NEXT_SLAVE(q)) != m->slaves);
        }
 
        dev->mtu = new_mtu;
        return 0;
}
 
static int teql_master_init(struct net_device *dev)
{
        dev->open               = teql_master_open;
        dev->hard_start_xmit    = teql_master_xmit;
        dev->stop               = teql_master_close;
        dev->get_stats          = teql_master_stats;
        dev->change_mtu         = teql_master_mtu;
        dev->type               = ARPHRD_VOID;
        dev->mtu                = 1500;
        dev->tx_queue_len       = 100;
        dev->flags              = IFF_NOARP;
        dev->hard_header_len    = LL_MAX_HEADER;
        return 0;
}
 
static struct teql_master the_master = {
{
        NULL,
        NULL,
        "",
        sizeof(struct teql_sched_data),
 
        teql_enqueue,
        teql_dequeue,
        teql_requeue,
        NULL,
 
        teql_qdisc_init,
        teql_reset,
        teql_destroy,
        NULL,
},};
 
 
#ifdef MODULE
int init_module(void)
#else
int __init teql_init(void)
#endif
{
        int err;
 
        rtnl_lock();
 
        the_master.dev.priv = (void*)&the_master;
        err = dev_alloc_name(&the_master.dev, "teql%d");
        if (err < 0)
                return err;
        memcpy(the_master.qops.id, the_master.dev.name, IFNAMSIZ);
        the_master.dev.init = teql_master_init;
 
        err = register_netdevice(&the_master.dev);
        if (err == 0) {
                err = register_qdisc(&the_master.qops);
                if (err)
                        unregister_netdevice(&the_master.dev);
        }
        rtnl_unlock();
        return err;
}
 
#ifdef MODULE
void cleanup_module(void)
{
        rtnl_lock();
        unregister_qdisc(&the_master.qops);
        unregister_netdevice(&the_master.dev);
        rtnl_unlock();
}
#endif
MODULE_LICENSE("GPL");

Browse

Tools

Subversion Repositories or1k

[/] [or1k/] [trunk/] [linux/] [linux-2.4/] [net/] [sched/] [sch_teql.c] - Blame information for rev 1275

Line No.	Rev	Author	Line
1	1275	phoenix	`/* net/sched/sch_teql.c "True" (or "trivial") link equalizer.`
2			`*`
3			`* This program is free software; you can redistribute it and/or`
4			`* modify it under the terms of the GNU General Public License`
5			`* as published by the Free Software Foundation; either version`
6			`* 2 of the License, or (at your option) any later version.`
7			`*`
8			`* Authors: Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>`
9			`*/`
10
11			`#include <linux/module.h>`
12			`#include <asm/uaccess.h>`
13			`#include <asm/system.h>`
14			`#include <asm/bitops.h>`
15			`#include <linux/types.h>`
16			`#include <linux/kernel.h>`
17			`#include <linux/sched.h>`
18			`#include <linux/string.h>`
19			`#include <linux/mm.h>`
20			`#include <linux/socket.h>`
21			`#include <linux/sockios.h>`
22			`#include <linux/in.h>`
23			`#include <linux/errno.h>`
24			`#include <linux/interrupt.h>`
25			`#include <linux/if_ether.h>`
26			`#include <linux/inet.h>`
27			`#include <linux/netdevice.h>`
28			`#include <linux/etherdevice.h>`
29			`#include <linux/notifier.h>`
30			`#include <linux/init.h>`
31			`#include <net/ip.h>`
32			`#include <net/route.h>`
33			`#include <linux/skbuff.h>`
34			`#include <net/sock.h>`
35			`#include <net/pkt_sched.h>`
36
37			`/*`
38			`How to setup it.`
39			`----------------`
40
41			`After loading this module you will find a new device teqlN`
42			`and new qdisc with the same name. To join a slave to the equalizer`
43			`you should just set this qdisc on a device f.e.`
44
45			`# tc qdisc add dev eth0 root teql0`
46			`# tc qdisc add dev eth1 root teql0`
47
48			`That's all. Full PnP 8)`
49
50			`Applicability.`
51			`--------------`
52
53			`1. Slave devices MUST be active devices, i.e., they must raise the tbusy`
54			`signal and generate EOI events. If you want to equalize virtual devices`
55			`like tunnels, use a normal eql device.`
56			`2. This device puts no limitations on physical slave characteristics`
57			`f.e. it will equalize 9600baud line and 100Mb ethernet perfectly :-)`
58			`Certainly, large difference in link speeds will make the resulting`
59			`eqalized link unusable, because of huge packet reordering.`
60			`I estimate an upper useful difference as ~10 times.`
61			`3. If the slave requires address resolution, only protocols using`
62			`neighbour cache (IPv4/IPv6) will work over the equalized link.`
63			`Other protocols are still allowed to use the slave device directly,`
64			`which will not break load balancing, though native slave`
65			`traffic will have the highest priority. */`
66
67			`struct teql_master`
68			`{`
69			`struct Qdisc_ops qops;`
70			`struct net_device dev;`
71			`struct Qdisc *slaves;`
72			`struct net_device_stats stats;`
73			`};`
74
75			`struct teql_sched_data`
76			`{`
77			`struct Qdisc *next;`
78			`struct teql_master *m;`
79			`struct neighbour *ncache;`
80			`struct sk_buff_head q;`
81			`};`
82
83			`#define NEXT_SLAVE(q) (((struct teql_sched_data*)((q)->data))->next)`
84
85			`#define FMASK (IFF_BROADCAST\|IFF_POINTOPOINT\|IFF_BROADCAST)`
86
87			`/* "teql" qdisc routines /`
88
89			`static int`
90			`teql_enqueue(struct sk_buff skb, struct Qdisc sch)`
91			`{`
92			`struct net_device *dev = sch->dev;`
93			`struct teql_sched_data q = (struct teql_sched_data )sch->data;`
94
95			`__skb_queue_tail(&q->q, skb);`
96			`if (q->q.qlen <= dev->tx_queue_len) {`
97			`sch->stats.bytes += skb->len;`
98			`sch->stats.packets++;`
99			`return 0;`
100			`}`
101
102			`__skb_unlink(skb, &q->q);`
103			`kfree_skb(skb);`
104			`sch->stats.drops++;`
105			`return NET_XMIT_DROP;`
106			`}`
107
108			`static int`
109			`teql_requeue(struct sk_buff skb, struct Qdisc sch)`
110			`{`
111			`struct teql_sched_data q = (struct teql_sched_data )sch->data;`
112
113			`__skb_queue_head(&q->q, skb);`
114			`return 0;`
115			`}`
116
117			`static struct sk_buff *`
118			`teql_dequeue(struct Qdisc* sch)`
119			`{`
120			`struct teql_sched_data dat = (struct teql_sched_data )sch->data;`
121			`struct sk_buff *skb;`
122
123			`skb = __skb_dequeue(&dat->q);`
124			`if (skb == NULL) {`
125			`struct net_device *m = dat->m->dev.qdisc->dev;`
126			`if (m) {`
127			`dat->m->slaves = sch;`
128			`netif_wake_queue(m);`
129			`}`
130			`}`
131			`sch->q.qlen = dat->q.qlen + dat->m->dev.qdisc->q.qlen;`
132			`return skb;`
133			`}`
134
135			`static __inline__ void`
136			`teql_neigh_release(struct neighbour *n)`
137			`{`
138			`if (n)`
139			`neigh_release(n);`
140			`}`
141
142			`static void`
143			`teql_reset(struct Qdisc* sch)`
144			`{`
145			`struct teql_sched_data dat = (struct teql_sched_data )sch->data;`
146
147			`skb_queue_purge(&dat->q);`
148			`sch->q.qlen = 0;`
149			`teql_neigh_release(xchg(&dat->ncache, NULL));`
150			`}`
151
152			`static void`
153			`teql_destroy(struct Qdisc* sch)`
154			`{`
155			`struct Qdisc q, prev;`
156			`struct teql_sched_data dat = (struct teql_sched_data )sch->data;`
157			`struct teql_master *master = dat->m;`
158
159			`if ((prev = master->slaves) != NULL) {`
160			`do {`
161			`q = NEXT_SLAVE(prev);`
162			`if (q == sch) {`
163			`NEXT_SLAVE(prev) = NEXT_SLAVE(q);`
164			`if (q == master->slaves) {`
165			`master->slaves = NEXT_SLAVE(q);`
166			`if (q == master->slaves) {`
167			`master->slaves = NULL;`
168			`spin_lock_bh(&master->dev.queue_lock);`
169			`qdisc_reset(master->dev.qdisc);`
170			`spin_unlock_bh(&master->dev.queue_lock);`
171			`}`
172			`}`
173			`skb_queue_purge(&dat->q);`
174			`teql_neigh_release(xchg(&dat->ncache, NULL));`
175			`break;`
176			`}`
177
178			`} while ((prev = q) != master->slaves);`
179			`}`
180
181			`MOD_DEC_USE_COUNT;`
182			`}`
183
184			`static int teql_qdisc_init(struct Qdisc sch, struct rtattr opt)`
185			`{`
186			`struct net_device *dev = sch->dev;`
187			`struct teql_master m = (struct teql_master)sch->ops;`
188			`struct teql_sched_data q = (struct teql_sched_data )sch->data;`
189
190			`if (dev->hard_header_len > m->dev.hard_header_len)`
191			`return -EINVAL;`
192
193			`if (&m->dev == dev)`
194			`return -ELOOP;`
195
196			`q->m = m;`
197
198			`skb_queue_head_init(&q->q);`
199
200			`if (m->slaves) {`
201			`if (m->dev.flags & IFF_UP) {`
202			`if ((m->dev.flags&IFF_POINTOPOINT && !(dev->flags&IFF_POINTOPOINT))`
203			`\|\| (m->dev.flags&IFF_BROADCAST && !(dev->flags&IFF_BROADCAST))`
204			`\|\| (m->dev.flags&IFF_MULTICAST && !(dev->flags&IFF_MULTICAST))`
205			`\|\| dev->mtu < m->dev.mtu)`
206			`return -EINVAL;`
207			`} else {`
208			`if (!(dev->flags&IFF_POINTOPOINT))`
209			`m->dev.flags &= ~IFF_POINTOPOINT;`
210			`if (!(dev->flags&IFF_BROADCAST))`
211			`m->dev.flags &= ~IFF_BROADCAST;`
212			`if (!(dev->flags&IFF_MULTICAST))`
213			`m->dev.flags &= ~IFF_MULTICAST;`
214			`if (dev->mtu < m->dev.mtu)`
215			`m->dev.mtu = dev->mtu;`
216			`}`
217			`q->next = NEXT_SLAVE(m->slaves);`
218			`NEXT_SLAVE(m->slaves) = sch;`
219			`} else {`
220			`q->next = sch;`
221			`m->slaves = sch;`
222			`m->dev.mtu = dev->mtu;`
223			`m->dev.flags = (m->dev.flags&~FMASK)\|(dev->flags&FMASK);`
224			`}`
225
226			`MOD_INC_USE_COUNT;`
227			`return 0;`
228			`}`
229
230			`/* "teql" netdevice routines /`
231
232			`static int`
233			`__teql_resolve(struct sk_buff skb, struct sk_buff skb_res, struct net_device *dev)`
234			`{`
235			`struct teql_sched_data q = (void)dev->qdisc->data;`
236			`struct neighbour *mn = skb->dst->neighbour;`
237			`struct neighbour *n = q->ncache;`
238
239			`if (mn->tbl == NULL)`
240			`return -EINVAL;`
241			`if (n && n->tbl == mn->tbl &&`
242			`memcmp(n->primary_key, mn->primary_key, mn->tbl->key_len) == 0) {`
243			`atomic_inc(&n->refcnt);`
244			`} else {`
245			`n = __neigh_lookup_errno(mn->tbl, mn->primary_key, dev);`
246			`if (IS_ERR(n))`
247			`return PTR_ERR(n);`
248			`}`
249			`if (neigh_event_send(n, skb_res) == 0) {`
250			`int err;`
251			`read_lock(&n->lock);`
252			`err = dev->hard_header(skb, dev, ntohs(skb->protocol), n->ha, NULL, skb->len);`
253			`read_unlock(&n->lock);`
254			`if (err < 0) {`
255			`neigh_release(n);`
256			`return -EINVAL;`
257			`}`
258			`teql_neigh_release(xchg(&q->ncache, n));`
259			`return 0;`
260			`}`
261			`neigh_release(n);`
262			`return (skb_res == NULL) ? -EAGAIN : 1;`
263			`}`
264
265			`static __inline__ int`
266			`teql_resolve(struct sk_buff skb, struct sk_buff skb_res, struct net_device *dev)`
267			`{`
268			`if (dev->hard_header == NULL \|\|`
269			`skb->dst == NULL \|\|`
270			`skb->dst->neighbour == NULL)`
271			`return 0;`
272			`return __teql_resolve(skb, skb_res, dev);`
273			`}`
274
275			`static int teql_master_xmit(struct sk_buff skb, struct net_device dev)`
276			`{`
277			`struct teql_master master = (void)dev->priv;`
278			`struct Qdisc start, q;`
279			`int busy;`
280			`int nores;`
281			`int len = skb->len;`
282			`struct sk_buff *skb_res = NULL;`
283
284			`start = master->slaves;`
285
286			`restart:`
287			`nores = 0;`
288			`busy = 0;`
289
290			`if ((q = start) == NULL)`
291			`goto drop;`
292
293			`do {`
294			`struct net_device *slave = q->dev;`
295
296			`if (slave->qdisc_sleeping != q)`
297			`continue;`
298			`if (netif_queue_stopped(slave) \|\| ! netif_running(slave)) {`
299			`busy = 1;`
300			`continue;`
301			`}`
302
303			`switch (teql_resolve(skb, skb_res, slave)) {`
304			`case 0:`
305			`if (spin_trylock(&slave->xmit_lock)) {`
306			`slave->xmit_lock_owner = smp_processor_id();`
307			`if (!netif_queue_stopped(slave) &&`
308			`slave->hard_start_xmit(skb, slave) == 0) {`
309			`slave->xmit_lock_owner = -1;`
310			`spin_unlock(&slave->xmit_lock);`
311			`master->slaves = NEXT_SLAVE(q);`
312			`netif_wake_queue(dev);`
313			`master->stats.tx_packets++;`
314			`master->stats.tx_bytes += len;`
315			`return 0;`
316			`}`
317			`slave->xmit_lock_owner = -1;`
318			`spin_unlock(&slave->xmit_lock);`
319			`}`
320			`if (netif_queue_stopped(dev))`
321			`busy = 1;`
322			`break;`
323			`case 1:`
324			`master->slaves = NEXT_SLAVE(q);`
325			`return 0;`
326			`default:`
327			`nores = 1;`
328			`break;`
329			`}`
330			`__skb_pull(skb, skb->nh.raw - skb->data);`
331			`} while ((q = NEXT_SLAVE(q)) != start);`
332
333			`if (nores && skb_res == NULL) {`
334			`skb_res = skb;`
335			`goto restart;`
336			`}`
337
338			`if (busy) {`
339			`netif_stop_queue(dev);`
340			`return 1;`
341			`}`
342			`master->stats.tx_errors++;`
343
344			`drop:`
345			`master->stats.tx_dropped++;`
346			`dev_kfree_skb(skb);`
347			`return 0;`
348			`}`
349
350			`static int teql_master_open(struct net_device *dev)`
351			`{`
352			`struct Qdisc * q;`
353			`struct teql_master m = (void)dev->priv;`
354			`int mtu = 0xFFFE;`
355			`unsigned flags = IFF_NOARP\|IFF_MULTICAST;`
356
357			`if (m->slaves == NULL)`
358			`return -EUNATCH;`
359
360			`flags = FMASK;`
361
362			`q = m->slaves;`
363			`do {`
364			`struct net_device *slave = q->dev;`
365
366			`if (slave == NULL)`
367			`return -EUNATCH;`
368
369			`if (slave->mtu < mtu)`
370			`mtu = slave->mtu;`
371			`if (slave->hard_header_len > LL_MAX_HEADER)`
372			`return -EINVAL;`
373
374			`/* If all the slaves are BROADCAST, master is BROADCAST`
375			`If all the slaves are PtP, master is PtP`
376			`Otherwise, master is NBMA.`
377			`*/`
378			`if (!(slave->flags&IFF_POINTOPOINT))`
379			`flags &= ~IFF_POINTOPOINT;`
380			`if (!(slave->flags&IFF_BROADCAST))`
381			`flags &= ~IFF_BROADCAST;`
382			`if (!(slave->flags&IFF_MULTICAST))`
383			`flags &= ~IFF_MULTICAST;`
384			`} while ((q = NEXT_SLAVE(q)) != m->slaves);`
385
386			`m->dev.mtu = mtu;`
387			`m->dev.flags = (m->dev.flags&~FMASK) \| flags;`
388			`netif_start_queue(&m->dev);`
389			`MOD_INC_USE_COUNT;`
390			`return 0;`
391			`}`
392
393			`static int teql_master_close(struct net_device *dev)`
394			`{`
395			`netif_stop_queue(dev);`
396			`MOD_DEC_USE_COUNT;`
397			`return 0;`
398			`}`
399
400			`static struct net_device_stats teql_master_stats(struct net_device dev)`
401			`{`
402			`struct teql_master m = (void)dev->priv;`
403			`return &m->stats;`
404			`}`
405
406			`static int teql_master_mtu(struct net_device *dev, int new_mtu)`
407			`{`
408			`struct teql_master m = (void)dev->priv;`
409			`struct Qdisc *q;`
410
411			`if (new_mtu < 68)`
412			`return -EINVAL;`
413
414			`q = m->slaves;`
415			`if (q) {`
416			`do {`
417			`if (new_mtu > q->dev->mtu)`
418			`return -EINVAL;`
419			`} while ((q=NEXT_SLAVE(q)) != m->slaves);`
420			`}`
421
422			`dev->mtu = new_mtu;`
423			`return 0;`
424			`}`
425
426			`static int teql_master_init(struct net_device *dev)`
427			`{`
428			`dev->open = teql_master_open;`
429			`dev->hard_start_xmit = teql_master_xmit;`
430			`dev->stop = teql_master_close;`
431			`dev->get_stats = teql_master_stats;`
432			`dev->change_mtu = teql_master_mtu;`
433			`dev->type = ARPHRD_VOID;`
434			`dev->mtu = 1500;`
435			`dev->tx_queue_len = 100;`
436			`dev->flags = IFF_NOARP;`
437			`dev->hard_header_len = LL_MAX_HEADER;`
438			`return 0;`
439			`}`
440
441			`static struct teql_master the_master = {`
442			`{`
443			`NULL,`
444			`NULL,`
445			`"",`
446			`sizeof(struct teql_sched_data),`
447
448			`teql_enqueue,`
449			`teql_dequeue,`
450			`teql_requeue,`
451			`NULL,`
452
453			`teql_qdisc_init,`
454			`teql_reset,`
455			`teql_destroy,`
456			`NULL,`
457			`},};`
458
459
460			`#ifdef MODULE`
461			`int init_module(void)`
462			`#else`
463			`int __init teql_init(void)`
464			`#endif`
465			`{`
466			`int err;`
467
468			`rtnl_lock();`
469
470			`the_master.dev.priv = (void*)&the_master;`
471			`err = dev_alloc_name(&the_master.dev, "teql%d");`
472			`if (err < 0)`
473			`return err;`
474			`memcpy(the_master.qops.id, the_master.dev.name, IFNAMSIZ);`
475			`the_master.dev.init = teql_master_init;`
476
477			`err = register_netdevice(&the_master.dev);`
478			`if (err == 0) {`
479			`err = register_qdisc(&the_master.qops);`
480			`if (err)`
481			`unregister_netdevice(&the_master.dev);`
482			`}`
483			`rtnl_unlock();`
484			`return err;`
485			`}`
486
487			`#ifdef MODULE`
488			`void cleanup_module(void)`
489			`{`
490			`rtnl_lock();`
491			`unregister_qdisc(&the_master.qops);`
492			`unregister_netdevice(&the_master.dev);`
493			`rtnl_unlock();`
494			`}`
495			`#endif`
496			`MODULE_LICENSE("GPL");`