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