tools/perf/tests/dso-data.c

   1 #include <dirent.h>
   2 #include <stdlib.h>
   3 #include <linux/kernel.h>
   4 #include <linux/types.h>
   5 #include <sys/stat.h>
   6 #include <fcntl.h>
   7 #include <string.h>
   8 #include <sys/time.h>
   9 #include <sys/resource.h>
  10 #include <api/fs/fs.h>
  11 #include "util.h"
  12 #include "machine.h"
  13 #include "symbol.h"
  14 #include "tests.h"
  15 #include "debug.h"
  16
  17 static char *test_file(int size)
  18 {
  19 #define TEMPL "/tmp/perf-test-XXXXXX"
  20         static char buf_templ[sizeof(TEMPL)];
  21         char *templ = buf_templ;
  22         int fd, i;
  23         unsigned char *buf;
  24
  25         strcpy(buf_templ, TEMPL);
  26 #undef TEMPL
  27
  28         fd = mkstemp(templ);
  29         if (fd < 0) {
  30                 perror("mkstemp failed");
  31                 return NULL;
  32         }
  33
  34         buf = malloc(size);
  35         if (!buf) {
  36                 close(fd);
  37                 return NULL;
  38         }
  39
  40         for (i = 0; i < size; i++)
  41                 buf[i] = (unsigned char) ((int) i % 10);
  42
  43         if (size != write(fd, buf, size))
  44                 templ = NULL;
  45
  46         free(buf);
  47         close(fd);
  48         return templ;
  49 }
  50
  51 #define TEST_FILE_SIZE (DSO__DATA_CACHE_SIZE * 20)
  52
  53 struct test_data_offset {
  54         off_t offset;
  55         u8 data[10];
  56         int size;
  57 };
  58
  59 struct test_data_offset offsets[] = {
  60         /* Fill first cache page. */
  61         {
  62                 .offset = 10,
  63                 .data   = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 },
  64                 .size   = 10,
  65         },
  66         /* Read first cache page. */
  67         {
  68                 .offset = 10,
  69                 .data   = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 },
  70                 .size   = 10,
  71         },
  72         /* Fill cache boundary pages. */
  73         {
  74                 .offset = DSO__DATA_CACHE_SIZE - DSO__DATA_CACHE_SIZE % 10,
  75                 .data   = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 },
  76                 .size   = 10,
  77         },
  78         /* Read cache boundary pages. */
  79         {
  80                 .offset = DSO__DATA_CACHE_SIZE - DSO__DATA_CACHE_SIZE % 10,
  81                 .data   = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 },
  82                 .size   = 10,
  83         },
  84         /* Fill final cache page. */
  85         {
  86                 .offset = TEST_FILE_SIZE - 10,
  87                 .data   = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 },
  88                 .size   = 10,
  89         },
  90         /* Read final cache page. */
  91         {
  92                 .offset = TEST_FILE_SIZE - 10,
  93                 .data   = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 },
  94                 .size   = 10,
  95         },
  96         /* Read final cache page. */
  97         {
  98                 .offset = TEST_FILE_SIZE - 3,
  99                 .data   = { 7, 8, 9, 0, 0, 0, 0, 0, 0, 0 },
 100                 .size   = 3,
 101         },
 102 };
 103
 104 /* move it from util/dso.c for compatibility */
 105 static int dso__data_fd(struct dso *dso, struct machine *machine)
 106 {
 107         int fd = dso__data_get_fd(dso, machine);
 108
 109         if (fd >= 0)
 110                 dso__data_put_fd(dso);
 111
 112         return fd;
 113 }
 114
 115 int test__dso_data(struct test *test __maybe_unused, int subtest __maybe_unused)
 116 {
 117         struct machine machine;
 118         struct dso *dso;
 119         char *file = test_file(TEST_FILE_SIZE);
 120         size_t i;
 121
 122         TEST_ASSERT_VAL("No test file", file);
 123
 124         memset(&machine, 0, sizeof(machine));
 125
 126         dso = dso__new((const char *)file);
 127
 128         TEST_ASSERT_VAL("Failed to access to dso",
 129                         dso__data_fd(dso, &machine) >= 0);
 130
 131         /* Basic 10 bytes tests. */
 132         for (i = 0; i < ARRAY_SIZE(offsets); i++) {
 133                 struct test_data_offset *data = &offsets[i];
 134                 ssize_t size;
 135                 u8 buf[10];
 136
 137                 memset(buf, 0, 10);
 138                 size = dso__data_read_offset(dso, &machine, data->offset,
 139                                      buf, 10);
 140
 141                 TEST_ASSERT_VAL("Wrong size", size == data->size);
 142                 TEST_ASSERT_VAL("Wrong data", !memcmp(buf, data->data, 10));
 143         }
 144
 145         /* Read cross multiple cache pages. */
 146         {
 147                 ssize_t size;
 148                 int c;
 149                 u8 *buf;
 150
 151                 buf = malloc(TEST_FILE_SIZE);
 152                 TEST_ASSERT_VAL("ENOMEM\n", buf);
 153
 154                 /* First iteration to fill caches, second one to read them. */
 155                 for (c = 0; c < 2; c++) {
 156                         memset(buf, 0, TEST_FILE_SIZE);
 157                         size = dso__data_read_offset(dso, &machine, 10,
 158                                                      buf, TEST_FILE_SIZE);
 159
 160                         TEST_ASSERT_VAL("Wrong size",
 161                                 size == (TEST_FILE_SIZE - 10));
 162
 163                         for (i = 0; i < (size_t)size; i++)
 164                                 TEST_ASSERT_VAL("Wrong data",
 165                                         buf[i] == (i % 10));
 166                 }
 167
 168                 free(buf);
 169         }
 170
 171         dso__put(dso);
 172         unlink(file);
 173         return 0;
 174 }
 175
 176 static long open_files_cnt(void)
 177 {
 178         char path[PATH_MAX];
 179         struct dirent *dent;
 180         DIR *dir;
 181         long nr = 0;
 182
 183         scnprintf(path, PATH_MAX, "%s/self/fd", procfs__mountpoint());
 184         pr_debug("fd path: %s\n", path);
 185
 186         dir = opendir(path);
 187         TEST_ASSERT_VAL("failed to open fd directory", dir);
 188
 189         while ((dent = readdir(dir)) != NULL) {
 190                 if (!strcmp(dent->d_name, ".") ||
 191                     !strcmp(dent->d_name, ".."))
 192                         continue;
 193
 194                 nr++;
 195         }
 196
 197         closedir(dir);
 198         return nr - 1;
 199 }
 200
 201 static struct dso **dsos;
 202
 203 static int dsos__create(int cnt, int size)
 204 {
 205         int i;
 206
 207         dsos = malloc(sizeof(*dsos) * cnt);
 208         TEST_ASSERT_VAL("failed to alloc dsos array", dsos);
 209
 210         for (i = 0; i < cnt; i++) {
 211                 char *file;
 212
 213                 file = test_file(size);
 214                 TEST_ASSERT_VAL("failed to get dso file", file);
 215
 216                 dsos[i] = dso__new(file);
 217                 TEST_ASSERT_VAL("failed to get dso", dsos[i]);
 218         }
 219
 220         return 0;
 221 }
 222
 223 static void dsos__delete(int cnt)
 224 {
 225         int i;
 226
 227         for (i = 0; i < cnt; i++) {
 228                 struct dso *dso = dsos[i];
 229
 230                 unlink(dso->name);
 231                 dso__put(dso);
 232         }
 233
 234         free(dsos);
 235 }
 236
 237 static int set_fd_limit(int n)
 238 {
 239         struct rlimit rlim;
 240
 241         if (getrlimit(RLIMIT_NOFILE, &rlim))
 242                 return -1;
 243
 244         pr_debug("file limit %ld, new %d\n", (long) rlim.rlim_cur, n);
 245
 246         rlim.rlim_cur = n;
 247         return setrlimit(RLIMIT_NOFILE, &rlim);
 248 }
 249
 250 int test__dso_data_cache(struct test *test __maybe_unused, int subtest __maybe_unused)
 251 {
 252         struct machine machine;
 253         long nr_end, nr = open_files_cnt();
 254         int dso_cnt, limit, i, fd;
 255
 256         /* Rest the internal dso open counter limit. */
 257         reset_fd_limit();
 258
 259         memset(&machine, 0, sizeof(machine));
 260
 261         /* set as system limit */
 262         limit = nr * 4;
 263         TEST_ASSERT_VAL("failed to set file limit", !set_fd_limit(limit));
 264
 265         /* and this is now our dso open FDs limit */
 266         dso_cnt = limit / 2;
 267         TEST_ASSERT_VAL("failed to create dsos\n",
 268                 !dsos__create(dso_cnt, TEST_FILE_SIZE));
 269
 270         for (i = 0; i < (dso_cnt - 1); i++) {
 271                 struct dso *dso = dsos[i];
 272
 273                 /*
 274                  * Open dsos via dso__data_fd(), it opens the data
 275                  * file and keep it open (unless open file limit).
 276                  */
 277                 fd = dso__data_fd(dso, &machine);
 278                 TEST_ASSERT_VAL("failed to get fd", fd > 0);
 279
 280                 if (i % 2) {
 281                         #define BUFSIZE 10
 282                         u8 buf[BUFSIZE];
 283                         ssize_t n;
 284
 285                         n = dso__data_read_offset(dso, &machine, 0, buf, BUFSIZE);
 286                         TEST_ASSERT_VAL("failed to read dso", n == BUFSIZE);
 287                 }
 288         }
 289
 290         /* verify the first one is already open */
 291         TEST_ASSERT_VAL("dsos[0] is not open", dsos[0]->data.fd != -1);
 292
 293         /* open +1 dso to reach the allowed limit */
 294         fd = dso__data_fd(dsos[i], &machine);
 295         TEST_ASSERT_VAL("failed to get fd", fd > 0);
 296
 297         /* should force the first one to be closed */
 298         TEST_ASSERT_VAL("failed to close dsos[0]", dsos[0]->data.fd == -1);
 299
 300         /* cleanup everything */
 301         dsos__delete(dso_cnt);
 302
 303         /* Make sure we did not leak any file descriptor. */
 304         nr_end = open_files_cnt();
 305         pr_debug("nr start %ld, nr stop %ld\n", nr, nr_end);
 306         TEST_ASSERT_VAL("failed leadking files", nr == nr_end);
 307         return 0;
 308 }
 309
 310 int test__dso_data_reopen(struct test *test __maybe_unused, int subtest __maybe_unused)
 311 {
 312         struct machine machine;
 313         long nr_end, nr = open_files_cnt();
 314         int fd, fd_extra;
 315
 316 #define dso_0 (dsos[0])
 317 #define dso_1 (dsos[1])
 318 #define dso_2 (dsos[2])
 319
 320         /* Rest the internal dso open counter limit. */
 321         reset_fd_limit();
 322
 323         memset(&machine, 0, sizeof(machine));
 324
 325         /*
 326          * Test scenario:
 327          * - create 3 dso objects
 328          * - set process file descriptor limit to current
 329          *   files count + 3
 330          * - test that the first dso gets closed when we
 331          *   reach the files count limit
 332          */
 333
 334         /* Make sure we are able to open 3 fds anyway */
 335         TEST_ASSERT_VAL("failed to set file limit",
 336                         !set_fd_limit((nr + 3)));
 337
 338         TEST_ASSERT_VAL("failed to create dsos\n", !dsos__create(3, TEST_FILE_SIZE));
 339
 340         /* open dso_0 */
 341         fd = dso__data_fd(dso_0, &machine);
 342         TEST_ASSERT_VAL("failed to get fd", fd > 0);
 343
 344         /* open dso_1 */
 345         fd = dso__data_fd(dso_1, &machine);
 346         TEST_ASSERT_VAL("failed to get fd", fd > 0);
 347
 348         /*
 349          * open extra file descriptor and we just
 350          * reached the files count limit
 351          */
 352         fd_extra = open("/dev/null", O_RDONLY);
 353         TEST_ASSERT_VAL("failed to open extra fd", fd_extra > 0);
 354
 355         /* open dso_2 */
 356         fd = dso__data_fd(dso_2, &machine);
 357         TEST_ASSERT_VAL("failed to get fd", fd > 0);
 358
 359         /*
 360          * dso_0 should get closed, because we reached
 361          * the file descriptor limit
 362          */
 363         TEST_ASSERT_VAL("failed to close dso_0", dso_0->data.fd == -1);
 364
 365         /* open dso_0 */
 366         fd = dso__data_fd(dso_0, &machine);
 367         TEST_ASSERT_VAL("failed to get fd", fd > 0);
 368
 369         /*
 370          * dso_1 should get closed, because we reached
 371          * the file descriptor limit
 372          */
 373         TEST_ASSERT_VAL("failed to close dso_1", dso_1->data.fd == -1);
 374
 375         /* cleanup everything */
 376         close(fd_extra);
 377         dsos__delete(3);
 378
 379         /* Make sure we did not leak any file descriptor. */
 380         nr_end = open_files_cnt();
 381         pr_debug("nr start %ld, nr stop %ld\n", nr, nr_end);
 382         TEST_ASSERT_VAL("failed leadking files", nr == nr_end);
 383         return 0;
 384 }