1 files changed, 177 insertions, 0 deletions

diff --git a/arch/um/drivers/mcast_user.c b/arch/um/drivers/mcast_user.c
new file mode 100644
index 000000000000..0fe1d9fa9139
--- /dev/null
+++ b/arch/um/drivers/mcast_user.c
@@ -0,0 +1,177 @@
+/*
+ * user-mode-linux networking multicast transport
+ * Copyright (C) 2001 by Harald Welte <laforge@gnumonks.org>
+ *
+ * based on the existing uml-networking code, which is
+ * Copyright (C) 2001 Lennert Buytenhek (buytenh@gnu.org) and 
+ * James Leu (jleu@mindspring.net).
+ * Copyright (C) 2001 by various other people who didn't put their name here.
+ *
+ * Licensed under the GPL.
+ *
+ */
+
+#include <errno.h>
+#include <unistd.h>
+#include <linux/inet.h>
+#include <sys/socket.h>
+#include <sys/un.h>
+#include <sys/time.h>
+#include <netinet/in.h>
+#include "net_user.h"
+#include "mcast.h"
+#include "kern_util.h"
+#include "user_util.h"
+#include "user.h"
+#include "os.h"
+
+#define MAX_PACKET (ETH_MAX_PACKET + ETH_HEADER_OTHER)
+
+static struct sockaddr_in *new_addr(char *addr, unsigned short port)
+{
+        struct sockaddr_in *sin;
+
+        sin = um_kmalloc(sizeof(struct sockaddr_in));
+        if(sin == NULL){
+                printk("new_addr: allocation of sockaddr_in failed\n");
+                return(NULL);
+        }
+        sin->sin_family = AF_INET;
+        sin->sin_addr.s_addr = in_aton(addr);
+        sin->sin_port = port;
+        return(sin);
+}
+
+static void mcast_user_init(void *data, void *dev)
+{
+        struct mcast_data *pri = data;
+
+        pri->mcast_addr = new_addr(pri->addr, pri->port);
+        pri->dev = dev;
+}
+
+static int mcast_open(void *data)
+{
+        struct mcast_data *pri = data;
+        struct sockaddr_in *sin = pri->mcast_addr;
+        struct ip_mreq mreq;
+        int fd, yes = 1;
+
+
+        if ((sin->sin_addr.s_addr == 0) || (sin->sin_port == 0)) {
+                fd = -EINVAL;
+                goto out;
+        }
+
+        fd = socket(AF_INET, SOCK_DGRAM, 0);
+        if (fd < 0){
+                printk("mcast_open : data socket failed, errno = %d\n", 
+                       errno);
+                fd = -ENOMEM;
+                goto out;
+        }
+
+        if (setsockopt(fd, SOL_SOCKET, SO_REUSEADDR, &yes, sizeof(yes)) < 0) {
+                printk("mcast_open: SO_REUSEADDR failed, errno = %d\n",
+                        errno);
+                os_close_file(fd);
+                fd = -EINVAL;
+                goto out;
+        }
+
+        /* set ttl according to config */
+        if (setsockopt(fd, SOL_IP, IP_MULTICAST_TTL, &pri->ttl,
+                       sizeof(pri->ttl)) < 0) {
+                printk("mcast_open: IP_MULTICAST_TTL failed, error = %d\n",
+                        errno);
+                os_close_file(fd);
+                fd = -EINVAL;
+                goto out;
+        }
+
+        /* set LOOP, so data does get fed back to local sockets */
+        if (setsockopt(fd, SOL_IP, IP_MULTICAST_LOOP, &yes, sizeof(yes)) < 0) {
+                printk("mcast_open: IP_MULTICAST_LOOP failed, error = %d\n",
+                        errno);
+                os_close_file(fd);
+                fd = -EINVAL;
+                goto out;
+        }
+
+        /* bind socket to mcast address */
+        if (bind(fd, (struct sockaddr *) sin, sizeof(*sin)) < 0) {
+                printk("mcast_open : data bind failed, errno = %d\n", errno);
+                os_close_file(fd);
+                fd = -EINVAL;
+                goto out;
+        }               
+        
+        /* subscribe to the multicast group */
+        mreq.imr_multiaddr.s_addr = sin->sin_addr.s_addr;
+        mreq.imr_interface.s_addr = 0;
+        if (setsockopt(fd, SOL_IP, IP_ADD_MEMBERSHIP, 
+                       &mreq, sizeof(mreq)) < 0) {
+                printk("mcast_open: IP_ADD_MEMBERSHIP failed, error = %d\n",
+                        errno);
+                printk("There appears not to be a multicast-capable network "
+                       "interface on the host.\n");
+                printk("eth0 should be configured in order to use the "
+                       "multicast transport.\n");
+                os_close_file(fd);
+                fd = -EINVAL;
+        }
+
+ out:
+        return(fd);
+}
+
+static void mcast_close(int fd, void *data)
+{
+        struct ip_mreq mreq;
+        struct mcast_data *pri = data;
+        struct sockaddr_in *sin = pri->mcast_addr;
+
+        mreq.imr_multiaddr.s_addr = sin->sin_addr.s_addr;
+        mreq.imr_interface.s_addr = 0;
+        if (setsockopt(fd, SOL_IP, IP_DROP_MEMBERSHIP,
+                       &mreq, sizeof(mreq)) < 0) {
+                printk("mcast_open: IP_DROP_MEMBERSHIP failed, error = %d\n",
+                        errno);
+        }
+
+        os_close_file(fd);
+}
+
+int mcast_user_write(int fd, void *buf, int len, struct mcast_data *pri)
+{
+        struct sockaddr_in *data_addr = pri->mcast_addr;
+
+        return(net_sendto(fd, buf, len, data_addr, sizeof(*data_addr)));
+}
+
+static int mcast_set_mtu(int mtu, void *data)
+{
+        return(mtu);
+}
+
+struct net_user_info mcast_user_info = {
+        .init           = mcast_user_init,
+        .open           = mcast_open,
+        .close          = mcast_close,
+        .remove         = NULL,
+        .set_mtu        = mcast_set_mtu,
+        .add_address    = NULL,
+        .delete_address = NULL,
+        .max_packet     = MAX_PACKET - ETH_HEADER_OTHER
+};
+
+/*
+ * Overrides for Emacs so that we follow Linus's tabbing style.
+ * Emacs will notice this stuff at the end of the file and automatically
+ * adjust the settings for this buffer only.  This must remain at the end
+ * of the file.
+ * ---------------------------------------------------------------------------
+ * Local variables:
+ * c-file-style: "linux"
+ * End:
+ */