projects / mesa.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
Merge remote branch 'main/master' into radeon-rewrite
[mesa.git] / src / mesa / main / texstore.c
1 /*
2 * Mesa 3-D graphics library
3 * Version: 7.3
4 *
5 * Copyright (C) 1999-2008 Brian Paul All Rights Reserved.
6 * Copyright (c) 2008 VMware, Inc.
7 *
8 * Permission is hereby granted, free of charge, to any person obtaining a
9 * copy of this software and associated documentation files (the "Software"),
10 * to deal in the Software without restriction, including without limitation
11 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
12 * and/or sell copies of the Software, and to permit persons to whom the
13 * Software is furnished to do so, subject to the following conditions:
14 *
15 * The above copyright notice and this permission notice shall be included
16 * in all copies or substantial portions of the Software.
17 *
18 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
19 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
20 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
21 * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
22 * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
23 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
24 */
25
26 /*
27 * Authors:
28 * Brian Paul
29 */
30
31 /**
32 * The GL texture image functions in teximage.c basically just do
33 * error checking and data structure allocation. They in turn call
34 * device driver functions which actually copy/convert/store the user's
35 * texture image data.
36 *
37 * However, most device drivers will be able to use the fallback functions
38 * in this file. That is, most drivers will have the following bit of
39 * code:
40 * ctx->Driver.TexImage1D = _mesa_store_teximage1d;
41 * ctx->Driver.TexImage2D = _mesa_store_teximage2d;
42 * ctx->Driver.TexImage3D = _mesa_store_teximage3d;
43 * etc...
44 *
45 * Texture image processing is actually kind of complicated. We have to do:
46 * Format/type conversions
47 * pixel unpacking
48 * pixel transfer (scale, bais, lookup, convolution!, etc)
49 *
50 * These functions can handle most everything, including processing full
51 * images and sub-images.
52 */
53
54
55 #include "glheader.h"
56 #include "bufferobj.h"
57 #include "colormac.h"
58 #include "context.h"
59 #if FEATURE_convolve
60 #include "convolve.h"
61 #endif
62 #include "image.h"
63 #include "macros.h"
64 #include "mipmap.h"
65 #include "imports.h"
66 #include "texcompress.h"
67 #include "texformat.h"
68 #include "teximage.h"
69 #include "texstore.h"
70 #include "enums.h"
71
72
73 enum {
74 ZERO = 4,
75 ONE = 5
76 };
77
78
79 /**
80 * Return GL_TRUE if the given image format is one that be converted
81 * to another format by swizzling.
82 */
83 static GLboolean
84 can_swizzle(GLenum logicalBaseFormat)
85 {
86 switch (logicalBaseFormat) {
87 case GL_RGBA:
88 case GL_RGB:
89 case GL_LUMINANCE_ALPHA:
90 case GL_INTENSITY:
91 case GL_ALPHA:
92 case GL_LUMINANCE:
93 case GL_RED:
94 case GL_GREEN:
95 case GL_BLUE:
96 case GL_BGR:
97 case GL_BGRA:
98 case GL_ABGR_EXT:
99 return GL_TRUE;
100 default:
101 return GL_FALSE;
102 }
103 }
104
105
106
107 enum {
108 IDX_LUMINANCE = 0,
109 IDX_ALPHA,
110 IDX_INTENSITY,
111 IDX_LUMINANCE_ALPHA,
112 IDX_RGB,
113 IDX_RGBA,
114 IDX_RED,
115 IDX_GREEN,
116 IDX_BLUE,
117 IDX_BGR,
118 IDX_BGRA,
119 IDX_ABGR,
120 MAX_IDX
121 };
122
123 #define MAP1(x) MAP4(x, ZERO, ZERO, ZERO)
124 #define MAP2(x,y) MAP4(x, y, ZERO, ZERO)
125 #define MAP3(x,y,z) MAP4(x, y, z, ZERO)
126 #define MAP4(x,y,z,w) { x, y, z, w, ZERO, ONE }
127
128
129 static const struct {
130 GLubyte format_idx;
131 GLubyte to_rgba[6];
132 GLubyte from_rgba[6];
133 } mappings[MAX_IDX] =
134 {
135 {
136 IDX_LUMINANCE,
137 MAP4(0,0,0,ONE),
138 MAP1(0)
139 },
140
141 {
142 IDX_ALPHA,
143 MAP4(ZERO, ZERO, ZERO, 0),
144 MAP1(3)
145 },
146
147 {
148 IDX_INTENSITY,
149 MAP4(0, 0, 0, 0),
150 MAP1(0),
151 },
152
153 {
154 IDX_LUMINANCE_ALPHA,
155 MAP4(0,0,0,1),
156 MAP2(0,3)
157 },
158
159 {
160 IDX_RGB,
161 MAP4(0,1,2,ONE),
162 MAP3(0,1,2)
163 },
164
165 {
166 IDX_RGBA,
167 MAP4(0,1,2,3),
168 MAP4(0,1,2,3),
169 },
170
171
172 {
173 IDX_RED,
174 MAP4(0, ZERO, ZERO, ONE),
175 MAP1(0),
176 },
177
178 {
179 IDX_GREEN,
180 MAP4(ZERO, 0, ZERO, ONE),
181 MAP1(1),
182 },
183
184 {
185 IDX_BLUE,
186 MAP4(ZERO, ZERO, 0, ONE),
187 MAP1(2),
188 },
189
190 {
191 IDX_BGR,
192 MAP4(2,1,0,ONE),
193 MAP3(2,1,0)
194 },
195
196 {
197 IDX_BGRA,
198 MAP4(2,1,0,3),
199 MAP4(2,1,0,3)
200 },
201
202 {
203 IDX_ABGR,
204 MAP4(3,2,1,0),
205 MAP4(3,2,1,0)
206 },
207 };
208
209
210
211 /**
212 * Convert a GL image format enum to an IDX_* value (see above).
213 */
214 static int
215 get_map_idx(GLenum value)
216 {
217 switch (value) {
218 case GL_LUMINANCE: return IDX_LUMINANCE;
219 case GL_ALPHA: return IDX_ALPHA;
220 case GL_INTENSITY: return IDX_INTENSITY;
221 case GL_LUMINANCE_ALPHA: return IDX_LUMINANCE_ALPHA;
222 case GL_RGB: return IDX_RGB;
223 case GL_RGBA: return IDX_RGBA;
224 case GL_RED: return IDX_RED;
225 case GL_GREEN: return IDX_GREEN;
226 case GL_BLUE: return IDX_BLUE;
227 case GL_BGR: return IDX_BGR;
228 case GL_BGRA: return IDX_BGRA;
229 case GL_ABGR_EXT: return IDX_ABGR;
230 default:
231 _mesa_problem(NULL, "Unexpected inFormat");
232 return 0;
233 }
234 }
235
236
237 /**
238 * When promoting texture formats (see below) we need to compute the
239 * mapping of dest components back to source components.
240 * This function does that.
241 * \param inFormat the incoming format of the texture
242 * \param outFormat the final texture format
243 * \return map[6] a full 6-component map
244 */
245 static void
246 compute_component_mapping(GLenum inFormat, GLenum outFormat,
247 GLubyte *map)
248 {
249 const int inFmt = get_map_idx(inFormat);
250 const int outFmt = get_map_idx(outFormat);
251 const GLubyte *in2rgba = mappings[inFmt].to_rgba;
252 const GLubyte *rgba2out = mappings[outFmt].from_rgba;
253 int i;
254
255 for (i = 0; i < 4; i++)
256 map[i] = in2rgba[rgba2out[i]];
257
258 map[ZERO] = ZERO;
259 map[ONE] = ONE;
260
261 /*
262 _mesa_printf("from %x/%s to %x/%s map %d %d %d %d %d %d\n",
263 inFormat, _mesa_lookup_enum_by_nr(inFormat),
264 outFormat, _mesa_lookup_enum_by_nr(outFormat),
265 map[0],
266 map[1],
267 map[2],
268 map[3],
269 map[4],
270 map[5]);
271 */
272 }
273
274
275 #if !FEATURE_convolve
276 static void
277 _mesa_adjust_image_for_convolution(GLcontext *ctx, GLuint dims,
278 GLsizei *srcWidth, GLsizei *srcHeight)
279 {
280 /* no-op */
281 }
282 #endif
283
284
285 /**
286 * Make a temporary (color) texture image with GLfloat components.
287 * Apply all needed pixel unpacking and pixel transfer operations.
288 * Note that there are both logicalBaseFormat and textureBaseFormat parameters.
289 * Suppose the user specifies GL_LUMINANCE as the internal texture format
290 * but the graphics hardware doesn't support luminance textures. So, might
291 * use an RGB hardware format instead.
292 * If logicalBaseFormat != textureBaseFormat we have some extra work to do.
293 *
294 * \param ctx the rendering context
295 * \param dims image dimensions: 1, 2 or 3
296 * \param logicalBaseFormat basic texture derived from the user's
297 * internal texture format value
298 * \param textureBaseFormat the actual basic format of the texture
299 * \param srcWidth source image width
300 * \param srcHeight source image height
301 * \param srcDepth source image depth
302 * \param srcFormat source image format
303 * \param srcType source image type
304 * \param srcAddr source image address
305 * \param srcPacking source image pixel packing
306 * \return resulting image with format = textureBaseFormat and type = GLfloat.
307 */
308 static GLfloat *
309 make_temp_float_image(GLcontext *ctx, GLuint dims,
310 GLenum logicalBaseFormat,
311 GLenum textureBaseFormat,
312 GLint srcWidth, GLint srcHeight, GLint srcDepth,
313 GLenum srcFormat, GLenum srcType,
314 const GLvoid *srcAddr,
315 const struct gl_pixelstore_attrib *srcPacking)
316 {
317 GLuint transferOps = ctx->_ImageTransferState;
318 GLfloat *tempImage;
319
320 ASSERT(dims >= 1 && dims <= 3);
321
322 ASSERT(logicalBaseFormat == GL_RGBA ||
323 logicalBaseFormat == GL_RGB ||
324 logicalBaseFormat == GL_LUMINANCE_ALPHA ||
325 logicalBaseFormat == GL_LUMINANCE ||
326 logicalBaseFormat == GL_ALPHA ||
327 logicalBaseFormat == GL_INTENSITY ||
328 logicalBaseFormat == GL_COLOR_INDEX ||
329 logicalBaseFormat == GL_DEPTH_COMPONENT);
330
331 ASSERT(textureBaseFormat == GL_RGBA ||
332 textureBaseFormat == GL_RGB ||
333 textureBaseFormat == GL_LUMINANCE_ALPHA ||
334 textureBaseFormat == GL_LUMINANCE ||
335 textureBaseFormat == GL_ALPHA ||
336 textureBaseFormat == GL_INTENSITY ||
337 textureBaseFormat == GL_COLOR_INDEX ||
338 textureBaseFormat == GL_DEPTH_COMPONENT);
339
340 /* conventional color image */
341
342 if ((dims == 1 && ctx->Pixel.Convolution1DEnabled) ||
343 (dims >= 2 && ctx->Pixel.Convolution2DEnabled) ||
344 (dims >= 2 && ctx->Pixel.Separable2DEnabled)) {
345 /* need image convolution */
346 const GLuint preConvTransferOps
347 = (transferOps & IMAGE_PRE_CONVOLUTION_BITS) | IMAGE_CLAMP_BIT;
348 const GLuint postConvTransferOps
349 = (transferOps & IMAGE_POST_CONVOLUTION_BITS) | IMAGE_CLAMP_BIT;
350 GLint img, row;
351 GLint convWidth, convHeight;
352 GLfloat *convImage;
353
354 /* pre-convolution image buffer (3D) */
355 tempImage = (GLfloat *) _mesa_malloc(srcWidth * srcHeight * srcDepth
356 * 4 * sizeof(GLfloat));
357 if (!tempImage)
358 return NULL;
359
360 /* post-convolution image buffer (2D) */
361 convImage = (GLfloat *) _mesa_malloc(srcWidth * srcHeight
362 * 4 * sizeof(GLfloat));
363 if (!convImage) {
364 _mesa_free(tempImage);
365 return NULL;
366 }
367
368 /* loop over 3D image slices */
369 for (img = 0; img < srcDepth; img++) {
370 GLfloat *dst = tempImage + img * (srcWidth * srcHeight * 4);
371
372 /* unpack and do transfer ops up to convolution */
373 for (row = 0; row < srcHeight; row++) {
374 const GLvoid *src = _mesa_image_address(dims, srcPacking,
375 srcAddr, srcWidth, srcHeight,
376 srcFormat, srcType, img, row, 0);
377 _mesa_unpack_color_span_float(ctx, srcWidth, GL_RGBA, dst,
378 srcFormat, srcType, src,
379 srcPacking,
380 preConvTransferOps);
381 dst += srcWidth * 4;
382 }
383
384 /* size after optional convolution */
385 convWidth = srcWidth;
386 convHeight = srcHeight;
387
388 #if FEATURE_convolve
389 /* do convolution */
390 {
391 GLfloat *src = tempImage + img * (srcWidth * srcHeight * 4);
392 if (dims == 1) {
393 ASSERT(ctx->Pixel.Convolution1DEnabled);
394 _mesa_convolve_1d_image(ctx, &convWidth, src, convImage);
395 }
396 else {
397 if (ctx->Pixel.Convolution2DEnabled) {
398 _mesa_convolve_2d_image(ctx, &convWidth, &convHeight,
399 src, convImage);
400 }
401 else {
402 ASSERT(ctx->Pixel.Separable2DEnabled);
403 _mesa_convolve_sep_image(ctx, &convWidth, &convHeight,
404 src, convImage);
405 }
406 }
407 }
408 #endif
409 /* do post-convolution transfer and pack into tempImage */
410 {
411 const GLint logComponents
412 = _mesa_components_in_format(logicalBaseFormat);
413 const GLfloat *src = convImage;
414 GLfloat *dst = tempImage + img * (convWidth * convHeight * 4);
415 for (row = 0; row < convHeight; row++) {
416 _mesa_pack_rgba_span_float(ctx, convWidth,
417 (GLfloat (*)[4]) src,
418 logicalBaseFormat, GL_FLOAT,
419 dst, &ctx->DefaultPacking,
420 postConvTransferOps);
421 src += convWidth * 4;
422 dst += convWidth * logComponents;
423 }
424 }
425 } /* loop over 3D image slices */
426
427 _mesa_free(convImage);
428
429 /* might need these below */
430 srcWidth = convWidth;
431 srcHeight = convHeight;
432 }
433 else {
434 /* no convolution */
435 const GLint components = _mesa_components_in_format(logicalBaseFormat);
436 const GLint srcStride = _mesa_image_row_stride(srcPacking,
437 srcWidth, srcFormat, srcType);
438 GLfloat *dst;
439 GLint img, row;
440
441 tempImage = (GLfloat *) _mesa_malloc(srcWidth * srcHeight * srcDepth
442 * components * sizeof(GLfloat));
443 if (!tempImage)
444 return NULL;
445
446 dst = tempImage;
447 for (img = 0; img < srcDepth; img++) {
448 const GLubyte *src
449 = (const GLubyte *) _mesa_image_address(dims, srcPacking, srcAddr,
450 srcWidth, srcHeight,
451 srcFormat, srcType,
452 img, 0, 0);
453 for (row = 0; row < srcHeight; row++) {
454 _mesa_unpack_color_span_float(ctx, srcWidth, logicalBaseFormat,
455 dst, srcFormat, srcType, src,
456 srcPacking, transferOps);
457 dst += srcWidth * components;
458 src += srcStride;
459 }
460 }
461 }
462
463 if (logicalBaseFormat != textureBaseFormat) {
464 /* more work */
465 GLint texComponents = _mesa_components_in_format(textureBaseFormat);
466 GLint logComponents = _mesa_components_in_format(logicalBaseFormat);
467 GLfloat *newImage;
468 GLint i, n;
469 GLubyte map[6];
470
471 /* we only promote up to RGB, RGBA and LUMINANCE_ALPHA formats for now */
472 ASSERT(textureBaseFormat == GL_RGB || textureBaseFormat == GL_RGBA ||
473 textureBaseFormat == GL_LUMINANCE_ALPHA);
474
475 /* The actual texture format should have at least as many components
476 * as the logical texture format.
477 */
478 ASSERT(texComponents >= logComponents);
479
480 newImage = (GLfloat *) _mesa_malloc(srcWidth * srcHeight * srcDepth
481 * texComponents * sizeof(GLfloat));
482 if (!newImage) {
483 _mesa_free(tempImage);
484 return NULL;
485 }
486
487 compute_component_mapping(logicalBaseFormat, textureBaseFormat, map);
488
489 n = srcWidth * srcHeight * srcDepth;
490 for (i = 0; i < n; i++) {
491 GLint k;
492 for (k = 0; k < texComponents; k++) {
493 GLint j = map[k];
494 if (j == ZERO)
495 newImage[i * texComponents + k] = 0.0F;
496 else if (j == ONE)
497 newImage[i * texComponents + k] = 1.0F;
498 else
499 newImage[i * texComponents + k] = tempImage[i * logComponents + j];
500 }
501 }
502
503 _mesa_free(tempImage);
504 tempImage = newImage;
505 }
506
507 return tempImage;
508 }
509
510
511 /**
512 * Make a temporary (color) texture image with GLchan components.
513 * Apply all needed pixel unpacking and pixel transfer operations.
514 * Note that there are both logicalBaseFormat and textureBaseFormat parameters.
515 * Suppose the user specifies GL_LUMINANCE as the internal texture format
516 * but the graphics hardware doesn't support luminance textures. So, might
517 * use an RGB hardware format instead.
518 * If logicalBaseFormat != textureBaseFormat we have some extra work to do.
519 *
520 * \param ctx the rendering context
521 * \param dims image dimensions: 1, 2 or 3
522 * \param logicalBaseFormat basic texture derived from the user's
523 * internal texture format value
524 * \param textureBaseFormat the actual basic format of the texture
525 * \param srcWidth source image width
526 * \param srcHeight source image height
527 * \param srcDepth source image depth
528 * \param srcFormat source image format
529 * \param srcType source image type
530 * \param srcAddr source image address
531 * \param srcPacking source image pixel packing
532 * \return resulting image with format = textureBaseFormat and type = GLchan.
533 */
534 GLchan *
535 _mesa_make_temp_chan_image(GLcontext *ctx, GLuint dims,
536 GLenum logicalBaseFormat,
537 GLenum textureBaseFormat,
538 GLint srcWidth, GLint srcHeight, GLint srcDepth,
539 GLenum srcFormat, GLenum srcType,
540 const GLvoid *srcAddr,
541 const struct gl_pixelstore_attrib *srcPacking)
542 {
543 GLuint transferOps = ctx->_ImageTransferState;
544 const GLint components = _mesa_components_in_format(logicalBaseFormat);
545 GLboolean freeSrcImage = GL_FALSE;
546 GLint img, row;
547 GLchan *tempImage, *dst;
548
549 ASSERT(dims >= 1 && dims <= 3);
550
551 ASSERT(logicalBaseFormat == GL_RGBA ||
552 logicalBaseFormat == GL_RGB ||
553 logicalBaseFormat == GL_LUMINANCE_ALPHA ||
554 logicalBaseFormat == GL_LUMINANCE ||
555 logicalBaseFormat == GL_ALPHA ||
556 logicalBaseFormat == GL_INTENSITY);
557
558 ASSERT(textureBaseFormat == GL_RGBA ||
559 textureBaseFormat == GL_RGB ||
560 textureBaseFormat == GL_LUMINANCE_ALPHA ||
561 textureBaseFormat == GL_LUMINANCE ||
562 textureBaseFormat == GL_ALPHA ||
563 textureBaseFormat == GL_INTENSITY);
564
565 #if FEATURE_convolve
566 if ((dims == 1 && ctx->Pixel.Convolution1DEnabled) ||
567 (dims >= 2 && ctx->Pixel.Convolution2DEnabled) ||
568 (dims >= 2 && ctx->Pixel.Separable2DEnabled)) {
569 /* get convolved image */
570 GLfloat *convImage = make_temp_float_image(ctx, dims,
571 logicalBaseFormat,
572 logicalBaseFormat,
573 srcWidth, srcHeight, srcDepth,
574 srcFormat, srcType,
575 srcAddr, srcPacking);
576 if (!convImage)
577 return NULL;
578 /* the convolved image is our new source image */
579 srcAddr = convImage;
580 srcFormat = logicalBaseFormat;
581 srcType = GL_FLOAT;
582 srcPacking = &ctx->DefaultPacking;
583 _mesa_adjust_image_for_convolution(ctx, dims, &srcWidth, &srcHeight);
584 transferOps = 0;
585 freeSrcImage = GL_TRUE;
586 }
587 #endif
588
589 /* unpack and transfer the source image */
590 tempImage = (GLchan *) _mesa_malloc(srcWidth * srcHeight * srcDepth
591 * components * sizeof(GLchan));
592 if (!tempImage)
593 return NULL;
594
595 dst = tempImage;
596 for (img = 0; img < srcDepth; img++) {
597 const GLint srcStride = _mesa_image_row_stride(srcPacking,
598 srcWidth, srcFormat,
599 srcType);
600 const GLubyte *src
601 = (const GLubyte *) _mesa_image_address(dims, srcPacking, srcAddr,
602 srcWidth, srcHeight,
603 srcFormat, srcType,
604 img, 0, 0);
605 for (row = 0; row < srcHeight; row++) {
606 _mesa_unpack_color_span_chan(ctx, srcWidth, logicalBaseFormat, dst,
607 srcFormat, srcType, src, srcPacking,
608 transferOps);
609 dst += srcWidth * components;
610 src += srcStride;
611 }
612 }
613
614 /* If we made a temporary image for convolution, free it here */
615 if (freeSrcImage) {
616 _mesa_free((void *) srcAddr);
617 }
618
619 if (logicalBaseFormat != textureBaseFormat) {
620 /* one more conversion step */
621 GLint texComponents = _mesa_components_in_format(textureBaseFormat);
622 GLint logComponents = _mesa_components_in_format(logicalBaseFormat);
623 GLchan *newImage;
624 GLint i, n;
625 GLubyte map[6];
626
627 /* we only promote up to RGB, RGBA and LUMINANCE_ALPHA formats for now */
628 ASSERT(textureBaseFormat == GL_RGB || textureBaseFormat == GL_RGBA ||
629 textureBaseFormat == GL_LUMINANCE_ALPHA);
630
631 /* The actual texture format should have at least as many components
632 * as the logical texture format.
633 */
634 ASSERT(texComponents >= logComponents);
635
636 newImage = (GLchan *) _mesa_malloc(srcWidth * srcHeight * srcDepth
637 * texComponents * sizeof(GLchan));
638 if (!newImage) {
639 _mesa_free(tempImage);
640 return NULL;
641 }
642
643 compute_component_mapping(logicalBaseFormat, textureBaseFormat, map);
644
645 n = srcWidth * srcHeight * srcDepth;
646 for (i = 0; i < n; i++) {
647 GLint k;
648 for (k = 0; k < texComponents; k++) {
649 GLint j = map[k];
650 if (j == ZERO)
651 newImage[i * texComponents + k] = 0;
652 else if (j == ONE)
653 newImage[i * texComponents + k] = CHAN_MAX;
654 else
655 newImage[i * texComponents + k] = tempImage[i * logComponents + j];
656 }
657 }
658
659 _mesa_free(tempImage);
660 tempImage = newImage;
661 }
662
663 return tempImage;
664 }
665
666
667 /**
668 * Copy GLubyte pixels from <src> to <dst> with swizzling.
669 * \param dst destination pixels
670 * \param dstComponents number of color components in destination pixels
671 * \param src source pixels
672 * \param srcComponents number of color components in source pixels
673 * \param map the swizzle mapping. map[X] says where to find the X component
674 * in the source image's pixels. For example, if the source image
675 * is GL_BGRA and X = red, map[0] yields 2.
676 * \param count number of pixels to copy/swizzle.
677 */
678 static void
679 swizzle_copy(GLubyte *dst, GLuint dstComponents, const GLubyte *src,
680 GLuint srcComponents, const GLubyte *map, GLuint count)
681 {
682 #define SWZ_CPY(dst, src, count, dstComps, srcComps) \
683 do { \
684 GLuint i; \
685 for (i = 0; i < count; i++) { \
686 GLuint j; \
687 if (srcComps == 4) { \
688 COPY_4UBV(tmp, src); \
689 } \
690 else { \
691 for (j = 0; j < srcComps; j++) { \
692 tmp[j] = src[j]; \
693 } \
694 } \
695 src += srcComps; \
696 for (j = 0; j < dstComps; j++) { \
697 dst[j] = tmp[map[j]]; \
698 } \
699 dst += dstComps; \
700 } \
701 } while (0)
702
703 GLubyte tmp[6];
704
705 tmp[ZERO] = 0x0;
706 tmp[ONE] = 0xff;
707
708 ASSERT(srcComponents <= 4);
709 ASSERT(dstComponents <= 4);
710
711 switch (dstComponents) {
712 case 4:
713 switch (srcComponents) {
714 case 4:
715 SWZ_CPY(dst, src, count, 4, 4);
716 break;
717 case 3:
718 SWZ_CPY(dst, src, count, 4, 3);
719 break;
720 case 2:
721 SWZ_CPY(dst, src, count, 4, 2);
722 break;
723 case 1:
724 SWZ_CPY(dst, src, count, 4, 1);
725 break;
726 default:
727 ;
728 }
729 break;
730 case 3:
731 switch (srcComponents) {
732 case 4:
733 SWZ_CPY(dst, src, count, 3, 4);
734 break;
735 case 3:
736 SWZ_CPY(dst, src, count, 3, 3);
737 break;
738 case 2:
739 SWZ_CPY(dst, src, count, 3, 2);
740 break;
741 case 1:
742 SWZ_CPY(dst, src, count, 3, 1);
743 break;
744 default:
745 ;
746 }
747 break;
748 case 2:
749 switch (srcComponents) {
750 case 4:
751 SWZ_CPY(dst, src, count, 2, 4);
752 break;
753 case 3:
754 SWZ_CPY(dst, src, count, 2, 3);
755 break;
756 case 2:
757 SWZ_CPY(dst, src, count, 2, 2);
758 break;
759 case 1:
760 SWZ_CPY(dst, src, count, 2, 1);
761 break;
762 default:
763 ;
764 }
765 break;
766 case 1:
767 switch (srcComponents) {
768 case 4:
769 SWZ_CPY(dst, src, count, 1, 4);
770 break;
771 case 3:
772 SWZ_CPY(dst, src, count, 1, 3);
773 break;
774 case 2:
775 SWZ_CPY(dst, src, count, 1, 2);
776 break;
777 case 1:
778 SWZ_CPY(dst, src, count, 1, 1);
779 break;
780 default:
781 ;
782 }
783 break;
784 default:
785 ;
786 }
787 #undef SWZ_CPY
788 }
789
790
791
792 static const GLubyte map_identity[6] = { 0, 1, 2, 3, ZERO, ONE };
793 static const GLubyte map_3210[6] = { 3, 2, 1, 0, ZERO, ONE };
794
795 /* Deal with the _REV input types:
796 */
797 static const GLubyte *
798 type_mapping( GLenum srcType )
799 {
800 switch (srcType) {
801 case GL_UNSIGNED_BYTE:
802 return map_identity;
803 case GL_UNSIGNED_INT_8_8_8_8:
804 return _mesa_little_endian() ? map_3210 : map_identity;
805 case GL_UNSIGNED_INT_8_8_8_8_REV:
806 return _mesa_little_endian() ? map_identity : map_3210;
807 default:
808 return NULL;
809 }
810 }
811
812 /* Mapping required if input type is
813 */
814 static const GLubyte *
815 byteswap_mapping( GLboolean swapBytes,
816 GLenum srcType )
817 {
818 if (!swapBytes)
819 return map_identity;
820
821 switch (srcType) {
822 case GL_UNSIGNED_BYTE:
823 return map_identity;
824 case GL_UNSIGNED_INT_8_8_8_8:
825 case GL_UNSIGNED_INT_8_8_8_8_REV:
826 return map_3210;
827 default:
828 return NULL;
829 }
830 }
831
832
833
834 /**
835 * Transfer a GLubyte texture image with component swizzling.
836 */
837 static void
838 _mesa_swizzle_ubyte_image(GLcontext *ctx,
839 GLuint dimensions,
840 GLenum srcFormat,
841 GLenum srcType,
842
843 GLenum baseInternalFormat,
844
845 const GLubyte *rgba2dst,
846 GLuint dstComponents,
847
848 GLvoid *dstAddr,
849 GLint dstXoffset, GLint dstYoffset, GLint dstZoffset,
850 GLint dstRowStride,
851 const GLuint *dstImageOffsets,
852
853 GLint srcWidth, GLint srcHeight, GLint srcDepth,
854 const GLvoid *srcAddr,
855 const struct gl_pixelstore_attrib *srcPacking )
856 {
857 GLint srcComponents = _mesa_components_in_format(srcFormat);
858 const GLubyte *srctype2ubyte, *swap;
859 GLubyte map[4], src2base[6], base2rgba[6];
860 GLint i;
861 const GLint srcRowStride =
862 _mesa_image_row_stride(srcPacking, srcWidth,
863 srcFormat, GL_UNSIGNED_BYTE);
864 const GLint srcImageStride
865 = _mesa_image_image_stride(srcPacking, srcWidth, srcHeight, srcFormat,
866 GL_UNSIGNED_BYTE);
867 const GLubyte *srcImage
868 = (const GLubyte *) _mesa_image_address(dimensions, srcPacking, srcAddr,
869 srcWidth, srcHeight, srcFormat,
870 GL_UNSIGNED_BYTE, 0, 0, 0);
871
872 (void) ctx;
873
874 /* Translate from src->baseInternal->GL_RGBA->dst. This will
875 * correctly deal with RGBA->RGB->RGBA conversions where the final
876 * A value must be 0xff regardless of the incoming alpha values.
877 */
878 compute_component_mapping(srcFormat, baseInternalFormat, src2base);
879 compute_component_mapping(baseInternalFormat, GL_RGBA, base2rgba);
880 swap = byteswap_mapping(srcPacking->SwapBytes, srcType);
881 srctype2ubyte = type_mapping(srcType);
882
883
884 for (i = 0; i < 4; i++)
885 map[i] = srctype2ubyte[swap[src2base[base2rgba[rgba2dst[i]]]]];
886
887 /* _mesa_printf("map %d %d %d %d\n", map[0], map[1], map[2], map[3]); */
888
889 if (srcComponents == dstComponents &&
890 srcRowStride == dstRowStride &&
891 srcRowStride == srcWidth * srcComponents &&
892 dimensions < 3) {
893 /* 1 and 2D images only */
894 GLubyte *dstImage = (GLubyte *) dstAddr
895 + dstYoffset * dstRowStride
896 + dstXoffset * dstComponents;
897 swizzle_copy(dstImage, dstComponents, srcImage, srcComponents, map,
898 srcWidth * srcHeight);
899 }
900 else {
901 GLint img, row;
902 for (img = 0; img < srcDepth; img++) {
903 const GLubyte *srcRow = srcImage;
904 GLubyte *dstRow = (GLubyte *) dstAddr
905 + dstImageOffsets[dstZoffset + img] * dstComponents
906 + dstYoffset * dstRowStride
907 + dstXoffset * dstComponents;
908 for (row = 0; row < srcHeight; row++) {
909 swizzle_copy(dstRow, dstComponents, srcRow, srcComponents, map, srcWidth);
910 dstRow += dstRowStride;
911 srcRow += srcRowStride;
912 }
913 srcImage += srcImageStride;
914 }
915 }
916 }
917
918
919 /**
920 * Teximage storage routine for when a simple memcpy will do.
921 * No pixel transfer operations or special texel encodings allowed.
922 * 1D, 2D and 3D images supported.
923 */
924 static void
925 memcpy_texture(GLcontext *ctx,
926 GLuint dimensions,
927 const struct gl_texture_format *dstFormat,
928 GLvoid *dstAddr,
929 GLint dstXoffset, GLint dstYoffset, GLint dstZoffset,
930 GLint dstRowStride,
931 const GLuint *dstImageOffsets,
932 GLint srcWidth, GLint srcHeight, GLint srcDepth,
933 GLenum srcFormat, GLenum srcType,
934 const GLvoid *srcAddr,
935 const struct gl_pixelstore_attrib *srcPacking)
936 {
937 const GLint srcRowStride = _mesa_image_row_stride(srcPacking, srcWidth,
938 srcFormat, srcType);
939 const GLint srcImageStride = _mesa_image_image_stride(srcPacking,
940 srcWidth, srcHeight, srcFormat, srcType);
941 const GLubyte *srcImage = (const GLubyte *) _mesa_image_address(dimensions,
942 srcPacking, srcAddr, srcWidth, srcHeight, srcFormat, srcType, 0, 0, 0);
943 const GLint bytesPerRow = srcWidth * dstFormat->TexelBytes;
944
945 #if 0
946 /* XXX update/re-enable for dstImageOffsets array */
947 const GLint bytesPerImage = srcHeight * bytesPerRow;
948 const GLint bytesPerTexture = srcDepth * bytesPerImage;
949 GLubyte *dstImage = (GLubyte *) dstAddr
950 + dstZoffset * dstImageStride
951 + dstYoffset * dstRowStride
952 + dstXoffset * dstFormat->TexelBytes;
953
954 if (dstRowStride == srcRowStride &&
955 dstRowStride == bytesPerRow &&
956 ((dstImageStride == srcImageStride &&
957 dstImageStride == bytesPerImage) ||
958 (srcDepth == 1))) {
959 /* one big memcpy */
960 ctx->Driver.TextureMemCpy(dstImage, srcImage, bytesPerTexture);
961 }
962 else
963 {
964 GLint img, row;
965 for (img = 0; img < srcDepth; img++) {
966 const GLubyte *srcRow = srcImage;
967 GLubyte *dstRow = dstImage;
968 for (row = 0; row < srcHeight; row++) {
969 ctx->Driver.TextureMemCpy(dstRow, srcRow, bytesPerRow);
970 dstRow += dstRowStride;
971 srcRow += srcRowStride;
972 }
973 srcImage += srcImageStride;
974 dstImage += dstImageStride;
975 }
976 }
977 #endif
978
979 GLint img, row;
980 for (img = 0; img < srcDepth; img++) {
981 const GLubyte *srcRow = srcImage;
982 GLubyte *dstRow = (GLubyte *) dstAddr
983 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
984 + dstYoffset * dstRowStride
985 + dstXoffset * dstFormat->TexelBytes;
986 for (row = 0; row < srcHeight; row++) {
987 ctx->Driver.TextureMemCpy(dstRow, srcRow, bytesPerRow);
988 dstRow += dstRowStride;
989 srcRow += srcRowStride;
990 }
991 srcImage += srcImageStride;
992 }
993 }
994
995
996
997 /**
998 * Store an image in any of the formats:
999 * _mesa_texformat_rgba
1000 * _mesa_texformat_rgb
1001 * _mesa_texformat_alpha
1002 * _mesa_texformat_luminance
1003 * _mesa_texformat_luminance_alpha
1004 * _mesa_texformat_intensity
1005 *
1006 */
1007 GLboolean
1008 _mesa_texstore_rgba(TEXSTORE_PARAMS)
1009 {
1010 const GLint components = _mesa_components_in_format(baseInternalFormat);
1011
1012 ASSERT(dstFormat == &_mesa_texformat_rgba ||
1013 dstFormat == &_mesa_texformat_rgb ||
1014 dstFormat == &_mesa_texformat_alpha ||
1015 dstFormat == &_mesa_texformat_luminance ||
1016 dstFormat == &_mesa_texformat_luminance_alpha ||
1017 dstFormat == &_mesa_texformat_intensity);
1018 ASSERT(baseInternalFormat == GL_RGBA ||
1019 baseInternalFormat == GL_RGB ||
1020 baseInternalFormat == GL_ALPHA ||
1021 baseInternalFormat == GL_LUMINANCE ||
1022 baseInternalFormat == GL_LUMINANCE_ALPHA ||
1023 baseInternalFormat == GL_INTENSITY);
1024 ASSERT(dstFormat->TexelBytes == components * sizeof(GLchan));
1025
1026 if (!ctx->_ImageTransferState &&
1027 !srcPacking->SwapBytes &&
1028 baseInternalFormat == srcFormat &&
1029 srcType == CHAN_TYPE) {
1030 /* simple memcpy path */
1031 memcpy_texture(ctx, dims,
1032 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
1033 dstRowStride,
1034 dstImageOffsets,
1035 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
1036 srcAddr, srcPacking);
1037 }
1038 else if (!ctx->_ImageTransferState &&
1039 !srcPacking->SwapBytes &&
1040 dstFormat == &_mesa_texformat_rgb &&
1041 srcFormat == GL_RGBA &&
1042 srcType == CHAN_TYPE) {
1043 /* extract RGB from RGBA */
1044 GLint img, row, col;
1045 for (img = 0; img < srcDepth; img++) {
1046 GLchan *dstImage = (GLchan *)
1047 ((GLubyte *) dstAddr
1048 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
1049 + dstYoffset * dstRowStride
1050 + dstXoffset * dstFormat->TexelBytes);
1051
1052 const GLint srcRowStride = _mesa_image_row_stride(srcPacking,
1053 srcWidth, srcFormat, srcType);
1054 GLchan *srcRow = (GLchan *) _mesa_image_address(dims, srcPacking,
1055 srcAddr, srcWidth, srcHeight, srcFormat, srcType, img, 0, 0);
1056 GLchan *dstRow = dstImage;
1057 for (row = 0; row < srcHeight; row++) {
1058 for (col = 0; col < srcWidth; col++) {
1059 dstRow[col * 3 + RCOMP] = srcRow[col * 4 + RCOMP];
1060 dstRow[col * 3 + GCOMP] = srcRow[col * 4 + GCOMP];
1061 dstRow[col * 3 + BCOMP] = srcRow[col * 4 + BCOMP];
1062 }
1063 dstRow += dstRowStride / sizeof(GLchan);
1064 srcRow = (GLchan *) ((GLubyte *) srcRow + srcRowStride);
1065 }
1066 }
1067 }
1068 else if (!ctx->_ImageTransferState &&
1069 CHAN_TYPE == GL_UNSIGNED_BYTE &&
1070 (srcType == GL_UNSIGNED_BYTE ||
1071 srcType == GL_UNSIGNED_INT_8_8_8_8 ||
1072 srcType == GL_UNSIGNED_INT_8_8_8_8_REV) &&
1073 can_swizzle(baseInternalFormat) &&
1074 can_swizzle(srcFormat)) {
1075
1076 const GLubyte *dstmap;
1077 GLuint components;
1078
1079 /* dstmap - how to swizzle from RGBA to dst format:
1080 */
1081 if (dstFormat == &_mesa_texformat_rgba) {
1082 dstmap = mappings[IDX_RGBA].from_rgba;
1083 components = 4;
1084 }
1085 else if (dstFormat == &_mesa_texformat_rgb) {
1086 dstmap = mappings[IDX_RGB].from_rgba;
1087 components = 3;
1088 }
1089 else if (dstFormat == &_mesa_texformat_alpha) {
1090 dstmap = mappings[IDX_ALPHA].from_rgba;
1091 components = 1;
1092 }
1093 else if (dstFormat == &_mesa_texformat_luminance) {
1094 dstmap = mappings[IDX_LUMINANCE].from_rgba;
1095 components = 1;
1096 }
1097 else if (dstFormat == &_mesa_texformat_luminance_alpha) {
1098 dstmap = mappings[IDX_LUMINANCE_ALPHA].from_rgba;
1099 components = 2;
1100 }
1101 else if (dstFormat == &_mesa_texformat_intensity) {
1102 dstmap = mappings[IDX_INTENSITY].from_rgba;
1103 components = 1;
1104 }
1105 else {
1106 _mesa_problem(ctx, "Unexpected dstFormat in _mesa_texstore_rgba");
1107 return GL_FALSE;
1108 }
1109
1110 _mesa_swizzle_ubyte_image(ctx, dims,
1111 srcFormat,
1112 srcType,
1113 baseInternalFormat,
1114 dstmap, components,
1115 dstAddr, dstXoffset, dstYoffset, dstZoffset,
1116 dstRowStride, dstImageOffsets,
1117 srcWidth, srcHeight, srcDepth, srcAddr,
1118 srcPacking);
1119 }
1120 else {
1121 /* general path */
1122 const GLchan *tempImage = _mesa_make_temp_chan_image(ctx, dims,
1123 baseInternalFormat,
1124 dstFormat->BaseFormat,
1125 srcWidth, srcHeight, srcDepth,
1126 srcFormat, srcType, srcAddr,
1127 srcPacking);
1128 const GLchan *src = tempImage;
1129 GLint bytesPerRow;
1130 GLint img, row;
1131 if (!tempImage)
1132 return GL_FALSE;
1133 _mesa_adjust_image_for_convolution(ctx, dims, &srcWidth, &srcHeight);
1134 bytesPerRow = srcWidth * components * sizeof(GLchan);
1135 for (img = 0; img < srcDepth; img++) {
1136 GLubyte *dstRow = (GLubyte *) dstAddr
1137 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
1138 + dstYoffset * dstRowStride
1139 + dstXoffset * dstFormat->TexelBytes;
1140 for (row = 0; row < srcHeight; row++) {
1141 _mesa_memcpy(dstRow, src, bytesPerRow);
1142 dstRow += dstRowStride;
1143 src += srcWidth * components;
1144 }
1145 }
1146
1147 _mesa_free((void *) tempImage);
1148 }
1149 return GL_TRUE;
1150 }
1151
1152
1153 /**
1154 * Store a 32-bit integer depth component texture image.
1155 */
1156 GLboolean
1157 _mesa_texstore_z32(TEXSTORE_PARAMS)
1158 {
1159 const GLuint depthScale = 0xffffffff;
1160 (void) dims;
1161 ASSERT(dstFormat == &_mesa_texformat_z32);
1162 ASSERT(dstFormat->TexelBytes == sizeof(GLuint));
1163
1164 if (ctx->Pixel.DepthScale == 1.0f &&
1165 ctx->Pixel.DepthBias == 0.0f &&
1166 !srcPacking->SwapBytes &&
1167 baseInternalFormat == GL_DEPTH_COMPONENT &&
1168 srcFormat == GL_DEPTH_COMPONENT &&
1169 srcType == GL_UNSIGNED_INT) {
1170 /* simple memcpy path */
1171 memcpy_texture(ctx, dims,
1172 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
1173 dstRowStride,
1174 dstImageOffsets,
1175 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
1176 srcAddr, srcPacking);
1177 }
1178 else {
1179 /* general path */
1180 GLint img, row;
1181 for (img = 0; img < srcDepth; img++) {
1182 GLubyte *dstRow = (GLubyte *) dstAddr
1183 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
1184 + dstYoffset * dstRowStride
1185 + dstXoffset * dstFormat->TexelBytes;
1186 for (row = 0; row < srcHeight; row++) {
1187 const GLvoid *src = _mesa_image_address(dims, srcPacking,
1188 srcAddr, srcWidth, srcHeight, srcFormat, srcType, img, row, 0);
1189 _mesa_unpack_depth_span(ctx, srcWidth,
1190 GL_UNSIGNED_INT, (GLuint *) dstRow,
1191 depthScale, srcType, src, srcPacking);
1192 dstRow += dstRowStride;
1193 }
1194 }
1195 }
1196 return GL_TRUE;
1197 }
1198
1199 #define STRIDE_3D 0
1200
1201 /**
1202 * Store a 16-bit integer depth component texture image.
1203 */
1204 GLboolean
1205 _mesa_texstore_z16(TEXSTORE_PARAMS)
1206 {
1207 const GLuint depthScale = 0xffff;
1208 (void) dims;
1209 ASSERT(dstFormat == &_mesa_texformat_z16);
1210 ASSERT(dstFormat->TexelBytes == sizeof(GLushort));
1211
1212 if (ctx->Pixel.DepthScale == 1.0f &&
1213 ctx->Pixel.DepthBias == 0.0f &&
1214 !srcPacking->SwapBytes &&
1215 baseInternalFormat == GL_DEPTH_COMPONENT &&
1216 srcFormat == GL_DEPTH_COMPONENT &&
1217 srcType == GL_UNSIGNED_SHORT) {
1218 /* simple memcpy path */
1219 memcpy_texture(ctx, dims,
1220 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
1221 dstRowStride,
1222 dstImageOffsets,
1223 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
1224 srcAddr, srcPacking);
1225 }
1226 else {
1227 /* general path */
1228 GLint img, row;
1229 for (img = 0; img < srcDepth; img++) {
1230 GLubyte *dstRow = (GLubyte *) dstAddr
1231 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
1232 + dstYoffset * dstRowStride
1233 + dstXoffset * dstFormat->TexelBytes;
1234 for (row = 0; row < srcHeight; row++) {
1235 const GLvoid *src = _mesa_image_address(dims, srcPacking,
1236 srcAddr, srcWidth, srcHeight, srcFormat, srcType, img, row, 0);
1237 GLushort *dst16 = (GLushort *) dstRow;
1238 _mesa_unpack_depth_span(ctx, srcWidth,
1239 GL_UNSIGNED_SHORT, dst16, depthScale,
1240 srcType, src, srcPacking);
1241 dstRow += dstRowStride;
1242 }
1243 }
1244 }
1245 return GL_TRUE;
1246 }
1247
1248
1249 /**
1250 * Store an rgb565 or rgb565_rev texture image.
1251 */
1252 GLboolean
1253 _mesa_texstore_rgb565(TEXSTORE_PARAMS)
1254 {
1255 ASSERT(dstFormat == &_mesa_texformat_rgb565 ||
1256 dstFormat == &_mesa_texformat_rgb565_rev);
1257 ASSERT(dstFormat->TexelBytes == 2);
1258
1259 if (!ctx->_ImageTransferState &&
1260 !srcPacking->SwapBytes &&
1261 dstFormat == &_mesa_texformat_rgb565 &&
1262 baseInternalFormat == GL_RGB &&
1263 srcFormat == GL_RGB &&
1264 srcType == GL_UNSIGNED_SHORT_5_6_5) {
1265 /* simple memcpy path */
1266 memcpy_texture(ctx, dims,
1267 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
1268 dstRowStride,
1269 dstImageOffsets,
1270 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
1271 srcAddr, srcPacking);
1272 }
1273 else if (!ctx->_ImageTransferState &&
1274 !srcPacking->SwapBytes &&
1275 baseInternalFormat == GL_RGB &&
1276 srcFormat == GL_RGB &&
1277 srcType == GL_UNSIGNED_BYTE &&
1278 dims == 2) {
1279 /* do optimized tex store */
1280 const GLint srcRowStride = _mesa_image_row_stride(srcPacking, srcWidth,
1281 srcFormat, srcType);
1282 const GLubyte *src = (const GLubyte *)
1283 _mesa_image_address(dims, srcPacking, srcAddr, srcWidth, srcHeight,
1284 srcFormat, srcType, 0, 0, 0);
1285 GLubyte *dst = (GLubyte *) dstAddr
1286 + dstYoffset * dstRowStride
1287 + dstXoffset * dstFormat->TexelBytes;
1288 GLint row, col;
1289 for (row = 0; row < srcHeight; row++) {
1290 const GLubyte *srcUB = (const GLubyte *) src;
1291 GLushort *dstUS = (GLushort *) dst;
1292 /* check for byteswapped format */
1293 if (dstFormat == &_mesa_texformat_rgb565) {
1294 for (col = 0; col < srcWidth; col++) {
1295 dstUS[col] = PACK_COLOR_565( srcUB[0], srcUB[1], srcUB[2] );
1296 srcUB += 3;
1297 }
1298 }
1299 else {
1300 for (col = 0; col < srcWidth; col++) {
1301 dstUS[col] = PACK_COLOR_565_REV( srcUB[0], srcUB[1], srcUB[2] );
1302 srcUB += 3;
1303 }
1304 }
1305 dst += dstRowStride;
1306 src += srcRowStride;
1307 }
1308 }
1309 else {
1310 /* general path */
1311 const GLchan *tempImage = _mesa_make_temp_chan_image(ctx, dims,
1312 baseInternalFormat,
1313 dstFormat->BaseFormat,
1314 srcWidth, srcHeight, srcDepth,
1315 srcFormat, srcType, srcAddr,
1316 srcPacking);
1317 const GLchan *src = tempImage;
1318 GLint img, row, col;
1319 if (!tempImage)
1320 return GL_FALSE;
1321 _mesa_adjust_image_for_convolution(ctx, dims, &srcWidth, &srcHeight);
1322 for (img = 0; img < srcDepth; img++) {
1323 GLubyte *dstRow = (GLubyte *) dstAddr
1324 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
1325 + dstYoffset * dstRowStride
1326 + dstXoffset * dstFormat->TexelBytes;
1327 for (row = 0; row < srcHeight; row++) {
1328 GLushort *dstUS = (GLushort *) dstRow;
1329 /* check for byteswapped format */
1330 if (dstFormat == &_mesa_texformat_rgb565) {
1331 for (col = 0; col < srcWidth; col++) {
1332 dstUS[col] = PACK_COLOR_565( CHAN_TO_UBYTE(src[RCOMP]),
1333 CHAN_TO_UBYTE(src[GCOMP]),
1334 CHAN_TO_UBYTE(src[BCOMP]) );
1335 src += 3;
1336 }
1337 }
1338 else {
1339 for (col = 0; col < srcWidth; col++) {
1340 dstUS[col] = PACK_COLOR_565_REV( CHAN_TO_UBYTE(src[RCOMP]),
1341 CHAN_TO_UBYTE(src[GCOMP]),
1342 CHAN_TO_UBYTE(src[BCOMP]) );
1343 src += 3;
1344 }
1345 }
1346 dstRow += dstRowStride;
1347 }
1348 }
1349 _mesa_free((void *) tempImage);
1350 }
1351 return GL_TRUE;
1352 }
1353
1354
1355 /**
1356 * Store a texture in MESA_FORMAT_RGBA8888 or MESA_FORMAT_RGBA8888_REV.
1357 */
1358 GLboolean
1359 _mesa_texstore_rgba8888(TEXSTORE_PARAMS)
1360 {
1361 const GLboolean littleEndian = _mesa_little_endian();
1362
1363 ASSERT(dstFormat == &_mesa_texformat_rgba8888 ||
1364 dstFormat == &_mesa_texformat_rgba8888_rev);
1365 ASSERT(dstFormat->TexelBytes == 4);
1366
1367 if (!ctx->_ImageTransferState &&
1368 !srcPacking->SwapBytes &&
1369 dstFormat == &_mesa_texformat_rgba8888 &&
1370 baseInternalFormat == GL_RGBA &&
1371 ((srcFormat == GL_RGBA && srcType == GL_UNSIGNED_INT_8_8_8_8) ||
1372 (srcFormat == GL_RGBA && srcType == GL_UNSIGNED_BYTE && !littleEndian) ||
1373 (srcFormat == GL_ABGR_EXT && srcType == GL_UNSIGNED_INT_8_8_8_8_REV) ||
1374 (srcFormat == GL_ABGR_EXT && srcType == GL_UNSIGNED_BYTE && littleEndian))) {
1375 /* simple memcpy path */
1376 memcpy_texture(ctx, dims,
1377 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
1378 dstRowStride,
1379 dstImageOffsets,
1380 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
1381 srcAddr, srcPacking);
1382 }
1383 else if (!ctx->_ImageTransferState &&
1384 !srcPacking->SwapBytes &&
1385 dstFormat == &_mesa_texformat_rgba8888_rev &&
1386 baseInternalFormat == GL_RGBA &&
1387 ((srcFormat == GL_RGBA && srcType == GL_UNSIGNED_INT_8_8_8_8_REV) ||
1388 (srcFormat == GL_RGBA && srcType == GL_UNSIGNED_BYTE && littleEndian) ||
1389 (srcFormat == GL_ABGR_EXT && srcType == GL_UNSIGNED_INT_8_8_8_8) ||
1390 (srcFormat == GL_ABGR_EXT && srcType == GL_UNSIGNED_BYTE && !littleEndian))) {
1391 /* simple memcpy path */
1392 memcpy_texture(ctx, dims,
1393 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
1394 dstRowStride,
1395 dstImageOffsets,
1396 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
1397 srcAddr, srcPacking);
1398 }
1399 else if (!ctx->_ImageTransferState &&
1400 (srcType == GL_UNSIGNED_BYTE ||
1401 srcType == GL_UNSIGNED_INT_8_8_8_8 ||
1402 srcType == GL_UNSIGNED_INT_8_8_8_8_REV) &&
1403 can_swizzle(baseInternalFormat) &&
1404 can_swizzle(srcFormat)) {
1405
1406 GLubyte dstmap[4];
1407
1408 /* dstmap - how to swizzle from RGBA to dst format:
1409 */
1410 if ((littleEndian && dstFormat == &_mesa_texformat_rgba8888) ||
1411 (!littleEndian && dstFormat == &_mesa_texformat_rgba8888_rev)) {
1412 dstmap[3] = 0;
1413 dstmap[2] = 1;
1414 dstmap[1] = 2;
1415 dstmap[0] = 3;
1416 }
1417 else {
1418 dstmap[3] = 3;
1419 dstmap[2] = 2;
1420 dstmap[1] = 1;
1421 dstmap[0] = 0;
1422 }
1423
1424 _mesa_swizzle_ubyte_image(ctx, dims,
1425 srcFormat,
1426 srcType,
1427 baseInternalFormat,
1428 dstmap, 4,
1429 dstAddr, dstXoffset, dstYoffset, dstZoffset,
1430 dstRowStride, dstImageOffsets,
1431 srcWidth, srcHeight, srcDepth, srcAddr,
1432 srcPacking);
1433 }
1434 else {
1435 /* general path */
1436 const GLchan *tempImage = _mesa_make_temp_chan_image(ctx, dims,
1437 baseInternalFormat,
1438 dstFormat->BaseFormat,
1439 srcWidth, srcHeight, srcDepth,
1440 srcFormat, srcType, srcAddr,
1441 srcPacking);
1442 const GLchan *src = tempImage;
1443 GLint img, row, col;
1444 if (!tempImage)
1445 return GL_FALSE;
1446 _mesa_adjust_image_for_convolution(ctx, dims, &srcWidth, &srcHeight);
1447 for (img = 0; img < srcDepth; img++) {
1448 GLubyte *dstRow = (GLubyte *) dstAddr
1449 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
1450 + dstYoffset * dstRowStride
1451 + dstXoffset * dstFormat->TexelBytes;
1452 for (row = 0; row < srcHeight; row++) {
1453 GLuint *dstUI = (GLuint *) dstRow;
1454 if (dstFormat == &_mesa_texformat_rgba8888) {
1455 for (col = 0; col < srcWidth; col++) {
1456 dstUI[col] = PACK_COLOR_8888( CHAN_TO_UBYTE(src[RCOMP]),
1457 CHAN_TO_UBYTE(src[GCOMP]),
1458 CHAN_TO_UBYTE(src[BCOMP]),
1459 CHAN_TO_UBYTE(src[ACOMP]) );
1460 src += 4;
1461 }
1462 }
1463 else {
1464 for (col = 0; col < srcWidth; col++) {
1465 dstUI[col] = PACK_COLOR_8888_REV( CHAN_TO_UBYTE(src[RCOMP]),
1466 CHAN_TO_UBYTE(src[GCOMP]),
1467 CHAN_TO_UBYTE(src[BCOMP]),
1468 CHAN_TO_UBYTE(src[ACOMP]) );
1469 src += 4;
1470 }
1471 }
1472 dstRow += dstRowStride;
1473 }
1474 }
1475 _mesa_free((void *) tempImage);
1476 }
1477 return GL_TRUE;
1478 }
1479
1480
1481 GLboolean
1482 _mesa_texstore_argb8888(TEXSTORE_PARAMS)
1483 {
1484 const GLboolean littleEndian = _mesa_little_endian();
1485
1486 ASSERT(dstFormat == &_mesa_texformat_argb8888 ||
1487 dstFormat == &_mesa_texformat_argb8888_rev);
1488 ASSERT(dstFormat->TexelBytes == 4);
1489
1490 if (!ctx->_ImageTransferState &&
1491 !srcPacking->SwapBytes &&
1492 dstFormat == &_mesa_texformat_argb8888 &&
1493 baseInternalFormat == GL_RGBA &&
1494 srcFormat == GL_BGRA &&
1495 ((srcType == GL_UNSIGNED_BYTE && littleEndian) ||
1496 srcType == GL_UNSIGNED_INT_8_8_8_8_REV)) {
1497 /* simple memcpy path (little endian) */
1498 memcpy_texture(ctx, dims,
1499 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
1500 dstRowStride,
1501 dstImageOffsets,
1502 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
1503 srcAddr, srcPacking);
1504 }
1505 else if (!ctx->_ImageTransferState &&
1506 !srcPacking->SwapBytes &&
1507 dstFormat == &_mesa_texformat_argb8888_rev &&
1508 baseInternalFormat == GL_RGBA &&
1509 srcFormat == GL_BGRA &&
1510 ((srcType == GL_UNSIGNED_BYTE && !littleEndian) ||
1511 srcType == GL_UNSIGNED_INT_8_8_8_8)) {
1512 /* simple memcpy path (big endian) */
1513 memcpy_texture(ctx, dims,
1514 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
1515 dstRowStride,
1516 dstImageOffsets,
1517 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
1518 srcAddr, srcPacking);
1519 }
1520 else if (!ctx->_ImageTransferState &&
1521 !srcPacking->SwapBytes &&
1522 dstFormat == &_mesa_texformat_argb8888 &&
1523 srcFormat == GL_RGB &&
1524 (baseInternalFormat == GL_RGBA ||
1525 baseInternalFormat == GL_RGB) &&
1526 srcType == GL_UNSIGNED_BYTE) {
1527 int img, row, col;
1528 for (img = 0; img < srcDepth; img++) {
1529 const GLint srcRowStride = _mesa_image_row_stride(srcPacking,
1530 srcWidth, srcFormat, srcType);
1531 GLubyte *srcRow = (GLubyte *) _mesa_image_address(dims, srcPacking,
1532 srcAddr, srcWidth, srcHeight, srcFormat, srcType, img, 0, 0);
1533 GLubyte *dstRow = (GLubyte *) dstAddr
1534 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
1535 + dstYoffset * dstRowStride
1536 + dstXoffset * dstFormat->TexelBytes;
1537 for (row = 0; row < srcHeight; row++) {
1538 GLuint *d4 = (GLuint *) dstRow;
1539 for (col = 0; col < srcWidth; col++) {
1540 d4[col] = PACK_COLOR_8888(0xff,
1541 srcRow[col * 3 + RCOMP],
1542 srcRow[col * 3 + GCOMP],
1543 srcRow[col * 3 + BCOMP]);
1544 }
1545 dstRow += dstRowStride;
1546 srcRow += srcRowStride;
1547 }
1548 }
1549 }
1550 else if (!ctx->_ImageTransferState &&
1551 !srcPacking->SwapBytes &&
1552 dstFormat == &_mesa_texformat_argb8888 &&
1553 srcFormat == GL_RGBA &&
1554 baseInternalFormat == GL_RGBA &&
1555 srcType == GL_UNSIGNED_BYTE) {
1556 /* same as above case, but src data has alpha too */
1557 GLint img, row, col;
1558 /* For some reason, streaming copies to write-combined regions
1559 * are extremely sensitive to the characteristics of how the
1560 * source data is retrieved. By reordering the source reads to
1561 * be in-order, the speed of this operation increases by half.
1562 * Strangely the same isn't required for the RGB path, above.
1563 */
1564 for (img = 0; img < srcDepth; img++) {
1565 const GLint srcRowStride = _mesa_image_row_stride(srcPacking,
1566 srcWidth, srcFormat, srcType);
1567 GLubyte *srcRow = (GLubyte *) _mesa_image_address(dims, srcPacking,
1568 srcAddr, srcWidth, srcHeight, srcFormat, srcType, img, 0, 0);
1569 GLubyte *dstRow = (GLubyte *) dstAddr
1570 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
1571 + dstYoffset * dstRowStride
1572 + dstXoffset * dstFormat->TexelBytes;
1573 for (row = 0; row < srcHeight; row++) {
1574 GLuint *d4 = (GLuint *) dstRow;
1575 for (col = 0; col < srcWidth; col++) {
1576 d4[col] = PACK_COLOR_8888(srcRow[col * 4 + ACOMP],
1577 srcRow[col * 4 + RCOMP],
1578 srcRow[col * 4 + GCOMP],
1579 srcRow[col * 4 + BCOMP]);
1580 }
1581 dstRow += dstRowStride;
1582 srcRow += srcRowStride;
1583 }
1584 }
1585 }
1586 else if (!ctx->_ImageTransferState &&
1587 (srcType == GL_UNSIGNED_BYTE ||
1588 srcType == GL_UNSIGNED_INT_8_8_8_8 ||
1589 srcType == GL_UNSIGNED_INT_8_8_8_8_REV) &&
1590 can_swizzle(baseInternalFormat) &&
1591 can_swizzle(srcFormat)) {
1592
1593 GLubyte dstmap[4];
1594
1595 /* dstmap - how to swizzle from RGBA to dst format:
1596 */
1597 if ((littleEndian && dstFormat == &_mesa_texformat_argb8888) ||
1598 (!littleEndian && dstFormat == &_mesa_texformat_argb8888_rev)) {
1599 dstmap[3] = 3; /* alpha */
1600 dstmap[2] = 0; /* red */
1601 dstmap[1] = 1; /* green */
1602 dstmap[0] = 2; /* blue */
1603 }
1604 else {
1605 assert((littleEndian && dstFormat == &_mesa_texformat_argb8888_rev) ||
1606 (!littleEndian && dstFormat == &_mesa_texformat_argb8888));
1607 dstmap[3] = 2;
1608 dstmap[2] = 1;
1609 dstmap[1] = 0;
1610 dstmap[0] = 3;
1611 }
1612
1613 _mesa_swizzle_ubyte_image(ctx, dims,
1614 srcFormat,
1615 srcType,
1616
1617 baseInternalFormat,
1618 dstmap, 4,
1619 dstAddr, dstXoffset, dstYoffset, dstZoffset,
1620 dstRowStride,
1621 dstImageOffsets,
1622 srcWidth, srcHeight, srcDepth, srcAddr,
1623 srcPacking);
1624 }
1625 else {
1626 /* general path */
1627 const GLchan *tempImage = _mesa_make_temp_chan_image(ctx, dims,
1628 baseInternalFormat,
1629 dstFormat->BaseFormat,
1630 srcWidth, srcHeight, srcDepth,
1631 srcFormat, srcType, srcAddr,
1632 srcPacking);
1633 const GLchan *src = tempImage;
1634 GLint img, row, col;
1635 if (!tempImage)
1636 return GL_FALSE;
1637 _mesa_adjust_image_for_convolution(ctx, dims, &srcWidth, &srcHeight);
1638 for (img = 0; img < srcDepth; img++) {
1639 GLubyte *dstRow = (GLubyte *) dstAddr
1640 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
1641 + dstYoffset * dstRowStride
1642 + dstXoffset * dstFormat->TexelBytes;
1643 for (row = 0; row < srcHeight; row++) {
1644 GLuint *dstUI = (GLuint *) dstRow;
1645 if (dstFormat == &_mesa_texformat_argb8888) {
1646 for (col = 0; col < srcWidth; col++) {
1647 dstUI[col] = PACK_COLOR_8888( CHAN_TO_UBYTE(src[ACOMP]),
1648 CHAN_TO_UBYTE(src[RCOMP]),
1649 CHAN_TO_UBYTE(src[GCOMP]),
1650 CHAN_TO_UBYTE(src[BCOMP]) );
1651 src += 4;
1652 }
1653 }
1654 else {
1655 for (col = 0; col < srcWidth; col++) {
1656 dstUI[col] = PACK_COLOR_8888_REV( CHAN_TO_UBYTE(src[ACOMP]),
1657 CHAN_TO_UBYTE(src[RCOMP]),
1658 CHAN_TO_UBYTE(src[GCOMP]),
1659 CHAN_TO_UBYTE(src[BCOMP]) );
1660 src += 4;
1661 }
1662 }
1663 dstRow += dstRowStride;
1664 }
1665 }
1666 _mesa_free((void *) tempImage);
1667 }
1668 return GL_TRUE;
1669 }
1670
1671
1672 GLboolean
1673 _mesa_texstore_rgb888(TEXSTORE_PARAMS)
1674 {
1675 const GLboolean littleEndian = _mesa_little_endian();
1676
1677 ASSERT(dstFormat == &_mesa_texformat_rgb888);
1678 ASSERT(dstFormat->TexelBytes == 3);
1679
1680 if (!ctx->_ImageTransferState &&
1681 !srcPacking->SwapBytes &&
1682 baseInternalFormat == GL_RGB &&
1683 srcFormat == GL_BGR &&
1684 srcType == GL_UNSIGNED_BYTE &&
1685 littleEndian) {
1686 /* simple memcpy path */
1687 memcpy_texture(ctx, dims,
1688 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
1689 dstRowStride,
1690 dstImageOffsets,
1691 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
1692 srcAddr, srcPacking);
1693 }
1694 else if (!ctx->_ImageTransferState &&
1695 !srcPacking->SwapBytes &&
1696 srcFormat == GL_RGBA &&
1697 srcType == GL_UNSIGNED_BYTE) {
1698 /* extract RGB from RGBA */
1699 GLint img, row, col;
1700 for (img = 0; img < srcDepth; img++) {
1701 const GLint srcRowStride = _mesa_image_row_stride(srcPacking,
1702 srcWidth, srcFormat, srcType);
1703 GLubyte *srcRow = (GLubyte *) _mesa_image_address(dims, srcPacking,
1704 srcAddr, srcWidth, srcHeight, srcFormat, srcType, img, 0, 0);
1705 GLubyte *dstRow = (GLubyte *) dstAddr
1706 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
1707 + dstYoffset * dstRowStride
1708 + dstXoffset * dstFormat->TexelBytes;
1709 for (row = 0; row < srcHeight; row++) {
1710 for (col = 0; col < srcWidth; col++) {
1711 dstRow[col * 3 + 0] = srcRow[col * 4 + BCOMP];
1712 dstRow[col * 3 + 1] = srcRow[col * 4 + GCOMP];
1713 dstRow[col * 3 + 2] = srcRow[col * 4 + RCOMP];
1714 }
1715 dstRow += dstRowStride;
1716 srcRow += srcRowStride;
1717 }
1718 }
1719 }
1720 else if (!ctx->_ImageTransferState &&
1721 srcType == GL_UNSIGNED_BYTE &&
1722 can_swizzle(baseInternalFormat) &&
1723 can_swizzle(srcFormat)) {
1724
1725 GLubyte dstmap[4];
1726
1727 /* dstmap - how to swizzle from RGBA to dst format:
1728 */
1729 dstmap[0] = 2;
1730 dstmap[1] = 1;
1731 dstmap[2] = 0;
1732 dstmap[3] = ONE; /* ? */
1733
1734 _mesa_swizzle_ubyte_image(ctx, dims,
1735 srcFormat,
1736 srcType,
1737 baseInternalFormat,
1738 dstmap, 3,
1739 dstAddr, dstXoffset, dstYoffset, dstZoffset,
1740 dstRowStride, dstImageOffsets,
1741 srcWidth, srcHeight, srcDepth, srcAddr,
1742 srcPacking);
1743 }
1744 else {
1745 /* general path */
1746 const GLchan *tempImage = _mesa_make_temp_chan_image(ctx, dims,
1747 baseInternalFormat,
1748 dstFormat->BaseFormat,
1749 srcWidth, srcHeight, srcDepth,
1750 srcFormat, srcType, srcAddr,
1751 srcPacking);
1752 const GLchan *src = (const GLchan *) tempImage;
1753 GLint img, row, col;
1754 if (!tempImage)
1755 return GL_FALSE;
1756 _mesa_adjust_image_for_convolution(ctx, dims, &srcWidth, &srcHeight);
1757 for (img = 0; img < srcDepth; img++) {
1758 GLubyte *dstRow = (GLubyte *) dstAddr
1759 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
1760 + dstYoffset * dstRowStride
1761 + dstXoffset * dstFormat->TexelBytes;
1762 for (row = 0; row < srcHeight; row++) {
1763 #if 0
1764 if (littleEndian) {
1765 for (col = 0; col < srcWidth; col++) {
1766 dstRow[col * 3 + 0] = CHAN_TO_UBYTE(src[RCOMP]);
1767 dstRow[col * 3 + 1] = CHAN_TO_UBYTE(src[GCOMP]);
1768 dstRow[col * 3 + 2] = CHAN_TO_UBYTE(src[BCOMP]);
1769 srcUB += 3;
1770 }
1771 }
1772 else {
1773 for (col = 0; col < srcWidth; col++) {
1774 dstRow[col * 3 + 0] = srcUB[BCOMP];
1775 dstRow[col * 3 + 1] = srcUB[GCOMP];
1776 dstRow[col * 3 + 2] = srcUB[RCOMP];
1777 srcUB += 3;
1778 }
1779 }
1780 #else
1781 for (col = 0; col < srcWidth; col++) {
1782 dstRow[col * 3 + 0] = CHAN_TO_UBYTE(src[BCOMP]);
1783 dstRow[col * 3 + 1] = CHAN_TO_UBYTE(src[GCOMP]);
1784 dstRow[col * 3 + 2] = CHAN_TO_UBYTE(src[RCOMP]);
1785 src += 3;
1786 }
1787 #endif
1788 dstRow += dstRowStride;
1789 }
1790 }
1791 _mesa_free((void *) tempImage);
1792 }
1793 return GL_TRUE;
1794 }
1795
1796
1797 GLboolean
1798 _mesa_texstore_bgr888(TEXSTORE_PARAMS)
1799 {
1800 const GLboolean littleEndian = _mesa_little_endian();
1801
1802 ASSERT(dstFormat == &_mesa_texformat_bgr888);
1803 ASSERT(dstFormat->TexelBytes == 3);
1804
1805 if (!ctx->_ImageTransferState &&
1806 !srcPacking->SwapBytes &&
1807 baseInternalFormat == GL_RGB &&
1808 srcFormat == GL_RGB &&
1809 srcType == GL_UNSIGNED_BYTE &&
1810 littleEndian) {
1811 /* simple memcpy path */
1812 memcpy_texture(ctx, dims,
1813 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
1814 dstRowStride,
1815 dstImageOffsets,
1816 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
1817 srcAddr, srcPacking);
1818 }
1819 else if (!ctx->_ImageTransferState &&
1820 !srcPacking->SwapBytes &&
1821 srcFormat == GL_RGBA &&
1822 srcType == GL_UNSIGNED_BYTE) {
1823 /* extract BGR from RGBA */
1824 int img, row, col;
1825 for (img = 0; img < srcDepth; img++) {
1826 const GLint srcRowStride = _mesa_image_row_stride(srcPacking,
1827 srcWidth, srcFormat, srcType);
1828 GLubyte *srcRow = (GLubyte *) _mesa_image_address(dims, srcPacking,
1829 srcAddr, srcWidth, srcHeight, srcFormat, srcType, img, 0, 0);
1830 GLubyte *dstRow = (GLubyte *) dstAddr
1831 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
1832 + dstYoffset * dstRowStride
1833 + dstXoffset * dstFormat->TexelBytes;
1834 for (row = 0; row < srcHeight; row++) {
1835 for (col = 0; col < srcWidth; col++) {
1836 dstRow[col * 3 + 0] = srcRow[col * 4 + RCOMP];
1837 dstRow[col * 3 + 1] = srcRow[col * 4 + GCOMP];
1838 dstRow[col * 3 + 2] = srcRow[col * 4 + BCOMP];
1839 }
1840 dstRow += dstRowStride;
1841 srcRow += srcRowStride;
1842 }
1843 }
1844 }
1845 else if (!ctx->_ImageTransferState &&
1846 srcType == GL_UNSIGNED_BYTE &&
1847 can_swizzle(baseInternalFormat) &&
1848 can_swizzle(srcFormat)) {
1849
1850 GLubyte dstmap[4];
1851
1852 /* dstmap - how to swizzle from RGBA to dst format:
1853 */
1854 dstmap[0] = 0;
1855 dstmap[1] = 1;
1856 dstmap[2] = 2;
1857 dstmap[3] = ONE; /* ? */
1858
1859 _mesa_swizzle_ubyte_image(ctx, dims,
1860 srcFormat,
1861 srcType,
1862 baseInternalFormat,
1863 dstmap, 3,
1864 dstAddr, dstXoffset, dstYoffset, dstZoffset,
1865 dstRowStride, dstImageOffsets,
1866 srcWidth, srcHeight, srcDepth, srcAddr,
1867 srcPacking);
1868 }
1869 else {
1870 /* general path */
1871 const GLchan *tempImage = _mesa_make_temp_chan_image(ctx, dims,
1872 baseInternalFormat,
1873 dstFormat->BaseFormat,
1874 srcWidth, srcHeight, srcDepth,
1875 srcFormat, srcType, srcAddr,
1876 srcPacking);
1877 const GLchan *src = (const GLchan *) tempImage;
1878 GLint img, row, col;
1879 if (!tempImage)
1880 return GL_FALSE;
1881 _mesa_adjust_image_for_convolution(ctx, dims, &srcWidth, &srcHeight);
1882 for (img = 0; img < srcDepth; img++) {
1883 GLubyte *dstRow = (GLubyte *) dstAddr
1884 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
1885 + dstYoffset * dstRowStride
1886 + dstXoffset * dstFormat->TexelBytes;
1887 for (row = 0; row < srcHeight; row++) {
1888 for (col = 0; col < srcWidth; col++) {
1889 dstRow[col * 3 + 0] = CHAN_TO_UBYTE(src[RCOMP]);
1890 dstRow[col * 3 + 1] = CHAN_TO_UBYTE(src[GCOMP]);
1891 dstRow[col * 3 + 2] = CHAN_TO_UBYTE(src[BCOMP]);
1892 src += 3;
1893 }
1894 dstRow += dstRowStride;
1895 }
1896 }
1897 _mesa_free((void *) tempImage);
1898 }
1899 return GL_TRUE;
1900 }
1901
1902 GLboolean
1903 _mesa_texstore_rgba4444(TEXSTORE_PARAMS)
1904 {
1905 ASSERT(dstFormat == &_mesa_texformat_rgba4444);
1906 ASSERT(dstFormat->TexelBytes == 2);
1907
1908 if (!ctx->_ImageTransferState &&
1909 !srcPacking->SwapBytes &&
1910 dstFormat == &_mesa_texformat_rgba4444 &&
1911 baseInternalFormat == GL_RGBA &&
1912 srcFormat == GL_RGBA &&
1913 srcType == GL_UNSIGNED_SHORT_4_4_4_4){
1914 /* simple memcpy path */
1915 memcpy_texture(ctx, dims,
1916 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
1917 dstRowStride,
1918 dstImageOffsets,
1919 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
1920 srcAddr, srcPacking);
1921 }
1922 else {
1923 /* general path */
1924 const GLchan *tempImage = _mesa_make_temp_chan_image(ctx, dims,
1925 baseInternalFormat,
1926 dstFormat->BaseFormat,
1927 srcWidth, srcHeight, srcDepth,
1928 srcFormat, srcType, srcAddr,
1929 srcPacking);
1930 const GLchan *src = tempImage;
1931 GLint img, row, col;
1932 if (!tempImage)
1933 return GL_FALSE;
1934 _mesa_adjust_image_for_convolution(ctx, dims, &srcWidth, &srcHeight);
1935 for (img = 0; img < srcDepth; img++) {
1936 GLubyte *dstRow = (GLubyte *) dstAddr
1937 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
1938 + dstYoffset * dstRowStride
1939 + dstXoffset * dstFormat->TexelBytes;
1940 for (row = 0; row < srcHeight; row++) {
1941 GLushort *dstUS = (GLushort *) dstRow;
1942 for (col = 0; col < srcWidth; col++) {
1943 dstUS[col] = PACK_COLOR_4444( CHAN_TO_UBYTE(src[RCOMP]),
1944 CHAN_TO_UBYTE(src[GCOMP]),
1945 CHAN_TO_UBYTE(src[BCOMP]),
1946 CHAN_TO_UBYTE(src[ACOMP]) );
1947 src += 4;
1948 }
1949 dstRow += dstRowStride;
1950 }
1951 }
1952 _mesa_free((void *) tempImage);
1953 }
1954 return GL_TRUE;
1955 }
1956
1957 GLboolean
1958 _mesa_texstore_argb4444(TEXSTORE_PARAMS)
1959 {
1960 ASSERT(dstFormat == &_mesa_texformat_argb4444 ||
1961 dstFormat == &_mesa_texformat_argb4444_rev);
1962 ASSERT(dstFormat->TexelBytes == 2);
1963
1964 if (!ctx->_ImageTransferState &&
1965 !srcPacking->SwapBytes &&
1966 dstFormat == &_mesa_texformat_argb4444 &&
1967 baseInternalFormat == GL_RGBA &&
1968 srcFormat == GL_BGRA &&
1969 srcType == GL_UNSIGNED_SHORT_4_4_4_4_REV) {
1970 /* simple memcpy path */
1971 memcpy_texture(ctx, dims,
1972 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
1973 dstRowStride,
1974 dstImageOffsets,
1975 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
1976 srcAddr, srcPacking);
1977 }
1978 else {
1979 /* general path */
1980 const GLchan *tempImage = _mesa_make_temp_chan_image(ctx, dims,
1981 baseInternalFormat,
1982 dstFormat->BaseFormat,
1983 srcWidth, srcHeight, srcDepth,
1984 srcFormat, srcType, srcAddr,
1985 srcPacking);
1986 const GLchan *src = tempImage;
1987 GLint img, row, col;
1988 if (!tempImage)
1989 return GL_FALSE;
1990 _mesa_adjust_image_for_convolution(ctx, dims, &srcWidth, &srcHeight);
1991 for (img = 0; img < srcDepth; img++) {
1992 GLubyte *dstRow = (GLubyte *) dstAddr
1993 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
1994 + dstYoffset * dstRowStride
1995 + dstXoffset * dstFormat->TexelBytes;
1996 for (row = 0; row < srcHeight; row++) {
1997 GLushort *dstUS = (GLushort *) dstRow;
1998 if (dstFormat == &_mesa_texformat_argb4444) {
1999 for (col = 0; col < srcWidth; col++) {
2000 dstUS[col] = PACK_COLOR_4444( CHAN_TO_UBYTE(src[ACOMP]),
2001 CHAN_TO_UBYTE(src[RCOMP]),
2002 CHAN_TO_UBYTE(src[GCOMP]),
2003 CHAN_TO_UBYTE(src[BCOMP]) );
2004 src += 4;
2005 }
2006 }
2007 else {
2008 for (col = 0; col < srcWidth; col++) {
2009 dstUS[col] = PACK_COLOR_4444_REV( CHAN_TO_UBYTE(src[ACOMP]),
2010 CHAN_TO_UBYTE(src[RCOMP]),
2011 CHAN_TO_UBYTE(src[GCOMP]),
2012 CHAN_TO_UBYTE(src[BCOMP]) );
2013 src += 4;
2014 }
2015 }
2016 dstRow += dstRowStride;
2017 }
2018 }
2019 _mesa_free((void *) tempImage);
2020 }
2021 return GL_TRUE;
2022 }
2023
2024 GLboolean
2025 _mesa_texstore_rgba5551(TEXSTORE_PARAMS)
2026 {
2027 ASSERT(dstFormat == &_mesa_texformat_rgba5551);
2028 ASSERT(dstFormat->TexelBytes == 2);
2029
2030 if (!ctx->_ImageTransferState &&
2031 !srcPacking->SwapBytes &&
2032 dstFormat == &_mesa_texformat_rgba5551 &&
2033 baseInternalFormat == GL_RGBA &&
2034 srcFormat == GL_RGBA &&
2035 srcType == GL_UNSIGNED_SHORT_5_5_5_1) {
2036 /* simple memcpy path */
2037 memcpy_texture(ctx, dims,
2038 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
2039 dstRowStride,
2040 dstImageOffsets,
2041 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
2042 srcAddr, srcPacking);
2043 }
2044 else {
2045 /* general path */
2046 const GLchan *tempImage = _mesa_make_temp_chan_image(ctx, dims,
2047 baseInternalFormat,
2048 dstFormat->BaseFormat,
2049 srcWidth, srcHeight, srcDepth,
2050 srcFormat, srcType, srcAddr,
2051 srcPacking);
2052 const GLchan *src =tempImage;
2053 GLint img, row, col;
2054 if (!tempImage)
2055 return GL_FALSE;
2056 _mesa_adjust_image_for_convolution(ctx, dims, &srcWidth, &srcHeight);
2057 for (img = 0; img < srcDepth; img++) {
2058 GLubyte *dstRow = (GLubyte *) dstAddr
2059 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
2060 + dstYoffset * dstRowStride
2061 + dstXoffset * dstFormat->TexelBytes;
2062 for (row = 0; row < srcHeight; row++) {
2063 GLushort *dstUS = (GLushort *) dstRow;
2064 for (col = 0; col < srcWidth; col++) {
2065 dstUS[col] = PACK_COLOR_5551( CHAN_TO_UBYTE(src[RCOMP]),
2066 CHAN_TO_UBYTE(src[GCOMP]),
2067 CHAN_TO_UBYTE(src[BCOMP]),
2068 CHAN_TO_UBYTE(src[ACOMP]) );
2069 src += 4;
2070 }
2071 dstRow += dstRowStride;
2072 }
2073 }
2074 _mesa_free((void *) tempImage);
2075 }
2076 return GL_TRUE;
2077 }
2078
2079 GLboolean
2080 _mesa_texstore_argb1555(TEXSTORE_PARAMS)
2081 {
2082 ASSERT(dstFormat == &_mesa_texformat_argb1555 ||
2083 dstFormat == &_mesa_texformat_argb1555_rev);
2084 ASSERT(dstFormat->TexelBytes == 2);
2085
2086 if (!ctx->_ImageTransferState &&
2087 !srcPacking->SwapBytes &&
2088 dstFormat == &_mesa_texformat_argb1555 &&
2089 baseInternalFormat == GL_RGBA &&
2090 srcFormat == GL_BGRA &&
2091 srcType == GL_UNSIGNED_SHORT_1_5_5_5_REV) {
2092 /* simple memcpy path */
2093 memcpy_texture(ctx, dims,
2094 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
2095 dstRowStride,
2096 dstImageOffsets,
2097 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
2098 srcAddr, srcPacking);
2099 }
2100 else {
2101 /* general path */
2102 const GLchan *tempImage = _mesa_make_temp_chan_image(ctx, dims,
2103 baseInternalFormat,
2104 dstFormat->BaseFormat,
2105 srcWidth, srcHeight, srcDepth,
2106 srcFormat, srcType, srcAddr,
2107 srcPacking);
2108 const GLchan *src =tempImage;
2109 GLint img, row, col;
2110 if (!tempImage)
2111 return GL_FALSE;
2112 _mesa_adjust_image_for_convolution(ctx, dims, &srcWidth, &srcHeight);
2113 for (img = 0; img < srcDepth; img++) {
2114 GLubyte *dstRow = (GLubyte *) dstAddr
2115 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
2116 + dstYoffset * dstRowStride
2117 + dstXoffset * dstFormat->TexelBytes;
2118 for (row = 0; row < srcHeight; row++) {
2119 GLushort *dstUS = (GLushort *) dstRow;
2120 if (dstFormat == &_mesa_texformat_argb1555) {
2121 for (col = 0; col < srcWidth; col++) {
2122 dstUS[col] = PACK_COLOR_1555( CHAN_TO_UBYTE(src[ACOMP]),
2123 CHAN_TO_UBYTE(src[RCOMP]),
2124 CHAN_TO_UBYTE(src[GCOMP]),
2125 CHAN_TO_UBYTE(src[BCOMP]) );
2126 src += 4;
2127 }
2128 }
2129 else {
2130 for (col = 0; col < srcWidth; col++) {
2131 dstUS[col] = PACK_COLOR_1555_REV( CHAN_TO_UBYTE(src[ACOMP]),
2132 CHAN_TO_UBYTE(src[RCOMP]),
2133 CHAN_TO_UBYTE(src[GCOMP]),
2134 CHAN_TO_UBYTE(src[BCOMP]) );
2135 src += 4;
2136 }
2137 }
2138 dstRow += dstRowStride;
2139 }
2140 }
2141 _mesa_free((void *) tempImage);
2142 }
2143 return GL_TRUE;
2144 }
2145
2146
2147 GLboolean
2148 _mesa_texstore_al88(TEXSTORE_PARAMS)
2149 {
2150 const GLboolean littleEndian = _mesa_little_endian();
2151
2152 ASSERT(dstFormat == &_mesa_texformat_al88 ||
2153 dstFormat == &_mesa_texformat_al88_rev);
2154 ASSERT(dstFormat->TexelBytes == 2);
2155
2156 if (!ctx->_ImageTransferState &&
2157 !srcPacking->SwapBytes &&
2158 dstFormat == &_mesa_texformat_al88 &&
2159 baseInternalFormat == GL_LUMINANCE_ALPHA &&
2160 srcFormat == GL_LUMINANCE_ALPHA &&
2161 srcType == GL_UNSIGNED_BYTE &&
2162 littleEndian) {
2163 /* simple memcpy path */
2164 memcpy_texture(ctx, dims,
2165 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
2166 dstRowStride,
2167 dstImageOffsets,
2168 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
2169 srcAddr, srcPacking);
2170 }
2171 else if (!ctx->_ImageTransferState &&
2172 littleEndian &&
2173 srcType == GL_UNSIGNED_BYTE &&
2174 can_swizzle(baseInternalFormat) &&
2175 can_swizzle(srcFormat)) {
2176
2177 GLubyte dstmap[4];
2178
2179 /* dstmap - how to swizzle from RGBA to dst format:
2180 */
2181 if ((littleEndian && dstFormat == &_mesa_texformat_al88) ||
2182 (!littleEndian && dstFormat == &_mesa_texformat_al88_rev)) {
2183 dstmap[0] = 0;
2184 dstmap[1] = 3;
2185 }
2186 else {
2187 dstmap[0] = 3;
2188 dstmap[1] = 0;
2189 }
2190 dstmap[2] = ZERO; /* ? */
2191 dstmap[3] = ONE; /* ? */
2192
2193 _mesa_swizzle_ubyte_image(ctx, dims,
2194 srcFormat,
2195 srcType,
2196 baseInternalFormat,
2197 dstmap, 2,
2198 dstAddr, dstXoffset, dstYoffset, dstZoffset,
2199 dstRowStride, dstImageOffsets,
2200 srcWidth, srcHeight, srcDepth, srcAddr,
2201 srcPacking);
2202 }
2203 else {
2204 /* general path */
2205 const GLchan *tempImage = _mesa_make_temp_chan_image(ctx, dims,
2206 baseInternalFormat,
2207 dstFormat->BaseFormat,
2208 srcWidth, srcHeight, srcDepth,
2209 srcFormat, srcType, srcAddr,
2210 srcPacking);
2211 const GLchan *src = tempImage;
2212 GLint img, row, col;
2213 if (!tempImage)
2214 return GL_FALSE;
2215 _mesa_adjust_image_for_convolution(ctx, dims, &srcWidth, &srcHeight);
2216 for (img = 0; img < srcDepth; img++) {
2217 GLubyte *dstRow = (GLubyte *) dstAddr
2218 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
2219 + dstYoffset * dstRowStride
2220 + dstXoffset * dstFormat->TexelBytes;
2221 for (row = 0; row < srcHeight; row++) {
2222 GLushort *dstUS = (GLushort *) dstRow;
2223 if (dstFormat == &_mesa_texformat_al88) {
2224 for (col = 0; col < srcWidth; col++) {
2225 /* src[0] is luminance, src[1] is alpha */
2226 dstUS[col] = PACK_COLOR_88( CHAN_TO_UBYTE(src[1]),
2227 CHAN_TO_UBYTE(src[0]) );
2228 src += 2;
2229 }
2230 }
2231 else {
2232 for (col = 0; col < srcWidth; col++) {
2233 /* src[0] is luminance, src[1] is alpha */
2234 dstUS[col] = PACK_COLOR_88_REV( CHAN_TO_UBYTE(src[1]),
2235 CHAN_TO_UBYTE(src[0]) );
2236 src += 2;
2237 }
2238 }
2239 dstRow += dstRowStride;
2240 }
2241 }
2242 _mesa_free((void *) tempImage);
2243 }
2244 return GL_TRUE;
2245 }
2246
2247
2248 GLboolean
2249 _mesa_texstore_rgb332(TEXSTORE_PARAMS)
2250 {
2251 ASSERT(dstFormat == &_mesa_texformat_rgb332);
2252 ASSERT(dstFormat->TexelBytes == 1);
2253
2254 if (!ctx->_ImageTransferState &&
2255 !srcPacking->SwapBytes &&
2256 baseInternalFormat == GL_RGB &&
2257 srcFormat == GL_RGB && srcType == GL_UNSIGNED_BYTE_3_3_2) {
2258 /* simple memcpy path */
2259 memcpy_texture(ctx, dims,
2260 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
2261 dstRowStride,
2262 dstImageOffsets,
2263 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
2264 srcAddr, srcPacking);
2265 }
2266 else {
2267 /* general path */
2268 const GLchan *tempImage = _mesa_make_temp_chan_image(ctx, dims,
2269 baseInternalFormat,
2270 dstFormat->BaseFormat,
2271 srcWidth, srcHeight, srcDepth,
2272 srcFormat, srcType, srcAddr,
2273 srcPacking);
2274 const GLchan *src = tempImage;
2275 GLint img, row, col;
2276 if (!tempImage)
2277 return GL_FALSE;
2278 _mesa_adjust_image_for_convolution(ctx, dims, &srcWidth, &srcHeight);
2279 for (img = 0; img < srcDepth; img++) {
2280 GLubyte *dstRow = (GLubyte *) dstAddr
2281 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
2282 + dstYoffset * dstRowStride
2283 + dstXoffset * dstFormat->TexelBytes;
2284 for (row = 0; row < srcHeight; row++) {
2285 for (col = 0; col < srcWidth; col++) {
2286 dstRow[col] = PACK_COLOR_332( CHAN_TO_UBYTE(src[RCOMP]),
2287 CHAN_TO_UBYTE(src[GCOMP]),
2288 CHAN_TO_UBYTE(src[BCOMP]) );
2289 src += 3;
2290 }
2291 dstRow += dstRowStride;
2292 }
2293 }
2294 _mesa_free((void *) tempImage);
2295 }
2296 return GL_TRUE;
2297 }
2298
2299
2300 /**
2301 * Texstore for _mesa_texformat_a8, _mesa_texformat_l8, _mesa_texformat_i8.
2302 */
2303 GLboolean
2304 _mesa_texstore_a8(TEXSTORE_PARAMS)
2305 {
2306 ASSERT(dstFormat == &_mesa_texformat_a8 ||
2307 dstFormat == &_mesa_texformat_l8 ||
2308 dstFormat == &_mesa_texformat_i8);
2309 ASSERT(dstFormat->TexelBytes == 1);
2310
2311 if (!ctx->_ImageTransferState &&
2312 !srcPacking->SwapBytes &&
2313 baseInternalFormat == srcFormat &&
2314 srcType == GL_UNSIGNED_BYTE) {
2315 /* simple memcpy path */
2316 memcpy_texture(ctx, dims,
2317 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
2318 dstRowStride,
2319 dstImageOffsets,
2320 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
2321 srcAddr, srcPacking);
2322 }
2323 else if (!ctx->_ImageTransferState &&
2324 srcType == GL_UNSIGNED_BYTE &&
2325 can_swizzle(baseInternalFormat) &&
2326 can_swizzle(srcFormat)) {
2327
2328 GLubyte dstmap[4];
2329
2330 /* dstmap - how to swizzle from RGBA to dst format:
2331 */
2332 if (dstFormat == &_mesa_texformat_a8) {
2333 dstmap[0] = 3;
2334 }
2335 else {
2336 dstmap[0] = 0;
2337 }
2338 dstmap[1] = ZERO; /* ? */
2339 dstmap[2] = ZERO; /* ? */
2340 dstmap[3] = ONE; /* ? */
2341
2342 _mesa_swizzle_ubyte_image(ctx, dims,
2343 srcFormat,
2344 srcType,
2345 baseInternalFormat,
2346 dstmap, 1,
2347 dstAddr, dstXoffset, dstYoffset, dstZoffset,
2348 dstRowStride, dstImageOffsets,
2349 srcWidth, srcHeight, srcDepth, srcAddr,
2350 srcPacking);
2351 }
2352 else {
2353 /* general path */
2354 const GLchan *tempImage = _mesa_make_temp_chan_image(ctx, dims,
2355 baseInternalFormat,
2356 dstFormat->BaseFormat,
2357 srcWidth, srcHeight, srcDepth,
2358 srcFormat, srcType, srcAddr,
2359 srcPacking);
2360 const GLchan *src = tempImage;
2361 GLint img, row, col;
2362 if (!tempImage)
2363 return GL_FALSE;
2364 _mesa_adjust_image_for_convolution(ctx, dims, &srcWidth, &srcHeight);
2365 for (img = 0; img < srcDepth; img++) {
2366 GLubyte *dstRow = (GLubyte *) dstAddr
2367 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
2368 + dstYoffset * dstRowStride
2369 + dstXoffset * dstFormat->TexelBytes;
2370 for (row = 0; row < srcHeight; row++) {
2371 for (col = 0; col < srcWidth; col++) {
2372 dstRow[col] = CHAN_TO_UBYTE(src[col]);
2373 }
2374 dstRow += dstRowStride;
2375 src += srcWidth;
2376 }
2377 }
2378 _mesa_free((void *) tempImage);
2379 }
2380 return GL_TRUE;
2381 }
2382
2383
2384
2385 GLboolean
2386 _mesa_texstore_ci8(TEXSTORE_PARAMS)
2387 {
2388 (void) dims; (void) baseInternalFormat;
2389 ASSERT(dstFormat == &_mesa_texformat_ci8);
2390 ASSERT(dstFormat->TexelBytes == 1);
2391 ASSERT(baseInternalFormat == GL_COLOR_INDEX);
2392
2393 if (!ctx->_ImageTransferState &&
2394 !srcPacking->SwapBytes &&
2395 srcFormat == GL_COLOR_INDEX &&
2396 srcType == GL_UNSIGNED_BYTE) {
2397 /* simple memcpy path */
2398 memcpy_texture(ctx, dims,
2399 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
2400 dstRowStride,
2401 dstImageOffsets,
2402 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
2403 srcAddr, srcPacking);
2404 }
2405 else {
2406 /* general path */
2407 GLint img, row;
2408 for (img = 0; img < srcDepth; img++) {
2409 GLubyte *dstRow = (GLubyte *) dstAddr
2410 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
2411 + dstYoffset * dstRowStride
2412 + dstXoffset * dstFormat->TexelBytes;
2413 for (row = 0; row < srcHeight; row++) {
2414 const GLvoid *src = _mesa_image_address(dims, srcPacking,
2415 srcAddr, srcWidth, srcHeight, srcFormat, srcType, img, row, 0);
2416 _mesa_unpack_index_span(ctx, srcWidth, GL_UNSIGNED_BYTE, dstRow,
2417 srcType, src, srcPacking,
2418 ctx->_ImageTransferState);
2419 dstRow += dstRowStride;
2420 }
2421 }
2422 }
2423 return GL_TRUE;
2424 }
2425
2426
2427 /**
2428 * Texstore for _mesa_texformat_ycbcr or _mesa_texformat_ycbcr_rev.
2429 */
2430 GLboolean
2431 _mesa_texstore_ycbcr(TEXSTORE_PARAMS)
2432 {
2433 const GLboolean littleEndian = _mesa_little_endian();
2434 (void) ctx; (void) dims; (void) baseInternalFormat;
2435
2436 ASSERT((dstFormat == &_mesa_texformat_ycbcr) ||
2437 (dstFormat == &_mesa_texformat_ycbcr_rev));
2438 ASSERT(dstFormat->TexelBytes == 2);
2439 ASSERT(ctx->Extensions.MESA_ycbcr_texture);
2440 ASSERT(srcFormat == GL_YCBCR_MESA);
2441 ASSERT((srcType == GL_UNSIGNED_SHORT_8_8_MESA) ||
2442 (srcType == GL_UNSIGNED_SHORT_8_8_REV_MESA));
2443 ASSERT(baseInternalFormat == GL_YCBCR_MESA);
2444
2445 /* always just memcpy since no pixel transfer ops apply */
2446 memcpy_texture(ctx, dims,
2447 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
2448 dstRowStride,
2449 dstImageOffsets,
2450 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
2451 srcAddr, srcPacking);
2452
2453 /* Check if we need byte swapping */
2454 /* XXX the logic here _might_ be wrong */
2455 if (srcPacking->SwapBytes ^
2456 (srcType == GL_UNSIGNED_SHORT_8_8_REV_MESA) ^
2457 (dstFormat == &_mesa_texformat_ycbcr_rev) ^
2458 !littleEndian) {
2459 GLint img, row;
2460 for (img = 0; img < srcDepth; img++) {
2461 GLubyte *dstRow = (GLubyte *) dstAddr
2462 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
2463 + dstYoffset * dstRowStride
2464 + dstXoffset * dstFormat->TexelBytes;
2465 for (row = 0; row < srcHeight; row++) {
2466 _mesa_swap2((GLushort *) dstRow, srcWidth);
2467 dstRow += dstRowStride;
2468 }
2469 }
2470 }
2471 return GL_TRUE;
2472 }
2473
2474 GLboolean
2475 _mesa_texstore_dudv8(TEXSTORE_PARAMS)
2476 {
2477 const GLboolean littleEndian = _mesa_little_endian();
2478
2479 ASSERT(dstFormat == &_mesa_texformat_dudv8);
2480 ASSERT(dstFormat->TexelBytes == 2);
2481 ASSERT(ctx->Extensions.ATI_envmap_bumpmap);
2482 ASSERT((srcFormat == GL_DU8DV8_ATI) ||
2483 (srcFormat == GL_DUDV_ATI));
2484 ASSERT(baseInternalFormat == GL_DUDV_ATI);
2485
2486 if (!srcPacking->SwapBytes && srcType == GL_BYTE &&
2487 littleEndian) {
2488 /* simple memcpy path */
2489 memcpy_texture(ctx, dims,
2490 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
2491 dstRowStride,
2492 dstImageOffsets,
2493 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
2494 srcAddr, srcPacking);
2495 }
2496 else if (srcType == GL_BYTE) {
2497
2498 GLubyte dstmap[4];
2499
2500 /* dstmap - how to swizzle from RGBA to dst format:
2501 */
2502 if (littleEndian) {
2503 dstmap[0] = 0;
2504 dstmap[1] = 3;
2505 }
2506 else {
2507 dstmap[0] = 3;
2508 dstmap[1] = 0;
2509 }
2510 dstmap[2] = ZERO; /* ? */
2511 dstmap[3] = ONE; /* ? */
2512
2513 _mesa_swizzle_ubyte_image(ctx, dims,
2514 GL_LUMINANCE_ALPHA, /* hack */
2515 GL_UNSIGNED_BYTE, /* hack */
2516 GL_LUMINANCE_ALPHA, /* hack */
2517 dstmap, 2,
2518 dstAddr, dstXoffset, dstYoffset, dstZoffset,
2519 dstRowStride, dstImageOffsets,
2520 srcWidth, srcHeight, srcDepth, srcAddr,
2521 srcPacking);
2522 }
2523 else {
2524 /* general path - note this is defined for 2d textures only */
2525 const GLint components = _mesa_components_in_format(baseInternalFormat);
2526 const GLint srcStride = _mesa_image_row_stride(srcPacking,
2527 srcWidth, srcFormat, srcType);
2528 GLbyte *tempImage, *dst, *src;
2529 GLint row;
2530
2531 tempImage = (GLbyte *) _mesa_malloc(srcWidth * srcHeight * srcDepth
2532 * components * sizeof(GLbyte));
2533 if (!tempImage)
2534 return GL_FALSE;
2535
2536 src = (GLbyte *) _mesa_image_address(dims, srcPacking, srcAddr,
2537 srcWidth, srcHeight,
2538 srcFormat, srcType,
2539 0, 0, 0);
2540
2541 dst = tempImage;
2542 for (row = 0; row < srcHeight; row++) {
2543 _mesa_unpack_dudv_span_byte(ctx, srcWidth, baseInternalFormat,
2544 dst, srcFormat, srcType, src,
2545 srcPacking, 0);
2546 dst += srcWidth * components;
2547 src += srcStride;
2548 }
2549
2550 src = tempImage;
2551 dst = (GLbyte *) dstAddr
2552 + dstYoffset * dstRowStride
2553 + dstXoffset * dstFormat->TexelBytes;
2554 for (row = 0; row < srcHeight; row++) {
2555 memcpy(dst, src, srcWidth * dstFormat->TexelBytes);
2556 dst += dstRowStride;
2557 src += srcWidth * dstFormat->TexelBytes;
2558 }
2559 _mesa_free((void *) tempImage);
2560 }
2561 return GL_TRUE;
2562 }
2563
2564
2565 /**
2566 * Store a combined depth/stencil texture image.
2567 */
2568 GLboolean
2569 _mesa_texstore_z24_s8(TEXSTORE_PARAMS)
2570 {
2571 const GLfloat depthScale = (GLfloat) 0xffffff;
2572
2573 ASSERT(dstFormat == &_mesa_texformat_z24_s8);
2574 ASSERT(srcFormat == GL_DEPTH_STENCIL_EXT);
2575 ASSERT(srcType == GL_UNSIGNED_INT_24_8_EXT);
2576
2577 if (ctx->Pixel.DepthScale == 1.0f &&
2578 ctx->Pixel.DepthBias == 0.0f &&
2579 !srcPacking->SwapBytes) {
2580 /* simple path */
2581 memcpy_texture(ctx, dims,
2582 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
2583 dstRowStride,
2584 dstImageOffsets,
2585 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
2586 srcAddr, srcPacking);
2587 }
2588 else {
2589 /* general path */
2590 const GLint srcRowStride
2591 = _mesa_image_row_stride(srcPacking, srcWidth, srcFormat, srcType)
2592 / sizeof(GLuint);
2593 GLint img, row;
2594
2595 for (img = 0; img < srcDepth; img++) {
2596 GLuint *dstRow = (GLuint *) dstAddr
2597 + dstImageOffsets[dstZoffset + img]
2598 + dstYoffset * dstRowStride / sizeof(GLuint)
2599 + dstXoffset;
2600 const GLuint *src
2601 = (const GLuint *) _mesa_image_address(dims, srcPacking, srcAddr,
2602 srcWidth, srcHeight,
2603 srcFormat, srcType,
2604 img, 0, 0);
2605 for (row = 0; row < srcHeight; row++) {
2606 GLubyte stencil[MAX_WIDTH];
2607 GLint i;
2608 /* the 24 depth bits will be in the high position: */
2609 _mesa_unpack_depth_span(ctx, srcWidth,
2610 GL_UNSIGNED_INT_24_8_EXT, /* dst type */
2611 dstRow, /* dst addr */
2612 (GLuint) depthScale,
2613 srcType, src, srcPacking);
2614 /* get the 8-bit stencil values */
2615 _mesa_unpack_stencil_span(ctx, srcWidth,
2616 GL_UNSIGNED_BYTE, /* dst type */
2617 stencil, /* dst addr */
2618 srcType, src, srcPacking,
2619 ctx->_ImageTransferState);
2620 /* merge stencil values into depth values */
2621 for (i = 0; i < srcWidth; i++)
2622 dstRow[i] |= stencil[i];
2623
2624 src += srcRowStride;
2625 dstRow += dstRowStride / sizeof(GLuint);
2626 }
2627 }
2628 }
2629 return GL_TRUE;
2630 }
2631
2632
2633 /**
2634 * Store a combined depth/stencil texture image.
2635 */
2636 GLboolean
2637 _mesa_texstore_s8_z24(TEXSTORE_PARAMS)
2638 {
2639 const GLuint depthScale = 0xffffff;
2640 const GLint srcRowStride
2641 = _mesa_image_row_stride(srcPacking, srcWidth, srcFormat, srcType)
2642 / sizeof(GLuint);
2643 GLint img, row;
2644
2645 ASSERT(dstFormat == &_mesa_texformat_s8_z24);
2646 ASSERT(srcFormat == GL_DEPTH_STENCIL_EXT || srcFormat == GL_DEPTH_COMPONENT);
2647 ASSERT(srcFormat != GL_DEPTH_STENCIL_EXT || srcType == GL_UNSIGNED_INT_24_8_EXT);
2648
2649 /* In case we only upload depth we need to preserve the stencil */
2650 if (srcFormat == GL_DEPTH_COMPONENT) {
2651 for (img = 0; img < srcDepth; img++) {
2652 GLuint *dstRow = (GLuint *) dstAddr
2653 + dstImageOffsets[dstZoffset + img]
2654 + dstYoffset * dstRowStride / sizeof(GLuint)
2655 + dstXoffset;
2656 const GLuint *src
2657 = (const GLuint *) _mesa_image_address(dims, srcPacking, srcAddr,
2658 srcWidth, srcHeight,
2659 srcFormat, srcType,
2660 img, 0, 0);
2661 for (row = 0; row < srcHeight; row++) {
2662 GLuint depth[MAX_WIDTH];
2663 GLint i;
2664 _mesa_unpack_depth_span(ctx, srcWidth,
2665 GL_UNSIGNED_INT, /* dst type */
2666 depth, /* dst addr */
2667 depthScale,
2668 srcType, src, srcPacking);
2669
2670 for (i = 0; i < srcWidth; i++)
2671 dstRow[i] = depth[i] | (dstRow[i] & 0xFF000000);
2672
2673 src += srcRowStride;
2674 dstRow += dstRowStride / sizeof(GLuint);
2675 }
2676 }
2677 }
2678 else {
2679 for (img = 0; img < srcDepth; img++) {
2680 GLuint *dstRow = (GLuint *) dstAddr
2681 + dstImageOffsets[dstZoffset + img]
2682 + dstYoffset * dstRowStride / sizeof(GLuint)
2683 + dstXoffset;
2684 const GLuint *src
2685 = (const GLuint *) _mesa_image_address(dims, srcPacking, srcAddr,
2686 srcWidth, srcHeight,
2687 srcFormat, srcType,
2688 img, 0, 0);
2689 for (row = 0; row < srcHeight; row++) {
2690 GLubyte stencil[MAX_WIDTH];
2691 GLint i;
2692 /* the 24 depth bits will be in the low position: */
2693 _mesa_unpack_depth_span(ctx, srcWidth,
2694 GL_UNSIGNED_INT, /* dst type */
2695 dstRow, /* dst addr */
2696 depthScale,
2697 srcType, src, srcPacking);
2698 /* get the 8-bit stencil values */
2699 _mesa_unpack_stencil_span(ctx, srcWidth,
2700 GL_UNSIGNED_BYTE, /* dst type */
2701 stencil, /* dst addr */
2702 srcType, src, srcPacking,
2703 ctx->_ImageTransferState);
2704 /* merge stencil values into depth values */
2705 for (i = 0; i < srcWidth; i++)
2706 dstRow[i] |= stencil[i] << 24;
2707
2708 src += srcRowStride;
2709 dstRow += dstRowStride / sizeof(GLuint);
2710 }
2711 }
2712 }
2713 return GL_TRUE;
2714 }
2715
2716 /**
2717 * Store an image in any of the formats:
2718 * _mesa_texformat_rgba_float32
2719 * _mesa_texformat_rgb_float32
2720 * _mesa_texformat_alpha_float32
2721 * _mesa_texformat_luminance_float32
2722 * _mesa_texformat_luminance_alpha_float32
2723 * _mesa_texformat_intensity_float32
2724 */
2725 GLboolean
2726 _mesa_texstore_rgba_float32(TEXSTORE_PARAMS)
2727 {
2728 const GLint components = _mesa_components_in_format(dstFormat->BaseFormat);
2729
2730 ASSERT(dstFormat == &_mesa_texformat_rgba_float32 ||
2731 dstFormat == &_mesa_texformat_rgb_float32 ||
2732 dstFormat == &_mesa_texformat_alpha_float32 ||
2733 dstFormat == &_mesa_texformat_luminance_float32 ||
2734 dstFormat == &_mesa_texformat_luminance_alpha_float32 ||
2735 dstFormat == &_mesa_texformat_intensity_float32);
2736 ASSERT(baseInternalFormat == GL_RGBA ||
2737 baseInternalFormat == GL_RGB ||
2738 baseInternalFormat == GL_ALPHA ||
2739 baseInternalFormat == GL_LUMINANCE ||
2740 baseInternalFormat == GL_LUMINANCE_ALPHA ||
2741 baseInternalFormat == GL_INTENSITY);
2742 ASSERT(dstFormat->TexelBytes == components * sizeof(GLfloat));
2743
2744 if (!ctx->_ImageTransferState &&
2745 !srcPacking->SwapBytes &&
2746 baseInternalFormat == srcFormat &&
2747 srcType == GL_FLOAT) {
2748 /* simple memcpy path */
2749 memcpy_texture(ctx, dims,
2750 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
2751 dstRowStride,
2752 dstImageOffsets,
2753 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
2754 srcAddr, srcPacking);
2755 }
2756 else {
2757 /* general path */
2758 const GLfloat *tempImage = make_temp_float_image(ctx, dims,
2759 baseInternalFormat,
2760 dstFormat->BaseFormat,
2761 srcWidth, srcHeight, srcDepth,
2762 srcFormat, srcType, srcAddr,
2763 srcPacking);
2764 const GLfloat *srcRow = tempImage;
2765 GLint bytesPerRow;
2766 GLint img, row;
2767 if (!tempImage)
2768 return GL_FALSE;
2769 _mesa_adjust_image_for_convolution(ctx, dims, &srcWidth, &srcHeight);
2770 bytesPerRow = srcWidth * components * sizeof(GLfloat);
2771 for (img = 0; img < srcDepth; img++) {
2772 GLubyte *dstRow = (GLubyte *) dstAddr
2773 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
2774 + dstYoffset * dstRowStride
2775 + dstXoffset * dstFormat->TexelBytes;
2776 for (row = 0; row < srcHeight; row++) {
2777 _mesa_memcpy(dstRow, srcRow, bytesPerRow);
2778 dstRow += dstRowStride;
2779 srcRow += srcWidth * components;
2780 }
2781 }
2782
2783 _mesa_free((void *) tempImage);
2784 }
2785 return GL_TRUE;
2786 }
2787
2788
2789 /**
2790 * As above, but store 16-bit floats.
2791 */
2792 GLboolean
2793 _mesa_texstore_rgba_float16(TEXSTORE_PARAMS)
2794 {
2795 const GLint components = _mesa_components_in_format(dstFormat->BaseFormat);
2796
2797 ASSERT(dstFormat == &_mesa_texformat_rgba_float16 ||
2798 dstFormat == &_mesa_texformat_rgb_float16 ||
2799 dstFormat == &_mesa_texformat_alpha_float16 ||
2800 dstFormat == &_mesa_texformat_luminance_float16 ||
2801 dstFormat == &_mesa_texformat_luminance_alpha_float16 ||
2802 dstFormat == &_mesa_texformat_intensity_float16);
2803 ASSERT(baseInternalFormat == GL_RGBA ||
2804 baseInternalFormat == GL_RGB ||
2805 baseInternalFormat == GL_ALPHA ||
2806 baseInternalFormat == GL_LUMINANCE ||
2807 baseInternalFormat == GL_LUMINANCE_ALPHA ||
2808 baseInternalFormat == GL_INTENSITY);
2809 ASSERT(dstFormat->TexelBytes == components * sizeof(GLhalfARB));
2810
2811 if (!ctx->_ImageTransferState &&
2812 !srcPacking->SwapBytes &&
2813 baseInternalFormat == srcFormat &&
2814 srcType == GL_HALF_FLOAT_ARB) {
2815 /* simple memcpy path */
2816 memcpy_texture(ctx, dims,
2817 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
2818 dstRowStride,
2819 dstImageOffsets,
2820 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
2821 srcAddr, srcPacking);
2822 }
2823 else {
2824 /* general path */
2825 const GLfloat *tempImage = make_temp_float_image(ctx, dims,
2826 baseInternalFormat,
2827 dstFormat->BaseFormat,
2828 srcWidth, srcHeight, srcDepth,
2829 srcFormat, srcType, srcAddr,
2830 srcPacking);
2831 const GLfloat *src = tempImage;
2832 GLint img, row;
2833 if (!tempImage)
2834 return GL_FALSE;
2835 _mesa_adjust_image_for_convolution(ctx, dims, &srcWidth, &srcHeight);
2836 for (img = 0; img < srcDepth; img++) {
2837 GLubyte *dstRow = (GLubyte *) dstAddr
2838 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
2839 + dstYoffset * dstRowStride
2840 + dstXoffset * dstFormat->TexelBytes;
2841 for (row = 0; row < srcHeight; row++) {
2842 GLhalfARB *dstTexel = (GLhalfARB *) dstRow;
2843 GLint i;
2844 for (i = 0; i < srcWidth * components; i++) {
2845 dstTexel[i] = _mesa_float_to_half(src[i]);
2846 }
2847 dstRow += dstRowStride;
2848 src += srcWidth * components;
2849 }
2850 }
2851
2852 _mesa_free((void *) tempImage);
2853 }
2854 return GL_TRUE;
2855 }
2856
2857
2858 #if FEATURE_EXT_texture_sRGB
2859 GLboolean
2860 _mesa_texstore_srgb8(TEXSTORE_PARAMS)
2861 {
2862 const struct gl_texture_format *newDstFormat;
2863 StoreTexImageFunc store;
2864 GLboolean k;
2865
2866 ASSERT(dstFormat == &_mesa_texformat_srgb8);
2867
2868 /* reuse normal rgb texstore code */
2869 newDstFormat = &_mesa_texformat_rgb888;
2870 store = _mesa_texstore_rgb888;
2871
2872 k = store(ctx, dims, baseInternalFormat,
2873 newDstFormat, dstAddr,
2874 dstXoffset, dstYoffset, dstZoffset,
2875 dstRowStride, dstImageOffsets,
2876 srcWidth, srcHeight, srcDepth,
2877 srcFormat, srcType,
2878 srcAddr, srcPacking);
2879 return k;
2880 }
2881
2882
2883 GLboolean
2884 _mesa_texstore_srgba8(TEXSTORE_PARAMS)
2885 {
2886 const struct gl_texture_format *newDstFormat;
2887 GLboolean k;
2888
2889 ASSERT(dstFormat == &_mesa_texformat_srgba8);
2890
2891 /* reuse normal rgba texstore code */
2892 newDstFormat = &_mesa_texformat_rgba8888;
2893
2894 k = _mesa_texstore_rgba8888(ctx, dims, baseInternalFormat,
2895 newDstFormat, dstAddr,
2896 dstXoffset, dstYoffset, dstZoffset,
2897 dstRowStride, dstImageOffsets,
2898 srcWidth, srcHeight, srcDepth,
2899 srcFormat, srcType,
2900 srcAddr, srcPacking);
2901 return k;
2902 }
2903
2904
2905 GLboolean
2906 _mesa_texstore_sargb8(TEXSTORE_PARAMS)
2907 {
2908 const struct gl_texture_format *newDstFormat;
2909 GLboolean k;
2910
2911 ASSERT(dstFormat == &_mesa_texformat_sargb8);
2912
2913 /* reuse normal rgba texstore code */
2914 newDstFormat = &_mesa_texformat_argb8888;
2915
2916 k = _mesa_texstore_argb8888(ctx, dims, baseInternalFormat,
2917 newDstFormat, dstAddr,
2918 dstXoffset, dstYoffset, dstZoffset,
2919 dstRowStride, dstImageOffsets,
2920 srcWidth, srcHeight, srcDepth,
2921 srcFormat, srcType,
2922 srcAddr, srcPacking);
2923 return k;
2924 }
2925
2926
2927 GLboolean
2928 _mesa_texstore_sl8(TEXSTORE_PARAMS)
2929 {
2930 const struct gl_texture_format *newDstFormat;
2931 GLboolean k;
2932
2933 ASSERT(dstFormat == &_mesa_texformat_sl8);
2934
2935 newDstFormat = &_mesa_texformat_l8;
2936
2937 /* _mesa_textore_a8 handles luminance8 too */
2938 k = _mesa_texstore_a8(ctx, dims, baseInternalFormat,
2939 newDstFormat, dstAddr,
2940 dstXoffset, dstYoffset, dstZoffset,
2941 dstRowStride, dstImageOffsets,
2942 srcWidth, srcHeight, srcDepth,
2943 srcFormat, srcType,
2944 srcAddr, srcPacking);
2945 return k;
2946 }
2947
2948
2949 GLboolean
2950 _mesa_texstore_sla8(TEXSTORE_PARAMS)
2951 {
2952 const struct gl_texture_format *newDstFormat;
2953 GLboolean k;
2954
2955 ASSERT(dstFormat == &_mesa_texformat_sla8);
2956
2957 /* reuse normal luminance/alpha texstore code */
2958 newDstFormat = &_mesa_texformat_al88;
2959
2960 k = _mesa_texstore_al88(ctx, dims, baseInternalFormat,
2961 newDstFormat, dstAddr,
2962 dstXoffset, dstYoffset, dstZoffset,
2963 dstRowStride, dstImageOffsets,
2964 srcWidth, srcHeight, srcDepth,
2965 srcFormat, srcType,
2966 srcAddr, srcPacking);
2967 return k;
2968 }
2969
2970 #endif /* FEATURE_EXT_texture_sRGB */
2971
2972
2973 /**
2974 * Check if an unpack PBO is active prior to fetching a texture image.
2975 * If so, do bounds checking and map the buffer into main memory.
2976 * Any errors detected will be recorded.
2977 * The caller _must_ call _mesa_unmap_teximage_pbo() too!
2978 */
2979 const GLvoid *
2980 _mesa_validate_pbo_teximage(GLcontext *ctx, GLuint dimensions,
2981 GLsizei width, GLsizei height, GLsizei depth,
2982 GLenum format, GLenum type, const GLvoid *pixels,
2983 const struct gl_pixelstore_attrib *unpack,
2984 const char *funcName)
2985 {
2986 GLubyte *buf;
2987
2988 if (unpack->BufferObj->Name == 0) {
2989 /* no PBO */
2990 return pixels;
2991 }
2992 if (!_mesa_validate_pbo_access(dimensions, unpack, width, height, depth,
2993 format, type, pixels)) {
2994 _mesa_error(ctx, GL_INVALID_OPERATION, funcName, "(invalid PBO access");
2995 return NULL;
2996 }
2997
2998 buf = (GLubyte *) ctx->Driver.MapBuffer(ctx, GL_PIXEL_UNPACK_BUFFER_EXT,
2999 GL_READ_ONLY_ARB, unpack->BufferObj);
3000 if (!buf) {
3001 _mesa_error(ctx, GL_INVALID_OPERATION, funcName, "(PBO is mapped");
3002 return NULL;
3003 }
3004
3005 return ADD_POINTERS(buf, pixels);
3006 }
3007
3008
3009 /**
3010 * Check if an unpack PBO is active prior to fetching a compressed texture
3011 * image.
3012 * If so, do bounds checking and map the buffer into main memory.
3013 * Any errors detected will be recorded.
3014 * The caller _must_ call _mesa_unmap_teximage_pbo() too!
3015 */
3016 const GLvoid *
3017 _mesa_validate_pbo_compressed_teximage(GLcontext *ctx,
3018 GLsizei imageSize, const GLvoid *pixels,
3019 const struct gl_pixelstore_attrib *packing,
3020 const char *funcName)
3021 {
3022 GLubyte *buf;
3023
3024 if (packing->BufferObj->Name == 0) {
3025 /* not using a PBO - return pointer unchanged */
3026 return pixels;
3027 }
3028 if ((const GLubyte *) pixels + imageSize >
3029 ((const GLubyte *) 0) + packing->BufferObj->Size) {
3030 /* out of bounds read! */
3031 _mesa_error(ctx, GL_INVALID_OPERATION, funcName, "(invalid PBO access");
3032 return NULL;
3033 }
3034
3035 buf = (GLubyte*) ctx->Driver.MapBuffer(ctx, GL_PIXEL_UNPACK_BUFFER_EXT,
3036 GL_READ_ONLY_ARB, packing->BufferObj);
3037 if (!buf) {
3038 _mesa_error(ctx, GL_INVALID_OPERATION, funcName, "(PBO is mapped");
3039 return NULL;
3040 }
3041
3042 return ADD_POINTERS(buf, pixels);
3043 }
3044
3045
3046 /**
3047 * This function must be called after either of the validate_pbo_*_teximage()
3048 * functions. It unmaps the PBO buffer if it was mapped earlier.
3049 */
3050 void
3051 _mesa_unmap_teximage_pbo(GLcontext *ctx,
3052 const struct gl_pixelstore_attrib *unpack)
3053 {
3054 if (unpack->BufferObj->Name) {
3055 ctx->Driver.UnmapBuffer(ctx, GL_PIXEL_UNPACK_BUFFER_EXT,
3056 unpack->BufferObj);
3057 }
3058 }
3059
3060
3061
3062 /**
3063 * Adaptor for fetching a GLchan texel from a float-valued texture.
3064 */
3065 static void
3066 fetch_texel_float_to_chan(const struct gl_texture_image *texImage,
3067 GLint i, GLint j, GLint k, GLchan *texelOut)
3068 {
3069 GLfloat temp[4];
3070 ASSERT(texImage->FetchTexelf);
3071 texImage->FetchTexelf(texImage, i, j, k, temp);
3072 if (texImage->TexFormat->BaseFormat == GL_DEPTH_COMPONENT ||
3073 texImage->TexFormat->BaseFormat == GL_DEPTH_STENCIL_EXT) {
3074 /* just one channel */
3075 UNCLAMPED_FLOAT_TO_CHAN(texelOut[0], temp[0]);
3076 }
3077 else {
3078 /* four channels */
3079 UNCLAMPED_FLOAT_TO_CHAN(texelOut[0], temp[0]);
3080 UNCLAMPED_FLOAT_TO_CHAN(texelOut[1], temp[1]);
3081 UNCLAMPED_FLOAT_TO_CHAN(texelOut[2], temp[2]);
3082 UNCLAMPED_FLOAT_TO_CHAN(texelOut[3], temp[3]);
3083 }
3084 }
3085
3086
3087 /**
3088 * Adaptor for fetching a float texel from a GLchan-valued texture.
3089 */
3090 static void
3091 fetch_texel_chan_to_float(const struct gl_texture_image *texImage,
3092 GLint i, GLint j, GLint k, GLfloat *texelOut)
3093 {
3094 GLchan temp[4];
3095 ASSERT(texImage->FetchTexelc);
3096 texImage->FetchTexelc(texImage, i, j, k, temp);
3097 if (texImage->TexFormat->BaseFormat == GL_DEPTH_COMPONENT ||
3098 texImage->TexFormat->BaseFormat == GL_DEPTH_STENCIL_EXT) {
3099 /* just one channel */
3100 texelOut[0] = CHAN_TO_FLOAT(temp[0]);
3101 }
3102 else {
3103 /* four channels */
3104 texelOut[0] = CHAN_TO_FLOAT(temp[0]);
3105 texelOut[1] = CHAN_TO_FLOAT(temp[1]);
3106 texelOut[2] = CHAN_TO_FLOAT(temp[2]);
3107 texelOut[3] = CHAN_TO_FLOAT(temp[3]);
3108 }
3109 }
3110
3111
3112 /**
3113 * Initialize the texture image's FetchTexelc and FetchTexelf methods.
3114 */
3115 void
3116 _mesa_set_fetch_functions(struct gl_texture_image *texImage, GLuint dims)
3117 {
3118 ASSERT(dims == 1 || dims == 2 || dims == 3);
3119 ASSERT(texImage->TexFormat);
3120
3121 switch (dims) {
3122 case 1:
3123 texImage->FetchTexelc = texImage->TexFormat->FetchTexel1D;
3124 texImage->FetchTexelf = texImage->TexFormat->FetchTexel1Df;
3125 break;
3126 case 2:
3127 texImage->FetchTexelc = texImage->TexFormat->FetchTexel2D;
3128 texImage->FetchTexelf = texImage->TexFormat->FetchTexel2Df;
3129 break;
3130 case 3:
3131 texImage->FetchTexelc = texImage->TexFormat->FetchTexel3D;
3132 texImage->FetchTexelf = texImage->TexFormat->FetchTexel3Df;
3133 break;
3134 default:
3135 ;
3136 }
3137
3138 /* now check if we need to use a float/chan adaptor */
3139 if (!texImage->FetchTexelc) {
3140 texImage->FetchTexelc = fetch_texel_float_to_chan;
3141 }
3142 else if (!texImage->FetchTexelf) {
3143 texImage->FetchTexelf = fetch_texel_chan_to_float;
3144 }
3145
3146
3147 ASSERT(texImage->FetchTexelc);
3148 ASSERT(texImage->FetchTexelf);
3149 }
3150
3151
3152 /**
3153 * Choose the actual storage format for a new texture image.
3154 * Mainly, this is a wrapper for the driver's ChooseTextureFormat() function.
3155 * Also set some other texImage fields related to texture compression, etc.
3156 * \param ctx rendering context
3157 * \param texImage the gl_texture_image
3158 * \param dims texture dimensions (1, 2 or 3)
3159 * \param format the user-specified format parameter
3160 * \param type the user-specified type parameter
3161 * \param internalFormat the user-specified internal format hint
3162 */
3163 static void
3164 choose_texture_format(GLcontext *ctx, struct gl_texture_image *texImage,
3165 GLuint dims,
3166 GLenum format, GLenum type, GLint internalFormat)
3167 {
3168 ASSERT(dims == 1 || dims == 2 || dims == 3);
3169 ASSERT(ctx->Driver.ChooseTextureFormat);
3170
3171 texImage->TexFormat
3172 = ctx->Driver.ChooseTextureFormat(ctx, internalFormat, format, type);
3173
3174 ASSERT(texImage->TexFormat);
3175
3176 _mesa_set_fetch_functions(texImage, dims);
3177
3178 if (texImage->TexFormat->TexelBytes == 0) {
3179 /* must be a compressed format */
3180 texImage->IsCompressed = GL_TRUE;
3181 texImage->CompressedSize =
3182 ctx->Driver.CompressedTextureSize(ctx, texImage->Width,
3183 texImage->Height, texImage->Depth,
3184 texImage->TexFormat->MesaFormat);
3185 }
3186 else {
3187 /* non-compressed format */
3188 texImage->IsCompressed = GL_FALSE;
3189 texImage->CompressedSize = 0;
3190 }
3191 }
3192
3193
3194
3195 /**
3196 * This is the software fallback for Driver.TexImage1D()
3197 * and Driver.CopyTexImage1D().
3198 * \sa _mesa_store_teximage2d()
3199 * Note that the width may not be the actual texture width since it may
3200 * be changed by convolution w/ GL_REDUCE. The texImage->Width field will
3201 * have the actual texture size.
3202 */
3203 void
3204 _mesa_store_teximage1d(GLcontext *ctx, GLenum target, GLint level,
3205 GLint internalFormat,
3206 GLint width, GLint border,
3207 GLenum format, GLenum type, const GLvoid *pixels,
3208 const struct gl_pixelstore_attrib *packing,
3209 struct gl_texture_object *texObj,
3210 struct gl_texture_image *texImage)
3211 {
3212 GLint sizeInBytes;
3213 (void) border;
3214
3215 choose_texture_format(ctx, texImage, 1, format, type, internalFormat);
3216
3217 /* allocate memory */
3218 if (texImage->IsCompressed)
3219 sizeInBytes = texImage->CompressedSize;
3220 else
3221 sizeInBytes = texImage->Width * texImage->TexFormat->TexelBytes;
3222 texImage->Data = _mesa_alloc_texmemory(sizeInBytes);
3223 if (!texImage->Data) {
3224 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexImage1D");
3225 return;
3226 }
3227
3228 pixels = _mesa_validate_pbo_teximage(ctx, 1, width, 1, 1, format, type,
3229 pixels, packing, "glTexImage1D");
3230 if (!pixels) {
3231 /* Note: we check for a NULL image pointer here, _after_ we allocated
3232 * memory for the texture. That's what the GL spec calls for.
3233 */
3234 return;
3235 }
3236 else {
3237 const GLint dstRowStride = 0;
3238 GLboolean success;
3239 ASSERT(texImage->TexFormat->StoreImage);
3240 success = texImage->TexFormat->StoreImage(ctx, 1, texImage->_BaseFormat,
3241 texImage->TexFormat,
3242 texImage->Data,
3243 0, 0, 0, /* dstX/Y/Zoffset */
3244 dstRowStride,
3245 texImage->ImageOffsets,
3246 width, 1, 1,
3247 format, type, pixels, packing);
3248 if (!success) {
3249 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexImage1D");
3250 }
3251 }
3252
3253 /* GL_SGIS_generate_mipmap */
3254 if (level == texObj->BaseLevel && texObj->GenerateMipmap) {
3255 ctx->Driver.GenerateMipmap(ctx, target, texObj);
3256 }
3257
3258 _mesa_unmap_teximage_pbo(ctx, packing);
3259 }
3260
3261
3262 /**
3263 * This is the software fallback for Driver.TexImage2D()
3264 * and Driver.CopyTexImage2D().
3265 *
3266 * This function is oriented toward storing images in main memory, rather
3267 * than VRAM. Device driver's can easily plug in their own replacement.
3268 *
3269 * Note: width and height may be pre-convolved dimensions, but
3270 * texImage->Width and texImage->Height will be post-convolved dimensions.
3271 */
3272 void
3273 _mesa_store_teximage2d(GLcontext *ctx, GLenum target, GLint level,
3274 GLint internalFormat,
3275 GLint width, GLint height, GLint border,
3276 GLenum format, GLenum type, const void *pixels,
3277 const struct gl_pixelstore_attrib *packing,
3278 struct gl_texture_object *texObj,
3279 struct gl_texture_image *texImage)
3280 {
3281 GLint texelBytes, sizeInBytes;
3282 (void) border;
3283
3284 choose_texture_format(ctx, texImage, 2, format, type, internalFormat);
3285
3286 texelBytes = texImage->TexFormat->TexelBytes;
3287
3288 /* allocate memory */
3289 if (texImage->IsCompressed)
3290 sizeInBytes = texImage->CompressedSize;
3291 else
3292 sizeInBytes = texImage->Width * texImage->Height * texelBytes;
3293 texImage->Data = _mesa_alloc_texmemory(sizeInBytes);
3294 if (!texImage->Data) {
3295 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexImage2D");
3296 return;
3297 }
3298
3299 pixels = _mesa_validate_pbo_teximage(ctx, 2, width, height, 1, format, type,
3300 pixels, packing, "glTexImage2D");
3301 if (!pixels) {
3302 /* Note: we check for a NULL image pointer here, _after_ we allocated
3303 * memory for the texture. That's what the GL spec calls for.
3304 */
3305 return;
3306 }
3307 else {
3308 GLint dstRowStride;
3309 GLboolean success;
3310 if (texImage->IsCompressed) {
3311 dstRowStride
3312 = _mesa_compressed_row_stride(texImage->TexFormat->MesaFormat, width);
3313 }
3314 else {
3315 dstRowStride = texImage->RowStride * texImage->TexFormat->TexelBytes;
3316 }
3317 ASSERT(texImage->TexFormat->StoreImage);
3318 success = texImage->TexFormat->StoreImage(ctx, 2, texImage->_BaseFormat,
3319 texImage->TexFormat,
3320 texImage->Data,
3321 0, 0, 0, /* dstX/Y/Zoffset */
3322 dstRowStride,
3323 texImage->ImageOffsets,
3324 width, height, 1,
3325 format, type, pixels, packing);
3326 if (!success) {
3327 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexImage2D");
3328 }
3329 }
3330
3331 /* GL_SGIS_generate_mipmap */
3332 if (level == texObj->BaseLevel && texObj->GenerateMipmap) {
3333 ctx->Driver.GenerateMipmap(ctx, target, texObj);
3334 }
3335
3336 _mesa_unmap_teximage_pbo(ctx, packing);
3337 }
3338
3339
3340
3341 /**
3342 * This is the software fallback for Driver.TexImage3D()
3343 * and Driver.CopyTexImage3D().
3344 * \sa _mesa_store_teximage2d()
3345 */
3346 void
3347 _mesa_store_teximage3d(GLcontext *ctx, GLenum target, GLint level,
3348 GLint internalFormat,
3349 GLint width, GLint height, GLint depth, GLint border,
3350 GLenum format, GLenum type, const void *pixels,
3351 const struct gl_pixelstore_attrib *packing,
3352 struct gl_texture_object *texObj,
3353 struct gl_texture_image *texImage)
3354 {
3355 GLint texelBytes, sizeInBytes;
3356 (void) border;
3357
3358 choose_texture_format(ctx, texImage, 3, format, type, internalFormat);
3359
3360 texelBytes = texImage->TexFormat->TexelBytes;
3361
3362 /* allocate memory */
3363 if (texImage->IsCompressed)
3364 sizeInBytes = texImage->CompressedSize;
3365 else
3366 sizeInBytes = width * height * depth * texelBytes;
3367 texImage->Data = _mesa_alloc_texmemory(sizeInBytes);
3368 if (!texImage->Data) {
3369 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexImage3D");
3370 return;
3371 }
3372
3373 pixels = _mesa_validate_pbo_teximage(ctx, 3, width, height, depth, format,
3374 type, pixels, packing, "glTexImage3D");
3375 if (!pixels) {
3376 /* Note: we check for a NULL image pointer here, _after_ we allocated
3377 * memory for the texture. That's what the GL spec calls for.
3378 */
3379 return;
3380 }
3381 else {
3382 GLint dstRowStride;
3383 GLboolean success;
3384 if (texImage->IsCompressed) {
3385 dstRowStride
3386 = _mesa_compressed_row_stride(texImage->TexFormat->MesaFormat, width);
3387 }
3388 else {
3389 dstRowStride = texImage->RowStride * texImage->TexFormat->TexelBytes;
3390 }
3391 ASSERT(texImage->TexFormat->StoreImage);
3392 success = texImage->TexFormat->StoreImage(ctx, 3, texImage->_BaseFormat,
3393 texImage->TexFormat,
3394 texImage->Data,
3395 0, 0, 0, /* dstX/Y/Zoffset */
3396 dstRowStride,
3397 texImage->ImageOffsets,
3398 width, height, depth,
3399 format, type, pixels, packing);
3400 if (!success) {
3401 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexImage3D");
3402 }
3403 }
3404
3405 /* GL_SGIS_generate_mipmap */
3406 if (level == texObj->BaseLevel && texObj->GenerateMipmap) {
3407 ctx->Driver.GenerateMipmap(ctx, target, texObj);
3408 }
3409
3410 _mesa_unmap_teximage_pbo(ctx, packing);
3411 }
3412
3413
3414
3415
3416 /*
3417 * This is the software fallback for Driver.TexSubImage1D()
3418 * and Driver.CopyTexSubImage1D().
3419 */
3420 void
3421 _mesa_store_texsubimage1d(GLcontext *ctx, GLenum target, GLint level,
3422 GLint xoffset, GLint width,
3423 GLenum format, GLenum type, const void *pixels,
3424 const struct gl_pixelstore_attrib *packing,
3425 struct gl_texture_object *texObj,
3426 struct gl_texture_image *texImage)
3427 {
3428 /* get pointer to src pixels (may be in a pbo which we'll map here) */
3429 pixels = _mesa_validate_pbo_teximage(ctx, 1, width, 1, 1, format, type,
3430 pixels, packing, "glTexSubImage1D");
3431 if (!pixels)
3432 return;
3433
3434 {
3435 const GLint dstRowStride = 0;
3436 GLboolean success;
3437 ASSERT(texImage->TexFormat->StoreImage);
3438 success = texImage->TexFormat->StoreImage(ctx, 1, texImage->_BaseFormat,
3439 texImage->TexFormat,
3440 texImage->Data,
3441 xoffset, 0, 0, /* offsets */
3442 dstRowStride,
3443 texImage->ImageOffsets,
3444 width, 1, 1,
3445 format, type, pixels, packing);
3446 if (!success) {
3447 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexSubImage1D");
3448 }
3449 }
3450
3451 /* GL_SGIS_generate_mipmap */
3452 if (level == texObj->BaseLevel && texObj->GenerateMipmap) {
3453 ctx->Driver.GenerateMipmap(ctx, target, texObj);
3454 }
3455
3456 _mesa_unmap_teximage_pbo(ctx, packing);
3457 }
3458
3459
3460
3461 /**
3462 * This is the software fallback for Driver.TexSubImage2D()
3463 * and Driver.CopyTexSubImage2D().
3464 */
3465 void
3466 _mesa_store_texsubimage2d(GLcontext *ctx, GLenum target, GLint level,
3467 GLint xoffset, GLint yoffset,
3468 GLint width, GLint height,
3469 GLenum format, GLenum type, const void *pixels,
3470 const struct gl_pixelstore_attrib *packing,
3471 struct gl_texture_object *texObj,
3472 struct gl_texture_image *texImage)
3473 {
3474 /* get pointer to src pixels (may be in a pbo which we'll map here) */
3475 pixels = _mesa_validate_pbo_teximage(ctx, 2, width, height, 1, format, type,
3476 pixels, packing, "glTexSubImage2D");
3477 if (!pixels)
3478 return;
3479
3480 {
3481 GLint dstRowStride = 0;
3482 GLboolean success;
3483 if (texImage->IsCompressed) {
3484 dstRowStride = _mesa_compressed_row_stride(texImage->TexFormat->MesaFormat,
3485 texImage->Width);
3486 }
3487 else {
3488 dstRowStride = texImage->RowStride * texImage->TexFormat->TexelBytes;
3489 }
3490 ASSERT(texImage->TexFormat->StoreImage);
3491 success = texImage->TexFormat->StoreImage(ctx, 2, texImage->_BaseFormat,
3492 texImage->TexFormat,
3493 texImage->Data,
3494 xoffset, yoffset, 0,
3495 dstRowStride,
3496 texImage->ImageOffsets,
3497 width, height, 1,
3498 format, type, pixels, packing);
3499 if (!success) {
3500 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexSubImage2D");
3501 }
3502 }
3503
3504 /* GL_SGIS_generate_mipmap */
3505 if (level == texObj->BaseLevel && texObj->GenerateMipmap) {
3506 ctx->Driver.GenerateMipmap(ctx, target, texObj);
3507 }
3508
3509 _mesa_unmap_teximage_pbo(ctx, packing);
3510 }
3511
3512
3513 /*
3514 * This is the software fallback for Driver.TexSubImage3D().
3515 * and Driver.CopyTexSubImage3D().
3516 */
3517 void
3518 _mesa_store_texsubimage3d(GLcontext *ctx, GLenum target, GLint level,
3519 GLint xoffset, GLint yoffset, GLint zoffset,
3520 GLint width, GLint height, GLint depth,
3521 GLenum format, GLenum type, const void *pixels,
3522 const struct gl_pixelstore_attrib *packing,
3523 struct gl_texture_object *texObj,
3524 struct gl_texture_image *texImage)
3525 {
3526 /* get pointer to src pixels (may be in a pbo which we'll map here) */
3527 pixels = _mesa_validate_pbo_teximage(ctx, 3, width, height, depth, format,
3528 type, pixels, packing,
3529 "glTexSubImage3D");
3530 if (!pixels)
3531 return;
3532
3533 {
3534 GLint dstRowStride;
3535 GLboolean success;
3536 if (texImage->IsCompressed) {
3537 dstRowStride = _mesa_compressed_row_stride(texImage->TexFormat->MesaFormat,
3538 texImage->Width);
3539 }
3540 else {
3541 dstRowStride = texImage->RowStride * texImage->TexFormat->TexelBytes;
3542 }
3543 ASSERT(texImage->TexFormat->StoreImage);
3544 success = texImage->TexFormat->StoreImage(ctx, 3, texImage->_BaseFormat,
3545 texImage->TexFormat,
3546 texImage->Data,
3547 xoffset, yoffset, zoffset,
3548 dstRowStride,
3549 texImage->ImageOffsets,
3550 width, height, depth,
3551 format, type, pixels, packing);
3552 if (!success) {
3553 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexSubImage3D");
3554 }
3555 }
3556
3557 /* GL_SGIS_generate_mipmap */
3558 if (level == texObj->BaseLevel && texObj->GenerateMipmap) {
3559 ctx->Driver.GenerateMipmap(ctx, target, texObj);
3560 }
3561
3562 _mesa_unmap_teximage_pbo(ctx, packing);
3563 }
3564
3565
3566 /*
3567 * Fallback for Driver.CompressedTexImage1D()
3568 */
3569 void
3570 _mesa_store_compressed_teximage1d(GLcontext *ctx, GLenum target, GLint level,
3571 GLint internalFormat,
3572 GLint width, GLint border,
3573 GLsizei imageSize, const GLvoid *data,
3574 struct gl_texture_object *texObj,
3575 struct gl_texture_image *texImage)
3576 {
3577 /* this space intentionally left blank */
3578 (void) ctx;
3579 (void) target; (void) level;
3580 (void) internalFormat;
3581 (void) width; (void) border;
3582 (void) imageSize; (void) data;
3583 (void) texObj;
3584 (void) texImage;
3585 }
3586
3587
3588
3589 /**
3590 * Fallback for Driver.CompressedTexImage2D()
3591 */
3592 void
3593 _mesa_store_compressed_teximage2d(GLcontext *ctx, GLenum target, GLint level,
3594 GLint internalFormat,
3595 GLint width, GLint height, GLint border,
3596 GLsizei imageSize, const GLvoid *data,
3597 struct gl_texture_object *texObj,
3598 struct gl_texture_image *texImage)
3599 {
3600 (void) width; (void) height; (void) border;
3601
3602 /* This is pretty simple, basically just do a memcpy without worrying
3603 * about the usual image unpacking or image transfer operations.
3604 */
3605 ASSERT(texObj);
3606 ASSERT(texImage);
3607 ASSERT(texImage->Width > 0);
3608 ASSERT(texImage->Height > 0);
3609 ASSERT(texImage->Depth == 1);
3610 ASSERT(texImage->Data == NULL); /* was freed in glCompressedTexImage2DARB */
3611
3612 choose_texture_format(ctx, texImage, 2, 0, 0, internalFormat);
3613
3614 /* allocate storage */
3615 texImage->Data = _mesa_alloc_texmemory(imageSize);
3616 if (!texImage->Data) {
3617 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glCompressedTexImage2DARB");
3618 return;
3619 }
3620
3621 data = _mesa_validate_pbo_compressed_teximage(ctx, imageSize, data,
3622 &ctx->Unpack,
3623 "glCompressedTexImage2D");
3624 if (!data)
3625 return;
3626
3627 /* copy the data */
3628 ASSERT(texImage->CompressedSize == (GLuint) imageSize);
3629 MEMCPY(texImage->Data, data, imageSize);
3630
3631 /* GL_SGIS_generate_mipmap */
3632 if (level == texObj->BaseLevel && texObj->GenerateMipmap) {
3633 ctx->Driver.GenerateMipmap(ctx, target, texObj);
3634 }
3635
3636 _mesa_unmap_teximage_pbo(ctx, &ctx->Unpack);
3637 }
3638
3639
3640
3641 /*
3642 * Fallback for Driver.CompressedTexImage3D()
3643 */
3644 void
3645 _mesa_store_compressed_teximage3d(GLcontext *ctx, GLenum target, GLint level,
3646 GLint internalFormat,
3647 GLint width, GLint height, GLint depth,
3648 GLint border,
3649 GLsizei imageSize, const GLvoid *data,
3650 struct gl_texture_object *texObj,
3651 struct gl_texture_image *texImage)
3652 {
3653 /* this space intentionally left blank */
3654 (void) ctx;
3655 (void) target; (void) level;
3656 (void) internalFormat;
3657 (void) width; (void) height; (void) depth;
3658 (void) border;
3659 (void) imageSize; (void) data;
3660 (void) texObj;
3661 (void) texImage;
3662 }
3663
3664
3665
3666 /**
3667 * Fallback for Driver.CompressedTexSubImage1D()
3668 */
3669 void
3670 _mesa_store_compressed_texsubimage1d(GLcontext *ctx, GLenum target,
3671 GLint level,
3672 GLint xoffset, GLsizei width,
3673 GLenum format,
3674 GLsizei imageSize, const GLvoid *data,
3675 struct gl_texture_object *texObj,
3676 struct gl_texture_image *texImage)
3677 {
3678 /* there are no compressed 1D texture formats yet */
3679 (void) ctx;
3680 (void) target; (void) level;
3681 (void) xoffset; (void) width;
3682 (void) format;
3683 (void) imageSize; (void) data;
3684 (void) texObj;
3685 (void) texImage;
3686 }
3687
3688
3689 /**
3690 * Fallback for Driver.CompressedTexSubImage2D()
3691 */
3692 void
3693 _mesa_store_compressed_texsubimage2d(GLcontext *ctx, GLenum target,
3694 GLint level,
3695 GLint xoffset, GLint yoffset,
3696 GLsizei width, GLsizei height,
3697 GLenum format,
3698 GLsizei imageSize, const GLvoid *data,
3699 struct gl_texture_object *texObj,
3700 struct gl_texture_image *texImage)
3701 {
3702 GLint bytesPerRow, destRowStride, srcRowStride;
3703 GLint i, rows;
3704 GLubyte *dest;
3705 const GLubyte *src;
3706 const GLuint mesaFormat = texImage->TexFormat->MesaFormat;
3707
3708 (void) format;
3709
3710 /* these should have been caught sooner */
3711 ASSERT((width & 3) == 0 || width == 2 || width == 1);
3712 ASSERT((height & 3) == 0 || height == 2 || height == 1);
3713 ASSERT((xoffset & 3) == 0);
3714 ASSERT((yoffset & 3) == 0);
3715
3716 /* get pointer to src pixels (may be in a pbo which we'll map here) */
3717 data = _mesa_validate_pbo_compressed_teximage(ctx, imageSize, data,
3718 &ctx->Unpack,
3719 "glCompressedTexSubImage2D");
3720 if (!data)
3721 return;
3722
3723 srcRowStride = _mesa_compressed_row_stride(mesaFormat, width);
3724 src = (const GLubyte *) data;
3725
3726 destRowStride = _mesa_compressed_row_stride(mesaFormat, texImage->Width);
3727 dest = _mesa_compressed_image_address(xoffset, yoffset, 0,
3728 texImage->TexFormat->MesaFormat,
3729 texImage->Width,
3730 (GLubyte *) texImage->Data);
3731
3732 bytesPerRow = srcRowStride;
3733 rows = height / 4;
3734
3735 for (i = 0; i < rows; i++) {
3736 MEMCPY(dest, src, bytesPerRow);
3737 dest += destRowStride;
3738 src += srcRowStride;
3739 }
3740
3741 /* GL_SGIS_generate_mipmap */
3742 if (level == texObj->BaseLevel && texObj->GenerateMipmap) {
3743 ctx->Driver.GenerateMipmap(ctx, target, texObj);
3744 }
3745
3746 _mesa_unmap_teximage_pbo(ctx, &ctx->Unpack);
3747 }
3748
3749
3750 /**
3751 * Fallback for Driver.CompressedTexSubImage3D()
3752 */
3753 void
3754 _mesa_store_compressed_texsubimage3d(GLcontext *ctx, GLenum target,
3755 GLint level,
3756 GLint xoffset, GLint yoffset, GLint zoffset,
3757 GLsizei width, GLsizei height, GLsizei depth,
3758 GLenum format,
3759 GLsizei imageSize, const GLvoid *data,
3760 struct gl_texture_object *texObj,
3761 struct gl_texture_image *texImage)
3762 {
3763 /* there are no compressed 3D texture formats yet */
3764 (void) ctx;
3765 (void) target; (void) level;
3766 (void) xoffset; (void) yoffset; (void) zoffset;
3767 (void) width; (void) height; (void) depth;
3768 (void) format;
3769 (void) imageSize; (void) data;
3770 (void) texObj;
3771 (void) texImage;
3772 }
3773
3774
3775
3776
3777 #if FEATURE_EXT_texture_sRGB
3778
3779 /**
3780 * Test if given texture image is an sRGB format.
3781 */
3782 static GLboolean
3783 is_srgb_teximage(const struct gl_texture_image *texImage)
3784 {
3785 switch (texImage->TexFormat->MesaFormat) {
3786 case MESA_FORMAT_SRGB8:
3787 case MESA_FORMAT_SRGBA8:
3788 case MESA_FORMAT_SARGB8:
3789 case MESA_FORMAT_SL8:
3790 case MESA_FORMAT_SLA8:
3791 case MESA_FORMAT_SRGB_DXT1:
3792 case MESA_FORMAT_SRGBA_DXT1:
3793 case MESA_FORMAT_SRGBA_DXT3:
3794 case MESA_FORMAT_SRGBA_DXT5:
3795 return GL_TRUE;
3796 default:
3797 return GL_FALSE;
3798 }
3799 }
3800
3801
3802 /**
3803 * Convert a float value from linear space to a
3804 * non-linear sRGB value in [0, 255].
3805 * Not terribly efficient.
3806 */
3807 static INLINE GLfloat
3808 linear_to_nonlinear(GLfloat cl)
3809 {
3810 /* can't have values outside [0, 1] */
3811 GLfloat cs;
3812 if (cl < 0.0031308) {
3813 cs = 12.92 * cl;
3814 }
3815 else {
3816 cs = 1.055 * _mesa_pow(cl, 0.41666) - 0.055;
3817 }
3818 return cs;
3819 }
3820
3821 #endif /* FEATURE_EXT_texture_sRGB */
3822
3823 /**
3824 * This is the software fallback for Driver.GetTexImage().
3825 * All error checking will have been done before this routine is called.
3826 */
3827 void
3828 _mesa_get_teximage(GLcontext *ctx, GLenum target, GLint level,
3829 GLenum format, GLenum type, GLvoid *pixels,
3830 struct gl_texture_object *texObj,
3831 struct gl_texture_image *texImage)
3832 {
3833 const GLuint dimensions = (target == GL_TEXTURE_3D) ? 3 : 2;
3834
3835 if (ctx->Pack.BufferObj->Name) {
3836 /* Packing texture image into a PBO.
3837 * Map the (potentially) VRAM-based buffer into our process space so
3838 * we can write into it with the code below.
3839 * A hardware driver might use a sophisticated blit to move the
3840 * texture data to the PBO if the PBO is in VRAM along with the texture.
3841 */
3842 GLubyte *buf = (GLubyte *)
3843 ctx->Driver.MapBuffer(ctx, GL_PIXEL_PACK_BUFFER_EXT,
3844 GL_WRITE_ONLY_ARB, ctx->Pack.BufferObj);
3845 if (!buf) {
3846 /* buffer is already mapped - that's an error */
3847 _mesa_error(ctx, GL_INVALID_OPERATION,"glGetTexImage(PBO is mapped)");
3848 return;
3849 }
3850 /* <pixels> was an offset into the PBO.
3851 * Now make it a real, client-side pointer inside the mapped region.
3852 */
3853 pixels = ADD_POINTERS(buf, pixels);
3854 }
3855 else if (!pixels) {
3856 /* not an error */
3857 return;
3858 }
3859
3860 {
3861 const GLint width = texImage->Width;
3862 const GLint height = texImage->Height;
3863 const GLint depth = texImage->Depth;
3864 GLint img, row;
3865 for (img = 0; img < depth; img++) {
3866 for (row = 0; row < height; row++) {
3867 /* compute destination address in client memory */
3868 GLvoid *dest = _mesa_image_address( dimensions, &ctx->Pack, pixels,
3869 width, height, format, type,
3870 img, row, 0);
3871 assert(dest);
3872
3873 if (format == GL_COLOR_INDEX) {
3874 GLuint indexRow[MAX_WIDTH];
3875 GLint col;
3876 /* Can't use FetchTexel here because that returns RGBA */
3877 if (texImage->TexFormat->IndexBits == 8) {
3878 const GLubyte *src = (const GLubyte *) texImage->Data;
3879 src += width * (img * texImage->Height + row);
3880 for (col = 0; col < width; col++) {
3881 indexRow[col] = src[col];
3882 }
3883 }
3884 else if (texImage->TexFormat->IndexBits == 16) {
3885 const GLushort *src = (const GLushort *) texImage->Data;
3886 src += width * (img * texImage->Height + row);
3887 for (col = 0; col < width; col++) {
3888 indexRow[col] = src[col];
3889 }
3890 }
3891 else {
3892 _mesa_problem(ctx,
3893 "Color index problem in _mesa_GetTexImage");
3894 }
3895 _mesa_pack_index_span(ctx, width, type, dest,
3896 indexRow, &ctx->Pack,
3897 0 /* no image transfer */);
3898 }
3899 else if (format == GL_DEPTH_COMPONENT) {
3900 GLfloat depthRow[MAX_WIDTH];
3901 GLint col;
3902 for (col = 0; col < width; col++) {
3903 (*texImage->FetchTexelf)(texImage, col, row, img,
3904 depthRow + col);
3905 }
3906 _mesa_pack_depth_span(ctx, width, dest, type,
3907 depthRow, &ctx->Pack);
3908 }
3909 else if (format == GL_DEPTH_STENCIL_EXT) {
3910 /* XXX Note: we're bypassing texImage->FetchTexel()! */
3911 const GLuint *src = (const GLuint *) texImage->Data;
3912 src += width * row + width * height * img;
3913 _mesa_memcpy(dest, src, width * sizeof(GLuint));
3914 if (ctx->Pack.SwapBytes) {
3915 _mesa_swap4((GLuint *) dest, width);
3916 }
3917 }
3918 else if (format == GL_YCBCR_MESA) {
3919 /* No pixel transfer */
3920 const GLint rowstride = texImage->RowStride;
3921 MEMCPY(dest,
3922 (const GLushort *) texImage->Data + row * rowstride,
3923 width * sizeof(GLushort));
3924 /* check for byte swapping */
3925 if ((texImage->TexFormat->MesaFormat == MESA_FORMAT_YCBCR
3926 && type == GL_UNSIGNED_SHORT_8_8_REV_MESA) ||
3927 (texImage->TexFormat->MesaFormat == MESA_FORMAT_YCBCR_REV
3928 && type == GL_UNSIGNED_SHORT_8_8_MESA)) {
3929 if (!ctx->Pack.SwapBytes)
3930 _mesa_swap2((GLushort *) dest, width);
3931 }
3932 else if (ctx->Pack.SwapBytes) {
3933 _mesa_swap2((GLushort *) dest, width);
3934 }
3935 }
3936 #if FEATURE_EXT_texture_sRGB
3937 else if (is_srgb_teximage(texImage)) {
3938 /* special case this since need to backconvert values */
3939 /* convert row to RGBA format */
3940 GLfloat rgba[MAX_WIDTH][4];
3941 GLint col;
3942 GLbitfield transferOps = 0x0;
3943
3944 for (col = 0; col < width; col++) {
3945 (*texImage->FetchTexelf)(texImage, col, row, img, rgba[col]);
3946 if (texImage->TexFormat->BaseFormat == GL_LUMINANCE) {
3947 rgba[col][RCOMP] = linear_to_nonlinear(rgba[col][RCOMP]);
3948 rgba[col][GCOMP] = 0.0;
3949 rgba[col][BCOMP] = 0.0;
3950 }
3951 else if (texImage->TexFormat->BaseFormat == GL_LUMINANCE_ALPHA) {
3952 rgba[col][RCOMP] = linear_to_nonlinear(rgba[col][RCOMP]);
3953 rgba[col][GCOMP] = 0.0;
3954 rgba[col][BCOMP] = 0.0;
3955 }
3956 else if (texImage->TexFormat->BaseFormat == GL_RGB ||
3957 texImage->TexFormat->BaseFormat == GL_RGBA) {
3958 rgba[col][RCOMP] = linear_to_nonlinear(rgba[col][RCOMP]);
3959 rgba[col][GCOMP] = linear_to_nonlinear(rgba[col][GCOMP]);
3960 rgba[col][BCOMP] = linear_to_nonlinear(rgba[col][BCOMP]);
3961 }
3962 }
3963 _mesa_pack_rgba_span_float(ctx, width, (GLfloat (*)[4]) rgba,
3964 format, type, dest,
3965 &ctx->Pack, transferOps /*image xfer ops*/);
3966 }
3967 #endif /* FEATURE_EXT_texture_sRGB */
3968 else {
3969 /* general case: convert row to RGBA format */
3970 GLfloat rgba[MAX_WIDTH][4];
3971 GLint col;
3972 GLbitfield transferOps = 0x0;
3973
3974 if (type == GL_FLOAT && texImage->TexFormat->BaseFormat != GL_DUDV_ATI &&
3975 ((ctx->Color.ClampReadColor == GL_TRUE) ||
3976 (ctx->Color.ClampReadColor == GL_FIXED_ONLY_ARB &&
3977 texImage->TexFormat->DataType != GL_FLOAT)))
3978 transferOps |= IMAGE_CLAMP_BIT;
3979
3980 for (col = 0; col < width; col++) {
3981 (*texImage->FetchTexelf)(texImage, col, row, img, rgba[col]);
3982 if (texImage->TexFormat->BaseFormat == GL_ALPHA) {
3983 rgba[col][RCOMP] = 0.0;
3984 rgba[col][GCOMP] = 0.0;
3985 rgba[col][BCOMP] = 0.0;
3986 }
3987 else if (texImage->TexFormat->BaseFormat == GL_LUMINANCE) {
3988 rgba[col][GCOMP] = 0.0;
3989 rgba[col][BCOMP] = 0.0;
3990 rgba[col][ACOMP] = 1.0;
3991 }
3992 else if (texImage->TexFormat->BaseFormat == GL_LUMINANCE_ALPHA) {
3993 rgba[col][GCOMP] = 0.0;
3994 rgba[col][BCOMP] = 0.0;
3995 }
3996 else if (texImage->TexFormat->BaseFormat == GL_INTENSITY) {
3997 rgba[col][GCOMP] = 0.0;
3998 rgba[col][BCOMP] = 0.0;
3999 rgba[col][ACOMP] = 1.0;
4000 }
4001 }
4002 _mesa_pack_rgba_span_float(ctx, width, (GLfloat (*)[4]) rgba,
4003 format, type, dest,
4004 &ctx->Pack, transferOps /*image xfer ops*/);
4005 } /* format */
4006 } /* row */
4007 } /* img */
4008 }
4009
4010 if (ctx->Pack.BufferObj->Name) {
4011 ctx->Driver.UnmapBuffer(ctx, GL_PIXEL_PACK_BUFFER_EXT,
4012 ctx->Pack.BufferObj);
4013 }
4014 }
4015
4016
4017
4018 /**
4019 * This is the software fallback for Driver.GetCompressedTexImage().
4020 * All error checking will have been done before this routine is called.
4021 */
4022 void
4023 _mesa_get_compressed_teximage(GLcontext *ctx, GLenum target, GLint level,
4024 GLvoid *img,
4025 struct gl_texture_object *texObj,
4026 struct gl_texture_image *texImage)
4027 {
4028 GLuint size;
4029
4030 if (ctx->Pack.BufferObj->Name) {
4031 /* pack texture image into a PBO */
4032 GLubyte *buf;
4033 if ((const GLubyte *) img + texImage->CompressedSize >
4034 (const GLubyte *) ctx->Pack.BufferObj->Size) {
4035 _mesa_error(ctx, GL_INVALID_OPERATION,
4036 "glGetCompressedTexImage(invalid PBO access)");
4037 return;
4038 }
4039 buf = (GLubyte *) ctx->Driver.MapBuffer(ctx, GL_PIXEL_PACK_BUFFER_EXT,
4040 GL_WRITE_ONLY_ARB,
4041 ctx->Pack.BufferObj);
4042 if (!buf) {
4043 /* buffer is already mapped - that's an error */
4044 _mesa_error(ctx, GL_INVALID_OPERATION,
4045 "glGetCompressedTexImage(PBO is mapped)");
4046 return;
4047 }
4048 img = ADD_POINTERS(buf, img);
4049 }
4050 else if (!img) {
4051 /* not an error */
4052 return;
4053 }
4054
4055 /* don't use texImage->CompressedSize since that may be padded out */
4056 size = _mesa_compressed_texture_size(ctx, texImage->Width, texImage->Height,
4057 texImage->Depth,
4058 texImage->TexFormat->MesaFormat);
4059
4060 /* just memcpy, no pixelstore or pixel transfer */
4061 _mesa_memcpy(img, texImage->Data, size);
4062
4063 if (ctx->Pack.BufferObj->Name) {
4064 ctx->Driver.UnmapBuffer(ctx, GL_PIXEL_PACK_BUFFER_EXT,
4065 ctx->Pack.BufferObj);
4066 }
4067 }