/* ******************************************************************************
 *
 *
 * This program and the accompanying materials are made available under the
 * terms of the Apache License, Version 2.0 which is available at
 * https://www.apache.org/licenses/LICENSE-2.0.
 *
 *  See the NOTICE file distributed with this work for additional
 *  information regarding copyright ownership.
 * 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.
 *
 * SPDX-License-Identifier: Apache-2.0
 ******************************************************************************/

//
// @author raver119@gmail.com
// @author Yurii Shyrma (iuriish@yahoo.com)
//

#include <system/op_boilerplate.h>
#if NOT_EXCLUDED(OP_adjust_hue)

#include <ops/declarable/headers/parity_ops.h>
#include <ops/declarable/helpers/adjust_hue.h>

namespace sd {
namespace ops {

CONFIGURABLE_OP_IMPL(adjust_hue, 1, 1, true, 0, 0) {
  auto input = INPUT_VARIABLE(0);
  auto output = OUTPUT_VARIABLE(0);

  // just skip op if input is empty
  if (input->isEmpty()) return Status::OK;

  const int rank = input->rankOf();
  const int arg_size = block.getIArguments()->size();
  const LongType dimC = arg_size > 0 ? (INT_ARG(0) >= 0 ? INT_ARG(0) : INT_ARG(0) + rank) : rank - 1;

  REQUIRE_TRUE(block.numT() > 0 || block.width() > 1, 0, "ADJUST_HUE: delta factor is required !");
  REQUIRE_TRUE(rank >= 3, 0, "ADJUST_HUE: op expects rank of input array to be >= 3, but got %i instead", rank);
  if (arg_size > 0) {
    REQUIRE_TRUE(dimC >= 0 && dimC < rank, 0, "Index of the Channel dimension out of range: %i not in [%i,%i) ",
                 INT_ARG(0), -rank, rank);
  }
  REQUIRE_TRUE(input->sizeAt(dimC) == 3, 0,
               "ADJUST_HUE: operation expects image with 3 channels (R, G, B), but got %i instead",
               input->sizeAt(dimC));

  NDArray* delta = nullptr;

  if (block.width() > 1)
    delta = INPUT_VARIABLE(1);
  else {
    delta = new NDArray(output->dataType(), block.launchContext());
#ifdef HAS_DOUBLE
    delta->p(0, static_cast<double>(T_ARG(0)));
#elif defined(HAS_FLOAT32)
    delta->p(0, static_cast<float>(T_ARG(0)));
#else
#error "No floating-point type available for adjust_hue operation"
#endif
  }

#ifdef HAS_DOUBLE
  auto deltaVal = delta->e<double>(0);
#elif defined(HAS_FLOAT32)
  auto deltaVal = delta->e<float>(0);
#else
#error "No floating-point type available for adjust_hue operation"
#endif

  REQUIRE_TRUE(-1. <= deltaVal && deltaVal <= 1., 0,
               "ADJUST_HUE: parameter delta must be within [-1, 1] interval, but got %f instead", delta);

  helpers::adjustHue(block.launchContext(), input, delta, output, dimC);

  if (block.width() == 1) delete delta;

  return Status::OK;
}

DECLARE_TYPES(adjust_hue) { getOpDescriptor()->setAllowedInputTypes(ANY)->setSameMode(true); }

}  // namespace ops
}  // namespace sd

#endif