// Copyright 2014 The PDFium Authors
// Use of this source code is governed by a BSD-style license that can be
// found in the LICENSE file.

// Original code copyright 2014 Foxit Software Inc. http://www.foxitsoftware.com

#include "fxjs/cjs_color.h"

#include <algorithm>

#include "core/fxcrt/span.h"
#include "core/fxge/cfx_color.h"
#include "fxjs/cjs_event_context.h"
#include "fxjs/cjs_object.h"
#include "fxjs/cjs_runtime.h"
#include "fxjs/fxv8.h"
#include "fxjs/js_define.h"
#include "v8/include/v8-container.h"

const JSPropertySpec CJS_Color::PropertySpecs[] = {
    {"black", get_black_static, set_black_static},
    {"blue", get_blue_static, set_blue_static},
    {"cyan", get_cyan_static, set_cyan_static},
    {"dkGray", get_dark_gray_static, set_dark_gray_static},
    {"gray", get_gray_static, set_gray_static},
    {"green", get_green_static, set_green_static},
    {"ltGray", get_light_gray_static, set_light_gray_static},
    {"magenta", get_magenta_static, set_magenta_static},
    {"red", get_red_static, set_red_static},
    {"transparent", get_transparent_static, set_transparent_static},
    {"white", get_white_static, set_white_static},
    {"yellow", get_yellow_static, set_yellow_static}};

const JSMethodSpec CJS_Color::MethodSpecs[] = {{"convert", convert_static},
                                               {"equal", equal_static}};

uint32_t CJS_Color::ObjDefnID = 0;
const char CJS_Color::kName[] = "color";

// static
uint32_t CJS_Color::GetObjDefnID() {
  return ObjDefnID;
}

// static
void CJS_Color::DefineJSObjects(CFXJS_Engine* pEngine) {
  ObjDefnID = pEngine->DefineObj(CJS_Color::kName, FXJSOBJTYPE_STATIC,
                                 JSConstructor<CJS_Color>, JSDestructor);
  DefineProps(pEngine, ObjDefnID, PropertySpecs);
  DefineMethods(pEngine, ObjDefnID, MethodSpecs);
}

// static
v8::Local<v8::Array> CJS_Color::ConvertPWLColorToArray(CJS_Runtime* pRuntime,
                                                       const CFX_Color& color) {
  v8::Local<v8::Array> array;
  switch (color.nColorType) {
    case CFX_Color::Type::kTransparent:
      array = pRuntime->NewArray();
      pRuntime->PutArrayElementReentrant(array, 0, pRuntime->NewString("T"));
      break;
    case CFX_Color::Type::kGray:
      array = pRuntime->NewArray();
      pRuntime->PutArrayElementReentrant(array, 0, pRuntime->NewString("G"));
      pRuntime->PutArrayElementReentrant(array, 1,
                                         pRuntime->NewNumber(color.fColor1));
      break;
    case CFX_Color::Type::kRGB:
      array = pRuntime->NewArray();
      pRuntime->PutArrayElementReentrant(array, 0, pRuntime->NewString("RGB"));
      pRuntime->PutArrayElementReentrant(array, 1,
                                         pRuntime->NewNumber(color.fColor1));
      pRuntime->PutArrayElementReentrant(array, 2,
                                         pRuntime->NewNumber(color.fColor2));
      pRuntime->PutArrayElementReentrant(array, 3,
                                         pRuntime->NewNumber(color.fColor3));
      break;
    case CFX_Color::Type::kCMYK:
      array = pRuntime->NewArray();
      pRuntime->PutArrayElementReentrant(array, 0, pRuntime->NewString("CMYK"));
      pRuntime->PutArrayElementReentrant(array, 1,
                                         pRuntime->NewNumber(color.fColor1));
      pRuntime->PutArrayElementReentrant(array, 2,
                                         pRuntime->NewNumber(color.fColor2));
      pRuntime->PutArrayElementReentrant(array, 3,
                                         pRuntime->NewNumber(color.fColor3));
      pRuntime->PutArrayElementReentrant(array, 4,
                                         pRuntime->NewNumber(color.fColor4));
      break;
  }
  return array;
}

// static
CFX_Color CJS_Color::ConvertArrayToPWLColor(CJS_Runtime* pRuntime,
                                            v8::Local<v8::Array> array) {
  size_t nArrayLen = pRuntime->GetArrayLength(array);
  if (nArrayLen == 0) {
    return CFX_Color();
  }

  WideString sSpace = pRuntime->ToWideStringReentrant(
      pRuntime->GetArrayElementReentrant(array, 0));
  if (sSpace.EqualsASCII("T")) {
    return CFX_Color::MakeTransparent();
  }

  float d1 = 0;
  if (nArrayLen > 1) {
    d1 = static_cast<float>(pRuntime->ToDoubleReentrant(
        pRuntime->GetArrayElementReentrant(array, 1)));
  }
  if (sSpace.EqualsASCII("G")) {
    return CFX_Color::MakeGray(d1);
  }

  float d2 = 0;
  float d3 = 0;
  if (nArrayLen > 2) {
    d2 = static_cast<float>(pRuntime->ToDoubleReentrant(
        pRuntime->GetArrayElementReentrant(array, 2)));
  }
  if (nArrayLen > 3) {
    d3 = static_cast<float>(pRuntime->ToDoubleReentrant(
        pRuntime->GetArrayElementReentrant(array, 3)));
  }
  if (sSpace.EqualsASCII("RGB")) {
    return CFX_Color::MakeRGB(d1, d2, d3);
  }

  float d4 = 0;
  if (nArrayLen > 4) {
    d4 = static_cast<float>(pRuntime->ToDoubleReentrant(
        pRuntime->GetArrayElementReentrant(array, 4)));
  }
  if (sSpace.EqualsASCII("CMYK")) {
    return CFX_Color::MakeCMYK(d1, d2, d3, d4);
  }

  return CFX_Color();
}

CJS_Color::CJS_Color(v8::Local<v8::Object> pObject, CJS_Runtime* pRuntime)
    : CJS_Object(pObject, pRuntime),
      transparent_(CFX_Color::MakeTransparent()),
      black_(CFX_Color::MakeGray(0.0f)),
      white_(CFX_Color::MakeGray(1.0f)),
      red_(CFX_Color::MakeRGB(1.0f, 0.0f, 0.0f)),
      green_(CFX_Color::MakeRGB(0.0f, 1.0f, 0.0f)),
      blue_(CFX_Color::MakeRGB(0.0f, 0.0f, 1.0f)),
      cyan_(CFX_Color::MakeCMYK(1.0f, 0.0f, 0.0f, 0.0f)),
      magenta_(CFX_Color::MakeCMYK(0.0f, 1.0f, 0.0f, 0.0f)),
      yellow_(CFX_Color::MakeCMYK(0.0f, 0.0f, 1.0f, 0.0f)),
      dkgray_(CFX_Color::MakeGray(0.25f)),
      gray_(CFX_Color::MakeGray(0.5f)),
      ltgray_(CFX_Color::MakeGray(0.75f)) {}

CJS_Color::~CJS_Color() = default;

CJS_Result CJS_Color::get_transparent(CJS_Runtime* pRuntime) {
  return GetPropertyHelper(pRuntime, &transparent_);
}

CJS_Result CJS_Color::set_transparent(CJS_Runtime* pRuntime,
                                      v8::Local<v8::Value> vp) {
  return SetPropertyHelper(pRuntime, vp, &transparent_);
}

CJS_Result CJS_Color::get_black(CJS_Runtime* pRuntime) {
  return GetPropertyHelper(pRuntime, &black_);
}

CJS_Result CJS_Color::set_black(CJS_Runtime* pRuntime,
                                v8::Local<v8::Value> vp) {
  return SetPropertyHelper(pRuntime, vp, &black_);
}

CJS_Result CJS_Color::get_white(CJS_Runtime* pRuntime) {
  return GetPropertyHelper(pRuntime, &white_);
}

CJS_Result CJS_Color::set_white(CJS_Runtime* pRuntime,
                                v8::Local<v8::Value> vp) {
  return SetPropertyHelper(pRuntime, vp, &white_);
}

CJS_Result CJS_Color::get_red(CJS_Runtime* pRuntime) {
  return GetPropertyHelper(pRuntime, &red_);
}

CJS_Result CJS_Color::set_red(CJS_Runtime* pRuntime, v8::Local<v8::Value> vp) {
  return SetPropertyHelper(pRuntime, vp, &red_);
}

CJS_Result CJS_Color::get_green(CJS_Runtime* pRuntime) {
  return GetPropertyHelper(pRuntime, &green_);
}

CJS_Result CJS_Color::set_green(CJS_Runtime* pRuntime,
                                v8::Local<v8::Value> vp) {
  return SetPropertyHelper(pRuntime, vp, &green_);
}

CJS_Result CJS_Color::get_blue(CJS_Runtime* pRuntime) {
  return GetPropertyHelper(pRuntime, &blue_);
}

CJS_Result CJS_Color::set_blue(CJS_Runtime* pRuntime, v8::Local<v8::Value> vp) {
  return SetPropertyHelper(pRuntime, vp, &blue_);
}

CJS_Result CJS_Color::get_cyan(CJS_Runtime* pRuntime) {
  return GetPropertyHelper(pRuntime, &cyan_);
}

CJS_Result CJS_Color::set_cyan(CJS_Runtime* pRuntime, v8::Local<v8::Value> vp) {
  return SetPropertyHelper(pRuntime, vp, &cyan_);
}

CJS_Result CJS_Color::get_magenta(CJS_Runtime* pRuntime) {
  return GetPropertyHelper(pRuntime, &magenta_);
}

CJS_Result CJS_Color::set_magenta(CJS_Runtime* pRuntime,
                                  v8::Local<v8::Value> vp) {
  return SetPropertyHelper(pRuntime, vp, &magenta_);
}

CJS_Result CJS_Color::get_yellow(CJS_Runtime* pRuntime) {
  return GetPropertyHelper(pRuntime, &yellow_);
}

CJS_Result CJS_Color::set_yellow(CJS_Runtime* pRuntime,
                                 v8::Local<v8::Value> vp) {
  return SetPropertyHelper(pRuntime, vp, &yellow_);
}

CJS_Result CJS_Color::get_dark_gray(CJS_Runtime* pRuntime) {
  return GetPropertyHelper(pRuntime, &dkgray_);
}

CJS_Result CJS_Color::set_dark_gray(CJS_Runtime* pRuntime,
                                    v8::Local<v8::Value> vp) {
  return SetPropertyHelper(pRuntime, vp, &dkgray_);
}

CJS_Result CJS_Color::get_gray(CJS_Runtime* pRuntime) {
  return GetPropertyHelper(pRuntime, &gray_);
}

CJS_Result CJS_Color::set_gray(CJS_Runtime* pRuntime, v8::Local<v8::Value> vp) {
  return SetPropertyHelper(pRuntime, vp, &gray_);
}

CJS_Result CJS_Color::get_light_gray(CJS_Runtime* pRuntime) {
  return GetPropertyHelper(pRuntime, &ltgray_);
}

CJS_Result CJS_Color::set_light_gray(CJS_Runtime* pRuntime,
                                     v8::Local<v8::Value> vp) {
  return SetPropertyHelper(pRuntime, vp, &ltgray_);
}

CJS_Result CJS_Color::GetPropertyHelper(CJS_Runtime* pRuntime, CFX_Color* var) {
  v8::Local<v8::Value> array = ConvertPWLColorToArray(pRuntime, *var);
  if (array.IsEmpty()) {
    return CJS_Result::Success(pRuntime->NewArray());
  }

  return CJS_Result::Success(array);
}

CJS_Result CJS_Color::SetPropertyHelper(CJS_Runtime* pRuntime,
                                        v8::Local<v8::Value> vp,
                                        CFX_Color* var) {
  if (vp.IsEmpty()) {
    return CJS_Result::Failure(JSMessage::kParamError);
  }

  if (!vp->IsArray()) {
    return CJS_Result::Failure(JSMessage::kTypeError);
  }

  *var = ConvertArrayToPWLColor(pRuntime, pRuntime->ToArrayReentrant(vp));
  return CJS_Result::Success();
}

CJS_Result CJS_Color::convert(CJS_Runtime* pRuntime,
                              pdfium::span<v8::Local<v8::Value>> params) {
  if (params.size() < 2) {
    return CJS_Result::Failure(JSMessage::kParamError);
  }

  if (!fxv8::IsArray(params[0])) {
    return CJS_Result::Failure(JSMessage::kTypeError);
  }

  WideString sDestSpace = pRuntime->ToWideStringReentrant(params[1]);
  CFX_Color::Type nColorType = CFX_Color::Type::kTransparent;
  if (sDestSpace.EqualsASCII("T")) {
    nColorType = CFX_Color::Type::kTransparent;
  } else if (sDestSpace.EqualsASCII("G")) {
    nColorType = CFX_Color::Type::kGray;
  } else if (sDestSpace.EqualsASCII("RGB")) {
    nColorType = CFX_Color::Type::kRGB;
  } else if (sDestSpace.EqualsASCII("CMYK")) {
    nColorType = CFX_Color::Type::kCMYK;
  }

  CFX_Color color =
      ConvertArrayToPWLColor(pRuntime, pRuntime->ToArrayReentrant(params[0]));
  v8::Local<v8::Value> array =
      ConvertPWLColorToArray(pRuntime, color.ConvertColorType(nColorType));
  if (array.IsEmpty()) {
    return CJS_Result::Success(pRuntime->NewArray());
  }

  return CJS_Result::Success(array);
}

CJS_Result CJS_Color::equal(CJS_Runtime* pRuntime,
                            pdfium::span<v8::Local<v8::Value>> params) {
  if (params.size() < 2) {
    return CJS_Result::Failure(JSMessage::kParamError);
  }

  if (!fxv8::IsArray(params[0]) || !fxv8::IsArray(params[1])) {
    return CJS_Result::Failure(JSMessage::kTypeError);
  }

  CFX_Color color1 =
      ConvertArrayToPWLColor(pRuntime, pRuntime->ToArrayReentrant(params[0]));
  CFX_Color color2 =
      ConvertArrayToPWLColor(pRuntime, pRuntime->ToArrayReentrant(params[1]));

  // Relies on higher values having more components.
  CFX_Color::Type best = std::max(color1.nColorType, color2.nColorType);
  return CJS_Result::Success(pRuntime->NewBoolean(
      color1.ConvertColorType(best) == color2.ConvertColorType(best)));
}