Tizen 2.0 Release
[profile/ivi/osmesa.git] / src / gallium / auxiliary / util / u_format.c
1 /**************************************************************************
2  *
3  * Copyright 2010 VMware, Inc.
4  * All Rights Reserved.
5  *
6  * Permission is hereby granted, free of charge, to any person obtaining a
7  * copy of this software and associated documentation files (the
8  * "Software"), to deal in the Software without restriction, including
9  * without limitation the rights to use, copy, modify, merge, publish,
10  * distribute, sub license, and/or sell copies of the Software, and to
11  * permit persons to whom the Software is furnished to do so, subject to
12  * the following conditions:
13  *
14  * The above copyright notice and this permission notice (including the
15  * next paragraph) shall be included in all copies or substantial portions
16  * 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
20  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT.
21  * IN NO EVENT SHALL VMWARE AND/OR ITS SUPPLIERS BE LIABLE FOR
22  * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
23  * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
24  * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
25  *
26  **************************************************************************/
27
28 /**
29  * @file
30  * Pixel format accessor functions.
31  *
32  * @author Jose Fonseca <jfonseca@vmware.com>
33  */
34
35 #include "u_math.h"
36 #include "u_memory.h"
37 #include "u_rect.h"
38 #include "u_format.h"
39 #include "u_format_s3tc.h"
40
41 #include "pipe/p_defines.h"
42
43
44 boolean
45 util_format_is_float(enum pipe_format format)
46 {
47    const struct util_format_description *desc = util_format_description(format);
48    unsigned i;
49
50    assert(desc);
51    if (!desc) {
52       return FALSE;
53    }
54
55    /* Find the first non-void channel. */
56    for (i = 0; i < 4; i++) {
57       if (desc->channel[i].type != UTIL_FORMAT_TYPE_VOID) {
58          break;
59       }
60    }
61
62    if (i == 4) {
63       return FALSE;
64    }
65
66    return desc->channel[i].type == UTIL_FORMAT_TYPE_FLOAT ? TRUE : FALSE;
67 }
68
69
70 boolean
71 util_format_is_supported(enum pipe_format format, unsigned bind)
72 {
73    if (util_format_is_s3tc(format) && !util_format_s3tc_enabled) {
74       return FALSE;
75    }
76
77 #ifndef TEXTURE_FLOAT_ENABLED
78    if ((bind & PIPE_BIND_RENDER_TARGET) &&
79        format != PIPE_FORMAT_R9G9B9E5_FLOAT &&
80        format != PIPE_FORMAT_R11G11B10_FLOAT &&
81        util_format_is_float(format)) {
82       return FALSE;
83    }
84 #endif
85
86    return TRUE;
87 }
88
89
90 void
91 util_format_read_4f(enum pipe_format format,
92                     float *dst, unsigned dst_stride,
93                     const void *src, unsigned src_stride,
94                     unsigned x, unsigned y, unsigned w, unsigned h)
95 {
96    const struct util_format_description *format_desc;
97    const uint8_t *src_row;
98    float *dst_row;
99
100    format_desc = util_format_description(format);
101
102    assert(x % format_desc->block.width == 0);
103    assert(y % format_desc->block.height == 0);
104
105    src_row = (const uint8_t *)src + y*src_stride + x*(format_desc->block.bits/8);
106    dst_row = dst;
107
108    format_desc->unpack_rgba_float(dst_row, dst_stride, src_row, src_stride, w, h);
109 }
110
111
112 void
113 util_format_write_4f(enum pipe_format format,
114                      const float *src, unsigned src_stride,
115                      void *dst, unsigned dst_stride,
116                      unsigned x, unsigned y, unsigned w, unsigned h)
117 {
118    const struct util_format_description *format_desc;
119    uint8_t *dst_row;
120    const float *src_row;
121
122    format_desc = util_format_description(format);
123
124    assert(x % format_desc->block.width == 0);
125    assert(y % format_desc->block.height == 0);
126
127    dst_row = (uint8_t *)dst + y*dst_stride + x*(format_desc->block.bits/8);
128    src_row = src;
129
130    format_desc->pack_rgba_float(dst_row, dst_stride, src_row, src_stride, w, h);
131 }
132
133
134 void
135 util_format_read_4ub(enum pipe_format format, uint8_t *dst, unsigned dst_stride, const void *src, unsigned src_stride, unsigned x, unsigned y, unsigned w, unsigned h)
136 {
137    const struct util_format_description *format_desc;
138    const uint8_t *src_row;
139    uint8_t *dst_row;
140
141    format_desc = util_format_description(format);
142
143    assert(x % format_desc->block.width == 0);
144    assert(y % format_desc->block.height == 0);
145
146    src_row = (const uint8_t *)src + y*src_stride + x*(format_desc->block.bits/8);
147    dst_row = dst;
148
149    format_desc->unpack_rgba_8unorm(dst_row, dst_stride, src_row, src_stride, w, h);
150 }
151
152
153 void
154 util_format_write_4ub(enum pipe_format format, const uint8_t *src, unsigned src_stride, void *dst, unsigned dst_stride, unsigned x, unsigned y, unsigned w, unsigned h)
155 {
156    const struct util_format_description *format_desc;
157    uint8_t *dst_row;
158    const uint8_t *src_row;
159
160    format_desc = util_format_description(format);
161
162    assert(x % format_desc->block.width == 0);
163    assert(y % format_desc->block.height == 0);
164
165    dst_row = (uint8_t *)dst + y*dst_stride + x*(format_desc->block.bits/8);
166    src_row = src;
167
168    format_desc->pack_rgba_8unorm(dst_row, dst_stride, src_row, src_stride, w, h);
169 }
170
171
172 boolean
173 util_is_format_compatible(const struct util_format_description *src_desc,
174                           const struct util_format_description *dst_desc)
175 {
176    unsigned chan;
177
178    if (src_desc->format == dst_desc->format) {
179       return TRUE;
180    }
181
182    if (src_desc->layout != UTIL_FORMAT_LAYOUT_PLAIN ||
183        dst_desc->layout != UTIL_FORMAT_LAYOUT_PLAIN) {
184       return FALSE;
185    }
186
187    if (src_desc->block.bits != dst_desc->block.bits ||
188        src_desc->nr_channels != dst_desc->nr_channels ||
189        src_desc->colorspace != dst_desc->colorspace) {
190       return FALSE;
191    }
192
193    for (chan = 0; chan < 4; ++chan) {
194       if (src_desc->channel[chan].size !=
195           dst_desc->channel[chan].size) {
196          return FALSE;
197       }
198    }
199
200    for (chan = 0; chan < 4; ++chan) {
201       enum util_format_swizzle swizzle = dst_desc->swizzle[chan];
202
203       if (swizzle < 4) {
204          if (src_desc->swizzle[chan] != swizzle) {
205             return FALSE;
206          }
207          if ((src_desc->channel[swizzle].type !=
208               dst_desc->channel[swizzle].type) ||
209              (src_desc->channel[swizzle].normalized !=
210               dst_desc->channel[swizzle].normalized)) {
211             return FALSE;
212          }
213       }
214    }
215
216    return TRUE;
217 }
218
219
220 boolean
221 util_format_fits_8unorm(const struct util_format_description *format_desc)
222 {
223    unsigned chan;
224
225    /*
226     * After linearized sRGB values require more than 8bits.
227     */
228
229    if (format_desc->colorspace == UTIL_FORMAT_COLORSPACE_SRGB) {
230       return FALSE;
231    }
232
233    switch (format_desc->layout) {
234
235    case UTIL_FORMAT_LAYOUT_S3TC:
236    case UTIL_FORMAT_LAYOUT_RGTC:
237       /*
238        * These are straight forward.
239        */
240
241       return TRUE;
242
243    case UTIL_FORMAT_LAYOUT_PLAIN:
244       /*
245        * For these we can find a generic rule.
246        */
247
248       for (chan = 0; chan < format_desc->nr_channels; ++chan) {
249          switch (format_desc->channel[chan].type) {
250          case UTIL_FORMAT_TYPE_VOID:
251             break;
252          case UTIL_FORMAT_TYPE_UNSIGNED:
253             if (!format_desc->channel[chan].normalized ||
254                 format_desc->channel[chan].size > 8) {
255                return FALSE;
256             }
257             break;
258          default:
259             return FALSE;
260          }
261       }
262       return TRUE;
263
264    default:
265       /*
266        * Handle all others on a case by case basis.
267        */
268
269       switch (format_desc->format) {
270       case PIPE_FORMAT_R1_UNORM:
271       case PIPE_FORMAT_UYVY:
272       case PIPE_FORMAT_YUYV:
273       case PIPE_FORMAT_R8G8_B8G8_UNORM:
274       case PIPE_FORMAT_G8R8_G8B8_UNORM:
275          return TRUE;
276
277       default:
278          return FALSE;
279       }
280    }
281 }
282
283
284 void
285 util_format_translate(enum pipe_format dst_format,
286                       void *dst, unsigned dst_stride,
287                       unsigned dst_x, unsigned dst_y,
288                       enum pipe_format src_format,
289                       const void *src, unsigned src_stride,
290                       unsigned src_x, unsigned src_y,
291                       unsigned width, unsigned height)
292 {
293    const struct util_format_description *dst_format_desc;
294    const struct util_format_description *src_format_desc;
295    uint8_t *dst_row;
296    const uint8_t *src_row;
297    unsigned x_step, y_step;
298    unsigned dst_step;
299    unsigned src_step;
300
301    dst_format_desc = util_format_description(dst_format);
302    src_format_desc = util_format_description(src_format);
303
304    if (util_is_format_compatible(src_format_desc, dst_format_desc)) {
305       /*
306        * Trivial case.
307        */
308
309       util_copy_rect(dst, dst_format, dst_stride,  dst_x, dst_y,
310                      width, height, src, (int)src_stride,
311                      src_x, src_y);
312       return;
313    }
314
315    assert(dst_x % dst_format_desc->block.width == 0);
316    assert(dst_y % dst_format_desc->block.height == 0);
317    assert(src_x % src_format_desc->block.width == 0);
318    assert(src_y % src_format_desc->block.height == 0);
319
320    dst_row = (uint8_t *)dst + dst_y*dst_stride + dst_x*(dst_format_desc->block.bits/8);
321    src_row = (const uint8_t *)src + src_y*src_stride + src_x*(src_format_desc->block.bits/8);
322
323    /*
324     * This works because all pixel formats have pixel blocks with power of two
325     * sizes.
326     */
327
328    y_step = MAX2(dst_format_desc->block.height, src_format_desc->block.height);
329    x_step = MAX2(dst_format_desc->block.width, src_format_desc->block.width);
330    assert(y_step % dst_format_desc->block.height == 0);
331    assert(y_step % src_format_desc->block.height == 0);
332
333    dst_step = y_step / dst_format_desc->block.height * dst_stride;
334    src_step = y_step / src_format_desc->block.height * src_stride;
335
336    /*
337     * TODO: double formats will loose precision
338     * TODO: Add a special case for formats that are mere swizzles of each other
339     */
340
341    if (util_format_fits_8unorm(src_format_desc) ||
342        util_format_fits_8unorm(dst_format_desc)) {
343       unsigned tmp_stride;
344       uint8_t *tmp_row;
345
346       tmp_stride = MAX2(width, x_step) * 4 * sizeof *tmp_row;
347       tmp_row = MALLOC(y_step * tmp_stride);
348       if (!tmp_row)
349          return;
350
351       while (height >= y_step) {
352          src_format_desc->unpack_rgba_8unorm(tmp_row, tmp_stride, src_row, src_stride, width, y_step);
353          dst_format_desc->pack_rgba_8unorm(dst_row, dst_stride, tmp_row, tmp_stride, width, y_step);
354
355          dst_row += dst_step;
356          src_row += src_step;
357          height -= y_step;
358       }
359
360       if (height) {
361          src_format_desc->unpack_rgba_8unorm(tmp_row, tmp_stride, src_row, src_stride, width, height);
362          dst_format_desc->pack_rgba_8unorm(dst_row, dst_stride, tmp_row, tmp_stride, width, height);
363       }
364
365       FREE(tmp_row);
366    }
367    else {
368       unsigned tmp_stride;
369       float *tmp_row;
370
371       tmp_stride = MAX2(width, x_step) * 4 * sizeof *tmp_row;
372       tmp_row = MALLOC(y_step * tmp_stride);
373       if (!tmp_row)
374          return;
375
376       while (height >= y_step) {
377          src_format_desc->unpack_rgba_float(tmp_row, tmp_stride, src_row, src_stride, width, y_step);
378          dst_format_desc->pack_rgba_float(dst_row, dst_stride, tmp_row, tmp_stride, width, y_step);
379
380          dst_row += dst_step;
381          src_row += src_step;
382          height -= y_step;
383       }
384
385       if (height) {
386          src_format_desc->unpack_rgba_float(tmp_row, tmp_stride, src_row, src_stride, width, height);
387          dst_format_desc->pack_rgba_float(dst_row, dst_stride, tmp_row, tmp_stride, width, height);
388       }
389
390       FREE(tmp_row);
391    }
392 }