src/gallium/drivers/r300/r300_texture.c

   1 /*
   2  * Copyright 2008 Corbin Simpson <MostAwesomeDude@gmail.com>
   3  * Copyright 2010 Marek Olšák <maraeo@gmail.com>
   4  *
   5  * Permission is hereby granted, free of charge, to any person obtaining a
   6  * copy of this software and associated documentation files (the "Software"),
   7  * to deal in the Software without restriction, including without limitation
   8  * on the rights to use, copy, modify, merge, publish, distribute, sub
   9  * license, and/or sell copies of the Software, and to permit persons to whom
  10  * the Software is furnished to do so, subject to the following conditions:
  11  *
  12  * The above copyright notice and this permission notice (including the next
  13  * paragraph) shall be included in all copies or substantial portions of the
  14  * Software.
  15  *
  16  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  17  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  18  * FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT. IN NO EVENT SHALL
  19  * THE AUTHOR(S) AND/OR THEIR SUPPLIERS BE LIABLE FOR ANY CLAIM,
  20  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
  21  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE
  22  * USE OR OTHER DEALINGS IN THE SOFTWARE. */
  23
  24 #include "pipe/p_screen.h"
  25
  26 #include "util/u_format.h"
  27 #include "util/u_math.h"
  28 #include "util/u_memory.h"
  29
  30 #include "r300_context.h"
  31 #include "r300_texture.h"
  32 #include "r300_screen.h"
  33 #include "r300_state_inlines.h"
  34 #include "r300_winsys.h"
  35
  36 #define TILE_WIDTH 0
  37 #define TILE_HEIGHT 1
  38
  39 static const unsigned microblock_table[5][3][2] = {
  40     /*linear  tiled   square-tiled */
  41     {{32, 1}, {8, 4}, {0, 0}}, /*   8 bits per pixel */
  42     {{16, 1}, {8, 2}, {4, 4}}, /*  16 bits per pixel */
  43     {{ 8, 1}, {4, 2}, {0, 0}}, /*  32 bits per pixel */
  44     {{ 4, 1}, {0, 0}, {2, 2}}, /*  64 bits per pixel */
  45     {{ 2, 1}, {0, 0}, {0, 0}}  /* 128 bits per pixel */
  46 };
  47
  48 /* Return true for non-compressed and non-YUV formats. */
  49 static boolean r300_format_is_plain(enum pipe_format format)
  50 {
  51     const struct util_format_description *desc = util_format_description(format);
  52
  53     if (!format) {
  54         return FALSE;
  55     }
  56
  57     return desc->layout == UTIL_FORMAT_LAYOUT_PLAIN;
  58 }
  59
  60 /* Translate a pipe_format into a useful texture format for sampling.
  61  *
  62  * Some special formats are translated directly using R300_EASY_TX_FORMAT,
  63  * but the majority of them is translated in a generic way, automatically
  64  * supporting all the formats hw can support.
  65  *
  66  * R300_EASY_TX_FORMAT swizzles the texture.
  67  * Note the signature of R300_EASY_TX_FORMAT:
  68  *   R300_EASY_TX_FORMAT(B, G, R, A, FORMAT);
  69  *
  70  * The FORMAT specifies how the texture sampler will treat the texture, and
  71  * makes available X, Y, Z, W, ZERO, and ONE for swizzling. */
  72 static uint32_t r300_translate_texformat(enum pipe_format format)
  73 {
  74     uint32_t result = 0;
  75     const struct util_format_description *desc;
  76     unsigned components = 0, i;
  77     boolean uniform = TRUE;
  78     const uint32_t swizzle_shift[4] = {
  79         R300_TX_FORMAT_R_SHIFT,
  80         R300_TX_FORMAT_G_SHIFT,
  81         R300_TX_FORMAT_B_SHIFT,
  82         R300_TX_FORMAT_A_SHIFT
  83     };
  84     const uint32_t swizzle[4] = {
  85         R300_TX_FORMAT_X,
  86         R300_TX_FORMAT_Y,
  87         R300_TX_FORMAT_Z,
  88         R300_TX_FORMAT_W
  89     };
  90     const uint32_t sign_bit[4] = {
  91         R300_TX_FORMAT_SIGNED_X,
  92         R300_TX_FORMAT_SIGNED_Y,
  93         R300_TX_FORMAT_SIGNED_Z,
  94         R300_TX_FORMAT_SIGNED_W,
  95     };
  96
  97     desc = util_format_description(format);
  98
  99     /* Colorspace (return non-RGB formats directly). */
 100     switch (desc->colorspace) {
 101         /* Depth stencil formats. */
 102         case UTIL_FORMAT_COLORSPACE_ZS:
 103             switch (format) {
 104                 case PIPE_FORMAT_Z16_UNORM:
 105                     return R300_EASY_TX_FORMAT(X, X, X, X, X16);
 106                 case PIPE_FORMAT_X8Z24_UNORM:
 107                 case PIPE_FORMAT_S8Z24_UNORM:
 108                     return R300_EASY_TX_FORMAT(X, X, X, X, W24_FP);
 109                 default:
 110                     return ~0; /* Unsupported. */
 111             }
 112
 113         /* YUV formats. */
 114         case UTIL_FORMAT_COLORSPACE_YUV:
 115             result |= R300_TX_FORMAT_YUV_TO_RGB;
 116
 117             switch (format) {
 118                 case PIPE_FORMAT_UYVY:
 119                     return R300_EASY_TX_FORMAT(X, Y, Z, ONE, YVYU422) | result;
 120                 case PIPE_FORMAT_YUYV:
 121                     return R300_EASY_TX_FORMAT(X, Y, Z, ONE, VYUY422) | result;
 122                 default:
 123                     return ~0; /* Unsupported/unknown. */
 124             }
 125
 126         /* Add gamma correction. */
 127         case UTIL_FORMAT_COLORSPACE_SRGB:
 128             result |= R300_TX_FORMAT_GAMMA;
 129             break;
 130
 131         default:;
 132     }
 133
 134     /* Add swizzle. */
 135     for (i = 0; i < 4; i++) {
 136         switch (desc->swizzle[i]) {
 137             case UTIL_FORMAT_SWIZZLE_X:
 138             case UTIL_FORMAT_SWIZZLE_NONE:
 139                 result |= swizzle[0] << swizzle_shift[i];
 140                 break;
 141             case UTIL_FORMAT_SWIZZLE_Y:
 142                 result |= swizzle[1] << swizzle_shift[i];
 143                 break;
 144             case UTIL_FORMAT_SWIZZLE_Z:
 145                 result |= swizzle[2] << swizzle_shift[i];
 146                 break;
 147             case UTIL_FORMAT_SWIZZLE_W:
 148                 result |= swizzle[3] << swizzle_shift[i];
 149                 break;
 150             case UTIL_FORMAT_SWIZZLE_0:
 151                 result |= R300_TX_FORMAT_ZERO << swizzle_shift[i];
 152                 break;
 153             case UTIL_FORMAT_SWIZZLE_1:
 154                 result |= R300_TX_FORMAT_ONE << swizzle_shift[i];
 155                 break;
 156             default:
 157                 return ~0; /* Unsupported. */
 158         }
 159     }
 160
 161     /* Compressed formats. */
 162     if (desc->layout == UTIL_FORMAT_LAYOUT_COMPRESSED) {
 163         switch (format) {
 164             case PIPE_FORMAT_DXT1_RGB:
 165             case PIPE_FORMAT_DXT1_RGBA:
 166             case PIPE_FORMAT_DXT1_SRGB:
 167             case PIPE_FORMAT_DXT1_SRGBA:
 168                 return R300_TX_FORMAT_DXT1 | result;
 169             case PIPE_FORMAT_DXT3_RGBA:
 170             case PIPE_FORMAT_DXT3_SRGBA:
 171                 return R300_TX_FORMAT_DXT3 | result;
 172             case PIPE_FORMAT_DXT5_RGBA:
 173             case PIPE_FORMAT_DXT5_SRGBA:
 174                 return R300_TX_FORMAT_DXT5 | result;
 175             default:
 176                 return ~0; /* Unsupported/unknown. */
 177         }
 178     }
 179
 180     /* Get the number of components. */
 181     for (i = 0; i < 4; i++) {
 182         if (desc->channel[i].type != UTIL_FORMAT_TYPE_VOID) {
 183             ++components;
 184         }
 185     }
 186
 187     /* Add sign. */
 188     for (i = 0; i < components; i++) {
 189         if (desc->channel[i].type == UTIL_FORMAT_TYPE_SIGNED) {
 190             result |= sign_bit[i];
 191         }
 192     }
 193
 194     /* See whether the components are of the same size. */
 195     for (i = 1; i < components; i++) {
 196         uniform = uniform && desc->channel[0].size == desc->channel[i].size;
 197     }
 198
 199     /* Non-uniform formats. */
 200     if (!uniform) {
 201         switch (components) {
 202             case 3:
 203                 if (desc->channel[0].size == 5 &&
 204                     desc->channel[1].size == 6 &&
 205                     desc->channel[2].size == 5) {
 206                     return R300_TX_FORMAT_Z5Y6X5 | result;
 207                 }
 208                 if (desc->channel[0].size == 5 &&
 209                     desc->channel[1].size == 5 &&
 210                     desc->channel[2].size == 6) {
 211                     return R300_TX_FORMAT_Z6Y5X5 | result;
 212                 }
 213                 return ~0; /* Unsupported/unknown. */
 214
 215             case 4:
 216                 if (desc->channel[0].size == 5 &&
 217                     desc->channel[1].size == 5 &&
 218                     desc->channel[2].size == 5 &&
 219                     desc->channel[3].size == 1) {
 220                     return R300_TX_FORMAT_W1Z5Y5X5 | result;
 221                 }
 222                 if (desc->channel[0].size == 10 &&
 223                     desc->channel[1].size == 10 &&
 224                     desc->channel[2].size == 10 &&
 225                     desc->channel[3].size == 2) {
 226                     return R300_TX_FORMAT_W2Z10Y10X10 | result;
 227                 }
 228         }
 229         return ~0; /* Unsupported/unknown. */
 230     }
 231
 232     /* And finally, uniform formats. */
 233     switch (desc->channel[0].type) {
 234         case UTIL_FORMAT_TYPE_UNSIGNED:
 235         case UTIL_FORMAT_TYPE_SIGNED:
 236             if (!desc->channel[0].normalized &&
 237                 desc->colorspace != UTIL_FORMAT_COLORSPACE_SRGB) {
 238                 return ~0;
 239             }
 240
 241             switch (desc->channel[0].size) {
 242                 case 4:
 243                     switch (components) {
 244                         case 2:
 245                             return R300_TX_FORMAT_Y4X4 | result;
 246                         case 4:
 247                             return R300_TX_FORMAT_W4Z4Y4X4 | result;
 248                     }
 249                     return ~0;
 250
 251                 case 8:
 252                     switch (components) {
 253                         case 1:
 254                             return R300_TX_FORMAT_X8 | result;
 255                         case 2:
 256                             return R300_TX_FORMAT_Y8X8 | result;
 257                         case 4:
 258                             return R300_TX_FORMAT_W8Z8Y8X8 | result;
 259                     }
 260                     return ~0;
 261
 262                 case 16:
 263                     switch (components) {
 264                         case 1:
 265                             return R300_TX_FORMAT_X16 | result;
 266                         case 2:
 267                             return R300_TX_FORMAT_Y16X16 | result;
 268                         case 4:
 269                             return R300_TX_FORMAT_W16Z16Y16X16 | result;
 270                     }
 271             }
 272             return ~0;
 273
 274 /* XXX Enable float textures here. */
 275 #if 0
 276         case UTIL_FORMAT_TYPE_FLOAT:
 277             switch (desc->channel[0].size) {
 278                 case 16:
 279                     switch (components) {
 280                         case 1:
 281                             return R300_TX_FORMAT_16F | result;
 282                         case 2:
 283                             return R300_TX_FORMAT_16F_16F | result;
 284                         case 4:
 285                             return R300_TX_FORMAT_16F_16F_16F_16F | result;
 286                     }
 287                     return ~0;
 288
 289                 case 32:
 290                     switch (components) {
 291                         case 1:
 292                             return R300_TX_FORMAT_32F | result;
 293                         case 2:
 294                             return R300_TX_FORMAT_32F_32F | result;
 295                         case 4:
 296                             return R300_TX_FORMAT_32F_32F_32F_32F | result;
 297                     }
 298             }
 299 #endif
 300     }
 301
 302     return ~0; /* Unsupported/unknown. */
 303 }
 304
 305 /* Buffer formats. */
 306
 307 /* Colorbuffer formats. This is the unswizzled format of the RB3D block's
 308  * output. For the swizzling of the targets, check the shader's format. */
 309 static uint32_t r300_translate_colorformat(enum pipe_format format)
 310 {
 311     switch (format) {
 312         /* 8-bit buffers. */
 313         case PIPE_FORMAT_A8_UNORM:
 314         case PIPE_FORMAT_I8_UNORM:
 315         case PIPE_FORMAT_L8_UNORM:
 316         case PIPE_FORMAT_R8_UNORM:
 317         case PIPE_FORMAT_R8_SNORM:
 318             return R300_COLOR_FORMAT_I8;
 319
 320         /* 16-bit buffers. */
 321         case PIPE_FORMAT_B5G6R5_UNORM:
 322             return R300_COLOR_FORMAT_RGB565;
 323         case PIPE_FORMAT_B5G5R5A1_UNORM:
 324         case PIPE_FORMAT_B5G5R5X1_UNORM:
 325             return R300_COLOR_FORMAT_ARGB1555;
 326         case PIPE_FORMAT_B4G4R4A4_UNORM:
 327             return R300_COLOR_FORMAT_ARGB4444;
 328
 329         /* 32-bit buffers. */
 330         case PIPE_FORMAT_B8G8R8A8_UNORM:
 331         case PIPE_FORMAT_B8G8R8X8_UNORM:
 332         case PIPE_FORMAT_A8R8G8B8_UNORM:
 333         case PIPE_FORMAT_X8R8G8B8_UNORM:
 334         case PIPE_FORMAT_A8B8G8R8_UNORM:
 335         case PIPE_FORMAT_R8G8B8A8_SNORM:
 336         case PIPE_FORMAT_X8B8G8R8_UNORM:
 337         case PIPE_FORMAT_R8SG8SB8UX8U_NORM:
 338             return R300_COLOR_FORMAT_ARGB8888;
 339         case PIPE_FORMAT_R10G10B10A2_UNORM:
 340             return R500_COLOR_FORMAT_ARGB2101010;  /* R5xx-only? */
 341
 342         /* 64-bit buffers. */
 343         case PIPE_FORMAT_R16G16B16A16_UNORM:
 344         case PIPE_FORMAT_R16G16B16A16_SNORM:
 345         //case PIPE_FORMAT_R16G16B16A16_FLOAT: /* not in pipe_format */
 346             return R300_COLOR_FORMAT_ARGB16161616;
 347
 348 /* XXX Enable float textures here. */
 349 #if 0
 350         /* 128-bit buffers. */
 351         case PIPE_FORMAT_R32G32B32A32_FLOAT:
 352             return R300_COLOR_FORMAT_ARGB32323232;
 353 #endif
 354
 355         /* YUV buffers. */
 356         case PIPE_FORMAT_UYVY:
 357             return R300_COLOR_FORMAT_YVYU;
 358         case PIPE_FORMAT_YUYV:
 359             return R300_COLOR_FORMAT_VYUY;
 360         default:
 361             return ~0; /* Unsupported. */
 362     }
 363 }
 364
 365 /* Depthbuffer and stencilbuffer. Thankfully, we only support two flavors. */
 366 static uint32_t r300_translate_zsformat(enum pipe_format format)
 367 {
 368     switch (format) {
 369         /* 16-bit depth, no stencil */
 370         case PIPE_FORMAT_Z16_UNORM:
 371             return R300_DEPTHFORMAT_16BIT_INT_Z;
 372         /* 24-bit depth, ignored stencil */
 373         case PIPE_FORMAT_X8Z24_UNORM:
 374         /* 24-bit depth, 8-bit stencil */
 375         case PIPE_FORMAT_S8Z24_UNORM:
 376             return R300_DEPTHFORMAT_24BIT_INT_Z_8BIT_STENCIL;
 377         default:
 378             return ~0; /* Unsupported. */
 379     }
 380 }
 381
 382 /* Shader output formats. This is essentially the swizzle from the shader
 383  * to the RB3D block.
 384  *
 385  * Note that formats are stored from C3 to C0. */
 386 static uint32_t r300_translate_out_fmt(enum pipe_format format)
 387 {
 388     uint32_t modifier = 0;
 389     unsigned i;
 390     const struct util_format_description *desc;
 391     static const uint32_t sign_bit[4] = {
 392         R300_OUT_SIGN(0x1),
 393         R300_OUT_SIGN(0x2),
 394         R300_OUT_SIGN(0x4),
 395         R300_OUT_SIGN(0x8),
 396     };
 397
 398     desc = util_format_description(format);
 399
 400     /* Specifies how the shader output is written to the fog unit. */
 401     if (desc->channel[0].type == UTIL_FORMAT_TYPE_FLOAT) {
 402         if (desc->channel[0].size == 32) {
 403             modifier |= R300_US_OUT_FMT_C4_32_FP;
 404         } else {
 405             modifier |= R300_US_OUT_FMT_C4_16_FP;
 406         }
 407     } else {
 408         if (desc->channel[0].size == 16) {
 409             modifier |= R300_US_OUT_FMT_C4_16;
 410         } else {
 411             /* C4_8 seems to be used for the formats whose pixel size
 412              * is <= 32 bits. */
 413             modifier |= R300_US_OUT_FMT_C4_8;
 414         }
 415     }
 416
 417     /* Add sign. */
 418     for (i = 0; i < 4; i++)
 419         if (desc->channel[i].type == UTIL_FORMAT_TYPE_SIGNED) {
 420             modifier |= sign_bit[i];
 421         }
 422
 423     /* Add swizzles and return. */
 424     switch (format) {
 425         /* 8-bit outputs.
 426          * COLORFORMAT_I8 stores the C2 component. */
 427         case PIPE_FORMAT_A8_UNORM:
 428             return modifier | R300_C2_SEL_A;
 429         case PIPE_FORMAT_I8_UNORM:
 430         case PIPE_FORMAT_L8_UNORM:
 431         case PIPE_FORMAT_R8_UNORM:
 432         case PIPE_FORMAT_R8_SNORM:
 433             return modifier | R300_C2_SEL_R;
 434
 435         /* BGRA outputs. */
 436         case PIPE_FORMAT_B5G6R5_UNORM:
 437         case PIPE_FORMAT_B5G5R5A1_UNORM:
 438         case PIPE_FORMAT_B5G5R5X1_UNORM:
 439         case PIPE_FORMAT_B4G4R4A4_UNORM:
 440         case PIPE_FORMAT_B8G8R8A8_UNORM:
 441         case PIPE_FORMAT_B8G8R8X8_UNORM:
 442             return modifier |
 443                 R300_C0_SEL_B | R300_C1_SEL_G |
 444                 R300_C2_SEL_R | R300_C3_SEL_A;
 445
 446         /* ARGB outputs. */
 447         case PIPE_FORMAT_A8R8G8B8_UNORM:
 448         case PIPE_FORMAT_X8R8G8B8_UNORM:
 449             return modifier |
 450                 R300_C0_SEL_A | R300_C1_SEL_R |
 451                 R300_C2_SEL_G | R300_C3_SEL_B;
 452
 453         /* ABGR outputs. */
 454         case PIPE_FORMAT_A8B8G8R8_UNORM:
 455         case PIPE_FORMAT_X8B8G8R8_UNORM:
 456             return modifier |
 457                 R300_C0_SEL_A | R300_C1_SEL_B |
 458                 R300_C2_SEL_G | R300_C3_SEL_R;
 459
 460         /* RGBA outputs. */
 461         case PIPE_FORMAT_R8G8B8A8_SNORM:
 462         case PIPE_FORMAT_R8SG8SB8UX8U_NORM:
 463         case PIPE_FORMAT_R10G10B10A2_UNORM:
 464         case PIPE_FORMAT_R16G16B16A16_UNORM:
 465         case PIPE_FORMAT_R16G16B16A16_SNORM:
 466         //case PIPE_FORMAT_R16G16B16A16_FLOAT: /* not in pipe_format */
 467         case PIPE_FORMAT_R32G32B32A32_FLOAT:
 468             return modifier |
 469                 R300_C0_SEL_R | R300_C1_SEL_G |
 470                 R300_C2_SEL_B | R300_C3_SEL_A;
 471
 472         default:
 473             return ~0; /* Unsupported. */
 474     }
 475 }
 476
 477 boolean r300_is_colorbuffer_format_supported(enum pipe_format format)
 478 {
 479     return r300_translate_colorformat(format) != ~0 &&
 480            r300_translate_out_fmt(format) != ~0;
 481 }
 482
 483 boolean r300_is_zs_format_supported(enum pipe_format format)
 484 {
 485     return r300_translate_zsformat(format) != ~0;
 486 }
 487
 488 boolean r300_is_sampler_format_supported(enum pipe_format format)
 489 {
 490     return r300_translate_texformat(format) != ~0;
 491 }
 492
 493 static void r300_setup_texture_state(struct r300_screen* screen, struct r300_texture* tex)
 494 {
 495     struct r300_texture_format_state* state = &tex->state;
 496     struct pipe_texture *pt = &tex->tex;
 497     unsigned i;
 498     boolean is_r500 = screen->caps->is_r500;
 499
 500     /* Set sampler state. */
 501     state->format0 = R300_TX_WIDTH((pt->width0 - 1) & 0x7ff) |
 502                      R300_TX_HEIGHT((pt->height0 - 1) & 0x7ff);
 503
 504     if (tex->is_npot) {
 505         /* rectangles love this */
 506         state->format0 |= R300_TX_PITCH_EN;
 507         state->format2 = (tex->pitch[0] - 1) & 0x1fff;
 508     } else {
 509         /* power of two textures (3D, mipmaps, and no pitch) */
 510         state->format0 |= R300_TX_DEPTH(util_logbase2(pt->depth0) & 0xf);
 511     }
 512
 513     state->format1 = r300_translate_texformat(pt->format);
 514     if (pt->target == PIPE_TEXTURE_CUBE) {
 515         state->format1 |= R300_TX_FORMAT_CUBIC_MAP;
 516     }
 517     if (pt->target == PIPE_TEXTURE_3D) {
 518         state->format1 |= R300_TX_FORMAT_3D;
 519     }
 520
 521     /* large textures on r500 */
 522     if (is_r500)
 523     {
 524         if (pt->width0 > 2048) {
 525             state->format2 |= R500_TXWIDTH_BIT11;
 526         }
 527         if (pt->height0 > 2048) {
 528             state->format2 |= R500_TXHEIGHT_BIT11;
 529         }
 530     }
 531
 532     SCREEN_DBG(screen, DBG_TEX, "r300: Set texture state (%dx%d, %d levels)\n",
 533                pt->width0, pt->height0, pt->last_level);
 534
 535     /* Set framebuffer state. */
 536     if (util_format_is_depth_or_stencil(tex->tex.format)) {
 537         for (i = 0; i <= tex->tex.last_level; i++) {
 538             tex->fb_state.depthpitch[i] =
 539                 tex->pitch[i] |
 540                 R300_DEPTHMACROTILE(tex->mip_macrotile[i]) |
 541                 R300_DEPTHMICROTILE(tex->microtile);
 542         }
 543         tex->fb_state.zb_format = r300_translate_zsformat(tex->tex.format);
 544     } else {
 545         for (i = 0; i <= tex->tex.last_level; i++) {
 546             tex->fb_state.colorpitch[i] =
 547                 tex->pitch[i] |
 548                 r300_translate_colorformat(tex->tex.format) |
 549                 R300_COLOR_TILE(tex->mip_macrotile[i]) |
 550                 R300_COLOR_MICROTILE(tex->microtile);
 551         }
 552         tex->fb_state.us_out_fmt = r300_translate_out_fmt(tex->tex.format);
 553     }
 554 }
 555
 556 void r300_texture_reinterpret_format(struct pipe_screen *screen,
 557                                      struct pipe_texture *tex,
 558                                      enum pipe_format new_format)
 559 {
 560     struct r300_screen *r300screen = r300_screen(screen);
 561
 562     SCREEN_DBG(r300screen, DBG_TEX, "r300: Reinterpreting format: %s -> %s\n",
 563                util_format_name(tex->format), util_format_name(new_format));
 564
 565     tex->format = new_format;
 566
 567     r300_setup_texture_state(r300_screen(screen), (struct r300_texture*)tex);
 568 }
 569
 570 unsigned r300_texture_get_offset(struct r300_texture* tex, unsigned level,
 571                                  unsigned zslice, unsigned face)
 572 {
 573     unsigned offset = tex->offset[level];
 574
 575     switch (tex->tex.target) {
 576         case PIPE_TEXTURE_3D:
 577             assert(face == 0);
 578             return offset + zslice * tex->layer_size[level];
 579
 580         case PIPE_TEXTURE_CUBE:
 581             assert(zslice == 0);
 582             return offset + face * tex->layer_size[level];
 583
 584         default:
 585             assert(zslice == 0 && face == 0);
 586             return offset;
 587     }
 588 }
 589
 590 /**
 591  * Return the width (dim==TILE_WIDTH) or height (dim==TILE_HEIGHT) of one tile
 592  * of the given texture.
 593  */
 594 static unsigned r300_texture_get_tile_size(struct r300_texture* tex,
 595                                            int dim, boolean macrotile)
 596 {
 597     unsigned pixsize, tile_size;
 598
 599     pixsize = util_format_get_blocksize(tex->tex.format);
 600     tile_size = microblock_table[util_logbase2(pixsize)][tex->microtile][dim];
 601
 602     if (macrotile) {
 603         tile_size *= 8;
 604     }
 605
 606     assert(tile_size);
 607     return tile_size;
 608 }
 609
 610 /* Return true if macrotiling should be enabled on the miplevel. */
 611 static boolean r300_texture_macro_switch(struct r300_texture *tex,
 612                                          unsigned level,
 613                                          boolean rv350_mode,
 614                                          int dim)
 615 {
 616     unsigned tile, texdim;
 617
 618     tile = r300_texture_get_tile_size(tex, dim, TRUE);
 619     if (dim == TILE_WIDTH) {
 620         texdim = u_minify(tex->tex.width0, level);
 621     } else {
 622         texdim = u_minify(tex->tex.height0, level);
 623     }
 624
 625     /* See TX_FILTER1_n.MACRO_SWITCH. */
 626     if (rv350_mode) {
 627         return texdim >= tile;
 628     } else {
 629         return texdim > tile;
 630     }
 631 }
 632
 633 /**
 634  * Return the stride, in bytes, of the texture images of the given texture
 635  * at the given level.
 636  */
 637 unsigned r300_texture_get_stride(struct r300_screen* screen,
 638                                  struct r300_texture* tex, unsigned level)
 639 {
 640     unsigned tile_width, width;
 641
 642     if (tex->stride_override)
 643         return tex->stride_override;
 644
 645     /* Check the level. */
 646     if (level > tex->tex.last_level) {
 647         SCREEN_DBG(screen, DBG_TEX, "%s: level (%u) > last_level (%u)\n",
 648                    __FUNCTION__, level, tex->tex.last_level);
 649         return 0;
 650     }
 651
 652     width = u_minify(tex->tex.width0, level);
 653
 654     if (r300_format_is_plain(tex->tex.format)) {
 655         tile_width = r300_texture_get_tile_size(tex, TILE_WIDTH,
 656                                                 tex->mip_macrotile[level]);
 657         width = align(width, tile_width);
 658
 659         return util_format_get_stride(tex->tex.format, width);
 660     } else {
 661         return align(util_format_get_stride(tex->tex.format, width), 32);
 662     }
 663 }
 664
 665 static unsigned r300_texture_get_nblocksy(struct r300_texture* tex,
 666                                           unsigned level)
 667 {
 668     unsigned height, tile_height;
 669
 670     height = u_minify(tex->tex.height0, level);
 671
 672     if (r300_format_is_plain(tex->tex.format)) {
 673         tile_height = r300_texture_get_tile_size(tex, TILE_HEIGHT,
 674                                                  tex->mip_macrotile[level]);
 675         height = align(height, tile_height);
 676     }
 677
 678     return util_format_get_nblocksy(tex->tex.format, height);
 679 }
 680
 681 static void r300_setup_miptree(struct r300_screen* screen,
 682                                struct r300_texture* tex)
 683 {
 684     struct pipe_texture* base = &tex->tex;
 685     unsigned stride, size, layer_size, nblocksy, i;
 686     boolean rv350_mode = screen->caps->family >= CHIP_FAMILY_RV350;
 687
 688     SCREEN_DBG(screen, DBG_TEX, "r300: Making miptree for texture, format %s\n",
 689                util_format_name(base->format));
 690
 691     for (i = 0; i <= base->last_level; i++) {
 692         /* Let's see if this miplevel can be macrotiled. */
 693         tex->mip_macrotile[i] =
 694             (tex->macrotile == R300_BUFFER_TILED &&
 695              r300_texture_macro_switch(tex, i, rv350_mode, TILE_WIDTH)) ?
 696              R300_BUFFER_TILED : R300_BUFFER_LINEAR;
 697
 698         stride = r300_texture_get_stride(screen, tex, i);
 699         nblocksy = r300_texture_get_nblocksy(tex, i);
 700         layer_size = stride * nblocksy;
 701
 702         if (base->target == PIPE_TEXTURE_CUBE)
 703             size = layer_size * 6;
 704         else
 705             size = layer_size * u_minify(base->depth0, i);
 706
 707         tex->offset[i] = tex->size;
 708         tex->size = tex->offset[i] + size;
 709         tex->layer_size[i] = layer_size;
 710         tex->pitch[i] = stride / util_format_get_blocksize(base->format);
 711
 712         SCREEN_DBG(screen, DBG_TEX, "r300: Texture miptree: Level %d "
 713                 "(%dx%dx%d px, pitch %d bytes) %d bytes total, macrotiled %s\n",
 714                 i, u_minify(base->width0, i), u_minify(base->height0, i),
 715                 u_minify(base->depth0, i), stride, tex->size,
 716                 tex->mip_macrotile[i] ? "TRUE" : "FALSE");
 717     }
 718 }
 719
 720 static void r300_setup_flags(struct r300_texture* tex)
 721 {
 722     tex->is_npot = !util_is_power_of_two(tex->tex.width0) ||
 723                    !util_is_power_of_two(tex->tex.height0);
 724 }
 725
 726 static void r300_setup_tiling(struct pipe_screen *screen,
 727                               struct r300_texture *tex)
 728 {
 729     struct r300_winsys_screen *rws = (struct r300_winsys_screen *)screen->winsys;
 730     enum pipe_format format = tex->tex.format;
 731     boolean rv350_mode = r300_screen(screen)->caps->family >= CHIP_FAMILY_RV350;
 732
 733     if (!r300_format_is_plain(format)) {
 734         return;
 735     }
 736
 737     if (tex->tex.width0 == 1 ||
 738         tex->tex.height0 == 1) {
 739         return;
 740     }
 741
 742     /* Set microtiling. */
 743     switch (util_format_get_blocksize(format)) {
 744         case 1:
 745         case 4:
 746             tex->microtile = R300_BUFFER_TILED;
 747             break;
 748
 749         case 2:
 750         case 8:
 751             if (rws->get_value(rws, R300_VID_SQUARE_TILING_SUPPORT)) {
 752                 tex->microtile = R300_BUFFER_SQUARETILED;
 753             }
 754             break;
 755     }
 756
 757     /* Set macrotiling. */
 758     if (r300_texture_macro_switch(tex, 0, rv350_mode, TILE_WIDTH) &&
 759         r300_texture_macro_switch(tex, 0, rv350_mode, TILE_HEIGHT)) {
 760         tex->macrotile = R300_BUFFER_TILED;
 761     }
 762 }
 763
 764 /* Create a new texture. */
 765 static struct pipe_texture* r300_texture_create(struct pipe_screen* screen,
 766                                          const struct pipe_texture* template)
 767 {
 768     struct r300_texture* tex = CALLOC_STRUCT(r300_texture);
 769     struct r300_screen* rscreen = r300_screen(screen);
 770     struct r300_winsys_screen *rws = (struct r300_winsys_screen *)screen->winsys;
 771
 772     if (!tex) {
 773         return NULL;
 774     }
 775
 776     tex->tex = *template;
 777     pipe_reference_init(&tex->tex.reference, 1);
 778     tex->tex.screen = screen;
 779
 780     r300_setup_flags(tex);
 781     if (!(template->tex_usage & R300_TEXTURE_USAGE_TRANSFER)) {
 782         r300_setup_tiling(screen, tex);
 783     }
 784     r300_setup_miptree(rscreen, tex);
 785     r300_setup_texture_state(rscreen, tex);
 786
 787     tex->buffer = rws->buffer_create(rws, 2048,
 788                                      PIPE_BUFFER_USAGE_PIXEL,
 789                                      tex->size);
 790     rws->buffer_set_tiling(rws, tex->buffer,
 791                            tex->pitch[0],
 792                            tex->microtile,
 793                            tex->macrotile);
 794
 795     if (!tex->buffer) {
 796         FREE(tex);
 797         return NULL;
 798     }
 799
 800     return (struct pipe_texture*)tex;
 801 }
 802
 803 static void r300_texture_destroy(struct pipe_texture* texture)
 804 {
 805     struct r300_texture* tex = (struct r300_texture*)texture;
 806     struct r300_winsys_screen *rws = (struct r300_winsys_screen *)texture->screen->winsys;
 807
 808     rws->buffer_reference(rws, &tex->buffer, NULL);
 809     FREE(tex);
 810 }
 811
 812 static struct pipe_surface* r300_get_tex_surface(struct pipe_screen* screen,
 813                                                  struct pipe_texture* texture,
 814                                                  unsigned face,
 815                                                  unsigned level,
 816                                                  unsigned zslice,
 817                                                  unsigned flags)
 818 {
 819     struct r300_texture* tex = (struct r300_texture*)texture;
 820     struct pipe_surface* surface = CALLOC_STRUCT(pipe_surface);
 821     unsigned offset;
 822
 823     offset = r300_texture_get_offset(tex, level, zslice, face);
 824
 825     if (surface) {
 826         pipe_reference_init(&surface->reference, 1);
 827         pipe_texture_reference(&surface->texture, texture);
 828         surface->format = texture->format;
 829         surface->width = u_minify(texture->width0, level);
 830         surface->height = u_minify(texture->height0, level);
 831         surface->offset = offset;
 832         surface->usage = flags;
 833         surface->zslice = zslice;
 834         surface->texture = texture;
 835         surface->face = face;
 836         surface->level = level;
 837     }
 838
 839     return surface;
 840 }
 841
 842 static void r300_tex_surface_destroy(struct pipe_surface* s)
 843 {
 844     pipe_texture_reference(&s->texture, NULL);
 845     FREE(s);
 846 }
 847
 848
 849 static struct pipe_texture*
 850     r300_texture_from_handle(struct pipe_screen* screen,
 851                              const struct pipe_texture* base,
 852                              struct winsys_handle *whandle)
 853 {
 854     struct r300_winsys_screen *rws = (struct r300_winsys_screen*)screen->winsys;
 855     struct r300_screen* rscreen = r300_screen(screen);
 856     struct r300_winsys_buffer *buffer;
 857     struct r300_texture* tex;
 858     unsigned stride;
 859
 860     /* Support only 2D textures without mipmaps */
 861     if (base->target != PIPE_TEXTURE_2D ||
 862         base->depth0 != 1 ||
 863         base->last_level != 0) {
 864         return NULL;
 865     }
 866
 867     buffer = rws->buffer_from_handle(rws, screen, whandle, &stride);
 868     if (!buffer) {
 869         return NULL;
 870     }
 871
 872     tex = CALLOC_STRUCT(r300_texture);
 873     if (!tex) {
 874         return NULL;
 875     }
 876
 877     tex->tex = *base;
 878     pipe_reference_init(&tex->tex.reference, 1);
 879     tex->tex.screen = screen;
 880
 881     tex->stride_override = stride;
 882     tex->pitch[0] = stride / util_format_get_blocksize(base->format);
 883
 884     r300_setup_flags(tex);
 885     r300_setup_texture_state(rscreen, tex);
 886
 887     /* one ref already taken */
 888     tex->buffer = buffer;
 889
 890     return (struct pipe_texture*)tex;
 891 }
 892
 893 static boolean
 894     r300_texture_get_handle(struct pipe_screen* screen,
 895                             struct pipe_texture *texture,
 896                             struct winsys_handle *whandle)
 897 {
 898     struct r300_winsys_screen *rws = (struct r300_winsys_screen *)screen->winsys;
 899     struct r300_texture* tex = (struct r300_texture*)texture;
 900     unsigned stride;
 901
 902     if (!tex) {
 903         return FALSE;
 904     }
 905
 906     stride = r300_texture_get_stride(r300_screen(screen), tex, 0);
 907
 908     rws->buffer_get_handle(rws, tex->buffer, stride, whandle);
 909
 910     return TRUE;
 911 }
 912
 913 static struct pipe_video_surface *
 914 r300_video_surface_create(struct pipe_screen *screen,
 915                           enum pipe_video_chroma_format chroma_format,
 916                           unsigned width, unsigned height)
 917 {
 918     struct r300_video_surface *r300_vsfc;
 919     struct pipe_texture template;
 920
 921     assert(screen);
 922     assert(width && height);
 923
 924     r300_vsfc = CALLOC_STRUCT(r300_video_surface);
 925     if (!r300_vsfc)
 926        return NULL;
 927
 928     pipe_reference_init(&r300_vsfc->base.reference, 1);
 929     r300_vsfc->base.screen = screen;
 930     r300_vsfc->base.chroma_format = chroma_format;
 931     r300_vsfc->base.width = width;
 932     r300_vsfc->base.height = height;
 933
 934     memset(&template, 0, sizeof(struct pipe_texture));
 935     template.target = PIPE_TEXTURE_2D;
 936     template.format = PIPE_FORMAT_B8G8R8X8_UNORM;
 937     template.last_level = 0;
 938     template.width0 = util_next_power_of_two(width);
 939     template.height0 = util_next_power_of_two(height);
 940     template.depth0 = 1;
 941     template.tex_usage = PIPE_TEXTURE_USAGE_SAMPLER |
 942                          PIPE_TEXTURE_USAGE_RENDER_TARGET;
 943
 944     r300_vsfc->tex = screen->texture_create(screen, &template);
 945     if (!r300_vsfc->tex)
 946     {
 947         FREE(r300_vsfc);
 948         return NULL;
 949     }
 950
 951     return &r300_vsfc->base;
 952 }
 953
 954 static void r300_video_surface_destroy(struct pipe_video_surface *vsfc)
 955 {
 956     struct r300_video_surface *r300_vsfc = r300_video_surface(vsfc);
 957     pipe_texture_reference(&r300_vsfc->tex, NULL);
 958     FREE(r300_vsfc);
 959 }
 960
 961 void r300_init_screen_texture_functions(struct pipe_screen* screen)
 962 {
 963     screen->texture_create = r300_texture_create;
 964     screen->texture_from_handle = r300_texture_from_handle;
 965     screen->texture_get_handle = r300_texture_get_handle;
 966     screen->texture_destroy = r300_texture_destroy;
 967     screen->get_tex_surface = r300_get_tex_surface;
 968     screen->tex_surface_destroy = r300_tex_surface_destroy;
 969
 970     screen->video_surface_create = r300_video_surface_create;
 971     screen->video_surface_destroy= r300_video_surface_destroy;
 972 }
 973
 974 boolean r300_get_texture_buffer(struct pipe_screen* screen,
 975                                 struct pipe_texture* texture,
 976                                 struct r300_winsys_buffer** buffer,
 977                                 unsigned* stride)
 978 {
 979     struct r300_texture* tex = (struct r300_texture*)texture;
 980     struct r300_winsys_screen *rws = (struct r300_winsys_screen *)screen->winsys;
 981     struct r300_winsys_buffer *buf;
 982
 983     if (!tex) {
 984         return FALSE;
 985     }
 986
 987     rws->buffer_reference(rws, &buf, tex->buffer);
 988
 989     if (stride) {
 990         *stride = r300_texture_get_stride(r300_screen(screen), tex, 0);
 991     }
 992
 993     *buffer = buf;
 994     return TRUE;
 995 }