/*
 * Copyright (c) 2022 Huawei Device Co., Ltd.
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *     http://www.apache.org/licenses/LICENSE-2.0
 *
 * 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.
 */
#define LOG_TAG "Call"
#include "call.h"

#include "hilog_wrapper.h"
#include "js_error.h"
#include "wallpaper_js_util.h"

namespace OHOS::WallpaperNAPI {
Call::Call(napi_env env, napi_callback_info info, std::shared_ptr<Context> context, size_t pos, bool needException)
    : env_(env)
{
    context_ = new CallContext();
    size_t argc = WallpaperJSUtil::MAX_ARGC;
    napi_value self = nullptr;
    napi_value argv[WallpaperJSUtil::MAX_ARGC] = { nullptr };
    NAPI_CALL_RETURN_VOID(env, napi_get_cb_info(env, info, &argc, argv, &self, nullptr));
    pos = ((pos == ASYNC_DEFAULT_POS) ? (argc - 1) : pos);
    if (pos < argc) {
        napi_valuetype valueType = napi_undefined;
        napi_typeof(env, argv[pos], &valueType);
        if (valueType == napi_function) {
            napi_create_reference(env, argv[pos], 1, &context_->callback);
            argc = pos;
        } else {
            context->errCode_ = ErrorThrowType::PARAMETER_ERROR;
            context->errMsg_ = PARAMETERERRORMESSAGE;
        }
    }
    auto status = (*context)(env, argc, argv, self);
    if (status != napi_ok && context->errCode_ != 0 && needException) {
        JsError::ThrowError(env, context->errCode_, context->errMsg_);
        context->output_ = nullptr;
        context->exec_ = nullptr;
    } else {
        context_->ctx = std::move(context);
        napi_create_reference(env, self, 1, &context_->self);
    }
}

Call::~Call()
{
    if (context_ == nullptr) {
        return;
    }

    DeleteContext(env_, context_);
}

napi_value Call::AsyncCall(napi_env env, const std::string &resourceName)
{
    if (context_ == nullptr) {
        HILOG_DEBUG("context_ is null");
        return nullptr;
    }
    if (context_->ctx == nullptr) {
        HILOG_DEBUG("context_->ctx is null");
        return nullptr;
    }
    HILOG_DEBUG("async call exec");
    napi_value promise = nullptr;
    if (context_->callback == nullptr) {
        napi_create_promise(env, &context_->defer, &promise);
    } else {
        napi_get_undefined(env, &promise);
    }
    napi_async_work work = context_->work;
    napi_value resource = nullptr;
    std::string name = "THEME_" + resourceName;
    napi_create_string_utf8(env, name.c_str(), NAPI_AUTO_LENGTH, &resource);
    napi_create_async_work(env, nullptr, resource, Call::OnExecute, Call::OnComplete, context_, &work);
    context_->work = work;
    context_ = nullptr;
    napi_queue_async_work_with_qos(env, work, napi_qos_user_initiated);
    HILOG_DEBUG("async call exec");
    return promise;
}

napi_value Call::SyncCall(napi_env env)
{
    if ((context_ == nullptr) || (context_->ctx == nullptr)) {
        HILOG_DEBUG("context_ or context_->ctx is null");
        return nullptr;
    }
    Call::OnExecute(env, context_);
    napi_value output = nullptr;
    napi_status runStatus = (*context_->ctx)(env, &output);
    if (runStatus != napi_ok && context_->ctx->errCode_ != 0) {
        JsError::ThrowError(env, context_->ctx->errCode_, context_->ctx->errMsg_);
        output = nullptr;
    }
    DeleteContext(env, context_);
    context_ = nullptr;
    return output;
}

void Call::OnExecute(napi_env env, void *data)
{
    HILOG_DEBUG("run the async runnable");
    CallContext *context = reinterpret_cast<CallContext *>(data);
    context->ctx->Exec();
}

void Call::OnComplete(napi_env env, napi_status status, void *data)
{
    HILOG_DEBUG("run the js callback function");
    CallContext *context = reinterpret_cast<CallContext *>(data);
    napi_value output = nullptr;
    napi_status runStatus = (*context->ctx)(env, &output);
    napi_value result[ARG_BUTT] = { 0 };
    HILOG_DEBUG("run the js callback function:status[%{public}d]runStatus[%{public}d]", status, runStatus);
    if (status == napi_ok && runStatus == napi_ok) {
        napi_get_undefined(env, &result[ARG_ERROR]);
        if (output != nullptr) {
            HILOG_DEBUG("AsyncCall::OnComplete output != nullptr");
            result[ARG_DATA] = output;
        } else {
            HILOG_DEBUG("AsyncCall::OnComplete output == nullptr");
            napi_get_undefined(env, &result[ARG_DATA]);
        }
    } else {
        napi_value errCode = nullptr;
        napi_value message = nullptr;
        std::string errMsg("async call failed");
        if (context->ctx->errCode_ != 0) {
            napi_create_int32(env, context->ctx->errCode_, &errCode);
        }
        if (!context->ctx->errMsg_.empty()) {
            errMsg = context->ctx->errMsg_;
        }
        napi_create_string_utf8(env, errMsg.c_str(), NAPI_AUTO_LENGTH, &message);
        napi_create_error(env, nullptr, message, &result[ARG_ERROR]);
        napi_set_named_property(env, result[ARG_ERROR], "code", errCode);
        napi_get_undefined(env, &result[ARG_DATA]);
    }
    HILOG_DEBUG("run the js callback function:(context->defer != nullptr)?[%{public}d]", context->defer != nullptr);
    if (context->defer != nullptr) {
        // promise
        HILOG_DEBUG("Promise to do!");
        if (status == napi_ok && runStatus == napi_ok) {
            napi_resolve_deferred(env, context->defer, result[ARG_DATA]);
        } else {
            napi_reject_deferred(env, context->defer, result[ARG_ERROR]);
        }
    } else {
        // callback
        HILOG_DEBUG("Callback to do!");
        napi_value callback = nullptr;
        napi_get_reference_value(env, context->callback, &callback);
        napi_value returnValue;
        napi_call_function(env, nullptr, callback, ARG_BUTT, result, &returnValue);
    }
    DeleteContext(env, context);
}
void Call::DeleteContext(napi_env env, CallContext *context)
{
    if (env != nullptr) {
        napi_delete_reference(env, context->callback);
        napi_delete_reference(env, context->self);
        napi_delete_async_work(env, context->work);
    }
    delete context;
}
} // namespace OHOS::WallpaperNAPI