1 /* -*- mode: c; c-basic-offset: 3 -*- */
3 * Copyright 2000 Gareth Hughes
6 * Permission is hereby granted, free of charge, to any person obtaining a
7 * copy of this software and associated documentation files (the "Software"),
8 * to deal in the Software without restriction, including without limitation
9 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
10 * and/or sell copies of the Software, and to permit persons to whom the
11 * Software is furnished to do so, subject to the following conditions:
13 * The above copyright notice and this permission notice (including the next
14 * paragraph) shall be included in all copies or substantial portions of the
17 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
18 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
19 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
20 * GARETH HUGHES BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER
21 * IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
22 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
27 * Gareth Hughes <gareth@valinux.com>
28 * Leif Delgass <ldelgass@retinalburn.net>
29 * José Fonseca <j_r_fonseca@yahoo.co.uk>
32 #include "mach64_context.h"
33 #include "mach64_ioctl.h"
34 #include "mach64_tex.h"
36 #include "main/simple_list.h"
37 #include "main/enums.h"
38 #include "main/texstore.h"
39 #include "main/teximage.h"
40 #include "main/texobj.h"
41 #include "main/imports.h"
44 static void mach64SetTexWrap( mach64TexObjPtr t,
45 GLenum swrap, GLenum twrap )
49 case GL_CLAMP_TO_EDGE:
50 case GL_CLAMP_TO_BORDER:
60 case GL_CLAMP_TO_EDGE:
61 case GL_CLAMP_TO_BORDER:
70 static void mach64SetTexFilter( mach64TexObjPtr t,
71 GLenum minf, GLenum magf )
75 case GL_NEAREST_MIPMAP_NEAREST:
76 case GL_NEAREST_MIPMAP_LINEAR:
77 t->BilinearMin = GL_FALSE;
80 case GL_LINEAR_MIPMAP_NEAREST:
81 case GL_LINEAR_MIPMAP_LINEAR:
82 t->BilinearMin = GL_TRUE;
88 t->BilinearMag = GL_FALSE;
91 t->BilinearMag = GL_TRUE;
96 static void mach64SetTexBorderColor( mach64TexObjPtr t, const GLfloat c[4] )
99 GLuint border = mach64PackColor( 4, c[0], c[1], c[2], c[3] );
104 static mach64TexObjPtr
105 mach64AllocTexObj( struct gl_texture_object *texObj )
109 if ( MACH64_DEBUG & DEBUG_VERBOSE_API )
110 fprintf( stderr, "%s( %p )\n", __FUNCTION__, texObj );
112 t = (mach64TexObjPtr) CALLOC_STRUCT( mach64_texture_object );
113 texObj->DriverData = t;
117 /* Initialize non-image-dependent parts of the state:
119 t->base.tObj = texObj;
120 t->base.dirty_images[0] = (1 << 0);
124 make_empty_list( (driTextureObject *) t );
126 mach64SetTexWrap( t, texObj->Sampler.WrapS, texObj->Sampler.WrapT );
127 mach64SetTexFilter( t, texObj->Sampler.MinFilter, texObj->Sampler.MagFilter );
128 mach64SetTexBorderColor( t, texObj->Sampler.BorderColor.f );
134 /* Called by the _mesa_store_teximage[123]d() functions. */
136 mach64ChooseTextureFormat( struct gl_context *ctx, GLint internalFormat,
137 GLenum format, GLenum type )
139 mach64ContextPtr mmesa = MACH64_CONTEXT(ctx);
143 switch ( internalFormat ) {
149 case GL_COMPRESSED_ALPHA:
151 case GL_LUMINANCE_ALPHA:
152 case GL_LUMINANCE4_ALPHA4:
153 case GL_LUMINANCE6_ALPHA2:
154 case GL_LUMINANCE8_ALPHA8:
155 case GL_LUMINANCE12_ALPHA4:
156 case GL_LUMINANCE12_ALPHA12:
157 case GL_LUMINANCE16_ALPHA16:
158 case GL_COMPRESSED_LUMINANCE_ALPHA:
162 case GL_COMPRESSED_RGBA:
163 if (mmesa->mach64Screen->cpp == 4)
164 return MESA_FORMAT_ARGB8888;
166 return MESA_FORMAT_ARGB4444;
169 if (mmesa->mach64Screen->cpp == 4)
170 return MESA_FORMAT_ARGB8888;
172 return MESA_FORMAT_ARGB1555;
179 if (mmesa->mach64Screen->cpp == 4)
180 return MESA_FORMAT_ARGB8888;
182 return MESA_FORMAT_ARGB4444;
193 case GL_COMPRESSED_RGB:
194 if (mmesa->mach64Screen->cpp == 4)
195 return MESA_FORMAT_ARGB8888;
197 return MESA_FORMAT_RGB565;
205 case GL_COMPRESSED_LUMINANCE:
206 if (mmesa->mach64Screen->cpp == 4)
207 return MESA_FORMAT_ARGB8888; /* inefficient but accurate */
209 return MESA_FORMAT_ARGB1555;
216 case GL_COMPRESSED_INTENSITY:
217 if (mmesa->mach64Screen->cpp == 4)
218 return MESA_FORMAT_ARGB8888; /* inefficient but accurate */
220 return MESA_FORMAT_ARGB4444;
223 case GL_COLOR_INDEX1_EXT:
224 case GL_COLOR_INDEX2_EXT:
225 case GL_COLOR_INDEX4_EXT:
226 case GL_COLOR_INDEX8_EXT:
227 case GL_COLOR_INDEX12_EXT:
228 case GL_COLOR_INDEX16_EXT:
229 return MESA_FORMAT_CI8;
232 if (type == GL_UNSIGNED_SHORT_8_8_APPLE ||
233 type == GL_UNSIGNED_BYTE)
234 return MESA_FORMAT_YCBCR;
236 return MESA_FORMAT_YCBCR_REV;
239 _mesa_problem( ctx, "unexpected format in %s", __FUNCTION__ );
240 return MESA_FORMAT_NONE;
244 static void mach64TexImage1D( struct gl_context *ctx, GLenum target, GLint level,
245 GLint internalFormat,
246 GLint width, GLint border,
247 GLenum format, GLenum type, const GLvoid *pixels,
248 const struct gl_pixelstore_attrib *packing,
249 struct gl_texture_object *texObj,
250 struct gl_texture_image *texImage )
252 mach64ContextPtr mmesa = MACH64_CONTEXT(ctx);
253 driTextureObject * t = (driTextureObject *) texObj->DriverData;
256 driSwapOutTextureObject( t );
259 t = (driTextureObject *) mach64AllocTexObj(texObj);
261 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexImage1D");
266 /* Note, this will call mach64ChooseTextureFormat */
267 _mesa_store_teximage1d( ctx, target, level, internalFormat,
268 width, border, format, type,
269 pixels, packing, texObj, texImage );
271 mmesa->new_state |= MACH64_NEW_TEXTURE;
274 static void mach64TexSubImage1D( struct gl_context *ctx,
279 GLenum format, GLenum type,
280 const GLvoid *pixels,
281 const struct gl_pixelstore_attrib *packing,
282 struct gl_texture_object *texObj,
283 struct gl_texture_image *texImage )
285 mach64ContextPtr mmesa = MACH64_CONTEXT(ctx);
286 driTextureObject * t = (driTextureObject *) texObj->DriverData;
288 assert( t ); /* this _should_ be true */
290 driSwapOutTextureObject( t );
293 t = (driTextureObject *) mach64AllocTexObj(texObj);
295 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexSubImage1D");
300 _mesa_store_texsubimage1d(ctx, target, level, xoffset, width,
301 format, type, pixels, packing, texObj,
304 mmesa->new_state |= MACH64_NEW_TEXTURE;
307 static void mach64TexImage2D( struct gl_context *ctx, GLenum target, GLint level,
308 GLint internalFormat,
309 GLint width, GLint height, GLint border,
310 GLenum format, GLenum type, const GLvoid *pixels,
311 const struct gl_pixelstore_attrib *packing,
312 struct gl_texture_object *texObj,
313 struct gl_texture_image *texImage )
315 mach64ContextPtr mmesa = MACH64_CONTEXT(ctx);
316 driTextureObject * t = (driTextureObject *) texObj->DriverData;
319 driSwapOutTextureObject( t );
322 t = (driTextureObject *) mach64AllocTexObj(texObj);
324 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexImage2D");
329 /* Note, this will call mach64ChooseTextureFormat */
330 _mesa_store_teximage2d( ctx, target, level, internalFormat,
331 width, height, border, format, type, pixels,
332 &ctx->Unpack, texObj, texImage );
334 mmesa->new_state |= MACH64_NEW_TEXTURE;
337 static void mach64TexSubImage2D( struct gl_context *ctx,
340 GLint xoffset, GLint yoffset,
341 GLsizei width, GLsizei height,
342 GLenum format, GLenum type,
343 const GLvoid *pixels,
344 const struct gl_pixelstore_attrib *packing,
345 struct gl_texture_object *texObj,
346 struct gl_texture_image *texImage )
348 mach64ContextPtr mmesa = MACH64_CONTEXT(ctx);
349 driTextureObject * t = (driTextureObject *) texObj->DriverData;
351 assert( t ); /* this _should_ be true */
353 driSwapOutTextureObject( t );
356 t = (driTextureObject *) mach64AllocTexObj(texObj);
358 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexSubImage2D");
363 _mesa_store_texsubimage2d(ctx, target, level, xoffset, yoffset, width,
364 height, format, type, pixels, packing, texObj,
367 mmesa->new_state |= MACH64_NEW_TEXTURE;
370 /* ================================================================
371 * Device Driver API texture functions
374 static void mach64DDTexEnv( struct gl_context *ctx, GLenum target,
375 GLenum pname, const GLfloat *param )
377 mach64ContextPtr mmesa = MACH64_CONTEXT(ctx);
379 struct gl_texture_unit *texUnit;
383 if ( MACH64_DEBUG & DEBUG_VERBOSE_API ) {
384 fprintf( stderr, "%s( %s )\n",
385 __FUNCTION__, _mesa_lookup_enum_by_nr( pname ) );
389 case GL_TEXTURE_ENV_MODE:
390 FLUSH_BATCH( mmesa );
391 mmesa->new_state |= MACH64_NEW_TEXTURE | MACH64_NEW_ALPHA;
395 case GL_TEXTURE_ENV_COLOR:
396 texUnit = &ctx->Texture.Unit[ctx->Texture.CurrentUnit];
397 CLAMPED_FLOAT_TO_UBYTE( c[0], texUnit->EnvColor[0] );
398 CLAMPED_FLOAT_TO_UBYTE( c[1], texUnit->EnvColor[1] );
399 CLAMPED_FLOAT_TO_UBYTE( c[2], texUnit->EnvColor[2] );
400 CLAMPED_FLOAT_TO_UBYTE( c[3], texUnit->EnvColor[3] );
401 mmesa->env_color = mach64PackColor( 32, c[0], c[1], c[2], c[3] );
402 if ( mmesa->setup.constant_color_c != mmesa->env_color ) {
403 FLUSH_BATCH( mmesa );
404 mmesa->setup.constant_color_c = mmesa->env_color;
406 mmesa->new_state |= MACH64_NEW_TEXTURE;
408 /* More complex multitexture/multipass fallbacks for GL_BLEND
409 * can be done later, but this allows a single pass GL_BLEND
410 * in some cases (ie. Performer town demo).
412 mmesa->blend_flags &= ~MACH64_BLEND_ENV_COLOR;
413 if ( mmesa->env_color != 0x00000000 &&
414 mmesa->env_color != 0xff000000 &&
415 mmesa->env_color != 0x00ffffff &&
416 mmesa->env_color != 0xffffffff )) {
417 mmesa->blend_flags |= MACH64_BLEND_ENV_COLOR;
428 static void mach64DDTexParameter( struct gl_context *ctx, GLenum target,
429 struct gl_texture_object *tObj,
430 GLenum pname, const GLfloat *params )
432 mach64ContextPtr mmesa = MACH64_CONTEXT(ctx);
433 mach64TexObjPtr t = (mach64TexObjPtr)tObj->DriverData;
435 if ( MACH64_DEBUG & DEBUG_VERBOSE_API ) {
436 fprintf( stderr, "%s( %s )\n",
437 __FUNCTION__, _mesa_lookup_enum_by_nr( pname ) );
440 if ( ( target != GL_TEXTURE_2D ) &&
441 ( target != GL_TEXTURE_1D ) ) {
446 t = mach64AllocTexObj(tObj);
448 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexParameter");
454 case GL_TEXTURE_MIN_FILTER:
455 case GL_TEXTURE_MAG_FILTER:
456 if ( t->base.bound ) FLUSH_BATCH( mmesa );
457 mach64SetTexFilter( t, tObj->Sampler.MinFilter, tObj->Sampler.MagFilter );
460 case GL_TEXTURE_WRAP_S:
461 case GL_TEXTURE_WRAP_T:
462 if ( t->base.bound ) FLUSH_BATCH( mmesa );
463 mach64SetTexWrap( t, tObj->Sampler.WrapS, tObj->Sampler.WrapT );
466 case GL_TEXTURE_BORDER_COLOR:
467 if ( t->base.bound ) FLUSH_BATCH( mmesa );
468 mach64SetTexBorderColor( t, tObj->Sampler.BorderColor.f );
471 case GL_TEXTURE_BASE_LEVEL:
472 /* From Radeon/Rage128:
473 * This isn't the most efficient solution but there doesn't appear to
474 * be a nice alternative. Since there's no LOD clamping,
475 * we just have to rely on loading the right subset of mipmap levels
476 * to simulate a clamped LOD.
478 * For mach64 we're only concerned with the base level
479 * since that's the only texture we upload.
481 if ( t->base.bound ) FLUSH_BATCH( mmesa );
482 driSwapOutTextureObject( (driTextureObject *) t );
489 mmesa->new_state |= MACH64_NEW_TEXTURE;
492 static void mach64DDBindTexture( struct gl_context *ctx, GLenum target,
493 struct gl_texture_object *tObj )
495 mach64ContextPtr mmesa = MACH64_CONTEXT(ctx);
496 GLint unit = ctx->Texture.CurrentUnit;
498 if ( MACH64_DEBUG & DEBUG_VERBOSE_API ) {
499 fprintf( stderr, "%s( %p ) unit=%d\n",
500 __FUNCTION__, tObj, unit );
503 FLUSH_BATCH( mmesa );
505 if ( mmesa->CurrentTexObj[unit] ) {
506 mmesa->CurrentTexObj[unit]->base.bound &= ~(1 << unit);
507 mmesa->CurrentTexObj[unit] = NULL;
510 mmesa->new_state |= MACH64_NEW_TEXTURE;
513 static void mach64DDDeleteTexture( struct gl_context *ctx,
514 struct gl_texture_object *tObj )
516 mach64ContextPtr mmesa = MACH64_CONTEXT(ctx);
517 driTextureObject * t = (driTextureObject *) tObj->DriverData;
520 if ( t->bound && mmesa ) {
521 FLUSH_BATCH( mmesa );
523 mmesa->new_state |= MACH64_NEW_TEXTURE;
526 driDestroyTextureObject( t );
528 /* Free mipmap images and the texture object itself */
529 _mesa_delete_texture_object(ctx, tObj);
534 * Allocate a new texture object.
535 * Called via ctx->Driver.NewTextureObject.
536 * Note: we could use containment here to 'derive' the driver-specific
537 * texture object from the core mesa gl_texture_object. Not done at this time.
539 static struct gl_texture_object *
540 mach64NewTextureObject( struct gl_context *ctx, GLuint name, GLenum target )
542 struct gl_texture_object *obj;
543 obj = _mesa_new_texture_object(ctx, name, target);
544 mach64AllocTexObj( obj );
548 void mach64InitTextureFuncs( struct dd_function_table *functions )
550 functions->TexEnv = mach64DDTexEnv;
551 functions->ChooseTextureFormat = mach64ChooseTextureFormat;
552 functions->TexImage1D = mach64TexImage1D;
553 functions->TexSubImage1D = mach64TexSubImage1D;
554 functions->TexImage2D = mach64TexImage2D;
555 functions->TexSubImage2D = mach64TexSubImage2D;
556 functions->TexParameter = mach64DDTexParameter;
557 functions->BindTexture = mach64DDBindTexture;
558 functions->NewTextureObject = mach64NewTextureObject;
559 functions->DeleteTexture = mach64DDDeleteTexture;
560 functions->IsTextureResident = driIsTextureResident;
562 driInitTextureFormats();