projects / mesa.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
Merge commit 'origin/master' into gallium-0.2
[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
2475
2476 /**
2477 * Store a combined depth/stencil texture image.
2478 */
2479 GLboolean
2480 _mesa_texstore_z24_s8(TEXSTORE_PARAMS)
2481 {
2482 const GLfloat depthScale = (GLfloat) 0xffffff;
2483
2484 ASSERT(dstFormat == &_mesa_texformat_z24_s8);
2485 ASSERT(srcFormat == GL_DEPTH_STENCIL_EXT);
2486 ASSERT(srcType == GL_UNSIGNED_INT_24_8_EXT);
2487
2488 if (ctx->Pixel.DepthScale == 1.0f &&
2489 ctx->Pixel.DepthBias == 0.0f &&
2490 !srcPacking->SwapBytes) {
2491 /* simple path */
2492 memcpy_texture(ctx, dims,
2493 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
2494 dstRowStride,
2495 dstImageOffsets,
2496 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
2497 srcAddr, srcPacking);
2498 }
2499 else {
2500 /* general path */
2501 const GLint srcRowStride
2502 = _mesa_image_row_stride(srcPacking, srcWidth, srcFormat, srcType)
2503 / sizeof(GLuint);
2504 GLint img, row;
2505
2506 for (img = 0; img < srcDepth; img++) {
2507 GLuint *dstRow = (GLuint *) dstAddr
2508 + dstImageOffsets[dstZoffset + img]
2509 + dstYoffset * dstRowStride / sizeof(GLuint)
2510 + dstXoffset;
2511 const GLuint *src
2512 = (const GLuint *) _mesa_image_address(dims, srcPacking, srcAddr,
2513 srcWidth, srcHeight,
2514 srcFormat, srcType,
2515 img, 0, 0);
2516 for (row = 0; row < srcHeight; row++) {
2517 GLubyte stencil[MAX_WIDTH];
2518 GLint i;
2519 /* the 24 depth bits will be in the high position: */
2520 _mesa_unpack_depth_span(ctx, srcWidth,
2521 GL_UNSIGNED_INT_24_8_EXT, /* dst type */
2522 dstRow, /* dst addr */
2523 (GLuint) depthScale,
2524 srcType, src, srcPacking);
2525 /* get the 8-bit stencil values */
2526 _mesa_unpack_stencil_span(ctx, srcWidth,
2527 GL_UNSIGNED_BYTE, /* dst type */
2528 stencil, /* dst addr */
2529 srcType, src, srcPacking,
2530 ctx->_ImageTransferState);
2531 /* merge stencil values into depth values */
2532 for (i = 0; i < srcWidth; i++)
2533 dstRow[i] |= stencil[i];
2534
2535 src += srcRowStride;
2536 dstRow += dstRowStride / sizeof(GLuint);
2537 }
2538 }
2539 }
2540 return GL_TRUE;
2541 }
2542
2543
2544 /**
2545 * Store a combined depth/stencil texture image.
2546 */
2547 GLboolean
2548 _mesa_texstore_s8_z24(TEXSTORE_PARAMS)
2549 {
2550 const GLuint depthScale = 0xffffff;
2551 const GLint srcRowStride
2552 = _mesa_image_row_stride(srcPacking, srcWidth, srcFormat, srcType)
2553 / sizeof(GLuint);
2554 GLint img, row;
2555
2556 ASSERT(dstFormat == &_mesa_texformat_s8_z24);
2557 ASSERT(srcFormat == GL_DEPTH_STENCIL_EXT || srcFormat == GL_DEPTH_COMPONENT);
2558 ASSERT(srcFormat != GL_DEPTH_STENCIL_EXT || srcType == GL_UNSIGNED_INT_24_8_EXT);
2559
2560 /* In case we only upload depth we need to preserve the stencil */
2561 if (srcFormat == GL_DEPTH_COMPONENT) {
2562 for (img = 0; img < srcDepth; img++) {
2563 GLuint *dstRow = (GLuint *) dstAddr
2564 + dstImageOffsets[dstZoffset + img]
2565 + dstYoffset * dstRowStride / sizeof(GLuint)
2566 + dstXoffset;
2567 const GLuint *src
2568 = (const GLuint *) _mesa_image_address(dims, srcPacking, srcAddr,
2569 srcWidth, srcHeight,
2570 srcFormat, srcType,
2571 img, 0, 0);
2572 for (row = 0; row < srcHeight; row++) {
2573 GLuint depth[MAX_WIDTH];
2574 GLint i;
2575 _mesa_unpack_depth_span(ctx, srcWidth,
2576 GL_UNSIGNED_INT, /* dst type */
2577 depth, /* dst addr */
2578 depthScale,
2579 srcType, src, srcPacking);
2580
2581 for (i = 0; i < srcWidth; i++)
2582 dstRow[i] = depth[i] | (dstRow[i] & 0xFF000000);
2583
2584 src += srcRowStride;
2585 dstRow += dstRowStride / sizeof(GLuint);
2586 }
2587 }
2588 }
2589 else {
2590 for (img = 0; img < srcDepth; img++) {
2591 GLuint *dstRow = (GLuint *) dstAddr
2592 + dstImageOffsets[dstZoffset + img]
2593 + dstYoffset * dstRowStride / sizeof(GLuint)
2594 + dstXoffset;
2595 const GLuint *src
2596 = (const GLuint *) _mesa_image_address(dims, srcPacking, srcAddr,
2597 srcWidth, srcHeight,
2598 srcFormat, srcType,
2599 img, 0, 0);
2600 for (row = 0; row < srcHeight; row++) {
2601 GLubyte stencil[MAX_WIDTH];
2602 GLint i;
2603 /* the 24 depth bits will be in the low position: */
2604 _mesa_unpack_depth_span(ctx, srcWidth,
2605 GL_UNSIGNED_INT, /* dst type */
2606 dstRow, /* dst addr */
2607 depthScale,
2608 srcType, src, srcPacking);
2609 /* get the 8-bit stencil values */
2610 _mesa_unpack_stencil_span(ctx, srcWidth,
2611 GL_UNSIGNED_BYTE, /* dst type */
2612 stencil, /* dst addr */
2613 srcType, src, srcPacking,
2614 ctx->_ImageTransferState);
2615 /* merge stencil values into depth values */
2616 for (i = 0; i < srcWidth; i++)
2617 dstRow[i] |= stencil[i] << 24;
2618
2619 src += srcRowStride;
2620 dstRow += dstRowStride / sizeof(GLuint);
2621 }
2622 }
2623 }
2624 return GL_TRUE;
2625 }
2626
2627 /**
2628 * Store an image in any of the formats:
2629 * _mesa_texformat_rgba_float32
2630 * _mesa_texformat_rgb_float32
2631 * _mesa_texformat_alpha_float32
2632 * _mesa_texformat_luminance_float32
2633 * _mesa_texformat_luminance_alpha_float32
2634 * _mesa_texformat_intensity_float32
2635 */
2636 GLboolean
2637 _mesa_texstore_rgba_float32(TEXSTORE_PARAMS)
2638 {
2639 const GLint components = _mesa_components_in_format(dstFormat->BaseFormat);
2640
2641 ASSERT(dstFormat == &_mesa_texformat_rgba_float32 ||
2642 dstFormat == &_mesa_texformat_rgb_float32 ||
2643 dstFormat == &_mesa_texformat_alpha_float32 ||
2644 dstFormat == &_mesa_texformat_luminance_float32 ||
2645 dstFormat == &_mesa_texformat_luminance_alpha_float32 ||
2646 dstFormat == &_mesa_texformat_intensity_float32);
2647 ASSERT(baseInternalFormat == GL_RGBA ||
2648 baseInternalFormat == GL_RGB ||
2649 baseInternalFormat == GL_ALPHA ||
2650 baseInternalFormat == GL_LUMINANCE ||
2651 baseInternalFormat == GL_LUMINANCE_ALPHA ||
2652 baseInternalFormat == GL_INTENSITY);
2653 ASSERT(dstFormat->TexelBytes == components * sizeof(GLfloat));
2654
2655 if (!ctx->_ImageTransferState &&
2656 !srcPacking->SwapBytes &&
2657 baseInternalFormat == srcFormat &&
2658 srcType == GL_FLOAT) {
2659 /* simple memcpy path */
2660 memcpy_texture(ctx, dims,
2661 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
2662 dstRowStride,
2663 dstImageOffsets,
2664 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
2665 srcAddr, srcPacking);
2666 }
2667 else {
2668 /* general path */
2669 const GLfloat *tempImage = make_temp_float_image(ctx, dims,
2670 baseInternalFormat,
2671 dstFormat->BaseFormat,
2672 srcWidth, srcHeight, srcDepth,
2673 srcFormat, srcType, srcAddr,
2674 srcPacking);
2675 const GLfloat *srcRow = tempImage;
2676 GLint bytesPerRow;
2677 GLint img, row;
2678 if (!tempImage)
2679 return GL_FALSE;
2680 _mesa_adjust_image_for_convolution(ctx, dims, &srcWidth, &srcHeight);
2681 bytesPerRow = srcWidth * components * sizeof(GLfloat);
2682 for (img = 0; img < srcDepth; img++) {
2683 GLubyte *dstRow = (GLubyte *) dstAddr
2684 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
2685 + dstYoffset * dstRowStride
2686 + dstXoffset * dstFormat->TexelBytes;
2687 for (row = 0; row < srcHeight; row++) {
2688 _mesa_memcpy(dstRow, srcRow, bytesPerRow);
2689 dstRow += dstRowStride;
2690 srcRow += srcWidth * components;
2691 }
2692 }
2693
2694 _mesa_free((void *) tempImage);
2695 }
2696 return GL_TRUE;
2697 }
2698
2699
2700 /**
2701 * As above, but store 16-bit floats.
2702 */
2703 GLboolean
2704 _mesa_texstore_rgba_float16(TEXSTORE_PARAMS)
2705 {
2706 const GLint components = _mesa_components_in_format(dstFormat->BaseFormat);
2707
2708 ASSERT(dstFormat == &_mesa_texformat_rgba_float16 ||
2709 dstFormat == &_mesa_texformat_rgb_float16 ||
2710 dstFormat == &_mesa_texformat_alpha_float16 ||
2711 dstFormat == &_mesa_texformat_luminance_float16 ||
2712 dstFormat == &_mesa_texformat_luminance_alpha_float16 ||
2713 dstFormat == &_mesa_texformat_intensity_float16);
2714 ASSERT(baseInternalFormat == GL_RGBA ||
2715 baseInternalFormat == GL_RGB ||
2716 baseInternalFormat == GL_ALPHA ||
2717 baseInternalFormat == GL_LUMINANCE ||
2718 baseInternalFormat == GL_LUMINANCE_ALPHA ||
2719 baseInternalFormat == GL_INTENSITY);
2720 ASSERT(dstFormat->TexelBytes == components * sizeof(GLhalfARB));
2721
2722 if (!ctx->_ImageTransferState &&
2723 !srcPacking->SwapBytes &&
2724 baseInternalFormat == srcFormat &&
2725 srcType == GL_HALF_FLOAT_ARB) {
2726 /* simple memcpy path */
2727 memcpy_texture(ctx, dims,
2728 dstFormat, dstAddr, dstXoffset, dstYoffset, dstZoffset,
2729 dstRowStride,
2730 dstImageOffsets,
2731 srcWidth, srcHeight, srcDepth, srcFormat, srcType,
2732 srcAddr, srcPacking);
2733 }
2734 else {
2735 /* general path */
2736 const GLfloat *tempImage = make_temp_float_image(ctx, dims,
2737 baseInternalFormat,
2738 dstFormat->BaseFormat,
2739 srcWidth, srcHeight, srcDepth,
2740 srcFormat, srcType, srcAddr,
2741 srcPacking);
2742 const GLfloat *src = tempImage;
2743 GLint img, row;
2744 if (!tempImage)
2745 return GL_FALSE;
2746 _mesa_adjust_image_for_convolution(ctx, dims, &srcWidth, &srcHeight);
2747 for (img = 0; img < srcDepth; img++) {
2748 GLubyte *dstRow = (GLubyte *) dstAddr
2749 + dstImageOffsets[dstZoffset + img] * dstFormat->TexelBytes
2750 + dstYoffset * dstRowStride
2751 + dstXoffset * dstFormat->TexelBytes;
2752 for (row = 0; row < srcHeight; row++) {
2753 GLhalfARB *dstTexel = (GLhalfARB *) dstRow;
2754 GLint i;
2755 for (i = 0; i < srcWidth * components; i++) {
2756 dstTexel[i] = _mesa_float_to_half(src[i]);
2757 }
2758 dstRow += dstRowStride;
2759 src += srcWidth * components;
2760 }
2761 }
2762
2763 _mesa_free((void *) tempImage);
2764 }
2765 return GL_TRUE;
2766 }
2767
2768
2769 #if FEATURE_EXT_texture_sRGB
2770 GLboolean
2771 _mesa_texstore_srgb8(TEXSTORE_PARAMS)
2772 {
2773 const struct gl_texture_format *newDstFormat;
2774 StoreTexImageFunc store;
2775 GLboolean k;
2776
2777 ASSERT(dstFormat == &_mesa_texformat_srgb8);
2778
2779 /* reuse normal rgb texstore code */
2780 newDstFormat = &_mesa_texformat_rgb888;
2781 store = _mesa_texstore_rgb888;
2782
2783 k = store(ctx, dims, baseInternalFormat,
2784 newDstFormat, dstAddr,
2785 dstXoffset, dstYoffset, dstZoffset,
2786 dstRowStride, dstImageOffsets,
2787 srcWidth, srcHeight, srcDepth,
2788 srcFormat, srcType,
2789 srcAddr, srcPacking);
2790 return k;
2791 }
2792
2793
2794 GLboolean
2795 _mesa_texstore_srgba8(TEXSTORE_PARAMS)
2796 {
2797 const struct gl_texture_format *newDstFormat;
2798 GLboolean k;
2799
2800 ASSERT(dstFormat == &_mesa_texformat_srgba8);
2801
2802 /* reuse normal rgba texstore code */
2803 newDstFormat = &_mesa_texformat_rgba8888;
2804
2805 k = _mesa_texstore_rgba8888(ctx, dims, baseInternalFormat,
2806 newDstFormat, dstAddr,
2807 dstXoffset, dstYoffset, dstZoffset,
2808 dstRowStride, dstImageOffsets,
2809 srcWidth, srcHeight, srcDepth,
2810 srcFormat, srcType,
2811 srcAddr, srcPacking);
2812 return k;
2813 }
2814
2815
2816 GLboolean
2817 _mesa_texstore_sargb8(TEXSTORE_PARAMS)
2818 {
2819 const struct gl_texture_format *newDstFormat;
2820 GLboolean k;
2821
2822 ASSERT(dstFormat == &_mesa_texformat_sargb8);
2823
2824 /* reuse normal rgba texstore code */
2825 newDstFormat = &_mesa_texformat_argb8888;
2826
2827 k = _mesa_texstore_argb8888(ctx, dims, baseInternalFormat,
2828 newDstFormat, dstAddr,
2829 dstXoffset, dstYoffset, dstZoffset,
2830 dstRowStride, dstImageOffsets,
2831 srcWidth, srcHeight, srcDepth,
2832 srcFormat, srcType,
2833 srcAddr, srcPacking);
2834 return k;
2835 }
2836
2837
2838 GLboolean
2839 _mesa_texstore_sl8(TEXSTORE_PARAMS)
2840 {
2841 const struct gl_texture_format *newDstFormat;
2842 GLboolean k;
2843
2844 ASSERT(dstFormat == &_mesa_texformat_sl8);
2845
2846 newDstFormat = &_mesa_texformat_l8;
2847
2848 /* _mesa_textore_a8 handles luminance8 too */
2849 k = _mesa_texstore_a8(ctx, dims, baseInternalFormat,
2850 newDstFormat, dstAddr,
2851 dstXoffset, dstYoffset, dstZoffset,
2852 dstRowStride, dstImageOffsets,
2853 srcWidth, srcHeight, srcDepth,
2854 srcFormat, srcType,
2855 srcAddr, srcPacking);
2856 return k;
2857 }
2858
2859
2860 GLboolean
2861 _mesa_texstore_sla8(TEXSTORE_PARAMS)
2862 {
2863 const struct gl_texture_format *newDstFormat;
2864 GLboolean k;
2865
2866 ASSERT(dstFormat == &_mesa_texformat_sla8);
2867
2868 /* reuse normal luminance/alpha texstore code */
2869 newDstFormat = &_mesa_texformat_al88;
2870
2871 k = _mesa_texstore_al88(ctx, dims, baseInternalFormat,
2872 newDstFormat, dstAddr,
2873 dstXoffset, dstYoffset, dstZoffset,
2874 dstRowStride, dstImageOffsets,
2875 srcWidth, srcHeight, srcDepth,
2876 srcFormat, srcType,
2877 srcAddr, srcPacking);
2878 return k;
2879 }
2880
2881 #endif /* FEATURE_EXT_texture_sRGB */
2882
2883
2884 /**
2885 * Check if an unpack PBO is active prior to fetching a texture image.
2886 * If so, do bounds checking and map the buffer into main memory.
2887 * Any errors detected will be recorded.
2888 * The caller _must_ call _mesa_unmap_teximage_pbo() too!
2889 */
2890 const GLvoid *
2891 _mesa_validate_pbo_teximage(GLcontext *ctx, GLuint dimensions,
2892 GLsizei width, GLsizei height, GLsizei depth,
2893 GLenum format, GLenum type, const GLvoid *pixels,
2894 const struct gl_pixelstore_attrib *unpack,
2895 const char *funcName)
2896 {
2897 GLubyte *buf;
2898
2899 if (unpack->BufferObj->Name == 0) {
2900 /* no PBO */
2901 return pixels;
2902 }
2903 if (!_mesa_validate_pbo_access(dimensions, unpack, width, height, depth,
2904 format, type, pixels)) {
2905 _mesa_error(ctx, GL_INVALID_OPERATION, funcName, "(invalid PBO access");
2906 return NULL;
2907 }
2908
2909 buf = (GLubyte *) ctx->Driver.MapBuffer(ctx, GL_PIXEL_UNPACK_BUFFER_EXT,
2910 GL_READ_ONLY_ARB, unpack->BufferObj);
2911 if (!buf) {
2912 _mesa_error(ctx, GL_INVALID_OPERATION, funcName, "(PBO is mapped");
2913 return NULL;
2914 }
2915
2916 return ADD_POINTERS(buf, pixels);
2917 }
2918
2919
2920 /**
2921 * Check if an unpack PBO is active prior to fetching a compressed texture
2922 * image.
2923 * If so, do bounds checking and map the buffer into main memory.
2924 * Any errors detected will be recorded.
2925 * The caller _must_ call _mesa_unmap_teximage_pbo() too!
2926 */
2927 const GLvoid *
2928 _mesa_validate_pbo_compressed_teximage(GLcontext *ctx,
2929 GLsizei imageSize, const GLvoid *pixels,
2930 const struct gl_pixelstore_attrib *packing,
2931 const char *funcName)
2932 {
2933 GLubyte *buf;
2934
2935 if (packing->BufferObj->Name == 0) {
2936 /* not using a PBO - return pointer unchanged */
2937 return pixels;
2938 }
2939 if ((const GLubyte *) pixels + imageSize >
2940 ((const GLubyte *) 0) + packing->BufferObj->Size) {
2941 /* out of bounds read! */
2942 _mesa_error(ctx, GL_INVALID_OPERATION, funcName, "(invalid PBO access");
2943 return NULL;
2944 }
2945
2946 buf = (GLubyte*) ctx->Driver.MapBuffer(ctx, GL_PIXEL_UNPACK_BUFFER_EXT,
2947 GL_READ_ONLY_ARB, packing->BufferObj);
2948 if (!buf) {
2949 _mesa_error(ctx, GL_INVALID_OPERATION, funcName, "(PBO is mapped");
2950 return NULL;
2951 }
2952
2953 return ADD_POINTERS(buf, pixels);
2954 }
2955
2956
2957 /**
2958 * This function must be called after either of the validate_pbo_*_teximage()
2959 * functions. It unmaps the PBO buffer if it was mapped earlier.
2960 */
2961 void
2962 _mesa_unmap_teximage_pbo(GLcontext *ctx,
2963 const struct gl_pixelstore_attrib *unpack)
2964 {
2965 if (unpack->BufferObj->Name) {
2966 ctx->Driver.UnmapBuffer(ctx, GL_PIXEL_UNPACK_BUFFER_EXT,
2967 unpack->BufferObj);
2968 }
2969 }
2970
2971
2972
2973 /**
2974 * Adaptor for fetching a GLchan texel from a float-valued texture.
2975 */
2976 static void
2977 fetch_texel_float_to_chan(const struct gl_texture_image *texImage,
2978 GLint i, GLint j, GLint k, GLchan *texelOut)
2979 {
2980 GLfloat temp[4];
2981 ASSERT(texImage->FetchTexelf);
2982 texImage->FetchTexelf(texImage, i, j, k, temp);
2983 if (texImage->TexFormat->BaseFormat == GL_DEPTH_COMPONENT ||
2984 texImage->TexFormat->BaseFormat == GL_DEPTH_STENCIL_EXT) {
2985 /* just one channel */
2986 UNCLAMPED_FLOAT_TO_CHAN(texelOut[0], temp[0]);
2987 }
2988 else {
2989 /* four channels */
2990 UNCLAMPED_FLOAT_TO_CHAN(texelOut[0], temp[0]);
2991 UNCLAMPED_FLOAT_TO_CHAN(texelOut[1], temp[1]);
2992 UNCLAMPED_FLOAT_TO_CHAN(texelOut[2], temp[2]);
2993 UNCLAMPED_FLOAT_TO_CHAN(texelOut[3], temp[3]);
2994 }
2995 }
2996
2997
2998 /**
2999 * Adaptor for fetching a float texel from a GLchan-valued texture.
3000 */
3001 static void
3002 fetch_texel_chan_to_float(const struct gl_texture_image *texImage,
3003 GLint i, GLint j, GLint k, GLfloat *texelOut)
3004 {
3005 GLchan temp[4];
3006 ASSERT(texImage->FetchTexelc);
3007 texImage->FetchTexelc(texImage, i, j, k, temp);
3008 if (texImage->TexFormat->BaseFormat == GL_DEPTH_COMPONENT ||
3009 texImage->TexFormat->BaseFormat == GL_DEPTH_STENCIL_EXT) {
3010 /* just one channel */
3011 texelOut[0] = CHAN_TO_FLOAT(temp[0]);
3012 }
3013 else {
3014 /* four channels */
3015 texelOut[0] = CHAN_TO_FLOAT(temp[0]);
3016 texelOut[1] = CHAN_TO_FLOAT(temp[1]);
3017 texelOut[2] = CHAN_TO_FLOAT(temp[2]);
3018 texelOut[3] = CHAN_TO_FLOAT(temp[3]);
3019 }
3020 }
3021
3022
3023 /**
3024 * Initialize the texture image's FetchTexelc and FetchTexelf methods.
3025 */
3026 void
3027 _mesa_set_fetch_functions(struct gl_texture_image *texImage, GLuint dims)
3028 {
3029 ASSERT(dims == 1 || dims == 2 || dims == 3);
3030 ASSERT(texImage->TexFormat);
3031
3032 switch (dims) {
3033 case 1:
3034 texImage->FetchTexelc = texImage->TexFormat->FetchTexel1D;
3035 texImage->FetchTexelf = texImage->TexFormat->FetchTexel1Df;
3036 break;
3037 case 2:
3038 texImage->FetchTexelc = texImage->TexFormat->FetchTexel2D;
3039 texImage->FetchTexelf = texImage->TexFormat->FetchTexel2Df;
3040 break;
3041 case 3:
3042 texImage->FetchTexelc = texImage->TexFormat->FetchTexel3D;
3043 texImage->FetchTexelf = texImage->TexFormat->FetchTexel3Df;
3044 break;
3045 default:
3046 ;
3047 }
3048
3049 /* now check if we need to use a float/chan adaptor */
3050 if (!texImage->FetchTexelc) {
3051 texImage->FetchTexelc = fetch_texel_float_to_chan;
3052 }
3053 else if (!texImage->FetchTexelf) {
3054 texImage->FetchTexelf = fetch_texel_chan_to_float;
3055 }
3056
3057
3058 ASSERT(texImage->FetchTexelc);
3059 ASSERT(texImage->FetchTexelf);
3060 }
3061
3062
3063 /**
3064 * Choose the actual storage format for a new texture image.
3065 * Mainly, this is a wrapper for the driver's ChooseTextureFormat() function.
3066 * Also set some other texImage fields related to texture compression, etc.
3067 * \param ctx rendering context
3068 * \param texImage the gl_texture_image
3069 * \param dims texture dimensions (1, 2 or 3)
3070 * \param format the user-specified format parameter
3071 * \param type the user-specified type parameter
3072 * \param internalFormat the user-specified internal format hint
3073 */
3074 static void
3075 choose_texture_format(GLcontext *ctx, struct gl_texture_image *texImage,
3076 GLuint dims,
3077 GLenum format, GLenum type, GLint internalFormat)
3078 {
3079 ASSERT(dims == 1 || dims == 2 || dims == 3);
3080 ASSERT(ctx->Driver.ChooseTextureFormat);
3081
3082 texImage->TexFormat
3083 = ctx->Driver.ChooseTextureFormat(ctx, internalFormat, format, type);
3084
3085 ASSERT(texImage->TexFormat);
3086
3087 _mesa_set_fetch_functions(texImage, dims);
3088
3089 if (texImage->TexFormat->TexelBytes == 0) {
3090 /* must be a compressed format */
3091 texImage->IsCompressed = GL_TRUE;
3092 texImage->CompressedSize =
3093 ctx->Driver.CompressedTextureSize(ctx, texImage->Width,
3094 texImage->Height, texImage->Depth,
3095 texImage->TexFormat->MesaFormat);
3096 }
3097 else {
3098 /* non-compressed format */
3099 texImage->IsCompressed = GL_FALSE;
3100 texImage->CompressedSize = 0;
3101 }
3102 }
3103
3104
3105
3106 /**
3107 * This is the software fallback for Driver.TexImage1D()
3108 * and Driver.CopyTexImage1D().
3109 * \sa _mesa_store_teximage2d()
3110 * Note that the width may not be the actual texture width since it may
3111 * be changed by convolution w/ GL_REDUCE. The texImage->Width field will
3112 * have the actual texture size.
3113 */
3114 void
3115 _mesa_store_teximage1d(GLcontext *ctx, GLenum target, GLint level,
3116 GLint internalFormat,
3117 GLint width, GLint border,
3118 GLenum format, GLenum type, const GLvoid *pixels,
3119 const struct gl_pixelstore_attrib *packing,
3120 struct gl_texture_object *texObj,
3121 struct gl_texture_image *texImage)
3122 {
3123 GLint sizeInBytes;
3124 (void) border;
3125
3126 choose_texture_format(ctx, texImage, 1, format, type, internalFormat);
3127
3128 /* allocate memory */
3129 if (texImage->IsCompressed)
3130 sizeInBytes = texImage->CompressedSize;
3131 else
3132 sizeInBytes = texImage->Width * texImage->TexFormat->TexelBytes;
3133 texImage->Data = _mesa_alloc_texmemory(sizeInBytes);
3134 if (!texImage->Data) {
3135 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexImage1D");
3136 return;
3137 }
3138
3139 pixels = _mesa_validate_pbo_teximage(ctx, 1, width, 1, 1, format, type,
3140 pixels, packing, "glTexImage1D");
3141 if (!pixels) {
3142 /* Note: we check for a NULL image pointer here, _after_ we allocated
3143 * memory for the texture. That's what the GL spec calls for.
3144 */
3145 return;
3146 }
3147 else {
3148 const GLint dstRowStride = 0;
3149 GLboolean success;
3150 ASSERT(texImage->TexFormat->StoreImage);
3151 success = texImage->TexFormat->StoreImage(ctx, 1, texImage->_BaseFormat,
3152 texImage->TexFormat,
3153 texImage->Data,
3154 0, 0, 0, /* dstX/Y/Zoffset */
3155 dstRowStride,
3156 texImage->ImageOffsets,
3157 width, 1, 1,
3158 format, type, pixels, packing);
3159 if (!success) {
3160 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexImage1D");
3161 }
3162 }
3163
3164 /* GL_SGIS_generate_mipmap */
3165 if (level == texObj->BaseLevel && texObj->GenerateMipmap) {
3166 ctx->Driver.GenerateMipmap(ctx, target, texObj);
3167 }
3168
3169 _mesa_unmap_teximage_pbo(ctx, packing);
3170 }
3171
3172
3173 /**
3174 * This is the software fallback for Driver.TexImage2D()
3175 * and Driver.CopyTexImage2D().
3176 *
3177 * This function is oriented toward storing images in main memory, rather
3178 * than VRAM. Device driver's can easily plug in their own replacement.
3179 *
3180 * Note: width and height may be pre-convolved dimensions, but
3181 * texImage->Width and texImage->Height will be post-convolved dimensions.
3182 */
3183 void
3184 _mesa_store_teximage2d(GLcontext *ctx, GLenum target, GLint level,
3185 GLint internalFormat,
3186 GLint width, GLint height, GLint border,
3187 GLenum format, GLenum type, const void *pixels,
3188 const struct gl_pixelstore_attrib *packing,
3189 struct gl_texture_object *texObj,
3190 struct gl_texture_image *texImage)
3191 {
3192 GLint texelBytes, sizeInBytes;
3193 (void) border;
3194
3195 choose_texture_format(ctx, texImage, 2, format, type, internalFormat);
3196
3197 texelBytes = texImage->TexFormat->TexelBytes;
3198
3199 /* allocate memory */
3200 if (texImage->IsCompressed)
3201 sizeInBytes = texImage->CompressedSize;
3202 else
3203 sizeInBytes = texImage->Width * texImage->Height * texelBytes;
3204 texImage->Data = _mesa_alloc_texmemory(sizeInBytes);
3205 if (!texImage->Data) {
3206 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexImage2D");
3207 return;
3208 }
3209
3210 pixels = _mesa_validate_pbo_teximage(ctx, 2, width, height, 1, format, type,
3211 pixels, packing, "glTexImage2D");
3212 if (!pixels) {
3213 /* Note: we check for a NULL image pointer here, _after_ we allocated
3214 * memory for the texture. That's what the GL spec calls for.
3215 */
3216 return;
3217 }
3218 else {
3219 GLint dstRowStride;
3220 GLboolean success;
3221 if (texImage->IsCompressed) {
3222 dstRowStride
3223 = _mesa_compressed_row_stride(texImage->TexFormat->MesaFormat, width);
3224 }
3225 else {
3226 dstRowStride = texImage->RowStride * texImage->TexFormat->TexelBytes;
3227 }
3228 ASSERT(texImage->TexFormat->StoreImage);
3229 success = texImage->TexFormat->StoreImage(ctx, 2, texImage->_BaseFormat,
3230 texImage->TexFormat,
3231 texImage->Data,
3232 0, 0, 0, /* dstX/Y/Zoffset */
3233 dstRowStride,
3234 texImage->ImageOffsets,
3235 width, height, 1,
3236 format, type, pixels, packing);
3237 if (!success) {
3238 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexImage2D");
3239 }
3240 }
3241
3242 /* GL_SGIS_generate_mipmap */
3243 if (level == texObj->BaseLevel && texObj->GenerateMipmap) {
3244 ctx->Driver.GenerateMipmap(ctx, target, texObj);
3245 }
3246
3247 _mesa_unmap_teximage_pbo(ctx, packing);
3248 }
3249
3250
3251
3252 /**
3253 * This is the software fallback for Driver.TexImage3D()
3254 * and Driver.CopyTexImage3D().
3255 * \sa _mesa_store_teximage2d()
3256 */
3257 void
3258 _mesa_store_teximage3d(GLcontext *ctx, GLenum target, GLint level,
3259 GLint internalFormat,
3260 GLint width, GLint height, GLint depth, GLint border,
3261 GLenum format, GLenum type, const void *pixels,
3262 const struct gl_pixelstore_attrib *packing,
3263 struct gl_texture_object *texObj,
3264 struct gl_texture_image *texImage)
3265 {
3266 GLint texelBytes, sizeInBytes;
3267 (void) border;
3268
3269 choose_texture_format(ctx, texImage, 3, format, type, internalFormat);
3270
3271 texelBytes = texImage->TexFormat->TexelBytes;
3272
3273 /* allocate memory */
3274 if (texImage->IsCompressed)
3275 sizeInBytes = texImage->CompressedSize;
3276 else
3277 sizeInBytes = width * height * depth * texelBytes;
3278 texImage->Data = _mesa_alloc_texmemory(sizeInBytes);
3279 if (!texImage->Data) {
3280 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexImage3D");
3281 return;
3282 }
3283
3284 pixels = _mesa_validate_pbo_teximage(ctx, 3, width, height, depth, format,
3285 type, pixels, packing, "glTexImage3D");
3286 if (!pixels) {
3287 /* Note: we check for a NULL image pointer here, _after_ we allocated
3288 * memory for the texture. That's what the GL spec calls for.
3289 */
3290 return;
3291 }
3292 else {
3293 GLint dstRowStride;
3294 GLboolean success;
3295 if (texImage->IsCompressed) {
3296 dstRowStride
3297 = _mesa_compressed_row_stride(texImage->TexFormat->MesaFormat, width);
3298 }
3299 else {
3300 dstRowStride = texImage->RowStride * texImage->TexFormat->TexelBytes;
3301 }
3302 ASSERT(texImage->TexFormat->StoreImage);
3303 success = texImage->TexFormat->StoreImage(ctx, 3, texImage->_BaseFormat,
3304 texImage->TexFormat,
3305 texImage->Data,
3306 0, 0, 0, /* dstX/Y/Zoffset */
3307 dstRowStride,
3308 texImage->ImageOffsets,
3309 width, height, depth,
3310 format, type, pixels, packing);
3311 if (!success) {
3312 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexImage3D");
3313 }
3314 }
3315
3316 /* GL_SGIS_generate_mipmap */
3317 if (level == texObj->BaseLevel && texObj->GenerateMipmap) {
3318 ctx->Driver.GenerateMipmap(ctx, target, texObj);
3319 }
3320
3321 _mesa_unmap_teximage_pbo(ctx, packing);
3322 }
3323
3324
3325
3326
3327 /*
3328 * This is the software fallback for Driver.TexSubImage1D()
3329 * and Driver.CopyTexSubImage1D().
3330 */
3331 void
3332 _mesa_store_texsubimage1d(GLcontext *ctx, GLenum target, GLint level,
3333 GLint xoffset, GLint width,
3334 GLenum format, GLenum type, const void *pixels,
3335 const struct gl_pixelstore_attrib *packing,
3336 struct gl_texture_object *texObj,
3337 struct gl_texture_image *texImage)
3338 {
3339 /* get pointer to src pixels (may be in a pbo which we'll map here) */
3340 pixels = _mesa_validate_pbo_teximage(ctx, 1, width, 1, 1, format, type,
3341 pixels, packing, "glTexSubImage1D");
3342 if (!pixels)
3343 return;
3344
3345 {
3346 const GLint dstRowStride = 0;
3347 GLboolean success;
3348 ASSERT(texImage->TexFormat->StoreImage);
3349 success = texImage->TexFormat->StoreImage(ctx, 1, texImage->_BaseFormat,
3350 texImage->TexFormat,
3351 texImage->Data,
3352 xoffset, 0, 0, /* offsets */
3353 dstRowStride,
3354 texImage->ImageOffsets,
3355 width, 1, 1,
3356 format, type, pixels, packing);
3357 if (!success) {
3358 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexSubImage1D");
3359 }
3360 }
3361
3362 /* GL_SGIS_generate_mipmap */
3363 if (level == texObj->BaseLevel && texObj->GenerateMipmap) {
3364 ctx->Driver.GenerateMipmap(ctx, target, texObj);
3365 }
3366
3367 _mesa_unmap_teximage_pbo(ctx, packing);
3368 }
3369
3370
3371
3372 /**
3373 * This is the software fallback for Driver.TexSubImage2D()
3374 * and Driver.CopyTexSubImage2D().
3375 */
3376 void
3377 _mesa_store_texsubimage2d(GLcontext *ctx, GLenum target, GLint level,
3378 GLint xoffset, GLint yoffset,
3379 GLint width, GLint height,
3380 GLenum format, GLenum type, const void *pixels,
3381 const struct gl_pixelstore_attrib *packing,
3382 struct gl_texture_object *texObj,
3383 struct gl_texture_image *texImage)
3384 {
3385 /* get pointer to src pixels (may be in a pbo which we'll map here) */
3386 pixels = _mesa_validate_pbo_teximage(ctx, 2, width, height, 1, format, type,
3387 pixels, packing, "glTexSubImage2D");
3388 if (!pixels)
3389 return;
3390
3391 {
3392 GLint dstRowStride = 0;
3393 GLboolean success;
3394 if (texImage->IsCompressed) {
3395 dstRowStride = _mesa_compressed_row_stride(texImage->TexFormat->MesaFormat,
3396 texImage->Width);
3397 }
3398 else {
3399 dstRowStride = texImage->RowStride * texImage->TexFormat->TexelBytes;
3400 }
3401 ASSERT(texImage->TexFormat->StoreImage);
3402 success = texImage->TexFormat->StoreImage(ctx, 2, texImage->_BaseFormat,
3403 texImage->TexFormat,
3404 texImage->Data,
3405 xoffset, yoffset, 0,
3406 dstRowStride,
3407 texImage->ImageOffsets,
3408 width, height, 1,
3409 format, type, pixels, packing);
3410 if (!success) {
3411 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexSubImage2D");
3412 }
3413 }
3414
3415 /* GL_SGIS_generate_mipmap */
3416 if (level == texObj->BaseLevel && texObj->GenerateMipmap) {
3417 ctx->Driver.GenerateMipmap(ctx, target, texObj);
3418 }
3419
3420 _mesa_unmap_teximage_pbo(ctx, packing);
3421 }
3422
3423
3424 /*
3425 * This is the software fallback for Driver.TexSubImage3D().
3426 * and Driver.CopyTexSubImage3D().
3427 */
3428 void
3429 _mesa_store_texsubimage3d(GLcontext *ctx, GLenum target, GLint level,
3430 GLint xoffset, GLint yoffset, GLint zoffset,
3431 GLint width, GLint height, GLint depth,
3432 GLenum format, GLenum type, const void *pixels,
3433 const struct gl_pixelstore_attrib *packing,
3434 struct gl_texture_object *texObj,
3435 struct gl_texture_image *texImage)
3436 {
3437 /* get pointer to src pixels (may be in a pbo which we'll map here) */
3438 pixels = _mesa_validate_pbo_teximage(ctx, 3, width, height, depth, format,
3439 type, pixels, packing,
3440 "glTexSubImage3D");
3441 if (!pixels)
3442 return;
3443
3444 {
3445 GLint dstRowStride;
3446 GLboolean success;
3447 if (texImage->IsCompressed) {
3448 dstRowStride = _mesa_compressed_row_stride(texImage->TexFormat->MesaFormat,
3449 texImage->Width);
3450 }
3451 else {
3452 dstRowStride = texImage->RowStride * texImage->TexFormat->TexelBytes;
3453 }
3454 ASSERT(texImage->TexFormat->StoreImage);
3455 success = texImage->TexFormat->StoreImage(ctx, 3, texImage->_BaseFormat,
3456 texImage->TexFormat,
3457 texImage->Data,
3458 xoffset, yoffset, zoffset,
3459 dstRowStride,
3460 texImage->ImageOffsets,
3461 width, height, depth,
3462 format, type, pixels, packing);
3463 if (!success) {
3464 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glTexSubImage3D");
3465 }
3466 }
3467
3468 /* GL_SGIS_generate_mipmap */
3469 if (level == texObj->BaseLevel && texObj->GenerateMipmap) {
3470 ctx->Driver.GenerateMipmap(ctx, target, texObj);
3471 }
3472
3473 _mesa_unmap_teximage_pbo(ctx, packing);
3474 }
3475
3476
3477 /*
3478 * Fallback for Driver.CompressedTexImage1D()
3479 */
3480 void
3481 _mesa_store_compressed_teximage1d(GLcontext *ctx, GLenum target, GLint level,
3482 GLint internalFormat,
3483 GLint width, GLint border,
3484 GLsizei imageSize, const GLvoid *data,
3485 struct gl_texture_object *texObj,
3486 struct gl_texture_image *texImage)
3487 {
3488 /* this space intentionally left blank */
3489 (void) ctx;
3490 (void) target; (void) level;
3491 (void) internalFormat;
3492 (void) width; (void) border;
3493 (void) imageSize; (void) data;
3494 (void) texObj;
3495 (void) texImage;
3496 }
3497
3498
3499
3500 /**
3501 * Fallback for Driver.CompressedTexImage2D()
3502 */
3503 void
3504 _mesa_store_compressed_teximage2d(GLcontext *ctx, GLenum target, GLint level,
3505 GLint internalFormat,
3506 GLint width, GLint height, GLint border,
3507 GLsizei imageSize, const GLvoid *data,
3508 struct gl_texture_object *texObj,
3509 struct gl_texture_image *texImage)
3510 {
3511 (void) width; (void) height; (void) border;
3512
3513 /* This is pretty simple, basically just do a memcpy without worrying
3514 * about the usual image unpacking or image transfer operations.
3515 */
3516 ASSERT(texObj);
3517 ASSERT(texImage);
3518 ASSERT(texImage->Width > 0);
3519 ASSERT(texImage->Height > 0);
3520 ASSERT(texImage->Depth == 1);
3521 ASSERT(texImage->Data == NULL); /* was freed in glCompressedTexImage2DARB */
3522
3523 choose_texture_format(ctx, texImage, 2, 0, 0, internalFormat);
3524
3525 /* allocate storage */
3526 texImage->Data = _mesa_alloc_texmemory(imageSize);
3527 if (!texImage->Data) {
3528 _mesa_error(ctx, GL_OUT_OF_MEMORY, "glCompressedTexImage2DARB");
3529 return;
3530 }
3531
3532 data = _mesa_validate_pbo_compressed_teximage(ctx, imageSize, data,
3533 &ctx->Unpack,
3534 "glCompressedTexImage2D");
3535 if (!data)
3536 return;
3537
3538 /* copy the data */
3539 ASSERT(texImage->CompressedSize == (GLuint) imageSize);
3540 MEMCPY(texImage->Data, data, imageSize);
3541
3542 /* GL_SGIS_generate_mipmap */
3543 if (level == texObj->BaseLevel && texObj->GenerateMipmap) {
3544 ctx->Driver.GenerateMipmap(ctx, target, texObj);
3545 }
3546
3547 _mesa_unmap_teximage_pbo(ctx, &ctx->Unpack);
3548 }
3549
3550
3551
3552 /*
3553 * Fallback for Driver.CompressedTexImage3D()
3554 */
3555 void
3556 _mesa_store_compressed_teximage3d(GLcontext *ctx, GLenum target, GLint level,
3557 GLint internalFormat,
3558 GLint width, GLint height, GLint depth,
3559 GLint border,
3560 GLsizei imageSize, const GLvoid *data,
3561 struct gl_texture_object *texObj,
3562 struct gl_texture_image *texImage)
3563 {
3564 /* this space intentionally left blank */
3565 (void) ctx;
3566 (void) target; (void) level;
3567 (void) internalFormat;
3568 (void) width; (void) height; (void) depth;
3569 (void) border;
3570 (void) imageSize; (void) data;
3571 (void) texObj;
3572 (void) texImage;
3573 }
3574
3575
3576
3577 /**
3578 * Fallback for Driver.CompressedTexSubImage1D()
3579 */
3580 void
3581 _mesa_store_compressed_texsubimage1d(GLcontext *ctx, GLenum target,
3582 GLint level,
3583 GLint xoffset, GLsizei width,
3584 GLenum format,
3585 GLsizei imageSize, const GLvoid *data,
3586 struct gl_texture_object *texObj,
3587 struct gl_texture_image *texImage)
3588 {
3589 /* there are no compressed 1D texture formats yet */
3590 (void) ctx;
3591 (void) target; (void) level;
3592 (void) xoffset; (void) width;
3593 (void) format;
3594 (void) imageSize; (void) data;
3595 (void) texObj;
3596 (void) texImage;
3597 }
3598
3599
3600 /**
3601 * Fallback for Driver.CompressedTexSubImage2D()
3602 */
3603 void
3604 _mesa_store_compressed_texsubimage2d(GLcontext *ctx, GLenum target,
3605 GLint level,
3606 GLint xoffset, GLint yoffset,
3607 GLsizei width, GLsizei height,
3608 GLenum format,
3609 GLsizei imageSize, const GLvoid *data,
3610 struct gl_texture_object *texObj,
3611 struct gl_texture_image *texImage)
3612 {
3613 GLint bytesPerRow, destRowStride, srcRowStride;
3614 GLint i, rows;
3615 GLubyte *dest;
3616 const GLubyte *src;
3617 const GLuint mesaFormat = texImage->TexFormat->MesaFormat;
3618
3619 (void) format;
3620
3621 /* these should have been caught sooner */
3622 ASSERT((width & 3) == 0 || width == 2 || width == 1);
3623 ASSERT((height & 3) == 0 || height == 2 || height == 1);
3624 ASSERT((xoffset & 3) == 0);
3625 ASSERT((yoffset & 3) == 0);
3626
3627 /* get pointer to src pixels (may be in a pbo which we'll map here) */
3628 data = _mesa_validate_pbo_compressed_teximage(ctx, imageSize, data,
3629 &ctx->Unpack,
3630 "glCompressedTexSubImage2D");
3631 if (!data)
3632 return;
3633
3634 srcRowStride = _mesa_compressed_row_stride(mesaFormat, width);
3635 src = (const GLubyte *) data;
3636
3637 destRowStride = _mesa_compressed_row_stride(mesaFormat, texImage->Width);
3638 dest = _mesa_compressed_image_address(xoffset, yoffset, 0,
3639 texImage->TexFormat->MesaFormat,
3640 texImage->Width,
3641 (GLubyte *) texImage->Data);
3642
3643 bytesPerRow = srcRowStride;
3644 rows = height / 4;
3645
3646 for (i = 0; i < rows; i++) {
3647 MEMCPY(dest, src, bytesPerRow);
3648 dest += destRowStride;
3649 src += srcRowStride;
3650 }
3651
3652 /* GL_SGIS_generate_mipmap */
3653 if (level == texObj->BaseLevel && texObj->GenerateMipmap) {
3654 ctx->Driver.GenerateMipmap(ctx, target, texObj);
3655 }
3656
3657 _mesa_unmap_teximage_pbo(ctx, &ctx->Unpack);
3658 }
3659
3660
3661 /**
3662 * Fallback for Driver.CompressedTexSubImage3D()
3663 */
3664 void
3665 _mesa_store_compressed_texsubimage3d(GLcontext *ctx, GLenum target,
3666 GLint level,
3667 GLint xoffset, GLint yoffset, GLint zoffset,
3668 GLsizei width, GLsizei height, GLsizei depth,
3669 GLenum format,
3670 GLsizei imageSize, const GLvoid *data,
3671 struct gl_texture_object *texObj,
3672 struct gl_texture_image *texImage)
3673 {
3674 /* there are no compressed 3D texture formats yet */
3675 (void) ctx;
3676 (void) target; (void) level;
3677 (void) xoffset; (void) yoffset; (void) zoffset;
3678 (void) width; (void) height; (void) depth;
3679 (void) format;
3680 (void) imageSize; (void) data;
3681 (void) texObj;
3682 (void) texImage;
3683 }
3684
3685
3686
3687
3688 #if FEATURE_EXT_texture_sRGB
3689
3690 /**
3691 * Test if given texture image is an sRGB format.
3692 */
3693 static GLboolean
3694 is_srgb_teximage(const struct gl_texture_image *texImage)
3695 {
3696 switch (texImage->TexFormat->MesaFormat) {
3697 case MESA_FORMAT_SRGB8:
3698 case MESA_FORMAT_SRGBA8:
3699 case MESA_FORMAT_SARGB8:
3700 case MESA_FORMAT_SL8:
3701 case MESA_FORMAT_SLA8:
3702 return GL_TRUE;
3703 default:
3704 return GL_FALSE;
3705 }
3706 }
3707
3708 #endif /* FEATURE_EXT_texture_sRGB */
3709
3710
3711 /**
3712 * This is the software fallback for Driver.GetTexImage().
3713 * All error checking will have been done before this routine is called.
3714 */
3715 void
3716 _mesa_get_teximage(GLcontext *ctx, GLenum target, GLint level,
3717 GLenum format, GLenum type, GLvoid *pixels,
3718 struct gl_texture_object *texObj,
3719 struct gl_texture_image *texImage)
3720 {
3721 const GLuint dimensions = (target == GL_TEXTURE_3D) ? 3 : 2;
3722
3723 if (ctx->Pack.BufferObj->Name) {
3724 /* Packing texture image into a PBO.
3725 * Map the (potentially) VRAM-based buffer into our process space so
3726 * we can write into it with the code below.
3727 * A hardware driver might use a sophisticated blit to move the
3728 * texture data to the PBO if the PBO is in VRAM along with the texture.
3729 */
3730 GLubyte *buf = (GLubyte *)
3731 ctx->Driver.MapBuffer(ctx, GL_PIXEL_PACK_BUFFER_EXT,
3732 GL_WRITE_ONLY_ARB, ctx->Pack.BufferObj);
3733 if (!buf) {
3734 /* buffer is already mapped - that's an error */
3735 _mesa_error(ctx, GL_INVALID_OPERATION,"glGetTexImage(PBO is mapped)");
3736 return;
3737 }
3738 /* <pixels> was an offset into the PBO.
3739 * Now make it a real, client-side pointer inside the mapped region.
3740 */
3741 pixels = ADD_POINTERS(buf, pixels);
3742 }
3743 else if (!pixels) {
3744 /* not an error */
3745 return;
3746 }
3747
3748 {
3749 const GLint width = texImage->Width;
3750 const GLint height = texImage->Height;
3751 const GLint depth = texImage->Depth;
3752 GLint img, row;
3753 for (img = 0; img < depth; img++) {
3754 for (row = 0; row < height; row++) {
3755 /* compute destination address in client memory */
3756 GLvoid *dest = _mesa_image_address( dimensions, &ctx->Pack, pixels,
3757 width, height, format, type,
3758 img, row, 0);
3759 assert(dest);
3760
3761 if (format == GL_COLOR_INDEX) {
3762 GLuint indexRow[MAX_WIDTH];
3763 GLint col;
3764 /* Can't use FetchTexel here because that returns RGBA */
3765 if (texImage->TexFormat->IndexBits == 8) {
3766 const GLubyte *src = (const GLubyte *) texImage->Data;
3767 src += width * (img * texImage->Height + row);
3768 for (col = 0; col < width; col++) {
3769 indexRow[col] = src[col];
3770 }
3771 }
3772 else if (texImage->TexFormat->IndexBits == 16) {
3773 const GLushort *src = (const GLushort *) texImage->Data;
3774 src += width * (img * texImage->Height + row);
3775 for (col = 0; col < width; col++) {
3776 indexRow[col] = src[col];
3777 }
3778 }
3779 else {
3780 _mesa_problem(ctx,
3781 "Color index problem in _mesa_GetTexImage");
3782 }
3783 _mesa_pack_index_span(ctx, width, type, dest,
3784 indexRow, &ctx->Pack,
3785 0 /* no image transfer */);
3786 }
3787 else if (format == GL_DEPTH_COMPONENT) {
3788 GLfloat depthRow[MAX_WIDTH];
3789 GLint col;
3790 for (col = 0; col < width; col++) {
3791 (*texImage->FetchTexelf)(texImage, col, row, img,
3792 depthRow + col);
3793 }
3794 _mesa_pack_depth_span(ctx, width, dest, type,
3795 depthRow, &ctx->Pack);
3796 }
3797 else if (format == GL_DEPTH_STENCIL_EXT) {
3798 /* XXX Note: we're bypassing texImage->FetchTexel()! */
3799 const GLuint *src = (const GLuint *) texImage->Data;
3800 src += width * row + width * height * img;
3801 _mesa_memcpy(dest, src, width * sizeof(GLuint));
3802 if (ctx->Pack.SwapBytes) {
3803 _mesa_swap4((GLuint *) dest, width);
3804 }
3805 }
3806 else if (format == GL_YCBCR_MESA) {
3807 /* No pixel transfer */
3808 const GLint rowstride = texImage->RowStride;
3809 MEMCPY(dest,
3810 (const GLushort *) texImage->Data + row * rowstride,
3811 width * sizeof(GLushort));
3812 /* check for byte swapping */
3813 if ((texImage->TexFormat->MesaFormat == MESA_FORMAT_YCBCR
3814 && type == GL_UNSIGNED_SHORT_8_8_REV_MESA) ||
3815 (texImage->TexFormat->MesaFormat == MESA_FORMAT_YCBCR_REV
3816 && type == GL_UNSIGNED_SHORT_8_8_MESA)) {
3817 if (!ctx->Pack.SwapBytes)
3818 _mesa_swap2((GLushort *) dest, width);
3819 }
3820 else if (ctx->Pack.SwapBytes) {
3821 _mesa_swap2((GLushort *) dest, width);
3822 }
3823 }
3824 #if FEATURE_EXT_texture_sRGB
3825 else if (is_srgb_teximage(texImage)) {
3826 /* no pixel transfer and no non-linear to linear conversion */
3827 const GLint comps = texImage->TexFormat->TexelBytes;
3828 const GLint rowstride = comps * texImage->RowStride;
3829 MEMCPY(dest,
3830 (const GLubyte *) texImage->Data + row * rowstride,
3831 comps * width * sizeof(GLubyte));
3832 /* FIXME: isn't it necessary to still do component assigning
3833 according to format/type? */
3834 /* FIXME: need to do something else for compressed srgb textures
3835 (currently will return values converted to linear) */
3836 }
3837 #endif /* FEATURE_EXT_texture_sRGB */
3838 else {
3839 /* general case: convert row to RGBA format */
3840 GLfloat rgba[MAX_WIDTH][4];
3841 GLint col;
3842 GLbitfield transferOps = 0x0;
3843
3844 if (type == GL_FLOAT &&
3845 ((ctx->Color.ClampReadColor == GL_TRUE) ||
3846 (ctx->Color.ClampReadColor == GL_FIXED_ONLY_ARB &&
3847 texImage->TexFormat->DataType != GL_FLOAT)))
3848 transferOps |= IMAGE_CLAMP_BIT;
3849
3850 for (col = 0; col < width; col++) {
3851 (*texImage->FetchTexelf)(texImage, col, row, img, rgba[col]);
3852 if (texImage->TexFormat->BaseFormat == GL_ALPHA) {
3853 rgba[col][RCOMP] = 0.0;
3854 rgba[col][GCOMP] = 0.0;
3855 rgba[col][BCOMP] = 0.0;
3856 }
3857 else if (texImage->TexFormat->BaseFormat == GL_LUMINANCE) {
3858 rgba[col][GCOMP] = 0.0;
3859 rgba[col][BCOMP] = 0.0;
3860 rgba[col][ACOMP] = 1.0;
3861 }
3862 else if (texImage->TexFormat->BaseFormat == GL_LUMINANCE_ALPHA) {
3863 rgba[col][GCOMP] = 0.0;
3864 rgba[col][BCOMP] = 0.0;
3865 }
3866 else if (texImage->TexFormat->BaseFormat == GL_INTENSITY) {
3867 rgba[col][GCOMP] = 0.0;
3868 rgba[col][BCOMP] = 0.0;
3869 rgba[col][ACOMP] = 1.0;
3870 }
3871 }
3872 _mesa_pack_rgba_span_float(ctx, width, (GLfloat (*)[4]) rgba,
3873 format, type, dest,
3874 &ctx->Pack, transferOps /*image xfer ops*/);
3875 } /* format */
3876 } /* row */
3877 } /* img */
3878 }
3879
3880 if (ctx->Pack.BufferObj->Name) {
3881 ctx->Driver.UnmapBuffer(ctx, GL_PIXEL_PACK_BUFFER_EXT,
3882 ctx->Pack.BufferObj);
3883 }
3884 }
3885
3886
3887
3888 /**
3889 * This is the software fallback for Driver.GetCompressedTexImage().
3890 * All error checking will have been done before this routine is called.
3891 */
3892 void
3893 _mesa_get_compressed_teximage(GLcontext *ctx, GLenum target, GLint level,
3894 GLvoid *img,
3895 struct gl_texture_object *texObj,
3896 struct gl_texture_image *texImage)
3897 {
3898 GLuint size;
3899
3900 if (ctx->Pack.BufferObj->Name) {
3901 /* pack texture image into a PBO */
3902 GLubyte *buf;
3903 if ((const GLubyte *) img + texImage->CompressedSize >
3904 (const GLubyte *) ctx->Pack.BufferObj->Size) {
3905 _mesa_error(ctx, GL_INVALID_OPERATION,
3906 "glGetCompressedTexImage(invalid PBO access)");
3907 return;
3908 }
3909 buf = (GLubyte *) ctx->Driver.MapBuffer(ctx, GL_PIXEL_PACK_BUFFER_EXT,
3910 GL_WRITE_ONLY_ARB,
3911 ctx->Pack.BufferObj);
3912 if (!buf) {
3913 /* buffer is already mapped - that's an error */
3914 _mesa_error(ctx, GL_INVALID_OPERATION,
3915 "glGetCompressedTexImage(PBO is mapped)");
3916 return;
3917 }
3918 img = ADD_POINTERS(buf, img);
3919 }
3920 else if (!img) {
3921 /* not an error */
3922 return;
3923 }
3924
3925 /* don't use texImage->CompressedSize since that may be padded out */
3926 size = _mesa_compressed_texture_size(ctx, texImage->Width, texImage->Height,
3927 texImage->Depth,
3928 texImage->TexFormat->MesaFormat);
3929
3930 /* just memcpy, no pixelstore or pixel transfer */
3931 _mesa_memcpy(img, texImage->Data, size);
3932
3933 if (ctx->Pack.BufferObj->Name) {
3934 ctx->Driver.UnmapBuffer(ctx, GL_PIXEL_PACK_BUFFER_EXT,
3935 ctx->Pack.BufferObj);
3936 }
3937 }