kernel/2.6/net/can/gw.c

   1 /*
   2  * gw.c - CAN frame Gateway/Router/Bridge with netlink interface
   3  *
   4  * Copyright (c) 2002-2010 Volkswagen Group Electronic Research
   5  * All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions and the following disclaimer.
  12  * 2. Redistributions in binary form must reproduce the above copyright
  13  *    notice, this list of conditions and the following disclaimer in the
  14  *    documentation and/or other materials provided with the distribution.
  15  * 3. Neither the name of Volkswagen nor the names of its contributors
  16  *    may be used to endorse or promote products derived from this software
  17  *    without specific prior written permission.
  18  *
  19  * Alternatively, provided that this notice is retained in full, this
  20  * software may be distributed under the terms of the GNU General
  21  * Public License ("GPL") version 2, in which case the provisions of the
  22  * GPL apply INSTEAD OF those given above.
  23  *
  24  * The provided data structures and external interfaces from this code
  25  * are not restricted to be used by modules with a GPL compatible license.
  26  *
  27  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  28  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  29  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
  30  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
  31  * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  32  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
  33  * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  34  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  35  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  36  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
  37  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH
  38  * DAMAGE.
  39  *
  40  * Send feedback to <socketcan-users@lists.berlios.de>
  41  *
  42  */
  43
  44 #include <linux/module.h>
  45 #include <linux/version.h>
  46 #include <linux/init.h>
  47 #include <linux/types.h>
  48 #include <linux/list.h>
  49 #include <linux/spinlock.h>
  50 #include <linux/rcupdate.h>
  51 #include <linux/net.h>
  52 #include <linux/netdevice.h>
  53 #include <linux/if_arp.h>
  54 #include <linux/skbuff.h>
  55 #include <socketcan/can.h>
  56 #include <socketcan/can/core.h>
  57 #include <socketcan/can/gw.h>
  58 #include <net/rtnetlink.h>
  59 #include <net/net_namespace.h>
  60
  61 #include <socketcan/can/version.h> /* for RCSID. Removed by mkpatch script */
  62 RCSID("$Id$");
  63
  64 #define CAN_GW_VERSION "20100218"
  65 static __initdata const char banner[] =
  66         KERN_INFO "can: netlink gateway (rev " CAN_GW_VERSION ")\n";
  67
  68 MODULE_DESCRIPTION("PF_CAN netlink gateway");
  69 MODULE_LICENSE("Dual BSD/GPL");
  70 MODULE_AUTHOR("Oliver Hartkopp <oliver.hartkopp@volkswagen.de>");
  71
  72 HLIST_HEAD(can_gw_list);
  73 static DEFINE_SPINLOCK(can_gw_list_lock);
  74 static struct notifier_block notifier;
  75
  76 static struct kmem_cache *gw_cache __read_mostly;
  77
  78 #define GW_SK_MAGIC ((void *)(&notifier))
  79
  80 /*
  81  * So far we just support CAN -> CAN routing and frame modifications.
  82  *
  83  * The internal can_can_gw structure contains optional attributes for
  84  * a CAN -> CAN gateway job.
  85  */
  86 struct can_can_gw {
  87         struct can_filter filter;
  88         struct {
  89                 struct can_frame and;
  90                 struct can_frame or;
  91                 struct can_frame xor;
  92                 struct can_frame set;
  93         } modframe;
  94         void (*modfunc[MAX_MODFUNCTIONS])(struct can_frame *cf,
  95                                           struct can_can_gw *mod);
  96 };
  97
  98 /* list entry for CAN gateways jobs */
  99 struct gw_job {
 100         struct hlist_node list;
 101         struct rcu_head rcu;
 102         struct net_device *src_dev;
 103         struct net_device *dst_dev;
 104         u32 flags;
 105         u32 handled_frames;
 106         u32 dropped_frames;
 107         union {
 108                 struct can_can_gw ccgw;
 109                 /* tbc */
 110         };
 111 };
 112
 113 /* content of u32 gwjob.flags */
 114 #define CAN_TX_LOOPBACK 0x00000001
 115 #define CAN_TX_SRC_TSTAMP 0x00000002
 116
 117 /* modification functions that are invoked in the hot path in gw_rcv */
 118 void mod_and_id (struct can_frame *cf, struct can_can_gw *mod) {
 119         cf->can_id &= mod->modframe.and.can_id;
 120 }
 121 void mod_and_dlc (struct can_frame *cf, struct can_can_gw *mod) {
 122         cf->can_dlc &= mod->modframe.and.can_dlc;
 123 }
 124 void mod_and_data (struct can_frame *cf, struct can_can_gw *mod) {
 125         *(u64 *)cf->data &= *(u64 *)mod->modframe.and.data;
 126 }
 127 void mod_or_id (struct can_frame *cf, struct can_can_gw *mod) {
 128         cf->can_id |= mod->modframe.or.can_id;
 129 }
 130 void mod_or_dlc (struct can_frame *cf, struct can_can_gw *mod) {
 131         cf->can_dlc |= mod->modframe.or.can_dlc;
 132 }
 133 void mod_or_data (struct can_frame *cf, struct can_can_gw *mod) {
 134         *(u64 *)cf->data |= *(u64 *)mod->modframe.or.data;
 135 }
 136 void mod_xor_id (struct can_frame *cf, struct can_can_gw *mod) {
 137         cf->can_id ^= mod->modframe.xor.can_id;
 138 }
 139 void mod_xor_dlc (struct can_frame *cf, struct can_can_gw *mod) {
 140         cf->can_dlc ^= mod->modframe.xor.can_dlc;
 141 }
 142 void mod_xor_data (struct can_frame *cf, struct can_can_gw *mod) {
 143         *(u64 *)cf->data ^= *(u64 *)mod->modframe.xor.data;
 144 }
 145 void mod_set_id (struct can_frame *cf, struct can_can_gw *mod) {
 146         cf->can_id = mod->modframe.set.can_id;
 147 }
 148 void mod_set_dlc (struct can_frame *cf, struct can_can_gw *mod) {
 149         cf->can_dlc = mod->modframe.set.can_dlc;
 150 }
 151 void mod_set_data (struct can_frame *cf, struct can_can_gw *mod) {
 152         *(u64 *)cf->data = *(u64 *)mod->modframe.set.data;
 153 }
 154
 155
 156 /* the receive & process & send function */
 157 static void gw_rcv(struct sk_buff *skb, void *data)
 158 {
 159         struct gw_job *gwj = (struct gw_job *)data;
 160         struct can_frame *cf;
 161         struct sk_buff *nskb;
 162         int modidx = 0;
 163
 164         /* do not handle already routed frames */
 165         if (skb->sk == GW_SK_MAGIC)
 166                 return;
 167
 168         if (!netif_running(gwj->dst_dev)) {
 169                 gwj->dropped_frames++;
 170                 return;
 171         }
 172
 173         /*
 174          * clone the given skb, which has not been done in can_rv()
 175          *
 176          * When there is at least one modification function activated,
 177          * we need to copy the skb as we want to modify skb->data.
 178          */
 179         if (gwj->ccgw.modfunc[0])
 180                 nskb = skb_copy(skb, GFP_ATOMIC);
 181         else
 182                 nskb = skb_clone(skb, GFP_ATOMIC);
 183
 184         if (!nskb) {
 185                 gwj->dropped_frames++;
 186                 return;
 187         }
 188
 189         /* mark routed frames with a 'special' sk value */
 190         nskb->sk = GW_SK_MAGIC;
 191         nskb->dev = gwj->dst_dev;
 192
 193         /* pointer to modifiable CAN frame */
 194         cf = (struct can_frame *)nskb->data;
 195
 196         /* perform preprocessed modification functions if there are any */
 197         while (modidx < MAX_MODFUNCTIONS && gwj->ccgw.modfunc[modidx])
 198                 (*gwj->ccgw.modfunc[modidx++])(cf, &gwj->ccgw);
 199
 200         /* clear the skb timestamp if not configured the other way */
 201         if (!(gwj->flags & CAN_TX_SRC_TSTAMP))
 202                 skb->tstamp.tv64 = 0;
 203
 204         /* send to netdevice */
 205         if (can_send(nskb, gwj->flags & CAN_TX_LOOPBACK))
 206                 gwj->dropped_frames++;
 207         else
 208                 gwj->handled_frames++;
 209 }
 210
 211 static inline int can_gw_register_filter(struct gw_job *gwj)
 212 {
 213         return can_rx_register(gwj->src_dev, gwj->ccgw.filter.can_id,
 214                                gwj->ccgw.filter.can_mask, gw_rcv, gwj, "gw");
 215 }
 216
 217 static inline void can_gw_unregister_filter(struct gw_job *gwj)
 218 {
 219         can_rx_unregister(gwj->src_dev, gwj->ccgw.filter.can_id,
 220                           gwj->ccgw.filter.can_mask, gw_rcv, gwj);
 221 }
 222
 223 static int gw_notifier(struct notifier_block *nb,
 224                         unsigned long msg, void *data)
 225 {
 226         struct net_device *dev = (struct net_device *)data;
 227
 228 #if LINUX_VERSION_CODE >= KERNEL_VERSION(2,6,26)
 229         if (!net_eq(dev_net(dev), &init_net))
 230                 return NOTIFY_DONE;
 231 #elif LINUX_VERSION_CODE >= KERNEL_VERSION(2,6,24)
 232         if (dev->nd_net != &init_net)
 233                 return NOTIFY_DONE;
 234 #endif
 235         if (dev->type != ARPHRD_CAN)
 236                 return NOTIFY_DONE;
 237
 238         if (msg == NETDEV_UNREGISTER) {
 239
 240                 struct gw_job *gwj = NULL;
 241                 struct hlist_node *n, *nx;
 242
 243                 spin_lock(&can_gw_list_lock);
 244
 245                 hlist_for_each_entry_safe(gwj, n, nx, &can_gw_list, list) {
 246
 247                         if (gwj->src_dev == dev || gwj->dst_dev == dev) {
 248                                 hlist_del(&gwj->list);
 249                                 can_gw_unregister_filter(gwj);
 250                                 kfree(gwj);
 251                         }
 252                 }
 253
 254                 spin_unlock(&can_gw_list_lock);
 255         }
 256
 257         return NOTIFY_DONE;
 258 }
 259
 260 /*
 261  * Dump information about all ports, in response to GETROUTE
 262  */
 263 static int gw_dump_jobs(struct sk_buff *skb, struct netlink_callback *cb)
 264 {
 265         printk(KERN_INFO "%s (TODO)\n", __FUNCTION__);
 266
 267         return 0;
 268 }
 269
 270 static int gw_create_job(struct sk_buff *skb,  struct nlmsghdr *nlh, void *arg)
 271 {
 272
 273         struct rtcanmsg *r;
 274         struct nlattr *tb[CGW_MAX+1];
 275         struct gw_job *gwj;
 276         u8 buf[CGW_MODATTR_LEN];
 277         int modidx = 0;
 278         int err = 0;
 279
 280         printk(KERN_INFO "%s: len %d attrlen %d\n", __FUNCTION__,
 281                nlmsg_len(nlh), nlmsg_attrlen(nlh, sizeof(*r)));
 282
 283         if (nlmsg_len(nlh) < sizeof(*r))
 284                 return -EINVAL;
 285
 286         r = nlmsg_data(nlh);
 287         if (r->can_family != AF_CAN)
 288                 return -EPFNOSUPPORT;
 289
 290         gwj = kmem_cache_alloc(gw_cache, GFP_KERNEL);
 291         if (!gwj)
 292                 return -ENOMEM;
 293
 294         gwj->src_dev = dev_get_by_index(&init_net, r->src_ifindex);
 295         if (!gwj->src_dev) {
 296                 err = -ENODEV;
 297                 goto fail;
 298         }
 299
 300         /* for now the source device needs to be a CAN device */
 301         if (gwj->src_dev->type != ARPHRD_CAN) {
 302                 err = -ENODEV;
 303                 goto put_src_fail;
 304         }
 305
 306         gwj->dst_dev = dev_get_by_index(&init_net, r->dst_ifindex);
 307         if (!gwj->dst_dev) {
 308                 err = -ENODEV;
 309                 goto put_src_fail;
 310         }
 311
 312         /* for now the destination device needs to be a CAN device */
 313         if (gwj->dst_dev->type != ARPHRD_CAN) {
 314                 err = -ENODEV;
 315                 goto put_src_dst_fail;
 316         }
 317
 318         gwj->flags = 0;
 319
 320         if (r->can_txflags & CAN_GW_TXFLAGS_LOOPBACK)
 321                 gwj->flags |= CAN_TX_LOOPBACK;
 322
 323         if (r->can_txflags & CAN_GW_TXFLAGS_SRC_TSTAMP)
 324                 gwj->flags |= CAN_TX_SRC_TSTAMP;
 325
 326         memset(&gwj->ccgw, 0, sizeof(gwj->ccgw));
 327
 328         /* check for additional attributes / filters here */
 329
 330         err = nlmsg_parse(nlh, sizeof(*r), tb, CGW_MAX, NULL);
 331         if (err < 0)
 332                 goto put_src_dst_fail;
 333
 334         /* check for can_filter in attributes */
 335         if (tb[CGW_FILTER] &&
 336             nla_len(tb[CGW_FILTER]) == sizeof(struct can_filter))
 337                 nla_memcpy(&gwj->ccgw.filter, tb[CGW_FILTER],
 338                            sizeof(struct can_filter));
 339
 340         /* check for AND/OR/XOR/SET modifications */
 341         if (tb[CGW_MOD_AND] &&
 342             nla_len(tb[CGW_MOD_AND]) == CGW_MODATTR_LEN) {
 343                 nla_memcpy(&buf, tb[CGW_MOD_AND], CGW_MODATTR_LEN);
 344
 345                 memcpy(&gwj->ccgw.modframe.and, buf,
 346                        sizeof(struct can_frame));
 347
 348                 if (buf[sizeof(struct can_frame)] & CGW_MOD_ID)
 349                         gwj->ccgw.modfunc[modidx++] = mod_and_id;
 350
 351                 if (buf[sizeof(struct can_frame)] & CGW_MOD_DLC)
 352                         gwj->ccgw.modfunc[modidx++] = mod_and_dlc;
 353
 354                 if (buf[sizeof(struct can_frame)] & CGW_MOD_DATA)
 355                         gwj->ccgw.modfunc[modidx++] = mod_and_data;
 356         }
 357
 358         if (tb[CGW_MOD_OR] &&
 359             nla_len(tb[CGW_MOD_OR]) == CGW_MODATTR_LEN) {
 360                 nla_memcpy(&buf, tb[CGW_MOD_OR], CGW_MODATTR_LEN);
 361
 362                 memcpy(&gwj->ccgw.modframe.or, buf,
 363                        sizeof(struct can_frame));
 364
 365                 if (buf[sizeof(struct can_frame)] & CGW_MOD_ID)
 366                         gwj->ccgw.modfunc[modidx++] = mod_or_id;
 367
 368                 if (buf[sizeof(struct can_frame)] & CGW_MOD_DLC)
 369                         gwj->ccgw.modfunc[modidx++] = mod_or_dlc;
 370
 371                 if (buf[sizeof(struct can_frame)] & CGW_MOD_DATA)
 372                         gwj->ccgw.modfunc[modidx++] = mod_or_data;
 373         }
 374
 375         if (tb[CGW_MOD_XOR] &&
 376             nla_len(tb[CGW_MOD_XOR]) == CGW_MODATTR_LEN) {
 377                 nla_memcpy(&buf, tb[CGW_MOD_XOR], CGW_MODATTR_LEN);
 378
 379                 memcpy(&gwj->ccgw.modframe.xor, buf,
 380                        sizeof(struct can_frame));
 381
 382                 if (buf[sizeof(struct can_frame)] & CGW_MOD_ID)
 383                         gwj->ccgw.modfunc[modidx++] = mod_xor_id;
 384
 385                 if (buf[sizeof(struct can_frame)] & CGW_MOD_DLC)
 386                         gwj->ccgw.modfunc[modidx++] = mod_xor_dlc;
 387
 388                 if (buf[sizeof(struct can_frame)] & CGW_MOD_DATA)
 389                         gwj->ccgw.modfunc[modidx++] = mod_xor_data;
 390         }
 391
 392         if (tb[CGW_MOD_SET] &&
 393             nla_len(tb[CGW_MOD_SET]) == CGW_MODATTR_LEN) {
 394                 nla_memcpy(&buf, tb[CGW_MOD_SET], CGW_MODATTR_LEN);
 395
 396                 memcpy(&gwj->ccgw.modframe.set, buf,
 397                        sizeof(struct can_frame));
 398
 399                 if (buf[sizeof(struct can_frame)] & CGW_MOD_ID)
 400                         gwj->ccgw.modfunc[modidx++] = mod_set_id;
 401
 402                 if (buf[sizeof(struct can_frame)] & CGW_MOD_DLC)
 403                         gwj->ccgw.modfunc[modidx++] = mod_set_dlc;
 404
 405                 if (buf[sizeof(struct can_frame)] & CGW_MOD_DATA)
 406                         gwj->ccgw.modfunc[modidx++] = mod_set_data;
 407         }
 408
 409         spin_lock(&can_gw_list_lock);
 410
 411         err = can_gw_register_filter(gwj);
 412         if (!err)
 413                 hlist_add_head_rcu(&gwj->list, &can_gw_list);
 414
 415         spin_unlock(&can_gw_list_lock);
 416
 417         dev_put(gwj->src_dev);
 418         dev_put(gwj->dst_dev);
 419
 420         if (err)
 421                 goto fail;
 422
 423         return 0;
 424
 425 put_src_dst_fail:
 426         dev_put(gwj->dst_dev);
 427 put_src_fail:
 428         dev_put(gwj->src_dev);
 429 fail:
 430         kmem_cache_free(gw_cache, gwj);
 431         return err;
 432 }
 433
 434 static int gw_remove_job(struct sk_buff *skb,  struct nlmsghdr *nlh, void *arg)
 435 {
 436         printk(KERN_INFO "%s (TODO)\n", __FUNCTION__);
 437
 438         return 0;
 439 }
 440
 441 static __init int gw_module_init(void)
 442 {
 443         printk(banner);
 444
 445         gw_cache = kmem_cache_create("can_gw", sizeof(struct gw_job),
 446                                       0, 0, NULL);
 447
 448         if (!gw_cache)
 449                 return -ENOMEM;
 450
 451         /* set notifier */
 452         notifier.notifier_call = gw_notifier;
 453         register_netdevice_notifier(&notifier);
 454
 455         if (__rtnl_register(PF_CAN, RTM_GETROUTE, NULL, gw_dump_jobs)) {
 456                 unregister_netdevice_notifier(&notifier);
 457                 kmem_cache_destroy(gw_cache);
 458                 return -ENOBUFS;
 459         }
 460
 461         /* Only the first call to __rtnl_register can fail */
 462         __rtnl_register(PF_CAN, RTM_NEWROUTE, gw_create_job, NULL);
 463         __rtnl_register(PF_CAN, RTM_DELROUTE, gw_remove_job, NULL);
 464
 465         return 0;
 466 }
 467
 468 static __exit void gw_module_exit(void)
 469 {
 470         struct gw_job *gwj = NULL;
 471         struct hlist_node *n, *nx;
 472
 473         rtnl_unregister_all(PF_CAN);
 474
 475         unregister_netdevice_notifier(&notifier);
 476
 477         spin_lock(&can_gw_list_lock);
 478
 479         hlist_for_each_entry_safe(gwj, n, nx, &can_gw_list, list) {
 480                 hlist_del(&gwj->list);
 481                 can_gw_unregister_filter(gwj);
 482                 kfree(gwj);
 483         }
 484
 485         spin_unlock(&can_gw_list_lock);
 486
 487         rcu_barrier(); /* Wait for completion of call_rcu()'s */
 488
 489         kmem_cache_destroy(gw_cache);
 490 }
 491
 492 module_init(gw_module_init);
 493 module_exit(gw_module_exit);