net/hsr/hsr_forward.c

   1 // SPDX-License-Identifier: GPL-2.0
   2 /* Copyright 2011-2014 Autronica Fire and Security AS
   3  *
   4  * Author(s):
   5  *      2011-2014 Arvid Brodin, arvid.brodin@alten.se
   6  */
   7
   8 #include "hsr_forward.h"
   9 #include <linux/types.h>
  10 #include <linux/skbuff.h>
  11 #include <linux/etherdevice.h>
  12 #include <linux/if_vlan.h>
  13 #include "hsr_main.h"
  14 #include "hsr_framereg.h"
  15
  16 struct hsr_node;
  17
  18 struct hsr_frame_info {
  19         struct sk_buff *skb_std;
  20         struct sk_buff *skb_hsr;
  21         struct hsr_port *port_rcv;
  22         struct hsr_node *node_src;
  23         u16 sequence_nr;
  24         bool is_supervision;
  25         bool is_vlan;
  26         bool is_local_dest;
  27         bool is_local_exclusive;
  28 };
  29
  30 /* The uses I can see for these HSR supervision frames are:
  31  * 1) Use the frames that are sent after node initialization ("HSR_TLV.Type =
  32  *    22") to reset any sequence_nr counters belonging to that node. Useful if
  33  *    the other node's counter has been reset for some reason.
  34  *    --
  35  *    Or not - resetting the counter and bridging the frame would create a
  36  *    loop, unfortunately.
  37  *
  38  * 2) Use the LifeCheck frames to detect ring breaks. I.e. if no LifeCheck
  39  *    frame is received from a particular node, we know something is wrong.
  40  *    We just register these (as with normal frames) and throw them away.
  41  *
  42  * 3) Allow different MAC addresses for the two slave interfaces, using the
  43  *    MacAddressA field.
  44  */
  45 static bool is_supervision_frame(struct hsr_priv *hsr, struct sk_buff *skb)
  46 {
  47         struct ethhdr *eth_hdr;
  48         struct hsr_sup_tag *hsr_sup_tag;
  49         struct hsrv1_ethhdr_sp *hsr_V1_hdr;
  50
  51         WARN_ON_ONCE(!skb_mac_header_was_set(skb));
  52         eth_hdr = (struct ethhdr *)skb_mac_header(skb);
  53
  54         /* Correct addr? */
  55         if (!ether_addr_equal(eth_hdr->h_dest,
  56                               hsr->sup_multicast_addr))
  57                 return false;
  58
  59         /* Correct ether type?. */
  60         if (!(eth_hdr->h_proto == htons(ETH_P_PRP) ||
  61               eth_hdr->h_proto == htons(ETH_P_HSR)))
  62                 return false;
  63
  64         /* Get the supervision header from correct location. */
  65         if (eth_hdr->h_proto == htons(ETH_P_HSR)) { /* Okay HSRv1. */
  66                 hsr_V1_hdr = (struct hsrv1_ethhdr_sp *)skb_mac_header(skb);
  67                 if (hsr_V1_hdr->hsr.encap_proto != htons(ETH_P_PRP))
  68                         return false;
  69
  70                 hsr_sup_tag = &hsr_V1_hdr->hsr_sup;
  71         } else {
  72                 hsr_sup_tag =
  73                      &((struct hsrv0_ethhdr_sp *)skb_mac_header(skb))->hsr_sup;
  74         }
  75
  76         if (hsr_sup_tag->HSR_TLV_type != HSR_TLV_ANNOUNCE &&
  77             hsr_sup_tag->HSR_TLV_type != HSR_TLV_LIFE_CHECK)
  78                 return false;
  79         if (hsr_sup_tag->HSR_TLV_length != 12 &&
  80             hsr_sup_tag->HSR_TLV_length != sizeof(struct hsr_sup_payload))
  81                 return false;
  82
  83         return true;
  84 }
  85
  86 static struct sk_buff *create_stripped_skb(struct sk_buff *skb_in,
  87                                            struct hsr_frame_info *frame)
  88 {
  89         struct sk_buff *skb;
  90         int copylen;
  91         unsigned char *dst, *src;
  92
  93         skb_pull(skb_in, HSR_HLEN);
  94         skb = __pskb_copy(skb_in, skb_headroom(skb_in) - HSR_HLEN, GFP_ATOMIC);
  95         skb_push(skb_in, HSR_HLEN);
  96         if (!skb)
  97                 return NULL;
  98
  99         skb_reset_mac_header(skb);
 100
 101         if (skb->ip_summed == CHECKSUM_PARTIAL)
 102                 skb->csum_start -= HSR_HLEN;
 103
 104         copylen = 2 * ETH_ALEN;
 105         if (frame->is_vlan)
 106                 copylen += VLAN_HLEN;
 107         src = skb_mac_header(skb_in);
 108         dst = skb_mac_header(skb);
 109         memcpy(dst, src, copylen);
 110
 111         skb->protocol = eth_hdr(skb)->h_proto;
 112         return skb;
 113 }
 114
 115 static struct sk_buff *frame_get_stripped_skb(struct hsr_frame_info *frame,
 116                                               struct hsr_port *port)
 117 {
 118         if (!frame->skb_std)
 119                 frame->skb_std = create_stripped_skb(frame->skb_hsr, frame);
 120         return skb_clone(frame->skb_std, GFP_ATOMIC);
 121 }
 122
 123 static void hsr_fill_tag(struct sk_buff *skb, struct hsr_frame_info *frame,
 124                          struct hsr_port *port, u8 proto_version)
 125 {
 126         struct hsr_ethhdr *hsr_ethhdr;
 127         int lane_id;
 128         int lsdu_size;
 129
 130         if (port->type == HSR_PT_SLAVE_A)
 131                 lane_id = 0;
 132         else
 133                 lane_id = 1;
 134
 135         lsdu_size = skb->len - 14;
 136         if (frame->is_vlan)
 137                 lsdu_size -= 4;
 138
 139         hsr_ethhdr = (struct hsr_ethhdr *)skb_mac_header(skb);
 140
 141         set_hsr_tag_path(&hsr_ethhdr->hsr_tag, lane_id);
 142         set_hsr_tag_LSDU_size(&hsr_ethhdr->hsr_tag, lsdu_size);
 143         hsr_ethhdr->hsr_tag.sequence_nr = htons(frame->sequence_nr);
 144         hsr_ethhdr->hsr_tag.encap_proto = hsr_ethhdr->ethhdr.h_proto;
 145         hsr_ethhdr->ethhdr.h_proto = htons(proto_version ?
 146                         ETH_P_HSR : ETH_P_PRP);
 147 }
 148
 149 static struct sk_buff *create_tagged_skb(struct sk_buff *skb_o,
 150                                          struct hsr_frame_info *frame,
 151                                          struct hsr_port *port)
 152 {
 153         int movelen;
 154         unsigned char *dst, *src;
 155         struct sk_buff *skb;
 156
 157         /* Create the new skb with enough headroom to fit the HSR tag */
 158         skb = __pskb_copy(skb_o, skb_headroom(skb_o) + HSR_HLEN, GFP_ATOMIC);
 159         if (!skb)
 160                 return NULL;
 161         skb_reset_mac_header(skb);
 162
 163         if (skb->ip_summed == CHECKSUM_PARTIAL)
 164                 skb->csum_start += HSR_HLEN;
 165
 166         movelen = ETH_HLEN;
 167         if (frame->is_vlan)
 168                 movelen += VLAN_HLEN;
 169
 170         src = skb_mac_header(skb);
 171         dst = skb_push(skb, HSR_HLEN);
 172         memmove(dst, src, movelen);
 173         skb_reset_mac_header(skb);
 174
 175         hsr_fill_tag(skb, frame, port, port->hsr->prot_version);
 176
 177         return skb;
 178 }
 179
 180 /* If the original frame was an HSR tagged frame, just clone it to be sent
 181  * unchanged. Otherwise, create a private frame especially tagged for 'port'.
 182  */
 183 static struct sk_buff *frame_get_tagged_skb(struct hsr_frame_info *frame,
 184                                             struct hsr_port *port)
 185 {
 186         if (frame->skb_hsr)
 187                 return skb_clone(frame->skb_hsr, GFP_ATOMIC);
 188
 189         if (port->type != HSR_PT_SLAVE_A && port->type != HSR_PT_SLAVE_B) {
 190                 WARN_ONCE(1, "HSR: Bug: trying to create a tagged frame for a non-ring port");
 191                 return NULL;
 192         }
 193
 194         return create_tagged_skb(frame->skb_std, frame, port);
 195 }
 196
 197 static void hsr_deliver_master(struct sk_buff *skb, struct net_device *dev,
 198                                struct hsr_node *node_src)
 199 {
 200         bool was_multicast_frame;
 201         int res, recv_len;
 202
 203         was_multicast_frame = (skb->pkt_type == PACKET_MULTICAST);
 204         hsr_addr_subst_source(node_src, skb);
 205         skb_pull(skb, ETH_HLEN);
 206         recv_len = skb->len;
 207         res = netif_rx(skb);
 208         if (res == NET_RX_DROP) {
 209                 dev->stats.rx_dropped++;
 210         } else {
 211                 dev->stats.rx_packets++;
 212                 dev->stats.rx_bytes += recv_len;
 213                 if (was_multicast_frame)
 214                         dev->stats.multicast++;
 215         }
 216 }
 217
 218 static int hsr_xmit(struct sk_buff *skb, struct hsr_port *port,
 219                     struct hsr_frame_info *frame)
 220 {
 221         if (frame->port_rcv->type == HSR_PT_MASTER) {
 222                 hsr_addr_subst_dest(frame->node_src, skb, port);
 223
 224                 /* Address substitution (IEC62439-3 pp 26, 50): replace mac
 225                  * address of outgoing frame with that of the outgoing slave's.
 226                  */
 227                 ether_addr_copy(eth_hdr(skb)->h_source, port->dev->dev_addr);
 228         }
 229         return dev_queue_xmit(skb);
 230 }
 231
 232 /* Forward the frame through all devices except:
 233  * - Back through the receiving device
 234  * - If it's a HSR frame: through a device where it has passed before
 235  * - To the local HSR master only if the frame is directly addressed to it, or
 236  *   a non-supervision multicast or broadcast frame.
 237  *
 238  * HSR slave devices should insert a HSR tag into the frame, or forward the
 239  * frame unchanged if it's already tagged. Interlink devices should strip HSR
 240  * tags if they're of the non-HSR type (but only after duplicate discard). The
 241  * master device always strips HSR tags.
 242  */
 243 static void hsr_forward_do(struct hsr_frame_info *frame)
 244 {
 245         struct hsr_port *port;
 246         struct sk_buff *skb;
 247
 248         hsr_for_each_port(frame->port_rcv->hsr, port) {
 249                 /* Don't send frame back the way it came */
 250                 if (port == frame->port_rcv)
 251                         continue;
 252
 253                 /* Don't deliver locally unless we should */
 254                 if (port->type == HSR_PT_MASTER && !frame->is_local_dest)
 255                         continue;
 256
 257                 /* Deliver frames directly addressed to us to master only */
 258                 if (port->type != HSR_PT_MASTER && frame->is_local_exclusive)
 259                         continue;
 260
 261                 /* Don't send frame over port where it has been sent before */
 262                 if (hsr_register_frame_out(port, frame->node_src,
 263                                            frame->sequence_nr))
 264                         continue;
 265
 266                 if (frame->is_supervision && port->type == HSR_PT_MASTER) {
 267                         hsr_handle_sup_frame(frame->skb_hsr,
 268                                              frame->node_src,
 269                                              frame->port_rcv);
 270                         continue;
 271                 }
 272
 273                 if (port->type != HSR_PT_MASTER)
 274                         skb = frame_get_tagged_skb(frame, port);
 275                 else
 276                         skb = frame_get_stripped_skb(frame, port);
 277                 if (!skb) {
 278                         /* FIXME: Record the dropped frame? */
 279                         continue;
 280                 }
 281
 282                 skb->dev = port->dev;
 283                 if (port->type == HSR_PT_MASTER)
 284                         hsr_deliver_master(skb, port->dev, frame->node_src);
 285                 else
 286                         hsr_xmit(skb, port, frame);
 287         }
 288 }
 289
 290 static void check_local_dest(struct hsr_priv *hsr, struct sk_buff *skb,
 291                              struct hsr_frame_info *frame)
 292 {
 293         if (hsr_addr_is_self(hsr, eth_hdr(skb)->h_dest)) {
 294                 frame->is_local_exclusive = true;
 295                 skb->pkt_type = PACKET_HOST;
 296         } else {
 297                 frame->is_local_exclusive = false;
 298         }
 299
 300         if (skb->pkt_type == PACKET_HOST ||
 301             skb->pkt_type == PACKET_MULTICAST ||
 302             skb->pkt_type == PACKET_BROADCAST) {
 303                 frame->is_local_dest = true;
 304         } else {
 305                 frame->is_local_dest = false;
 306         }
 307 }
 308
 309 static int hsr_fill_frame_info(struct hsr_frame_info *frame,
 310                                struct sk_buff *skb, struct hsr_port *port)
 311 {
 312         struct ethhdr *ethhdr;
 313         unsigned long irqflags;
 314
 315         frame->is_supervision = is_supervision_frame(port->hsr, skb);
 316         frame->node_src = hsr_get_node(port, skb, frame->is_supervision);
 317         if (!frame->node_src)
 318                 return -1; /* Unknown node and !is_supervision, or no mem */
 319
 320         ethhdr = (struct ethhdr *)skb_mac_header(skb);
 321         frame->is_vlan = false;
 322         if (ethhdr->h_proto == htons(ETH_P_8021Q)) {
 323                 frame->is_vlan = true;
 324                 /* FIXME: */
 325                 WARN_ONCE(1, "HSR: VLAN not yet supported");
 326         }
 327         if (ethhdr->h_proto == htons(ETH_P_PRP) ||
 328             ethhdr->h_proto == htons(ETH_P_HSR)) {
 329                 frame->skb_std = NULL;
 330                 frame->skb_hsr = skb;
 331                 frame->sequence_nr = hsr_get_skb_sequence_nr(skb);
 332         } else {
 333                 frame->skb_std = skb;
 334                 frame->skb_hsr = NULL;
 335                 /* Sequence nr for the master node */
 336                 spin_lock_irqsave(&port->hsr->seqnr_lock, irqflags);
 337                 frame->sequence_nr = port->hsr->sequence_nr;
 338                 port->hsr->sequence_nr++;
 339                 spin_unlock_irqrestore(&port->hsr->seqnr_lock, irqflags);
 340         }
 341
 342         frame->port_rcv = port;
 343         check_local_dest(port->hsr, skb, frame);
 344
 345         return 0;
 346 }
 347
 348 /* Must be called holding rcu read lock (because of the port parameter) */
 349 void hsr_forward_skb(struct sk_buff *skb, struct hsr_port *port)
 350 {
 351         struct hsr_frame_info frame;
 352
 353         if (hsr_fill_frame_info(&frame, skb, port) < 0)
 354                 goto out_drop;
 355         hsr_register_frame_in(frame.node_src, port, frame.sequence_nr);
 356         hsr_forward_do(&frame);
 357         /* Gets called for ingress frames as well as egress from master port.
 358          * So check and increment stats for master port only here.
 359          */
 360         if (port->type == HSR_PT_MASTER) {
 361                 port->dev->stats.tx_packets++;
 362                 port->dev->stats.tx_bytes += skb->len;
 363         }
 364
 365         if (frame.skb_hsr)
 366                 kfree_skb(frame.skb_hsr);
 367         if (frame.skb_std)
 368                 kfree_skb(frame.skb_std);
 369         return;
 370
 371 out_drop:
 372         port->dev->stats.tx_dropped++;
 373         kfree_skb(skb);
 374 }