/*
 * Copyright © 2011 Intel Corporation
 *
 * Permission is hereby granted, free of charge, to any person
 * obtaining a copy of this software and associated documentation
 * files (the "Software"), to deal in the Software without
 * restriction, including without limitation the rights to use, copy,
 * modify, merge, publish, distribute, sublicense, and/or sell copies
 * of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be
 * included in all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
 * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
 * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
 * SOFTWARE.
 *
 * Author: Chris Wilson <chris@chris-wilson.co.uk>
 */

#include "cairo-perf.h"

static cairo_time_t
horizontal (cairo_t *cr, int width, int height, int loops)
{
    double h = height/2 + .5;

    cairo_move_to (cr, 0, h);
    cairo_line_to (cr, width, h);

    cairo_perf_timer_start ();

    while (loops--)
	cairo_stroke_preserve (cr);

    cairo_perf_timer_stop ();

    cairo_new_path (cr);

    return cairo_perf_timer_elapsed ();
}

static cairo_time_t
horizontal_hair (cairo_t *cr, int width, int height, int loops)
{
    cairo_set_line_width (cr, 1.);
    return horizontal (cr, width, height, loops);
}

static cairo_time_t
horizontal_wide (cairo_t *cr, int width, int height, int loops)
{
    cairo_set_line_width (cr, 5.);
    return horizontal (cr, width, height, loops);
}

static cairo_time_t
nearly_horizontal (cairo_t *cr, int width, int height, int loops)
{
    double h = height/2;

    cairo_move_to (cr, 0, h);
    cairo_line_to (cr, width, h+1);

    cairo_perf_timer_start ();

    while (loops--)
	cairo_stroke_preserve (cr);

    cairo_perf_timer_stop ();

    cairo_new_path (cr);

    return cairo_perf_timer_elapsed ();
}

static cairo_time_t
nearly_horizontal_hair (cairo_t *cr, int width, int height, int loops)
{
    cairo_set_line_width (cr, 1.);
    return nearly_horizontal (cr, width, height, loops);
}

static cairo_time_t
nearly_horizontal_wide (cairo_t *cr, int width, int height, int loops)
{
    cairo_set_line_width (cr, 5.);
    return nearly_horizontal (cr, width, height, loops);
}


static cairo_time_t
vertical (cairo_t *cr, int width, int height, int loops)
{
    double w = width/2 + .5;

    cairo_move_to (cr, w, 0);
    cairo_line_to (cr, w, height);

    cairo_perf_timer_start ();

    while (loops--)
	cairo_stroke_preserve (cr);

    cairo_perf_timer_stop ();

    cairo_new_path (cr);

    return cairo_perf_timer_elapsed ();
}

static cairo_time_t
vertical_hair (cairo_t *cr, int width, int height, int loops)
{
    cairo_set_line_width (cr, 1.);
    return vertical (cr, width, height, loops);
}

static cairo_time_t
vertical_wide (cairo_t *cr, int width, int height, int loops)
{
    cairo_set_line_width (cr, 5.);
    return vertical (cr, width, height, loops);
}

static cairo_time_t
nearly_vertical (cairo_t *cr, int width, int height, int loops)
{
    double w = width/2;

    cairo_move_to (cr, w, 0);
    cairo_line_to (cr, w+1, height);

    cairo_perf_timer_start ();

    while (loops--)
	cairo_stroke_preserve (cr);

    cairo_perf_timer_stop ();

    cairo_new_path (cr);

    return cairo_perf_timer_elapsed ();
}

static cairo_time_t
nearly_vertical_hair (cairo_t *cr, int width, int height, int loops)
{
    cairo_set_line_width (cr, 1.);
    return nearly_vertical (cr, width, height, loops);
}

static cairo_time_t
nearly_vertical_wide (cairo_t *cr, int width, int height, int loops)
{
    cairo_set_line_width (cr, 5.);
    return nearly_vertical (cr, width, height, loops);
}


static cairo_time_t
diagonal (cairo_t *cr, int width, int height, int loops)
{
    cairo_move_to (cr, 0, 0);
    cairo_line_to (cr, width, height);

    cairo_perf_timer_start ();

    while (loops--)
	cairo_stroke_preserve (cr);

    cairo_perf_timer_stop ();

    cairo_new_path (cr);

    return cairo_perf_timer_elapsed ();
}

static cairo_time_t
diagonal_hair (cairo_t *cr, int width, int height, int loops)
{
    cairo_set_line_width (cr, 1.);
    return diagonal (cr, width, height, loops);
}

static cairo_time_t
diagonal_wide (cairo_t *cr, int width, int height, int loops)
{
    cairo_set_line_width (cr, 5.);
    return diagonal (cr, width, height, loops);
}

cairo_bool_t
line_enabled (cairo_perf_t *perf)
{
    return cairo_perf_can_run (perf, "line", NULL);
}

void
line (cairo_perf_t *perf, cairo_t *cr, int width, int height)
{
    cairo_set_source_rgb (cr, 1., 1., 1.);

    cairo_perf_run (perf, "line-hh", horizontal_hair, NULL);
    cairo_perf_run (perf, "line-hw", horizontal_wide, NULL);
    cairo_perf_run (perf, "line-nhh", nearly_horizontal_hair, NULL);
    cairo_perf_run (perf, "line-nhw", nearly_horizontal_wide, NULL);

    cairo_perf_run (perf, "line-vh", vertical_hair, NULL);
    cairo_perf_run (perf, "line-vw", vertical_wide, NULL);
    cairo_perf_run (perf, "line-nvh", nearly_vertical_hair, NULL);
    cairo_perf_run (perf, "line-nvw", nearly_vertical_wide, NULL);

    cairo_perf_run (perf, "line-dh", diagonal_hair, NULL);
    cairo_perf_run (perf, "line-dw", diagonal_wide, NULL);
}