/* * Copyright (c) 2015 Cisco and/or its affiliates. * 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. */ /* * interface_output.c: interface output node * * Copyright (c) 2008 Eliot Dresselhaus * * Permission is hereby granted, free of charge, to any person obtaining * a copy of this software and associated documentation files (the * "Software"), to deal in the Software without restriction, including * without limitation the rights to use, copy, modify, merge, publish, * distribute, sublicense, and/or sell copies of the Software, and to * permit persons to whom the Software is furnished to do so, subject to * the following conditions: * * The above copyright notice and this permission notice shall be * included in all copies or substantial portions of the Software. * * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE * LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION * OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION * WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. */ #include #include #include #include #include #include typedef struct { u32 sw_if_index; u8 data[128 - sizeof (u32)]; } interface_output_trace_t; u8 * format_vnet_interface_output_trace (u8 * s, va_list * va) { CLIB_UNUSED (vlib_main_t * vm) = va_arg (*va, vlib_main_t *); vlib_node_t *node = va_arg (*va, vlib_node_t *); interface_output_trace_t *t = va_arg (*va, interface_output_trace_t *); vnet_main_t *vnm = vnet_get_main (); vnet_sw_interface_t *si; u32 indent; if (t->sw_if_index != (u32) ~ 0) { indent = format_get_indent (s); if (pool_is_free_index (vnm->interface_main.sw_interfaces, t->sw_if_index)) { /* the interface may have been deleted by the time the trace is printed */ s = format (s, "sw_if_index: %d\n%U%U", t->sw_if_index, format_white_space, indent, node->format_buffer ? node-> format_buffer : format_hex_bytes, t->data, sizeof (t->data)); } else { si = vnet_get_sw_interface (vnm, t->sw_if_index); s = format (s, "%U\n%U%U", format_vnet_sw_interface_name, vnm, si, format_white_space, indent, node->format_buffer ? node-> format_buffer : format_hex_bytes, t->data, sizeof (t->data)); } } return s; } static void vnet_interface_output_trace (vlib_main_t * vm, vlib_node_runtime_t * node, vlib_frame_t * frame, uword n_buffers) { u32 n_left, *from; n_left = n_buffers; from = vlib_frame_vector_args (frame); while (n_left >= 4) { u32 bi0, bi1; vlib_buffer_t *b0, *b1; interface_output_trace_t *t0, *t1; /* Prefetch next iteration. */ vlib_prefetch_buffer_with_index (vm, from[2], LOAD); vlib_prefetch_buffer_with_index (vm, from[3], LOAD); bi0 = from[0]; bi1 = from[1]; b0 = vlib_get_buffer (vm, bi0); b1 = vlib_get_buffer (vm, bi1); if (b0->flags & VLIB_BUFFER_IS_TRACED) { t0 = vlib_add_trace (vm, node, b0, sizeof (t0[0])); t0->sw_if_index = vnet_buffer (b0)->sw_if_index[VLIB_TX]; clib_memcpy_fast (t0->data, vlib_buffer_get_current (b0), sizeof (t0->data)); } if (b1->flags & VLIB_BUFFER_IS_TRACED) { t1 = vlib_add_trace (vm, node, b1, sizeof (t1[0])); t1->sw_if_index = vnet_buffer (b1)->sw_if_index[VLIB_TX]; clib_memcpy_fast (t1->data, vlib_buffer_get_current (b1), sizeof (t1->data)); } from += 2; n_left -= 2; } while (n_left >= 1) { u32 bi0; vlib_buffer_t *b0; interface_output_trace_t *t0; bi0 = from[0]; b0 = vlib_get_buffer (vm, bi0); if (b0->flags & VLIB_BUFFER_IS_TRACED) { t0 = vlib_add_trace (vm, node, b0, sizeof (t0[0])); t0->sw_if_index = vnet_buffer (b0)->sw_if_index[VLIB_TX]; clib_memcpy_fast (t0->data, vlib_buffer_get_current (b0), sizeof (t0->data)); } from += 1; n_left -= 1; } } static_always_inline void calc_checksums (vlib_main_t * vm, vlib_buffer_t * b) { ip4_header_t *ip4; ip6_header_t *ip6; tcp_header_t *th; udp_header_t *uh; int is_ip4 = (b->flags & VNET_BUFFER_F_IS_IP4) != 0; int is_ip6 = (b->flags & VNET_BUFFER_F_IS_IP6) != 0; ASSERT (!(is_ip4 && is_ip6)); ip4 = (ip4_header_t *) (b->data + vnet_buffer (b)->l3_hdr_offset); ip6 = (ip6_header_t *) (b->data + vnet_buffer (b)->l3_hdr_offset); th = (tcp_header_t *) (b->data + vnet_buffer (b)->l4_hdr_offset); uh = (udp_header_t *) (b->data + vnet_buffer (b)->l4_hdr_offset); if (is_ip4) { ip4 = (ip4_header_t *) (b->data + vnet_buffer (b)->l3_hdr_offset); if (b->flags & VNET_BUFFER_F_OFFLOAD_IP_CKSUM) ip4->checksum = ip4_header_checksum (ip4); if (b->flags & VNET_BUFFER_F_OFFLOAD_TCP_CKSUM) th->checksum = ip4_tcp_udp_compute_checksum (vm, b, ip4); if (b->flags & VNET_BUFFER_F_OFFLOAD_UDP_CKSUM) uh->checksum = ip4_tcp_udp_compute_checksum (vm, b, ip4); } if (is_ip6) { int bogus; if (b->flags & VNET_BUFFER_F_OFFLOAD_TCP_CKSUM) th->checksum = ip6_tcp_udp_icmp_compute_checksum (vm, b, ip6, &bogus); if (b->flags & VNET_BUFFER_F_OFFLOAD_UDP_CKSUM) uh->checksum = ip6_tcp_udp_icmp_compute_checksum (vm, b, ip6, &bogus); } b->flags &= ~VNET_BUFFER_F_OFFLOAD_TCP_CKSUM; b->flags &= ~VNET_BUFFER_F_OFFLOAD_UDP_CKSUM; b->flags &= ~VNET_BUFFER_F_OFFLOAD_IP_CKSUM; } static_always_inline uword vnet_interface_output_node_inline (vlib_main_t * vm, vlib_node_runtime_t * node, vlib_frame_t * frame, vnet_main_t * vnm, vnet_hw_interface_t * hi, int do_tx_offloads) { vnet_interface_output_runtime_t *rt = (void *) node->runtime_data; vnet_sw_interface_t *si; u32 n_left_to_tx, *from, *from_end, *to_tx; u32 n_bytes, n_buffers, n_packets; u32 n_bytes_b0, n_bytes_b1, n_bytes_b2, n_bytes_b3; u32 thread_index = vm->thread_index; vnet_interface_main_t *im = &vnm->interface_main; u32 next_index = VNET_
/*
 * Copyright (c) 2017 Cisco and/or its affiliates.
 *
 * 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.
*/

#include <vppinfra/pool.h>

/* can be a very large size */
#define NELTS 1024

int
main (int argc, char *argv[])
{
  u32 *junk = 0;
  int i;
  u32 *tp = 0;
  u32 *indices = 0;

  clib_mem_init (0, 3ULL << 30);

  vec_validate (indices, NELTS - 1);
  _vec_len (indices) = 0;

  pool_init_fixed (tp, NELTS);

  for (i = 0; i < NELTS; i++)
    {
      pool_get (tp, junk);
      vec_add1 (indices, junk - tp);
      *junk = i;
    }

  for (i = 0; i < NELTS; i++)
    {
      junk = pool_elt_at_index (tp, indices[i]);
      ASSERT (*junk == i);
    }

  fformat (stdout, "%d pool elts before deletes\n", pool_elts (tp));

  pool_put_index (tp, indices[12]);
  pool_put_index (tp, indices[43]);

  fformat (stdout, "%d pool elts after deletes\n", pool_elts (tp));

  pool_validate (tp);

  pool_free (tp);
  return 0;
}

/*
 * fd.io coding-style-patch-verification: ON
 *
 * Local Variables:
 * eval: (c-set-style "gnu")
 * End:
 */
} current_counter = em->counters[current_counter_index]; } } while (n_errors_left >= 1) { vlib_buffer_t *b0; vnet_sw_interface_t *sw_if0; vlib_error_t e0; u32 bi0, sw_if_index0; bi0 = buffers[0]; buffers += 1; n_errors_left -= 1; current_counter += 1; b0 = vlib_get_buffer (vm, bi0); e0 = b0->error; sw_if_index0 = vnet_buffer (b0)->sw_if_index[VLIB_RX]; /* Increment drop/punt counters. */ vlib_increment_simple_counter (cm, thread_index, sw_if_index0, 1); /* Increment super-interface drop/punt counters for sub-interfaces. */ sw_if0 = vnet_get_sw_interface (vnm, sw_if_index0); vlib_increment_simple_counter (cm, thread_index, sw_if0->sup_sw_if_index, sw_if0->sup_sw_if_index != sw_if_index0); if (PREDICT_FALSE (e0 != current_error)) { current_counter -= 1; vlib_error_elog_count (vm, current_counter_index, (current_counter - em->counters[current_counter_index])); em->counters[current_counter_index] = current_counter; do_packet (vm, e0); current_error = e0; current_counter_index = counter_index (vm, e0); current_counter = em->counters[current_counter_index]; } } if (n_errors_current_sw_if_index > 0) { vnet_sw_interface_t *si; vlib_increment_simple_counter (cm, thread_index, current_sw_if_index, n_errors_current_sw_if_index); si = vnet_get_sw_interface (vnm, current_sw_if_index); if (si->sup_sw_if_index != current_sw_if_index) vlib_increment_simple_counter (cm, thread_index, si->sup_sw_if_index, n_errors_current_sw_if_index); } vlib_error_elog_count (vm, current_counter_index, (current_counter - em->counters[current_counter_index])); /* Return cached counter. */ em->counters[current_counter_index] = current_counter; /* Save memory for next iteration. */ memory[disposition] = current_error; if (disposition == VNET_ERROR_DISPOSITION_DROP || !vm->os_punt_frame) { vlib_buffer_free (vm, first_buffer, frame->n_vectors); /* If there is no punt function, free the frame as well. */ if (disposition == VNET_ERROR_DISPOSITION_PUNT && !vm->os_punt_frame) vlib_frame_free (vm, node, frame); } else vm->os_punt_frame (vm, node, frame); return frame->n_vectors; } static inline void pcap_drop_trace (vlib_main_t * vm, vnet_interface_main_t * im, vlib_frame_t * f) { u32 *from; u32 n_left = f->n_vectors; vlib_buffer_t *b0, *p1; u32 bi0; i16 save_current_data; u16 save_current_length; from = vlib_frame_vector_args (f); while (n_left > 0) { if (PREDICT_TRUE (n_left > 1)) { p1 = vlib_get_buffer (vm, from[1]); vlib_prefetch_buffer_header (p1, LOAD); } bi0 = from[0]; b0 = vlib_get_buffer (vm, bi0); from++; n_left--; /* See if we're pointedly ignoring this specific error */ if (im->pcap_drop_filter_hash && hash_get (im->pcap_drop_filter_hash, b0->error)) continue; /* Trace all drops, or drops received on a specific interface */ if (im->pcap_sw_if_index == 0 || im->pcap_sw_if_index == vnet_buffer (b0)->sw_if_index[VLIB_RX]) { save_current_data = b0->current_data; save_current_length = b0->current_length; /* * Typically, we'll need to rewind the buffer */ if (b0->current_data > 0) vlib_buffer_advance (b0, (word) - b0->current_data); pcap_add_buffer (&im->pcap_main, vm, bi0, 512); b0->current_data = save_current_data; b0->current_length = save_current_length; } } } void vnet_pcap_drop_trace_filter_add_del (u32 error_index, int is_add) { vnet_interface_main_t *im = &vnet_get_main ()->interface_main; if (im->pcap_drop_filter_hash == 0) im->pcap_drop_filter_hash = hash_create (0, sizeof (uword)); if (is_add) hash_set (im->pcap_drop_filter_hash, error_index, 1); else hash_unset (im->pcap_drop_filter_hash, error_index); } static uword process_drop (vlib_main_t * vm, vlib_node_runtime_t * node, vlib_frame_t * frame) { vnet_interface_main_t *im = &vnet_get_main ()->interface_main; if (PREDICT_FALSE (im->drop_pcap_enable)) pcap_drop_trace (vm, im, frame); return process_drop_punt (vm, node, frame, VNET_ERROR_DISPOSITION_DROP); } static uword process_punt (vlib_main_t * vm, vlib_node_runtime_t * node, vlib_frame_t * frame) { return process_drop_punt (vm, node, frame, VNET_ERROR_DISPOSITION_PUNT); } /* *INDENT-OFF* */ VLIB_REGISTER_NODE (drop_buffers,static) = { .function = process_drop, .name = "error-drop", .flags = VLIB_NODE_FLAG_IS_DROP, .vector_size = sizeof (u32), .format_trace = format_vnet_error_trace, .validate_frame = validate_error_frame, }; /* *INDENT-ON* */ VLIB_NODE_FUNCTION_MULTIARCH (drop_buffers, process_drop); /* *INDENT-OFF* */ VLIB_REGISTER_NODE (punt_buffers,static) = { .function = process_punt, .flags = (VLIB_NODE_FLAG_FRAME_NO_FREE_AFTER_DISPATCH | VLIB_NODE_FLAG_IS_PUNT), .name = "error-punt", .vector_size = sizeof (u32), .format_trace = format_vnet_error_trace, .validate_frame = validate_error_frame, }; /* *INDENT-ON* */ VLIB_NODE_FUNCTION_MULTIARCH (punt_buffers, process_punt); /* *INDENT-OFF* */ VLIB_REGISTER_NODE (vnet_per_buffer_interface_output_node,static) = { .function = vnet_per_buffer_interface_output, .name = "interface-output", .vector_size = sizeof (u32), }; /* *INDENT-ON* */ VLIB_NODE_FUNCTION_MULTIARCH (vnet_per_buffer_interface_output_node, vnet_per_buffer_interface_output); static uword interface_tx_node_fn (vlib_main_t * vm, vlib_node_runtime_t * node, vlib_frame_t * from_frame) { vnet_main_t *vnm = vnet_get_main (); u32 last_sw_if_index = ~0; vlib_frame_t *to_frame = 0; vnet_hw_interface_t *hw = 0; u32 *from, *to_next = 0; u32 n_left_from; from = vlib_frame_vector_args (from_frame); n_left_from = from_frame->n_vectors; while (n_left_from > 0) { u32 bi0; vlib_buffer_t *b0; u32 sw_if_index0; bi0 = from[0]; from++; n_left_from--; b0 = vlib_get_buffer (vm, bi0); sw_if_index0 = vnet_buffer (b0)->sw_if_index[VLIB_TX]; if (PREDICT_FALSE ((last_sw_if_index != sw_if_index0) || to_frame == 0)) { if (to_frame) { hw = vnet_get_sup_hw_interface (vnm, last_sw_if_index); vlib_put_frame_to_node (vm, hw->tx_node_index, to_frame); } last_sw_if_index = sw_if_index0; hw = vnet_get_sup_hw_interface (vnm, sw_if_index0); to_frame = vlib_get_frame_to_node (vm, hw->tx_node_index); to_next = vlib_frame_vector_args (to_frame); } to_next[0] = bi0; to_next++; to_frame->n_vectors++; } vlib_put_frame_to_node (vm, hw->tx_node_index, to_frame); return from_frame->n_vectors; } /* *INDENT-OFF* */ VLIB_REGISTER_NODE (interface_tx, static) = { .function = interface_tx_node_fn, .name = "interface-tx", .vector_size = sizeof (u32), .n_next_nodes = 1, .next_nodes = { [0] = "error-drop", }, }; VNET_FEATURE_ARC_INIT (interface_output, static) = { .arc_name = "interface-output", .start_nodes = VNET_FEATURES (0), .last_in_arc = "interface-tx", .arc_index_ptr = &vnet_main.interface_main.output_feature_arc_index, }; VNET_FEATURE_INIT (span_tx, static) = { .arc_name = "interface-output", .node_name = "span-output", .runs_before = VNET_FEATURES ("interface-tx"), }; VNET_FEATURE_INIT (ipsec_if_tx, static) = { .arc_name = "interface-output", .node_name = "ipsec-if-output", .runs_before = VNET_FEATURES ("interface-tx"), }; VNET_FEATURE_INIT (interface_tx, static) = { .arc_name = "interface-output", .node_name = "interface-tx", .runs_before = 0, }; /* *INDENT-ON* */ clib_error_t * vnet_per_buffer_interface_output_hw_interface_add_del (vnet_main_t * vnm, u32 hw_if_index, u32 is_create) { vnet_hw_interface_t *hi = vnet_get_hw_interface (vnm, hw_if_index); u32 next_index; if (hi->output_node_index == 0) return 0; next_index = vlib_node_add_next (vnm->vlib_main, vnet_per_buffer_interface_output_node.index, hi->output_node_index); hi->output_node_next_index = next_index; return 0; } VNET_HW_INTERFACE_ADD_DEL_FUNCTION (vnet_per_buffer_interface_output_hw_interface_add_del); void vnet_set_interface_output_node (vnet_main_t * vnm, u32 hw_if_index, u32 node_index) { ASSERT (node_index); vnet_hw_interface_t *hi = vnet_get_hw_interface (vnm, hw_if_index); u32 next_index = vlib_node_add_next (vnm->vlib_main, vnet_per_buffer_interface_output_node.index, node_index); hi->output_node_next_index = next_index; hi->output_node_index = node_index; } static clib_error_t * pcap_drop_trace_command_fn (vlib_main_t * vm, unformat_input_t * input, vlib_cli_command_t * cmd) { vnet_main_t *vnm = vnet_get_main (); vnet_interface_main_t *im = &vnm->interface_main; u8 *filename; u32 max; int matched = 0; clib_error_t *error = 0; while (unformat_check_input (input) != UNFORMAT_END_OF_INPUT) { if (unformat (input, "on")) { if (im->drop_pcap_enable == 0) { if (im->pcap_filename == 0) im->pcap_filename = format (0, "/tmp/drop.pcap%c", 0); clib_memset (&im->pcap_main, 0, sizeof (im->pcap_main)); im->pcap_main.file_name = (char *) im->pcap_filename; im->pcap_main.n_packets_to_capture = 100; if (im->pcap_pkts_to_capture) im->pcap_main.n_packets_to_capture = im->pcap_pkts_to_capture; im->pcap_main.packet_type = PCAP_PACKET_TYPE_ethernet; im->drop_pcap_enable = 1; matched = 1; vlib_cli_output (vm, "pcap drop capture on..."); } else { vlib_cli_output (vm, "pcap drop capture already on..."); } matched = 1; } else if (unformat (input, "off")) { matched = 1; if (im->drop_pcap_enable) { vlib_cli_output (vm, "captured %d pkts...", im->pcap_main.n_packets_captured); if (im->pcap_main.n_packets_captured) { im->pcap_main.n_packets_to_capture = im->pcap_main.n_packets_captured; error = pcap_write (&im->pcap_main); if (error) clib_error_report (error); else vlib_cli_output (vm, "saved to %s...", im->pcap_filename); } } else { vlib_cli_output (vm, "pcap drop capture already off..."); } im->drop_pcap_enable = 0; } else if (unformat (input, "max %d", &max)) { im->pcap_pkts_to_capture = max; matched = 1; } else if (unformat (input, "intfc %U", unformat_vnet_sw_interface, vnm, &im->pcap_sw_if_index)) matched = 1; else if (unformat (input, "intfc any")) { im->pcap_sw_if_index = 0; matched = 1; } else if (unformat (input, "file %s", &filename)) { u8 *chroot_filename; /* Brain-police user path input */ if (strstr ((char *) filename, "..") || index ((char *) filename, '/')) { vlib_cli_output (vm, "illegal characters in filename '%s'", filename); continue; } chroot_filename = format (0, "/tmp/%s%c", filename, 0); vec_free (filename); if (im->pcap_filename) vec_free (im->pcap_filename); im->pcap_filename = chroot_filename; im->pcap_main.file_name = (char *) im->pcap_filename; matched = 1; } else if (unformat (input, "status")) { if (im->drop_pcap_enable == 0) { vlib_cli_output (vm, "pcap drop capture is off..."); continue; } vlib_cli_output (vm, "pcap drop capture: %d of %d pkts...", im->pcap_main.n_packets_captured, im->pcap_main.n_packets_to_capture); matched = 1; } else break; } if (matched == 0) return clib_error_return (0, "unknown input `%U'", format_unformat_error, input); return 0; } /* *INDENT-OFF* */ VLIB_CLI_COMMAND (pcap_trace_command, static) = { .path = "pcap drop trace", .short_help = "pcap drop trace on off max intfc file status", .function = pcap_drop_trace_command_fn, }; /* *INDENT-ON* */ /* * fd.io coding-style-patch-verification: ON * * Local Variables: * eval: (c-set-style "gnu") * End: */