tests/gem_seqno_wrap.c

   1 /*
   2  * Copyright (c) 2012 Intel Corporation
   3  *
   4  * Permission is hereby granted, free of charge, to any person obtaining a
   5  * copy of this software and associated documentation files (the "Software"),
   6  * to deal in the Software without restriction, including without limitation
   7  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
   8  * and/or sell copies of the Software, and to permit persons to whom the
   9  * Software is furnished to do so, subject to the following conditions:
  10  *
  11  * The above copyright notice and this permission notice (including the next
  12  * paragraph) shall be included in all copies or substantial portions of the
  13  * Software.
  14  *
  15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  16  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  17  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
  18  * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  19  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
  20  * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
  21  * IN THE SOFTWARE.
  22  *
  23  * Authors:
  24  *    Mika Kuoppala <mika.kuoppala@intel.com>
  25  *
  26  */
  27
  28 /*
  29  * This test runs blitcopy -> rendercopy with multiple buffers over wrap
  30  * boundary.
  31  */
  32
  33 #include <stdlib.h>
  34 #include <string.h>
  35 #include <time.h>
  36 #include <fcntl.h>
  37 #include <unistd.h>
  38 #include <sys/types.h>
  39 #include <sys/wait.h>
  40 #include <limits.h>
  41 #include <wordexp.h>
  42 #include <getopt.h>
  43 #include <signal.h>
  44
  45 #include "ioctl_wrappers.h"
  46 #include "drmtest.h"
  47 #include "igt_core.h"
  48 #include "intel_bufmgr.h"
  49 #include "intel_batchbuffer.h"
  50 #include "intel_gpu_tools.h"
  51 #include "intel_chipset.h"
  52
  53 static int devid;
  54 static int card_index = 0;
  55 static uint32_t last_seqno = 0;
  56
  57 static struct intel_batchbuffer *batch_blt;
  58 static struct intel_batchbuffer *batch_3d;
  59
  60 struct option_struct {
  61         int rounds;
  62         int background;
  63         char cmd[1024];
  64         int timeout;
  65         int dontwrap;
  66         int prewrap_space;
  67         int random;
  68         int buffers;
  69 };
  70
  71 static struct option_struct options;
  72
  73 static void init_buffer(drm_intel_bufmgr *bufmgr,
  74                         struct igt_buf *buf,
  75                         drm_intel_bo *bo,
  76                         int width, int height)
  77 {
  78         /* buf->bo = drm_intel_bo_alloc(bufmgr, "", size, 4096); */
  79         buf->bo = bo;
  80         buf->size = width * height * 4;
  81         igt_assert(buf->bo);
  82         buf->tiling = I915_TILING_NONE;
  83         buf->num_tiles = width * height * 4;
  84         buf->stride = width * 4;
  85 }
  86
  87 static void
  88 set_bo(drm_intel_bo *bo, uint32_t val, int width, int height)
  89 {
  90         int size = width * height;
  91         uint32_t *vaddr;
  92
  93         drm_intel_gem_bo_start_gtt_access(bo, true);
  94         vaddr = bo->virtual;
  95         while (size--)
  96                 *vaddr++ = val;
  97 }
  98
  99 static int
 100 cmp_bo(drm_intel_bo *bo, uint32_t val, int width, int height)
 101 {
 102         int size = width * height;
 103         uint32_t *vaddr;
 104
 105         drm_intel_gem_bo_start_gtt_access(bo, false);
 106         vaddr = bo->virtual;
 107         while (size--) {
 108                 if (*vaddr++ != val) {
 109                         printf("%d: 0x%x differs from assumed 0x%x\n",
 110                                width * height - size, *vaddr-1, val);
 111                         return -1;
 112                 }
 113         }
 114
 115         return 0;
 116 }
 117
 118 static drm_intel_bo *
 119 create_bo(drm_intel_bufmgr *bufmgr, uint32_t val, int width, int height)
 120 {
 121         drm_intel_bo *bo;
 122
 123         bo = drm_intel_bo_alloc(bufmgr, "bo", width * height * 4, 0);
 124         igt_assert(bo);
 125
 126         /* gtt map doesn't have a write parameter, so just keep the mapping
 127          * around (to avoid the set_domain with the gtt write domain set) and
 128          * manually tell the kernel when we start access the gtt. */
 129         drm_intel_gem_bo_map_gtt(bo);
 130
 131         set_bo(bo, val, width, height);
 132
 133         return bo;
 134 }
 135
 136 static void release_bo(drm_intel_bo *bo)
 137 {
 138         drm_intel_gem_bo_unmap_gtt(bo);
 139         drm_intel_bo_unreference(bo);
 140 }
 141
 142 static void render_copyfunc(struct igt_buf *src,
 143                             struct igt_buf *dst,
 144                             int width,
 145                             int height)
 146 {
 147         const int src_x = 0, src_y = 0, dst_x = 0, dst_y = 0;
 148         igt_render_copyfunc_t rendercopy = igt_get_render_copyfunc(devid);
 149         static int warned = 0;
 150
 151         if (rendercopy) {
 152                 rendercopy(batch_3d, NULL,
 153                            src, src_x, src_y,
 154                            width, height,
 155                            dst, dst_x, dst_y);
 156                 intel_batchbuffer_flush(batch_3d);
 157         } else {
 158                 if (!warned) {
 159                         printf("No render copy found for this gen, "
 160                                "test is shallow!\n");
 161                         warned = 1;
 162                 }
 163                 igt_assert(dst->bo);
 164                 igt_assert(src->bo);
 165                 intel_copy_bo(batch_blt, dst->bo, src->bo, width*height*4);
 166                 intel_batchbuffer_flush(batch_blt);
 167         }
 168 }
 169
 170 static void exchange_uint(void *array, unsigned i, unsigned j)
 171 {
 172         unsigned *i_arr = array;
 173         unsigned i_tmp;
 174
 175         i_tmp = i_arr[i];
 176         i_arr[i] = i_arr[j];
 177         i_arr[j] = i_tmp;
 178 }
 179
 180 static int run_sync_test(int num_buffers, bool verify)
 181 {
 182         drm_intel_bufmgr *bufmgr;
 183         int max;
 184         drm_intel_bo **src, **dst1, **dst2;
 185         int width = 128, height = 128;
 186         int fd;
 187         int i;
 188         int r = -1;
 189         int failed = 0;
 190         unsigned int *p_dst1, *p_dst2;
 191         struct igt_buf *s_src, *s_dst;
 192
 193         fd = drm_open_any();
 194         igt_assert(fd >= 0);
 195
 196         gem_quiescent_gpu(fd);
 197
 198         devid = intel_get_drm_devid(fd);
 199
 200         max = gem_aperture_size (fd) / (1024 * 1024) / 2;
 201         if (num_buffers > max)
 202                 num_buffers = max;
 203
 204         bufmgr = drm_intel_bufmgr_gem_init(fd, 4096);
 205         drm_intel_bufmgr_gem_enable_reuse(bufmgr);
 206         batch_blt = intel_batchbuffer_alloc(bufmgr, intel_get_drm_devid(fd));
 207         igt_assert(batch_blt);
 208         batch_3d = intel_batchbuffer_alloc(bufmgr, intel_get_drm_devid(fd));
 209         igt_assert(batch_3d);
 210
 211         src = malloc(num_buffers * sizeof(*src));
 212         igt_assert(src);
 213
 214         dst1 = malloc(num_buffers * sizeof(*dst1));
 215         igt_assert(dst1);
 216
 217         dst2 = malloc(num_buffers * sizeof(*dst2));
 218         igt_assert(dst2);
 219
 220         s_src = malloc(num_buffers * sizeof(*s_src));
 221         igt_assert(s_src);
 222
 223         s_dst = malloc(num_buffers * sizeof(*s_dst));
 224         igt_assert(s_dst);
 225
 226         p_dst1 = malloc(num_buffers * sizeof(unsigned int));
 227         if (p_dst1 == NULL)
 228                 return -ENOMEM;
 229
 230         p_dst2 = malloc(num_buffers * sizeof(unsigned int));
 231         if (p_dst2 == NULL)
 232                 return -ENOMEM;
 233
 234         for (i = 0; i < num_buffers; i++) {
 235                 p_dst1[i] = p_dst2[i] = i;
 236                 src[i] = create_bo(bufmgr, i, width, height);
 237                 igt_assert(src[i]);
 238                 dst1[i] = create_bo(bufmgr, ~i, width, height);
 239                 igt_assert(dst1[i]);
 240                 dst2[i] = create_bo(bufmgr, ~i, width, height);
 241                 igt_assert(dst2[i]);
 242                 init_buffer(bufmgr, &s_src[i], src[i], width, height);
 243                 init_buffer(bufmgr, &s_dst[i], dst1[i], width, height);
 244         }
 245
 246         igt_permute_array(p_dst1, num_buffers, exchange_uint);
 247         igt_permute_array(p_dst2, num_buffers, exchange_uint);
 248
 249         for (i = 0; i < num_buffers; i++)
 250                 render_copyfunc(&s_src[i], &s_dst[p_dst1[i]], width, height);
 251
 252         /* Only sync between buffers if this is actual test run and
 253          * not a seqno filler */
 254         if (verify) {
 255                 for (i = 0; i < num_buffers; i++)
 256                         intel_copy_bo(batch_blt, dst2[p_dst2[i]], dst1[p_dst1[i]],
 257                                       width*height*4);
 258
 259                 for (i = 0; i < num_buffers; i++) {
 260                         r = cmp_bo(dst2[p_dst2[i]], i, width, height);
 261                         if (r) {
 262                                 printf("buffer %d differs, seqno_before_test 0x%x, "
 263                                        " approximated seqno on test fail 0x%x\n",
 264                                        i, last_seqno, last_seqno + i * 2);
 265                                 failed = -1;
 266                         }
 267                 }
 268         }
 269
 270         for (i = 0; i < num_buffers; i++) {
 271                 release_bo(src[i]);
 272                 release_bo(dst1[i]);
 273                 release_bo(dst2[i]);
 274         }
 275
 276         intel_batchbuffer_free(batch_3d);
 277         intel_batchbuffer_free(batch_blt);
 278         drm_intel_bufmgr_destroy(bufmgr);
 279
 280         free(p_dst1);
 281         free(p_dst2);
 282         free(s_dst);
 283         free(s_src);
 284         free(dst2);
 285         free(dst1);
 286         free(src);
 287
 288         gem_quiescent_gpu(fd);
 289
 290         close(fd);
 291
 292         return failed;
 293 }
 294
 295 static int run_cmd(char *s)
 296 {
 297         int pid;
 298         int r = -1;
 299         int status = 0;
 300         wordexp_t wexp;
 301         int i;
 302         r = wordexp(s, &wexp, 0);
 303         if (r != 0) {
 304                 printf("can't parse %s\n", s);
 305                 return r;
 306         }
 307
 308         for(i = 0; i < wexp.we_wordc; i++)
 309                 printf("argv[%d] = %s\n", i, wexp.we_wordv[i]);
 310
 311         pid = fork();
 312
 313         if (pid == 0) {
 314                 char path[PATH_MAX];
 315                 char full_path[PATH_MAX];
 316
 317                 if (getcwd(path, PATH_MAX) == NULL)
 318                         perror("getcwd");
 319
 320                 igt_assert(snprintf(full_path, PATH_MAX, "%s/%s", path, wexp.we_wordv[0]) > 0);
 321
 322                 r = execv(full_path, wexp.we_wordv);
 323                 if (r == -1)
 324                         perror("execv failed");
 325         } else {
 326                 int waitcount = options.timeout;
 327
 328                 while(waitcount-- > 0) {
 329                         r = waitpid(pid, &status, WNOHANG);
 330                         if (r == pid) {
 331                                 if(WIFEXITED(status)) {
 332                                         if (WEXITSTATUS(status))
 333                                                 fprintf(stderr,
 334                                                     "child returned with %d\n",
 335                                                         WEXITSTATUS(status));
 336                                         return WEXITSTATUS(status);
 337                                 }
 338                         } else if (r != 0) {
 339                                 perror("waitpid");
 340                                 return -errno;
 341                         }
 342
 343                         sleep(3);
 344                 }
 345
 346                 kill(pid, SIGKILL);
 347                 return -ETIMEDOUT;
 348         }
 349
 350         return r;
 351 }
 352
 353 static const char *dfs_base = "/sys/kernel/debug/dri";
 354 static const char *dfs_entry = "i915_next_seqno";
 355
 356 static int dfs_open(int mode)
 357 {
 358         char fname[FILENAME_MAX];
 359         int fh;
 360
 361         snprintf(fname, FILENAME_MAX, "%s/%i/%s",
 362                  dfs_base, card_index, dfs_entry);
 363
 364         fh = open(fname, mode);
 365         igt_require(fh >= 0);
 366
 367         return fh;
 368 }
 369
 370 static int __read_seqno(uint32_t *seqno)
 371 {
 372         int fh;
 373         char buf[32];
 374         int r;
 375         char *p;
 376         unsigned long int tmp;
 377
 378         fh = dfs_open(O_RDONLY);
 379
 380         r = read(fh, buf, sizeof(buf) - 1);
 381         close(fh);
 382         if (r < 0) {
 383                 perror("read");
 384                 return -errno;
 385         }
 386
 387         buf[r] = 0;
 388
 389         p = strstr(buf, "0x");
 390         if (!p)
 391                 p = buf;
 392
 393         errno = 0;
 394         tmp = strtoul(p, NULL, 0);
 395         if (tmp == ULONG_MAX && errno) {
 396                 perror("strtoul");
 397                 return -errno;
 398         }
 399
 400         *seqno = tmp;
 401
 402         igt_debug("next_seqno: 0x%x\n", *seqno);
 403
 404         return 0;
 405 }
 406
 407 static int read_seqno(void)
 408 {
 409         uint32_t seqno = 0;
 410         int r;
 411         int wrap = 0;
 412
 413         r = __read_seqno(&seqno);
 414         igt_assert(r == 0);
 415
 416         if (last_seqno > seqno)
 417                 wrap++;
 418
 419         last_seqno = seqno;
 420
 421         return wrap;
 422 }
 423
 424 static int write_seqno(uint32_t seqno)
 425 {
 426         int fh;
 427         char buf[32];
 428         int r;
 429         uint32_t rb;
 430
 431         if (options.dontwrap)
 432                 return 0;
 433
 434         fh = dfs_open(O_RDWR);
 435         igt_assert(snprintf(buf, sizeof(buf), "0x%x", seqno) > 0);
 436
 437         r = write(fh, buf, strnlen(buf, sizeof(buf)));
 438         close(fh);
 439         if (r < 0)
 440                 return r;
 441
 442         igt_assert(r == strnlen(buf, sizeof(buf)));
 443
 444         last_seqno = seqno;
 445
 446         igt_debug("next_seqno set to: 0x%x\n", seqno);
 447
 448         r = __read_seqno(&rb);
 449         if (r < 0)
 450                 return r;
 451
 452         if (rb != seqno) {
 453                 printf("seqno readback differs rb:0x%x vs w:0x%x\n", rb, seqno);
 454                 return -1;
 455         }
 456
 457         return 0;
 458 }
 459
 460 static uint32_t calc_prewrap_val(void)
 461 {
 462         const int pval = options.prewrap_space;
 463
 464         if (options.random == 0)
 465                 return pval;
 466
 467         if (pval == 0)
 468                 return 0;
 469
 470         return (random() % pval);
 471 }
 472
 473 static int run_test(void)
 474 {
 475         int r;
 476
 477         if (strnlen(options.cmd, sizeof(options.cmd)) > 0) {
 478                 r = run_cmd(options.cmd);
 479         } else {
 480                 r = run_sync_test(options.buffers, true);
 481         }
 482
 483         return r;
 484 }
 485
 486 static void preset_run_once(void)
 487 {
 488         igt_assert(write_seqno(1) == 0);
 489         igt_assert(run_test() == 0);
 490
 491         igt_assert(write_seqno(0x7fffffff) == 0);
 492         igt_assert(run_test() == 0);
 493
 494         igt_assert(write_seqno(0xffffffff) == 0);
 495         igt_assert(run_test() == 0);
 496
 497         igt_assert(write_seqno(0xfffffff0) == 0);
 498         igt_assert(run_test() == 0);
 499 }
 500
 501 static void random_run_once(void)
 502 {
 503         uint32_t val;
 504
 505         do {
 506                 val = random() % UINT32_MAX;
 507                 if (RAND_MAX < UINT32_MAX)
 508                         val += random();
 509         } while (val == 0);
 510
 511         igt_assert(write_seqno(val) == 0);
 512         igt_assert(run_test() == 0);
 513 }
 514
 515 static void wrap_run_once(void)
 516 {
 517         const uint32_t pw_val = calc_prewrap_val();
 518
 519         igt_assert(write_seqno(UINT32_MAX - pw_val) == 0);
 520
 521         while(!read_seqno())
 522                 igt_assert(run_test() == 0);
 523 }
 524
 525 static void background_run_once(void)
 526 {
 527         const uint32_t pw_val = calc_prewrap_val();
 528
 529         igt_assert(write_seqno(UINT32_MAX - pw_val) == 0);
 530
 531         while(!read_seqno())
 532                 sleep(3);
 533 }
 534
 535 static void print_usage(const char *s)
 536 {
 537         printf("%s: [OPTION]...\n", s);
 538         printf("    where options are:\n");
 539         printf("    -b --background       run in background inducing wraps\n");
 540         printf("    -c --cmd=cmdstring    use cmdstring to cross wrap\n");
 541         printf("    -n --rounds=num       run num times across wrap boundary, 0 == forever\n");
 542         printf("    -t --timeout=sec      set timeout to wait for testrun to sec seconds\n");
 543         printf("    -d --dontwrap         don't wrap just run the test\n");
 544         printf("    -p --prewrap=n        set seqno to WRAP - n for each testrun\n");
 545         printf("    -r --norandom         dont randomize prewrap space\n");
 546         printf("    -i --buffers          number of buffers to copy\n");
 547         igt_fail(-1);
 548 }
 549
 550 static void parse_options(int argc, char **argv)
 551 {
 552         int c;
 553         int option_index = 0;
 554         static struct option long_options[] = {
 555                 {"cmd", required_argument, 0, 'c'},
 556                 {"rounds", required_argument, 0, 'n'},
 557                 {"background", no_argument, 0, 'b'},
 558                 {"timeout", required_argument, 0, 't'},
 559                 {"dontwrap", no_argument, 0, 'd'},
 560                 {"prewrap", required_argument, 0, 'p'},
 561                 {"norandom", no_argument, 0, 'r'},
 562                 {"buffers", required_argument, 0, 'i'},
 563         };
 564
 565         strcpy(options.cmd, "");
 566         options.rounds = SLOW_QUICK(50, 2);
 567         options.background = 0;
 568         options.dontwrap = 0;
 569         options.timeout = 20;
 570         options.random = 1;
 571         options.prewrap_space = 21;
 572         options.buffers = 10;
 573
 574         while((c = getopt_long(argc, argv, "c:n:bvt:dp:ri:",
 575                                long_options, &option_index)) != -1) {
 576                 switch(c) {
 577                 case 'b':
 578                         options.background = 1;
 579                         printf("running in background inducing wraps\n");
 580                         break;
 581                 case 'd':
 582                         options.dontwrap = 1;
 583                         printf("won't wrap after testruns\n");
 584                         break;
 585                 case 'n':
 586                         options.rounds = atoi(optarg);
 587                         printf("running %d rounds\n", options.rounds);
 588                         break;
 589                 case 'c':
 590                         strncpy(options.cmd, optarg, sizeof(options.cmd) - 1);
 591                         options.cmd[sizeof(options.cmd) - 1] = 0;
 592                         printf("cmd set to %s\n", options.cmd);
 593                         break;
 594                 case 'i':
 595                         options.buffers = atoi(optarg);
 596                         printf("buffers %d\n", options.buffers);
 597                         break;
 598                 case 't':
 599                         options.timeout = atoi(optarg);
 600                         if (options.timeout == 0)
 601                                 options.timeout = 10;
 602                         printf("setting timeout to %d seconds\n",
 603                                options.timeout);
 604                         break;
 605                 case 'r':
 606                         options.random = 0;
 607                         break;
 608                 case 'p':
 609                         options.prewrap_space = atoi(optarg);
 610                         printf("prewrap set to %d (0x%x)\n",
 611                                options.prewrap_space, UINT32_MAX -
 612                                options.prewrap_space);
 613                         break;
 614                 default:
 615                         printf("unkown command options\n");
 616                         print_usage(argv[0]);
 617                         break;
 618                 }
 619         }
 620
 621         if (optind < argc) {
 622                 printf("unkown command options\n");
 623                 print_usage(argv[0]);
 624         }
 625 }
 626
 627 int main(int argc, char **argv)
 628 {
 629         int wcount = 0;
 630         int r = -1;
 631
 632         igt_simple_init();
 633
 634         parse_options(argc, argv);
 635
 636         card_index = drm_get_card();
 637
 638         srandom(time(NULL));
 639
 640         while(options.rounds == 0 || wcount < options.rounds) {
 641                 if (options.background) {
 642                         background_run_once();
 643                 } else {
 644                         preset_run_once();
 645                         random_run_once();
 646                         wrap_run_once();
 647                 }
 648
 649                 wcount++;
 650
 651                 igt_debug("%s done: %d\n",
 652                           options.dontwrap ? "tests" : "wraps", wcount);
 653         }
 654
 655         if (options.rounds == wcount) {
 656                 igt_debug("done %d wraps successfully\n", wcount);
 657                 return 0;
 658         }
 659
 660         return r;
 661 }