/*
 * Copyright 2011 Google Inc.
 *
 * Use of this source code is governed by a BSD-style license that can be
 * found in the LICENSE file.
 */

#include "gm/gm.h"
#include "include/core/SkCanvas.h"
#include "include/core/SkColor.h"
#include "include/core/SkPaint.h"
#include "include/core/SkPath.h"
#include "include/core/SkPathBuilder.h"
#include "include/core/SkPathUtils.h"
#include "include/core/SkRRect.h"
#include "include/core/SkRect.h"
#include "include/core/SkScalar.h"
#include "include/core/SkSize.h"
#include "include/core/SkString.h"
#include "include/core/SkTypes.h"

#include <array>

namespace {
struct PathDY {
    SkPath   path;
    SkScalar dy;
};
}

typedef PathDY (*MakePathProc)();

static PathDY make_frame() {
    SkRect r = { SkIntToScalar(10), SkIntToScalar(10),
                 SkIntToScalar(630), SkIntToScalar(470) };
    SkPath path = SkPath::RRect(SkRRect::MakeRectXY(r, 15, 15));
    SkPaint paint;
    paint.setStyle(SkPaint::kStroke_Style);
    paint.setStrokeWidth(SkIntToScalar(5));
    return {skpathutils::FillPathWithPaint(path, paint), 15};
}

static PathDY make_triangle() {
    constexpr int gCoord[] = {
        10, 20, 15, 5, 30, 30
    };
    return {
        SkPathBuilder().moveTo(SkIntToScalar(gCoord[0]), SkIntToScalar(gCoord[1]))
                       .lineTo(SkIntToScalar(gCoord[2]), SkIntToScalar(gCoord[3]))
                       .lineTo(SkIntToScalar(gCoord[4]), SkIntToScalar(gCoord[5]))
                       .close()
                       .offset(10, 0)
                       .detach(),
        30
    };
}

static PathDY make_rect() {
    SkRect r = { SkIntToScalar(10), SkIntToScalar(10),
                 SkIntToScalar(30), SkIntToScalar(30) };
    return {
        SkPathBuilder().addRect(r).offset(10, 0).detach(),
        30
    };
}

static PathDY make_oval() {
    SkRect r = { SkIntToScalar(10), SkIntToScalar(10),
                 SkIntToScalar(30), SkIntToScalar(30) };
    return {
        SkPathBuilder().addOval(r).offset(10, 0).detach(),
        30
    };
}

static PathDY make_sawtooth(int teeth) {
    SkScalar x = SkIntToScalar(20);
    SkScalar y = SkIntToScalar(20);
    const SkScalar x0 = x;
    const SkScalar dx = SkIntToScalar(5);
    const SkScalar dy = SkIntToScalar(10);

    SkPathBuilder builder;
    builder.moveTo(x, y);
    for (int i = 0; i < teeth; i++) {
        x += dx;
        builder.lineTo(x, y - dy);
        x += dx;
        builder.lineTo(x, y + dy);
    }
    builder.lineTo(x, y + (2 * dy));
    builder.lineTo(x0, y + (2 * dy));
    builder.close();

    return {builder.detach(), 30};
}

static PathDY make_sawtooth_3() { return make_sawtooth(3); }
static PathDY make_sawtooth_32() { return make_sawtooth(32); }

static PathDY make_house() {
    SkPathBuilder builder;
    builder.addPolygon({{
            {21, 23},
            {21, 11.534f},
            {22.327f, 12.741f},
            {23.673f, 11.261f},
            {12, 0.648f},
            {8, 4.285f},
            {8, 2},
            {4, 2},
            {4, 7.921f},
            {0.327f, 11.26f},
            {1.673f, 12.74f},
            {3, 11.534f},
            {3, 23},
            {11, 23},
            {11, 18},
            {13, 18},
            {13, 23},
            {21, 23}}}, true)
        .polylineTo({{
            {9, 16},
            {9, 21},
            {5, 21},
            {5, 9.715f},
            {12, 3.351f},
            {19, 9.715f},
            {19, 21},
            {15, 21},
            {15, 16},
            {9, 16}}})
        .close()
        .offset(20, 0);
    return {builder.detach(), 30};
}

static PathDY make_star(int n) {
    const SkScalar c = SkIntToScalar(45);
    const SkScalar r = SkIntToScalar(20);

    SkScalar rad = -SK_ScalarPI / 2;
    const SkScalar drad = (n >> 1) * SK_ScalarPI * 2 / n;

    SkPathBuilder builder;
    builder.moveTo(c, c - r);
    for (int i = 1; i < n; i++) {
        rad += drad;
        builder.lineTo(c + SkScalarCos(rad) * r, c + SkScalarSin(rad) * r);
    }
    builder.close();

    return {builder.detach(), r * 2 * 6 / 5};
}

static PathDY make_star_5()  { return make_star(5); }
static PathDY make_star_13() { return make_star(13); }

// We don't expect any output from this path.
static PathDY make_line() {
    return {
        SkPathBuilder().moveTo(30, 30)
                       .lineTo(120, 40)
                       .close()
                       .moveTo(150, 30)
                       .lineTo(150, 30)
                       .lineTo(300, 40)
                       .close()
                       .detach(),
        40
    };
}

static SkPath make_info() {
    SkPathBuilder path;
    path.moveTo(24, 4);
    path.cubicTo(12.94999980926514f, 4,
                 4, 12.94999980926514f,
                 4, 24);
    path.cubicTo(4, 35.04999923706055f,
                 12.94999980926514f, 44,
                 24, 44);
    path.cubicTo(35.04999923706055f, 44,
                 44, 35.04999923706055f,
                 44, 24);
    path.cubicTo(44, 12.95000076293945f,
                 35.04999923706055f, 4,
                 24, 4);
    path.close();
    path.moveTo(26, 34);
    path.lineTo(22, 34);
    path.lineTo(22, 22);
    path.lineTo(26, 22);
    path.lineTo(26, 34);
    path.close();
    path.moveTo(26, 18);
    path.lineTo(22, 18);
    path.lineTo(22, 14);
    path.lineTo(26, 14);
    path.lineTo(26, 18);
    path.close();
    return path.detach();
}

static SkPath make_accessibility() {
    SkPathBuilder path;
    path.moveTo(12, 2);
    path.cubicTo(13.10000038146973f, 2,
                 14, 2.900000095367432f,
                 14, 4);
    path.cubicTo(14, 5.099999904632568f,
                 13.10000038146973f, 6,
                 12, 6);
    path.cubicTo(10.89999961853027f, 6,
                 10, 5.099999904632568f,
                 10, 4);
    path.cubicTo(10, 2.900000095367432f,
                 10.89999961853027f, 2,
                 12, 2);
    path.close();
    path.moveTo(21, 9);
    path.lineTo(15, 9);
    path.lineTo(15, 22);
    path.lineTo(13, 22);
    path.lineTo(13, 16);
    path.lineTo(11, 16);
    path.lineTo(11, 22);
    path.lineTo(9, 22);
    path.lineTo(9, 9);
    path.lineTo(3, 9);
    path.lineTo(3, 7);
    path.lineTo(21, 7);
    path.lineTo(21, 9);
    path.close();
    return path.detach();
}

// test case for http://crbug.com/695196
static SkPath make_visualizer() {
    SkPathBuilder path;
    path.moveTo(1.9520f, 2.0000f);
    path.conicTo(1.5573f, 1.9992f, 1.2782f, 2.2782f, 0.9235f);
    path.conicTo(0.9992f, 2.5573f, 1.0000f, 2.9520f, 0.9235f);
    path.lineTo(1.0000f, 5.4300f);
    path.lineTo(17.0000f, 5.4300f);
    path.lineTo(17.0000f, 2.9520f);
    path.conicTo(17.0008f, 2.5573f, 16.7218f, 2.2782f, 0.9235f);
    path.conicTo(16.4427f, 1.9992f, 16.0480f, 2.0000f, 0.9235f);
    path.lineTo(1.9520f, 2.0000f);
    path.close();
    path.moveTo(2.7140f, 3.1430f);
    path.conicTo(3.0547f, 3.1287f, 3.2292f, 3.4216f, 0.8590f);
    path.conicTo(3.4038f, 3.7145f, 3.2292f, 4.0074f, 0.8590f);
    path.conicTo(3.0547f, 4.3003f, 2.7140f, 4.2860f, 0.8590f);
    path.conicTo(2.1659f, 4.2631f, 2.1659f, 3.7145f, 0.7217f);
    path.conicTo(2.1659f, 3.1659f, 2.7140f, 3.1430f, 0.7217f);
    path.lineTo(2.7140f, 3.1430f);
    path.close();
    path.moveTo(5.0000f, 3.1430f);
    path.conicTo(5.3407f, 3.1287f, 5.5152f, 3.4216f, 0.8590f);
    path.conicTo(5.6898f, 3.7145f, 5.5152f, 4.0074f, 0.8590f);
    path.conicTo(5.3407f, 4.3003f, 5.0000f, 4.2860f, 0.8590f);
    path.conicTo(4.4519f, 4.2631f, 4.4519f, 3.7145f, 0.7217f);
    path.conicTo(4.4519f, 3.1659f, 5.0000f, 3.1430f, 0.7217f);
    path.lineTo(5.0000f, 3.1430f);
    path.close();
    path.moveTo(7.2860f, 3.1430f);
    path.conicTo(7.6267f, 3.1287f, 7.8012f, 3.4216f, 0.8590f);
    path.conicTo(7.9758f, 3.7145f, 7.8012f, 4.0074f, 0.8590f);
    path.conicTo(7.6267f, 4.3003f, 7.2860f, 4.2860f, 0.8590f);
    path.conicTo(6.7379f, 4.2631f, 6.7379f, 3.7145f, 0.7217f);
    path.conicTo(6.7379f, 3.1659f, 7.2860f, 3.1430f, 0.7217f);
    path.close();
    path.moveTo(1.0000f, 6.1900f);
    path.lineTo(1.0000f, 14.3810f);
    path.conicTo(0.9992f, 14.7757f, 1.2782f, 15.0548f, 0.9235f);
    path.conicTo(1.5573f, 15.3338f, 1.9520f, 15.3330f, 0.9235f);
    path.lineTo(16.0480f, 15.3330f);
    path.conicTo(16.4427f, 15.3338f, 16.7218f, 15.0548f, 0.9235f);
    path.conicTo(17.0008f, 14.7757f, 17.0000f, 14.3810f, 0.9235f);
    path.lineTo(17.0000f, 6.1910f);
    path.lineTo(1.0000f, 6.1910f);
    path.lineTo(1.0000f, 6.1900f);
    path.close();
    return path.detach();
}

constexpr auto gProcs = std::to_array<MakePathProc>({
        make_frame,
        make_triangle,
        make_rect,
        make_oval,
        make_sawtooth_32,
        make_star_5,
        make_star_13,
        make_line,
        make_house,
        make_sawtooth_3,
});

#define N   std::size(gProcs)

class PathFillGM : public skiagm::GM {
    std::array<SkPath, N> fPath;
    std::array<SkScalar, N> fDY;
    SkPath  fInfoPath;
    SkPath  fAccessibilityPath;
    SkPath  fVisualizerPath;
protected:
    void onOnceBeforeDraw() override {
        for (size_t i = 0; i < N; i++) {
            auto [path, dy] = gProcs[i]();
            fPath[i] = path;
            fDY[i] = dy;
        }

        fInfoPath = make_info();
        fAccessibilityPath = make_accessibility();
        fVisualizerPath = make_visualizer();
    }

    SkString getName() const override { return SkString("pathfill"); }

    SkISize getISize() override { return SkISize::Make(640, 480); }

    void onDraw(SkCanvas* canvas) override {
        SkPaint paint;
        paint.setAntiAlias(true);

        for (size_t i = 0; i < N; i++) {
            canvas->drawPath(fPath[i], paint);
            canvas->translate(SkIntToScalar(0), fDY[i]);
        }

        canvas->save();
        canvas->scale(0.300000011920929f, 0.300000011920929f);
        canvas->translate(50, 50);
        canvas->drawPath(fInfoPath, paint);
        canvas->restore();

        canvas->scale(2, 2);
        canvas->translate(5, 15);
        canvas->drawPath(fAccessibilityPath, paint);

        canvas->scale(0.5f, 0.5f);
        canvas->translate(5, 50);
        canvas->drawPath(fVisualizerPath, paint);
    }

private:
    using INHERITED = skiagm::GM;
};

// test inverse-fill w/ a clip that completely excludes the geometry
class PathInverseFillGM : public skiagm::GM {
    std::array<SkPath, N> fPath;
    std::array<SkScalar, N> fDY;

protected:
    void onOnceBeforeDraw() override {
        for (size_t i = 0; i < N; i++) {
            auto [path, dy] = gProcs[i]();
            fPath[i] = path;
            fDY[i] = dy;
        }
    }

    SkString getName() const override { return SkString("pathinvfill"); }

    SkISize getISize() override { return SkISize::Make(450, 220); }

    static void show(SkCanvas* canvas, const SkPath& path, const SkPaint& paint,
                     const SkRect* clip, SkScalar top, const SkScalar bottom) {
        canvas->save();
        if (clip) {
            SkRect r = *clip;
            r.fTop = top;
            r.fBottom = bottom;
            canvas->clipRect(r);
        }
        canvas->drawPath(path, paint);
        canvas->restore();
    }

    void onDraw(SkCanvas* canvas) override {
        SkPath path = SkPathBuilder().addCircle(50, 50, 40)
                                     .toggleInverseFillType()
                                     .detach();

        SkRect clipR = {0, 0, 100, 200};

        canvas->translate(10, 10);

        for (int doclip = 0; doclip <= 1; ++doclip) {
            for (int aa = 0; aa <= 1; ++aa) {
                SkPaint paint;
                paint.setAntiAlias(SkToBool(aa));

                canvas->save();
                canvas->clipRect(clipR);

                const SkRect* clipPtr = doclip ? &clipR : nullptr;

                show(canvas, path, paint, clipPtr, clipR.fTop, clipR.centerY());
                show(canvas, path, paint, clipPtr, clipR.centerY(), clipR.fBottom);

                canvas->restore();
                canvas->translate(SkIntToScalar(110), 0);
            }
        }
    }

private:
    using INHERITED = skiagm::GM;
};

DEF_SIMPLE_GM(rotatedcubicpath, canvas, 200, 200) {
    SkPaint p;
    p.setAntiAlias(true);
    p.setStyle(SkPaint::kFill_Style);

    canvas->translate(50, 50);
    SkPath path = SkPathBuilder()
                  .moveTo(48,-23)
                  .cubicTo(48,-29.5, 6,-30, 6,-30)
                  .cubicTo(6,-30, 2,0, 2,0)
                  .cubicTo(2,0, 44,-21.5, 48,-23)
                  .close()
                  .detach();

    p.setColor(SK_ColorBLUE);
    canvas->drawPath(path, p);

    // Rotated path, which is not antialiased on GPU
    p.setColor(SK_ColorRED);
    canvas->rotate(90);
    canvas->drawPath(path, p);
}

///////////////////////////////////////////////////////////////////////////////

DEF_GM( return new PathFillGM; )
DEF_GM( return new PathInverseFillGM; )

DEF_SIMPLE_GM(bug7792, canvas, 800, 800) {
    // from skbug.com/40039046 bug description
    SkPaint p;
    SkPath path = SkPathBuilder()
                  .moveTo(10, 10)
                  .moveTo(75, 75)
                  .lineTo(150, 75)
                  .lineTo(150, 150)
                  .lineTo(75, 150)
                  .detach();
    canvas->drawPath(path, p);
    // from skbug.com/40039046#c3
    canvas->translate(200, 0);
    path = SkPathBuilder()
          .moveTo(75, 50)
          .moveTo(100, 75)
          .lineTo(150, 75)
          .lineTo(150, 150)
          .lineTo(75, 150)
          .lineTo(75, 50)
          .close()
          .detach();
    canvas->drawPath(path, p);
    // from skbug.com/40039046#c9
    canvas->translate(200, 0);
    path = SkPathBuilder()
           .moveTo(10, 10)
           .moveTo(75, 75)
           .lineTo(150, 75)
           .lineTo(150, 150)
           .lineTo(75, 150)
           .close()
           .detach();
    canvas->drawPath(path, p);
    // from skbug.com/40039046#c11
    canvas->translate(-200 * 2, 200);
    path = SkPathBuilder()
           .moveTo(75, 150)
           .lineTo(75, 75)
           .lineTo(150, 75)
           .lineTo(150, 150)
           .lineTo(75, 150)
           .moveTo(75, 150)
           .detach();
    canvas->drawPath(path, p);
    // from skbug.com/40039046#c14
    canvas->translate(200, 0);
    path = SkPathBuilder()
           .moveTo(250, 75)
           .moveTo(250, 75)
           .moveTo(250, 75)
           .moveTo(100, 75)
           .lineTo(150, 75)
           .lineTo(150, 150)
           .lineTo(75, 150)
           .lineTo(75, 75)
           .close()
           .lineTo(0, 0)
           .close()
           .detach();
    canvas->drawPath(path, p);
    // from skbug.com/40039046#c15
    canvas->translate(200, 0);
    path = SkPathBuilder()
           .moveTo(75, 75)
           .lineTo(150, 75)
           .lineTo(150, 150)
           .lineTo(75, 150)
           .moveTo(250, 75)
           .detach();
    canvas->drawPath(path, p);
    // from skbug.com/40039046#c17
    canvas->translate(-200 * 2, 200);
    path = SkPathBuilder()
           .moveTo(75, 10)
           .moveTo(75, 75)
           .lineTo(150, 75)
           .lineTo(150, 150)
           .lineTo(75, 150)
           .lineTo(75, 10)
           .close()
           .detach();
    canvas->drawPath(path, p);
    // from skbug.com/40039046#c19
    canvas->translate(200, 0);
    path = SkPathBuilder()
           .moveTo(75, 75)
           .lineTo(75, 75)
           .lineTo(75, 75)
           .lineTo(75, 75)
           .lineTo(150, 75)
           .lineTo(150, 150)
           .lineTo(75, 150)
           .close()
           .moveTo(10, 10)
           .lineTo(30, 10)
           .lineTo(10, 30)
           .detach();
    canvas->drawPath(path, p);
    // from skbug.com/40039046#c23
    canvas->translate(200, 0);
    path = SkPathBuilder()
           .moveTo(75, 75)
           .lineTo(75, 75)
           .moveTo(75, 75)
           .lineTo(75, 75)
           .lineTo(150, 75)
           .lineTo(150, 150)
           .lineTo(75, 150)
           .close()
           .detach();
    canvas->drawPath(path, p);
    // from skbug.com/40039046#c29
    canvas->translate(-200 * 2, 200);
    path = SkPathBuilder()
           .moveTo(75, 75)
           .lineTo(150, 75)
           .lineTo(150, 150)
           .lineTo(75, 150)
           .lineTo(75, 250)
           .moveTo(75, 75)
           .close()
           .detach();
    canvas->drawPath(path, p);
    // from skbug.com/40039046#c31
    canvas->translate(200, 0);
    path = SkPathBuilder()
           .moveTo(75, 75)
           .lineTo(150, 75)
           .lineTo(150, 150)
           .lineTo(75, 150)
           .lineTo(75, 10)
           .moveTo(75, 75)
           .close()
           .detach();
    canvas->drawPath(path, p);
    // from skbug.com/40039046#c36
    canvas->translate(200, 0);
    path = SkPathBuilder()
           .moveTo(75, 75)
           .lineTo(150, 75)
           .lineTo(150, 150)
           .lineTo(10, 150)
           .moveTo(75, 75)
           .lineTo(75, 75)
           .detach();
    canvas->drawPath(path, p);
    // from skbug.com/40039046#c39
    canvas->translate(200, -200 * 3);
    path = SkPathBuilder()
           .moveTo(150, 75)
           .lineTo(150, 150)
           .lineTo(75, 150)
           .lineTo(75, 100)
           .detach();
    canvas->drawPath(path, p);
    // from zero_length_paths_aa
    canvas->translate(0, 200);
    path = SkPathBuilder()
           .moveTo(150, 100)
           .lineTo(150, 100)
           .lineTo(150, 150)
           .lineTo(75, 150)
           .lineTo(75, 100)
           .lineTo(75, 75)
           .lineTo(150, 75)
           .close()
           .detach();
    canvas->drawPath(path, p);
    // from skbug.com/40039046#c41
    canvas->translate(0, 200);
    path = SkPathBuilder()
           .moveTo(75, 75)
           .lineTo(150, 75)
           .lineTo(150, 150)
           .lineTo(140, 150)
           .lineTo(140, 75)
           .moveTo(75, 75)
           .close()
           .detach();
    canvas->drawPath(path, p);
    // from skbug.com/40039046#c53
    canvas->translate(0, 200);
    path = SkPathBuilder()
           .moveTo(75, 75)
           .lineTo(150, 75)
           .lineTo(150, 150)
           .lineTo(140, 150)
           .lineTo(140, 75)
           .moveTo(75, 75)
           .close()
           .detach();
    canvas->drawPath(path, p);
}

#include "include/core/SkSurface.h"

DEF_SIMPLE_GM(path_stroke_clip_crbug1070835, canvas, 25, 50) {
    SkCanvas* orig = canvas;
    auto surf = SkSurfaces::Raster(SkImageInfo::MakeN32Premul(25, 25));
    canvas = surf->getCanvas();

    SkPaint p;
    p.setColor(SK_ColorRED);
    p.setAntiAlias(true);
    p.setStyle(SkPaint::kStroke_Style);
    p.setStrokeWidth(2);

    canvas->scale(4.16666651f/2, 4.16666651f/2);

    SkPoint pts[] = {
    {11, 12},
    {11, 18.0751324f},
    {6.07513189f, 23},
    {-4.80825292E-7f, 23},
    {-6.07513332f, 23},
    {-11, 18.0751324f},
    {-11, 11.999999f},
    {-10.999999f, 5.92486763f},
    {-6.07513189f, 1},
    {1.31173692E-7f, 1},
    {6.07513141f, 1},
    {10.9999981f, 5.92486572f},
    {11, 11.9999971f},
    };
    SkPath path = SkPathBuilder()
                  .moveTo(pts[0])
                  .cubicTo(pts[1], pts[2], pts[3])
                  .cubicTo(pts[4], pts[5], pts[6])
                  .cubicTo(pts[7], pts[8], pts[9])
                  .cubicTo(pts[10],pts[11],pts[12])
                  .detach();

    canvas->drawPath(path, p);

    surf->draw(orig, 0, 0);
}

DEF_SIMPLE_GM(path_arcto_skbug_9077, canvas, 200, 200) {
    SkPaint p;
    p.setColor(SK_ColorRED);
    p.setAntiAlias(true);
    p.setStyle(SkPaint::kStroke_Style);
    p.setStrokeWidth(2);

    SkPathBuilder path;
    SkPoint pts[] = { {20, 20}, {100, 20}, {100, 60}, {130, 150}, {180, 160} };
    SkScalar radius = 60;
    path.moveTo(pts[0]);
    path.lineTo(pts[1]);
    path.lineTo(pts[2]);
    path.close();
    path.arcTo(pts[3], pts[4], radius);
    canvas->drawPath(path.detach(), p);
}

DEF_SIMPLE_GM(path_skbug_11859, canvas, 512, 512) {
    SkPaint paint;
    paint.setColor(SK_ColorRED);
    paint.setAntiAlias(true);

    SkPath path = SkPathBuilder()
                  .moveTo(258, -2)
                  .lineTo(258, 258)
                  .lineTo(237, 258)
                  .lineTo(240, -2)
                  .lineTo(258, -2)
                  .moveTo(-2, -2)
                  .lineTo(240, -2)
                  .lineTo(238, 131)
                  .lineTo(-2, 131)
                  .lineTo(-2, -2)
                  .detach();

    canvas->scale(2, 2);
    canvas->drawPath(path, paint);
}

DEF_SIMPLE_GM(path_skbug_11886, canvas, 256, 256) {
    SkPoint m = {0.f, 770.f};
    SkPath path = SkPathBuilder()
                  .moveTo(m)
                  .cubicTo(m + SkPoint{0.f, 1.f},
                           m + SkPoint{20.f, -750.f},
                           m + SkPoint{83.f, -746.f})
                  .detach();
    SkPaint paint;
    paint.setAntiAlias(true);
    canvas->drawPath(path, paint);
}