mirror of
https://github.com/KevinMidboe/linguist.git
synced 2025-10-29 17:50:22 +00:00
Support for the P4 language
P4 is a language to describe the processing pipeline of network devices
This commit is contained in:
Paul Chaignon
329
samples/P4/l2.p4
Normal file
329
samples/P4/l2.p4
Normal file
@@ -0,0 +1,329 @@
|
||||
/*
|
||||
Copyright 2013-present Barefoot Networks, Inc.
|
||||
|
||||
Licensed under the Apache License, Version 2.0 (the "License");
|
||||
you may not use this file except in compliance with the License.
|
||||
You may obtain a copy of the License at
|
||||
|
||||
http://www.apache.org/licenses/LICENSE-2.0
|
||||
|
||||
Unless required by applicable law or agreed to in writing, software
|
||||
distributed under the License is distributed on an "AS IS" BASIS,
|
||||
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
||||
See the License for the specific language governing permissions and
|
||||
limitations under the License.
|
||||
*/
|
||||
|
||||
/*
|
||||
* Layer-2 processing
|
||||
*/
|
||||
|
||||
header_type l2_metadata_t {
|
||||
fields {
|
||||
lkp_pkt_type : 3;
|
||||
lkp_mac_sa : 48;
|
||||
lkp_mac_da : 48;
|
||||
lkp_mac_type : 16;
|
||||
|
||||
l2_nexthop : 16; /* next hop from l2 */
|
||||
l2_nexthop_type : 1; /* ecmp or nexthop */
|
||||
l2_redirect : 1; /* l2 redirect action */
|
||||
l2_src_miss : 1; /* l2 source miss */
|
||||
l2_src_move : IFINDEX_BIT_WIDTH; /* l2 source interface mis-match */
|
||||
stp_group: 10; /* spanning tree group id */
|
||||
stp_state : 3; /* spanning tree port state */
|
||||
bd_stats_idx : 16; /* ingress BD stats index */
|
||||
learning_enabled : 1; /* is learning enabled */
|
||||
port_vlan_mapping_miss : 1; /* port vlan mapping miss */
|
||||
same_if_check : IFINDEX_BIT_WIDTH; /* same interface check */
|
||||
}
|
||||
}
|
||||
|
||||
metadata l2_metadata_t l2_metadata;
|
||||
|
||||
#ifndef L2_DISABLE
|
||||
/*****************************************************************************/
|
||||
/* Spanning tree lookup */
|
||||
/*****************************************************************************/
|
||||
action set_stp_state(stp_state) {
|
||||
modify_field(l2_metadata.stp_state, stp_state);
|
||||
}
|
||||
|
||||
table spanning_tree {
|
||||
reads {
|
||||
ingress_metadata.ifindex : exact;
|
||||
l2_metadata.stp_group: exact;
|
||||
}
|
||||
actions {
|
||||
set_stp_state;
|
||||
}
|
||||
size : SPANNING_TREE_TABLE_SIZE;
|
||||
}
|
||||
#endif /* L2_DISABLE */
|
||||
|
||||
control process_spanning_tree {
|
||||
#ifndef L2_DISABLE
|
||||
if (l2_metadata.stp_group != STP_GROUP_NONE) {
|
||||
apply(spanning_tree);
|
||||
}
|
||||
#endif /* L2_DISABLE */
|
||||
}
|
||||
|
||||
#ifndef L2_DISABLE
|
||||
/*****************************************************************************/
|
||||
/* Source MAC lookup */
|
||||
/*****************************************************************************/
|
||||
action smac_miss() {
|
||||
modify_field(l2_metadata.l2_src_miss, TRUE);
|
||||
}
|
||||
|
||||
action smac_hit(ifindex) {
|
||||
bit_xor(l2_metadata.l2_src_move, ingress_metadata.ifindex, ifindex);
|
||||
}
|
||||
|
||||
table smac {
|
||||
reads {
|
||||
ingress_metadata.bd : exact;
|
||||
l2_metadata.lkp_mac_sa : exact;
|
||||
}
|
||||
actions {
|
||||
nop;
|
||||
smac_miss;
|
||||
smac_hit;
|
||||
}
|
||||
size : MAC_TABLE_SIZE;
|
||||
}
|
||||
|
||||
/*****************************************************************************/
|
||||
/* Destination MAC lookup */
|
||||
/*****************************************************************************/
|
||||
action dmac_hit(ifindex) {
|
||||
modify_field(ingress_metadata.egress_ifindex, ifindex);
|
||||
bit_xor(l2_metadata.same_if_check, l2_metadata.same_if_check, ifindex);
|
||||
}
|
||||
|
||||
action dmac_multicast_hit(mc_index) {
|
||||
modify_field(intrinsic_metadata.mcast_grp, mc_index);
|
||||
#ifdef FABRIC_ENABLE
|
||||
modify_field(fabric_metadata.dst_device, FABRIC_DEVICE_MULTICAST);
|
||||
#endif /* FABRIC_ENABLE */
|
||||
}
|
||||
|
||||
action dmac_miss() {
|
||||
modify_field(ingress_metadata.egress_ifindex, IFINDEX_FLOOD);
|
||||
#ifdef FABRIC_ENABLE
|
||||
modify_field(fabric_metadata.dst_device, FABRIC_DEVICE_MULTICAST);
|
||||
#endif /* FABRIC_ENABLE */
|
||||
}
|
||||
|
||||
action dmac_redirect_nexthop(nexthop_index) {
|
||||
modify_field(l2_metadata.l2_redirect, TRUE);
|
||||
modify_field(l2_metadata.l2_nexthop, nexthop_index);
|
||||
modify_field(l2_metadata.l2_nexthop_type, NEXTHOP_TYPE_SIMPLE);
|
||||
}
|
||||
|
||||
action dmac_redirect_ecmp(ecmp_index) {
|
||||
modify_field(l2_metadata.l2_redirect, TRUE);
|
||||
modify_field(l2_metadata.l2_nexthop, ecmp_index);
|
||||
modify_field(l2_metadata.l2_nexthop_type, NEXTHOP_TYPE_ECMP);
|
||||
}
|
||||
|
||||
action dmac_drop() {
|
||||
drop();
|
||||
}
|
||||
|
||||
table dmac {
|
||||
reads {
|
||||
ingress_metadata.bd : exact;
|
||||
l2_metadata.lkp_mac_da : exact;
|
||||
}
|
||||
actions {
|
||||
#ifdef OPENFLOW_ENABLE
|
||||
openflow_apply;
|
||||
openflow_miss;
|
||||
#endif /* OPENFLOW_ENABLE */
|
||||
nop;
|
||||
dmac_hit;
|
||||
dmac_multicast_hit;
|
||||
dmac_miss;
|
||||
dmac_redirect_nexthop;
|
||||
dmac_redirect_ecmp;
|
||||
dmac_drop;
|
||||
}
|
||||
size : MAC_TABLE_SIZE;
|
||||
support_timeout: true;
|
||||
}
|
||||
#endif /* L2_DISABLE */
|
||||
|
||||
control process_mac {
|
||||
#ifndef L2_DISABLE
|
||||
apply(smac);
|
||||
apply(dmac);
|
||||
#endif /* L2_DISABLE */
|
||||
}
|
||||
|
||||
#ifndef L2_DISABLE
|
||||
/*****************************************************************************/
|
||||
/* MAC learn notification */
|
||||
/*****************************************************************************/
|
||||
field_list mac_learn_digest {
|
||||
ingress_metadata.bd;
|
||||
l2_metadata.lkp_mac_sa;
|
||||
ingress_metadata.ifindex;
|
||||
}
|
||||
|
||||
action generate_learn_notify() {
|
||||
generate_digest(MAC_LEARN_RECEIVER, mac_learn_digest);
|
||||
}
|
||||
|
||||
table learn_notify {
|
||||
reads {
|
||||
l2_metadata.l2_src_miss : ternary;
|
||||
l2_metadata.l2_src_move : ternary;
|
||||
l2_metadata.stp_state : ternary;
|
||||
}
|
||||
actions {
|
||||
nop;
|
||||
generate_learn_notify;
|
||||
}
|
||||
size : LEARN_NOTIFY_TABLE_SIZE;
|
||||
}
|
||||
#endif /* L2_DISABLE */
|
||||
|
||||
control process_mac_learning {
|
||||
#ifndef L2_DISABLE
|
||||
if (l2_metadata.learning_enabled == TRUE) {
|
||||
apply(learn_notify);
|
||||
}
|
||||
#endif /* L2_DISABLE */
|
||||
}
|
||||
|
||||
|
||||
/*****************************************************************************/
|
||||
/* Validate packet */
|
||||
/*****************************************************************************/
|
||||
action set_unicast() {
|
||||
modify_field(l2_metadata.lkp_pkt_type, L2_UNICAST);
|
||||
}
|
||||
|
||||
action set_unicast_and_ipv6_src_is_link_local() {
|
||||
modify_field(l2_metadata.lkp_pkt_type, L2_UNICAST);
|
||||
modify_field(ipv6_metadata.ipv6_src_is_link_local, TRUE);
|
||||
}
|
||||
|
||||
action set_multicast() {
|
||||
modify_field(l2_metadata.lkp_pkt_type, L2_MULTICAST);
|
||||
add_to_field(l2_metadata.bd_stats_idx, 1);
|
||||
}
|
||||
|
||||
action set_multicast_and_ipv6_src_is_link_local() {
|
||||
modify_field(l2_metadata.lkp_pkt_type, L2_MULTICAST);
|
||||
modify_field(ipv6_metadata.ipv6_src_is_link_local, TRUE);
|
||||
add_to_field(l2_metadata.bd_stats_idx, 1);
|
||||
}
|
||||
|
||||
action set_broadcast() {
|
||||
modify_field(l2_metadata.lkp_pkt_type, L2_BROADCAST);
|
||||
add_to_field(l2_metadata.bd_stats_idx, 2);
|
||||
}
|
||||
|
||||
action set_malformed_packet(drop_reason) {
|
||||
modify_field(ingress_metadata.drop_flag, TRUE);
|
||||
modify_field(ingress_metadata.drop_reason, drop_reason);
|
||||
}
|
||||
|
||||
table validate_packet {
|
||||
reads {
|
||||
#ifndef __TARGET_BMV2__
|
||||
l2_metadata.lkp_mac_sa mask 0x010000000000 : ternary;
|
||||
#else
|
||||
l2_metadata.lkp_mac_sa : ternary;
|
||||
#endif
|
||||
l2_metadata.lkp_mac_da : ternary;
|
||||
l3_metadata.lkp_ip_type : ternary;
|
||||
l3_metadata.lkp_ip_ttl : ternary;
|
||||
l3_metadata.lkp_ip_version : ternary;
|
||||
#ifndef __TARGET_BMV2__
|
||||
ipv4_metadata.lkp_ipv4_sa mask 0xFF000000 : ternary;
|
||||
#else
|
||||
ipv4_metadata.lkp_ipv4_sa : ternary;
|
||||
#endif
|
||||
#ifndef IPV6_DISABLE
|
||||
#ifndef __TARGET_BMV2__
|
||||
ipv6_metadata.lkp_ipv6_sa mask 0xFFFF0000000000000000000000000000 : ternary;
|
||||
#else
|
||||
ipv6_metadata.lkp_ipv6_sa : ternary;
|
||||
#endif
|
||||
#endif /* IPV6_DISABLE */
|
||||
}
|
||||
actions {
|
||||
nop;
|
||||
set_unicast;
|
||||
set_unicast_and_ipv6_src_is_link_local;
|
||||
set_multicast;
|
||||
set_multicast_and_ipv6_src_is_link_local;
|
||||
set_broadcast;
|
||||
set_malformed_packet;
|
||||
}
|
||||
size : VALIDATE_PACKET_TABLE_SIZE;
|
||||
}
|
||||
|
||||
control process_validate_packet {
|
||||
if (ingress_metadata.drop_flag == FALSE) {
|
||||
apply(validate_packet);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
/*****************************************************************************/
|
||||
/* Egress BD lookup */
|
||||
/*****************************************************************************/
|
||||
action set_egress_bd_properties() {
|
||||
}
|
||||
|
||||
table egress_bd_map {
|
||||
reads {
|
||||
egress_metadata.bd : exact;
|
||||
}
|
||||
actions {
|
||||
nop;
|
||||
set_egress_bd_properties;
|
||||
}
|
||||
size : EGRESS_BD_MAPPING_TABLE_SIZE;
|
||||
}
|
||||
|
||||
control process_egress_bd {
|
||||
apply(egress_bd_map);
|
||||
}
|
||||
|
||||
|
||||
/*****************************************************************************/
|
||||
/* Egress VLAN decap */
|
||||
/*****************************************************************************/
|
||||
action remove_vlan_single_tagged() {
|
||||
modify_field(ethernet.etherType, vlan_tag_[0].etherType);
|
||||
remove_header(vlan_tag_[0]);
|
||||
}
|
||||
|
||||
action remove_vlan_double_tagged() {
|
||||
modify_field(ethernet.etherType, vlan_tag_[1].etherType);
|
||||
remove_header(vlan_tag_[0]);
|
||||
remove_header(vlan_tag_[1]);
|
||||
}
|
||||
|
||||
table vlan_decap {
|
||||
reads {
|
||||
vlan_tag_[0] : valid;
|
||||
vlan_tag_[1] : valid;
|
||||
}
|
||||
actions {
|
||||
nop;
|
||||
remove_vlan_single_tagged;
|
||||
remove_vlan_double_tagged;
|
||||
}
|
||||
size: VLAN_DECAP_TABLE_SIZE;
|
||||
}
|
||||
|
||||
control process_vlan_decap {
|
||||
apply(vlan_decap);
|
||||
}
|
||||
Reference in New Issue
Block a user