/* -*- Mode: c; tab-width: 8; c-basic-offset: 4; indent-tabs-mode: t; -*- */
/* cairo - a vector graphics library with display and print output
 *
 * 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):
 *	Chris Wilson <chris@chris-wilson.co.uk>
 */

#include "cairoint.h"

#include "cairo-compositor-private.h"
#include "cairo-damage-private.h"
#include "cairo-error-private.h"

cairo_int_status_t
_cairo_compositor_paint (const cairo_compositor_t	*compositor,
			 cairo_surface_t		*surface,
			 cairo_operator_t		 op,
			 const cairo_pattern_t		*source,
			 const cairo_clip_t		*clip)
{
    cairo_composite_rectangles_t extents;
    cairo_int_status_t status;
    cairo_bool_t initialized = TRUE;

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

    if (compositor->lazy_init) {
	status = _cairo_composite_rectangles_lazy_init_for_paint (&extents,
								  surface,
								  op, source,
								  clip);
	initialized = FALSE;
    }
    else
        status = _cairo_composite_rectangles_init_for_paint (&extents,
							     surface,
							     op, source,
							     clip);
    if (unlikely (status))
	return status;

    do {
	while (compositor->paint == NULL)
	    compositor = compositor->delegate;

	if (! compositor->lazy_init && ! initialized) {
	    /* XXX: we should do better instead of re-init */
	    _cairo_composite_rectangles_fini (&extents);
	    status = _cairo_composite_rectangles_init_for_paint (&extents,
								 surface,
								 op, source,
								 clip);
	    initialized = TRUE;

	    if (unlikely (status))
		return status;
	}

	status = compositor->paint (compositor, &extents);

	compositor = compositor->delegate;
    } while (status == CAIRO_INT_STATUS_UNSUPPORTED);

    if (status == CAIRO_INT_STATUS_SUCCESS && surface->damage) {
	TRACE ((stderr, "%s: applying damage (%d,%d)x(%d, %d)\n",
		__FUNCTION__,
		extents.unbounded.x, extents.unbounded.y,
		extents.unbounded.width, extents.unbounded.height));
	surface->damage = _cairo_damage_add_rectangle (surface->damage,
						       &extents.unbounded);
    }

    _cairo_composite_rectangles_fini (&extents);

    return status;
}

cairo_int_status_t
_cairo_compositor_mask (const cairo_compositor_t	*compositor,
			cairo_surface_t			*surface,
			cairo_operator_t		 op,
			const cairo_pattern_t		*source,
			const cairo_pattern_t		*mask,
			const cairo_clip_t		*clip)
{
    cairo_composite_rectangles_t extents;
    cairo_int_status_t status;
    cairo_bool_t initialized = TRUE;

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

    if (compositor->lazy_init) {
	status = _cairo_composite_rectangles_lazy_init_for_mask (&extents,
								 surface,
								 op, source,
								 mask, clip);
	initialized = FALSE;
    } else
	status = _cairo_composite_rectangles_init_for_mask (&extents,
							    surface,
							    op, source,
							    mask, clip);
    if (unlikely (status))
	return status;

    do {
	while (compositor->mask == NULL)
	    compositor = compositor->delegate;

	if (! compositor->lazy_init && ! initialized) {
	    /* XXX: we should do better instead of re-init */
	    _cairo_composite_rectangles_fini (&extents);
	    status = _cairo_composite_rectangles_init_for_mask (&extents,
								surface,
								op, source,
								mask, clip);
	    initialized = TRUE;

	    if (unlikely (status))
		return status;
	}

	status = compositor->mask (compositor, &extents);

	compositor = compositor->delegate;
    } while (status == CAIRO_INT_STATUS_UNSUPPORTED);

    if (status == CAIRO_INT_STATUS_SUCCESS && surface->damage) {
	TRACE ((stderr, "%s: applying damage (%d,%d)x(%d, %d)\n",
		__FUNCTION__,
		extents.unbounded.x, extents.unbounded.y,
		extents.unbounded.width, extents.unbounded.height));
	surface->damage = _cairo_damage_add_rectangle (surface->damage,
						       &extents.unbounded);
    }

    _cairo_composite_rectangles_fini (&extents);

    return status;
}

cairo_int_status_t
_cairo_compositor_stroke (const cairo_compositor_t	*compositor,
			  cairo_surface_t		*surface,
			  cairo_operator_t		 op,
			  const cairo_pattern_t		*source,
			  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_clip_t		*clip)
{
    cairo_composite_rectangles_t extents;
    cairo_int_status_t status;
    cairo_bool_t initialized = TRUE;

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

    if (_cairo_pen_vertices_needed (tolerance, style->line_width/2, ctm) <= 1)
	return CAIRO_INT_STATUS_NOTHING_TO_DO;

    if (compositor->lazy_init) {
	status = _cairo_composite_rectangles_lazy_init_for_stroke (&extents,
								   surface,
								   op, source,
								   path, style,
								   ctm, clip);
	initialized = FALSE;
    }
    else
	status = _cairo_composite_rectangles_init_for_stroke (&extents,
							      surface,
							      op, source,
							      path, style,
							      ctm, clip);
    if (unlikely (status))
	return status;

    do {
	while (compositor->stroke == NULL)
	    compositor = compositor->delegate;

	if (! compositor->lazy_init && ! initialized) {
	    /* XXX: we should do better instead of re-init */
	    _cairo_composite_rectangles_fini (&extents);
	    status = _cairo_composite_rectangles_init_for_stroke (&extents,
								  surface,
								  op,
								  source,
								  path,
								  style,
								  ctm,
								  clip);
	    initialized = TRUE;

	    if (unlikely (status))
		return status;
	}

	status = compositor->stroke (compositor, &extents,
				     path, style, ctm, ctm_inverse,
				     tolerance, antialias);

	compositor = compositor->delegate;
    } while (status == CAIRO_INT_STATUS_UNSUPPORTED);

    if (status == CAIRO_INT_STATUS_SUCCESS && surface->damage) {
	TRACE ((stderr, "%s: applying damage (%d,%d)x(%d, %d)\n",
		__FUNCTION__,
		extents.unbounded.x, extents.unbounded.y,
		extents.unbounded.width, extents.unbounded.height));
	surface->damage = _cairo_damage_add_rectangle (surface->damage,
						       &extents.unbounded);
    }

    _cairo_composite_rectangles_fini (&extents);

    return status;
}

cairo_int_status_t
_cairo_compositor_fill (const cairo_compositor_t	*compositor,
			cairo_surface_t			*surface,
			cairo_operator_t		 op,
			const cairo_pattern_t		*source,
			const cairo_path_fixed_t	*path,
			cairo_fill_rule_t		 fill_rule,
			double				 tolerance,
			cairo_antialias_t		 antialias,
			const cairo_clip_t		*clip)
{
    cairo_composite_rectangles_t extents;
    cairo_int_status_t status;
    cairo_bool_t initialized = TRUE;

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

    if (compositor->lazy_init) {
	status = _cairo_composite_rectangles_lazy_init_for_fill (&extents,
								 surface,
								 op, source,
								 path, clip);
	initialized = FALSE;
    }
    else
	status = _cairo_composite_rectangles_init_for_fill (&extents,
							    surface,
							    op, source,
							    path, clip);
    if (unlikely (status))
	return status;

    do {
	while (compositor->fill == NULL)
	    compositor = compositor->delegate;

	if (! compositor->lazy_init && ! initialized) {
	    /* XXX: we should do better instead of re-init */
	    _cairo_composite_rectangles_fini (&extents);
	    status = _cairo_composite_rectangles_init_for_fill (&extents,
								surface,
								op, source,
								path, clip);
	    initialized = TRUE;

	    if (unlikely (status))
		return status;
	}

	status = compositor->fill (compositor, &extents,
				   path, fill_rule, tolerance, antialias);

	compositor = compositor->delegate;
    } while (status == CAIRO_INT_STATUS_UNSUPPORTED);

    if (status == CAIRO_INT_STATUS_SUCCESS && surface->damage) {
	TRACE ((stderr, "%s: applying damage (%d,%d)x(%d, %d)\n",
		__FUNCTION__,
		extents.unbounded.x, extents.unbounded.y,
		extents.unbounded.width, extents.unbounded.height));
	surface->damage = _cairo_damage_add_rectangle (surface->damage,
						       &extents.unbounded);
    }

    _cairo_composite_rectangles_fini (&extents);

    return status;
}

cairo_int_status_t
_cairo_compositor_glyphs (const cairo_compositor_t		*compositor,
			  cairo_surface_t			*surface,
			  cairo_operator_t			 op,
			  const cairo_pattern_t			*source,
			  cairo_glyph_t				*glyphs,
			  int					 num_glyphs,
			  cairo_scaled_font_t			*scaled_font,
			  const cairo_clip_t			*clip)
{
    cairo_composite_rectangles_t extents;
    cairo_bool_t overlap;
    cairo_int_status_t status;
    cairo_bool_t initialized = TRUE;

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

    if (compositor->lazy_init) {
	status = _cairo_composite_rectangles_lazy_init_for_glyphs (&extents, surface,
								  op, source,
								  scaled_font,
								  glyphs, num_glyphs,
								  clip, &overlap);
	initialized = FALSE;
    } else
	status = _cairo_composite_rectangles_init_for_glyphs (&extents, surface,
							     op, source,
							     scaled_font,
							     glyphs, num_glyphs,
							     clip, &overlap);
    if (unlikely (status))
	return status;

    do {
	while (compositor->glyphs == NULL)
	    compositor = compositor->delegate;

	if (! compositor->lazy_init && ! initialized) {
	    /* XXX: we should do better instead of re-init */
	    _cairo_composite_rectangles_fini (&extents);
	    status = _cairo_composite_rectangles_init_for_glyphs (&extents, surface,
								 op, source,
								 scaled_font,
								 glyphs, num_glyphs,
								 clip, &overlap);
	    initialized = TRUE;

	    if (unlikely (status))
		return status;
	}

	status = compositor->glyphs (compositor, &extents,
				     scaled_font, glyphs, num_glyphs, overlap);

	compositor = compositor->delegate;
    } while (status == CAIRO_INT_STATUS_UNSUPPORTED);

    if (status == CAIRO_INT_STATUS_SUCCESS && surface->damage) {
	TRACE ((stderr, "%s: applying damage (%d,%d)x(%d, %d)\n",
		__FUNCTION__,
		extents.unbounded.x, extents.unbounded.y,
		extents.unbounded.width, extents.unbounded.height));
	surface->damage = _cairo_damage_add_rectangle (surface->damage,
						       &extents.unbounded);
    }

    _cairo_composite_rectangles_fini (&extents);

    return status;
}