src/plugins/perfmon/intel/bundle/iio_bw.c

   1 /*
   2  * Copyright (c) 2021 Intel and/or its affiliates.
   3  * Licensed under the Apache License, Version 2.0 (the "License");
   4  * you may not use this file except in compliance with the License.
   5  * You may obtain a copy of the License at:
   6  *
   7  *     http://www.apache.org/licenses/LICENSE-2.0
   8  *
   9  * Unless required by applicable law or agreed to in writing, software
  10  * distributed under the License is distributed on an "AS IS" BASIS,
  11  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  12  * See the License for the specific language governing permissions and
  13  * limitations under the License.
  14  */
  15
  16 #include <perfmon/perfmon.h>
  17 #include <perfmon/intel/uncore.h>
  18 #include <vlib/pci/pci.h>
  19 #include <vppinfra/format.h>
  20 #include <linux/limits.h>
  21 #include <fcntl.h>
  22 #include <math.h>
  23
  24 typedef struct
  25 {
  26   u8 socket_id;
  27   u8 sad_id;
  28   u8 iio_unit_id;
  29 } iio_uncore_sad_t;
  30 typedef u32 index_t;
  31
  32 static const char *procfs_pci_path = "/proc/bus/pci";
  33
  34 #define PCM_INTEL_PCI_VENDOR_ID        0x8086
  35 #define SNR_ICX_SAD_CONTROL_CFG_OFFSET 0x3F4
  36 #define SNR_ICX_MESH2IIO_MMAP_DID      0x09A2
  37
  38 static const u8 icx_sad_to_pmu_id_mapping[] = { 5, 0, 1, 2, 3, 4 };
  39
  40 static const char *iio_bw_footer_message =
  41   "* this bundle currently only measures x8 and x16 PCIe devices on Port #0\n"
  42   "or Port #2. Please see the \"Intel® Xeon® Processor Scalable Memory\n"
  43   "Family Uncore Performance Monitoring Reference Manual(336274)\"\n"
  44   "Section 2.4 for more information.";
  45
  46 static u32
  47 get_sad_ctrl_cfg (vlib_pci_addr_t *addr)
  48 {
  49   int fd = 0;
  50   u32 value;
  51   u8 *dev_node_name = format (0, "%s/%02x/%02x.%x", procfs_pci_path, addr->bus,
  52                               addr->slot, addr->function);
  53
  54   fd = open ((char *) dev_node_name, O_RDWR);
  55   if (fd < 0)
  56     return -1;
  57
  58   if (pread (fd, &value, sizeof (u32), SNR_ICX_SAD_CONTROL_CFG_OFFSET) <
  59       sizeof (u32))
  60     value = -1;
  61
  62   close (fd);
  63
  64   return value;
  65 }
  66
  67 static u64
  68 get_bus_to_sad_mappings (vlib_main_t *vm, index_t **ph, iio_uncore_sad_t **pp)
  69 {
  70   index_t *h = 0;
  71   iio_uncore_sad_t *p = 0, *e = 0;
  72   vlib_pci_addr_t *addr = 0, *addrs;
  73
  74   addrs = vlib_pci_get_all_dev_addrs ();
  75
  76   vec_foreach (addr, addrs)
  77     {
  78       vlib_pci_device_info_t *d;
  79       d = vlib_pci_get_device_info (vm, addr, 0);
  80
  81       if (!d)
  82         continue;
  83
  84       if (d->vendor_id == PCM_INTEL_PCI_VENDOR_ID &&
  85           d->device_id == SNR_ICX_MESH2IIO_MMAP_DID)
  86         {
  87
  88           u32 sad_ctrl_cfg = get_sad_ctrl_cfg (addr);
  89           if (sad_ctrl_cfg == 0xFFFFFFFF)
  90             {
  91               vlib_pci_free_device_info (d);
  92               continue;
  93             }
  94
  95           pool_get_zero (p, e);
  96
  97           e->socket_id = (sad_ctrl_cfg & 0xf);
  98           e->sad_id = (sad_ctrl_cfg >> 4) & 0x7;
  99           e->iio_unit_id = icx_sad_to_pmu_id_mapping[e->sad_id];
 100
 101           hash_set (h, addr->bus, e - p);
 102         }
 103
 104       vlib_pci_free_device_info (d);
 105     }
 106
 107   vec_free (addrs);
 108
 109   *ph = h;
 110   *pp = p;
 111
 112   return 0;
 113 }
 114
 115 u8 *
 116 format_stack_socket (u8 *s, va_list *va)
 117 {
 118   iio_uncore_sad_t *e, *p = va_arg (*va, iio_uncore_sad_t *);
 119   index_t *h = va_arg (*va, index_t *);
 120   vlib_pci_addr_t root_bus, *addr = va_arg (*va, vlib_pci_addr_t *);
 121   clib_error_t *err = vlib_pci_get_device_root_bus (addr, &root_bus);
 122   if (err)
 123     {
 124       clib_error_free (err);
 125       return s;
 126     }
 127
 128   uword *pu = hash_get (h, root_bus.bus);
 129   e = pool_elt_at_index (p, (index_t) pu[0]);
 130
 131   s = format (s, "IIO%u/%u", e->socket_id, e->iio_unit_id);
 132   return s;
 133 }
 134
 135 static clib_error_t *
 136 init_intel_uncore_iio_bw (vlib_main_t *vm, struct perfmon_bundle *b)
 137 {
 138   index_t *h = 0;
 139   iio_uncore_sad_t *p = 0;
 140   vlib_pci_addr_t *addr = 0, *addrs;
 141   u8 *s = 0;
 142
 143   get_bus_to_sad_mappings (vm, &h, &p);
 144
 145   s = format (0, "%-10s%-5s%-13s%-12s%-14s%-16s%s\n", "Stack", "Port",
 146               "Address", "VID:PID", "Link Speed", "Driver", "Product Name");
 147
 148   addrs = vlib_pci_get_all_dev_addrs ();
 149
 150   vec_foreach (addr, addrs)
 151     {
 152       vlib_pci_device_info_t *d;
 153       d = vlib_pci_get_device_info (vm, addr, 0);
 154
 155       if (!d)
 156         continue;
 157
 158       if (d->device_class != PCI_CLASS_NETWORK_ETHERNET)
 159         continue;
 160
 161       s = format (
 162         s, "%-10U%-5U%-13U%04x:%04x   %-14U%-16s%v\n", format_stack_socket, p,
 163         h, addr, format_vlib_pci_link_port, d, format_vlib_pci_addr, addr,
 164         d->vendor_id, d->device_id, format_vlib_pci_link_speed, d,
 165         d->driver_name ? (char *) d->driver_name : "", d->product_name);
 166
 167       vlib_pci_free_device_info (d);
 168     }
 169
 170   b->footer = (char *) format (s, "\n%s", iio_bw_footer_message);
 171
 172   vec_free (addrs);
 173   pool_free (p);
 174   hash_free (h);
 175
 176   return 0;
 177 }
 178
 179 static u8 *
 180 format_intel_uncore_iio_bw (u8 *s, va_list *args)
 181 {
 182   perfmon_reading_t *r = va_arg (*args, perfmon_reading_t *);
 183   int col = va_arg (*args, int);
 184   f64 tr = r->time_running * 1e-9;
 185   f64 value = 0;
 186
 187   switch (col)
 188     {
 189     case 0:
 190       s = format (s, "%9.2f", tr);
 191       break;
 192     default:
 193       if (r->time_running)
 194         {
 195           value = r->value[col - 1] * 4 / tr;
 196
 197           if (value > 1.0e6)
 198             s = format (s, "%9.0fM", value * 1e-6);
 199           else if (value > 1.0e3)
 200             s = format (s, "%9.0fK", value * 1e-3);
 201           else
 202             s = format (s, "%9.0f ", value);
 203         }
 204
 205       break;
 206     }
 207
 208   return s;
 209 }
 210
 211 /*
 212  * This bundle is currently only supported and tested on Intel Icelake.
 213  */
 214 static int
 215 is_icelake ()
 216 {
 217   return clib_cpu_supports_avx512_bitalg () && !clib_cpu_supports_movdir64b ();
 218 }
 219
 220 static perfmon_cpu_supports_t iio_bw_cpu_supports[] = {
 221   { is_icelake, PERFMON_BUNDLE_TYPE_SYSTEM }
 222 };
 223
 224 PERFMON_REGISTER_BUNDLE (intel_uncore_iio_bw_pci) = {
 225   .name = "iio-bandwidth-pci",
 226   .description = "pci iio memory reads and writes per iio stack *",
 227   .source = "intel-uncore",
 228   .events[0] = INTEL_UNCORE_E_IIO_UNC_IIO_DATA_REQ_OF_CPU_PART0_RD,
 229   .events[1] = INTEL_UNCORE_E_IIO_UNC_IIO_DATA_REQ_BY_CPU_PART0_WR,
 230   .events[2] = INTEL_UNCORE_E_IIO_UNC_IIO_DATA_REQ_BY_CPU_PART2_RD,
 231   .events[3] = INTEL_UNCORE_E_IIO_UNC_IIO_DATA_REQ_BY_CPU_PART2_WR,
 232   .n_events = 4,
 233   .cpu_supports = iio_bw_cpu_supports,
 234   .n_cpu_supports = ARRAY_LEN (iio_bw_cpu_supports),
 235   .format_fn = format_intel_uncore_iio_bw,
 236   .init_fn = init_intel_uncore_iio_bw,
 237   .column_headers = PERFMON_STRINGS ("RunTime", "PCIe Rd/P0", "PCIe Wr/P0",
 238                                      "PCIe Rd/P2", "PCIe Wr/P2")
 239 };
 240
 241 PERFMON_REGISTER_BUNDLE (intel_uncore_iio_bw_cpu) = {
 242   .name = "iio-bandwidth-cpu",
 243   .description = "cpu iio memory reads and writes per iio stack *",
 244   .source = "intel-uncore",
 245   .events[0] = INTEL_UNCORE_E_IIO_UNC_IIO_DATA_REQ_BY_CPU_PART0_RD,
 246   .events[1] = INTEL_UNCORE_E_IIO_UNC_IIO_DATA_REQ_BY_CPU_PART0_WR,
 247   .events[2] = INTEL_UNCORE_E_IIO_UNC_IIO_DATA_REQ_BY_CPU_PART2_RD,
 248   .events[3] = INTEL_UNCORE_E_IIO_UNC_IIO_DATA_REQ_BY_CPU_PART2_WR,
 249   .n_events = 4,
 250   .cpu_supports = iio_bw_cpu_supports,
 251   .n_cpu_supports = ARRAY_LEN (iio_bw_cpu_supports),
 252   .format_fn = format_intel_uncore_iio_bw,
 253   .init_fn = init_intel_uncore_iio_bw,
 254   .column_headers = PERFMON_STRINGS ("RunTime", "CPU Rd/P0", "CPU Wr/P0",
 255                                      "CPU Rd/P2", "CPU Wr/P2")
 256 };