src/graphics/grgl1texture.cpp

   1 /*
   2  * Copyright (C) Volition, Inc. 1999.  All rights reserved.
   3  *
   4  * All source code herein is the property of Volition, Inc. You may not sell
   5  * or otherwise commercially exploit the source or things you created based on
   6  * the source.
   7  */
   8
   9 #include "pstypes.h"
  10 #include "2d.h"
  11 #include "gropengl.h"
  12 #include "grgl1.h"
  13 #include "gropenglinternal.h"
  14 #include "bmpman.h"
  15 #include "grinternal.h"
  16 #include "systemvars.h"
  17 #include "osregistry.h"
  18
  19
  20 int vram_full = 0;
  21
  22 typedef struct tcache_slot_opengl {
  23         GLuint  texture_handle;
  24         float   u_scale, v_scale;
  25         int     bitmap_id;
  26         int     size;
  27         int     used_this_frame;
  28         int     time_created;
  29         ushort  w,h;
  30
  31         // sections
  32         tcache_slot_opengl      *data_sections[MAX_BMAP_SECTIONS_X][MAX_BMAP_SECTIONS_Y];
  33         tcache_slot_opengl      *parent;
  34
  35         gr_texture_source       texture_mode;
  36 } tcache_slot_opengl;
  37
  38 static void *Texture_sections = NULL;
  39 static tcache_slot_opengl *Textures = NULL;
  40
  41 static tcache_slot_opengl *GL_bound_texture;
  42
  43 static int GL_frame_count = 0;
  44 static int GL_last_bitmap_id = -1;
  45 static int GL_last_detail = -1;
  46 static int GL_last_bitmap_type = -1;
  47 static int GL_last_section_x = -1;
  48 static int GL_last_section_y = -1;
  49 static int GL_should_preload = 0;
  50
  51 extern int Gr_textures_in;
  52
  53 static gr_texture_source GL_current_texture_source = (gr_texture_source) -1;
  54
  55 static ubyte GL_xlat[256] = { 0 };
  56
  57 extern int bm_get_cache_slot( int bitmap_id, int separate_ani_frames );
  58
  59
  60 void opengl1_set_texture_state(gr_texture_source ts)
  61 {
  62         if (ts == TEXTURE_SOURCE_NONE) {
  63                 GL_bound_texture = NULL;
  64
  65                 glBindTexture(GL_TEXTURE_2D, 0);
  66                 opengl1_tcache_set(-1, -1, NULL, NULL, 0, -1, -1, 0 );
  67         } else if (GL_bound_texture &&
  68                 GL_bound_texture->texture_mode != ts) {
  69                 switch (ts) {
  70                         case TEXTURE_SOURCE_DECAL:
  71                                 glTexParameteri (GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_LINEAR);
  72                                 glTexParameteri (GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_LINEAR);
  73                                 break;
  74                         case TEXTURE_SOURCE_NO_FILTERING:
  75                                 glTexParameteri (GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, GL_NEAREST);
  76                                 glTexParameteri (GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, GL_NEAREST);
  77                                 break;
  78                         default:
  79                                 break;
  80                 }
  81
  82                 GL_bound_texture->texture_mode = ts;
  83         }
  84
  85         GL_current_texture_source = ts;
  86 }
  87
  88
  89 void opengl1_tcache_init()
  90 {
  91         int i, idx, s_idx;
  92
  93         uint tmp_pl = os_config_read_uint( NULL, NOX("PreloadTextures"), 1 );
  94
  95         if (tmp_pl == 1) {
  96                 GL_should_preload = 1;
  97         } else {
  98                 GL_should_preload = 0;
  99         }
 100
 101         Textures = (tcache_slot_opengl *)malloc(MAX_BITMAPS*sizeof(tcache_slot_opengl));
 102         if ( !Textures )        {
 103                 exit(1);
 104         }
 105
 106         if (gr_screen.use_sections) {
 107                 Texture_sections = (tcache_slot_opengl*)malloc(MAX_BITMAPS * MAX_BMAP_SECTIONS_X * MAX_BMAP_SECTIONS_Y * sizeof(tcache_slot_opengl));
 108                 if(!Texture_sections){
 109                         exit(1);
 110                 }
 111                 memset(Texture_sections, 0, MAX_BITMAPS * MAX_BMAP_SECTIONS_X * MAX_BMAP_SECTIONS_Y * sizeof(tcache_slot_opengl));
 112         }
 113
 114         // Init the texture structures
 115         int section_count = 0;
 116         for( i=0; i<MAX_BITMAPS; i++ )  {
 117                 Textures[i].texture_handle = 0;
 118
 119                 Textures[i].bitmap_id = -1;
 120                 Textures[i].size = 0;
 121                 Textures[i].used_this_frame = 0;
 122
 123                 Textures[i].parent = NULL;
 124
 125                 // allocate sections
 126                 if (gr_screen.use_sections) {
 127                         for(idx=0; idx<MAX_BMAP_SECTIONS_X; idx++){
 128                                 for(s_idx=0; s_idx<MAX_BMAP_SECTIONS_Y; s_idx++){
 129                                         Textures[i].data_sections[idx][s_idx] = &((tcache_slot_opengl*)Texture_sections)[section_count++];
 130                                         Textures[i].data_sections[idx][s_idx]->parent = &Textures[i];
 131                                         Textures[i].data_sections[idx][s_idx]->texture_handle = 0;
 132                                         Textures[i].data_sections[idx][s_idx]->bitmap_id = -1;
 133                                         Textures[i].data_sections[idx][s_idx]->size = 0;
 134                                         Textures[i].data_sections[idx][s_idx]->used_this_frame = 0;
 135                                 }
 136                         }
 137                 } else {
 138                         for(idx=0; idx<MAX_BMAP_SECTIONS_X; idx++){
 139                                 for(s_idx=0; s_idx<MAX_BMAP_SECTIONS_Y; s_idx++){
 140                                         Textures[i].data_sections[idx][s_idx] = NULL;
 141                                 }
 142                         }
 143                 }
 144         }
 145
 146         GL_last_detail = Detail.hardware_textures;
 147         GL_last_bitmap_id = -1;
 148         GL_last_bitmap_type = -1;
 149
 150         GL_last_section_x = -1;
 151         GL_last_section_y = -1;
 152 }
 153
 154 static int opengl1_free_texture ( tcache_slot_opengl *t )
 155 {
 156         int idx, s_idx;
 157
 158
 159         // Bitmap changed!!
 160         if ( t->bitmap_id > -1 )        {
 161                 // if I, or any of my children have been used this frame, bail
 162                 if(t->used_this_frame == GL_frame_count){
 163                         return 0;
 164                 }
 165
 166                 if (gr_screen.use_sections) {
 167                         for(idx=0; idx<MAX_BMAP_SECTIONS_X; idx++){
 168                                 for(s_idx=0; s_idx<MAX_BMAP_SECTIONS_Y; s_idx++){
 169                                         if((t->data_sections[idx][s_idx] != NULL) && (t->data_sections[idx][s_idx]->used_this_frame == GL_frame_count)){
 170                                                 return 0;
 171                                         }
 172                                 }
 173                         }
 174                 }
 175
 176                 // ok, now we know its legal to free everything safely
 177                 t->texture_mode = (gr_texture_source) -1;
 178                 glDeleteTextures (1, &t->texture_handle);
 179                 t->texture_handle = 0;
 180
 181                 if ( GL_last_bitmap_id == t->bitmap_id )       {
 182                         GL_last_bitmap_id = -1;
 183                 }
 184
 185                 // if this guy has children, free them too, since the children
 186                 // actually make up his size
 187                 if (gr_screen.use_sections) {
 188                         for(idx=0; idx<MAX_BMAP_SECTIONS_X; idx++){
 189                                 for(s_idx=0; s_idx<MAX_BMAP_SECTIONS_Y; s_idx++){
 190                                         if(t->data_sections[idx][s_idx] != NULL){
 191                                                 opengl1_free_texture(t->data_sections[idx][s_idx]);
 192                                         }
 193                                 }
 194                         }
 195                 }
 196
 197                 t->bitmap_id = -1;
 198                 t->used_this_frame = 0;
 199                 Gr_textures_in -= t->size;
 200                 t->size = 0;
 201         }
 202
 203         return 1;
 204 }
 205
 206 void opengl1_tcache_flush()
 207 {
 208         int i;
 209
 210         for( i=0; i<MAX_BITMAPS; i++ )  {
 211                 opengl1_free_texture ( &Textures[i] );
 212         }
 213         if (Gr_textures_in != 0) {
 214                 mprintf(( "WARNING: VRAM is at %d instead of zero after flushing!\n", Gr_textures_in ));
 215                 Gr_textures_in = 0;
 216         }
 217
 218         GL_last_bitmap_id = -1;
 219         GL_last_section_x = -1;
 220         GL_last_section_y = -1;
 221 }
 222
 223 void opengl1_tcache_cleanup()
 224 {
 225         opengl1_tcache_flush ();
 226
 227         if ( Textures ) {
 228                 free(Textures);
 229                 Textures = NULL;
 230         }
 231
 232         if( Texture_sections != NULL ){
 233                 free(Texture_sections);
 234                 Texture_sections = NULL;
 235         }
 236 }
 237
 238 void opengl1_tcache_frame()
 239 {
 240         GL_last_bitmap_id = -1;
 241
 242         GL_frame_count++;
 243
 244         /*
 245         int idx, s_idx;
 246         int i;
 247         for( i=0; i<MAX_BITMAPS; i++ )  {
 248                 Textures[i].used_this_frame = 0;
 249
 250                 // data sections
 251                 if(Textures[i].data_sections[0][0] != NULL){
 252                         SDL_assert(GL_texture_sections);
 253                         if(GL_texture_sections){
 254                                 for(idx=0; idx<MAX_BMAP_SECTIONS_X; idx++){
 255                                         for(s_idx=0; s_idx<MAX_BMAP_SECTIONS_Y; s_idx++){
 256                                                 if(Textures[i].data_sections[idx][s_idx] != NULL){
 257                                                         Textures[i].data_sections[idx][s_idx]->used_this_frame = 0;
 258                                                 }
 259                                         }
 260                                 }
 261                         }
 262                 }
 263         }
 264         */
 265
 266         if ( vram_full )        {
 267                 opengl1_tcache_flush();
 268                 vram_full = 0;
 269         }
 270 }
 271
 272 static void opengl1_tcache_get_adjusted_texture_size(int w_in, int h_in, int *w_out, int *h_out)
 273 {
 274         int tex_w, tex_h;
 275         int i;
 276
 277         // bogus
 278         if((w_out == NULL) ||  (h_out == NULL)){
 279                 return;
 280         }
 281
 282         // starting size
 283         tex_w = w_in;
 284         tex_h = h_in;
 285
 286         // set height and width to a power of 2
 287         for (i=0; i<16; i++ )   {
 288                 if ( (tex_w > (1<<i)) && (tex_w <= (1<<(i+1))) )        {
 289                         tex_w = 1 << (i+1);
 290                         break;
 291                 }
 292         }
 293
 294         for (i=0; i<16; i++ )   {
 295                 if ( (tex_h > (1<<i)) && (tex_h <= (1<<(i+1))) )        {
 296                         tex_h = 1 << (i+1);
 297                         break;
 298                 }
 299         }
 300
 301         // try to keep an 8:1 size ratio
 302         if (tex_w/tex_h > 8)
 303                 tex_h = tex_w/8;
 304         if (tex_h/tex_w > 8)
 305                 tex_w = tex_h/8;
 306
 307         if ( tex_w < GL_min_texture_width ) {
 308                 tex_w = GL_min_texture_width;
 309         } else if ( tex_w > GL_max_texture_width )     {
 310                 tex_w = GL_max_texture_width;
 311         }
 312
 313         if ( tex_h < GL_min_texture_height ) {
 314                 tex_h = GL_min_texture_height;
 315         } else if ( tex_h > GL_max_texture_height )    {
 316                 tex_h = GL_max_texture_height;
 317         }
 318
 319         // store the outgoing size
 320         *w_out = tex_w;
 321         *h_out = tex_h;
 322 }
 323
 324 // data == start of bitmap data
 325 // sx == x offset into bitmap
 326 // sy == y offset into bitmap
 327 // src_w == absolute width of section on source bitmap
 328 // src_h == absolute height of section on source bitmap
 329 // bmap_w == width of source bitmap
 330 // bmap_h == height of source bitmap
 331 // tex_w == width of final texture
 332 // tex_h == height of final texture
 333 static int opengl1_create_texture_sub(int bitmap_type, int texture_handle, ushort *data, int sx, int sy, int src_w, int src_h, int bmap_w, int bmap_h, int tex_w, int tex_h, tcache_slot_opengl *t, int reload, int resize, int fail_on_full)
 334 {
 335         int ret_val = 1;
 336         int size = 0;
 337         int i, j;
 338         ubyte *bmp_data = ((ubyte*)data);
 339         ubyte *texmem = NULL, *texmemp;
 340
 341         // bogus
 342         if((t == NULL) || (bmp_data == NULL)){
 343                 return 0;
 344         }
 345
 346         if ( t->used_this_frame == GL_frame_count )       {
 347                 mprintf(( "ARGHH!!! Texture already used this frame!  Cannot free it!\n" ));
 348                 return 0;
 349         }
 350         if ( !reload )  {
 351                 // gah
 352                 if(!opengl1_free_texture(t)){
 353                         return 0;
 354                 }
 355         }
 356
 357         switch (bitmap_type) {
 358                 case TCACHE_TYPE_AABITMAP:
 359                         t->u_scale = (float)bmap_w / (float)tex_w;
 360                         t->v_scale = (float)bmap_h / (float)tex_h;
 361                         break;
 362
 363                 case TCACHE_TYPE_BITMAP_INTERFACE:
 364                 case TCACHE_TYPE_BITMAP_SECTION:
 365                         t->u_scale = (float)src_w / (float)tex_w;
 366                         t->v_scale = (float)src_h / (float)tex_h;
 367                         break;
 368
 369                 default:
 370                         t->u_scale = 1.0f;
 371                         t->v_scale = 1.0f;
 372                         break;
 373         }
 374
 375         if (!reload) {
 376                 glGenTextures (1, &t->texture_handle);
 377         }
 378
 379         if (t->texture_handle == 0) {
 380                 nprintf(("Error", "!!DEBUG!! t->texture_handle == 0"));
 381                 return 0;
 382         }
 383
 384         GL_bound_texture = t;
 385
 386         GL_bound_texture->texture_mode = (gr_texture_source) -1;
 387
 388         glBindTexture (GL_TEXTURE_2D, t->texture_handle);
 389
 390         glTexParameteri (GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_REPEAT);
 391         glTexParameteri (GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_REPEAT);
 392         glTexEnvf(GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE);
 393
 394         /* this should be set next anyway */
 395 //      if (GL_current_texture_source != TEXTURE_SOURCE_NONE) {
 396 //              gr_opengl_set_texture_state(GL_current_texture_source);
 397 //      }
 398
 399         switch (bitmap_type) {
 400                 case TCACHE_TYPE_AABITMAP:
 401                 {
 402                         texmem = (ubyte *) malloc (tex_w*tex_h);
 403                         texmemp = texmem;
 404
 405                         for (i=0;i<tex_h;i++)
 406                         {
 407                                 for (j=0;j<tex_w;j++)
 408                                 {
 409                                         if (i < bmap_h && j < bmap_w) {
 410                                                 *texmemp++ = GL_xlat[bmp_data[i*bmap_w+j]];
 411                                         } else {
 412                                                 *texmemp++ = 0;
 413                                         }
 414                                 }
 415                         }
 416
 417                         size = tex_w*tex_h;
 418
 419                         if (!reload) {
 420                                 glTexImage2D (GL_TEXTURE_2D, 0, GL_ALPHA, tex_w, tex_h, 0, GL_ALPHA, GL_UNSIGNED_BYTE, texmem);
 421                         } else {
 422                                 glTexSubImage2D (GL_TEXTURE_2D, 0, 0, 0, tex_w, tex_h, GL_ALPHA, GL_UNSIGNED_BYTE, texmem);
 423                         }
 424
 425                         free (texmem);
 426
 427                         break;
 428                 }
 429
 430                 case TCACHE_TYPE_BITMAP_INTERFACE:
 431                 case TCACHE_TYPE_BITMAP_SECTION:
 432                 {
 433                         // if we aren't resizing in any way then we can just use bmp_data directly
 434                         if ( resize ) {
 435                                 texmem = (ubyte *) malloc (tex_w*tex_h*2);
 436                                 texmemp = texmem;
 437
 438                                 for (i=0;i<tex_h;i++) {
 439                                         for (j=0;j<tex_w;j++) {
 440                                                 if (i < src_h && j < src_w) {
 441                                                         *texmemp++ = bmp_data[((i+sy)*bmap_w+(j+sx))*2+0];
 442                                                         *texmemp++ = bmp_data[((i+sy)*bmap_w+(j+sx))*2+1];
 443                                                 } else {
 444                                                         *texmemp++ = 0;
 445                                                         *texmemp++ = 0;
 446                                                 }
 447                                         }
 448                                 }
 449                         }
 450
 451                         size = tex_w*tex_h*2;
 452
 453                         if (!reload) {
 454                                 glTexImage2D (GL_TEXTURE_2D, 0, GL_RGBA, tex_w, tex_h, 0, GL_BGRA, GL_UNSIGNED_SHORT_1_5_5_5_REV, (resize) ? texmem : bmp_data);
 455                         } else {
 456                                 glTexSubImage2D (GL_TEXTURE_2D, 0, 0, 0, tex_w, tex_h, GL_BGRA, GL_UNSIGNED_SHORT_1_5_5_5_REV, (resize) ? texmem : bmp_data);
 457                         }
 458
 459                         if (texmem != NULL)
 460                                 free(texmem);
 461
 462                         break;
 463                 }
 464
 465                 default:
 466                 {
 467                         // if we aren't resizing then we can just use bmp_data directly
 468                         if ( resize ) {
 469                                 texmem = (ubyte *) malloc (tex_w*tex_h*2);
 470                                 texmemp = texmem;
 471
 472                                 SDL_assert( texmem != NULL );
 473
 474                                 fix u, utmp, v, du, dv;
 475
 476                                 u = v = 0;
 477
 478                                 du = ( (bmap_w-1)*F1_0 ) / tex_w;
 479                                 dv = ( (bmap_h-1)*F1_0 ) / tex_h;
 480
 481                                 for (j=0;j<tex_h;j++) {
 482                                         utmp = u;
 483                                         for (i=0;i<tex_w;i++) {
 484                                                 *texmemp++ = bmp_data[(f2i(v)*bmap_w+f2i(utmp))*2+0];
 485                                                 *texmemp++ = bmp_data[(f2i(v)*bmap_w+f2i(utmp))*2+1];
 486                                                 utmp += du;
 487                                         }
 488                                         v += dv;
 489                                 }
 490                         }
 491
 492                         size = tex_w*tex_h*2;
 493
 494                         if (!reload) {
 495                                 glTexImage2D (GL_TEXTURE_2D, 0, GL_RGBA, tex_w, tex_h, 0, GL_BGRA, GL_UNSIGNED_SHORT_1_5_5_5_REV, (resize) ? texmem : bmp_data);
 496                         } else {
 497                                 glTexSubImage2D (GL_TEXTURE_2D, 0, 0, 0, tex_w, tex_h, GL_BGRA, GL_UNSIGNED_SHORT_1_5_5_5_REV, (resize) ? texmem : bmp_data);
 498                         }
 499
 500                         if (texmem != NULL)
 501                                 free(texmem);
 502
 503                         break;
 504                 }
 505         }
 506
 507         t->bitmap_id = texture_handle;
 508         t->time_created = GL_frame_count;
 509         t->used_this_frame = 0;
 510         t->size = size;
 511         t->w = (ushort)tex_w;
 512         t->h = (ushort)tex_h;
 513
 514         if (!reload) {
 515                 Gr_textures_in += t->size;
 516         }
 517
 518         return ret_val;
 519 }
 520
 521 static int opengl1_create_texture(int bitmap_handle, int bitmap_type, tcache_slot_opengl *tslot, int fail_on_full)
 522 {
 523         ubyte flags;
 524         bitmap *bmp;
 525         int final_w, final_h;
 526         ubyte bpp = 16;
 527         int reload = 0;
 528         int resize = 0;
 529         int cull_size = 0;
 530
 531         // setup texture/bitmap flags
 532         flags = 0;
 533         switch(bitmap_type){
 534                 case TCACHE_TYPE_AABITMAP:
 535                         flags |= BMP_AABITMAP;
 536                         bpp = 8;
 537                         break;
 538                 case TCACHE_TYPE_NORMAL:
 539                         flags |= BMP_TEX_OTHER;
 540                         cull_size = 1;
 541                         break;
 542                 case TCACHE_TYPE_BITMAP_INTERFACE:
 543                 case TCACHE_TYPE_XPARENT:
 544                         flags |= BMP_TEX_XPARENT;
 545                         break;
 546                 default:
 547                         Int3();
 548                         return 0;
 549         }
 550
 551         // lock the bitmap into the proper format
 552         bmp = bm_lock(bitmap_handle, bpp, flags);
 553         if ( bmp == NULL ) {
 554                 mprintf(("Couldn't lock bitmap %d.\n", bitmap_handle ));
 555                 return 0;
 556         }
 557
 558         int max_w = bmp->w;
 559         int max_h = bmp->h;
 560
 561         if (cull_size) {
 562                 // if we are going to cull the size then we need to force a resize
 563                 if (Detail.hardware_textures < 4) {
 564                         resize = 1;
 565
 566                         // Detail.debris_culling goes from 0 to 4.
 567                         max_w /= (16 >> Detail.hardware_textures);
 568                         max_h /= (16 >> Detail.hardware_textures);
 569                 }
 570         }
 571
 572
 573         // get final texture size as it will be allocated as a DD surface
 574         opengl1_tcache_get_adjusted_texture_size(max_w, max_h, &final_w, &final_h);
 575
 576         if ( (final_w < 1) || (final_h < 1) ) {
 577                 mprintf(("Bitmap is too small at %dx%d.\n", final_w, final_h));
 578                 return 0;
 579         }
 580
 581         // if we don't have to resize the image (to get power of 2, etc.) then skip that extra work
 582         if ( (max_w != final_w) || (max_h != final_h) ) {
 583                 resize = 1;
 584         }
 585
 586         // if this tcache slot has no bitmap
 587         if ( tslot->bitmap_id < 0) {
 588                 reload = 0;
 589         }
 590         // different bitmap altogether - determine if the new one can use the old one's slot
 591         else if (tslot->bitmap_id != bitmap_handle)     {
 592                 if((final_w == tslot->w) && (final_h == tslot->h)){
 593                         reload = 1;
 594                         //ml_printf("Reloading texture %d\n", bitmap_handle);
 595                 } else {
 596                         reload = 0;
 597                 }
 598         }
 599
 600         // call the helper
 601         int ret_val = opengl1_create_texture_sub(bitmap_type, bitmap_handle, (ushort*)bmp->data, 0, 0, bmp->w, bmp->h, bmp->w, bmp->h, final_w, final_h, tslot, reload, resize, fail_on_full);
 602
 603         // unlock the bitmap
 604         bm_unlock(bitmap_handle);
 605
 606         return ret_val;
 607 }
 608
 609 static int opengl1_create_texture_sectioned(int bitmap_handle, int bitmap_type, tcache_slot_opengl *tslot, int sx, int sy, int fail_on_full)
 610 {
 611         ubyte flags;
 612         bitmap *bmp;
 613         int final_w, final_h;
 614         int section_x, section_y;
 615         int reload = 0;
 616         int resize = 1;
 617
 618         SDL_assert( gr_screen.use_sections );
 619
 620         // setup texture/bitmap flags
 621         SDL_assert(bitmap_type == TCACHE_TYPE_BITMAP_SECTION);
 622         if(bitmap_type != TCACHE_TYPE_BITMAP_SECTION){
 623                 bitmap_type = TCACHE_TYPE_BITMAP_SECTION;
 624         }
 625         flags = BMP_TEX_XPARENT;
 626
 627         // lock the bitmap in the proper format
 628         bmp = bm_lock(bitmap_handle, 16, flags);
 629         if ( bmp == NULL ) {
 630                 mprintf(("Couldn't lock bitmap %d.\n", bitmap_handle ));
 631                 return 0;
 632         }
 633         // determine the width and height of this section
 634         bm_get_section_size(bitmap_handle, sx, sy, &section_x, &section_y);
 635
 636         // get final texture size as it will be allocated as an opengl texture
 637         opengl1_tcache_get_adjusted_texture_size(section_x, section_y, &final_w, &final_h);
 638
 639         if ( (final_w < 1) || (final_h < 1) ) {
 640                 mprintf(("Bitmap is too small at %dx%d.\n", final_w, final_h));
 641                 return 0;
 642         }
 643
 644         // if we don't have to resize the image (to get power of 2, etc.) then skip that extra work
 645         if ( (bmp->sections.num_x == 1) && (bmp->sections.num_y == 1) && (section_x == final_w) && (section_y == final_h) ) {
 646                 resize = 0;
 647         }
 648
 649         // if this tcache slot has no bitmap
 650         if ( tslot->bitmap_id < 0) {
 651                 reload = 0;
 652         }
 653         // different bitmap altogether - determine if the new one can use the old one's slot
 654         else if (tslot->bitmap_id != bitmap_handle)     {
 655                 if((final_w == tslot->w) && (final_h == tslot->h)){
 656                         reload = 1;
 657                 } else {
 658                         reload = 0;
 659                 }
 660         }
 661
 662         // call the helper
 663         int ret_val = opengl1_create_texture_sub(bitmap_type, bitmap_handle, (ushort*)bmp->data, bmp->sections.sx[sx], bmp->sections.sy[sy], section_x, section_y, bmp->w, bmp->h, final_w, final_h, tslot, reload, resize, fail_on_full);
 664
 665         // unlock the bitmap
 666         bm_unlock(bitmap_handle);
 667
 668         return ret_val;
 669 }
 670
 671 int opengl1_tcache_set(int bitmap_id, int bitmap_type, float *u_scale, float *v_scale, int fail_on_full, int sx, int sy, int force)
 672 {
 673         bitmap *bmp = NULL;
 674
 675         int idx, s_idx;
 676         int ret_val = 1;
 677
 678         if (bitmap_id < 0)
 679         {
 680                 GL_last_bitmap_id = -1;
 681                 return 0;
 682         }
 683
 684         if ( GL_last_detail != Detail.hardware_textures )      {
 685                 GL_last_detail = Detail.hardware_textures;
 686                 opengl1_tcache_flush();
 687         }
 688
 689         if (vram_full) {
 690                 return 0;
 691         }
 692
 693         int n = bm_get_cache_slot (bitmap_id, 1);
 694         tcache_slot_opengl *t = &Textures[n];
 695
 696         if ( (GL_last_bitmap_id == bitmap_id) && (GL_last_bitmap_type==bitmap_type) && (t->bitmap_id == bitmap_id) && (GL_last_section_x == sx) && (GL_last_section_y == sy))       {
 697                 t->used_this_frame = GL_frame_count;
 698
 699                 // mark all children as used
 700                 if (gr_screen.use_sections) {
 701                         for(idx=0; idx<MAX_BMAP_SECTIONS_X; idx++){
 702                                 for(s_idx=0; s_idx<MAX_BMAP_SECTIONS_Y; s_idx++){
 703                                         if(t->data_sections[idx][s_idx] != NULL){
 704                                                 t->data_sections[idx][s_idx]->used_this_frame = GL_frame_count;
 705                                         }
 706                                 }
 707                         }
 708                 }
 709
 710                 *u_scale = t->u_scale;
 711                 *v_scale = t->v_scale;
 712                 return 1;
 713         }
 714
 715         if (bitmap_type == TCACHE_TYPE_BITMAP_SECTION){
 716                 SDL_assert( gr_screen.use_sections );
 717                 SDL_assert((sx >= 0) && (sy >= 0) && (sx < MAX_BMAP_SECTIONS_X) && (sy < MAX_BMAP_SECTIONS_Y));
 718                 if(!((sx >= 0) && (sy >= 0) && (sx < MAX_BMAP_SECTIONS_X) && (sy < MAX_BMAP_SECTIONS_Y))){
 719                         return 0;
 720                 }
 721
 722                 ret_val = 1;
 723
 724                 // if the texture sections haven't been created yet
 725                 if((t->bitmap_id < 0) || (t->bitmap_id != bitmap_id)){
 726
 727                         // lock the bitmap in the proper format
 728                         bmp = bm_lock(bitmap_id, 16, BMP_TEX_XPARENT);
 729                         bm_unlock(bitmap_id);
 730
 731                         // now lets do something for each texture
 732
 733                         for(idx=0; idx<bmp->sections.num_x; idx++){
 734                                 for(s_idx=0; s_idx<bmp->sections.num_y; s_idx++){
 735                                         // hmm. i'd rather we didn't have to do it this way...
 736                                         if(!opengl1_create_texture_sectioned(bitmap_id, bitmap_type, t->data_sections[idx][s_idx], idx, s_idx, fail_on_full)){
 737                                                 ret_val = 0;
 738                                         }
 739
 740                                         // not used this frame
 741                                         t->data_sections[idx][s_idx]->used_this_frame = 0;
 742                                 }
 743                         }
 744
 745                         // zero out pretty much everything in the parent struct since he's just the root
 746                         t->bitmap_id = bitmap_id;
 747                         t->texture_handle = 0;
 748                         t->time_created = t->data_sections[sx][sy]->time_created;
 749                         t->used_this_frame = 0;
 750                 }
 751
 752                 // argh. we failed to upload. free anything we can
 753                 if(!ret_val){
 754                         opengl1_free_texture(t);
 755                 }
 756                 // swap in the texture we want
 757                 else {
 758                         t = t->data_sections[sx][sy];
 759                 }
 760         }
 761         // all other "normal" textures
 762         else if((bitmap_id < 0) || (bitmap_id != t->bitmap_id)){
 763                 ret_val = opengl1_create_texture( bitmap_id, bitmap_type, t, fail_on_full );
 764         }
 765
 766         // everything went ok
 767         if(ret_val && (t->texture_handle) && !vram_full){
 768                 *u_scale = t->u_scale;
 769                 *v_scale = t->v_scale;
 770
 771                 GL_bound_texture = t;
 772
 773                 glBindTexture (GL_TEXTURE_2D, t->texture_handle );
 774
 775                 /* this should be set next anyway */
 776 //              if (GL_current_texture_source != TEXTURE_SOURCE_NONE) {
 777 //                      gr_opengl_set_texture_state(GL_current_texture_source);
 778 //              }
 779
 780                 GL_last_bitmap_id = t->bitmap_id;
 781                 GL_last_bitmap_type = bitmap_type;
 782                 GL_last_section_x = sx;
 783                 GL_last_section_y = sy;
 784
 785                 t->used_this_frame = GL_frame_count;
 786         }
 787         // gah
 788         else {
 789                 GL_last_bitmap_id = -1;
 790                 GL_last_bitmap_type = -1;
 791
 792                 GL_last_section_x = -1;
 793                 GL_last_section_y = -1;
 794
 795                 GL_bound_texture = NULL;
 796
 797                 glBindTexture (GL_TEXTURE_2D, 0);       // test - DDOI
 798                 return 0;
 799         }
 800
 801         return 1;
 802 }
 803
 804 void gr_opengl1_preload_init()
 805 {
 806 //      if (gr_screen.mode != GR_OPENGL) {
 807 //              return;
 808 //      }
 809
 810         opengl1_tcache_flush();
 811 }
 812
 813 int gr_opengl1_preload(int bitmap_num, int is_aabitmap)
 814 {
 815 //      if ( gr_screen.mode != GR_OPENGL) {
 816 //              return 0;
 817 //      }
 818
 819         if ( !GL_should_preload )      {
 820                 return 0;
 821         }
 822
 823         float u_scale, v_scale;
 824         int retval;
 825         int bitmap_type = TCACHE_TYPE_NORMAL;
 826
 827         if ( is_aabitmap )      {
 828                 bitmap_type = TCACHE_TYPE_AABITMAP;
 829         }
 830
 831         retval = opengl1_tcache_set(bitmap_num, bitmap_type, &u_scale, &v_scale, 1, -1, -1, 0 );
 832
 833         if ( !retval )  {
 834                 mprintf(("Texture upload failed!\n" ));
 835         }
 836
 837         return retval;
 838 }
 839
 840 void gr_opengl1_set_gamma(float gamma)
 841 {
 842         Gr_gamma = gamma;
 843         Gr_gamma_int = int (Gr_gamma*10);
 844
 845         // Create the Gamma lookup table
 846         int i;
 847         for (i=0;i<256; i++) {
 848                 int v = fl2i(pow(i2fl(i)/255.0f, 1.0f/Gr_gamma)*255.0f);
 849                 if ( v > 255 ) {
 850                         v = 255;
 851                 } else if ( v < 0 )     {
 852                         v = 0;
 853                 }
 854                 Gr_gamma_lookup[i] = v;
 855         }
 856
 857         // set the alpha gamma settings (for fonts)
 858         for (i=0; i<16; i++) {
 859                 GL_xlat[i] = (ubyte)Gr_gamma_lookup[(i*255)/15];
 860         }
 861
 862         GL_xlat[15] = GL_xlat[1];
 863
 864         for (; i<256; i++) {
 865                 GL_xlat[i] = GL_xlat[0];
 866         }
 867
 868         // Flush any existing textures
 869         opengl1_tcache_flush();
 870 }
 871
 872 void gr_opengl1_release_texture(int handle)
 873 {
 874         for(int i=0; i<MAX_BITMAPS; i++ )  {
 875                 if (Textures[i].bitmap_id == handle) {
 876                         Textures[i].used_this_frame = 0; // this bmp doesn't even exist any longer...
 877                         opengl1_free_texture( &Textures[i] );
 878                 }
 879         }
 880 }