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 * Frame router for HSR and PRP. 8 */ 9 10 #include "hsr_forward.h" 11 #include <linux/types.h> 12 #include <linux/skbuff.h> 13 #include <linux/etherdevice.h> 14 #include <linux/if_vlan.h> 15 #include "hsr_main.h" 16 #include "hsr_framereg.h" 17 18 struct hsr_node; 19 20 /* The uses I can see for these HSR supervision frames are: 21 * 1) Use the frames that are sent after node initialization ("HSR_TLV.Type = 22 * 22") to reset any sequence_nr counters belonging to that node. Useful if 23 * the other node's counter has been reset for some reason. 24 * -- 25 * Or not - resetting the counter and bridging the frame would create a 26 * loop, unfortunately. 27 * 28 * 2) Use the LifeCheck frames to detect ring breaks. I.e. if no LifeCheck 29 * frame is received from a particular node, we know something is wrong. 30 * We just register these (as with normal frames) and throw them away. 31 * 32 * 3) Allow different MAC addresses for the two slave interfaces, using the 33 * MacAddressA field. 34 */ 35 static bool is_supervision_frame(struct hsr_priv *hsr, struct sk_buff *skb) 36 { 37 struct ethhdr *eth_hdr; 38 struct hsr_sup_tag *hsr_sup_tag; 39 struct hsrv1_ethhdr_sp *hsr_V1_hdr; 40 41 WARN_ON_ONCE(!skb_mac_header_was_set(skb)); 42 eth_hdr = (struct ethhdr *)skb_mac_header(skb); 43 44 /* Correct addr? */ 45 if (!ether_addr_equal(eth_hdr->h_dest, 46 hsr->sup_multicast_addr)) 47 return false; 48 49 /* Correct ether type?. */ 50 if (!(eth_hdr->h_proto == htons(ETH_P_PRP) || 51 eth_hdr->h_proto == htons(ETH_P_HSR))) 52 return false; 53 54 /* Get the supervision header from correct location. */ 55 if (eth_hdr->h_proto == htons(ETH_P_HSR)) { /* Okay HSRv1. */ 56 hsr_V1_hdr = (struct hsrv1_ethhdr_sp *)skb_mac_header(skb); 57 if (hsr_V1_hdr->hsr.encap_proto != htons(ETH_P_PRP)) 58 return false; 59 60 hsr_sup_tag = &hsr_V1_hdr->hsr_sup; 61 } else { 62 hsr_sup_tag = 63 &((struct hsrv0_ethhdr_sp *)skb_mac_header(skb))->hsr_sup; 64 } 65 66 if (hsr_sup_tag->HSR_TLV_type != HSR_TLV_ANNOUNCE && 67 hsr_sup_tag->HSR_TLV_type != HSR_TLV_LIFE_CHECK && 68 hsr_sup_tag->HSR_TLV_type != PRP_TLV_LIFE_CHECK_DD && 69 hsr_sup_tag->HSR_TLV_type != PRP_TLV_LIFE_CHECK_DA) 70 return false; 71 if (hsr_sup_tag->HSR_TLV_length != 12 && 72 hsr_sup_tag->HSR_TLV_length != sizeof(struct hsr_sup_payload)) 73 return false; 74 75 return true; 76 } 77 78 static struct sk_buff *create_stripped_skb_hsr(struct sk_buff *skb_in, 79 struct hsr_frame_info *frame) 80 { 81 struct sk_buff *skb; 82 int copylen; 83 unsigned char *dst, *src; 84 85 skb_pull(skb_in, HSR_HLEN); 86 skb = __pskb_copy(skb_in, skb_headroom(skb_in) - HSR_HLEN, GFP_ATOMIC); 87 skb_push(skb_in, HSR_HLEN); 88 if (!skb) 89 return NULL; 90 91 skb_reset_mac_header(skb); 92 93 if (skb->ip_summed == CHECKSUM_PARTIAL) 94 skb->csum_start -= HSR_HLEN; 95 96 copylen = 2 * ETH_ALEN; 97 if (frame->is_vlan) 98 copylen += VLAN_HLEN; 99 src = skb_mac_header(skb_in); 100 dst = skb_mac_header(skb); 101 memcpy(dst, src, copylen); 102 103 skb->protocol = eth_hdr(skb)->h_proto; 104 return skb; 105 } 106 107 struct sk_buff *hsr_get_untagged_frame(struct hsr_frame_info *frame, 108 struct hsr_port *port) 109 { 110 if (!frame->skb_std) { 111 if (frame->skb_hsr) { 112 frame->skb_std = 113 create_stripped_skb_hsr(frame->skb_hsr, frame); 114 } else { 115 /* Unexpected */ 116 WARN_ONCE(1, "%s:%d: Unexpected frame received (port_src %s)\n", 117 __FILE__, __LINE__, port->dev->name); 118 return NULL; 119 } 120 } 121 122 return skb_clone(frame->skb_std, GFP_ATOMIC); 123 } 124 125 struct sk_buff *prp_get_untagged_frame(struct hsr_frame_info *frame, 126 struct hsr_port *port) 127 { 128 if (!frame->skb_std) { 129 if (frame->skb_prp) { 130 /* trim the skb by len - HSR_HLEN to exclude RCT */ 131 skb_trim(frame->skb_prp, 132 frame->skb_prp->len - HSR_HLEN); 133 frame->skb_std = 134 __pskb_copy(frame->skb_prp, 135 skb_headroom(frame->skb_prp), 136 GFP_ATOMIC); 137 } else { 138 /* Unexpected */ 139 WARN_ONCE(1, "%s:%d: Unexpected frame received (port_src %s)\n", 140 __FILE__, __LINE__, port->dev->name); 141 return NULL; 142 } 143 } 144 145 return skb_clone(frame->skb_std, GFP_ATOMIC); 146 } 147 148 static void prp_set_lan_id(struct prp_rct *trailer, 149 struct hsr_port *port) 150 { 151 int lane_id; 152 153 if (port->type == HSR_PT_SLAVE_A) 154 lane_id = 0; 155 else 156 lane_id = 1; 157 158 /* Add net_id in the upper 3 bits of lane_id */ 159 lane_id |= port->hsr->net_id; 160 set_prp_lan_id(trailer, lane_id); 161 } 162 163 /* Tailroom for PRP rct should have been created before calling this */ 164 static struct sk_buff *prp_fill_rct(struct sk_buff *skb, 165 struct hsr_frame_info *frame, 166 struct hsr_port *port) 167 { 168 struct prp_rct *trailer; 169 int min_size = ETH_ZLEN; 170 int lsdu_size; 171 172 if (!skb) 173 return skb; 174 175 if (frame->is_vlan) 176 min_size = VLAN_ETH_ZLEN; 177 178 if (skb_put_padto(skb, min_size)) 179 return NULL; 180 181 trailer = (struct prp_rct *)skb_put(skb, HSR_HLEN); 182 lsdu_size = skb->len - 14; 183 if (frame->is_vlan) 184 lsdu_size -= 4; 185 prp_set_lan_id(trailer, port); 186 set_prp_LSDU_size(trailer, lsdu_size); 187 trailer->sequence_nr = htons(frame->sequence_nr); 188 trailer->PRP_suffix = htons(ETH_P_PRP); 189 skb->protocol = eth_hdr(skb)->h_proto; 190 191 return skb; 192 } 193 194 static void hsr_set_path_id(struct hsr_ethhdr *hsr_ethhdr, 195 struct hsr_port *port) 196 { 197 int path_id; 198 199 if (port->type == HSR_PT_SLAVE_A) 200 path_id = 0; 201 else 202 path_id = 1; 203 204 set_hsr_tag_path(&hsr_ethhdr->hsr_tag, path_id); 205 } 206 207 static struct sk_buff *hsr_fill_tag(struct sk_buff *skb, 208 struct hsr_frame_info *frame, 209 struct hsr_port *port, u8 proto_version) 210 { 211 struct hsr_ethhdr *hsr_ethhdr; 212 int lsdu_size; 213 214 /* pad to minimum packet size which is 60 + 6 (HSR tag) */ 215 if (skb_put_padto(skb, ETH_ZLEN + HSR_HLEN)) 216 return NULL; 217 218 lsdu_size = skb->len - 14; 219 if (frame->is_vlan) 220 lsdu_size -= 4; 221 222 hsr_ethhdr = (struct hsr_ethhdr *)skb_mac_header(skb); 223 224 hsr_set_path_id(hsr_ethhdr, port); 225 set_hsr_tag_LSDU_size(&hsr_ethhdr->hsr_tag, lsdu_size); 226 hsr_ethhdr->hsr_tag.sequence_nr = htons(frame->sequence_nr); 227 hsr_ethhdr->hsr_tag.encap_proto = hsr_ethhdr->ethhdr.h_proto; 228 hsr_ethhdr->ethhdr.h_proto = htons(proto_version ? 229 ETH_P_HSR : ETH_P_PRP); 230 skb->protocol = hsr_ethhdr->ethhdr.h_proto; 231 232 return skb; 233 } 234 235 /* If the original frame was an HSR tagged frame, just clone it to be sent 236 * unchanged. Otherwise, create a private frame especially tagged for 'port'. 237 */ 238 struct sk_buff *hsr_create_tagged_frame(struct hsr_frame_info *frame, 239 struct hsr_port *port) 240 { 241 unsigned char *dst, *src; 242 struct sk_buff *skb; 243 int movelen; 244 245 if (frame->skb_hsr) { 246 struct hsr_ethhdr *hsr_ethhdr = 247 (struct hsr_ethhdr *)skb_mac_header(frame->skb_hsr); 248 249 /* set the lane id properly */ 250 hsr_set_path_id(hsr_ethhdr, port); 251 return skb_clone(frame->skb_hsr, GFP_ATOMIC); 252 } else if (port->dev->features & NETIF_F_HW_HSR_TAG_INS) { 253 return skb_clone(frame->skb_std, GFP_ATOMIC); 254 } 255 256 /* Create the new skb with enough headroom to fit the HSR tag */ 257 skb = __pskb_copy(frame->skb_std, 258 skb_headroom(frame->skb_std) + HSR_HLEN, GFP_ATOMIC); 259 if (!skb) 260 return NULL; 261 skb_reset_mac_header(skb); 262 263 if (skb->ip_summed == CHECKSUM_PARTIAL) 264 skb->csum_start += HSR_HLEN; 265 266 movelen = ETH_HLEN; 267 if (frame->is_vlan) 268 movelen += VLAN_HLEN; 269 270 src = skb_mac_header(skb); 271 dst = skb_push(skb, HSR_HLEN); 272 memmove(dst, src, movelen); 273 skb_reset_mac_header(skb); 274 275 /* skb_put_padto free skb on error and hsr_fill_tag returns NULL in 276 * that case 277 */ 278 return hsr_fill_tag(skb, frame, port, port->hsr->prot_version); 279 } 280 281 struct sk_buff *prp_create_tagged_frame(struct hsr_frame_info *frame, 282 struct hsr_port *port) 283 { 284 struct sk_buff *skb; 285 286 if (frame->skb_prp) { 287 struct prp_rct *trailer = skb_get_PRP_rct(frame->skb_prp); 288 289 if (trailer) { 290 prp_set_lan_id(trailer, port); 291 } else { 292 WARN_ONCE(!trailer, "errored PRP skb"); 293 return NULL; 294 } 295 return skb_clone(frame->skb_prp, GFP_ATOMIC); 296 } else if (port->dev->features & NETIF_F_HW_HSR_TAG_INS) { 297 return skb_clone(frame->skb_std, GFP_ATOMIC); 298 } 299 300 skb = skb_copy_expand(frame->skb_std, 0, 301 skb_tailroom(frame->skb_std) + HSR_HLEN, 302 GFP_ATOMIC); 303 prp_fill_rct(skb, frame, port); 304 305 return skb; 306 } 307 308 static void hsr_deliver_master(struct sk_buff *skb, struct net_device *dev, 309 struct hsr_node *node_src) 310 { 311 bool was_multicast_frame; 312 int res; 313 314 was_multicast_frame = (skb->pkt_type == PACKET_MULTICAST); 315 hsr_addr_subst_source(node_src, skb); 316 skb_pull(skb, ETH_HLEN); 317 res = netif_rx(skb); 318 if (res == NET_RX_DROP) { 319 dev->stats.rx_dropped++; 320 } else { 321 dev->stats.rx_packets++; 322 dev->stats.rx_bytes += skb->len; 323 if (was_multicast_frame) 324 dev->stats.multicast++; 325 } 326 } 327 328 static int hsr_xmit(struct sk_buff *skb, struct hsr_port *port, 329 struct hsr_frame_info *frame) 330 { 331 if (frame->port_rcv->type == HSR_PT_MASTER) { 332 hsr_addr_subst_dest(frame->node_src, skb, port); 333 334 /* Address substitution (IEC62439-3 pp 26, 50): replace mac 335 * address of outgoing frame with that of the outgoing slave's. 336 */ 337 ether_addr_copy(eth_hdr(skb)->h_source, port->dev->dev_addr); 338 } 339 return dev_queue_xmit(skb); 340 } 341 342 bool prp_drop_frame(struct hsr_frame_info *frame, struct hsr_port *port) 343 { 344 return ((frame->port_rcv->type == HSR_PT_SLAVE_A && 345 port->type == HSR_PT_SLAVE_B) || 346 (frame->port_rcv->type == HSR_PT_SLAVE_B && 347 port->type == HSR_PT_SLAVE_A)); 348 } 349 350 bool hsr_drop_frame(struct hsr_frame_info *frame, struct hsr_port *port) 351 { 352 if (port->dev->features & NETIF_F_HW_HSR_FWD) 353 return prp_drop_frame(frame, port); 354 355 return false; 356 } 357 358 /* Forward the frame through all devices except: 359 * - Back through the receiving device 360 * - If it's a HSR frame: through a device where it has passed before 361 * - if it's a PRP frame: through another PRP slave device (no bridge) 362 * - To the local HSR master only if the frame is directly addressed to it, or 363 * a non-supervision multicast or broadcast frame. 364 * 365 * HSR slave devices should insert a HSR tag into the frame, or forward the 366 * frame unchanged if it's already tagged. Interlink devices should strip HSR 367 * tags if they're of the non-HSR type (but only after duplicate discard). The 368 * master device always strips HSR tags. 369 */ 370 static void hsr_forward_do(struct hsr_frame_info *frame) 371 { 372 struct hsr_port *port; 373 struct sk_buff *skb; 374 bool sent = false; 375 376 hsr_for_each_port(frame->port_rcv->hsr, port) { 377 struct hsr_priv *hsr = port->hsr; 378 /* Don't send frame back the way it came */ 379 if (port == frame->port_rcv) 380 continue; 381 382 /* Don't deliver locally unless we should */ 383 if (port->type == HSR_PT_MASTER && !frame->is_local_dest) 384 continue; 385 386 /* Deliver frames directly addressed to us to master only */ 387 if (port->type != HSR_PT_MASTER && frame->is_local_exclusive) 388 continue; 389 390 /* If hardware duplicate generation is enabled, only send out 391 * one port. 392 */ 393 if ((port->dev->features & NETIF_F_HW_HSR_DUP) && sent) 394 continue; 395 396 /* Don't send frame over port where it has been sent before. 397 * Also fro SAN, this shouldn't be done. 398 */ 399 if (!frame->is_from_san && 400 hsr_register_frame_out(port, frame->node_src, 401 frame->sequence_nr)) 402 continue; 403 404 if (frame->is_supervision && port->type == HSR_PT_MASTER) { 405 hsr_handle_sup_frame(frame); 406 continue; 407 } 408 409 /* Check if frame is to be dropped. Eg. for PRP no forward 410 * between ports. 411 */ 412 if (hsr->proto_ops->drop_frame && 413 hsr->proto_ops->drop_frame(frame, port)) 414 continue; 415 416 if (port->type != HSR_PT_MASTER) 417 skb = hsr->proto_ops->create_tagged_frame(frame, port); 418 else 419 skb = hsr->proto_ops->get_untagged_frame(frame, port); 420 421 if (!skb) { 422 frame->port_rcv->dev->stats.rx_dropped++; 423 continue; 424 } 425 426 skb->dev = port->dev; 427 if (port->type == HSR_PT_MASTER) { 428 hsr_deliver_master(skb, port->dev, frame->node_src); 429 } else { 430 if (!hsr_xmit(skb, port, frame)) 431 sent = true; 432 } 433 } 434 } 435 436 static void check_local_dest(struct hsr_priv *hsr, struct sk_buff *skb, 437 struct hsr_frame_info *frame) 438 { 439 if (hsr_addr_is_self(hsr, eth_hdr(skb)->h_dest)) { 440 frame->is_local_exclusive = true; 441 skb->pkt_type = PACKET_HOST; 442 } else { 443 frame->is_local_exclusive = false; 444 } 445 446 if (skb->pkt_type == PACKET_HOST || 447 skb->pkt_type == PACKET_MULTICAST || 448 skb->pkt_type == PACKET_BROADCAST) { 449 frame->is_local_dest = true; 450 } else { 451 frame->is_local_dest = false; 452 } 453 } 454 455 static void handle_std_frame(struct sk_buff *skb, 456 struct hsr_frame_info *frame) 457 { 458 struct hsr_port *port = frame->port_rcv; 459 struct hsr_priv *hsr = port->hsr; 460 unsigned long irqflags; 461 462 frame->skb_hsr = NULL; 463 frame->skb_prp = NULL; 464 frame->skb_std = skb; 465 466 if (port->type != HSR_PT_MASTER) { 467 frame->is_from_san = true; 468 } else { 469 /* Sequence nr for the master node */ 470 spin_lock_irqsave(&hsr->seqnr_lock, irqflags); 471 frame->sequence_nr = hsr->sequence_nr; 472 hsr->sequence_nr++; 473 spin_unlock_irqrestore(&hsr->seqnr_lock, irqflags); 474 } 475 } 476 477 int hsr_fill_frame_info(__be16 proto, struct sk_buff *skb, 478 struct hsr_frame_info *frame) 479 { 480 struct hsr_port *port = frame->port_rcv; 481 struct hsr_priv *hsr = port->hsr; 482 483 /* HSRv0 supervisory frames double as a tag so treat them as tagged. */ 484 if ((!hsr->prot_version && proto == htons(ETH_P_PRP)) || 485 proto == htons(ETH_P_HSR)) { 486 /* Check if skb contains hsr_ethhdr */ 487 if (skb->mac_len < sizeof(struct hsr_ethhdr)) 488 return -EINVAL; 489 490 /* HSR tagged frame :- Data or Supervision */ 491 frame->skb_std = NULL; 492 frame->skb_prp = NULL; 493 frame->skb_hsr = skb; 494 frame->sequence_nr = hsr_get_skb_sequence_nr(skb); 495 return 0; 496 } 497 498 /* Standard frame or PRP from master port */ 499 handle_std_frame(skb, frame); 500 501 return 0; 502 } 503 504 int prp_fill_frame_info(__be16 proto, struct sk_buff *skb, 505 struct hsr_frame_info *frame) 506 { 507 /* Supervision frame */ 508 struct prp_rct *rct = skb_get_PRP_rct(skb); 509 510 if (rct && 511 prp_check_lsdu_size(skb, rct, frame->is_supervision)) { 512 frame->skb_hsr = NULL; 513 frame->skb_std = NULL; 514 frame->skb_prp = skb; 515 frame->sequence_nr = prp_get_skb_sequence_nr(rct); 516 return 0; 517 } 518 handle_std_frame(skb, frame); 519 520 return 0; 521 } 522 523 static int fill_frame_info(struct hsr_frame_info *frame, 524 struct sk_buff *skb, struct hsr_port *port) 525 { 526 struct hsr_priv *hsr = port->hsr; 527 struct hsr_vlan_ethhdr *vlan_hdr; 528 struct ethhdr *ethhdr; 529 __be16 proto; 530 int ret; 531 532 /* Check if skb contains ethhdr */ 533 if (skb->mac_len < sizeof(struct ethhdr)) 534 return -EINVAL; 535 536 memset(frame, 0, sizeof(*frame)); 537 frame->is_supervision = is_supervision_frame(port->hsr, skb); 538 frame->node_src = hsr_get_node(port, &hsr->node_db, skb, 539 frame->is_supervision, 540 port->type); 541 if (!frame->node_src) 542 return -1; /* Unknown node and !is_supervision, or no mem */ 543 544 ethhdr = (struct ethhdr *)skb_mac_header(skb); 545 frame->is_vlan = false; 546 proto = ethhdr->h_proto; 547 548 if (proto == htons(ETH_P_8021Q)) 549 frame->is_vlan = true; 550 551 if (frame->is_vlan) { 552 vlan_hdr = (struct hsr_vlan_ethhdr *)ethhdr; 553 proto = vlan_hdr->vlanhdr.h_vlan_encapsulated_proto; 554 /* FIXME: */ 555 netdev_warn_once(skb->dev, "VLAN not yet supported"); 556 } 557 558 frame->is_from_san = false; 559 frame->port_rcv = port; 560 ret = hsr->proto_ops->fill_frame_info(proto, skb, frame); 561 if (ret) 562 return ret; 563 564 check_local_dest(port->hsr, skb, frame); 565 566 return 0; 567 } 568 569 /* Must be called holding rcu read lock (because of the port parameter) */ 570 void hsr_forward_skb(struct sk_buff *skb, struct hsr_port *port) 571 { 572 struct hsr_frame_info frame; 573 574 if (fill_frame_info(&frame, skb, port) < 0) 575 goto out_drop; 576 577 hsr_register_frame_in(frame.node_src, port, frame.sequence_nr); 578 hsr_forward_do(&frame); 579 /* Gets called for ingress frames as well as egress from master port. 580 * So check and increment stats for master port only here. 581 */ 582 if (port->type == HSR_PT_MASTER) { 583 port->dev->stats.tx_packets++; 584 port->dev->stats.tx_bytes += skb->len; 585 } 586 587 kfree_skb(frame.skb_hsr); 588 kfree_skb(frame.skb_prp); 589 kfree_skb(frame.skb_std); 590 return; 591 592 out_drop: 593 port->dev->stats.tx_dropped++; 594 kfree_skb(skb); 595 } 596