samples/bpf/map_perf_test_user.c

   1 /* Copyright (c) 2016 Facebook
   2  *
   3  * This program is free software; you can redistribute it and/or
   4  * modify it under the terms of version 2 of the GNU General Public
   5  * License as published by the Free Software Foundation.
   6  */
   7 #define _GNU_SOURCE
   8 #include <sched.h>
   9 #include <stdio.h>
  10 #include <sys/types.h>
  11 #include <asm/unistd.h>
  12 #include <unistd.h>
  13 #include <assert.h>
  14 #include <sys/wait.h>
  15 #include <stdlib.h>
  16 #include <signal.h>
  17 #include <linux/bpf.h>
  18 #include <string.h>
  19 #include <time.h>
  20 #include <sys/resource.h>
  21 #include <arpa/inet.h>
  22 #include <errno.h>
  23
  24 #include <bpf/bpf.h>
  25 #include "bpf_load.h"
  26
  27 #define TEST_BIT(t) (1U << (t))
  28 #define MAX_NR_CPUS 1024
  29
  30 static __u64 time_get_ns(void)
  31 {
  32         struct timespec ts;
  33
  34         clock_gettime(CLOCK_MONOTONIC, &ts);
  35         return ts.tv_sec * 1000000000ull + ts.tv_nsec;
  36 }
  37
  38 enum test_type {
  39         HASH_PREALLOC,
  40         PERCPU_HASH_PREALLOC,
  41         HASH_KMALLOC,
  42         PERCPU_HASH_KMALLOC,
  43         LRU_HASH_PREALLOC,
  44         NOCOMMON_LRU_HASH_PREALLOC,
  45         LPM_KMALLOC,
  46         HASH_LOOKUP,
  47         ARRAY_LOOKUP,
  48         INNER_LRU_HASH_PREALLOC,
  49         LRU_HASH_LOOKUP,
  50         NR_TESTS,
  51 };
  52
  53 const char *test_map_names[NR_TESTS] = {
  54         [HASH_PREALLOC] = "hash_map",
  55         [PERCPU_HASH_PREALLOC] = "percpu_hash_map",
  56         [HASH_KMALLOC] = "hash_map_alloc",
  57         [PERCPU_HASH_KMALLOC] = "percpu_hash_map_alloc",
  58         [LRU_HASH_PREALLOC] = "lru_hash_map",
  59         [NOCOMMON_LRU_HASH_PREALLOC] = "nocommon_lru_hash_map",
  60         [LPM_KMALLOC] = "lpm_trie_map_alloc",
  61         [HASH_LOOKUP] = "hash_map",
  62         [ARRAY_LOOKUP] = "array_map",
  63         [INNER_LRU_HASH_PREALLOC] = "inner_lru_hash_map",
  64         [LRU_HASH_LOOKUP] = "lru_hash_lookup_map",
  65 };
  66
  67 static int test_flags = ~0;
  68 static uint32_t num_map_entries;
  69 static uint32_t inner_lru_hash_size;
  70 static int inner_lru_hash_idx = -1;
  71 static int array_of_lru_hashs_idx = -1;
  72 static int lru_hash_lookup_idx = -1;
  73 static int lru_hash_lookup_test_entries = 32;
  74 static uint32_t max_cnt = 1000000;
  75
  76 static int check_test_flags(enum test_type t)
  77 {
  78         return test_flags & TEST_BIT(t);
  79 }
  80
  81 static void test_hash_prealloc(int cpu)
  82 {
  83         __u64 start_time;
  84         int i;
  85
  86         start_time = time_get_ns();
  87         for (i = 0; i < max_cnt; i++)
  88                 syscall(__NR_getuid);
  89         printf("%d:hash_map_perf pre-alloc %lld events per sec\n",
  90                cpu, max_cnt * 1000000000ll / (time_get_ns() - start_time));
  91 }
  92
  93 static int pre_test_lru_hash_lookup(int tasks)
  94 {
  95         int fd = map_fd[lru_hash_lookup_idx];
  96         uint32_t key;
  97         long val = 1;
  98         int ret;
  99
 100         if (num_map_entries > lru_hash_lookup_test_entries)
 101                 lru_hash_lookup_test_entries = num_map_entries;
 102
 103         /* Populate the lru_hash_map for LRU_HASH_LOOKUP perf test.
 104          *
 105          * It is fine that the user requests for a map with
 106          * num_map_entries < 32 and some of the later lru hash lookup
 107          * may return not found.  For LRU map, we are not interested
 108          * in such small map performance.
 109          */
 110         for (key = 0; key < lru_hash_lookup_test_entries; key++) {
 111                 ret = bpf_map_update_elem(fd, &key, &val, BPF_NOEXIST);
 112                 if (ret)
 113                         return ret;
 114         }
 115
 116         return 0;
 117 }
 118
 119 static void do_test_lru(enum test_type test, int cpu)
 120 {
 121         static int inner_lru_map_fds[MAX_NR_CPUS];
 122
 123         struct sockaddr_in6 in6 = { .sin6_family = AF_INET6 };
 124         const char *test_name;
 125         __u64 start_time;
 126         int i, ret;
 127
 128         if (test == INNER_LRU_HASH_PREALLOC) {
 129                 int outer_fd = map_fd[array_of_lru_hashs_idx];
 130                 unsigned int mycpu, mynode;
 131
 132                 assert(cpu < MAX_NR_CPUS);
 133
 134                 if (cpu) {
 135                         ret = syscall(__NR_getcpu, &mycpu, &mynode, NULL);
 136                         assert(!ret);
 137
 138                         inner_lru_map_fds[cpu] =
 139                                 bpf_create_map_node(BPF_MAP_TYPE_LRU_HASH,
 140                                                     test_map_names[INNER_LRU_HASH_PREALLOC],
 141                                                     sizeof(uint32_t),
 142                                                     sizeof(long),
 143                                                     inner_lru_hash_size, 0,
 144                                                     mynode);
 145                         if (inner_lru_map_fds[cpu] == -1) {
 146                                 printf("cannot create BPF_MAP_TYPE_LRU_HASH %s(%d)\n",
 147                                        strerror(errno), errno);
 148                                 exit(1);
 149                         }
 150                 } else {
 151                         inner_lru_map_fds[cpu] = map_fd[inner_lru_hash_idx];
 152                 }
 153
 154                 ret = bpf_map_update_elem(outer_fd, &cpu,
 155                                           &inner_lru_map_fds[cpu],
 156                                           BPF_ANY);
 157                 if (ret) {
 158                         printf("cannot update ARRAY_OF_LRU_HASHS with key:%u. %s(%d)\n",
 159                                cpu, strerror(errno), errno);
 160                         exit(1);
 161                 }
 162         }
 163
 164         in6.sin6_addr.s6_addr16[0] = 0xdead;
 165         in6.sin6_addr.s6_addr16[1] = 0xbeef;
 166
 167         if (test == LRU_HASH_PREALLOC) {
 168                 test_name = "lru_hash_map_perf";
 169                 in6.sin6_addr.s6_addr16[2] = 0;
 170         } else if (test == NOCOMMON_LRU_HASH_PREALLOC) {
 171                 test_name = "nocommon_lru_hash_map_perf";
 172                 in6.sin6_addr.s6_addr16[2] = 1;
 173         } else if (test == INNER_LRU_HASH_PREALLOC) {
 174                 test_name = "inner_lru_hash_map_perf";
 175                 in6.sin6_addr.s6_addr16[2] = 2;
 176         } else if (test == LRU_HASH_LOOKUP) {
 177                 test_name = "lru_hash_lookup_perf";
 178                 in6.sin6_addr.s6_addr16[2] = 3;
 179                 in6.sin6_addr.s6_addr32[3] = 0;
 180         } else {
 181                 assert(0);
 182         }
 183
 184         start_time = time_get_ns();
 185         for (i = 0; i < max_cnt; i++) {
 186                 ret = connect(-1, (const struct sockaddr *)&in6, sizeof(in6));
 187                 assert(ret == -1 && errno == EBADF);
 188                 if (in6.sin6_addr.s6_addr32[3] <
 189                     lru_hash_lookup_test_entries - 32)
 190                         in6.sin6_addr.s6_addr32[3] += 32;
 191                 else
 192                         in6.sin6_addr.s6_addr32[3] = 0;
 193         }
 194         printf("%d:%s pre-alloc %lld events per sec\n",
 195                cpu, test_name,
 196                max_cnt * 1000000000ll / (time_get_ns() - start_time));
 197 }
 198
 199 static void test_lru_hash_prealloc(int cpu)
 200 {
 201         do_test_lru(LRU_HASH_PREALLOC, cpu);
 202 }
 203
 204 static void test_nocommon_lru_hash_prealloc(int cpu)
 205 {
 206         do_test_lru(NOCOMMON_LRU_HASH_PREALLOC, cpu);
 207 }
 208
 209 static void test_inner_lru_hash_prealloc(int cpu)
 210 {
 211         do_test_lru(INNER_LRU_HASH_PREALLOC, cpu);
 212 }
 213
 214 static void test_lru_hash_lookup(int cpu)
 215 {
 216         do_test_lru(LRU_HASH_LOOKUP, cpu);
 217 }
 218
 219 static void test_percpu_hash_prealloc(int cpu)
 220 {
 221         __u64 start_time;
 222         int i;
 223
 224         start_time = time_get_ns();
 225         for (i = 0; i < max_cnt; i++)
 226                 syscall(__NR_geteuid);
 227         printf("%d:percpu_hash_map_perf pre-alloc %lld events per sec\n",
 228                cpu, max_cnt * 1000000000ll / (time_get_ns() - start_time));
 229 }
 230
 231 static void test_hash_kmalloc(int cpu)
 232 {
 233         __u64 start_time;
 234         int i;
 235
 236         start_time = time_get_ns();
 237         for (i = 0; i < max_cnt; i++)
 238                 syscall(__NR_getgid);
 239         printf("%d:hash_map_perf kmalloc %lld events per sec\n",
 240                cpu, max_cnt * 1000000000ll / (time_get_ns() - start_time));
 241 }
 242
 243 static void test_percpu_hash_kmalloc(int cpu)
 244 {
 245         __u64 start_time;
 246         int i;
 247
 248         start_time = time_get_ns();
 249         for (i = 0; i < max_cnt; i++)
 250                 syscall(__NR_getegid);
 251         printf("%d:percpu_hash_map_perf kmalloc %lld events per sec\n",
 252                cpu, max_cnt * 1000000000ll / (time_get_ns() - start_time));
 253 }
 254
 255 static void test_lpm_kmalloc(int cpu)
 256 {
 257         __u64 start_time;
 258         int i;
 259
 260         start_time = time_get_ns();
 261         for (i = 0; i < max_cnt; i++)
 262                 syscall(__NR_gettid);
 263         printf("%d:lpm_perf kmalloc %lld events per sec\n",
 264                cpu, max_cnt * 1000000000ll / (time_get_ns() - start_time));
 265 }
 266
 267 static void test_hash_lookup(int cpu)
 268 {
 269         __u64 start_time;
 270         int i;
 271
 272         start_time = time_get_ns();
 273         for (i = 0; i < max_cnt; i++)
 274                 syscall(__NR_getpgid, 0);
 275         printf("%d:hash_lookup %lld lookups per sec\n",
 276                cpu, max_cnt * 1000000000ll * 64 / (time_get_ns() - start_time));
 277 }
 278
 279 static void test_array_lookup(int cpu)
 280 {
 281         __u64 start_time;
 282         int i;
 283
 284         start_time = time_get_ns();
 285         for (i = 0; i < max_cnt; i++)
 286                 syscall(__NR_getppid, 0);
 287         printf("%d:array_lookup %lld lookups per sec\n",
 288                cpu, max_cnt * 1000000000ll * 64 / (time_get_ns() - start_time));
 289 }
 290
 291 typedef int (*pre_test_func)(int tasks);
 292 const pre_test_func pre_test_funcs[] = {
 293         [LRU_HASH_LOOKUP] = pre_test_lru_hash_lookup,
 294 };
 295
 296 typedef void (*test_func)(int cpu);
 297 const test_func test_funcs[] = {
 298         [HASH_PREALLOC] = test_hash_prealloc,
 299         [PERCPU_HASH_PREALLOC] = test_percpu_hash_prealloc,
 300         [HASH_KMALLOC] = test_hash_kmalloc,
 301         [PERCPU_HASH_KMALLOC] = test_percpu_hash_kmalloc,
 302         [LRU_HASH_PREALLOC] = test_lru_hash_prealloc,
 303         [NOCOMMON_LRU_HASH_PREALLOC] = test_nocommon_lru_hash_prealloc,
 304         [LPM_KMALLOC] = test_lpm_kmalloc,
 305         [HASH_LOOKUP] = test_hash_lookup,
 306         [ARRAY_LOOKUP] = test_array_lookup,
 307         [INNER_LRU_HASH_PREALLOC] = test_inner_lru_hash_prealloc,
 308         [LRU_HASH_LOOKUP] = test_lru_hash_lookup,
 309 };
 310
 311 static int pre_test(int tasks)
 312 {
 313         int i;
 314
 315         for (i = 0; i < NR_TESTS; i++) {
 316                 if (pre_test_funcs[i] && check_test_flags(i)) {
 317                         int ret = pre_test_funcs[i](tasks);
 318
 319                         if (ret)
 320                                 return ret;
 321                 }
 322         }
 323
 324         return 0;
 325 }
 326
 327 static void loop(int cpu)
 328 {
 329         cpu_set_t cpuset;
 330         int i;
 331
 332         CPU_ZERO(&cpuset);
 333         CPU_SET(cpu, &cpuset);
 334         sched_setaffinity(0, sizeof(cpuset), &cpuset);
 335
 336         for (i = 0; i < NR_TESTS; i++) {
 337                 if (check_test_flags(i))
 338                         test_funcs[i](cpu);
 339         }
 340 }
 341
 342 static void run_perf_test(int tasks)
 343 {
 344         pid_t pid[tasks];
 345         int i;
 346
 347         assert(!pre_test(tasks));
 348
 349         for (i = 0; i < tasks; i++) {
 350                 pid[i] = fork();
 351                 if (pid[i] == 0) {
 352                         loop(i);
 353                         exit(0);
 354                 } else if (pid[i] == -1) {
 355                         printf("couldn't spawn #%d process\n", i);
 356                         exit(1);
 357                 }
 358         }
 359         for (i = 0; i < tasks; i++) {
 360                 int status;
 361
 362                 assert(waitpid(pid[i], &status, 0) == pid[i]);
 363                 assert(status == 0);
 364         }
 365 }
 366
 367 static void fill_lpm_trie(void)
 368 {
 369         struct bpf_lpm_trie_key *key;
 370         unsigned long value = 0;
 371         unsigned int i;
 372         int r;
 373
 374         key = alloca(sizeof(*key) + 4);
 375         key->prefixlen = 32;
 376
 377         for (i = 0; i < 512; ++i) {
 378                 key->prefixlen = rand() % 33;
 379                 key->data[0] = rand() & 0xff;
 380                 key->data[1] = rand() & 0xff;
 381                 key->data[2] = rand() & 0xff;
 382                 key->data[3] = rand() & 0xff;
 383                 r = bpf_map_update_elem(map_fd[6], key, &value, 0);
 384                 assert(!r);
 385         }
 386
 387         key->prefixlen = 32;
 388         key->data[0] = 192;
 389         key->data[1] = 168;
 390         key->data[2] = 0;
 391         key->data[3] = 1;
 392         value = 128;
 393
 394         r = bpf_map_update_elem(map_fd[6], key, &value, 0);
 395         assert(!r);
 396 }
 397
 398 static void fixup_map(struct bpf_map_data *map, int idx)
 399 {
 400         int i;
 401
 402         if (!strcmp("inner_lru_hash_map", map->name)) {
 403                 inner_lru_hash_idx = idx;
 404                 inner_lru_hash_size = map->def.max_entries;
 405         }
 406
 407         if (!strcmp("array_of_lru_hashs", map->name)) {
 408                 if (inner_lru_hash_idx == -1) {
 409                         printf("inner_lru_hash_map must be defined before array_of_lru_hashs\n");
 410                         exit(1);
 411                 }
 412                 map->def.inner_map_idx = inner_lru_hash_idx;
 413                 array_of_lru_hashs_idx = idx;
 414         }
 415
 416         if (!strcmp("lru_hash_lookup_map", map->name))
 417                 lru_hash_lookup_idx = idx;
 418
 419         if (num_map_entries <= 0)
 420                 return;
 421
 422         inner_lru_hash_size = num_map_entries;
 423
 424         /* Only change the max_entries for the enabled test(s) */
 425         for (i = 0; i < NR_TESTS; i++) {
 426                 if (!strcmp(test_map_names[i], map->name) &&
 427                     (check_test_flags(i))) {
 428                         map->def.max_entries = num_map_entries;
 429                 }
 430         }
 431 }
 432
 433 int main(int argc, char **argv)
 434 {
 435         struct rlimit r = {RLIM_INFINITY, RLIM_INFINITY};
 436         char filename[256];
 437         int num_cpu = 8;
 438
 439         snprintf(filename, sizeof(filename), "%s_kern.o", argv[0]);
 440         setrlimit(RLIMIT_MEMLOCK, &r);
 441
 442         if (argc > 1)
 443                 test_flags = atoi(argv[1]) ? : test_flags;
 444
 445         if (argc > 2)
 446                 num_cpu = atoi(argv[2]) ? : num_cpu;
 447
 448         if (argc > 3)
 449                 num_map_entries = atoi(argv[3]);
 450
 451         if (argc > 4)
 452                 max_cnt = atoi(argv[4]);
 453
 454         if (load_bpf_file_fixup_map(filename, fixup_map)) {
 455                 printf("%s", bpf_log_buf);
 456                 return 1;
 457         }
 458
 459         fill_lpm_trie();
 460
 461         run_perf_test(num_cpu);
 462
 463         return 0;
 464 }