Quelle  cairo-traps-compositor.c   Sprache: C

/* -*- Mode: c; tab-width: 8; c-basic-offset: 4; indent-tabs-mode: t; -*- */
/* cairo - a vector graphics library with display and print output
 *
 * Copyright © 2002 University of Southern California
 * Copyright © 2005 Red Hat, Inc.
 * Copyright © 2011 Intel Corporation
 *
 * This library is free software; you can redistribute it and/or
 * modify it either under the terms of the GNU Lesser General Public
 * License version 2.1 as published by the Free Software Foundation
 * (the "LGPL") or, at your option, under the terms of the Mozilla
 * Public License Version 1.1 (the "MPL"). If you do not alter this
 * notice, a recipient may use your version of this file under either
 * the MPL or the LGPL.
 *
 * You should have received a copy of the LGPL along with this library
 * in the file COPYING-LGPL-2.1; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Suite 500, Boston, MA 02110-1335, USA
 * You should have received a copy of the MPL along with this library
 * in the file COPYING-MPL-1.1
 *
 * The contents of this file are subject to the Mozilla Public License
 * Version 1.1 (the "License"); you may not use this file except in
 * compliance with the License. You may obtain a copy of the License at
 * http://www.mozilla.org/MPL/
 *
 * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY
 * OF ANY KIND, either express or implied. See the LGPL or the MPL for
 * the specific language governing rights and limitations.
 *
 * The Original Code is the cairo graphics library.
 *
 * The Initial Developer of the Original Code is University of Southern
 * California.
 *
 * Contributor(s):
 * Carl D. Worth <cworth@cworth.org>
 *      Joonas Pihlaja <jpihlaja@cc.helsinki.fi>
 * Chris Wilson <chris@chris-wilson.co.uk>
 */

#include "cairoint.h"

#include "cairo-box-inline.h"
#include "cairo-boxes-private.h"
#include "cairo-clip-inline.h"
#include "cairo-clip-private.h"
#include "cairo-composite-rectangles-private.h"
#include "cairo-compositor-private.h"
#include "cairo-error-private.h"
#include "cairo-image-surface-private.h"
#include "cairo-pattern-inline.h"
#include "cairo-paginated-private.h"
#include "cairo-recording-surface-inline.h"
#include "cairo-surface-subsurface-private.h"
#include "cairo-surface-snapshot-inline.h"
#include "cairo-surface-observer-private.h"
#include "cairo-region-private.h"
#include "cairo-spans-private.h"
#include "cairo-traps-private.h"
#include "cairo-tristrip-private.h"

typedef cairo_int_status_t
(*draw_func_t) (const cairo_traps_compositor_t *compositor,
  cairo_surface_t   *dst,
  void    *closure,
  cairo_operator_t   op,
  cairo_surface_t  *src,
  int     src_x,
  int     src_y,
  int     dst_x,
  int     dst_y,
  const cairo_rectangle_int_t *extents,
  cairo_clip_t   *clip);

static void do_unaligned_row(void (*blt)(void *closure,
      int16_t x, int16_t y,
      int16_t w, int16_t h,
      uint16_t coverage),
        void *closure,
        const cairo_box_t *b,
        int tx, int y, int h,
        uint16_t coverage)
{
    int x1 = _cairo_fixed_integer_part (b->p1.x) - tx;
    int x2 = _cairo_fixed_integer_part (b->p2.x) - tx;
    if (x2 > x1) {
 if (! _cairo_fixed_is_integer (b->p1.x)) {
     blt(closure, x1, y, 1, h,
  coverage * (256 - _cairo_fixed_fractional_part (b->p1.x)));
     x1++;
 }

 if (x2 > x1)
     blt(closure, x1, y, x2-x1, h, (coverage << 8) - (coverage >> 8));

 if (! _cairo_fixed_is_integer (b->p2.x))
     blt(closure, x2, y, 1, h,
  coverage * _cairo_fixed_fractional_part (b->p2.x));
    } else
 blt(closure, x1, y, 1, h,
     coverage * (b->p2.x - b->p1.x));
}

static void do_unaligned_box(void (*blt)(void *closure,
      int16_t x, int16_t y,
      int16_t w, int16_t h,
      uint16_t coverage),
        void *closure,
        const cairo_box_t *b, int tx, int ty)
{
    int y1 = _cairo_fixed_integer_part (b->p1.y) - ty;
    int y2 = _cairo_fixed_integer_part (b->p2.y) - ty;
    if (y2 > y1) {
 if (! _cairo_fixed_is_integer (b->p1.y)) {
     do_unaligned_row(blt, closure, b, tx, y1, 1,
        256 - _cairo_fixed_fractional_part (b->p1.y));
     y1++;
 }

 if (y2 > y1)
     do_unaligned_row(blt, closure, b, tx, y1, y2-y1, 256);

 if (! _cairo_fixed_is_integer (b->p2.y))
     do_unaligned_row(blt, closure, b, tx, y2, 1,
        _cairo_fixed_fractional_part (b->p2.y));
    } else
 do_unaligned_row(blt, closure, b, tx, y1, 1,
    b->p2.y - b->p1.y);
}

struct blt_in {
    const cairo_traps_compositor_t *compositor;
    cairo_surface_t *dst;
    cairo_boxes_t boxes;
};

static void blt_in(void *closure,
     int16_t x, int16_t y,
     int16_t w, int16_t h,
     uint16_t coverage)
{
    struct blt_in *info = closure;
    cairo_color_t color;

    if (CAIRO_ALPHA_SHORT_IS_OPAQUE (coverage))
 return;

    _cairo_box_from_integers (&info->boxes.chunks.base[0], x, y, w, h);

    _cairo_color_init_rgba (&color, 0, 0, 0, coverage / (double) 0xffff);
    info->compositor->fill_boxes (info->dst,
      CAIRO_OPERATOR_IN, &color,
      &info->boxes);
}

static void
add_rect_with_offset (cairo_boxes_t *boxes, int x1, int y1, int x2, int y2, int dx, int dy)
{
    cairo_box_t box;
    cairo_int_status_t status;

    box.p1.x = _cairo_fixed_from_int (x1 - dx);
    box.p1.y = _cairo_fixed_from_int (y1 - dy);
    box.p2.x = _cairo_fixed_from_int (x2 - dx);
    box.p2.y = _cairo_fixed_from_int (y2 - dy);

    status = _cairo_boxes_add (boxes, CAIRO_ANTIALIAS_DEFAULT, &box);
    assert (status == CAIRO_INT_STATUS_SUCCESS);
}

static cairo_int_status_t
combine_clip_as_traps (const cairo_traps_compositor_t *compositor,
         cairo_surface_t *mask,
         const cairo_clip_t *clip,
         const cairo_rectangle_int_t *extents)
{
    cairo_polygon_t polygon;
    cairo_fill_rule_t fill_rule;
    cairo_antialias_t antialias;
    cairo_traps_t traps;
    cairo_surface_t *src;
    cairo_box_t box;
    cairo_rectangle_int_t fixup;
    int src_x, src_y;
    cairo_int_status_t status;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    status = _cairo_clip_get_polygon (clip, &polygon,
          &fill_rule, &antialias);
    if (status)
 return status;

    _cairo_traps_init (&traps);
    status = _cairo_bentley_ottmann_tessellate_polygon (&traps,
       &polygon,
       fill_rule);
    _cairo_polygon_fini (&polygon);
    if (unlikely (status))
 return status;

    src = compositor->pattern_to_surface (mask, NULL, FALSE,
       extents, NULL,
       &src_x, &src_y);
    if (unlikely (src->status)) {
 _cairo_traps_fini (&traps);
 return src->status;
    }

    status = compositor->composite_traps (mask, CAIRO_OPERATOR_IN, src,
       src_x, src_y,
       extents->x, extents->y,
       extents,
       antialias, &traps);

    _cairo_traps_extents (&traps, &box);
    _cairo_box_round_to_rectangle (&box, &fixup);
    _cairo_traps_fini (&traps);
    cairo_surface_destroy (src);

    if (unlikely (status))
 return status;

    if (! _cairo_rectangle_intersect (&fixup, extents))
 return CAIRO_STATUS_SUCCESS;

    if (fixup.width < extents->width || fixup.height < extents->height) {
 cairo_boxes_t clear;

 _cairo_boxes_init (&clear);

 /* top */
 if (fixup.y != extents->y) {
     add_rect_with_offset (&clear,
      extents->x, extents->y,
      extents->x + extents->width,
      fixup.y,
      extents->x, extents->y);
 }
 /* left */
 if (fixup.x != extents->x) {
     add_rect_with_offset (&clear,
      extents->x, fixup.y,
      fixup.x,
      fixup.y + fixup.height,
      extents->x, extents->y);
 }
 /* right */
 if (fixup.x + fixup.width != extents->x + extents->width) {
     add_rect_with_offset (&clear,
      fixup.x + fixup.width,
      fixup.y,
      extents->x + extents->width,
      fixup.y + fixup.height,
      extents->x, extents->y);
 }
 /* bottom */
 if (fixup.y + fixup.height != extents->y + extents->height) {
     add_rect_with_offset (&clear,
      extents->x,
      fixup.y + fixup.height,
      extents->x + extents->width,
      extents->y + extents->height,
      extents->x, extents->y);
 }

 status = compositor->fill_boxes (mask,
      CAIRO_OPERATOR_CLEAR,
      CAIRO_COLOR_TRANSPARENT,
      &clear);

 _cairo_boxes_fini (&clear);
    }

    return status;
}

static cairo_status_t
__clip_to_surface (const cairo_traps_compositor_t *compositor,
     const cairo_composite_rectangles_t *composite,
     const cairo_rectangle_int_t *extents,
     cairo_surface_t **surface)
{
    cairo_surface_t *mask;
    cairo_polygon_t polygon;
    cairo_fill_rule_t fill_rule;
    cairo_antialias_t antialias;
    cairo_traps_t traps;
    cairo_boxes_t clear;
    cairo_surface_t *src;
    int src_x, src_y;
    cairo_int_status_t status;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    status = _cairo_clip_get_polygon (composite->clip, &polygon,
          &fill_rule, &antialias);
    if (status)
 return status;

    _cairo_traps_init (&traps);
    status = _cairo_bentley_ottmann_tessellate_polygon (&traps,
       &polygon,
       fill_rule);
    _cairo_polygon_fini (&polygon);
    if (unlikely (status))
 return status;

    mask = _cairo_surface_create_scratch (composite->surface,
       CAIRO_CONTENT_ALPHA,
       extents->width,
       extents->height,
       NULL);
    if (unlikely (mask->status)) {
 _cairo_traps_fini (&traps);
 return status;
    }

    src = compositor->pattern_to_surface (mask, NULL, FALSE,
       extents, NULL,
       &src_x, &src_y);
    if (unlikely (status = src->status))
 goto error;

    status = compositor->acquire (mask);
    if (unlikely (status))
 goto error;

    _cairo_boxes_init_from_rectangle (&clear,
          0, 0,
          extents->width,
          extents->height);
    status = compositor->fill_boxes (mask,
         CAIRO_OPERATOR_CLEAR,
         CAIRO_COLOR_TRANSPARENT,
         &clear);
    if (unlikely (status))
 goto error_release;

    status = compositor->composite_traps (mask, CAIRO_OPERATOR_ADD, src,
       src_x, src_y,
       extents->x, extents->y,
       extents,
       antialias, &traps);
    if (unlikely (status))
 goto error_release;

    compositor->release (mask);
    *surface = mask;
out:
    cairo_surface_destroy (src);
    _cairo_traps_fini (&traps);
    return status;

error_release:
    compositor->release (mask);
error:
    cairo_surface_destroy (mask);
    goto out;
}

static cairo_surface_t *
traps_get_clip_surface (const cairo_traps_compositor_t *compositor,
   const cairo_composite_rectangles_t *composite,
   const cairo_rectangle_int_t *extents)
{
    cairo_surface_t *surface = NULL;
    cairo_int_status_t status;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    status = __clip_to_surface (compositor, composite, extents, &surface);
    if (status == CAIRO_INT_STATUS_UNSUPPORTED) {
 surface = _cairo_surface_create_scratch (composite->surface,
       CAIRO_CONTENT_ALPHA,
       extents->width,
       extents->height,
       CAIRO_COLOR_WHITE);
 if (unlikely (surface->status))
     return surface;

 status = _cairo_clip_combine_with_surface (composite->clip, surface,
         extents->x, extents->y);
    }
    if (unlikely (status)) {
 cairo_surface_destroy (surface);
 surface = _cairo_surface_create_in_error (status);
    }

    return surface;
}

static void blt_unaligned_boxes(const cairo_traps_compositor_t *compositor,
    cairo_surface_t *surface,
    int dx, int dy,
    cairo_box_t *boxes,
    int num_boxes)
{
    struct blt_in info;
    int i;

    info.compositor = compositor;
    info.dst = surface;
    _cairo_boxes_init (&info.boxes);
    info.boxes.num_boxes = 1;
    for (i = 0; i < num_boxes; i++) {
 cairo_box_t *b = &boxes[i];

 if (! _cairo_fixed_is_integer (b->p1.x) ||
     ! _cairo_fixed_is_integer (b->p1.y) ||
     ! _cairo_fixed_is_integer (b->p2.x) ||
     ! _cairo_fixed_is_integer (b->p2.y))
 {
     do_unaligned_box(blt_in, &info, b, dx, dy);
 }
    }
}

static cairo_surface_t *
create_composite_mask (const cairo_traps_compositor_t *compositor,
         cairo_surface_t  *dst,
         void   *draw_closure,
         draw_func_t   draw_func,
         draw_func_t   mask_func,
         const cairo_composite_rectangles_t *extents)
{
    cairo_surface_t *surface, *src;
    cairo_int_status_t status;
    int src_x, src_y;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    surface = _cairo_surface_create_scratch (dst, CAIRO_CONTENT_ALPHA,
          extents->bounded.width,
          extents->bounded.height,
          NULL);
    if (unlikely (surface->status))
 return surface;

    src = compositor->pattern_to_surface (surface,
       &_cairo_pattern_white.base,
       FALSE,
       &extents->bounded,
       &extents->bounded,
       &src_x, &src_y);
    if (unlikely (src->status)) {
 cairo_surface_destroy (surface);
 return src;
    }

    status = compositor->acquire (surface);
    if (unlikely (status)) {
 cairo_surface_destroy (src);
 cairo_surface_destroy (surface);
 return _cairo_surface_create_in_error (status);
    }

    if (!surface->is_clear) {
 cairo_boxes_t clear;

 _cairo_boxes_init_from_rectangle (&clear,
       0, 0,
       extents->bounded.width,
       extents->bounded.height);
 status = compositor->fill_boxes (surface,
      CAIRO_OPERATOR_CLEAR,
      CAIRO_COLOR_TRANSPARENT,
      &clear);
 if (unlikely (status))
     goto error;

 surface->is_clear = TRUE;
    }

    if (mask_func) {
 status = mask_func (compositor, surface, draw_closure,
       CAIRO_OPERATOR_SOURCE, src, src_x, src_y,
       extents->bounded.x, extents->bounded.y,
       &extents->bounded, extents->clip);
 if (likely (status == CAIRO_INT_STATUS_SUCCESS)) {
     surface->is_clear = FALSE;
     goto out;
 }
 if (unlikely (status != CAIRO_INT_STATUS_UNSUPPORTED))
     goto error;
    }

    /* Is it worth setting the clip region here? */
    status = draw_func (compositor, surface, draw_closure,
   CAIRO_OPERATOR_ADD, src, src_x, src_y,
   extents->bounded.x, extents->bounded.y,
   &extents->bounded, NULL);
    if (unlikely (status))
 goto error;

    surface->is_clear = FALSE;
    if (extents->clip->path != NULL) {
 status = combine_clip_as_traps (compositor, surface,
     extents->clip, &extents->bounded);
 if (status == CAIRO_INT_STATUS_UNSUPPORTED) {
     status = _cairo_clip_combine_with_surface (extents->clip, surface,
             extents->bounded.x,
             extents->bounded.y);
 }
 if (unlikely (status))
     goto error;
    } else if (extents->clip->boxes) {
 blt_unaligned_boxes(compositor, surface,
       extents->bounded.x, extents->bounded.y,
       extents->clip->boxes, extents->clip->num_boxes);

    }

out:
    compositor->release (surface);
    cairo_surface_destroy (src);
    return surface;

error:
    compositor->release (surface);
    if (status != CAIRO_INT_STATUS_NOTHING_TO_DO) {
 cairo_surface_destroy (surface);
 surface = _cairo_surface_create_in_error (status);
    }
    cairo_surface_destroy (src);
    return surface;
}

/* Handles compositing with a clip surface when the operator allows
 * us to combine the clip with the mask
 */
static cairo_status_t
clip_and_composite_with_mask (const cairo_traps_compositor_t *compositor,
         const cairo_composite_rectangles_t*extents,
         draw_func_t   draw_func,
         draw_func_t   mask_func,
         void   *draw_closure,
         cairo_operator_t   op,
         cairo_surface_t *src,
         int src_x, int src_y)
{
    cairo_surface_t *dst = extents->surface;
    cairo_surface_t *mask;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    mask = create_composite_mask (compositor, dst, draw_closure,
      draw_func, mask_func,
      extents);
    if (unlikely (mask->status))
 return mask->status;

    if (mask->is_clear)
 goto skip;

    if (src != NULL || dst->content != CAIRO_CONTENT_ALPHA) {
 compositor->composite (dst, op, src, mask,
          extents->bounded.x + src_x,
          extents->bounded.y + src_y,
          0, 0,
          extents->bounded.x,      extents->bounded.y,
          extents->bounded.width,  extents->bounded.height);
    } else {
 compositor->composite (dst, op, mask, NULL,
          0, 0,
          0, 0,
          extents->bounded.x,      extents->bounded.y,
          extents->bounded.width,  extents->bounded.height);
    }

skip:
    cairo_surface_destroy (mask);
    return CAIRO_STATUS_SUCCESS;
}

/* Handles compositing with a clip surface when we have to do the operation
 * in two pieces and combine them together.
 */
static cairo_status_t
clip_and_composite_combine (const cairo_traps_compositor_t *compositor,
       const cairo_composite_rectangles_t*extents,
       draw_func_t   draw_func,
       void   *draw_closure,
       cairo_operator_t   op,
       cairo_surface_t *src,
       int src_x, int src_y)
{
    cairo_surface_t *dst = extents->surface;
    cairo_surface_t *tmp, *clip;
    cairo_status_t status;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    tmp = _cairo_surface_create_scratch (dst, dst->content,
      extents->bounded.width,
      extents->bounded.height,
      NULL);
    if (unlikely (tmp->status))
 return tmp->status;

    status = compositor->acquire (tmp);
    if (unlikely (status)) {
 cairo_surface_destroy (tmp);
 return status;
    }

    compositor->composite (tmp,
      dst->is_clear ? CAIRO_OPERATOR_CLEAR : CAIRO_OPERATOR_SOURCE,
      dst, NULL,
      extents->bounded.x,      extents->bounded.y,
      0, 0,
      0, 0,
      extents->bounded.width,  extents->bounded.height);

    status = draw_func (compositor, tmp, draw_closure, op,
   src, src_x, src_y,
   extents->bounded.x, extents->bounded.y,
   &extents->bounded, NULL);

    if (unlikely (status))
 goto cleanup;

    clip = traps_get_clip_surface (compositor, extents, &extents->bounded);
    if (unlikely ((status = clip->status)))
 goto cleanup;

    if (dst->is_clear) {
 compositor->composite (dst, CAIRO_OPERATOR_SOURCE, tmp, clip,
          0, 0,
          0, 0,
          extents->bounded.x,      extents->bounded.y,
          extents->bounded.width,  extents->bounded.height);
    } else {
 compositor->lerp (dst, tmp, clip,
     0, 0,
     0,0,
     extents->bounded.x,     extents->bounded.y,
     extents->bounded.width, extents->bounded.height);
    }
    cairo_surface_destroy (clip);

cleanup:
    compositor->release (tmp);
    cairo_surface_destroy (tmp);

    return status;
}

/* Handles compositing for %CAIRO_OPERATOR_SOURCE, which is special; it's
 * defined as (src IN mask IN clip) ADD (dst OUT (mask IN clip))
 */
static cairo_status_t
clip_and_composite_source (const cairo_traps_compositor_t *compositor,
      cairo_surface_t   *dst,
      draw_func_t     draw_func,
      draw_func_t     mask_func,
      void     *draw_closure,
      cairo_surface_t  *src,
      int src_x,
      int src_y,
      const cairo_composite_rectangles_t *extents)
{
    cairo_surface_t *mask;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    /* Create a surface that is mask IN clip */
    mask = create_composite_mask (compositor, dst, draw_closure,
      draw_func, mask_func,
      extents);
    if (unlikely (mask->status))
 return mask->status;

    if (mask->is_clear)
 goto skip;

    if (dst->is_clear) {
 compositor->composite (dst, CAIRO_OPERATOR_SOURCE, src, mask,
          extents->bounded.x + src_x, extents->bounded.y + src_y,
          0, 0,
          extents->bounded.x,      extents->bounded.y,
          extents->bounded.width,  extents->bounded.height);
    } else {
 compositor->lerp (dst, src, mask,
     extents->bounded.x + src_x, extents->bounded.y + src_y,
     0, 0,
     extents->bounded.x,     extents->bounded.y,
     extents->bounded.width, extents->bounded.height);
    }

skip:
    cairo_surface_destroy (mask);

    return CAIRO_STATUS_SUCCESS;
}

static cairo_bool_t
can_reduce_alpha_op (cairo_operator_t op)
{
    int iop = op;
    switch (iop) {
    case CAIRO_OPERATOR_OVER:
    case CAIRO_OPERATOR_SOURCE:
    case CAIRO_OPERATOR_ADD:
 return TRUE;
    default:
 return FALSE;
    }
}

static cairo_bool_t
reduce_alpha_op (cairo_composite_rectangles_t *extents)
{
    cairo_surface_t *dst = extents->surface;
    cairo_operator_t op = extents->op;
    const cairo_pattern_t *pattern = &extents->source_pattern.base;
    return dst->is_clear &&
    dst->content == CAIRO_CONTENT_ALPHA &&
    _cairo_pattern_is_opaque_solid (pattern) &&
    can_reduce_alpha_op (op);
}

static cairo_status_t
fixup_unbounded_with_mask (const cairo_traps_compositor_t *compositor,
      const cairo_composite_rectangles_t *extents)
{
    cairo_surface_t *dst = extents->surface;
    cairo_surface_t *mask;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    /* XXX can we avoid querying the clip surface again? */
    mask = traps_get_clip_surface (compositor, extents, &extents->unbounded);
    if (unlikely (mask->status))
 return mask->status;

    /* top */
    if (extents->bounded.y != extents->unbounded.y) {
 int x = extents->unbounded.x;
 int y = extents->unbounded.y;
 int width = extents->unbounded.width;
 int height = extents->bounded.y - y;

 compositor->composite (dst, CAIRO_OPERATOR_DEST_OUT, mask, NULL,
          0, 0,
          0, 0,
          x, y,
          width, height);
    }

    /* left */
    if (extents->bounded.x != extents->unbounded.x) {
 int x = extents->unbounded.x;
 int y = extents->bounded.y;
 int width = extents->bounded.x - x;
 int height = extents->bounded.height;

 compositor->composite (dst, CAIRO_OPERATOR_DEST_OUT, mask, NULL,
          0, y - extents->unbounded.y,
          0, 0,
          x, y,
          width, height);
    }

    /* right */
    if (extents->bounded.x + extents->bounded.width != extents->unbounded.x + extents->unbounded.width) {
 int x = extents->bounded.x + extents->bounded.width;
 int y = extents->bounded.y;
 int width = extents->unbounded.x + extents->unbounded.width - x;
 int height = extents->bounded.height;

 compositor->composite (dst, CAIRO_OPERATOR_DEST_OUT, mask, NULL,
          x - extents->unbounded.x, y - extents->unbounded.y,
          0, 0,
          x, y,
          width, height);
    }

    /* bottom */
    if (extents->bounded.y + extents->bounded.height != extents->unbounded.y + extents->unbounded.height) {
 int x = extents->unbounded.x;
 int y = extents->bounded.y + extents->bounded.height;
 int width = extents->unbounded.width;
 int height = extents->unbounded.y + extents->unbounded.height - y;

 compositor->composite (dst, CAIRO_OPERATOR_DEST_OUT, mask, NULL,
          0, y - extents->unbounded.y,
          0, 0,
          x, y,
          width, height);
    }

    cairo_surface_destroy (mask);

    return CAIRO_STATUS_SUCCESS;
}

static void
add_rect (cairo_boxes_t *boxes, int x1, int y1, int x2, int y2)
{
    cairo_box_t box;
    cairo_int_status_t status;

    box.p1.x = _cairo_fixed_from_int (x1);
    box.p1.y = _cairo_fixed_from_int (y1);
    box.p2.x = _cairo_fixed_from_int (x2);
    box.p2.y = _cairo_fixed_from_int (y2);

    status = _cairo_boxes_add (boxes, CAIRO_ANTIALIAS_DEFAULT, &box);
    assert (status == CAIRO_INT_STATUS_SUCCESS);
}

static cairo_status_t
fixup_unbounded (const cairo_traps_compositor_t *compositor,
   cairo_composite_rectangles_t *extents,
   cairo_boxes_t *boxes)
{
    cairo_surface_t *dst = extents->surface;
    cairo_boxes_t clear, tmp;
    cairo_box_t box;
    cairo_int_status_t status;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    if (extents->bounded.width  == extents->unbounded.width &&
 extents->bounded.height == extents->unbounded.height)
    {
 return CAIRO_STATUS_SUCCESS;
    }

    assert (extents->clip->path == NULL);

    /* subtract the drawn boxes from the unbounded area */
    _cairo_boxes_init (&clear);

    box.p1.x = _cairo_fixed_from_int (extents->unbounded.x + extents->unbounded.width);
    box.p1.y = _cairo_fixed_from_int (extents->unbounded.y);
    box.p2.x = _cairo_fixed_from_int (extents->unbounded.x);
    box.p2.y = _cairo_fixed_from_int (extents->unbounded.y + extents->unbounded.height);

    if (boxes == NULL) {
 if (extents->bounded.width == 0 || extents->bounded.height == 0) {
     goto empty;
 } else {
     /* top */
     if (extents->bounded.y != extents->unbounded.y) {
  add_rect (&clear,
     extents->unbounded.x, extents->unbounded.y,
     extents->unbounded.x + extents->unbounded.width,
     extents->bounded.y);
     }
     /* left */
     if (extents->bounded.x != extents->unbounded.x) {
  add_rect (&clear,
     extents->unbounded.x, extents->bounded.y,
     extents->bounded.x,
     extents->bounded.y + extents->bounded.height);
     }
     /* right */
     if (extents->bounded.x + extents->bounded.width != extents->unbounded.x + extents->unbounded.width) {
  add_rect (&clear,
     extents->bounded.x + extents->bounded.width,
     extents->bounded.y,
     extents->unbounded.x + extents->unbounded.width,
     extents->bounded.y + extents->bounded.height);
     }
     /* bottom */
     if (extents->bounded.y + extents->bounded.height != extents->unbounded.y + extents->unbounded.height) {
  add_rect (&clear,
     extents->unbounded.x,
     extents->bounded.y + extents->bounded.height,
     extents->unbounded.x + extents->unbounded.width,
     extents->unbounded.y + extents->unbounded.height);
     }
 }
    } else if (boxes->num_boxes) {
 _cairo_boxes_init (&tmp);

 assert (boxes->is_pixel_aligned);

 status = _cairo_boxes_add (&tmp, CAIRO_ANTIALIAS_DEFAULT, &box);
 assert (status == CAIRO_INT_STATUS_SUCCESS);

 tmp.chunks.next = &boxes->chunks;
 tmp.num_boxes += boxes->num_boxes;

 status = _cairo_bentley_ottmann_tessellate_boxes (&tmp,
         CAIRO_FILL_RULE_WINDING,
         &clear);
 tmp.chunks.next = NULL;
 if (unlikely (status))
     goto error;
    } else {
empty:
 box.p1.x = _cairo_fixed_from_int (extents->unbounded.x);
 box.p2.x = _cairo_fixed_from_int (extents->unbounded.x + extents->unbounded.width);

 status = _cairo_boxes_add (&clear, CAIRO_ANTIALIAS_DEFAULT, &box);
 assert (status == CAIRO_INT_STATUS_SUCCESS);
    }

    /* Now intersect with the clip boxes */
    if (extents->clip->num_boxes) {
 _cairo_boxes_init_for_array (&tmp,
         extents->clip->boxes,
         extents->clip->num_boxes);
 status = _cairo_boxes_intersect (&clear, &tmp, &clear);
 if (unlikely (status))
     goto error;
    }

    status = compositor->fill_boxes (dst,
         CAIRO_OPERATOR_CLEAR,
         CAIRO_COLOR_TRANSPARENT,
         &clear);

error:
    _cairo_boxes_fini (&clear);
    return status;
}

enum {
    NEED_CLIP_REGION = 0x1,
    NEED_CLIP_SURFACE = 0x2,
    FORCE_CLIP_REGION = 0x4,
};

static cairo_bool_t
need_bounded_clip (cairo_composite_rectangles_t *extents)
{
    unsigned int flags = 0;

    if (extents->clip->num_boxes > 1 ||
 extents->mask.width > extents->unbounded.width ||
 extents->mask.height > extents->unbounded.height)
    {
 flags |= NEED_CLIP_REGION;
    }

    if (extents->clip->num_boxes > 1 ||
 extents->mask.width > extents->bounded.width ||
 extents->mask.height > extents->bounded.height)
    {
 flags |= FORCE_CLIP_REGION;
    }

    if (! _cairo_clip_is_region (extents->clip))
 flags |= NEED_CLIP_SURFACE;

    return flags;
}

static cairo_bool_t
need_unbounded_clip (cairo_composite_rectangles_t *extents)
{
    unsigned int flags = 0;
    if (! extents->is_bounded) {
 flags |= NEED_CLIP_REGION;
 if (! _cairo_clip_is_region (extents->clip))
     flags |= NEED_CLIP_SURFACE;
    }
    if (extents->clip->path != NULL)
 flags |= NEED_CLIP_SURFACE;
    return flags;
}

static cairo_status_t
clip_and_composite (const cairo_traps_compositor_t *compositor,
      cairo_composite_rectangles_t *extents,
      draw_func_t   draw_func,
      draw_func_t   mask_func,
      void  *draw_closure,
      unsigned int need_clip)
{
    cairo_surface_t *dst = extents->surface;
    cairo_operator_t op = extents->op;
    cairo_pattern_t *source = &extents->source_pattern.base;
    cairo_surface_t *src;
    int src_x, src_y;
    cairo_region_t *clip_region = NULL;
    cairo_status_t status = CAIRO_STATUS_SUCCESS;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    if (reduce_alpha_op (extents)) {
 op = CAIRO_OPERATOR_ADD;
 source = NULL;
    }

    if (op == CAIRO_OPERATOR_CLEAR) {
 op = CAIRO_OPERATOR_DEST_OUT;
 source = NULL;
    }

    compositor->acquire (dst);

    if (need_clip & NEED_CLIP_REGION) {
 const cairo_rectangle_int_t *limit;

 if ((need_clip & FORCE_CLIP_REGION) == 0)
     limit = &extents->unbounded;
 else
     limit = &extents->destination;

 clip_region = _cairo_clip_get_region (extents->clip);
 if (clip_region != NULL &&
     cairo_region_contains_rectangle (clip_region,
          limit) == CAIRO_REGION_OVERLAP_IN)
     clip_region = NULL;

 if (clip_region != NULL) {
     status = compositor->set_clip_region (dst, clip_region);
     if (unlikely (status)) {
  compositor->release (dst);
  return status;
     }
 }
    }

    if (extents->bounded.width == 0 || extents->bounded.height == 0)
 goto skip;

    src = compositor->pattern_to_surface (dst, source, FALSE,
       &extents->bounded,
       &extents->source_sample_area,
       &src_x, &src_y);
    if (unlikely (status = src->status))
 goto error;

    if (op == CAIRO_OPERATOR_SOURCE) {
 status = clip_and_composite_source (compositor, dst,
         draw_func, mask_func, draw_closure,
         src, src_x, src_y,
         extents);
    } else {
 if (need_clip & NEED_CLIP_SURFACE) {
     if (extents->is_bounded) {
  status = clip_and_composite_with_mask (compositor, extents,
             draw_func, mask_func,
             draw_closure,
             op, src, src_x, src_y);
     } else {
  status = clip_and_composite_combine (compositor, extents,
           draw_func, draw_closure,
           op, src, src_x, src_y);
     }
 } else {
     status = draw_func (compositor,
    dst, draw_closure,
    op, src, src_x, src_y,
    0, 0,
    &extents->bounded,
    extents->clip);
 }
    }
    cairo_surface_destroy (src);

skip:
    if (status == CAIRO_STATUS_SUCCESS && ! extents->is_bounded) {
 if (need_clip & NEED_CLIP_SURFACE)
     status = fixup_unbounded_with_mask (compositor, extents);
 else
     status = fixup_unbounded (compositor, extents, NULL);
    }

error:
    if (clip_region)
 compositor->set_clip_region (dst, NULL);

    compositor->release (dst);

    return status;
}

/* meta-ops */

typedef struct {
    cairo_traps_t traps;
    cairo_antialias_t antialias;
} composite_traps_info_t;

static cairo_int_status_t
composite_traps (const cairo_traps_compositor_t *compositor,
   cairo_surface_t  *dst,
   void     *closure,
   cairo_operator_t   op,
   cairo_surface_t  *src,
   int src_x, int src_y,
   int dst_x, int dst_y,
   const cairo_rectangle_int_t *extents,
   cairo_clip_t   *clip)
{
    composite_traps_info_t *info = closure;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    return compositor->composite_traps (dst, op, src,
     src_x - dst_x, src_y - dst_y,
     dst_x, dst_y,
     extents,
     info->antialias, &info->traps);
}

typedef struct {
    cairo_tristrip_t strip;
    cairo_antialias_t antialias;
} composite_tristrip_info_t;

static cairo_int_status_t
composite_tristrip (const cairo_traps_compositor_t *compositor,
      cairo_surface_t  *dst,
      void     *closure,
      cairo_operator_t   op,
      cairo_surface_t  *src,
      int src_x, int src_y,
      int dst_x, int dst_y,
      const cairo_rectangle_int_t *extents,
      cairo_clip_t   *clip)
{
    composite_tristrip_info_t *info = closure;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    return compositor->composite_tristrip (dst, op, src,
        src_x - dst_x, src_y - dst_y,
        dst_x, dst_y,
        extents,
        info->antialias, &info->strip);
}

static cairo_bool_t
is_recording_pattern (const cairo_pattern_t *pattern)
{
    cairo_surface_t *surface;

    if (pattern->type != CAIRO_PATTERN_TYPE_SURFACE)
 return FALSE;

    surface = ((const cairo_surface_pattern_t *) pattern)->surface;
    surface = _cairo_surface_get_source (surface, NULL);
    return _cairo_surface_is_recording (surface);
}

static cairo_surface_t *
recording_pattern_get_surface (const cairo_pattern_t *pattern)
{
    cairo_surface_t *surface;

    surface = ((const cairo_surface_pattern_t *) pattern)->surface;
    return _cairo_surface_get_source (surface, NULL);
}

static cairo_bool_t
recording_pattern_contains_sample (const cairo_pattern_t *pattern,
       const cairo_rectangle_int_t *sample)
{
    cairo_recording_surface_t *surface;

    if (! is_recording_pattern (pattern))
 return FALSE;

    if (pattern->extend == CAIRO_EXTEND_NONE)
 return TRUE;

    surface = (cairo_recording_surface_t *) recording_pattern_get_surface (pattern);
    if (surface->unbounded)
 return TRUE;

    return _cairo_rectangle_contains_rectangle (&surface->extents, sample);
}

static cairo_bool_t
op_reduces_to_source (cairo_composite_rectangles_t *extents)
{
    if (extents->op == CAIRO_OPERATOR_SOURCE)
 return TRUE;

    if (extents->surface->is_clear)
 return extents->op == CAIRO_OPERATOR_OVER || extents->op == CAIRO_OPERATOR_ADD;

    return FALSE;
}

static cairo_status_t
composite_aligned_boxes (const cairo_traps_compositor_t *compositor,
    cairo_composite_rectangles_t *extents,
    cairo_boxes_t *boxes)
{
    cairo_surface_t *dst = extents->surface;
    cairo_operator_t op = extents->op;
    cairo_bool_t need_clip_mask = ! _cairo_clip_is_region (extents->clip);
    cairo_bool_t op_is_source;
    cairo_status_t status;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    if (need_clip_mask &&
 (! extents->is_bounded || extents->op == CAIRO_OPERATOR_SOURCE))
    {
 return CAIRO_INT_STATUS_UNSUPPORTED;
    }

    op_is_source = op_reduces_to_source (extents);

    /* Are we just copying a recording surface? */
    if (! need_clip_mask && op_is_source &&
 recording_pattern_contains_sample (&extents->source_pattern.base,
        &extents->source_sample_area))
    {
 cairo_clip_t *recording_clip;
 const cairo_pattern_t *source = &extents->source_pattern.base;
 const cairo_matrix_t *m;
 cairo_matrix_t matrix;

 /* XXX could also do tiling repeat modes... */

 /* first clear the area about to be overwritten */
 if (! dst->is_clear) {
     status = compositor->acquire (dst);
     if (unlikely (status))
  return status;

     status = compositor->fill_boxes (dst,
          CAIRO_OPERATOR_CLEAR,
          CAIRO_COLOR_TRANSPARENT,
          boxes);
     compositor->release (dst);
     if (unlikely (status))
  return status;
 }

 m = &source->matrix;
 if (_cairo_surface_has_device_transform (dst)) {
     cairo_matrix_multiply (&matrix,
       &source->matrix,
       &dst->device_transform);
     m = &matrix;
 }

 recording_clip = _cairo_clip_from_boxes (boxes);
 status = _cairo_recording_surface_replay_with_clip (recording_pattern_get_surface (source),
           m, dst, recording_clip);
 _cairo_clip_destroy (recording_clip);

 return status;
    }

    status = compositor->acquire (dst);
    if (unlikely (status))
 return status;

    if (! need_clip_mask &&
 (op == CAIRO_OPERATOR_CLEAR ||
  extents->source_pattern.base.type == CAIRO_PATTERN_TYPE_SOLID))
    {
 const cairo_color_t *color;

 if (op == CAIRO_OPERATOR_CLEAR) {
     color = CAIRO_COLOR_TRANSPARENT;
 } else {
     color = &((cairo_solid_pattern_t *) &extents->source_pattern)->color;
     if (op_is_source)
  op = CAIRO_OPERATOR_SOURCE;
 }

 status = compositor->fill_boxes (dst, op, color, boxes);
    }
    else
    {
 cairo_surface_t *src, *mask = NULL;
 cairo_pattern_t *source = &extents->source_pattern.base;
 int src_x, src_y;
 int mask_x = 0, mask_y = 0;

 if (need_clip_mask) {
     mask = traps_get_clip_surface (compositor,
        extents, &extents->bounded);
     if (unlikely (mask->status))
  return mask->status;

     mask_x = -extents->bounded.x;
     mask_y = -extents->bounded.y;

     if (op == CAIRO_OPERATOR_CLEAR) {
  source = NULL;
  op = CAIRO_OPERATOR_DEST_OUT;
     }
 } else if (op_is_source)
     op = CAIRO_OPERATOR_SOURCE;

 src = compositor->pattern_to_surface (dst, source, FALSE,
           &extents->bounded,
           &extents->source_sample_area,
           &src_x, &src_y);
 if (likely (src->status == CAIRO_STATUS_SUCCESS)) {
     status = compositor->composite_boxes (dst, op, src, mask,
        src_x, src_y,
        mask_x, mask_y,
        0, 0,
        boxes, &extents->bounded);
     cairo_surface_destroy (src);
 } else
     status = src->status;

 cairo_surface_destroy (mask);
    }

    if (status == CAIRO_STATUS_SUCCESS && ! extents->is_bounded)
 status = fixup_unbounded (compositor, extents, boxes);

    compositor->release (dst);

    return status;
}

static cairo_status_t
upload_boxes (const cairo_traps_compositor_t *compositor,
       cairo_composite_rectangles_t *extents,
       cairo_boxes_t *boxes)
{
    cairo_surface_t *dst = extents->surface;
    const cairo_pattern_t *source = &extents->source_pattern.base;
    cairo_surface_t *src;
    cairo_rectangle_int_t limit;
    cairo_int_status_t status;
    int tx, ty;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    src = _cairo_pattern_get_source((cairo_surface_pattern_t *)source,
        &limit);
    if (!(src->type == CAIRO_SURFACE_TYPE_IMAGE || src->type == dst->type))
 return CAIRO_INT_STATUS_UNSUPPORTED;

    if (! _cairo_matrix_is_integer_translation (&source->matrix, &tx, &ty))
 return CAIRO_INT_STATUS_UNSUPPORTED;

    /* Check that the data is entirely within the image */
    if (extents->bounded.x + tx < limit.x || extents->bounded.y + ty < limit.y)
 return CAIRO_INT_STATUS_UNSUPPORTED;

    if (extents->bounded.x + extents->bounded.width  + tx > limit.x + limit.width ||
 extents->bounded.y + extents->bounded.height + ty > limit.y + limit.height)
 return CAIRO_INT_STATUS_UNSUPPORTED;

    tx += limit.x;
    ty += limit.y;

    if (src->type == CAIRO_SURFACE_TYPE_IMAGE)
 status = compositor->draw_image_boxes (dst,
            (cairo_image_surface_t *)src,
            boxes, tx, ty);
    else
 status = compositor->copy_boxes (dst, src, boxes, &extents->bounded,
      tx, ty);

    return status;
}

static cairo_int_status_t
trim_extents_to_traps (cairo_composite_rectangles_t *extents,
         cairo_traps_t *traps)
{
    cairo_box_t box;

    _cairo_traps_extents (traps, &box);
    return _cairo_composite_rectangles_intersect_mask_extents (extents, &box);
}

static cairo_int_status_t
trim_extents_to_tristrip (cairo_composite_rectangles_t *extents,
     cairo_tristrip_t *strip)
{
    cairo_box_t box;

    _cairo_tristrip_extents (strip, &box);
    return _cairo_composite_rectangles_intersect_mask_extents (extents, &box);
}

static cairo_int_status_t
trim_extents_to_boxes (cairo_composite_rectangles_t *extents,
         cairo_boxes_t *boxes)
{
    cairo_box_t box;

    _cairo_boxes_extents (boxes, &box);
    return _cairo_composite_rectangles_intersect_mask_extents (extents, &box);
}

static cairo_int_status_t
boxes_for_traps (cairo_boxes_t *boxes,
   cairo_traps_t *traps,
   cairo_antialias_t antialias)
{
    int i, j;

    /* first check that the traps are rectilinear */
    if (antialias == CAIRO_ANTIALIAS_NONE) {
 for (i = 0; i < traps->num_traps; i++) {
     const cairo_trapezoid_t *t = &traps->traps[i];
     if (_cairo_fixed_integer_round_down (t->left.p1.x) !=
  _cairo_fixed_integer_round_down (t->left.p2.x) ||
  _cairo_fixed_integer_round_down (t->right.p1.x) !=
  _cairo_fixed_integer_round_down (t->right.p2.x))
     {
  return CAIRO_INT_STATUS_UNSUPPORTED;
     }
 }
    } else {
 for (i = 0; i < traps->num_traps; i++) {
     const cairo_trapezoid_t *t = &traps->traps[i];
     if (t->left.p1.x != t->left.p2.x || t->right.p1.x != t->right.p2.x)
  return CAIRO_INT_STATUS_UNSUPPORTED;
 }
    }

    _cairo_boxes_init (boxes);

    boxes->chunks.base  = (cairo_box_t *) traps->traps;
    boxes->chunks.size  = traps->num_traps;

    if (antialias != CAIRO_ANTIALIAS_NONE) {
 for (i = j = 0; i < traps->num_traps; i++) {
     /* Note the traps and boxes alias so we need to take the local copies first. */
     cairo_fixed_t x1 = traps->traps[i].left.p1.x;
     cairo_fixed_t x2 = traps->traps[i].right.p1.x;
     cairo_fixed_t y1 = traps->traps[i].top;
     cairo_fixed_t y2 = traps->traps[i].bottom;

     if (x1 == x2 || y1 == y2)
      continue;

     boxes->chunks.base[j].p1.x = x1;
     boxes->chunks.base[j].p1.y = y1;
     boxes->chunks.base[j].p2.x = x2;
     boxes->chunks.base[j].p2.y = y2;
     j++;

     if (boxes->is_pixel_aligned) {
  boxes->is_pixel_aligned =
      _cairo_fixed_is_integer (x1) && _cairo_fixed_is_integer (y1) &&
      _cairo_fixed_is_integer (x2) && _cairo_fixed_is_integer (y2);
     }
 }
    } else {
 boxes->is_pixel_aligned = TRUE;

 for (i = j = 0; i < traps->num_traps; i++) {
     /* Note the traps and boxes alias so we need to take the local copies first. */
     cairo_fixed_t x1 = traps->traps[i].left.p1.x;
     cairo_fixed_t x2 = traps->traps[i].right.p1.x;
     cairo_fixed_t y1 = traps->traps[i].top;
     cairo_fixed_t y2 = traps->traps[i].bottom;

     /* round down here to match Pixman's behavior when using traps. */
     boxes->chunks.base[j].p1.x = _cairo_fixed_round_down (x1);
     boxes->chunks.base[j].p1.y = _cairo_fixed_round_down (y1);
     boxes->chunks.base[j].p2.x = _cairo_fixed_round_down (x2);
     boxes->chunks.base[j].p2.y = _cairo_fixed_round_down (y2);
     j += (boxes->chunks.base[j].p1.x != boxes->chunks.base[j].p2.x &&
    boxes->chunks.base[j].p1.y != boxes->chunks.base[j].p2.y);
 }
    }
    boxes->chunks.count = j;
    boxes->num_boxes    = j;

    return CAIRO_INT_STATUS_SUCCESS;
}

static cairo_status_t
clip_and_composite_boxes (const cairo_traps_compositor_t *compositor,
     cairo_composite_rectangles_t *extents,
     cairo_boxes_t *boxes);

static cairo_status_t
clip_and_composite_polygon (const cairo_traps_compositor_t *compositor,
       cairo_composite_rectangles_t *extents,
       cairo_polygon_t *polygon,
       cairo_antialias_t antialias,
       cairo_fill_rule_t fill_rule,
       cairo_bool_t curvy)
{
    composite_traps_info_t traps;
    cairo_surface_t *dst = extents->surface;
    cairo_bool_t clip_surface = ! _cairo_clip_is_region (extents->clip);
    cairo_int_status_t status;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    if (polygon->num_edges == 0) {
 status = CAIRO_INT_STATUS_SUCCESS;

 if (! extents->is_bounded) {
     cairo_region_t *clip_region = _cairo_clip_get_region (extents->clip);

     if (clip_region &&
  cairo_region_contains_rectangle (clip_region,
       &extents->unbounded) == CAIRO_REGION_OVERLAP_IN)
  clip_region = NULL;

     if (clip_region != NULL) {
  status = compositor->set_clip_region (dst, clip_region);
  if (unlikely (status))
      return status;
     }

     if (clip_surface)
  status = fixup_unbounded_with_mask (compositor, extents);
     else
  status = fixup_unbounded (compositor, extents, NULL);

     if (clip_region != NULL)
  compositor->set_clip_region (dst, NULL);
 }

 return status;
    }

    if (extents->clip->path != NULL && extents->is_bounded) {
 cairo_polygon_t clipper;
 cairo_fill_rule_t clipper_fill_rule;
 cairo_antialias_t clipper_antialias;

 status = _cairo_clip_get_polygon (extents->clip,
       &clipper,
       &clipper_fill_rule,
       &clipper_antialias);
 if (likely (status == CAIRO_INT_STATUS_SUCCESS)) {
     if (clipper_antialias == antialias) {
  status = _cairo_polygon_intersect (polygon, fill_rule,
         &clipper, clipper_fill_rule);
  if (likely (status == CAIRO_INT_STATUS_SUCCESS)) {
      cairo_clip_t * clip = _cairo_clip_copy_region (extents->clip);
      _cairo_clip_destroy (extents->clip);
      extents->clip = clip;

      fill_rule = CAIRO_FILL_RULE_WINDING;
  }
  _cairo_polygon_fini (&clipper);
     }
 }
    }

    if (antialias == CAIRO_ANTIALIAS_NONE && curvy) {
 cairo_boxes_t boxes;

 _cairo_boxes_init (&boxes);
 status = _cairo_rasterise_polygon_to_boxes (polygon, fill_rule, &boxes);
 if (likely (status == CAIRO_INT_STATUS_SUCCESS)) {
     assert (boxes.is_pixel_aligned);
     status = clip_and_composite_boxes (compositor, extents, &boxes);
 }
 _cairo_boxes_fini (&boxes);
 if ((status != CAIRO_INT_STATUS_UNSUPPORTED))
     return status;
    }

    _cairo_traps_init (&traps.traps);

    if (antialias == CAIRO_ANTIALIAS_NONE && curvy) {
 status = _cairo_rasterise_polygon_to_traps (polygon, fill_rule, antialias, &traps.traps);
    } else {
 status = _cairo_bentley_ottmann_tessellate_polygon (&traps.traps, polygon, fill_rule);
    }
    if (unlikely (status))
 goto CLEANUP_TRAPS;

    status = trim_extents_to_traps (extents, &traps.traps);
    if (unlikely (status))
 goto CLEANUP_TRAPS;

    /* Use a fast path if the trapezoids consist of a set of boxes.  */
    status = CAIRO_INT_STATUS_UNSUPPORTED;
    if (1) {
 cairo_boxes_t boxes;

 status = boxes_for_traps (&boxes, &traps.traps, antialias);
 if (status == CAIRO_INT_STATUS_SUCCESS) {
     status = clip_and_composite_boxes (compositor, extents, &boxes);
     /* XXX need to reconstruct the traps! */
     assert (status != CAIRO_INT_STATUS_UNSUPPORTED);
 }
    }
    if (status == CAIRO_INT_STATUS_UNSUPPORTED) {
 /* Otherwise render the trapezoids to a mask and composite in the usual
 * fashion.
 */
 unsigned int flags = 0;

 /* For unbounded operations, the X11 server will estimate the
 * affected rectangle and apply the operation to that. However,
 * there are cases where this is an overestimate (e.g. the
 * clip-fill-{eo,nz}-unbounded test).
 *
 * The clip will trim that overestimate to our expectations.
 */
 if (! extents->is_bounded)
     flags |= FORCE_CLIP_REGION;

 traps.antialias = antialias;
 status = clip_and_composite (compositor, extents,
         composite_traps, NULL, &traps,
         need_unbounded_clip (extents) | flags);
    }

CLEANUP_TRAPS:
    _cairo_traps_fini (&traps.traps);

    return status;
}

struct composite_opacity_info {
    const cairo_traps_compositor_t *compositor;
    uint8_t op;
    cairo_surface_t *dst;
    cairo_surface_t *src;
    int src_x, src_y;
    double opacity;
};

static void composite_opacity(void *closure,
         int16_t x, int16_t y,
         int16_t w, int16_t h,
         uint16_t coverage)
{
    struct composite_opacity_info *info = closure;
    const cairo_traps_compositor_t *compositor = info->compositor;
    cairo_surface_t *mask;
    int mask_x, mask_y;
    cairo_color_t color;
    cairo_solid_pattern_t solid;

    _cairo_color_init_rgba (&color, 0, 0, 0, info->opacity * coverage);
    _cairo_pattern_init_solid (&solid, &color);
    mask = compositor->pattern_to_surface (info->dst, &solid.base, TRUE,
        &_cairo_unbounded_rectangle,
        &_cairo_unbounded_rectangle,
        &mask_x, &mask_y);
    if (likely (mask->status == CAIRO_STATUS_SUCCESS)) {
 if (info->src) {
     compositor->composite (info->dst, info->op, info->src, mask,
       x + info->src_x,  y + info->src_y,
       mask_x,           mask_y,
       x,                y,
       w,                h);
 } else {
     compositor->composite (info->dst, info->op, mask, NULL,
       mask_x,            mask_y,
       0,                 0,
       x,                 y,
       w,                 h);
 }
    }

    cairo_surface_destroy (mask);
}


static cairo_int_status_t
composite_opacity_boxes (const cairo_traps_compositor_t *compositor,
    cairo_surface_t  *dst,
    void    *closure,
    cairo_operator_t   op,
    cairo_surface_t  *src,
    int     src_x,
    int     src_y,
    int     dst_x,
    int     dst_y,
    const cairo_rectangle_int_t *extents,
    cairo_clip_t   *clip)
{
    const cairo_solid_pattern_t *mask = closure;
    struct composite_opacity_info info;
    int i;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    info.compositor = compositor;
    info.op = op;
    info.dst = dst;

    info.src = src;
    info.src_x = src_x;
    info.src_y = src_y;

    info.opacity = mask->color.alpha / (double) 0xffff;

    /* XXX for lots of boxes create a clip region for the fully opaque areas */
    for (i = 0; i < clip->num_boxes; i++)
 do_unaligned_box(composite_opacity, &info,
    &clip->boxes[i], dst_x, dst_y);

    return CAIRO_STATUS_SUCCESS;
}

static cairo_int_status_t
composite_boxes (const cairo_traps_compositor_t *compositor,
   cairo_surface_t  *dst,
   void    *closure,
   cairo_operator_t   op,
   cairo_surface_t  *src,
   int     src_x,
   int     src_y,
   int     dst_x,
   int     dst_y,
   const cairo_rectangle_int_t *extents,
   cairo_clip_t   *clip)
{
    cairo_traps_t traps;
    cairo_status_t status;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    status = _cairo_traps_init_boxes (&traps, closure);
    if (unlikely (status))
 return status;

    status = compositor->composite_traps (dst, op, src,
       src_x - dst_x, src_y - dst_y,
       dst_x, dst_y,
       extents,
       CAIRO_ANTIALIAS_DEFAULT, &traps);
    _cairo_traps_fini (&traps);

    return status;
}

static cairo_status_t
clip_and_composite_boxes (const cairo_traps_compositor_t *compositor,
     cairo_composite_rectangles_t *extents,
     cairo_boxes_t *boxes)
{
    cairo_int_status_t status;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    if (boxes->num_boxes == 0 && extents->is_bounded)
 return CAIRO_STATUS_SUCCESS;

    status = trim_extents_to_boxes (extents, boxes);
    if (unlikely (status))
 return status;

    if (boxes->is_pixel_aligned && extents->clip->path == NULL &&
 extents->source_pattern.base.type == CAIRO_PATTERN_TYPE_SURFACE &&
 (op_reduces_to_source (extents) ||
  (extents->op == CAIRO_OPERATOR_OVER &&
   (extents->source_pattern.surface.surface->content & CAIRO_CONTENT_ALPHA) == 0)))
    {
 status = upload_boxes (compositor, extents, boxes);
 if (status != CAIRO_INT_STATUS_UNSUPPORTED)
     return status;
    }

    /* Can we reduce drawing through a clip-mask to simply drawing the clip? */
    if (extents->clip->path != NULL && extents->is_bounded) {
 cairo_polygon_t polygon;
 cairo_fill_rule_t fill_rule;
 cairo_antialias_t antialias;
 cairo_clip_t *clip;

 clip = _cairo_clip_copy (extents->clip);
 clip = _cairo_clip_intersect_boxes (clip, boxes);
 if (_cairo_clip_is_all_clipped (clip))
     return CAIRO_INT_STATUS_NOTHING_TO_DO;

 status = _cairo_clip_get_polygon (clip, &polygon,
       &fill_rule, &antialias);
 _cairo_clip_path_destroy (clip->path);
 clip->path = NULL;
 if (likely (status == CAIRO_INT_STATUS_SUCCESS)) {
     cairo_clip_t *saved_clip = extents->clip;
     extents->clip = clip;

     status = clip_and_composite_polygon (compositor, extents, &polygon,
       antialias, fill_rule, FALSE);

     clip = extents->clip;
     extents->clip = saved_clip;

     _cairo_polygon_fini (&polygon);
 }
 _cairo_clip_destroy (clip);

 if (status != CAIRO_INT_STATUS_UNSUPPORTED)
     return status;
    }

    /* Use a fast path if the boxes are pixel aligned (or nearly aligned!) */
    if (boxes->is_pixel_aligned) {
 status = composite_aligned_boxes (compositor, extents, boxes);
 if (status != CAIRO_INT_STATUS_UNSUPPORTED)
     return status;
    }

    return clip_and_composite (compositor, extents,
          composite_boxes, NULL, boxes,
          need_unbounded_clip (extents));
}

static cairo_int_status_t
composite_traps_as_boxes (const cairo_traps_compositor_t *compositor,
     cairo_composite_rectangles_t *extents,
     composite_traps_info_t *info)
{
    cairo_boxes_t boxes;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    if (! _cairo_traps_to_boxes (&info->traps, info->antialias, &boxes))
 return CAIRO_INT_STATUS_UNSUPPORTED;

    return clip_and_composite_boxes (compositor, extents, &boxes);
}

static cairo_int_status_t
clip_and_composite_traps (const cairo_traps_compositor_t *compositor,
     cairo_composite_rectangles_t *extents,
     composite_traps_info_t *info,
     unsigned flags)
{
    cairo_int_status_t status;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    status = trim_extents_to_traps (extents, &info->traps);
    if (unlikely (status != CAIRO_INT_STATUS_SUCCESS))
 return status;

    status = CAIRO_INT_STATUS_UNSUPPORTED;
    if ((flags & FORCE_CLIP_REGION) == 0)
 status = composite_traps_as_boxes (compositor, extents, info);
    if (status == CAIRO_INT_STATUS_UNSUPPORTED) {
 /* For unbounded operations, the X11 server will estimate the
 * affected rectangle and apply the operation to that. However,
 * there are cases where this is an overestimate (e.g. the
 * clip-fill-{eo,nz}-unbounded test).
 *
 * The clip will trim that overestimate to our expectations.
 */
 if (! extents->is_bounded)
     flags |= FORCE_CLIP_REGION;

 status = clip_and_composite (compositor, extents,
         composite_traps, NULL, info,
         need_unbounded_clip (extents) | flags);
    }

    return status;
}

static cairo_int_status_t
clip_and_composite_tristrip (const cairo_traps_compositor_t *compositor,
        cairo_composite_rectangles_t *extents,
        composite_tristrip_info_t *info)
{
    cairo_int_status_t status;
    unsigned int flags = 0;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    status = trim_extents_to_tristrip (extents, &info->strip);
    if (unlikely (status != CAIRO_INT_STATUS_SUCCESS))
 return status;

    if (! extents->is_bounded)
 flags |= FORCE_CLIP_REGION;

    status = clip_and_composite (compositor, extents,
     composite_tristrip, NULL, info,
     need_unbounded_clip (extents) | flags);

    return status;
}

struct composite_mask {
    cairo_surface_t *mask;
    int mask_x, mask_y;
};

static cairo_int_status_t
composite_mask (const cairo_traps_compositor_t *compositor,
  cairo_surface_t   *dst,
  void    *closure,
  cairo_operator_t   op,
  cairo_surface_t   *src,
  int     src_x,
  int     src_y,
  int     dst_x,
  int     dst_y,
  const cairo_rectangle_int_t *extents,
  cairo_clip_t   *clip)
{
    struct composite_mask *data = closure;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    if (src != NULL) {
 compositor->composite (dst, op, src, data->mask,
          extents->x + src_x, extents->y + src_y,
          extents->x + data->mask_x, extents->y + data->mask_y,
          extents->x - dst_x,  extents->y - dst_y,
          extents->width,      extents->height);
    } else {
 compositor->composite (dst, op, data->mask, NULL,
          extents->x + data->mask_x, extents->y + data->mask_y,
          0, 0,
          extents->x - dst_x,  extents->y - dst_y,
          extents->width,      extents->height);
    }

    return CAIRO_STATUS_SUCCESS;
}

struct composite_box_info {
    const cairo_traps_compositor_t *compositor;
    cairo_surface_t *dst;
    cairo_surface_t *src;
    int src_x, src_y;
    uint8_t op;
};

static void composite_box(void *closure,
     int16_t x, int16_t y,
     int16_t w, int16_t h,
     uint16_t coverage)
{
    struct composite_box_info *info = closure;
    const cairo_traps_compositor_t *compositor = info->compositor;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    if (! CAIRO_ALPHA_SHORT_IS_OPAQUE (coverage)) {
 cairo_surface_t *mask;
 cairo_color_t color;
 cairo_solid_pattern_t solid;
 int mask_x, mask_y;

 _cairo_color_init_rgba (&color, 0, 0, 0, coverage / (double)0xffff);
 _cairo_pattern_init_solid (&solid, &color);

 mask = compositor->pattern_to_surface (info->dst, &solid.base, FALSE,
            &_cairo_unbounded_rectangle,
            &_cairo_unbounded_rectangle,
            &mask_x, &mask_y);

 if (likely (mask->status == CAIRO_STATUS_SUCCESS)) {
     compositor->composite (info->dst, info->op, info->src, mask,
       x + info->src_x,  y + info->src_y,
       mask_x,           mask_y,
       x,                y,
       w,                h);
 }

 cairo_surface_destroy (mask);
    } else {
 compositor->composite (info->dst, info->op, info->src, NULL,
          x + info->src_x,  y + info->src_y,
          0,                0,
          x,                y,
          w,                h);
    }
}

static cairo_int_status_t
composite_mask_clip_boxes (const cairo_traps_compositor_t *compositor,
      cairo_surface_t  *dst,
      void    *closure,
      cairo_operator_t   op,
      cairo_surface_t  *src,
      int     src_x,
      int     src_y,
      int     dst_x,
      int     dst_y,
      const cairo_rectangle_int_t *extents,
      cairo_clip_t   *clip)
{
    struct composite_mask *data = closure;
    struct composite_box_info info;
    int i;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    info.compositor = compositor;
    info.op = CAIRO_OPERATOR_SOURCE;
    info.dst = dst;
    info.src = data->mask;
    info.src_x = data->mask_x;
    info.src_y = data->mask_y;

    info.src_x += dst_x;
    info.src_y += dst_y;

    for (i = 0; i < clip->num_boxes; i++)
 do_unaligned_box(composite_box, &info, &clip->boxes[i], dst_x, dst_y);

    return CAIRO_STATUS_SUCCESS;
}

static cairo_int_status_t
composite_mask_clip (const cairo_traps_compositor_t *compositor,
       cairo_surface_t   *dst,
       void    *closure,
       cairo_operator_t    op,
       cairo_surface_t   *src,
       int     src_x,
       int     src_y,
       int     dst_x,
       int     dst_y,
       const cairo_rectangle_int_t *extents,
       cairo_clip_t   *clip)
{
    struct composite_mask *data = closure;
    cairo_polygon_t polygon;
    cairo_fill_rule_t fill_rule;
    composite_traps_info_t info;
    cairo_status_t status;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    status = _cairo_clip_get_polygon (clip, &polygon,
          &fill_rule, &info.antialias);
    if (unlikely (status))
 return status;

    _cairo_traps_init (&info.traps);
    status = _cairo_bentley_ottmann_tessellate_polygon (&info.traps,
       &polygon,
       fill_rule);
    _cairo_polygon_fini (&polygon);
    if (unlikely (status))
 return status;

    status = composite_traps (compositor, dst, &info,
         CAIRO_OPERATOR_SOURCE,
         data->mask,
         data->mask_x + dst_x, data->mask_y + dst_y,
         dst_x, dst_y,
         extents, NULL);
    _cairo_traps_fini (&info.traps);

    return status;
}

/* high-level compositor interface */

static cairo_int_status_t
_cairo_traps_compositor_paint (const cairo_compositor_t *_compositor,
          cairo_composite_rectangles_t *extents)
{
    cairo_traps_compositor_t *compositor = (cairo_traps_compositor_t*)_compositor;
    cairo_boxes_t boxes;
    cairo_int_status_t status;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    status = compositor->check_composite (extents);
    if (unlikely (status))
 return status;

     _cairo_clip_steal_boxes (extents->clip, &boxes);
     status = clip_and_composite_boxes (compositor, extents, &boxes);
     _cairo_clip_unsteal_boxes (extents->clip, &boxes);

    return status;
}

static cairo_int_status_t
_cairo_traps_compositor_mask (const cairo_compositor_t *_compositor,
         cairo_composite_rectangles_t *extents)
{
    const cairo_traps_compositor_t *compositor = (cairo_traps_compositor_t*)_compositor;
    cairo_int_status_t status;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    status = compositor->check_composite (extents);
    if (unlikely (status))
 return status;

    if (extents->mask_pattern.base.type == CAIRO_PATTERN_TYPE_SOLID &&
 extents->clip->path == NULL) {
 status = clip_and_composite (compositor, extents,
         composite_opacity_boxes,
         composite_opacity_boxes,
         &extents->mask_pattern,
         need_unbounded_clip (extents));
    } else {
 struct composite_mask data;

 data.mask = compositor->pattern_to_surface (extents->surface,
          &extents->mask_pattern.base,
          TRUE,
          &extents->bounded,
          &extents->mask_sample_area,
          &data.mask_x,
          &data.mask_y);
 if (unlikely (data.mask->status))
     return data.mask->status;

 status = clip_and_composite (compositor, extents,
         composite_mask,
         extents->clip->path ? composite_mask_clip : composite_mask_clip_boxes,
         &data, need_bounded_clip (extents));

 cairo_surface_destroy (data.mask);
    }

    return status;
}

static cairo_int_status_t
_cairo_traps_compositor_stroke (const cairo_compositor_t *_compositor,
    cairo_composite_rectangles_t *extents,
    const cairo_path_fixed_t *path,
    const cairo_stroke_style_t *style,
    const cairo_matrix_t *ctm,
    const cairo_matrix_t *ctm_inverse,
    double    tolerance,
    cairo_antialias_t  antialias)
{
    const cairo_traps_compositor_t *compositor = (cairo_traps_compositor_t *)_compositor;
    cairo_int_status_t status;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    status = compositor->check_composite (extents);
    if (unlikely (status))
 return status;

    status = CAIRO_INT_STATUS_UNSUPPORTED;
    if (_cairo_path_fixed_stroke_is_rectilinear (path)) {
 cairo_boxes_t boxes;

 _cairo_boxes_init_with_clip (&boxes, extents->clip);
 status = _cairo_path_fixed_stroke_rectilinear_to_boxes (path,
        style,
        ctm,
        antialias,
        &boxes);
 if (likely (status == CAIRO_INT_STATUS_SUCCESS))
     status = clip_and_composite_boxes (compositor, extents, &boxes);
 _cairo_boxes_fini (&boxes);
    }

    if (status == CAIRO_INT_STATUS_UNSUPPORTED && 0 &&
 _cairo_clip_is_region (extents->clip)) /* XXX */
    {
 composite_tristrip_info_t info;

 info.antialias = antialias;
 _cairo_tristrip_init_with_clip (&info.strip, extents->clip);
 status = _cairo_path_fixed_stroke_to_tristrip (path, style,
             ctm, ctm_inverse,
             tolerance,
             &info.strip);
 if (likely (status == CAIRO_INT_STATUS_SUCCESS))
     status = clip_and_composite_tristrip (compositor, extents, &info);
 _cairo_tristrip_fini (&info.strip);
    }

    if (status == CAIRO_INT_STATUS_UNSUPPORTED &&
 path->has_curve_to && antialias == CAIRO_ANTIALIAS_NONE) {
 cairo_polygon_t polygon;

 _cairo_polygon_init_with_clip (&polygon, extents->clip);
 status = _cairo_path_fixed_stroke_to_polygon (path, style,
            ctm, ctm_inverse,
            tolerance,
            &polygon);
 if (likely (status == CAIRO_INT_STATUS_SUCCESS))
     status = clip_and_composite_polygon (compositor,
       extents, &polygon,
       CAIRO_ANTIALIAS_NONE,
       CAIRO_FILL_RULE_WINDING,
       TRUE);
 _cairo_polygon_fini (&polygon);
    }

    if (status == CAIRO_INT_STATUS_UNSUPPORTED) {
 cairo_int_status_t (*func) (const cairo_path_fixed_t *path,
        const cairo_stroke_style_t *stroke_style,
        const cairo_matrix_t *ctm,
        const cairo_matrix_t *ctm_inverse,
        double    tolerance,
        cairo_traps_t  *traps);
 composite_traps_info_t info;
 unsigned flags;

 if (antialias == CAIRO_ANTIALIAS_BEST || antialias == CAIRO_ANTIALIAS_GOOD) {
     func = _cairo_path_fixed_stroke_polygon_to_traps;
     flags = 0;
 } else {
     func = _cairo_path_fixed_stroke_to_traps;
     flags = need_bounded_clip (extents) & ~NEED_CLIP_SURFACE;
 }

 info.antialias = antialias;
 _cairo_traps_init_with_clip (&info.traps, extents->clip);
 status = func (path, style, ctm, ctm_inverse, tolerance, &info.traps);
 if (likely (status == CAIRO_INT_STATUS_SUCCESS))
     status = clip_and_composite_traps (compositor, extents, &info, flags);
 _cairo_traps_fini (&info.traps);
    }

    return status;
}

static cairo_int_status_t
_cairo_traps_compositor_fill (const cairo_compositor_t *_compositor,
         cairo_composite_rectangles_t *extents,
         const cairo_path_fixed_t *path,
         cairo_fill_rule_t   fill_rule,
         double    tolerance,
         cairo_antialias_t   antialias)
{
    const cairo_traps_compositor_t *compositor = (cairo_traps_compositor_t *)_compositor;
    cairo_int_status_t status;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    status = compositor->check_composite (extents);
    if (unlikely (status))
 return status;

    status = CAIRO_INT_STATUS_UNSUPPORTED;
    if (_cairo_path_fixed_fill_is_rectilinear (path)) {
 cairo_boxes_t boxes;

 _cairo_boxes_init_with_clip (&boxes, extents->clip);
 status = _cairo_path_fixed_fill_rectilinear_to_boxes (path,
             fill_rule,
             antialias,
             &boxes);
 if (likely (status == CAIRO_INT_STATUS_SUCCESS))
     status = clip_and_composite_boxes (compositor, extents, &boxes);
 _cairo_boxes_fini (&boxes);
    }

    if (status == CAIRO_INT_STATUS_UNSUPPORTED) {
 cairo_polygon_t polygon;

#if 0
 if (extents->mask.width  > extents->unbounded.width ||
     extents->mask.height > extents->unbounded.height)
 {
     cairo_box_t limits;
     _cairo_box_from_rectangle (&limits, &extents->unbounded);
     _cairo_polygon_init (&polygon, &limits, 1);
 }
 else
 {
     _cairo_polygon_init (&polygon, NULL, 0);
 }

 status = _cairo_path_fixed_fill_to_polygon (path, tolerance, &polygon);
 if (likely (status == CAIRO_INT_STATUS_SUCCESS)) {
     status = _cairo_polygon_intersect_with_boxes (&polygon, &fill_rule,
         extents->clip->boxes,
         extents->clip->num_boxes);
 }
#else
 _cairo_polygon_init_with_clip (&polygon, extents->clip);
 status = _cairo_path_fixed_fill_to_polygon (path, tolerance, &polygon);
#endif
 if (likely (status == CAIRO_INT_STATUS_SUCCESS)) {
     status = clip_and_composite_polygon (compositor, extents, &polygon,
       antialias, fill_rule, path->has_curve_to);
 }
 _cairo_polygon_fini (&polygon);
    }

    return status;
}

static cairo_int_status_t
composite_glyphs (const cairo_traps_compositor_t *compositor,
    cairo_surface_t *dst,
    void *closure,
    cairo_operator_t  op,
    cairo_surface_t *src,
    int src_x, int src_y,
    int dst_x, int dst_y,
    const cairo_rectangle_int_t *extents,
    cairo_clip_t  *clip)
{
    cairo_composite_glyphs_info_t *info = closure;

    TRACE ((stderr, "%s\n", __FUNCTION__));

    if (op == CAIRO_OPERATOR_ADD && (dst->content & CAIRO_CONTENT_COLOR) == 0)
 info->use_mask = 0;

    return compositor->composite_glyphs (dst, op, src,
      src_x, src_y,
--> --------------------

--> maximum size reached

--> --------------------