3 #include <linux/module.h>
4 #include <linux/kernel.h>
5 #include <linux/kthread.h>
6 #include <linux/sched.h>
7 #include <linux/delay.h>
8 #include <linux/wait.h>
9 #include <linux/netdevice.h>
10 #include <linux/socket.h>
11 #include <linux/if_arp.h>
12 #include <linux/net.h>
13 #include <linux/netdevice.h>
14 #include <linux/can/core.h>
15 #include <linux/can.h>
16 #include <net/rtnetlink.h>
19 #include <linux/completion.h>
20 #include <linux/mutex.h>
21 #include <linux/miscdevice.h>
22 #include <net/inet_common.h>
24 MODULE_LICENSE("GPL");
26 static int cegw_udp2can(void *data);
27 static void cegw_udp_send(struct socket *udp_sock, struct can_frame *cf,
28 struct in_addr ipaddr, u16 port);
29 static int cegw_can2udp(void *data);
30 static void cegw_can_send(struct socket *can_sock, struct can_frame *cf,
32 static int cegw_thread_start(void *data);
33 static int cegw_thread_stop(void);
43 struct in_addr eth_ip;
44 unsigned short eth_port;
45 struct hlist_node list;
49 struct in_addr eth_ip;
50 unsigned short eth_port;
54 static int cegw_state = CEGW_STOP;
55 static struct socket *can_sock = NULL, *udp_sock = NULL;
56 static struct task_struct *eth_to_can = NULL, *can_to_eth = NULL;
57 static struct notifier_block notifier;
59 static HLIST_HEAD(rule_eth_can);
60 static HLIST_HEAD(rule_can_eth);
61 static DEFINE_MUTEX(rule_eth_can_mutex);
62 static DEFINE_MUTEX(rule_can_eth_mutex);
63 static DEFINE_MUTEX(cegw_mutex);
65 static void cegw_udp_send(struct socket *udp_sock, struct can_frame *cf,
66 struct in_addr ipaddr, u16 port)
69 struct sockaddr_in addr;
72 addr.sin_family = AF_INET;
73 addr.sin_port = htons(port);
74 addr.sin_addr = ipaddr;
77 mh.msg_namelen = sizeof(addr);
78 mh.msg_control = NULL;
79 mh.msg_controllen = 0;
83 vec.iov_len = sizeof(*cf);
85 /* FIXME: Convert endianing of cf->can_id */
86 kernel_sendmsg(udp_sock, &mh, &vec, 1, sizeof(*cf));
89 static void cegw_can_send(struct socket* can_sock, struct can_frame* cf,
94 struct sockaddr_can addr;
96 addr.can_family = AF_CAN;
97 addr.can_ifindex = ifindex;
100 mh.msg_namelen = sizeof(addr);
101 mh.msg_control = NULL;
102 mh.msg_controllen = 0;
106 vec.iov_len = sizeof(*cf);
108 kernel_sendmsg(can_sock, &mh, &vec, 1, sizeof(*cf));
112 * cegw_udp2can - performs udp->can routing
114 * This function is run as a thread.
116 static int cegw_udp2can(void *data)
121 struct cegw_rule* rule;
122 struct hlist_node* pos;
126 memset(&mh, 0, sizeof(mh));
128 while (cegw_state != CEGW_STOP) {
130 vec.iov_len = sizeof(cf);
131 recv_size = kernel_recvmsg(udp_sock, &mh, &vec, 1,
133 /* recv_size == 0 when shutting down */
134 if (recv_size != sizeof(cf) || recv_size == 0)
136 else if (recv_size < 0)
139 /* FIXME: Convert endianing of cf.can_id */
140 mutex_lock(&rule_eth_can_mutex);
141 hlist_for_each_entry(rule, pos, &rule_eth_can, list) {
142 can_ifidx = rule->can_ifindex;
143 /* ToDo: from filter */
144 cegw_can_send(can_sock, &cf, can_ifidx);
146 mutex_unlock(&rule_eth_can_mutex);
153 * cegw_can2udp - performs can->udp routing
157 static int cegw_can2udp(void* data)
162 struct sockaddr_can ca;
163 struct cegw_rule* rule;
164 struct hlist_node* pos;
165 struct in_addr eth_ip;
170 mh.msg_namelen = sizeof(ca);
171 mh.msg_control = NULL;
172 mh.msg_controllen = 0;
175 while (cegw_state != CEGW_STOP) {
177 vec.iov_len = sizeof(cf);
179 recv_size = kernel_recvmsg(can_sock, &mh, &vec, 1,
181 if (recv_size != sizeof(cf) || recv_size == 0)
183 else if (recv_size < 0)
186 mutex_lock(&rule_can_eth_mutex);
187 hlist_for_each_entry(rule, pos, &rule_can_eth, list) {
188 eth_ip = rule->eth_ip;
189 eth_port = rule->eth_port;
190 if (rule->can_ifindex == ca.can_ifindex)
191 cegw_udp_send(udp_sock, &cf, eth_ip, eth_port);
193 mutex_unlock(&rule_can_eth_mutex);
199 static int cegw_newroute(struct sk_buff *skb, struct nlmsghdr *nlh, void *arg)
201 struct nlattr* tb[ CEGW_MAX+1 ];
202 struct cegw_rule* rule = NULL;
207 struct cegw_setting* set;
210 if (nlmsg_len(nlh) < sizeof(*r))
215 if (r->rtm_family != AF_CAN)
216 return -EPFNOSUPPORT;
218 err = nlmsg_parse(nlh, sizeof(*r), tb, CEGW_MAX, NULL);
220 pr_devel("canethgw: nlmsg_parse error\n");
224 if (tb[CEGW_CMD_INFO] == NULL) {
225 pr_devel("canethgw: CEGW_CMD_INFO is missing in rtmsg\n");
229 switch (*(int*)nla_data(tb[CEGW_CMD_INFO])) {
231 if (!tb[CEGW_ETH_IP] || !tb[CEGW_ETH_PORT]) {
232 pr_devel("canethgw: missing attribute for CEGW_LISTEN\n");
236 /* ToDo: valid listen address */
237 set = kmalloc(sizeof(*set), GFP_KERNEL);
240 set->eth_ip = *(struct in_addr*)nla_data(tb[CEGW_ETH_IP]);
241 set->eth_port = *(unsigned short*)nla_data(tb[CEGW_ETH_PORT]);
242 /* MS: It would be better to use workqueues here. */
243 kthread_run(cegw_thread_start, set, "canethgw");
245 case CEGW_RULE_ETH_CAN:
246 if (!tb[CEGW_ETH_IP] || !tb[CEGW_ETH_PORT] ||
247 !tb[CEGW_CAN_IFINDEX]) {
248 pr_devel("canethgw: missing attribute for"
249 "CEGW_RULE_ETH_CAN\n");
253 ifindex = *(int*)nla_data(tb[CEGW_CAN_IFINDEX]);
254 ip = *(struct in_addr*)nla_data(tb[CEGW_ETH_IP]);
255 port = *(unsigned short*)nla_data(tb[CEGW_ETH_PORT]);
256 pr_devel("canethgw: new eth->can rule - (%x:%hu)->(%d)\n",
257 ip.s_addr, port, ifindex);
259 rule = kmalloc(sizeof(struct cegw_rule), GFP_KERNEL);
263 rule->can_ifindex = ifindex;
265 rule->eth_port = port;
267 mutex_lock(&rule_eth_can_mutex);
268 hlist_add_head(&rule->list, &rule_eth_can);
269 mutex_unlock(&rule_eth_can_mutex);
271 case CEGW_RULE_CAN_ETH:
272 if (!tb[CEGW_ETH_IP] || !tb[CEGW_ETH_PORT] ||
273 !tb[CEGW_CAN_IFINDEX]) {
274 pr_devel("canethgw: missing attribute for "
275 "CEGW_RULE_CAN_ETH\n");
279 ifindex = *(int*)nla_data(tb[CEGW_CAN_IFINDEX]);
280 ip = *(struct in_addr*)nla_data(tb[CEGW_ETH_IP]);
281 port = *(unsigned short*)nla_data(tb[CEGW_ETH_PORT]);
282 pr_devel("canethgw: new can->eth rule - (%d)->(%x:%hu)\n",
283 ifindex, ip.s_addr, port);
285 rule = kmalloc(sizeof(struct cegw_rule), GFP_KERNEL);
289 rule->can_ifindex = ifindex;
291 rule->eth_port = port;
293 mutex_lock(&rule_can_eth_mutex);
294 hlist_add_head(&rule->list, &rule_can_eth);
295 mutex_unlock(&rule_can_eth_mutex);
298 pr_devel("canethgw: unknown CEGW_CMD_INFO\n");
305 static void cegw_flush(void)
307 struct cegw_rule *rule;
308 struct hlist_node *pos, *n;
310 mutex_lock(&rule_eth_can_mutex);
311 hlist_for_each_entry_safe(rule, pos, n, &rule_eth_can, list) {
312 hlist_del(&rule->list);
315 mutex_unlock(&rule_eth_can_mutex);
317 mutex_lock(&rule_can_eth_mutex);
318 hlist_for_each_entry_safe(rule, pos, n, &rule_can_eth, list) {
319 hlist_del(&rule->list);
322 mutex_unlock(&rule_can_eth_mutex);
325 static int cegw_delroute(struct sk_buff *skb, struct nlmsghdr *nlh, void *arg)
328 struct nlattr *tb[CEGW_MAX+1];
331 if (nlmsg_len(nlh) < sizeof(*r))
336 if (r->rtm_family != AF_CAN)
337 return -EPFNOSUPPORT;
339 err = nlmsg_parse(nlh, sizeof(struct rtmsg), tb, CEGW_MAX, NULL);
343 if (tb[CEGW_CMD_INFO] == NULL) {
344 pr_devel("canethgw: CEGW_CMD_INFO is missing in rtmsg\n");
348 if (*(int*)nla_data(tb[CEGW_CMD_INFO]) != CEGW_FLUSH) {
357 static int cegw_put_rule(struct sk_buff *skb, int type, struct cegw_rule *rule)
362 struct nlmsghdr *nlh;
364 ifindex = rule->can_ifindex;
366 port = rule->eth_port;
368 nlh = nlmsg_put(skb, 0, 0, 0, 0, 0);
373 if (nla_put(skb, CEGW_TYPE, sizeof(type), &type) < 0)
376 nlh->nlmsg_len += NLA_HDRLEN + NLA_ALIGN(sizeof(type));
379 if (nla_put(skb, CEGW_CAN_IFINDEX, sizeof(ifindex), &ifindex) < 0)
382 nlh->nlmsg_len += NLA_HDRLEN + NLA_ALIGN(sizeof(ifindex));
385 if (nla_put(skb, CEGW_ETH_IP, sizeof(ip), &ip) < 0)
388 nlh->nlmsg_len += NLA_HDRLEN + NLA_ALIGN(sizeof(ip));
391 if (nla_put(skb, CEGW_ETH_PORT, sizeof(port), &port) < 0)
394 nlh->nlmsg_len += NLA_HDRLEN + NLA_ALIGN(sizeof(port));
399 nlmsg_cancel(skb, nlh);
403 static int cegw_getroute(struct sk_buff *skb, struct netlink_callback *cb)
405 struct cegw_rule *rule;
406 struct hlist_node *pos;
408 int s_idx = cb->args[0];
410 mutex_lock(&rule_eth_can_mutex);
411 mutex_lock(&rule_can_eth_mutex);
412 hlist_for_each_entry(rule, pos, &rule_eth_can, list) {
416 if (cegw_put_rule(skb, CEGW_RULE_ETH_CAN, rule) < 0)
422 hlist_for_each_entry(rule, pos, &rule_can_eth, list) {
426 if (cegw_put_rule(skb, CEGW_RULE_CAN_ETH, rule) < 0)
433 mutex_unlock(&rule_eth_can_mutex);
434 mutex_unlock(&rule_can_eth_mutex);
440 static int cegw_notifier(struct notifier_block *nb, unsigned long msg, void *data)
442 struct net_device *dev = (struct net_device *)data;
443 struct cegw_rule *rule;
444 struct hlist_node *pos, *n;
446 if (!net_eq(dev_net(dev), &init_net))
448 if (dev->type != ARPHRD_CAN)
451 if (msg == NETDEV_UNREGISTER) {
452 hlist_for_each_entry_safe(rule, pos, n, &rule_eth_can, list) {
453 if (rule->can_ifindex == dev->ifindex) {
454 hlist_del(&rule->list);
459 hlist_for_each_entry_safe(rule, pos, n, &rule_can_eth, list) {
460 if (rule->can_ifindex == dev->ifindex) {
461 hlist_del(&rule->list);
471 * cegw_thread_start - start working threads
472 * @data: (struct cegw_setting *) with new listening address
474 * Two threads are started. One is serving udp->can routing and the other
477 static int cegw_thread_start(void *data)
479 struct sockaddr_in udp_addr;
480 struct sockaddr_can can_addr;
481 struct cegw_setting *set;
483 set = (struct cegw_setting *)data;
485 can_addr.can_family = AF_CAN;
486 can_addr.can_ifindex = 0;
488 udp_addr.sin_family = AF_INET;
489 udp_addr.sin_port = htons(set->eth_port);
490 udp_addr.sin_addr = set->eth_ip;
493 mutex_lock(&cegw_mutex);
494 if (cegw_state == CEGW_EXIT)
497 /* stops threads if exist */
500 /* create and bind sockets */
501 if (sock_create_kern(PF_INET, SOCK_DGRAM, IPPROTO_UDP, &udp_sock)
503 printk(KERN_ERR "canethgw: udp socket creation failed\n");
507 if (sock_create_kern(PF_CAN, SOCK_RAW, CAN_RAW, &can_sock) != 0) {
508 printk(KERN_ERR "canethgw: can socket creation failed\n");
509 sock_release(udp_sock);
513 if (kernel_bind(udp_sock, (struct sockaddr*)&udp_addr,
514 sizeof(udp_addr)) != 0) {
515 printk(KERN_ERR "canethgw: udp socket binding failed\n");
516 sock_release(udp_sock);
517 sock_release(can_sock);
521 if (kernel_bind(can_sock, (struct sockaddr*) &can_addr,
522 sizeof(can_addr)) != 0) {
523 printk(KERN_ERR "canethgw: can socket binding failed\n");
524 kernel_sock_shutdown(udp_sock, SHUT_RDWR);
525 sock_release(udp_sock);
526 sock_release(can_sock);
531 cegw_state = CEGW_RUN;
533 eth_to_can = kthread_create(cegw_udp2can, NULL, "canethgw");
534 if (IS_ERR(eth_to_can)) {
535 cegw_state = CEGW_STOP;
536 sock_release(udp_sock);
537 sock_release(can_sock);
540 get_task_struct(eth_to_can);
541 wake_up_process(eth_to_can);
543 can_to_eth = kthread_create(cegw_can2udp, NULL, "canethgw");
544 if (IS_ERR(can_to_eth)) {
545 cegw_state = CEGW_STOP;
546 kernel_sock_shutdown(udp_sock, SHUT_RDWR);
547 kthread_stop(eth_to_can);
548 sock_release(udp_sock);
549 sock_release(can_sock);
552 get_task_struct(can_to_eth);
553 wake_up_process(can_to_eth);
555 mutex_unlock(&cegw_mutex);
556 pr_devel("threads are running\n");
559 mutex_unlock(&cegw_mutex);
564 * cegw_thread_stop - stops threads and wait for exit
566 * Waits for threads to stop. Does nothing if cegw_state == CEGW_STOP.
568 static int cegw_thread_stop(void)
571 struct sock *sk = NULL;
573 if (cegw_state == CEGW_STOP)
576 cegw_state = CEGW_STOP;
577 /* shut down socket */
581 sk->sk_shutdown |= how;
582 sk->sk_state_change(sk);
585 kernel_sock_shutdown(udp_sock, SHUT_RDWR);
587 /* wait for return to reuse port if restart */
588 kthread_stop(eth_to_can);
589 kthread_stop(can_to_eth);
590 sock_release(udp_sock);
591 sock_release(can_sock);
598 static int cegw_open(struct inode *inode, struct file *file)
600 file->private_data = "greetings";
602 printk("cegw device opened\n");
606 static int cegw_release(struct inode *inode, struct file *file)
608 printk("cegw device released, data=%s\n", file->private_data);
612 static long cegw_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
615 case CEGW_IOCTL_CAN_SOCK:
616 printk("ioctl can sock\n");
618 case CEGW_IOCTL_UDP_SOCK:
619 printk("ioctl udp sock\n");
622 printk("undefined ioctl command\n");
629 static const struct file_operations cegw_fops = {
630 .owner = THIS_MODULE,
632 .release = cegw_release,
633 .unlocked_ioctl = cegw_ioctl
636 static struct miscdevice cegw_device = {
637 .minor = MISC_DYNAMIC_MINOR,
642 static int __init cegw_init(void)
644 misc_register(&cegw_device);
647 notifier.notifier_call = cegw_notifier;
648 register_netdevice_notifier(¬ifier);
650 /* subscribe to netlink */
651 rtnl_register(PF_CAN, RTM_GETROUTE, NULL, cegw_getroute, NULL);
652 rtnl_register(PF_CAN, RTM_NEWROUTE, cegw_newroute, NULL, NULL);
653 rtnl_register(PF_CAN, RTM_DELROUTE, cegw_delroute, NULL, NULL);
658 static void __exit cegw_exit(void)
660 misc_deregister(&cegw_device);
663 /* ToDo: effect on cangw? */
664 rtnl_unregister_all(PF_CAN);
666 /* wait for rtnl callbacks */
670 mutex_lock(&cegw_mutex);
672 cegw_state = CEGW_EXIT;
673 mutex_unlock(&cegw_mutex);
675 unregister_netdevice_notifier(¬ifier);
679 module_init(cegw_init);
680 module_exit(cegw_exit);