#!/usr/bin/env python
# Copyright 2023 Google LLC
#
# This source code is licensed under the BSD-style license found in the
# LICENSE file in the root directory of this source tree.

import argparse
import codecs
import math
import os
import re
import sys
import yaml

sys.path.insert(0, os.path.dirname(os.path.abspath(__file__)))
import xngen
import xnncommon


parser = argparse.ArgumentParser(
    description="Reduce microkernel test generator"
)
parser.add_argument(
    "-t",
    "--tester",
    metavar="TESTER",
    required=True,
    choices=["ReduceMicrokernelTester", "RSumMicrokernelTester"],
    help="Tester class to be used in the generated test",
)
parser.add_argument(
    "-s",
    "--spec",
    metavar="FILE",
    required=True,
    help="Specification (YAML) file",
)
parser.add_argument(
    "-o",
    "--output",
    metavar="FILE",
    required=True,
    help="Output (C++ source) file",
)
parser.set_defaults(defines=list())


def split_ukernel_name(name):
  match = re.fullmatch(
      r"xnn_(f16|f16_f32acc|f32|qs8|qu8|s8|u8)_r(minmax|max|min|sum)(_minmax_(fp32))?_ukernel__(.+)_u(\d+)(v)?(_acc\d+)?",
      name,
  )
  if match is None:
    raise ValueError("Unexpected microkernel name: " + name)
  op_type = {
      "minmax": "MinMax",
      "max": "Max",
      "min": "Min",
      "sum": "Sum",
  }[match.group(2)]
  requantization_type = match.group(4)
  batch_tile = int(match.group(6))
  vector_tile = bool(match.group(7))
  target_name = match.group(5)
  arch, isa, assembly = xnncommon.parse_target_name(target_name=target_name)
  return requantization_type, op_type, batch_tile, vector_tile, arch, isa


REDUCE_TEST_TEMPLATE = """\
TEST(${TEST_NAME}, batch_eq_${BATCH_TILE}${BATCH_SUFFIX}) {
  $if ISA_CHECK:
    ${ISA_CHECK};
  ${TESTER}()
    .batch_size(${BATCH_TILE}${BATCH_SCALE})
    .Test(${", ".join(TEST_ARGS)});
}

$if BATCH_TILE > 1 or BATCH_SCALE != "":
  TEST(${TEST_NAME}, batch_div_${BATCH_TILE}${BATCH_SUFFIX}) {
    $if ISA_CHECK:
      ${ISA_CHECK};
    $if BATCH_SCALE == "":
      for (size_t batch_size = ${BATCH_TILE*2}; batch_size < ${BATCH_TILE*10}; batch_size += ${BATCH_TILE}) {
        ${TESTER}()
          .batch_size(batch_size)
          .Test(${", ".join(TEST_ARGS)});
      }
    $else:
      for (size_t batch_size = ${BATCH_TILE*2}${BATCH_SCALE};
                  batch_size < ${BATCH_TILE*10}${BATCH_SCALE};
                  batch_size += ${BATCH_TILE}${BATCH_SCALE}) {
        ${TESTER}()
          .batch_size(batch_size)
          .Test(${", ".join(TEST_ARGS)});
      }
  }

  TEST(${TEST_NAME}, batch_lt_${BATCH_TILE}${BATCH_SUFFIX}) {
    $if ISA_CHECK:
      ${ISA_CHECK};
    $if BATCH_SCALE == "":
      for (size_t batch_size = 1; batch_size < ${BATCH_TILE}; batch_size++) {
        ${TESTER}()
          .batch_size(batch_size)
          .Test(${", ".join(TEST_ARGS)});
      }
    $else:
      for (size_t batch_size = 1;
                  batch_size < ${BATCH_TILE}${BATCH_SCALE};
                  batch_size++) {
        ${TESTER}()
          .batch_size(batch_size)
          .Test(${", ".join(TEST_ARGS)});
      }
  }

TEST(${TEST_NAME}, batch_gt_${BATCH_TILE}${BATCH_SUFFIX}) {
  $if ISA_CHECK:
    ${ISA_CHECK};
  $if BATCH_SCALE == "":
    for (size_t batch_size = ${BATCH_TILE+1}; batch_size < ${10 if BATCH_TILE == 1 else BATCH_TILE*2}; batch_size++) {
      ${TESTER}()
        .batch_size(batch_size)
        .Test(${", ".join(TEST_ARGS)});
    }
  $else:
    for (size_t batch_size = ${BATCH_TILE}${BATCH_SCALE} + 1;
                batch_size < ${10 if BATCH_TILE == 1 else BATCH_TILE*2}${BATCH_SCALE};
                batch_size += ${BATCH_TILE*2}) {
      ${TESTER}()
        .batch_size(batch_size)
        .Test(${", ".join(TEST_ARGS)});
    }
}

$if TESTER == "RSumMicrokernelTester":
  TEST(${TEST_NAME}, scale) {
    $if ISA_CHECK:
      ${ISA_CHECK};
    for (float scale = 0.3f; scale < 5.0f; scale *= 3.0f) {
      ${TESTER}()
        $if BATCH_SCALE == "":
          .batch_size(${BATCH_TILE+1})
        $else:
          .batch_size(${BATCH_TILE}${BATCH_SCALE} + 1)
        .scale(scale)
        .Test(${", ".join(TEST_ARGS)});
    }
  }

  TEST(${TEST_NAME}, overflow_accumulator) {
    $if ISA_CHECK:
      ${ISA_CHECK};
    ${TESTER}()
      .batch_size(${128 * BATCH_TILE})
      .Test(${", ".join(TEST_ARGS)});
  }
"""


def generate_test_cases(
    ukernel,
    op_type,
    init_fn,
    requantization_type,
    tester,
    batch_tile,
    vector_tile,
    isa,
):
  """Generates all tests cases for a Vector Binary Operation micro-kernel.

  Args:
    ukernel: C name of the micro-kernel function.
    op_type: Operation type (MAX/MIN/SUM/etc).
    init_fn: C name of the function to initialize microkernel parameters.
    requantization_type: Requantization type (FP32/RNDNU).
    tester: C++ name of the tester class.
    batch_tile: Number of batch elements processed per one iteration of the
      inner loop of the micro-kernel.
    vector_tile: Indicates if batch tile is specified in vectors rather than
      elements.
    isa: instruction set required to run the micro-kernel. Generated unit test
      will skip execution if the host processor doesn't support this ISA.

  Returns:
    Code for the test case.
  """
  _, test_name = ukernel.split("_", 1)
  _, datatype, _ = ukernel.split("_", 2)
  test_args = [ukernel]
  if tester == "ReduceMicrokernelTester":
    test_args.append("ReduceMicrokernelTester::OpType::%s" % op_type)
  if init_fn:
    test_args.append(init_fn)
  batch_scale = ""
  if requantization_type:
    test_args.append("xnn_qs8_requantize_%s" % requantization_type.lower())
  if vector_tile:
    ctype = {
        "qs8": "int8_t",
        "qu8": "uint8_t",
        "u8": "uint8_t",
        "f16": "uint16_t",
        "f32": "float",
    }[datatype]
    batch_scale = {
        "rvv": " * xnn_init_hardware_config()->vlenb / sizeof(%s)" % ctype,
        "rvvfp16arith": (
            " * xnn_init_hardware_config()->vlenb / sizeof(%s)" % ctype
        ),
    }[isa]
  return xngen.preprocess(
      REDUCE_TEST_TEMPLATE,
      {
          "TEST_NAME": test_name.upper().replace("UKERNEL_", ""),
          "TEST_ARGS": test_args,
          "TESTER": tester,
          "DATATYPE": datatype.upper(),
          "BATCH_TILE": batch_tile,
          "BATCH_SCALE": batch_scale,
          "BATCH_SUFFIX": "v" if vector_tile else "",
          "OP_TYPE": op_type,
          "ISA_CHECK": xnncommon.generate_isa_check_macro(isa),
      },
  )


def main(args):
  options = parser.parse_args(args)

  with codecs.open(options.spec, "r", encoding="utf-8") as spec_file:
    spec_yaml = yaml.safe_load(spec_file)
    if not isinstance(spec_yaml, list):
      raise ValueError("expected a list of micro-kernels in the spec")

    spec_name = os.path.splitext(os.path.split(options.spec)[1])[0]
    tester_header = {
        "ReduceMicrokernelTester": "reduce-microkernel-tester.h",
        "RSumMicrokernelTester": "rsum-microkernel-tester.h",
    }[options.tester]
    tests = """\
// clang-format off
// Copyright 2023 Google LLC
//
// This source code is licensed under the BSD-style license found in the
// LICENSE file in the root directory of this source tree.
//
// Auto-generated file. Do not edit!
//   Specification: {specification}
//   Generator: {generator}


#include <gtest/gtest.h>
#include "src/xnnpack/common.h"
#include "src/xnnpack/isa-checks.h"
#include "src/xnnpack/microparams-init.h"
#include "src/xnnpack/reduce.h"
#include "test/{tester_header}"
""".format(
        specification=options.spec,
        generator=sys.argv[0],
        tester_header=tester_header,
    )

    for ukernel_spec in spec_yaml:
      name = ukernel_spec["name"]
      init_fn = ukernel_spec.get("init")
      requantization_type, op_type, batch_tile, vector_tile, arch, isa = (
          split_ukernel_name(name)
      )

      test_case = generate_test_cases(
          name,
          op_type,
          init_fn,
          requantization_type,
          options.tester,
          batch_tile,
          vector_tile,
          isa,
      )
      tests += "\n\n" + xnncommon.postprocess_test_case(test_case, arch, isa)

    xnncommon.overwrite_if_changed(options.output, tests)


if __name__ == "__main__":
  main(sys.argv[1:])