-#include "gw.h" /* override */
+#define DEBUG
#include <linux/module.h>
#include <linux/kernel.h>
#include <linux/wait.h>
#include <linux/netdevice.h>
#include <linux/socket.h>
+#include <linux/if_arp.h>
#include <linux/net.h>
+#include <linux/netdevice.h>
#include <linux/can/core.h>
#include <linux/can.h>
#include <net/rtnetlink.h>
+#include <net/sock.h>
#include "canethgw.h"
+#include <linux/completion.h>
+#include <linux/mutex.h>
+#include <linux/miscdevice.h>
+#include <net/inet_common.h>
-MODULE_LICENSE( "GPL" );
+MODULE_LICENSE("GPL");
-static struct task_struct* eth_to_can, * can_to_eth;
-static struct socket* udp_sock;
-static struct socket* can_sock;
-static struct net_device* can_dev;
+static int cegw_udp2can(void *data);
+static void cegw_udp_send(struct socket *udp_sock, struct can_frame *cf,
+ struct sockaddr_in* addr);
+static int cegw_can2udp(void *data);
+static void cegw_can_send(struct socket *can_sock, struct can_frame *cf);
+static int cegw_thread_start(void *data);
+static int cegw_thread_stop(void);
-/***********************
- * UDP
- ***********************/
+enum __cegw_state {
+ CEGW_RUN,
+ CEGW_STOP,
+ CEGW_EXIT
+};
-static int gw_udp_recv( void* data )
-{
- struct can_frame cf;
- struct kvec vec;
- struct msghdr mh;
+struct cegw_rule {
+ int can_ifindex;
+ struct in_addr eth_ip;
+ unsigned short eth_port;
+ struct hlist_node list;
+};
- vec.iov_base = &cf;
- vec.iov_len = sizeof(cf);
+struct cegw_setting {
+ struct in_addr eth_ip;
+ unsigned short eth_port;
+};
- mh.msg_name = NULL;
- mh.msg_namelen = 0;
- mh.msg_iov = NULL;
- mh.msg_iovlen = 0;
- mh.msg_control = NULL;
- mh.msg_controllen = 0;
- mh.msg_flags = 0;
- while( 1 )
- {
- if( kthread_should_stop() ) /* up() ?, recv is blocking */
- break;
- kernel_recvmsg( udp_sock, &mh, &vec, 1, sizeof(cf), 0 ); /* todo: handle error */
- printk( "received udp msg_id:%d\n", cf.can_id );
- gw_can_send( &cf );
- }
+static int cegw_state = CEGW_STOP;
+static struct socket *can_sock = NULL, *udp_sock = NULL;
+static struct task_struct *eth_to_can = NULL, *can_to_eth = NULL;
+static struct notifier_block notifier;
- return 0;
-}
+static HLIST_HEAD(rule_eth_can);
+static HLIST_HEAD(rule_can_eth);
+static DEFINE_MUTEX(rule_eth_can_mutex);
+static DEFINE_MUTEX(rule_can_eth_mutex);
+static DEFINE_MUTEX(cegw_mutex);
-static void gw_udp_send( struct can_frame* cf )
+static void cegw_udp_send(struct socket *udp_sock, struct can_frame *cf, struct sockaddr_in* addr)
{
struct msghdr mh;
- struct sockaddr_in addr;
struct kvec vec;
-
- addr.sin_family = AF_INET;
- addr.sin_port = htons( 10502 );
- addr.sin_addr.s_addr = 0x0100007f;
-
- mh.msg_name = &addr;
- mh.msg_namelen = sizeof( addr );
+
+ mh.msg_name = addr;
+ mh.msg_namelen = sizeof(*addr);
mh.msg_control = NULL;
mh.msg_controllen = 0;
mh.msg_flags = 0;
-
+
vec.iov_base = cf;
- vec.iov_len = sizeof( *cf );
-
- kernel_sendmsg( udp_sock, &mh, &vec, 1, sizeof( *cf ) );
-}
+ vec.iov_len = sizeof(*cf);
-/***********************
- * CAN
- ***********************/
+ /* FIXME: Convert endianing of cf->can_id */
+ kernel_sendmsg(udp_sock, &mh, &vec, 1, sizeof(*cf));
+}
-static int gw_can_recv( void* data )
+static void cegw_can_send(struct socket* can_sock, struct can_frame* cf)
{
struct msghdr mh;
struct kvec vec;
- struct can_frame cf;
-
+
mh.msg_name = NULL;
mh.msg_namelen = 0;
mh.msg_control = NULL;
mh.msg_controllen = 0;
mh.msg_flags = 0;
-
- vec.iov_base = &cf;
- vec.iov_len = sizeof( cf );
-
- while( 1 )
- {
- if( kthread_should_stop() ) /**/
+
+ vec.iov_base = cf;
+ vec.iov_len = sizeof(*cf);
+
+ kernel_sendmsg(can_sock, &mh, &vec, 1, sizeof(*cf));
+}
+
+/**
+ * cegw_udp2can - performs udp->can routing
+ *
+ * This function is run as a thread.
+ */
+static int cegw_udp2can(void *data)
+{
+ struct can_frame cf;
+ struct kvec vec;
+ struct msghdr mh;
+ struct cegw_job *job = (struct cegw_job *)data;
+ struct socket *udp_sock = NULL, *can_sock = NULL;
+ int recv_size;
+
+ memset(&mh, 0, sizeof(mh));
+ udp_sock = job->udp_sock;
+ can_sock = job->can_sock;
+
+ while (1) {
+ printk( "recv\n" );
+ vec.iov_base = &cf;
+ vec.iov_len = sizeof(cf);
+ recv_size = kernel_recvmsg(udp_sock, &mh, &vec, 1,
+ sizeof(cf), 0);
+ /* if(recv_size != sizeof(cf) */
+ if (recv_size < 1) /* ToDo: split 0 and else */
+ {
+ printk("udp2can error\n");
break;
- kernel_recvmsg( can_sock, &mh, &vec, 1, sizeof( cf ), 0 );
- printk( "received can msg_id:%d\n", cf.can_id );
- gw_udp_send( &cf );
+ }
+
+ /* FIXME: Convert endianing of cf.can_id */
+ printk( "sendit to can\n" );
+ cegw_can_send(can_sock, &cf);
}
-
+
return 0;
}
-static void gw_can_send( struct can_frame* cf )
+/**
+ * cegw_can2udp - performs can->udp routing
+ *
+ * Runs as a thread.
+ */
+static int cegw_can2udp(void* data)
{
struct msghdr mh;
- struct kvec vec;
-
- mh.msg_name = NULL;
- mh.msg_namelen = 0;
- mh.msg_control = NULL;
- mh.msg_controllen = 0;
- mh.msg_flags = 0;
-
- vec.iov_base = cf;
- vec.iov_len = sizeof( *cf );
-
- kernel_sendmsg( can_sock, &mh, &vec, 1, sizeof( *cf ) );
-}
+ struct kvec vec;
+ struct can_frame cf;
+ struct cegw_job* job = (struct cegw_job*)data;
+ int recv_size;
+ struct socket* udp_sock = job->udp_sock;
+ struct socket* can_sock = job->can_sock;
+ int i;
-/**/
+ memset(&mh, 0, sizeof(mh));
-static int cgw_create_job( struct sk_buff* skb, struct nlmsghdr* nlh,
- void* arg )
-{
- struct nlattr* tb[ CGW_MAX+1 ];
- struct rtcanmsg *r;
- struct cgw_job *gwj;
- int err = 0;
-
- if (nlmsg_len(nlh) < sizeof(*r))
- return -EINVAL;
-
- r = nlmsg_data(nlh);
- if (r->can_family != AF_CAN)
- return -EPFNOSUPPORT;
-
- /* so far we only support CAN -> CAN routings */
- if (r->gwtype == CGW_TYPE_CAN_ETH)
- printk( KERN_INFO "canethgw: TYPE_CAN_ETH" );
- else
- return -1;
-
- err = nlmsg_parse( nlh, sizeof( struct rtcanmsg ), tb, CGW_MAX, NULL );
- if( err < 0 )
- return err;
+ while (1) {
+ vec.iov_base = &cf;
+ vec.iov_len = sizeof(cf);
+
+ recv_size = kernel_recvmsg(can_sock, &mh, &vec, 1,
+ sizeof(cf), 0);
+
+ if (recv_size < 1)
+ break;
- printk( KERN_INFO "src port:%u\n", *(u16*)nla_data( tb[CGW_SRC_PORT] ) );
- printk( KERN_INFO "dest port:%u\n", *(u16*)nla_data( tb[CGW_DST_PORT] ) );
+ for( i=0; i<job->udp_dstcnt; i++ )
+ {
+ cegw_udp_send(udp_sock, &cf, &job->udp_dst[i]);
+ }
+ }
return 0;
}
-/***********************
- * module init/exit
- ***********************/
-
-static int __init cangw_init( void )
-{
- struct sockaddr_in udp_addr;
- struct sockaddr_can can_addr;
- int ifidx = 0;
-
- /* 1. create can socket and bind to it */
- can_dev = dev_get_by_name( &init_net, "vcan0" ); /* net ns?, release counter! */
- if( can_dev == NULL )
- {
- printk( KERN_ERR "error: vcan0 not found\n" );
- return -1;
- }
- ifidx = can_dev->ifindex;
- dev_put( can_dev );
-
- if( sock_create_kern( PF_CAN, SOCK_RAW, CAN_RAW, &can_sock) != 0 )
- {
- printk( KERN_ERR "error: can_sock creation failed\n" );
- return -1;
+static int cegw_notifier(struct notifier_block *nb, unsigned long msg, void *data)
+{
+ struct net_device *dev = (struct net_device *)data;
+ struct cegw_rule *rule;
+ struct hlist_node *pos, *n;
+
+ if (!net_eq(dev_net(dev), &init_net))
+ return NOTIFY_DONE;
+ if (dev->type != ARPHRD_CAN)
+ return NOTIFY_DONE;
+
+ if (msg == NETDEV_UNREGISTER) {
+ hlist_for_each_entry_safe(rule, pos, n, &rule_eth_can, list) {
+ if (rule->can_ifindex == dev->ifindex) {
+ hlist_del(&rule->list);
+ kfree(rule);
+ }
+ }
+
+ hlist_for_each_entry_safe(rule, pos, n, &rule_can_eth, list) {
+ if (rule->can_ifindex == dev->ifindex) {
+ hlist_del(&rule->list);
+ kfree(rule);
+ }
+ }
}
-
- can_addr.can_family = AF_CAN;
- can_addr.can_ifindex = ifidx;
-
- if( can_sock->ops->bind( can_sock, (struct sockaddr*) &can_addr, sizeof(can_addr) ) != 0 )
- {
- printk( KERN_ERR "can_sock bind failed\n" );
- return -1;
+
+ return NOTIFY_DONE;
+}
+
+/**
+ * cegw_thread_start - start working threads
+ * @data: (struct cegw_setting *) with new listening address
+ *
+ * Two threads are started. One is serving udp->can routing and the other
+ * can->udp.
+ */
+static int cegw_thread_start(void *data)
+{
+ struct task_struct *task = NULL;
+
+ task = kthread_run(cegw_udp2can, data, "canethgw_udp2can");
+ if (IS_ERR(task)) {
+ goto out_err;
}
-
- /* 2. create udp socket and bind to it */
- if( sock_create_kern( PF_INET, SOCK_DGRAM, IPPROTO_UDP, &udp_sock ) != 0 )
- {
- printk( "error: udp_sock creation failed\n" );
- sock_release( can_sock );
- return -1;
+
+ task = kthread_run(cegw_can2udp, data, "canethgw_can2udp");
+ if (IS_ERR(task)) {
+ goto out_err;
}
-
- udp_addr.sin_family = AF_INET;
- udp_addr.sin_port = htons( 10501 );
- udp_addr.sin_addr.s_addr = INADDR_ANY;
- if( udp_sock->ops->bind( udp_sock, (struct sockaddr*)&udp_addr, sizeof( udp_addr ) ) != 0 ) /* ref impl ?!? */
+ return 0;
+out_err:
+ return -ENOMEM;
+}
+
+/**
+ * cegw_thread_stop - stops threads and wait for exit
+ *
+ * Waits for threads to stop. Does nothing if cegw_state == CEGW_STOP.
+ */
+static int cegw_thread_stop(void)
+{
+ int how = SHUT_RDWR;
+ struct sock *sk = NULL;
+
+ if (cegw_state == CEGW_STOP)
+ return 0;
+
+ cegw_state = CEGW_STOP;
+ /* shut down socket */
+ sk = can_sock->sk;
+ how++;
+ lock_sock(sk);
+ sk->sk_shutdown |= how;
+ sk->sk_state_change(sk);
+ release_sock(sk);
+
+ kernel_sock_shutdown(udp_sock, SHUT_RDWR);
+
+ /* wait for return to reuse port if restart */
+ kthread_stop(eth_to_can);
+ kthread_stop(can_to_eth);
+ sock_release(udp_sock);
+ sock_release(can_sock);
+ can_to_eth = NULL;
+ eth_to_can = NULL;
+
+ return 0;
+}
+
+static int cegw_open(struct inode *inode, struct file *file)
+{
+ file->private_data = "greetings";
+
+ printk("cegw device opened\n");
+ return 0;
+}
+
+static int cegw_release(struct inode *inode, struct file *file)
+{
+ struct cegw_job *job = (struct cegw_job *)file->private_data;
+
+ sock_release( job->udp_sock );
+ sock_release( job->can_sock );
+ printk("cegw device released, data=%s\n", (char *)file->private_data);
+ return 0;
+}
+
+static long cegw_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
+{
+ int err = 0;
+ int memsz = 0;
+ __u32 dstcnt = 0;
+ __u32 addrlen = 0;
+ struct cegw_ioctl *gwctl = NULL;
+ struct cegw_job *job = NULL;
+
+ /* ToDo: verify access and authorization */
+ if( get_user(dstcnt, &((struct cegw_ioctl __user *)arg)->udp_dstcnt) != 0 )
+ return -EFAULT;
+ if( get_user(addrlen, &((struct cegw_ioctl __user *)arg)->udp_addrlen) != 0 )
+ return -EFAULT;
+
+ memsz = sizeof(*gwctl) + dstcnt * addrlen;
+ /* ToDo: memory limit */
+ gwctl = kmalloc(GFP_KERNEL, memsz);
+ if (gwctl==NULL)
+ return -ENOMEM;
+
+ err = copy_from_user(gwctl, (void __user *)arg, memsz);
+ if (err != 0)
{
- printk( "error: binding failed\n" );
- sock_release( udp_sock );
- sock_release( can_sock );
- return -1;
+ return -EFAULT;
}
-
- /* 3. subscribe to netlink */
- //if( __rtnl_register( PF_CAN, RTM_GETROUTE, ) != 0 )
- __rtnl_register( PF_CAN, RTM_NEWROUTE, cgw_create_job, NULL, NULL );
- //__rtnl_register( PF_CAN, RTM_DELROUTE, )
-
- /* 4. run threads */
- eth_to_can = kthread_run( gw_udp_recv, NULL, "cangw" );
- can_to_eth = kthread_run( gw_can_recv, NULL, "cangw" );
-
- /*
- if( sock_create_kern( AF_CAN, SOCK_RAW, CAN_RAW, &can_sock ) != 0 )
- {s
- printk( "error: can_sock creation failed\n" );
+ /**/
+ job = kmalloc(GFP_KERNEL, sizeof(*job));
+ if (job == NULL)
+ return -ENOMEM;
+
+ job->udp_dst = kmalloc(GFP_KERNEL, dstcnt * addrlen); /* ToDo: limit */
+ if (job->udp_dst == NULL)
+ return -ENOMEM;
+
+ err = copy_from_user(job->udp_dst, (void __user *)(arg + sizeof(struct cegw_ioctl)), dstcnt*addrlen);
+ if (err != 0)
+ return -EFAULT;
+
+ job->udp_sock = sockfd_lookup( gwctl->udp_sock, &err );
+ if (job->udp_sock == NULL)
+ return err;
+
+ job->can_sock = sockfd_lookup( gwctl->can_sock, &err );
+ if (job->can_sock == NULL)
+ return err;
+
+ job->udp_dstcnt = dstcnt;
+
+ /* ToDo: sin_family? */
+
+ file->private_data = job;
+ cegw_thread_start(job);
+
+ /* process udp destinations */
+ switch (cmd) {
+ case CEGW_IOCTL_START:
+ printk("udp_dstcnt=%i\n", gwctl->udp_dstcnt);
+ printk("udp_dst[0] family=%i\n", job->udp_dst[0].sin_family);
+ printk("udp_dst[1] family=%i\n", job->udp_dst[1].sin_family);
+ break;
+ default:
+ printk("undefined ioctl command\n");
+ break;
}
- */
-
+
return 0;
}
-static void __exit cangw_exit( void )
+static const struct file_operations cegw_fops = {
+ .owner = THIS_MODULE,
+ .open = cegw_open,
+ .release = cegw_release,
+ .unlocked_ioctl = cegw_ioctl
+};
+
+static struct miscdevice cegw_device = {
+ .minor = MISC_DYNAMIC_MINOR,
+ .name = "cegw",
+ .fops = &cegw_fops
+};
+
+static int __init cegw_init(void)
{
- sock_release( udp_sock );
- sock_release( can_sock );
-
- printk( "cangw: exit\n" );
- //kthread_stop( ts );
+ misc_register(&cegw_device);
+
+ return 0;
+ notifier.notifier_call = cegw_notifier;
+ register_netdevice_notifier(¬ifier);
+
+ return 0;
}
-module_init( cangw_init );
-module_exit( cangw_exit );
+static void __exit cegw_exit(void)
+{
+ misc_deregister(&cegw_device);
+
+ return;
+ /* ToDo: effect on cangw? */
+ rtnl_unregister_all(PF_CAN);
+
+ /* wait for rtnl callbacks */
+ rtnl_lock();
+ rtnl_unlock();
+
+ mutex_lock(&cegw_mutex);
+ cegw_thread_stop();
+ cegw_state = CEGW_EXIT;
+ mutex_unlock(&cegw_mutex);
+
+ unregister_netdevice_notifier(¬ifier);
+ //cegw_flush();
+}
+
+module_init(cegw_init);
+module_exit(cegw_exit);
+