// Tencent is pleased to support the open source community by making ncnn available.
//
// Copyright (C) 2020 THL A29 Limited, a Tencent company. All rights reserved.
//
// Licensed under the BSD 3-Clause License (the "License"); you may not use this file except
// in compliance with the License. You may obtain a copy of the License at
//
// https://opensource.org/licenses/BSD-3-Clause
//
// Unless required by applicable law or agreed to in writing, software distributed
// under the License is distributed on an "AS IS" BASIS, WITHOUT WARRANTIES OR
// CONDITIONS OF ANY KIND, either express or implied. See the License for the
// specific language governing permissions and limitations under the License.

#include "testutil.h"

#include "layer/crop.h"

static int test_crop(const ncnn::Mat& a, int woffset, int hoffset, int coffset, int outw, int outh, int outc, int woffset2, int hoffset2, int coffset2, bool use_packing_layout)
{
    ncnn::ParamDict pd;
    pd.set(0, woffset);// woffset
    pd.set(1, hoffset);// hoffset
    pd.set(2, coffset);// coffset
    pd.set(3, outw);// outw
    pd.set(4, outh);// outh
    pd.set(5, outc);// outc
    pd.set(6, woffset2);// woffset2
    pd.set(7, hoffset2);// hoffset2
    pd.set(8, coffset2);// coffset2

    std::vector<ncnn::Mat> weights(0);
    ncnn::ModelBinFromMatArray mb(weights.data());

    ncnn::Option opt;
    opt.num_threads = 1;
    opt.use_vulkan_compute = true;
    opt.use_int8_inference = false;
    opt.use_fp16_packed = false;
    opt.use_fp16_storage = false;
    opt.use_fp16_arithmetic = false;
    opt.use_int8_storage = false;
    opt.use_int8_arithmetic = false;
    opt.use_packing_layout = use_packing_layout;

    int ret = test_layer<ncnn::Crop>("Crop", pd, mb, opt, a);
    if (ret != 0)
    {
        fprintf(stderr, "test_crop failed a.dims=%d a=(%d %d %d) woffset=%d hoffset=%d coffset=%d outw=%d outh=%d outc=%d woffset2=%d hoffset2=%d coffset2=%d use_packing_layout=%d\n", a.dims, a.w, a.h, a.c, woffset, hoffset, coffset, outw, outh, outc, woffset2, hoffset2, coffset2, use_packing_layout);
    }

    return ret;
}

static ncnn::Mat IntArrayMat(int a0)
{
    ncnn::Mat m(1);
    int* p = m;
    p[0] = a0;
    return m;
}

static ncnn::Mat IntArrayMat(int a0, int a1)
{
    ncnn::Mat m(2);
    int* p = m;
    p[0] = a0;
    p[1] = a1;
    return m;
}

static ncnn::Mat IntArrayMat(int a0, int a1, int a2)
{
    ncnn::Mat m(3);
    int* p = m;
    p[0] = a0;
    p[1] = a1;
    p[2] = a2;
    return m;
}

static void print_int_array(const ncnn::Mat& a)
{
    const int* pa = a;

    fprintf(stderr, "[");
    for (int i=0; i<a.w; i++)
    {
        fprintf(stderr, " %d", pa[i]);
    }
    fprintf(stderr, " ]");
}

static int test_crop(const ncnn::Mat& a, const ncnn::Mat& starts, const ncnn::Mat& ends, const ncnn::Mat& axes, bool use_packing_layout)
{
    ncnn::ParamDict pd;
    pd.set(9, starts);// starts
    pd.set(10, ends);// ends
    pd.set(11, axes);// axes

    std::vector<ncnn::Mat> weights(0);
    ncnn::ModelBinFromMatArray mb(weights.data());

    ncnn::Option opt;
    opt.num_threads = 1;
    opt.use_vulkan_compute = true;
    opt.use_int8_inference = false;
    opt.use_fp16_packed = false;
    opt.use_fp16_storage = false;
    opt.use_fp16_arithmetic = false;
    opt.use_int8_storage = false;
    opt.use_int8_arithmetic = false;
    opt.use_packing_layout = use_packing_layout;

    int ret = test_layer<ncnn::Crop>("Crop", pd, mb, opt, a);
    if (ret != 0)
    {
        fprintf(stderr, "test_crop failed a.dims=%d a=(%d %d %d)", a.dims, a.w, a.h, a.c);
        fprintf(stderr, " starts="); print_int_array(starts);
        fprintf(stderr, " ends="); print_int_array(ends);
        fprintf(stderr, " axes="); print_int_array(axes);
        fprintf(stderr, " use_packing_layout=%d\n", use_packing_layout);
    }

    return ret;
}

static int test_crop_0()
{
    ncnn::Mat a = RandomMat(13, 11, 16);

    return 0
        || test_crop(a, 0, 0, 0, -233, -233, -233, 0, 0, 0, false)
        || test_crop(a, 0, 3, 0, 10, -233, -233, 0, 0, 0, false)
        || test_crop(a, 5, 0, 0, -233, 6, -233, 0, 0, 0, false)
        || test_crop(a, 5, 3, 0, -233, -233, 12, 0, 0, 0, false)
        || test_crop(a, 0, 3, 4, 7, -233, 8, 0, 0, 0, false)
        || test_crop(a, 5, 0, 5, 4, -233, 4, 0, 0, 0, false)
        || test_crop(a, 5, 3, 6, 2, 7, 9, 0, 0, 0, false)
        || test_crop(a, 0, 3, 4, -233, 4, 5, 0, 0, 0, false)
        || test_crop(a, 5, 0, 5, 6, 6, 8, 0, 0, 0, false)
        || test_crop(a, 5, 3, 6, 4, 4, 4, 0, 0, 0, false)

        || test_crop(a, 0, 0, 0, -233, -233, -233, 0, 0, 0, true)
        || test_crop(a, 0, 3, 0, 10, -233, -233, 0, 0, 0, true)
        || test_crop(a, 5, 0, 0, -233, 6, -233, 0, 0, 0, true)
        || test_crop(a, 5, 3, 0, -233, -233, 12, 0, 0, 0, true)
        || test_crop(a, 0, 3, 4, 7, -233, 8, 0, 0, 0, true)
        || test_crop(a, 5, 0, 5, 4, -233, 4, 0, 0, 0, true)
        || test_crop(a, 5, 3, 6, 2, 7, 9, 0, 0, 0, true)
        || test_crop(a, 0, 3, 4, -233, 4, 5, 0, 0, 0, true)
        || test_crop(a, 5, 0, 5, 6, 6, 8, 0, 0, 0, true)
        || test_crop(a, 5, 3, 6, 4, 4, 4, 0, 0, 0, true)
        ;
}

static int test_crop_1()
{
    ncnn::Mat a = RandomMat(13, 11, 16);

    return 0
        || test_crop(a, 0, 0, 0, -233, -233, -233, 3, 4, 6, false)
        || test_crop(a, 0, 3, 0, 10, -233, -233, 0, 3, 4, false)
        || test_crop(a, 5, 0, 0, -233, 6, -233, 5, 0, 2, false)
        || test_crop(a, 5, 3, 0, -233, -233, 12, 2, 1, 1, false)
        || test_crop(a, 0, 3, 4, 7, -233, 8, 3, 4, 4, false)
        || test_crop(a, 5, 0, 5, 4, -233, 4, 0, 3, 0, false)
        || test_crop(a, 5, 3, 6, 2, 7, 9, 1, 2, 3, false)
        || test_crop(a, 0, 3, 4, -233, 4, 5, 3, 2, 1, false)

        || test_crop(a, 0, 0, 0, -233, -233, -233, 3, 4, 6, true)
        || test_crop(a, 0, 3, 0, 10, -233, -233, 0, 3, 4, true)
        || test_crop(a, 5, 0, 0, -233, 6, -233, 5, 0, 2, true)
        || test_crop(a, 5, 3, 0, -233, -233, 12, 2, 1, 1, true)
        || test_crop(a, 0, 3, 4, 7, -233, 8, 3, 4, 4, true)
        || test_crop(a, 5, 0, 5, 4, -233, 4, 0, 3, 0, true)
        || test_crop(a, 5, 3, 6, 2, 7, 9, 1, 2, 3, true)
        || test_crop(a, 0, 3, 4, -233, 4, 5, 3, 2, 1, true)
        ;
}

static int test_crop_2()
{
    ncnn::Mat a = RandomMat(13, 11, 17);

    return 0
        || test_crop(a, 0, 0, 0, -233, -233, -233, 3, 4, 6, false)
        || test_crop(a, 0, 3, 0, 10, -233, -233, 0, 3, 4, false)
        || test_crop(a, 5, 0, 0, -233, 6, -233, 5, 0, 2, false)
        || test_crop(a, 5, 3, 0, -233, -233, 12, 2, 1, 1, false)
        || test_crop(a, 0, 3, 4, 7, -233, 8, 3, 4, 4, false)
        || test_crop(a, 5, 0, 5, 4, -233, 4, 0, 3, 0, false)
        || test_crop(a, 5, 3, 6, 2, 7, 9, 1, 2, 3, false)
        || test_crop(a, 0, 3, 4, -233, 4, 5, 3, 2, 1, false)

        || test_crop(a, 0, 0, 0, -233, -233, -233, 3, 4, 6, true)
        || test_crop(a, 0, 3, 0, 10, -233, -233, 0, 3, 4, true)
        || test_crop(a, 5, 0, 0, -233, 6, -233, 5, 0, 2, true)
        || test_crop(a, 5, 3, 0, -233, -233, 12, 2, 1, 1, true)
        || test_crop(a, 0, 3, 4, 7, -233, 8, 3, 4, 4, true)
        || test_crop(a, 5, 0, 5, 4, -233, 4, 0, 3, 0, true)
        || test_crop(a, 5, 3, 6, 2, 7, 9, 1, 2, 3, true)
        || test_crop(a, 0, 3, 4, -233, 4, 5, 3, 2, 1, true)
        ;
}

static int test_crop_3()
{
    ncnn::Mat a = RandomMat(13, 11, 16);

    return 0
        || test_crop(a, IntArrayMat(0, 0, 0), IntArrayMat(100, 100, 100), IntArrayMat(1, 2, 3), false)
        || test_crop(a, IntArrayMat(4), IntArrayMat(8), IntArrayMat(1), false)
        || test_crop(a, IntArrayMat(2), IntArrayMat(7), IntArrayMat(2), false)
        || test_crop(a, IntArrayMat(3), IntArrayMat(5), IntArrayMat(3), false)
        || test_crop(a, IntArrayMat(2, 1), IntArrayMat(4, -2), IntArrayMat(1, 2), false)
        || test_crop(a, IntArrayMat(1, 4), IntArrayMat(-5, 7), IntArrayMat(2, -3), false)
        || test_crop(a, IntArrayMat(2, 1), IntArrayMat(4, -2), IntArrayMat(-1, -2), false)
        || test_crop(a, IntArrayMat(1, 2, 3), IntArrayMat(-3, -2, -1), IntArrayMat(-3, -2, -1), false)

        || test_crop(a, IntArrayMat(0, 0, 0), IntArrayMat(100, 100, 100), IntArrayMat(1, 2, 3), true)
        || test_crop(a, IntArrayMat(4), IntArrayMat(8), IntArrayMat(1), true)
        || test_crop(a, IntArrayMat(2), IntArrayMat(7), IntArrayMat(2), true)
        || test_crop(a, IntArrayMat(3), IntArrayMat(5), IntArrayMat(3), true)
        || test_crop(a, IntArrayMat(2, 1), IntArrayMat(4, -2), IntArrayMat(1, 2), true)
        || test_crop(a, IntArrayMat(1, 4), IntArrayMat(-5, 7), IntArrayMat(3, -3), true)
        || test_crop(a, IntArrayMat(2, 1), IntArrayMat(4, -2), IntArrayMat(-1, -2), true)
        || test_crop(a, IntArrayMat(1, 2, 3), IntArrayMat(-3, -2, -1), IntArrayMat(-3, -2, -1), true)
        ;
}

static int test_crop_4()
{
    ncnn::Mat a = RandomMat(13, 11, 17);

    return 0
        || test_crop(a, IntArrayMat(0, 0, 0), IntArrayMat(100, 100, 100), IntArrayMat(1, 2, 3), false)
        || test_crop(a, IntArrayMat(4), IntArrayMat(8), IntArrayMat(1), false)
        || test_crop(a, IntArrayMat(2), IntArrayMat(7), IntArrayMat(2), false)
        || test_crop(a, IntArrayMat(3), IntArrayMat(5), IntArrayMat(3), false)
        || test_crop(a, IntArrayMat(2, 1), IntArrayMat(4, -2), IntArrayMat(1, 2), false)
        || test_crop(a, IntArrayMat(1, 4), IntArrayMat(-5, 7), IntArrayMat(2, -3), false)
        || test_crop(a, IntArrayMat(2, 1), IntArrayMat(4, -2), IntArrayMat(-1, -2), false)
        || test_crop(a, IntArrayMat(1, 2, 3), IntArrayMat(-3, -2, -1), IntArrayMat(-3, -2, -1), false)

        || test_crop(a, IntArrayMat(0, 0, 0), IntArrayMat(100, 100, 100), IntArrayMat(1, 2, 3), true)
        || test_crop(a, IntArrayMat(4), IntArrayMat(8), IntArrayMat(1), true)
        || test_crop(a, IntArrayMat(2), IntArrayMat(7), IntArrayMat(2), true)
        || test_crop(a, IntArrayMat(3), IntArrayMat(5), IntArrayMat(3), true)
        || test_crop(a, IntArrayMat(2, 1), IntArrayMat(4, -2), IntArrayMat(1, 2), true)
        || test_crop(a, IntArrayMat(1, 4), IntArrayMat(-5, 7), IntArrayMat(3, -3), true)
        || test_crop(a, IntArrayMat(2, 1), IntArrayMat(4, -2), IntArrayMat(-1, -2), true)
        || test_crop(a, IntArrayMat(1, 2, 3), IntArrayMat(-3, -2, -1), IntArrayMat(-3, -2, -1), true)
        ;
}

int main()
{
    SRAND(7767517);

    return 0
        || test_crop_0()
        || test_crop_1()
        || test_crop_2()
        || test_crop_3()
        || test_crop_4()
        ;
}