Move computation of extended format code to validate.
[profile/ivi/pixman.git] / pixman / pixman.c
1 /* -*- Mode: c; c-basic-offset: 4; tab-width: 8; indent-tabs-mode: t; -*- */
2 /*
3  * Copyright © 2000 SuSE, Inc.
4  * Copyright © 2007 Red Hat, Inc.
5  *
6  * Permission to use, copy, modify, distribute, and sell this software and its
7  * documentation for any purpose is hereby granted without fee, provided that
8  * the above copyright notice appear in all copies and that both that
9  * copyright notice and this permission notice appear in supporting
10  * documentation, and that the name of SuSE not be used in advertising or
11  * publicity pertaining to distribution of the software without specific,
12  * written prior permission.  SuSE makes no representations about the
13  * suitability of this software for any purpose.  It is provided "as is"
14  * without express or implied warranty.
15  *
16  * SuSE DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING ALL
17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL SuSE
18  * BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
19  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION
20  * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
21  * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
22  *
23  * Author:  Keith Packard, SuSE, Inc.
24  */
25
26 #ifdef HAVE_CONFIG_H
27 #include <config.h>
28 #endif
29 #include "pixman-private.h"
30
31 #include <stdlib.h>
32
33 /*
34  * Operator optimizations based on source or destination opacity
35  */
36 typedef struct
37 {
38     pixman_op_t op;
39     pixman_op_t op_src_dst_opaque;
40     pixman_op_t op_src_opaque;
41     pixman_op_t op_dst_opaque;
42 } optimized_operator_info_t;
43
44 static const optimized_operator_info_t optimized_operators[] =
45 {
46     /* Input Operator           SRC&DST Opaque          SRC Opaque              DST Opaque      */
47     { PIXMAN_OP_OVER,           PIXMAN_OP_SRC,          PIXMAN_OP_SRC,          PIXMAN_OP_OVER },
48     { PIXMAN_OP_OVER_REVERSE,   PIXMAN_OP_DST,          PIXMAN_OP_OVER_REVERSE, PIXMAN_OP_DST },
49     { PIXMAN_OP_IN,             PIXMAN_OP_SRC,          PIXMAN_OP_IN,           PIXMAN_OP_SRC },
50     { PIXMAN_OP_IN_REVERSE,     PIXMAN_OP_DST,          PIXMAN_OP_DST,          PIXMAN_OP_IN_REVERSE },
51     { PIXMAN_OP_OUT,            PIXMAN_OP_CLEAR,        PIXMAN_OP_OUT,          PIXMAN_OP_CLEAR },
52     { PIXMAN_OP_OUT_REVERSE,    PIXMAN_OP_CLEAR,        PIXMAN_OP_CLEAR,        PIXMAN_OP_OUT_REVERSE },
53     { PIXMAN_OP_ATOP,           PIXMAN_OP_SRC,          PIXMAN_OP_IN,           PIXMAN_OP_OVER },
54     { PIXMAN_OP_ATOP_REVERSE,   PIXMAN_OP_DST,          PIXMAN_OP_OVER_REVERSE, PIXMAN_OP_IN_REVERSE },
55     { PIXMAN_OP_XOR,            PIXMAN_OP_CLEAR,        PIXMAN_OP_OUT,          PIXMAN_OP_OUT_REVERSE },
56     { PIXMAN_OP_SATURATE,       PIXMAN_OP_DST,          PIXMAN_OP_OVER_REVERSE, PIXMAN_OP_DST },
57     { PIXMAN_OP_NONE }
58 };
59
60 static pixman_implementation_t *imp;
61
62 /*
63  * Check if the current operator could be optimized
64  */
65 static const optimized_operator_info_t*
66 pixman_operator_can_be_optimized (pixman_op_t op)
67 {
68     const optimized_operator_info_t *info;
69
70     for (info = optimized_operators; info->op != PIXMAN_OP_NONE; info++)
71     {
72         if (info->op == op)
73             return info;
74     }
75     return NULL;
76 }
77
78 /*
79  * Optimize the current operator based on opacity of source or destination
80  * The output operator should be mathematically equivalent to the source.
81  */
82 static pixman_op_t
83 pixman_optimize_operator (pixman_op_t     op,
84                           pixman_image_t *src_image,
85                           pixman_image_t *mask_image,
86                           pixman_image_t *dst_image)
87 {
88     pixman_bool_t is_source_opaque;
89     pixman_bool_t is_dest_opaque;
90     const optimized_operator_info_t *info = pixman_operator_can_be_optimized (op);
91
92     if (!info || mask_image)
93         return op;
94
95     is_source_opaque = _pixman_image_is_opaque (src_image);
96     is_dest_opaque = _pixman_image_is_opaque (dst_image);
97
98     if (is_source_opaque == FALSE && is_dest_opaque == FALSE)
99         return op;
100
101     if (is_source_opaque && is_dest_opaque)
102         return info->op_src_dst_opaque;
103     else if (is_source_opaque)
104         return info->op_src_opaque;
105     else if (is_dest_opaque)
106         return info->op_dst_opaque;
107
108     return op;
109
110 }
111
112 static void
113 apply_workaround (pixman_image_t *image,
114                   int32_t *       x,
115                   int32_t *       y,
116                   uint32_t **     save_bits,
117                   int *           save_dx,
118                   int *           save_dy)
119 {
120     if (image && image->common.need_workaround)
121     {
122         /* Some X servers generate images that point to the
123          * wrong place in memory, but then set the clip region
124          * to point to the right place. Because of an old bug
125          * in pixman, this would actually work.
126          *
127          * Here we try and undo the damage
128          */
129         int bpp = PIXMAN_FORMAT_BPP (image->bits.format) / 8;
130         pixman_box32_t *extents;
131         uint8_t *t;
132         int dx, dy;
133         
134         extents = pixman_region32_extents (&(image->common.clip_region));
135         dx = extents->x1;
136         dy = extents->y1;
137         
138         *save_bits = image->bits.bits;
139         
140         *x -= dx;
141         *y -= dy;
142         pixman_region32_translate (&(image->common.clip_region), -dx, -dy);
143         
144         t = (uint8_t *)image->bits.bits;
145         t += dy * image->bits.rowstride * 4 + dx * bpp;
146         image->bits.bits = (uint32_t *)t;
147         
148         *save_dx = dx;
149         *save_dy = dy;
150     }
151 }
152
153 static void
154 unapply_workaround (pixman_image_t *image, uint32_t *bits, int dx, int dy)
155 {
156     if (image && image->common.need_workaround)
157     {
158         image->bits.bits = bits;
159         pixman_region32_translate (&image->common.clip_region, dx, dy);
160     }
161 }
162
163 /*
164  * Computing composite region
165  */
166 static inline pixman_bool_t
167 clip_general_image (pixman_region32_t * region,
168                     pixman_region32_t * clip,
169                     int                 dx,
170                     int                 dy)
171 {
172     if (pixman_region32_n_rects (region) == 1 &&
173         pixman_region32_n_rects (clip) == 1)
174     {
175         pixman_box32_t *  rbox = pixman_region32_rectangles (region, NULL);
176         pixman_box32_t *  cbox = pixman_region32_rectangles (clip, NULL);
177         int v;
178
179         if (rbox->x1 < (v = cbox->x1 + dx))
180             rbox->x1 = v;
181         if (rbox->x2 > (v = cbox->x2 + dx))
182             rbox->x2 = v;
183         if (rbox->y1 < (v = cbox->y1 + dy))
184             rbox->y1 = v;
185         if (rbox->y2 > (v = cbox->y2 + dy))
186             rbox->y2 = v;
187         if (rbox->x1 >= rbox->x2 || rbox->y1 >= rbox->y2)
188         {
189             pixman_region32_init (region);
190             return FALSE;
191         }
192     }
193     else if (!pixman_region32_not_empty (clip))
194     {
195         return FALSE;
196     }
197     else
198     {
199         if (dx || dy)
200             pixman_region32_translate (region, -dx, -dy);
201
202         if (!pixman_region32_intersect (region, region, clip))
203             return FALSE;
204
205         if (dx || dy)
206             pixman_region32_translate (region, dx, dy);
207     }
208
209     return pixman_region32_not_empty (region);
210 }
211
212 static inline pixman_bool_t
213 clip_source_image (pixman_region32_t * region,
214                    pixman_image_t *    image,
215                    int                 dx,
216                    int                 dy)
217 {
218     /* Source clips are ignored, unless they are explicitly turned on
219      * and the clip in question was set by an X client. (Because if
220      * the clip was not set by a client, then it is a hierarchy
221      * clip and those should always be ignored for sources).
222      */
223     if (!image->common.clip_sources || !image->common.client_clip)
224         return TRUE;
225
226     return clip_general_image (region,
227                                &image->common.clip_region,
228                                dx, dy);
229 }
230
231 /*
232  * returns FALSE if the final region is empty.  Indistinguishable from
233  * an allocation failure, but rendering ignores those anyways.
234  */
235 static pixman_bool_t
236 pixman_compute_composite_region32 (pixman_region32_t * region,
237                                    pixman_image_t *    src_image,
238                                    pixman_image_t *    mask_image,
239                                    pixman_image_t *    dst_image,
240                                    int32_t             src_x,
241                                    int32_t             src_y,
242                                    int32_t             mask_x,
243                                    int32_t             mask_y,
244                                    int32_t             dest_x,
245                                    int32_t             dest_y,
246                                    int32_t             width,
247                                    int32_t             height)
248 {
249     region->extents.x1 = dest_x;
250     region->extents.x2 = dest_x + width;
251     region->extents.y1 = dest_y;
252     region->extents.y2 = dest_y + height;
253
254     region->extents.x1 = MAX (region->extents.x1, 0);
255     region->extents.y1 = MAX (region->extents.y1, 0);
256     region->extents.x2 = MIN (region->extents.x2, dst_image->bits.width);
257     region->extents.y2 = MIN (region->extents.y2, dst_image->bits.height);
258
259     region->data = 0;
260
261     /* Check for empty operation */
262     if (region->extents.x1 >= region->extents.x2 ||
263         region->extents.y1 >= region->extents.y2)
264     {
265         pixman_region32_init (region);
266         return FALSE;
267     }
268
269     if (dst_image->common.have_clip_region)
270     {
271         if (!clip_general_image (region, &dst_image->common.clip_region, 0, 0))
272         {
273             pixman_region32_fini (region);
274             return FALSE;
275         }
276     }
277
278     if (dst_image->common.alpha_map && dst_image->common.alpha_map->common.have_clip_region)
279     {
280         if (!clip_general_image (region, &dst_image->common.alpha_map->common.clip_region,
281                                  -dst_image->common.alpha_origin_x,
282                                  -dst_image->common.alpha_origin_y))
283         {
284             pixman_region32_fini (region);
285             return FALSE;
286         }
287     }
288
289     /* clip against src */
290     if (src_image->common.have_clip_region)
291     {
292         if (!clip_source_image (region, src_image, dest_x - src_x, dest_y - src_y))
293         {
294             pixman_region32_fini (region);
295             return FALSE;
296         }
297     }
298     if (src_image->common.alpha_map && src_image->common.alpha_map->common.have_clip_region)
299     {
300         if (!clip_source_image (region, (pixman_image_t *)src_image->common.alpha_map,
301                                 dest_x - (src_x - src_image->common.alpha_origin_x),
302                                 dest_y - (src_y - src_image->common.alpha_origin_y)))
303         {
304             pixman_region32_fini (region);
305             return FALSE;
306         }
307     }
308     /* clip against mask */
309     if (mask_image && mask_image->common.have_clip_region)
310     {
311         if (!clip_source_image (region, mask_image, dest_x - mask_x, dest_y - mask_y))
312         {
313             pixman_region32_fini (region);
314             return FALSE;
315         }
316         if (mask_image->common.alpha_map && mask_image->common.alpha_map->common.have_clip_region)
317         {
318             if (!clip_source_image (region, (pixman_image_t *)mask_image->common.alpha_map,
319                                     dest_x - (mask_x - mask_image->common.alpha_origin_x),
320                                     dest_y - (mask_y - mask_image->common.alpha_origin_y)))
321             {
322                 pixman_region32_fini (region);
323                 return FALSE;
324             }
325         }
326     }
327
328     return TRUE;
329 }
330
331 static void
332 walk_region_internal (pixman_implementation_t *imp,
333                       pixman_op_t              op,
334                       pixman_image_t *         src_image,
335                       pixman_image_t *         mask_image,
336                       pixman_image_t *         dst_image,
337                       int32_t                  src_x,
338                       int32_t                  src_y,
339                       int32_t                  mask_x,
340                       int32_t                  mask_y,
341                       int32_t                  dest_x,
342                       int32_t                  dest_y,
343                       int32_t                  width,
344                       int32_t                  height,
345                       pixman_bool_t            src_repeat,
346                       pixman_bool_t            mask_repeat,
347                       pixman_region32_t *      region,
348                       pixman_composite_func_t  composite_rect)
349 {
350     int w, h, w_this, h_this;
351     int x_msk, y_msk, x_src, y_src, x_dst, y_dst;
352     int src_dy = src_y - dest_y;
353     int src_dx = src_x - dest_x;
354     int mask_dy = mask_y - dest_y;
355     int mask_dx = mask_x - dest_x;
356     const pixman_box32_t *pbox;
357     int n;
358
359     pbox = pixman_region32_rectangles (region, &n);
360
361     /* Fast path for non-repeating sources */
362     if (!src_repeat && !mask_repeat)
363     {
364        while (n--)
365        {
366            (*composite_rect) (imp, op,
367                               src_image, mask_image, dst_image,
368                               pbox->x1 + src_dx,
369                               pbox->y1 + src_dy,
370                               pbox->x1 + mask_dx,
371                               pbox->y1 + mask_dy,
372                               pbox->x1,
373                               pbox->y1,
374                               pbox->x2 - pbox->x1,
375                               pbox->y2 - pbox->y1);
376            
377            pbox++;
378        }
379
380        return;
381     }
382     
383     while (n--)
384     {
385         h = pbox->y2 - pbox->y1;
386         y_src = pbox->y1 + src_dy;
387         y_msk = pbox->y1 + mask_dy;
388         y_dst = pbox->y1;
389
390         while (h)
391         {
392             h_this = h;
393             w = pbox->x2 - pbox->x1;
394             x_src = pbox->x1 + src_dx;
395             x_msk = pbox->x1 + mask_dx;
396             x_dst = pbox->x1;
397
398             if (mask_repeat)
399             {
400                 y_msk = MOD (y_msk, mask_image->bits.height);
401                 if (h_this > mask_image->bits.height - y_msk)
402                     h_this = mask_image->bits.height - y_msk;
403             }
404
405             if (src_repeat)
406             {
407                 y_src = MOD (y_src, src_image->bits.height);
408                 if (h_this > src_image->bits.height - y_src)
409                     h_this = src_image->bits.height - y_src;
410             }
411
412             while (w)
413             {
414                 w_this = w;
415
416                 if (mask_repeat)
417                 {
418                     x_msk = MOD (x_msk, mask_image->bits.width);
419                     if (w_this > mask_image->bits.width - x_msk)
420                         w_this = mask_image->bits.width - x_msk;
421                 }
422
423                 if (src_repeat)
424                 {
425                     x_src = MOD (x_src, src_image->bits.width);
426                     if (w_this > src_image->bits.width - x_src)
427                         w_this = src_image->bits.width - x_src;
428                 }
429
430                 (*composite_rect) (imp, op,
431                                    src_image, mask_image, dst_image,
432                                    x_src, y_src, x_msk, y_msk, x_dst, y_dst,
433                                    w_this, h_this);
434                 w -= w_this;
435
436                 x_src += w_this;
437                 x_msk += w_this;
438                 x_dst += w_this;
439             }
440
441             h -= h_this;
442             y_src += h_this;
443             y_msk += h_this;
444             y_dst += h_this;
445         }
446
447         pbox++;
448     }
449 }
450
451 static force_inline pixman_bool_t
452 image_covers (pixman_image_t *image,
453               pixman_box32_t *extents,
454               int             x,
455               int             y)
456 {
457     if (image->common.type == BITS &&
458         image->common.repeat == PIXMAN_REPEAT_NONE)
459     {
460         if (x > extents->x1 || y > extents->y1 ||
461             x + image->bits.width < extents->x2 ||
462             y + image->bits.height < extents->y2)
463         {
464             return FALSE;
465         }
466     }
467
468     return TRUE;
469 }
470
471 static void
472 do_composite (pixman_implementation_t *imp,
473               pixman_op_t              op,
474               pixman_image_t          *src,
475               pixman_image_t          *mask,
476               pixman_image_t          *dest,
477               int                      src_x,
478               int                      src_y,
479               int                      mask_x,
480               int                      mask_y,
481               int                      dest_x,
482               int                      dest_y,
483               int                      width,
484               int                      height)
485 {
486     pixman_format_code_t src_format, mask_format, dest_format;
487     uint32_t src_flags, mask_flags, dest_flags;
488     pixman_region32_t region;
489     pixman_box32_t *extents;
490
491     src_format = src->common.extended_format_code;
492     src_flags = src->common.flags;
493
494     if (mask)
495     {
496         mask_format = mask->common.extended_format_code;
497         mask_flags = mask->common.flags;
498     }
499     else
500     {
501         mask_format = PIXMAN_null;
502         mask_flags = 0;
503     }
504
505     dest_format = dest->common.extended_format_code;
506     dest_flags = dest->common.flags;
507
508     /* Check for pixbufs */
509     if ((mask_format == PIXMAN_a8r8g8b8 || mask_format == PIXMAN_a8b8g8r8) &&
510         (src->type == BITS && src->bits.bits == mask->bits.bits)           &&
511         (src->common.repeat == mask->common.repeat)                        &&
512         (src_x == mask_x && src_y == mask_y))
513     {
514         if (src_format == PIXMAN_x8b8g8r8)
515             src_format = mask_format = PIXMAN_pixbuf;
516         else if (src_format == PIXMAN_x8r8g8b8)
517             src_format = mask_format = PIXMAN_rpixbuf;
518     }
519             
520     pixman_region32_init (&region);
521     
522     if (!pixman_compute_composite_region32 (
523             &region, src, mask, dest,
524             src_x, src_y, mask_x, mask_y, dest_x, dest_y, width, height))
525     {
526         return;
527     }
528     
529     extents = pixman_region32_extents (&region);
530     
531     if (image_covers (src, extents, dest_x - src_x, dest_y - src_y))
532         src_flags |= FAST_PATH_COVERS_CLIP;
533     
534     if (mask && image_covers (mask, extents, dest_x - mask_x, dest_y - mask_y))
535         mask_flags |= FAST_PATH_COVERS_CLIP;
536             
537     while (imp)
538     {
539         const pixman_fast_path_t *info;
540             
541         for (info = imp->fast_paths; info->op != PIXMAN_OP_NONE; ++info)
542         {
543             if ((info->op == op || info->op == PIXMAN_OP_any)           &&
544                 /* src */
545                 ((info->src_format == src_format) ||
546                  (info->src_format == PIXMAN_any))                      &&
547                 (info->src_flags & src_flags) == info->src_flags        &&
548                 /* mask */
549                 ((info->mask_format == mask_format) ||
550                  (info->mask_format == PIXMAN_any))                     &&
551                 (info->mask_flags & mask_flags) == info->mask_flags     &&
552                 /* dest */
553                 ((info->dest_format == dest_format) ||
554                  (info->dest_format == PIXMAN_any))                     &&
555                 (info->dest_flags & dest_flags) == info->dest_flags)
556             {
557                 walk_region_internal (imp, op,
558                                       src, mask, dest,
559                                       src_x, src_y, mask_x, mask_y,
560                                       dest_x, dest_y,
561                                       width, height,
562                                       (src_flags & FAST_PATH_SIMPLE_REPEAT),
563                                       (mask_flags & FAST_PATH_SIMPLE_REPEAT),
564                                       &region,
565                                       info->func);
566                 
567                 goto done;
568             }
569         }
570         
571         imp = imp->delegate;
572     }
573
574 done:
575     pixman_region32_fini (&region);
576 }
577
578 /*
579  * Work around GCC bug causing crashes in Mozilla with SSE2
580  *
581  * When using -msse, gcc generates movdqa instructions assuming that
582  * the stack is 16 byte aligned. Unfortunately some applications, such
583  * as Mozilla and Mono, end up aligning the stack to 4 bytes, which
584  * causes the movdqa instructions to fail.
585  *
586  * The __force_align_arg_pointer__ makes gcc generate a prologue that
587  * realigns the stack pointer to 16 bytes.
588  *
589  * On x86-64 this is not necessary because the standard ABI already
590  * calls for a 16 byte aligned stack.
591  *
592  * See https://bugs.freedesktop.org/show_bug.cgi?id=15693
593  */
594 #if defined (USE_SSE2) && defined(__GNUC__) && !defined(__x86_64__) && !defined(__amd64__)
595 __attribute__((__force_align_arg_pointer__))
596 #endif
597 PIXMAN_EXPORT void
598 pixman_image_composite (pixman_op_t      op,
599                         pixman_image_t * src,
600                         pixman_image_t * mask,
601                         pixman_image_t * dest,
602                         int16_t          src_x,
603                         int16_t          src_y,
604                         int16_t          mask_x,
605                         int16_t          mask_y,
606                         int16_t          dest_x,
607                         int16_t          dest_y,
608                         uint16_t         width,
609                         uint16_t         height)
610 {
611     pixman_image_composite32 (op, src, mask, dest, src_x, src_y, 
612                               mask_x, mask_y, dest_x, dest_y, width, height);
613 }
614
615 PIXMAN_EXPORT void
616 pixman_image_composite32 (pixman_op_t      op,
617                           pixman_image_t * src,
618                           pixman_image_t * mask,
619                           pixman_image_t * dest,
620                           int32_t          src_x,
621                           int32_t          src_y,
622                           int32_t          mask_x,
623                           int32_t          mask_y,
624                           int32_t          dest_x,
625                           int32_t          dest_y,
626                           int32_t          width,
627                           int32_t          height)
628 {
629     uint32_t *src_bits;
630     int src_dx, src_dy;
631     uint32_t *mask_bits;
632     int mask_dx, mask_dy;
633     uint32_t *dest_bits;
634     int dest_dx, dest_dy;
635     pixman_bool_t need_workaround;
636
637     _pixman_image_validate (src);
638     if (mask)
639         _pixman_image_validate (mask);
640     _pixman_image_validate (dest);
641     
642     /*
643      * Check if we can replace our operator by a simpler one
644      * if the src or dest are opaque. The output operator should be
645      * mathematically equivalent to the source.
646      */
647     op = pixman_optimize_operator(op, src, mask, dest);
648     if (op == PIXMAN_OP_DST             ||
649         op == PIXMAN_OP_CONJOINT_DST    ||
650         op == PIXMAN_OP_DISJOINT_DST)
651     {
652         return;
653     }
654
655     if (!imp)
656         imp = _pixman_choose_implementation ();
657
658     need_workaround =
659         (src->common.need_workaround)                   ||
660         (mask && mask->common.need_workaround)          ||
661         (dest->common.need_workaround);
662    
663     if (need_workaround)
664     {
665         apply_workaround (src, &src_x, &src_y, &src_bits, &src_dx, &src_dy);
666         apply_workaround (mask, &mask_x, &mask_y, &mask_bits, &mask_dx, &mask_dy);
667         apply_workaround (dest, &dest_x, &dest_y, &dest_bits, &dest_dx, &dest_dy);
668     }
669
670     do_composite (imp, op,
671                   src, mask, dest,
672                   src_x, src_y,
673                   mask_x, mask_y,
674                   dest_x, dest_y,
675                   width, height);
676     
677     if (need_workaround)
678     {
679         if (src->common.need_workaround)
680             unapply_workaround (src, src_bits, src_dx, src_dy);
681         if (mask && mask->common.need_workaround)
682             unapply_workaround (mask, mask_bits, mask_dx, mask_dy);
683         if (dest->common.need_workaround)
684             unapply_workaround (dest, dest_bits, dest_dx, dest_dy);
685     }
686 }
687
688 PIXMAN_EXPORT pixman_bool_t
689 pixman_blt (uint32_t *src_bits,
690             uint32_t *dst_bits,
691             int       src_stride,
692             int       dst_stride,
693             int       src_bpp,
694             int       dst_bpp,
695             int       src_x,
696             int       src_y,
697             int       dst_x,
698             int       dst_y,
699             int       width,
700             int       height)
701 {
702     if (!imp)
703         imp = _pixman_choose_implementation ();
704
705     return _pixman_implementation_blt (imp, src_bits, dst_bits, src_stride, dst_stride,
706                                        src_bpp, dst_bpp,
707                                        src_x, src_y,
708                                        dst_x, dst_y,
709                                        width, height);
710 }
711
712 PIXMAN_EXPORT pixman_bool_t
713 pixman_fill (uint32_t *bits,
714              int       stride,
715              int       bpp,
716              int       x,
717              int       y,
718              int       width,
719              int       height,
720              uint32_t xor)
721 {
722     if (!imp)
723         imp = _pixman_choose_implementation ();
724
725     return _pixman_implementation_fill (imp, bits, stride, bpp, x, y, width, height, xor);
726 }
727
728 static uint32_t
729 color_to_uint32 (const pixman_color_t *color)
730 {
731     return
732         (color->alpha >> 8 << 24) |
733         (color->red >> 8 << 16) |
734         (color->green & 0xff00) |
735         (color->blue >> 8);
736 }
737
738 static pixman_bool_t
739 color_to_pixel (pixman_color_t *     color,
740                 uint32_t *           pixel,
741                 pixman_format_code_t format)
742 {
743     uint32_t c = color_to_uint32 (color);
744
745     if (!(format == PIXMAN_a8r8g8b8     ||
746           format == PIXMAN_x8r8g8b8     ||
747           format == PIXMAN_a8b8g8r8     ||
748           format == PIXMAN_x8b8g8r8     ||
749           format == PIXMAN_b8g8r8a8     ||
750           format == PIXMAN_b8g8r8x8     ||
751           format == PIXMAN_r5g6b5       ||
752           format == PIXMAN_b5g6r5       ||
753           format == PIXMAN_a8))
754     {
755         return FALSE;
756     }
757
758     if (PIXMAN_FORMAT_TYPE (format) == PIXMAN_TYPE_ABGR)
759     {
760         c = ((c & 0xff000000) >>  0) |
761             ((c & 0x00ff0000) >> 16) |
762             ((c & 0x0000ff00) >>  0) |
763             ((c & 0x000000ff) << 16);
764     }
765     if (PIXMAN_FORMAT_TYPE (format) == PIXMAN_TYPE_BGRA)
766     {
767         c = ((c & 0xff000000) >> 24) |
768             ((c & 0x00ff0000) >>  8) |
769             ((c & 0x0000ff00) <<  8) |
770             ((c & 0x000000ff) << 24);
771     }
772
773     if (format == PIXMAN_a8)
774         c = c >> 24;
775     else if (format == PIXMAN_r5g6b5 ||
776              format == PIXMAN_b5g6r5)
777         c = CONVERT_8888_TO_0565 (c);
778
779 #if 0
780     printf ("color: %x %x %x %x\n", color->alpha, color->red, color->green, color->blue);
781     printf ("pixel: %x\n", c);
782 #endif
783
784     *pixel = c;
785     return TRUE;
786 }
787
788 PIXMAN_EXPORT pixman_bool_t
789 pixman_image_fill_rectangles (pixman_op_t                 op,
790                               pixman_image_t *            dest,
791                               pixman_color_t *            color,
792                               int                         n_rects,
793                               const pixman_rectangle16_t *rects)
794 {
795     pixman_box32_t stack_boxes[6];
796     pixman_box32_t *boxes;
797     pixman_bool_t result;
798     int i;
799
800     if (n_rects > 6)
801     {
802         boxes = pixman_malloc_ab (sizeof (pixman_box32_t), n_rects);
803         if (boxes == NULL)
804             return FALSE;
805     }
806     else
807     {
808         boxes = stack_boxes;
809     }
810
811     for (i = 0; i < n_rects; ++i)
812     {
813         boxes[i].x1 = rects[i].x;
814         boxes[i].y1 = rects[i].y;
815         boxes[i].x2 = boxes[i].x1 + rects[i].width;
816         boxes[i].y2 = boxes[i].y1 + rects[i].height;
817     }
818
819     result = pixman_image_fill_boxes (op, dest, color, n_rects, boxes);
820
821     if (boxes != stack_boxes)
822         free (boxes);
823     
824     return result;
825 }
826
827 PIXMAN_EXPORT pixman_bool_t
828 pixman_image_fill_boxes (pixman_op_t           op,
829                          pixman_image_t *      dest,
830                          pixman_color_t *      color,
831                          int                   n_boxes,
832                          const pixman_box32_t *boxes)
833 {
834     pixman_image_t *solid;
835     pixman_color_t c;
836     int i;
837
838     _pixman_image_validate (dest);
839     
840     if (color->alpha == 0xffff)
841     {
842         if (op == PIXMAN_OP_OVER)
843             op = PIXMAN_OP_SRC;
844     }
845
846     if (op == PIXMAN_OP_CLEAR)
847     {
848         c.red = 0;
849         c.green = 0;
850         c.blue = 0;
851         c.alpha = 0;
852
853         color = &c;
854
855         op = PIXMAN_OP_SRC;
856     }
857
858     if (op == PIXMAN_OP_SRC)
859     {
860         uint32_t pixel;
861
862         if (color_to_pixel (color, &pixel, dest->bits.format))
863         {
864             pixman_region32_t fill_region;
865             int n_rects, j;
866             pixman_box32_t *rects;
867
868             if (!pixman_region32_init_rects (&fill_region, boxes, n_boxes))
869                 return FALSE;
870
871             if (dest->common.have_clip_region)
872             {
873                 if (!pixman_region32_intersect (&fill_region,
874                                                 &fill_region,
875                                                 &dest->common.clip_region))
876                     return FALSE;
877             }
878
879             rects = pixman_region32_rectangles (&fill_region, &n_rects);
880             for (j = 0; j < n_rects; ++j)
881             {
882                 const pixman_box32_t *rect = &(rects[j]);
883                 pixman_fill (dest->bits.bits, dest->bits.rowstride, PIXMAN_FORMAT_BPP (dest->bits.format),
884                              rect->x1, rect->y1, rect->x2 - rect->x1, rect->y2 - rect->y1,
885                              pixel);
886             }
887
888             pixman_region32_fini (&fill_region);
889             return TRUE;
890         }
891     }
892
893     solid = pixman_image_create_solid_fill (color);
894     if (!solid)
895         return FALSE;
896
897     for (i = 0; i < n_boxes; ++i)
898     {
899         const pixman_box32_t *box = &(boxes[i]);
900
901         pixman_image_composite32 (op, solid, NULL, dest,
902                                   0, 0, 0, 0,
903                                   box->x1, box->y1,
904                                   box->x2 - box->x1, box->y2 - box->y1);
905     }
906
907     pixman_image_unref (solid);
908
909     return TRUE;
910 }
911
912 /**
913  * pixman_version:
914  *
915  * Returns the version of the pixman library encoded in a single
916  * integer as per %PIXMAN_VERSION_ENCODE. The encoding ensures that
917  * later versions compare greater than earlier versions.
918  *
919  * A run-time comparison to check that pixman's version is greater than
920  * or equal to version X.Y.Z could be performed as follows:
921  *
922  * <informalexample><programlisting>
923  * if (pixman_version() >= PIXMAN_VERSION_ENCODE(X,Y,Z)) {...}
924  * </programlisting></informalexample>
925  *
926  * See also pixman_version_string() as well as the compile-time
927  * equivalents %PIXMAN_VERSION and %PIXMAN_VERSION_STRING.
928  *
929  * Return value: the encoded version.
930  **/
931 PIXMAN_EXPORT int
932 pixman_version (void)
933 {
934     return PIXMAN_VERSION;
935 }
936
937 /**
938  * pixman_version_string:
939  *
940  * Returns the version of the pixman library as a human-readable string
941  * of the form "X.Y.Z".
942  *
943  * See also pixman_version() as well as the compile-time equivalents
944  * %PIXMAN_VERSION_STRING and %PIXMAN_VERSION.
945  *
946  * Return value: a string containing the version.
947  **/
948 PIXMAN_EXPORT const char*
949 pixman_version_string (void)
950 {
951     return PIXMAN_VERSION_STRING;
952 }
953
954 /**
955  * pixman_format_supported_source:
956  * @format: A pixman_format_code_t format
957  *
958  * Return value: whether the provided format code is a supported
959  * format for a pixman surface used as a source in
960  * rendering.
961  *
962  * Currently, all pixman_format_code_t values are supported.
963  **/
964 PIXMAN_EXPORT pixman_bool_t
965 pixman_format_supported_source (pixman_format_code_t format)
966 {
967     switch (format)
968     {
969     /* 32 bpp formats */
970     case PIXMAN_a2b10g10r10:
971     case PIXMAN_x2b10g10r10:
972     case PIXMAN_a2r10g10b10:
973     case PIXMAN_x2r10g10b10:
974     case PIXMAN_a8r8g8b8:
975     case PIXMAN_x8r8g8b8:
976     case PIXMAN_a8b8g8r8:
977     case PIXMAN_x8b8g8r8:
978     case PIXMAN_b8g8r8a8:
979     case PIXMAN_b8g8r8x8:
980     case PIXMAN_r8g8b8:
981     case PIXMAN_b8g8r8:
982     case PIXMAN_r5g6b5:
983     case PIXMAN_b5g6r5:
984     /* 16 bpp formats */
985     case PIXMAN_a1r5g5b5:
986     case PIXMAN_x1r5g5b5:
987     case PIXMAN_a1b5g5r5:
988     case PIXMAN_x1b5g5r5:
989     case PIXMAN_a4r4g4b4:
990     case PIXMAN_x4r4g4b4:
991     case PIXMAN_a4b4g4r4:
992     case PIXMAN_x4b4g4r4:
993     /* 8bpp formats */
994     case PIXMAN_a8:
995     case PIXMAN_r3g3b2:
996     case PIXMAN_b2g3r3:
997     case PIXMAN_a2r2g2b2:
998     case PIXMAN_a2b2g2r2:
999     case PIXMAN_c8:
1000     case PIXMAN_g8:
1001     case PIXMAN_x4a4:
1002     /* Collides with PIXMAN_c8
1003        case PIXMAN_x4c4:
1004      */
1005     /* Collides with PIXMAN_g8
1006        case PIXMAN_x4g4:
1007      */
1008     /* 4bpp formats */
1009     case PIXMAN_a4:
1010     case PIXMAN_r1g2b1:
1011     case PIXMAN_b1g2r1:
1012     case PIXMAN_a1r1g1b1:
1013     case PIXMAN_a1b1g1r1:
1014     case PIXMAN_c4:
1015     case PIXMAN_g4:
1016     /* 1bpp formats */
1017     case PIXMAN_a1:
1018     case PIXMAN_g1:
1019     /* YUV formats */
1020     case PIXMAN_yuy2:
1021     case PIXMAN_yv12:
1022         return TRUE;
1023
1024     default:
1025         return FALSE;
1026     }
1027 }
1028
1029 /**
1030  * pixman_format_supported_destination:
1031  * @format: A pixman_format_code_t format
1032  *
1033  * Return value: whether the provided format code is a supported
1034  * format for a pixman surface used as a destination in
1035  * rendering.
1036  *
1037  * Currently, all pixman_format_code_t values are supported
1038  * except for the YUV formats.
1039  **/
1040 PIXMAN_EXPORT pixman_bool_t
1041 pixman_format_supported_destination (pixman_format_code_t format)
1042 {
1043     /* YUV formats cannot be written to at the moment */
1044     if (format == PIXMAN_yuy2 || format == PIXMAN_yv12)
1045         return FALSE;
1046
1047     return pixman_format_supported_source (format);
1048 }
1049
1050 PIXMAN_EXPORT pixman_bool_t
1051 pixman_compute_composite_region (pixman_region16_t * region,
1052                                  pixman_image_t *    src_image,
1053                                  pixman_image_t *    mask_image,
1054                                  pixman_image_t *    dst_image,
1055                                  int16_t             src_x,
1056                                  int16_t             src_y,
1057                                  int16_t             mask_x,
1058                                  int16_t             mask_y,
1059                                  int16_t             dest_x,
1060                                  int16_t             dest_y,
1061                                  uint16_t            width,
1062                                  uint16_t            height)
1063 {
1064     pixman_region32_t r32;
1065     pixman_bool_t retval;
1066
1067     pixman_region32_init (&r32);
1068
1069     retval = pixman_compute_composite_region32 (
1070         &r32, src_image, mask_image, dst_image,
1071         src_x, src_y, mask_x, mask_y, dest_x, dest_y,
1072         width, height);
1073
1074     if (retval)
1075     {
1076         if (!pixman_region16_copy_from_region32 (region, &r32))
1077             retval = FALSE;
1078     }
1079
1080     pixman_region32_fini (&r32);
1081     return retval;
1082 }