ref: 4605c9a98242a9d3e8e5f54f30b1cf27fc0ccba1
dir: /d_surf.c/
#include "quakedef.h" static float surfscale; bool r_cache_thrash; // set if surface cache is thrashing surfcache_t *sc_rover; static surfcache_t *sc_base; static int sc_size; #define GUARDSIZE 4 int D_SurfaceCacheForRes (int width, int height) { int size, pix; size = SURFCACHE_SIZE_AT_320X200; pix = width*height*sizeof(pixel_t); if (pix > 64000) size += (pix-64000)*3; return size; } void D_CheckCacheGuard (void) { byte *s; int i; s = (byte *)sc_base + sc_size; for (i=0 ; i<GUARDSIZE ; i++) if (s[i] != (byte)i) fatal ("D_CheckCacheGuard: failed"); } void D_ClearCacheGuard (void) { byte *s; int i; s = (byte *)sc_base + sc_size; for (i=0 ; i<GUARDSIZE ; i++) s[i] = (byte)i; } /* ================ D_InitCaches ================ */ void D_InitCaches (void *buffer, int size) { Con_Printf ("%dk surface cache\n", size/1024); sc_size = size - GUARDSIZE; sc_base = (surfcache_t *)buffer; sc_rover = sc_base; sc_base->next = nil; sc_base->owner = nil; sc_base->size = sc_size; D_ClearCacheGuard (); } /* ================== D_FlushCaches ================== */ void D_FlushCaches (void) { surfcache_t *c; if (!sc_base) return; for (c = sc_base ; c ; c = c->next) { if (c->owner) *c->owner = nil; } sc_rover = sc_base; sc_base->next = nil; sc_base->owner = nil; sc_base->size = sc_size; } /* ================= D_SCAlloc ================= */ static surfcache_t * D_SCAlloc(int width, int size) { surfcache_t *new; bool wrapped_this_time; if(width < 0 || size <= 0) Host_Error("D_SCAlloc: width=%d size=%d\n", width, size); size = (sizeof(surfcache_t) + size + 3) & ~3; if(size > sc_size) Host_Error("D_SCAlloc: %d > cache size",size); // if there is not size bytes after the rover, reset to the start wrapped_this_time = false; if ( !sc_rover || (intptr)sc_rover-(intptr)sc_base > (intptr)sc_size-(intptr)size) { if (sc_rover) { wrapped_this_time = true; } sc_rover = sc_base; } // colect and free surfcache_t blocks until the rover block is large enough new = sc_rover; if (sc_rover->owner) *sc_rover->owner = nil; while (new->size < size) { // free another sc_rover = sc_rover->next; if (!sc_rover) fatal ("D_SCAlloc: hit the end of memory"); if (sc_rover->owner) *sc_rover->owner = nil; new->size += sc_rover->size; new->next = sc_rover->next; } // create a fragment out of any leftovers if (new->size - size > 256) { sc_rover = (surfcache_t *)( (byte *)new + size); sc_rover->size = new->size - size; sc_rover->next = new->next; sc_rover->width = 0; sc_rover->owner = nil; new->next = sc_rover; new->size = size; } else sc_rover = new->next; new->width = width; // DEBUG if (width > 0) new->height = (size - sizeof(*new)) / width / sizeof(pixel_t); new->owner = nil; // should be set properly after return if (d_roverwrapped) { if (wrapped_this_time || (sc_rover >= d_initial_rover)) r_cache_thrash = true; } else if (wrapped_this_time) { d_roverwrapped = true; } D_CheckCacheGuard (); // DEBUG return new; } /* ================ D_CacheSurface ================ */ surfcache_t *D_CacheSurface (msurface_t *surface, int miplevel) { surfcache_t *cache; // if the surface is animating or flashing, flush the cache r_drawsurf.texture = R_TextureAnimation (surface->texinfo->texture); r_drawsurf.lightadj[0] = d_lightstylevalue[surface->styles[0]]; r_drawsurf.lightadj[1] = d_lightstylevalue[surface->styles[1]]; r_drawsurf.lightadj[2] = d_lightstylevalue[surface->styles[2]]; r_drawsurf.lightadj[3] = d_lightstylevalue[surface->styles[3]]; // see if the cache holds apropriate data cache = surface->cachespots[miplevel]; if(currententity == cl_entities || currententity->model->name[0] == '*') if (cache && !cache->dlight && surface->dlightframe != r_framecount && cache->texture == r_drawsurf.texture && cache->lightadj[0] == r_drawsurf.lightadj[0] && cache->lightadj[1] == r_drawsurf.lightadj[1] && cache->lightadj[2] == r_drawsurf.lightadj[2] && cache->lightadj[3] == r_drawsurf.lightadj[3] ) return cache; // determine shape of surface surfscale = 1.0 / (1<<miplevel); r_drawsurf.surfmip = miplevel; r_drawsurf.surfwidth = surface->extents[0] >> miplevel; r_drawsurf.rowbytes = r_drawsurf.surfwidth; r_drawsurf.surfheight = surface->extents[1] >> miplevel; // allocate memory if needed if (!cache) // if a texture just animated, don't reallocate it { cache = D_SCAlloc (r_drawsurf.surfwidth, r_drawsurf.surfwidth * r_drawsurf.surfheight * sizeof(pixel_t)); surface->cachespots[miplevel] = cache; cache->owner = &surface->cachespots[miplevel]; cache->mipscale = surfscale; } cache->dlight = surface->dlightframe == r_framecount; r_drawsurf.surfdat = cache->pixels; cache->texture = r_drawsurf.texture; cache->lightadj[0] = r_drawsurf.lightadj[0]; cache->lightadj[1] = r_drawsurf.lightadj[1]; cache->lightadj[2] = r_drawsurf.lightadj[2]; cache->lightadj[3] = r_drawsurf.lightadj[3]; // draw and light the surface texture r_drawsurf.surf = surface; c_surf++; R_DrawSurface (); return surface->cachespots[miplevel]; }