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

[/] [or1k/] [trunk/] [linux/] [linux-2.4/] [net/] [decnet/] [dn_dev.c] - Blame information for rev 1765

Details | Compare with Previous | View Log

/*
 * DECnet       An implementation of the DECnet protocol suite for the LINUX
 *              operating system.  DECnet is implemented using the  BSD Socket
 *              interface as the means of communication with the user level.
 *
 *              DECnet Device Layer
 *
 * Authors:     Steve Whitehouse <SteveW@ACM.org>
 *              Eduardo Marcelo Serrat <emserrat@geocities.com>
 *
 * Changes:
 *          Steve Whitehouse : Devices now see incoming frames so they
 *                             can mark on who it came from.
 *          Steve Whitehouse : Fixed bug in creating neighbours. Each neighbour
 *                             can now have a device specific setup func.
 *          Steve Whitehouse : Added /proc/sys/net/decnet/conf/<dev>/
 *          Steve Whitehouse : Fixed bug which sometimes killed timer
 *          Steve Whitehouse : Multiple ifaddr support
 *          Steve Whitehouse : SIOCGIFCONF is now a compile time option
 *          Steve Whitehouse : /proc/sys/net/decnet/conf/<sys>/forwarding
 *          Steve Whitehouse : Removed timer1 - its a user space issue now
 *         Patrick Caulfield : Fixed router hello message format
 */
 
#include <linux/config.h>
#include <linux/net.h>
#include <linux/netdevice.h>
#include <linux/proc_fs.h>
#include <linux/timer.h>
#include <linux/string.h>
#include <linux/if_arp.h>
#include <linux/if_ether.h>
#include <linux/init.h>
#include <linux/skbuff.h>
#include <linux/rtnetlink.h>
#include <linux/sysctl.h>
#include <asm/uaccess.h>
#include <net/neighbour.h>
#include <net/dst.h>
#include <net/dn.h>
#include <net/dn_dev.h>
#include <net/dn_route.h>
#include <net/dn_neigh.h>
#include <net/dn_fib.h>
 
#define DN_IFREQ_SIZE (sizeof(struct ifreq) - sizeof(struct sockaddr) + sizeof(struct sockaddr_dn))
 
static char dn_rt_all_end_mcast[ETH_ALEN] = {0xAB,0x00,0x00,0x04,0x00,0x00};
static char dn_rt_all_rt_mcast[ETH_ALEN]  = {0xAB,0x00,0x00,0x03,0x00,0x00};
static char dn_hiord[ETH_ALEN]            = {0xAA,0x00,0x04,0x00,0x00,0x00};
static unsigned char dn_eco_version[3]    = {0x02,0x00,0x00};
 
extern struct neigh_table dn_neigh_table;
 
struct net_device *decnet_default_device;
 
static struct dn_dev *dn_dev_create(struct net_device *dev, int *err);
static void dn_dev_delete(struct net_device *dev);
static void rtmsg_ifa(int event, struct dn_ifaddr *ifa);
 
static int dn_eth_up(struct net_device *);
static void dn_send_brd_hello(struct net_device *dev);
#if 0
static void dn_send_ptp_hello(struct net_device *dev);
#endif
 
static struct dn_dev_parms dn_dev_list[] =  {
{
        type:           ARPHRD_ETHER, /* Ethernet */
        mode:           DN_DEV_BCAST,
        state:          DN_DEV_S_RU,
        blksize:        1498,
        t2:             1,
        t3:             10,
        name:           "ethernet",
        ctl_name:       NET_DECNET_CONF_ETHER,
        up:             dn_eth_up,
        timer3:         dn_send_brd_hello,
},
{
        type:           ARPHRD_IPGRE, /* DECnet tunneled over GRE in IP */
        mode:           DN_DEV_BCAST,
        state:          DN_DEV_S_RU,
        blksize:        1400,
        t2:             1,
        t3:             10,
        name:           "ipgre",
        ctl_name:       NET_DECNET_CONF_GRE,
        timer3:         dn_send_brd_hello,
},
#if 0
{
        type:           ARPHRD_X25, /* Bog standard X.25 */
        mode:           DN_DEV_UCAST,
        state:          DN_DEV_S_DS,
        blksize:        230,
        t2:             1,
        t3:             120,
        name:           "x25",
        ctl_name:       NET_DECNET_CONF_X25,
        timer3:         dn_send_ptp_hello,
},
#endif
#if 0
{
        type:           ARPHRD_PPP, /* DECnet over PPP */
        mode:           DN_DEV_BCAST,
        state:          DN_DEV_S_RU,
        blksize:        230,
        t2:             1,
        t3:             10,
        name:           "ppp",
        ctl_name:       NET_DECNET_CONF_PPP,
        timer3:         dn_send_brd_hello,
},
#endif
#if 0
{
        type:           ARPHRD_DDCMP, /* DECnet over DDCMP */
        mode:           DN_DEV_UCAST,
        state:          DN_DEV_S_DS,
        blksize:        230,
        t2:             1,
        t3:             120,
        name:           "ddcmp",
        ctl_name:       NET_DECNET_CONF_DDCMP,
        timer3:         dn_send_ptp_hello,
},
#endif
{
        type:           ARPHRD_LOOPBACK, /* Loopback interface - always last */
        mode:           DN_DEV_BCAST,
        state:          DN_DEV_S_RU,
        blksize:        1498,
        t2:             1,
        t3:             10,
        name:           "loopback",
        ctl_name:       NET_DECNET_CONF_LOOPBACK,
        timer3:         dn_send_brd_hello,
}
};
 
#define DN_DEV_LIST_SIZE (sizeof(dn_dev_list)/sizeof(struct dn_dev_parms))
 
#define DN_DEV_PARMS_OFFSET(x) ((int) ((char *) &((struct dn_dev_parms *)0)->x))
 
#ifdef CONFIG_SYSCTL
 
static int min_t2[] = { 1 };
static int max_t2[] = { 60 }; /* No max specified, but this seems sensible */
static int min_t3[] = { 1 };
static int max_t3[] = { 8191 }; /* Must fit in 16 bits when multiplied by BCT3MULT or T3MULT */
 
static int min_priority[1];
static int max_priority[] = { 127 }; /* From DECnet spec */
 
static int dn_forwarding_proc(ctl_table *, int, struct file *,
                        void *, size_t *);
static int dn_forwarding_sysctl(ctl_table *table, int *name, int nlen,
                        void *oldval, size_t *oldlenp,
                        void *newval, size_t newlen,
                        void **context);
 
static struct dn_dev_sysctl_table {
        struct ctl_table_header *sysctl_header;
        ctl_table dn_dev_vars[5];
        ctl_table dn_dev_dev[2];
        ctl_table dn_dev_conf_dir[2];
        ctl_table dn_dev_proto_dir[2];
        ctl_table dn_dev_root_dir[2];
} dn_dev_sysctl = {
        NULL,
        {
        {NET_DECNET_CONF_DEV_FORWARDING, "forwarding",
        (void *)DN_DEV_PARMS_OFFSET(forwarding),
        sizeof(int), 0644, NULL,
        dn_forwarding_proc, dn_forwarding_sysctl,
        NULL, NULL, NULL},
        {NET_DECNET_CONF_DEV_PRIORITY, "priority",
        (void *)DN_DEV_PARMS_OFFSET(priority),
        sizeof(int), 0644, NULL,
        proc_dointvec_minmax, sysctl_intvec,
        NULL, &min_priority, &max_priority},
        {NET_DECNET_CONF_DEV_T2, "t2", (void *)DN_DEV_PARMS_OFFSET(t2),
        sizeof(int), 0644, NULL,
        proc_dointvec_minmax, sysctl_intvec,
        NULL, &min_t2, &max_t2},
        {NET_DECNET_CONF_DEV_T3, "t3", (void *)DN_DEV_PARMS_OFFSET(t3),
        sizeof(int), 0644, NULL,
        proc_dointvec_minmax, sysctl_intvec,
        NULL, &min_t3, &max_t3},
        {0}
        },
        {{0, "", NULL, 0, 0555, dn_dev_sysctl.dn_dev_vars}, {0}},
        {{NET_DECNET_CONF, "conf", NULL, 0, 0555, dn_dev_sysctl.dn_dev_dev}, {0}},
        {{NET_DECNET, "decnet", NULL, 0, 0555, dn_dev_sysctl.dn_dev_conf_dir}, {0}},
        {{CTL_NET, "net", NULL, 0, 0555, dn_dev_sysctl.dn_dev_proto_dir}, {0}}
};
 
static void dn_dev_sysctl_register(struct net_device *dev, struct dn_dev_parms *parms)
{
        struct dn_dev_sysctl_table *t;
        int i;
 
        t = kmalloc(sizeof(*t), GFP_KERNEL);
        if (t == NULL)
                return;
 
        memcpy(t, &dn_dev_sysctl, sizeof(*t));
 
        for(i = 0; i < (sizeof(t->dn_dev_vars)/sizeof(t->dn_dev_vars[0]) - 1); i++) {
                long offset = (long)t->dn_dev_vars[i].data;
                t->dn_dev_vars[i].data = ((char *)parms) + offset;
                t->dn_dev_vars[i].de = NULL;
        }
 
        if (dev) {
                t->dn_dev_dev[0].procname = dev->name;
                t->dn_dev_dev[0].ctl_name = dev->ifindex;
        } else {
                t->dn_dev_dev[0].procname = parms->name;
                t->dn_dev_dev[0].ctl_name = parms->ctl_name;
        }
 
        t->dn_dev_dev[0].child = t->dn_dev_vars;
        t->dn_dev_dev[0].de = NULL;
        t->dn_dev_conf_dir[0].child = t->dn_dev_dev;
        t->dn_dev_conf_dir[0].de = NULL;
        t->dn_dev_proto_dir[0].child = t->dn_dev_conf_dir;
        t->dn_dev_proto_dir[0].de = NULL;
        t->dn_dev_root_dir[0].child = t->dn_dev_proto_dir;
        t->dn_dev_root_dir[0].de = NULL;
        t->dn_dev_vars[0].extra1 = (void *)dev;
 
        t->sysctl_header = register_sysctl_table(t->dn_dev_root_dir, 0);
        if (t->sysctl_header == NULL)
                kfree(t);
        else
                parms->sysctl = t;
}
 
static void dn_dev_sysctl_unregister(struct dn_dev_parms *parms)
{
        if (parms->sysctl) {
                struct dn_dev_sysctl_table *t = parms->sysctl;
                parms->sysctl = NULL;
                unregister_sysctl_table(t->sysctl_header);
                kfree(t);
        }
}
 
 
static int dn_forwarding_proc(ctl_table *table, int write,
                                struct file *filep,
                                void *buffer, size_t *lenp)
{
#ifdef CONFIG_DECNET_ROUTER
        struct net_device *dev = table->extra1;
        struct dn_dev *dn_db;
        int err;
        int tmp, old;
 
        if (table->extra1 == NULL)
                return -EINVAL;
 
        dn_db = dev->dn_ptr;
        old = dn_db->parms.forwarding;
 
        err = proc_dointvec(table, write, filep, buffer, lenp);
 
        if ((err >= 0) && write) {
                if (dn_db->parms.forwarding < 0)
                        dn_db->parms.forwarding = 0;
                if (dn_db->parms.forwarding > 2)
                        dn_db->parms.forwarding = 2;
                /*
                 * What an ugly hack this is... its works, just. It
                 * would be nice if sysctl/proc were just that little
                 * bit more flexible so I don't have to write a special
                 * routine, or suffer hacks like this - SJW
                 */
                tmp = dn_db->parms.forwarding;
                dn_db->parms.forwarding = old;
                if (dn_db->parms.down)
                        dn_db->parms.down(dev);
                dn_db->parms.forwarding = tmp;
                if (dn_db->parms.up)
                        dn_db->parms.up(dev);
        }
 
        return err;
#else
        return -EINVAL;
#endif
}
 
static int dn_forwarding_sysctl(ctl_table *table, int *name, int nlen,
                        void *oldval, size_t *oldlenp,
                        void *newval, size_t newlen,
                        void **context)
{
#ifdef CONFIG_DECNET_ROUTER
        struct net_device *dev = table->extra1;
        struct dn_dev *dn_db;
        int value;
 
        if (table->extra1 == NULL)
                return -EINVAL;
 
        dn_db = dev->dn_ptr;
 
        if (newval && newlen) {
                if (newlen != sizeof(int))
                        return -EINVAL;
 
                if (get_user(value, (int *)newval))
                        return -EFAULT;
                if (value < 0)
                        return -EINVAL;
                if (value > 2)
                        return -EINVAL;
 
                if (dn_db->parms.down)
                        dn_db->parms.down(dev);
                dn_db->parms.forwarding = value;
                if (dn_db->parms.up)
                        dn_db->parms.up(dev);
        }
 
        return 0;
#else
        return -EINVAL;
#endif
}
 
#else /* CONFIG_SYSCTL */
static void dn_dev_sysctl_unregister(struct dn_dev_parms *parms)
{
}
static void dn_dev_sysctl_register(struct net_device *dev, struct dn_dev_parms *parms)
{
}
 
#endif /* CONFIG_SYSCTL */
 
static struct dn_ifaddr *dn_dev_alloc_ifa(void)
{
        struct dn_ifaddr *ifa;
 
        ifa = kmalloc(sizeof(*ifa), GFP_KERNEL);
 
        if (ifa) {
                memset(ifa, 0, sizeof(*ifa));
        }
 
        return ifa;
}
 
static __inline__ void dn_dev_free_ifa(struct dn_ifaddr *ifa)
{
        kfree(ifa);
}
 
static void dn_dev_del_ifa(struct dn_dev *dn_db, struct dn_ifaddr **ifap, int destroy)
{
        struct dn_ifaddr *ifa1 = *ifap;
 
        *ifap = ifa1->ifa_next;
 
        rtmsg_ifa(RTM_DELADDR, ifa1);
 
        if (destroy) {
                dn_dev_free_ifa(ifa1);
 
                if (dn_db->ifa_list == NULL)
                        dn_dev_delete(dn_db->dev);
        }
}
 
static int dn_dev_insert_ifa(struct dn_dev *dn_db, struct dn_ifaddr *ifa)
{
        /*
         * FIXME: Duplicate check here.
         */
 
        ifa->ifa_next = dn_db->ifa_list;
        dn_db->ifa_list = ifa;
 
        rtmsg_ifa(RTM_NEWADDR, ifa);
 
        return 0;
}
 
static int dn_dev_set_ifa(struct net_device *dev, struct dn_ifaddr *ifa)
{
        struct dn_dev *dn_db = dev->dn_ptr;
 
        if (dn_db == NULL) {
                int err;
                dn_db = dn_dev_create(dev, &err);
                if (dn_db == NULL)
                        return err;
        }
 
        ifa->ifa_dev = dn_db;
 
        if (dev->flags & IFF_LOOPBACK)
                ifa->ifa_scope = RT_SCOPE_HOST;
 
        return dn_dev_insert_ifa(dn_db, ifa);
}
 
 
int dn_dev_ioctl(unsigned int cmd, void *arg)
{
        char buffer[DN_IFREQ_SIZE];
        struct ifreq *ifr = (struct ifreq *)buffer;
        struct sockaddr_dn *sdn = (struct sockaddr_dn *)&ifr->ifr_addr;
        struct dn_dev *dn_db;
        struct net_device *dev;
        struct dn_ifaddr *ifa = NULL, **ifap = NULL;
        int exclusive = 0;
        int ret = 0;
 
        if (copy_from_user(ifr, arg, DN_IFREQ_SIZE))
                return -EFAULT;
        ifr->ifr_name[IFNAMSIZ-1] = 0;
 
#ifdef CONFIG_KMOD
        dev_load(ifr->ifr_name);
#endif
 
        switch(cmd) {
                case SIOCGIFADDR:
                        break;
                case SIOCSIFADDR:
                        if (!capable(CAP_NET_ADMIN))
                                return -EACCES;
                        if (sdn->sdn_family != AF_DECnet)
                                return -EINVAL;
                        rtnl_lock();
                        exclusive = 1;
                        break;
                default:
                        return -EINVAL;
        }
 
        if ((dev = __dev_get_by_name(ifr->ifr_name)) == NULL) {
                ret = -ENODEV;
                goto done;
        }
 
        if ((dn_db = dev->dn_ptr) != NULL) {
                for (ifap = &dn_db->ifa_list; (ifa=*ifap) != NULL; ifap = &ifa->ifa_next)
                        if (strcmp(ifr->ifr_name, ifa->ifa_label) == 0)
                                break;
        }
 
        if (ifa == NULL && cmd != SIOCSIFADDR) {
                ret = -EADDRNOTAVAIL;
                goto done;
        }
 
        switch(cmd) {
                case SIOCGIFADDR:
                        *((dn_address *)sdn->sdn_nodeaddr) = ifa->ifa_local;
                        goto rarok;
 
                case SIOCSIFADDR:
                        if (!ifa) {
                                if ((ifa = dn_dev_alloc_ifa()) == NULL) {
                                        ret = -ENOBUFS;
                                        break;
                                }
                                memcpy(ifa->ifa_label, dev->name, IFNAMSIZ);
                        } else {
                                if (ifa->ifa_local == dn_saddr2dn(sdn))
                                        break;
                                dn_dev_del_ifa(dn_db, ifap, 0);
                        }
 
                        ifa->ifa_local = dn_saddr2dn(sdn);
 
                        ret = dn_dev_set_ifa(dev, ifa);
        }
done:
        if (exclusive)
                rtnl_unlock();
 
        return ret;
rarok:
        if (copy_to_user(arg, ifr, DN_IFREQ_SIZE))
                return -EFAULT;
 
        return 0;
}
 
static struct dn_dev *dn_dev_by_index(int ifindex)
{
        struct net_device *dev;
        struct dn_dev *dn_dev = NULL;
        dev = dev_get_by_index(ifindex);
        if (dev) {
                dn_dev = dev->dn_ptr;
                dev_put(dev);
        }
 
        return dn_dev;
}
 
static int dn_dev_rtm_deladdr(struct sk_buff *skb, struct nlmsghdr *nlh, void *arg)
{
        struct rtattr **rta = arg;
        struct dn_dev *dn_db;
        struct ifaddrmsg *ifm = NLMSG_DATA(nlh);
        struct dn_ifaddr *ifa, **ifap;
 
        if ((dn_db = dn_dev_by_index(ifm->ifa_index)) == NULL)
                return -EADDRNOTAVAIL;
 
        for(ifap = &dn_db->ifa_list; (ifa=*ifap) != NULL; ifap = &ifa->ifa_next) {
                void *tmp = rta[IFA_LOCAL-1];
                if ((tmp && memcmp(RTA_DATA(tmp), &ifa->ifa_local, 2)) ||
                                (rta[IFA_LABEL-1] && strcmp(RTA_DATA(rta[IFA_LABEL-1]), ifa->ifa_label)))
                        continue;
 
                dn_dev_del_ifa(dn_db, ifap, 1);
                return 0;
        }
 
        return -EADDRNOTAVAIL;
}
 
static int dn_dev_rtm_newaddr(struct sk_buff *skb, struct nlmsghdr *nlh, void *arg)
{
        struct rtattr **rta = arg;
        struct net_device *dev;
        struct dn_dev *dn_db;
        struct ifaddrmsg *ifm = NLMSG_DATA(nlh);
        struct dn_ifaddr *ifa;
 
        if (rta[IFA_LOCAL-1] == NULL)
                return -EINVAL;
 
        if ((dev = __dev_get_by_index(ifm->ifa_index)) == NULL)
                return -ENODEV;
 
        if ((dn_db = dev->dn_ptr) == NULL) {
                int err;
                dn_db = dn_dev_create(dev, &err);
                if (!dn_db)
                        return err;
        }
 
        if ((ifa = dn_dev_alloc_ifa()) == NULL)
                return -ENOBUFS;
 
        memcpy(&ifa->ifa_local, RTA_DATA(rta[IFA_LOCAL-1]), 2);
        ifa->ifa_flags = ifm->ifa_flags;
        ifa->ifa_scope = ifm->ifa_scope;
        ifa->ifa_dev = dn_db;
        if (rta[IFA_LABEL-1])
                memcpy(ifa->ifa_label, RTA_DATA(rta[IFA_LABEL-1]), IFNAMSIZ);
        else
                memcpy(ifa->ifa_label, dev->name, IFNAMSIZ);
 
        return dn_dev_insert_ifa(dn_db, ifa);
}
 
static int dn_dev_fill_ifaddr(struct sk_buff *skb, struct dn_ifaddr *ifa,
                                u32 pid, u32 seq, int event)
{
        struct ifaddrmsg *ifm;
        struct nlmsghdr *nlh;
        unsigned char *b = skb->tail;
 
        nlh = NLMSG_PUT(skb, pid, seq, event, sizeof(*ifm));
        ifm = NLMSG_DATA(nlh);
 
        ifm->ifa_family = AF_DECnet;
        ifm->ifa_prefixlen = 16;
        ifm->ifa_flags = ifa->ifa_flags | IFA_F_PERMANENT;
        ifm->ifa_scope = ifa->ifa_scope;
        ifm->ifa_index = ifa->ifa_dev->dev->ifindex;
        RTA_PUT(skb, IFA_LOCAL, 2, &ifa->ifa_local);
        if (ifa->ifa_label[0])
                RTA_PUT(skb, IFA_LABEL, IFNAMSIZ, &ifa->ifa_label);
        nlh->nlmsg_len = skb->tail - b;
        return skb->len;
 
nlmsg_failure:
rtattr_failure:
        skb_trim(skb, b - skb->data);
        return -1;
}
 
static void rtmsg_ifa(int event, struct dn_ifaddr *ifa)
{
        struct sk_buff *skb;
        int size = NLMSG_SPACE(sizeof(struct ifaddrmsg)+128);
 
        skb = alloc_skb(size, GFP_KERNEL);
        if (!skb) {
                netlink_set_err(rtnl, 0, RTMGRP_DECnet_IFADDR, ENOBUFS);
                return;
        }
        if (dn_dev_fill_ifaddr(skb, ifa, 0, 0, event) < 0) {
                kfree_skb(skb);
                netlink_set_err(rtnl, 0, RTMGRP_DECnet_IFADDR, EINVAL);
                return;
        }
        NETLINK_CB(skb).dst_groups = RTMGRP_DECnet_IFADDR;
        netlink_broadcast(rtnl, skb, 0, RTMGRP_DECnet_IFADDR, GFP_KERNEL);
}
 
static int dn_dev_dump_ifaddr(struct sk_buff *skb, struct netlink_callback *cb)
{
        int idx, dn_idx;
        int s_idx, s_dn_idx;
        struct net_device *dev;
        struct dn_dev *dn_db;
        struct dn_ifaddr *ifa;
 
        s_idx = cb->args[0];
        s_dn_idx = dn_idx = cb->args[1];
        read_lock(&dev_base_lock);
        for(dev = dev_base, idx = 0; dev; dev = dev->next) {
                if ((dn_db = dev->dn_ptr) == NULL)
                        continue;
                idx++;
                if (idx < s_idx)
                        continue;
                if (idx > s_idx)
                        s_dn_idx = 0;
                if ((dn_db = dev->dn_ptr) == NULL)
                        continue;
 
                for(ifa = dn_db->ifa_list, dn_idx = 0; ifa; ifa = ifa->ifa_next, dn_idx++) {
                        if (dn_idx < s_dn_idx)
                                continue;
 
                        if (dn_dev_fill_ifaddr(skb, ifa, NETLINK_CB(cb->skb).pid, cb->nlh->nlmsg_seq, RTM_NEWADDR) <= 0)
                                goto done;
                }
        }
done:
        read_unlock(&dev_base_lock);
        cb->args[0] = idx;
        cb->args[1] = dn_idx;
 
        return skb->len;
}
 
static void dn_send_endnode_hello(struct net_device *dev)
{
        struct endnode_hello_message *msg;
        struct sk_buff *skb = NULL;
        unsigned short int *pktlen;
        struct dn_dev *dn_db = (struct dn_dev *)dev->dn_ptr;
 
        if ((skb = dn_alloc_skb(NULL, sizeof(*msg), GFP_ATOMIC)) == NULL)
                return;
 
        skb->dev = dev;
 
        msg = (struct endnode_hello_message *)skb_put(skb,sizeof(*msg));
 
        msg->msgflg  = 0x0D;
        memcpy(msg->tiver, dn_eco_version, 3);
        memcpy(msg->id, decnet_ether_address, 6);
        msg->iinfo   = DN_RT_INFO_ENDN;
        msg->blksize = dn_htons(dn_db->parms.blksize);
        msg->area    = 0x00;
        memset(msg->seed, 0, 8);
        memcpy(msg->neighbor, dn_hiord, ETH_ALEN);
 
        if (dn_db->router) {
                struct dn_neigh *dn = (struct dn_neigh *)dn_db->router;
                dn_dn2eth(msg->neighbor, dn->addr);
        }
 
        msg->timer   = dn_htons((unsigned short)dn_db->parms.t3);
        msg->mpd     = 0x00;
        msg->datalen = 0x02;
        memset(msg->data, 0xAA, 2);
 
        pktlen = (unsigned short *)skb_push(skb,2);
        *pktlen = dn_htons(skb->len - 2);
 
        skb->nh.raw = skb->data;
 
        dn_rt_finish_output(skb, dn_rt_all_rt_mcast);
}
 
 
#ifdef CONFIG_DECNET_ROUTER
 
#define DRDELAY (5 * HZ)
 
static int dn_am_i_a_router(struct dn_neigh *dn, struct dn_dev *dn_db)
{
        /* First check time since device went up */
        if ((jiffies - dn_db->uptime) < DRDELAY)
                return 0;
 
        /* If there is no router, then yes... */
        if (!dn_db->router)
                return 1;
 
        /* otherwise only if we have a higher priority or.. */
        if (dn->priority < dn_db->parms.priority)
                return 1;
 
        /* if we have equal priority and a higher node number */
        if (dn->priority != dn_db->parms.priority)
                return 0;
 
        if (dn_ntohs(dn->addr) < dn_ntohs(decnet_address))
                return 1;
 
        return 0;
}
 
static void dn_send_router_hello(struct net_device *dev)
{
        int n;
        struct dn_dev *dn_db = dev->dn_ptr;
        struct dn_neigh *dn = (struct dn_neigh *)dn_db->router;
        struct sk_buff *skb;
        size_t size;
        unsigned char *ptr;
        unsigned char *i1, *i2;
        unsigned short *pktlen;
 
        if (dn_db->parms.blksize < (26 + 7))
                return;
 
        n = dn_db->parms.blksize - 26;
        n /= 7;
 
        if (n > 32)
                n = 32;
 
        size = 2 + 26 + 7 * n;
 
        if ((skb = dn_alloc_skb(NULL, size, GFP_ATOMIC)) == NULL)
                return;
 
        skb->dev = dev;
        ptr = skb_put(skb, size);
 
        *ptr++ = DN_RT_PKT_CNTL | DN_RT_PKT_ERTH;
        *ptr++ = 2; /* ECO */
        *ptr++ = 0;
        *ptr++ = 0;
        memcpy(ptr, decnet_ether_address, ETH_ALEN);
        ptr += ETH_ALEN;
        *ptr++ = dn_db->parms.forwarding == 1 ?
                        DN_RT_INFO_L1RT : DN_RT_INFO_L2RT;
        *((unsigned short *)ptr) = dn_htons(dn_db->parms.blksize);
        ptr += 2;
        *ptr++ = dn_db->parms.priority; /* Priority */
        *ptr++ = 0; /* Area: Reserved */
        *((unsigned short *)ptr) = dn_htons((unsigned short)dn_db->parms.t3);
        ptr += 2;
        *ptr++ = 0; /* MPD: Reserved */
        i1 = ptr++;
        memset(ptr, 0, 7); /* Name: Reserved */
        ptr += 7;
        i2 = ptr++;
 
        n = dn_neigh_elist(dev, ptr, n);
 
        *i2 = 7 * n;
        *i1 = 8 + *i2;
 
        skb_trim(skb, (27 + *i2));
 
        pktlen = (unsigned short *)skb_push(skb, 2);
        *pktlen = dn_htons(skb->len - 2);
 
        skb->nh.raw = skb->data;
 
        if (dn_am_i_a_router(dn, dn_db)) {
                struct sk_buff *skb2 = skb_copy(skb, GFP_ATOMIC);
                if (skb2) {
                        dn_rt_finish_output(skb2, dn_rt_all_end_mcast);
                }
        }
 
        dn_rt_finish_output(skb, dn_rt_all_rt_mcast);
}
 
static void dn_send_brd_hello(struct net_device *dev)
{
        struct dn_dev *dn_db = (struct dn_dev *)dev->dn_ptr;
 
        if (dn_db->parms.forwarding == 0)
                dn_send_endnode_hello(dev);
        else
                dn_send_router_hello(dev);
}
#else
static void dn_send_brd_hello(struct net_device *dev)
{
        dn_send_endnode_hello(dev);
}
#endif
 
#if 0
static void dn_send_ptp_hello(struct net_device *dev)
{
        int tdlen = 16;
        int size = dev->hard_header_len + 2 + 4 + tdlen;
        struct sk_buff *skb = dn_alloc_skb(NULL, size, GFP_ATOMIC);
        struct dn_dev *dn_db = dev->dn_ptr;
        int i;
        unsigned char *ptr;
        struct dn_neigh *dn = (struct dn_neigh *)dn_db->router;
 
        if (skb == NULL)
                return ;
 
        skb->dev = dev;
        skb_push(skb, dev->hard_header_len);
        ptr = skb_put(skb, 2 + 4 + tdlen);
 
        *ptr++ = DN_RT_PKT_HELO;
        *((dn_address *)ptr) = decnet_address;
        ptr += 2;
        *ptr++ = tdlen;
 
        for(i = 0; i < tdlen; i++)
                *ptr++ = 0252;
 
        if (dn_am_i_a_router(dn, dn_db)) {
                struct sk_buff *skb2 = skb_copy(skb, GFP_ATOMIC);
                if (skb2) {
                        dn_rt_finish_output(skb2, dn_rt_all_end_mcast);
                }
        }
 
        dn_rt_finish_output(skb, dn_rt_all_rt_mcast);
}
#endif
 
static int dn_eth_up(struct net_device *dev)
{
        struct dn_dev *dn_db = dev->dn_ptr;
 
        if (dn_db->parms.forwarding == 0)
                dev_mc_add(dev, dn_rt_all_end_mcast, ETH_ALEN, 0);
        else
                dev_mc_add(dev, dn_rt_all_rt_mcast, ETH_ALEN, 0);
 
        dev_mc_upload(dev);
 
        dn_db->use_long = 1;
 
        return 0;
}
 
static void dn_dev_set_timer(struct net_device *dev);
 
static void dn_dev_timer_func(unsigned long arg)
{
        struct net_device *dev = (struct net_device *)arg;
        struct dn_dev *dn_db = dev->dn_ptr;
 
        if (dn_db->t3 <= dn_db->parms.t2) {
                if (dn_db->parms.timer3)
                        dn_db->parms.timer3(dev);
                dn_db->t3 = dn_db->parms.t3;
        } else {
                dn_db->t3 -= dn_db->parms.t2;
        }
 
        dn_dev_set_timer(dev);
}
 
static void dn_dev_set_timer(struct net_device *dev)
{
        struct dn_dev *dn_db = dev->dn_ptr;
 
        if (dn_db->parms.t2 > dn_db->parms.t3)
                dn_db->parms.t2 = dn_db->parms.t3;
 
        dn_db->timer.data = (unsigned long)dev;
        dn_db->timer.function = dn_dev_timer_func;
        dn_db->timer.expires = jiffies + (dn_db->parms.t2 * HZ);
 
        add_timer(&dn_db->timer);
}
 
struct dn_dev *dn_dev_create(struct net_device *dev, int *err)
{
        int i;
        struct dn_dev_parms *p = dn_dev_list;
        struct dn_dev *dn_db;
 
        for(i = 0; i < DN_DEV_LIST_SIZE; i++, p++) {
                if (p->type == dev->type)
                        break;
        }
 
        *err = -ENODEV;
        if (i == DN_DEV_LIST_SIZE)
                return NULL;
 
        *err = -ENOBUFS;
        if ((dn_db = kmalloc(sizeof(struct dn_dev), GFP_ATOMIC)) == NULL)
                return NULL;
 
        memset(dn_db, 0, sizeof(struct dn_dev));
        memcpy(&dn_db->parms, p, sizeof(struct dn_dev_parms));
        dev->dn_ptr = dn_db;
        dn_db->dev = dev;
        init_timer(&dn_db->timer);
 
        memcpy(dn_db->addr, decnet_ether_address, ETH_ALEN); /* To go... */
 
        dn_db->uptime = jiffies;
        if (dn_db->parms.up) {
                if (dn_db->parms.up(dev) < 0) {
                        dev->dn_ptr = NULL;
                        kfree(dn_db);
                        return NULL;
                }
        }
 
        dn_db->neigh_parms = neigh_parms_alloc(dev, &dn_neigh_table);
        /* dn_db->neigh_parms->neigh_setup = dn_db->parms.neigh_setup; */
 
        dn_dev_sysctl_register(dev, &dn_db->parms);
 
        dn_dev_set_timer(dev);
 
        *err = 0;
        return dn_db;
}
 
 
/*
 * This processes a device up event. We only start up
 * the loopback device & ethernet devices with correct
 * MAC addreses automatically. Others must be started
 * specifically.
 */
void dn_dev_up(struct net_device *dev)
{
        struct dn_ifaddr *ifa;
 
        if ((dev->type != ARPHRD_ETHER) && (dev->type != ARPHRD_LOOPBACK))
                return;
 
        if (dev->type == ARPHRD_ETHER)
                if (memcmp(dev->dev_addr, decnet_ether_address, ETH_ALEN) != 0)
                        return;
 
        if ((ifa = dn_dev_alloc_ifa()) == NULL)
                return;
 
        ifa->ifa_local = decnet_address;
        ifa->ifa_flags = 0;
        ifa->ifa_scope = RT_SCOPE_UNIVERSE;
        strcpy(ifa->ifa_label, dev->name);
 
        dn_dev_set_ifa(dev, ifa);
}
 
static void dn_dev_delete(struct net_device *dev)
{
        struct dn_dev *dn_db = dev->dn_ptr;
 
        if (dn_db == NULL)
                return;
 
        del_timer_sync(&dn_db->timer);
 
        dn_dev_sysctl_unregister(&dn_db->parms);
 
        neigh_ifdown(&dn_neigh_table, dev);
 
        if (dev == decnet_default_device)
                decnet_default_device = NULL;
 
        if (dn_db->parms.down)
                dn_db->parms.down(dev);
 
        dev->dn_ptr = NULL;
 
        neigh_parms_release(&dn_neigh_table, dn_db->neigh_parms);
 
        if (dn_db->router)
                neigh_release(dn_db->router);
        if (dn_db->peer)
                neigh_release(dn_db->peer);
 
        kfree(dn_db);
}
 
void dn_dev_down(struct net_device *dev)
{
        struct dn_dev *dn_db = dev->dn_ptr;
        struct dn_ifaddr *ifa;
 
        if (dn_db == NULL)
                return;
 
        while((ifa = dn_db->ifa_list) != NULL) {
                dn_dev_del_ifa(dn_db, &dn_db->ifa_list, 0);
                dn_dev_free_ifa(ifa);
        }
 
        dn_dev_delete(dev);
}
 
void dn_dev_init_pkt(struct sk_buff *skb)
{
        return;
}
 
void dn_dev_veri_pkt(struct sk_buff *skb)
{
        return;
}
 
void dn_dev_hello(struct sk_buff *skb)
{
        return;
}
 
void dn_dev_devices_off(void)
{
        struct net_device *dev;
 
        for(dev = dev_base; dev; dev = dev->next)
                dn_dev_down(dev);
 
}
 
void dn_dev_devices_on(void)
{
        struct net_device *dev;
 
        for(dev = dev_base; dev; dev = dev->next) {
                if (dev->flags & IFF_UP)
                        dn_dev_up(dev);
        }
}
 
 
#ifdef CONFIG_DECNET_SIOCGIFCONF
/*
 * Now we support multiple addresses per interface.
 * Since we don't want to break existing code, you have to enable
 * it as a compile time option. Probably you should use the
 * rtnetlink interface instead.
 */
int dnet_gifconf(struct net_device *dev, char *buf, int len)
{
        struct dn_dev *dn_db = (struct dn_dev *)dev->dn_ptr;
        struct dn_ifaddr *ifa;
        struct ifreq *ifr = (struct ifreq *)buf;
        int done = 0;
 
        if ((dn_db == NULL) || ((ifa = dn_db->ifa_list) == NULL))
                return 0;
 
        for(; ifa; ifa = ifa->ifa_next) {
                if (!ifr) {
                        done += sizeof(DN_IFREQ_SIZE);
                        continue;
                }
                if (len < DN_IFREQ_SIZE)
                        return done;
                memset(ifr, 0, DN_IFREQ_SIZE);
 
                if (ifa->ifa_label)
                        strcpy(ifr->ifr_name, ifa->ifa_label);
                else
                        strcpy(ifr->ifr_name, dev->name);
 
                (*(struct sockaddr_dn *) &ifr->ifr_addr).sdn_family = AF_DECnet;
                (*(struct sockaddr_dn *) &ifr->ifr_addr).sdn_add.a_len = 2;
                (*(dn_address *)(*(struct sockaddr_dn *) &ifr->ifr_addr).sdn_add.a_addr) = ifa->ifa_local;
 
                ifr = (struct ifreq *)((char *)ifr + DN_IFREQ_SIZE);
                len  -= DN_IFREQ_SIZE;
                done += DN_IFREQ_SIZE;
        }
 
        return done;
}
#endif /* CONFIG_DECNET_SIOCGIFCONF */
 
 
#ifdef CONFIG_PROC_FS
 
static char *dn_type2asc(char type)
{
        switch(type) {
                case DN_DEV_BCAST:
                        return "B";
                case DN_DEV_UCAST:
                        return "U";
                case DN_DEV_MPOINT:
                        return "M";
        }
 
        return "?";
}
 
static int decnet_dev_get_info(char *buffer, char **start, off_t offset, int length)
{
        struct dn_dev *dn_db;
        struct net_device *dev;
        int len = 0;
        off_t pos = 0;
        off_t begin = 0;
        char peer_buf[DN_ASCBUF_LEN];
        char router_buf[DN_ASCBUF_LEN];
 
 
        len += sprintf(buffer, "Name     Flags T1   Timer1 T3   Timer3 BlkSize Pri State DevType    Router Peer\n");
 
        read_lock(&dev_base_lock);
        for (dev = dev_base; dev; dev = dev->next) {
                if ((dn_db = (struct dn_dev *)dev->dn_ptr) == NULL)
                        continue;
 
                len += sprintf(buffer + len, "%-8s %1s     %04u %04u   %04lu %04lu   %04hu    %03d %02x    %-10s %-7s %-7s\n",
                                dev->name ? dev->name : "???",
                                dn_type2asc(dn_db->parms.mode),
                                0, 0,
                                dn_db->t3, dn_db->parms.t3,
                                dn_db->parms.blksize,
                                dn_db->parms.priority,
                                dn_db->parms.state, dn_db->parms.name,
                                dn_db->router ? dn_addr2asc(dn_ntohs(*(dn_address *)dn_db->router->primary_key), router_buf) : "",
                                dn_db->peer ? dn_addr2asc(dn_ntohs(*(dn_address *)dn_db->peer->primary_key), peer_buf) : "");
 
 
                pos = begin + len;
 
                if (pos < offset) {
                        len   = 0;
                        begin = pos;
                }
                if (pos > offset + length)
                        break;
        }
 
        read_unlock(&dev_base_lock);
 
        *start = buffer + (offset - begin);
        len   -= (offset - begin);
 
        if (len > length) len = length;
 
        return(len);
}
 
#endif /* CONFIG_PROC_FS */
 
static struct rtnetlink_link dnet_rtnetlink_table[RTM_MAX-RTM_BASE+1] =
{
        { NULL,                 NULL,                   },
        { NULL,                 NULL,                   },
        { NULL,                 NULL,                   },
        { NULL,                 NULL,                   },
 
        { dn_dev_rtm_newaddr,   NULL,                   },
        { dn_dev_rtm_deladdr,   NULL,                   },
        { NULL,                 dn_dev_dump_ifaddr,     },
        { NULL,                 NULL,                   },
 
#ifdef CONFIG_DECNET_ROUTER
        { dn_fib_rtm_newroute,  NULL,                   },
        { dn_fib_rtm_delroute,  NULL,                   },
        { dn_cache_getroute,    dn_fib_dump,            },
        { NULL,                 NULL,                   },
#else
        { NULL,                 NULL,                   },
        { NULL,                 NULL,                   },
        { dn_cache_getroute,    dn_cache_dump,          },
        { NULL,                 NULL,                   },
#endif
        { NULL,                 NULL,                   },
        { NULL,                 NULL,                   },
        { NULL,                 NULL,                   },
        { NULL,                 NULL,                   },
 
#ifdef CONFIG_DECNET_ROUTER
        { dn_fib_rtm_newrule,   NULL,                   },
        { dn_fib_rtm_delrule,   NULL,                   },
        { NULL,                 dn_fib_dump_rules,      },
        { NULL,                 NULL,                   }
#else
        { NULL,                 NULL,                   },
        { NULL,                 NULL,                   },
        { NULL,                 NULL,                   },
        { NULL,                 NULL,                   }
#endif
};
 
void __init dn_dev_init(void)
{
 
        dn_dev_devices_on();
#ifdef CONFIG_DECNET_SIOCGIFCONF
        register_gifconf(PF_DECnet, dnet_gifconf);
#endif /* CONFIG_DECNET_SIOCGIFCONF */
 
        rtnetlink_links[PF_DECnet] = dnet_rtnetlink_table;
 
#ifdef CONFIG_PROC_FS
        proc_net_create("decnet_dev", 0, decnet_dev_get_info);
#endif /* CONFIG_PROC_FS */
 
#ifdef CONFIG_SYSCTL
        {
                int i;
                for(i = 0; i < DN_DEV_LIST_SIZE; i++)
                        dn_dev_sysctl_register(NULL, &dn_dev_list[i]);
        }
#endif /* CONFIG_SYSCTL */
}
 
void __exit dn_dev_cleanup(void)
{
        rtnetlink_links[PF_DECnet] = NULL;
 
#ifdef CONFIG_DECNET_SIOCGIFCONF
        unregister_gifconf(PF_DECnet);
#endif /* CONFIG_DECNET_SIOCGIFCONF */
 
#ifdef CONFIG_SYSCTL
        {
                int i;
                for(i = 0; i < DN_DEV_LIST_SIZE; i++)
                        dn_dev_sysctl_unregister(&dn_dev_list[i]);
        }
#endif /* CONFIG_SYSCTL */
 
        proc_net_remove("decnet_dev");
 
        dn_dev_devices_off();
}
Browse

Tools

Subversion Repositories or1k

[/] [or1k/] [trunk/] [linux/] [linux-2.4/] [net/] [decnet/] [dn_dev.c] - Blame information for rev 1765

Line No.	Rev	Author	Line
1	1275	phoenix	`/*`
2			`* DECnet An implementation of the DECnet protocol suite for the LINUX`
3			`* operating system. DECnet is implemented using the BSD Socket`
4			`* interface as the means of communication with the user level.`
5			`*`
6			`* DECnet Device Layer`
7			`*`
8			`* Authors: Steve Whitehouse <SteveW@ACM.org>`
9			`* Eduardo Marcelo Serrat <emserrat@geocities.com>`
10			`*`
11			`* Changes:`
12			`* Steve Whitehouse : Devices now see incoming frames so they`
13			`* can mark on who it came from.`
14			`* Steve Whitehouse : Fixed bug in creating neighbours. Each neighbour`
15			`* can now have a device specific setup func.`
16			`* Steve Whitehouse : Added /proc/sys/net/decnet/conf/<dev>/`
17			`* Steve Whitehouse : Fixed bug which sometimes killed timer`
18			`* Steve Whitehouse : Multiple ifaddr support`
19			`* Steve Whitehouse : SIOCGIFCONF is now a compile time option`
20			`* Steve Whitehouse : /proc/sys/net/decnet/conf/<sys>/forwarding`
21			`* Steve Whitehouse : Removed timer1 - its a user space issue now`
22			`* Patrick Caulfield : Fixed router hello message format`
23			`*/`
24
25			`#include <linux/config.h>`
26			`#include <linux/net.h>`
27			`#include <linux/netdevice.h>`
28			`#include <linux/proc_fs.h>`
29			`#include <linux/timer.h>`
30			`#include <linux/string.h>`
31			`#include <linux/if_arp.h>`
32			`#include <linux/if_ether.h>`
33			`#include <linux/init.h>`
34			`#include <linux/skbuff.h>`
35			`#include <linux/rtnetlink.h>`
36			`#include <linux/sysctl.h>`
37			`#include <asm/uaccess.h>`
38			`#include <net/neighbour.h>`
39			`#include <net/dst.h>`
40			`#include <net/dn.h>`