src/gallium/winsys/radeon/drm/radeon_drm_winsys.c

   1 /*
   2  * Copyright © 2009 Corbin Simpson
   3  * Copyright © 2011 Marek Olšák <maraeo@gmail.com>
   4  * All Rights Reserved.
   5  *
   6  * Permission is hereby granted, free of charge, to any person obtaining
   7  * a copy of this software and associated documentation files (the
   8  * "Software"), to deal in the Software without restriction, including
   9  * without limitation the rights to use, copy, modify, merge, publish,
  10  * distribute, sub license, and/or sell copies of the Software, and to
  11  * permit persons to whom the Software is furnished to do so, subject to
  12  * the following conditions:
  13  *
  14  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  15  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
  16  * OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  17  * NON-INFRINGEMENT. IN NO EVENT SHALL THE COPYRIGHT HOLDERS, AUTHORS
  18  * AND/OR ITS SUPPLIERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  19  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
  20  * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE
  21  * USE OR OTHER DEALINGS IN THE SOFTWARE.
  22  *
  23  * The above copyright notice and this permission notice (including the
  24  * next paragraph) shall be included in all copies or substantial portions
  25  * of the Software.
  26  */
  27
  28 #include "radeon_drm_bo.h"
  29 #include "radeon_drm_cs.h"
  30 #include "radeon_drm_public.h"
  31
  32 #include "util/u_memory.h"
  33 #include "util/u_hash_table.h"
  34
  35 #include <xf86drm.h>
  36 #include <stdio.h>
  37 #include <sys/types.h>
  38 #include <sys/stat.h>
  39 #include <unistd.h>
  40 #include <fcntl.h>
  41 #include <radeon_surface.h>
  42
  43 static struct util_hash_table *fd_tab = NULL;
  44 static mtx_t fd_tab_mutex = _MTX_INITIALIZER_NP;
  45
  46 /* Enable/disable feature access for one command stream.
  47  * If enable == true, return true on success.
  48  * Otherwise, return false.
  49  *
  50  * We basically do the same thing kernel does, because we have to deal
  51  * with multiple contexts (here command streams) backed by one winsys. */
  52 static bool radeon_set_fd_access(struct radeon_drm_cs *applier,
  53                                  struct radeon_drm_cs **owner,
  54                                  mtx_t *mutex,
  55                                  unsigned request, const char *request_name,
  56                                  bool enable)
  57 {
  58     struct drm_radeon_info info;
  59     unsigned value = enable ? 1 : 0;
  60
  61     memset(&info, 0, sizeof(info));
  62
  63     mtx_lock(&*mutex);
  64
  65     /* Early exit if we are sure the request will fail. */
  66     if (enable) {
  67         if (*owner) {
  68             mtx_unlock(&*mutex);
  69             return false;
  70         }
  71     } else {
  72         if (*owner != applier) {
  73             mtx_unlock(&*mutex);
  74             return false;
  75         }
  76     }
  77
  78     /* Pass through the request to the kernel. */
  79     info.value = (unsigned long)&value;
  80     info.request = request;
  81     if (drmCommandWriteRead(applier->ws->fd, DRM_RADEON_INFO,
  82                             &info, sizeof(info)) != 0) {
  83         mtx_unlock(&*mutex);
  84         return false;
  85     }
  86
  87     /* Update the rights in the winsys. */
  88     if (enable) {
  89         if (value) {
  90             *owner = applier;
  91             mtx_unlock(&*mutex);
  92             return true;
  93         }
  94     } else {
  95         *owner = NULL;
  96     }
  97
  98     mtx_unlock(&*mutex);
  99     return false;
 100 }
 101
 102 static bool radeon_get_drm_value(int fd, unsigned request,
 103                                  const char *errname, uint32_t *out)
 104 {
 105     struct drm_radeon_info info;
 106     int retval;
 107
 108     memset(&info, 0, sizeof(info));
 109
 110     info.value = (unsigned long)out;
 111     info.request = request;
 112
 113     retval = drmCommandWriteRead(fd, DRM_RADEON_INFO, &info, sizeof(info));
 114     if (retval) {
 115         if (errname) {
 116             fprintf(stderr, "radeon: Failed to get %s, error number %d\n",
 117                     errname, retval);
 118         }
 119         return false;
 120     }
 121     return true;
 122 }
 123
 124 /* Helper function to do the ioctls needed for setup and init. */
 125 static bool do_winsys_init(struct radeon_drm_winsys *ws)
 126 {
 127     struct drm_radeon_gem_info gem_info;
 128     int retval;
 129     drmVersionPtr version;
 130
 131     memset(&gem_info, 0, sizeof(gem_info));
 132
 133     /* We do things in a specific order here.
 134      *
 135      * DRM version first. We need to be sure we're running on a KMS chipset.
 136      * This is also for some features.
 137      *
 138      * Then, the PCI ID. This is essential and should return usable numbers
 139      * for all Radeons. If this fails, we probably got handed an FD for some
 140      * non-Radeon card.
 141      *
 142      * The GEM info is actually bogus on the kernel side, as well as our side
 143      * (see radeon_gem_info_ioctl in radeon_gem.c) but that's alright because
 144      * we don't actually use the info for anything yet.
 145      *
 146      * The GB and Z pipe requests should always succeed, but they might not
 147      * return sensical values for all chipsets, but that's alright because
 148      * the pipe drivers already know that.
 149      */
 150
 151     /* Get DRM version. */
 152     version = drmGetVersion(ws->fd);
 153     if (version->version_major != 2 ||
 154         version->version_minor < 12) {
 155         fprintf(stderr, "%s: DRM version is %d.%d.%d but this driver is "
 156                 "only compatible with 2.12.0 (kernel 3.2) or later.\n",
 157                 __FUNCTION__,
 158                 version->version_major,
 159                 version->version_minor,
 160                 version->version_patchlevel);
 161         drmFreeVersion(version);
 162         return false;
 163     }
 164
 165     ws->info.drm_major = version->version_major;
 166     ws->info.drm_minor = version->version_minor;
 167     ws->info.drm_patchlevel = version->version_patchlevel;
 168     drmFreeVersion(version);
 169
 170     /* Get PCI ID. */
 171     if (!radeon_get_drm_value(ws->fd, RADEON_INFO_DEVICE_ID, "PCI ID",
 172                               &ws->info.pci_id))
 173         return false;
 174
 175     /* Check PCI ID. */
 176     switch (ws->info.pci_id) {
 177 #define CHIPSET(pci_id, name, cfamily) case pci_id: ws->info.family = CHIP_##cfamily; ws->gen = DRV_R300; break;
 178 #include "pci_ids/r300_pci_ids.h"
 179 #undef CHIPSET
 180
 181 #define CHIPSET(pci_id, name, cfamily) case pci_id: ws->info.family = CHIP_##cfamily; ws->gen = DRV_R600; break;
 182 #include "pci_ids/r600_pci_ids.h"
 183 #undef CHIPSET
 184
 185 #define CHIPSET(pci_id, cfamily) case pci_id: ws->info.family = CHIP_##cfamily; ws->gen = DRV_SI; break;
 186 #include "pci_ids/radeonsi_pci_ids.h"
 187 #undef CHIPSET
 188
 189     default:
 190         fprintf(stderr, "radeon: Invalid PCI ID.\n");
 191         return false;
 192     }
 193
 194     switch (ws->info.family) {
 195     default:
 196     case CHIP_UNKNOWN:
 197         fprintf(stderr, "radeon: Unknown family.\n");
 198         return false;
 199     case CHIP_R300:
 200     case CHIP_R350:
 201     case CHIP_RV350:
 202     case CHIP_RV370:
 203     case CHIP_RV380:
 204     case CHIP_RS400:
 205     case CHIP_RC410:
 206     case CHIP_RS480:
 207         ws->info.chip_class = R300;
 208         break;
 209     case CHIP_R420:     /* R4xx-based cores. */
 210     case CHIP_R423:
 211     case CHIP_R430:
 212     case CHIP_R480:
 213     case CHIP_R481:
 214     case CHIP_RV410:
 215     case CHIP_RS600:
 216     case CHIP_RS690:
 217     case CHIP_RS740:
 218         ws->info.chip_class = R400;
 219         break;
 220     case CHIP_RV515:    /* R5xx-based cores. */
 221     case CHIP_R520:
 222     case CHIP_RV530:
 223     case CHIP_R580:
 224     case CHIP_RV560:
 225     case CHIP_RV570:
 226         ws->info.chip_class = R500;
 227         break;
 228     case CHIP_R600:
 229     case CHIP_RV610:
 230     case CHIP_RV630:
 231     case CHIP_RV670:
 232     case CHIP_RV620:
 233     case CHIP_RV635:
 234     case CHIP_RS780:
 235     case CHIP_RS880:
 236         ws->info.chip_class = R600;
 237         break;
 238     case CHIP_RV770:
 239     case CHIP_RV730:
 240     case CHIP_RV710:
 241     case CHIP_RV740:
 242         ws->info.chip_class = R700;
 243         break;
 244     case CHIP_CEDAR:
 245     case CHIP_REDWOOD:
 246     case CHIP_JUNIPER:
 247     case CHIP_CYPRESS:
 248     case CHIP_HEMLOCK:
 249     case CHIP_PALM:
 250     case CHIP_SUMO:
 251     case CHIP_SUMO2:
 252     case CHIP_BARTS:
 253     case CHIP_TURKS:
 254     case CHIP_CAICOS:
 255         ws->info.chip_class = EVERGREEN;
 256         break;
 257     case CHIP_CAYMAN:
 258     case CHIP_ARUBA:
 259         ws->info.chip_class = CAYMAN;
 260         break;
 261     case CHIP_TAHITI:
 262     case CHIP_PITCAIRN:
 263     case CHIP_VERDE:
 264     case CHIP_OLAND:
 265     case CHIP_HAINAN:
 266         ws->info.chip_class = SI;
 267         break;
 268     case CHIP_BONAIRE:
 269     case CHIP_KAVERI:
 270     case CHIP_KABINI:
 271     case CHIP_HAWAII:
 272     case CHIP_MULLINS:
 273         ws->info.chip_class = CIK;
 274         break;
 275     }
 276
 277     /* Set which chips don't have dedicated VRAM. */
 278     switch (ws->info.family) {
 279     case CHIP_RS400:
 280     case CHIP_RC410:
 281     case CHIP_RS480:
 282     case CHIP_RS600:
 283     case CHIP_RS690:
 284     case CHIP_RS740:
 285     case CHIP_RS780:
 286     case CHIP_RS880:
 287     case CHIP_PALM:
 288     case CHIP_SUMO:
 289     case CHIP_SUMO2:
 290     case CHIP_ARUBA:
 291     case CHIP_KAVERI:
 292     case CHIP_KABINI:
 293     case CHIP_MULLINS:
 294        ws->info.has_dedicated_vram = false;
 295        break;
 296
 297     default:
 298        ws->info.has_dedicated_vram = true;
 299     }
 300
 301     /* Check for dma */
 302     ws->info.num_sdma_rings = 0;
 303     /* DMA is disabled on R700. There is IB corruption and hangs. */
 304     if (ws->info.chip_class >= EVERGREEN && ws->info.drm_minor >= 27) {
 305         ws->info.num_sdma_rings = 1;
 306     }
 307
 308     /* Check for UVD and VCE */
 309     ws->info.has_hw_decode = false;
 310     ws->info.vce_fw_version = 0x00000000;
 311     if (ws->info.drm_minor >= 32) {
 312         uint32_t value = RADEON_CS_RING_UVD;
 313         if (radeon_get_drm_value(ws->fd, RADEON_INFO_RING_WORKING,
 314                                  "UVD Ring working", &value))
 315             ws->info.has_hw_decode = value;
 316
 317         value = RADEON_CS_RING_VCE;
 318         if (radeon_get_drm_value(ws->fd, RADEON_INFO_RING_WORKING,
 319                                  NULL, &value) && value) {
 320
 321             if (radeon_get_drm_value(ws->fd, RADEON_INFO_VCE_FW_VERSION,
 322                                      "VCE FW version", &value))
 323                 ws->info.vce_fw_version = value;
 324         }
 325     }
 326
 327     /* Check for userptr support. */
 328     {
 329         struct drm_radeon_gem_userptr args = {0};
 330
 331         /* If the ioctl doesn't exist, -EINVAL is returned.
 332          *
 333          * If the ioctl exists, it should return -EACCES
 334          * if RADEON_GEM_USERPTR_READONLY or RADEON_GEM_USERPTR_REGISTER
 335          * aren't set.
 336          */
 337         ws->info.has_userptr =
 338             drmCommandWriteRead(ws->fd, DRM_RADEON_GEM_USERPTR,
 339                                 &args, sizeof(args)) == -EACCES;
 340     }
 341
 342     /* Get GEM info. */
 343     retval = drmCommandWriteRead(ws->fd, DRM_RADEON_GEM_INFO,
 344             &gem_info, sizeof(gem_info));
 345     if (retval) {
 346         fprintf(stderr, "radeon: Failed to get MM info, error number %d\n",
 347                 retval);
 348         return false;
 349     }
 350     ws->info.gart_size = gem_info.gart_size;
 351     ws->info.vram_size = gem_info.vram_size;
 352     ws->info.vram_vis_size = gem_info.vram_visible;
 353     /* Older versions of the kernel driver reported incorrect values, and
 354      * didn't support more than 256MB of visible VRAM anyway
 355      */
 356     if (ws->info.drm_minor < 49)
 357         ws->info.vram_vis_size = MIN2(ws->info.vram_vis_size, 256*1024*1024);
 358
 359     /* Radeon allocates all buffers as contigous, which makes large allocations
 360      * unlikely to succeed. */
 361     ws->info.max_alloc_size = MAX2(ws->info.vram_size, ws->info.gart_size) * 0.7;
 362     if (ws->info.has_dedicated_vram)
 363         ws->info.max_alloc_size = MIN2(ws->info.vram_size * 0.7, ws->info.max_alloc_size);
 364     if (ws->info.drm_minor < 40)
 365         ws->info.max_alloc_size = MIN2(ws->info.max_alloc_size, 256*1024*1024);
 366     /* Both 32-bit and 64-bit address spaces only have 4GB. */
 367     ws->info.max_alloc_size = MIN2(ws->info.max_alloc_size, 3ull*1024*1024*1024);
 368
 369     /* Get max clock frequency info and convert it to MHz */
 370     radeon_get_drm_value(ws->fd, RADEON_INFO_MAX_SCLK, NULL,
 371                          &ws->info.max_shader_clock);
 372     ws->info.max_shader_clock /= 1000;
 373
 374     ws->num_cpus = sysconf(_SC_NPROCESSORS_ONLN);
 375
 376     /* Generation-specific queries. */
 377     if (ws->gen == DRV_R300) {
 378         if (!radeon_get_drm_value(ws->fd, RADEON_INFO_NUM_GB_PIPES,
 379                                   "GB pipe count",
 380                                   &ws->info.r300_num_gb_pipes))
 381             return false;
 382
 383         if (!radeon_get_drm_value(ws->fd, RADEON_INFO_NUM_Z_PIPES,
 384                                   "Z pipe count",
 385                                   &ws->info.r300_num_z_pipes))
 386             return false;
 387     }
 388     else if (ws->gen >= DRV_R600) {
 389         uint32_t tiling_config = 0;
 390
 391         if (!radeon_get_drm_value(ws->fd, RADEON_INFO_NUM_BACKENDS,
 392                                   "num backends",
 393                                   &ws->info.num_render_backends))
 394             return false;
 395
 396         /* get the GPU counter frequency, failure is not fatal */
 397         radeon_get_drm_value(ws->fd, RADEON_INFO_CLOCK_CRYSTAL_FREQ, NULL,
 398                              &ws->info.clock_crystal_freq);
 399
 400         radeon_get_drm_value(ws->fd, RADEON_INFO_TILING_CONFIG, NULL,
 401                              &tiling_config);
 402
 403         ws->info.r600_num_banks =
 404             ws->info.chip_class >= EVERGREEN ?
 405                 4 << ((tiling_config & 0xf0) >> 4) :
 406                 4 << ((tiling_config & 0x30) >> 4);
 407
 408         ws->info.pipe_interleave_bytes =
 409             ws->info.chip_class >= EVERGREEN ?
 410                 256 << ((tiling_config & 0xf00) >> 8) :
 411                 256 << ((tiling_config & 0xc0) >> 6);
 412
 413         if (!ws->info.pipe_interleave_bytes)
 414             ws->info.pipe_interleave_bytes =
 415                 ws->info.chip_class >= EVERGREEN ? 512 : 256;
 416
 417         radeon_get_drm_value(ws->fd, RADEON_INFO_NUM_TILE_PIPES, NULL,
 418                              &ws->info.num_tile_pipes);
 419
 420         /* "num_tiles_pipes" must be equal to the number of pipes (Px) in the
 421          * pipe config field of the GB_TILE_MODE array. Only one card (Tahiti)
 422          * reports a different value (12). Fix it by setting what's in the
 423          * GB_TILE_MODE array (8).
 424          */
 425         if (ws->gen == DRV_SI && ws->info.num_tile_pipes == 12)
 426             ws->info.num_tile_pipes = 8;
 427
 428         if (radeon_get_drm_value(ws->fd, RADEON_INFO_BACKEND_MAP, NULL,
 429                                   &ws->info.r600_gb_backend_map))
 430             ws->info.r600_gb_backend_map_valid = true;
 431
 432         /* Default value. */
 433         ws->info.enabled_rb_mask = u_bit_consecutive(0, ws->info.num_render_backends);
 434         /*
 435          * This fails (silently) on non-GCN or older kernels, overwriting the
 436          * default enabled_rb_mask with the result of the last query.
 437         */
 438         if (ws->gen >= DRV_SI)
 439             radeon_get_drm_value(ws->fd, RADEON_INFO_SI_BACKEND_ENABLED_MASK, NULL,
 440                                  &ws->info.enabled_rb_mask);
 441
 442         ws->info.r600_has_virtual_memory = false;
 443         if (ws->info.drm_minor >= 13) {
 444             uint32_t ib_vm_max_size;
 445
 446             ws->info.r600_has_virtual_memory = true;
 447             if (!radeon_get_drm_value(ws->fd, RADEON_INFO_VA_START, NULL,
 448                                       &ws->va_start))
 449                 ws->info.r600_has_virtual_memory = false;
 450             if (!radeon_get_drm_value(ws->fd, RADEON_INFO_IB_VM_MAX_SIZE, NULL,
 451                                       &ib_vm_max_size))
 452                 ws->info.r600_has_virtual_memory = false;
 453             radeon_get_drm_value(ws->fd, RADEON_INFO_VA_UNMAP_WORKING, NULL,
 454                                  &ws->va_unmap_working);
 455         }
 456         if (ws->gen == DRV_R600 && !debug_get_bool_option("RADEON_VA", false))
 457                 ws->info.r600_has_virtual_memory = false;
 458     }
 459
 460     /* Get max pipes, this is only needed for compute shaders.  All evergreen+
 461      * chips have at least 2 pipes, so we use 2 as a default. */
 462     ws->info.r600_max_quad_pipes = 2;
 463     radeon_get_drm_value(ws->fd, RADEON_INFO_MAX_PIPES, NULL,
 464                          &ws->info.r600_max_quad_pipes);
 465
 466     /* All GPUs have at least one compute unit */
 467     ws->info.num_good_compute_units = 1;
 468     radeon_get_drm_value(ws->fd, RADEON_INFO_ACTIVE_CU_COUNT, NULL,
 469                          &ws->info.num_good_compute_units);
 470
 471     radeon_get_drm_value(ws->fd, RADEON_INFO_MAX_SE, NULL,
 472                          &ws->info.max_se);
 473
 474     if (!ws->info.max_se) {
 475         switch (ws->info.family) {
 476         default:
 477             ws->info.max_se = 1;
 478             break;
 479         case CHIP_CYPRESS:
 480         case CHIP_HEMLOCK:
 481         case CHIP_BARTS:
 482         case CHIP_CAYMAN:
 483         case CHIP_TAHITI:
 484         case CHIP_PITCAIRN:
 485         case CHIP_BONAIRE:
 486             ws->info.max_se = 2;
 487             break;
 488         case CHIP_HAWAII:
 489             ws->info.max_se = 4;
 490             break;
 491         }
 492     }
 493
 494     radeon_get_drm_value(ws->fd, RADEON_INFO_MAX_SH_PER_SE, NULL,
 495                          &ws->info.max_sh_per_se);
 496
 497     radeon_get_drm_value(ws->fd, RADEON_INFO_ACCEL_WORKING2, NULL,
 498                          &ws->accel_working2);
 499     if (ws->info.family == CHIP_HAWAII && ws->accel_working2 < 2) {
 500         fprintf(stderr, "radeon: GPU acceleration for Hawaii disabled, "
 501                 "returned accel_working2 value %u is smaller than 2. "
 502                 "Please install a newer kernel.\n",
 503                 ws->accel_working2);
 504         return false;
 505     }
 506
 507     if (ws->info.chip_class == CIK) {
 508         if (!radeon_get_drm_value(ws->fd, RADEON_INFO_CIK_MACROTILE_MODE_ARRAY, NULL,
 509                                   ws->info.cik_macrotile_mode_array)) {
 510             fprintf(stderr, "radeon: Kernel 3.13 is required for CIK support.\n");
 511             return false;
 512         }
 513     }
 514
 515     if (ws->info.chip_class >= SI) {
 516         if (!radeon_get_drm_value(ws->fd, RADEON_INFO_SI_TILE_MODE_ARRAY, NULL,
 517                                   ws->info.si_tile_mode_array)) {
 518             fprintf(stderr, "radeon: Kernel 3.10 is required for SI support.\n");
 519             return false;
 520         }
 521     }
 522
 523     /* Hawaii with old firmware needs type2 nop packet.
 524      * accel_working2 with value 3 indicates the new firmware.
 525      */
 526     ws->info.gfx_ib_pad_with_type2 = ws->info.chip_class <= SI ||
 527                                      (ws->info.family == CHIP_HAWAII &&
 528                                       ws->accel_working2 < 3);
 529     ws->info.tcc_cache_line_size = 64; /* TC L2 line size on GCN */
 530     ws->info.ib_start_alignment = 4096;
 531     ws->info.kernel_flushes_hdp_before_ib = ws->info.drm_minor >= 40;
 532     /* HTILE is broken with 1D tiling on old kernels and CIK. */
 533     ws->info.htile_cmask_support_1d_tiling = ws->info.chip_class != CIK ||
 534                                              ws->info.drm_minor >= 38;
 535     ws->info.si_TA_CS_BC_BASE_ADDR_allowed = ws->info.drm_minor >= 48;
 536     ws->info.has_bo_metadata = false;
 537
 538     ws->check_vm = strstr(debug_get_option("R600_DEBUG", ""), "check_vm") != NULL;
 539
 540     return true;
 541 }
 542
 543 static void radeon_winsys_destroy(struct radeon_winsys *rws)
 544 {
 545     struct radeon_drm_winsys *ws = (struct radeon_drm_winsys*)rws;
 546
 547     if (util_queue_is_initialized(&ws->cs_queue))
 548         util_queue_destroy(&ws->cs_queue);
 549
 550     mtx_destroy(&ws->hyperz_owner_mutex);
 551     mtx_destroy(&ws->cmask_owner_mutex);
 552
 553     if (ws->info.r600_has_virtual_memory)
 554         pb_slabs_deinit(&ws->bo_slabs);
 555     pb_cache_deinit(&ws->bo_cache);
 556
 557     if (ws->gen >= DRV_R600) {
 558         radeon_surface_manager_free(ws->surf_man);
 559     }
 560
 561     util_hash_table_destroy(ws->bo_names);
 562     util_hash_table_destroy(ws->bo_handles);
 563     util_hash_table_destroy(ws->bo_vas);
 564     mtx_destroy(&ws->bo_handles_mutex);
 565     mtx_destroy(&ws->vm32.mutex);
 566     mtx_destroy(&ws->vm64.mutex);
 567     mtx_destroy(&ws->bo_fence_lock);
 568
 569     if (ws->fd >= 0)
 570         close(ws->fd);
 571
 572     FREE(rws);
 573 }
 574
 575 static void radeon_query_info(struct radeon_winsys *rws,
 576                               struct radeon_info *info)
 577 {
 578     *info = ((struct radeon_drm_winsys *)rws)->info;
 579 }
 580
 581 static bool radeon_cs_request_feature(struct radeon_winsys_cs *rcs,
 582                                       enum radeon_feature_id fid,
 583                                       bool enable)
 584 {
 585     struct radeon_drm_cs *cs = radeon_drm_cs(rcs);
 586
 587     switch (fid) {
 588     case RADEON_FID_R300_HYPERZ_ACCESS:
 589         return radeon_set_fd_access(cs, &cs->ws->hyperz_owner,
 590                                     &cs->ws->hyperz_owner_mutex,
 591                                     RADEON_INFO_WANT_HYPERZ, "Hyper-Z",
 592                                     enable);
 593
 594     case RADEON_FID_R300_CMASK_ACCESS:
 595         return radeon_set_fd_access(cs, &cs->ws->cmask_owner,
 596                                     &cs->ws->cmask_owner_mutex,
 597                                     RADEON_INFO_WANT_CMASK, "AA optimizations",
 598                                     enable);
 599     }
 600     return false;
 601 }
 602
 603 static uint64_t radeon_query_value(struct radeon_winsys *rws,
 604                                    enum radeon_value_id value)
 605 {
 606     struct radeon_drm_winsys *ws = (struct radeon_drm_winsys*)rws;
 607     uint64_t retval = 0;
 608
 609     switch (value) {
 610     case RADEON_REQUESTED_VRAM_MEMORY:
 611         return ws->allocated_vram;
 612     case RADEON_REQUESTED_GTT_MEMORY:
 613         return ws->allocated_gtt;
 614     case RADEON_MAPPED_VRAM:
 615        return ws->mapped_vram;
 616     case RADEON_MAPPED_GTT:
 617        return ws->mapped_gtt;
 618     case RADEON_BUFFER_WAIT_TIME_NS:
 619         return ws->buffer_wait_time;
 620     case RADEON_NUM_MAPPED_BUFFERS:
 621         return ws->num_mapped_buffers;
 622     case RADEON_TIMESTAMP:
 623         if (ws->info.drm_minor < 20 || ws->gen < DRV_R600) {
 624             assert(0);
 625             return 0;
 626         }
 627
 628         radeon_get_drm_value(ws->fd, RADEON_INFO_TIMESTAMP, "timestamp",
 629                              (uint32_t*)&retval);
 630         return retval;
 631     case RADEON_NUM_GFX_IBS:
 632         return ws->num_gfx_IBs;
 633     case RADEON_NUM_SDMA_IBS:
 634         return ws->num_sdma_IBs;
 635     case RADEON_NUM_BYTES_MOVED:
 636         radeon_get_drm_value(ws->fd, RADEON_INFO_NUM_BYTES_MOVED,
 637                              "num-bytes-moved", (uint32_t*)&retval);
 638         return retval;
 639     case RADEON_NUM_EVICTIONS:
 640     case RADEON_NUM_VRAM_CPU_PAGE_FAULTS:
 641     case RADEON_VRAM_VIS_USAGE:
 642     case RADEON_GFX_BO_LIST_COUNTER:
 643     case RADEON_GFX_IB_SIZE_COUNTER:
 644         return 0; /* unimplemented */
 645     case RADEON_VRAM_USAGE:
 646         radeon_get_drm_value(ws->fd, RADEON_INFO_VRAM_USAGE,
 647                              "vram-usage", (uint32_t*)&retval);
 648         return retval;
 649     case RADEON_GTT_USAGE:
 650         radeon_get_drm_value(ws->fd, RADEON_INFO_GTT_USAGE,
 651                              "gtt-usage", (uint32_t*)&retval);
 652         return retval;
 653     case RADEON_GPU_TEMPERATURE:
 654         radeon_get_drm_value(ws->fd, RADEON_INFO_CURRENT_GPU_TEMP,
 655                              "gpu-temp", (uint32_t*)&retval);
 656         return retval;
 657     case RADEON_CURRENT_SCLK:
 658         radeon_get_drm_value(ws->fd, RADEON_INFO_CURRENT_GPU_SCLK,
 659                              "current-gpu-sclk", (uint32_t*)&retval);
 660         return retval;
 661     case RADEON_CURRENT_MCLK:
 662         radeon_get_drm_value(ws->fd, RADEON_INFO_CURRENT_GPU_MCLK,
 663                              "current-gpu-mclk", (uint32_t*)&retval);
 664         return retval;
 665     case RADEON_GPU_RESET_COUNTER:
 666         radeon_get_drm_value(ws->fd, RADEON_INFO_GPU_RESET_COUNTER,
 667                              "gpu-reset-counter", (uint32_t*)&retval);
 668         return retval;
 669     case RADEON_CS_THREAD_TIME:
 670         return util_queue_get_thread_time_nano(&ws->cs_queue, 0);
 671     }
 672     return 0;
 673 }
 674
 675 static bool radeon_read_registers(struct radeon_winsys *rws,
 676                                   unsigned reg_offset,
 677                                   unsigned num_registers, uint32_t *out)
 678 {
 679     struct radeon_drm_winsys *ws = (struct radeon_drm_winsys*)rws;
 680     unsigned i;
 681
 682     for (i = 0; i < num_registers; i++) {
 683         uint32_t reg = reg_offset + i*4;
 684
 685         if (!radeon_get_drm_value(ws->fd, RADEON_INFO_READ_REG, NULL, &reg))
 686             return false;
 687         out[i] = reg;
 688     }
 689     return true;
 690 }
 691
 692 static unsigned hash_fd(void *key)
 693 {
 694     int fd = pointer_to_intptr(key);
 695     struct stat stat;
 696     fstat(fd, &stat);
 697
 698     return stat.st_dev ^ stat.st_ino ^ stat.st_rdev;
 699 }
 700
 701 static int compare_fd(void *key1, void *key2)
 702 {
 703     int fd1 = pointer_to_intptr(key1);
 704     int fd2 = pointer_to_intptr(key2);
 705     struct stat stat1, stat2;
 706     fstat(fd1, &stat1);
 707     fstat(fd2, &stat2);
 708
 709     return stat1.st_dev != stat2.st_dev ||
 710            stat1.st_ino != stat2.st_ino ||
 711            stat1.st_rdev != stat2.st_rdev;
 712 }
 713
 714 DEBUG_GET_ONCE_BOOL_OPTION(thread, "RADEON_THREAD", true)
 715
 716 static bool radeon_winsys_unref(struct radeon_winsys *ws)
 717 {
 718     struct radeon_drm_winsys *rws = (struct radeon_drm_winsys*)ws;
 719     bool destroy;
 720
 721     /* When the reference counter drops to zero, remove the fd from the table.
 722      * This must happen while the mutex is locked, so that
 723      * radeon_drm_winsys_create in another thread doesn't get the winsys
 724      * from the table when the counter drops to 0. */
 725     mtx_lock(&fd_tab_mutex);
 726
 727     destroy = pipe_reference(&rws->reference, NULL);
 728     if (destroy && fd_tab) {
 729         util_hash_table_remove(fd_tab, intptr_to_pointer(rws->fd));
 730         if (util_hash_table_count(fd_tab) == 0) {
 731            util_hash_table_destroy(fd_tab);
 732            fd_tab = NULL;
 733         }
 734     }
 735
 736     mtx_unlock(&fd_tab_mutex);
 737     return destroy;
 738 }
 739
 740 #define PTR_TO_UINT(x) ((unsigned)((intptr_t)(x)))
 741
 742 static unsigned handle_hash(void *key)
 743 {
 744     return PTR_TO_UINT(key);
 745 }
 746
 747 static int handle_compare(void *key1, void *key2)
 748 {
 749     return PTR_TO_UINT(key1) != PTR_TO_UINT(key2);
 750 }
 751
 752 PUBLIC struct radeon_winsys *
 753 radeon_drm_winsys_create(int fd, const struct pipe_screen_config *config,
 754                          radeon_screen_create_t screen_create)
 755 {
 756     struct radeon_drm_winsys *ws;
 757
 758     mtx_lock(&fd_tab_mutex);
 759     if (!fd_tab) {
 760         fd_tab = util_hash_table_create(hash_fd, compare_fd);
 761     }
 762
 763     ws = util_hash_table_get(fd_tab, intptr_to_pointer(fd));
 764     if (ws) {
 765         pipe_reference(NULL, &ws->reference);
 766         mtx_unlock(&fd_tab_mutex);
 767         return &ws->base;
 768     }
 769
 770     ws = CALLOC_STRUCT(radeon_drm_winsys);
 771     if (!ws) {
 772         mtx_unlock(&fd_tab_mutex);
 773         return NULL;
 774     }
 775
 776     ws->fd = fcntl(fd, F_DUPFD_CLOEXEC, 3);
 777
 778     if (!do_winsys_init(ws))
 779         goto fail1;
 780
 781     pb_cache_init(&ws->bo_cache, RADEON_MAX_CACHED_HEAPS,
 782                   500000, ws->check_vm ? 1.0f : 2.0f, 0,
 783                   MIN2(ws->info.vram_size, ws->info.gart_size),
 784                   radeon_bo_destroy,
 785                   radeon_bo_can_reclaim);
 786
 787     if (ws->info.r600_has_virtual_memory) {
 788         /* There is no fundamental obstacle to using slab buffer allocation
 789          * without GPUVM, but enabling it requires making sure that the drivers
 790          * honor the address offset.
 791          */
 792         if (!pb_slabs_init(&ws->bo_slabs,
 793                            RADEON_SLAB_MIN_SIZE_LOG2, RADEON_SLAB_MAX_SIZE_LOG2,
 794                            RADEON_MAX_SLAB_HEAPS,
 795                            ws,
 796                            radeon_bo_can_reclaim_slab,
 797                            radeon_bo_slab_alloc,
 798                            radeon_bo_slab_free))
 799             goto fail_cache;
 800
 801         ws->info.min_alloc_size = 1 << RADEON_SLAB_MIN_SIZE_LOG2;
 802     } else {
 803         ws->info.min_alloc_size = ws->info.gart_page_size;
 804     }
 805
 806     if (ws->gen >= DRV_R600) {
 807         ws->surf_man = radeon_surface_manager_new(ws->fd);
 808         if (!ws->surf_man)
 809             goto fail_slab;
 810     }
 811
 812     /* init reference */
 813     pipe_reference_init(&ws->reference, 1);
 814
 815     /* Set functions. */
 816     ws->base.unref = radeon_winsys_unref;
 817     ws->base.destroy = radeon_winsys_destroy;
 818     ws->base.query_info = radeon_query_info;
 819     ws->base.cs_request_feature = radeon_cs_request_feature;
 820     ws->base.query_value = radeon_query_value;
 821     ws->base.read_registers = radeon_read_registers;
 822
 823     radeon_drm_bo_init_functions(ws);
 824     radeon_drm_cs_init_functions(ws);
 825     radeon_surface_init_functions(ws);
 826
 827     (void) mtx_init(&ws->hyperz_owner_mutex, mtx_plain);
 828     (void) mtx_init(&ws->cmask_owner_mutex, mtx_plain);
 829
 830     ws->bo_names = util_hash_table_create(handle_hash, handle_compare);
 831     ws->bo_handles = util_hash_table_create(handle_hash, handle_compare);
 832     ws->bo_vas = util_hash_table_create(handle_hash, handle_compare);
 833     (void) mtx_init(&ws->bo_handles_mutex, mtx_plain);
 834     (void) mtx_init(&ws->vm32.mutex, mtx_plain);
 835     (void) mtx_init(&ws->vm64.mutex, mtx_plain);
 836     (void) mtx_init(&ws->bo_fence_lock, mtx_plain);
 837     list_inithead(&ws->vm32.holes);
 838     list_inithead(&ws->vm64.holes);
 839
 840     /* The kernel currently returns 8MB. Make sure this doesn't change. */
 841     if (ws->va_start > 8 * 1024 * 1024) {
 842         /* Not enough 32-bit address space. */
 843         radeon_winsys_destroy(&ws->base);
 844         mtx_unlock(&fd_tab_mutex);
 845         return NULL;
 846     }
 847
 848     ws->vm32.start = ws->va_start;
 849     ws->vm32.end = 1ull << 32;
 850
 851     /* The maximum is 8GB of virtual address space limited by the kernel.
 852      * It's obviously not enough for bigger cards, like Hawaiis with 4GB
 853      * and 8GB of physical memory and 4GB of GART.
 854      *
 855      * Older kernels set the limit to 4GB, which is even worse, so they only
 856      * have 32-bit address space.
 857      */
 858     if (ws->info.drm_minor >= 41) {
 859         ws->vm64.start = 1ull << 32;
 860         ws->vm64.end = 1ull << 33;
 861     }
 862
 863     /* TTM aligns the BO size to the CPU page size */
 864     ws->info.gart_page_size = sysconf(_SC_PAGESIZE);
 865
 866     if (ws->num_cpus > 1 && debug_get_option_thread())
 867         util_queue_init(&ws->cs_queue, "radeon_cs", 8, 1, 0);
 868
 869     /* Create the screen at the end. The winsys must be initialized
 870      * completely.
 871      *
 872      * Alternatively, we could create the screen based on "ws->gen"
 873      * and link all drivers into one binary blob. */
 874     ws->base.screen = screen_create(&ws->base, config);
 875     if (!ws->base.screen) {
 876         radeon_winsys_destroy(&ws->base);
 877         mtx_unlock(&fd_tab_mutex);
 878         return NULL;
 879     }
 880
 881     util_hash_table_set(fd_tab, intptr_to_pointer(ws->fd), ws);
 882
 883     /* We must unlock the mutex once the winsys is fully initialized, so that
 884      * other threads attempting to create the winsys from the same fd will
 885      * get a fully initialized winsys and not just half-way initialized. */
 886     mtx_unlock(&fd_tab_mutex);
 887
 888     return &ws->base;
 889
 890 fail_slab:
 891     if (ws->info.r600_has_virtual_memory)
 892         pb_slabs_deinit(&ws->bo_slabs);
 893 fail_cache:
 894     pb_cache_deinit(&ws->bo_cache);
 895 fail1:
 896     mtx_unlock(&fd_tab_mutex);
 897     if (ws->surf_man)
 898         radeon_surface_manager_free(ws->surf_man);
 899     if (ws->fd >= 0)
 900         close(ws->fd);
 901
 902     FREE(ws);
 903     return NULL;
 904 }