/**
 * Copyright (c) 2021 OceanBase
 * OceanBase CE is licensed under Mulan PubL v2.
 * You can use this software according to the terms and conditions of the Mulan PubL v2.
 * You may obtain a copy of Mulan PubL v2 at:
 *          http://license.coscl.org.cn/MulanPubL-2.0
 * THIS SOFTWARE IS PROVIDED ON AN "AS IS" BASIS, WITHOUT WARRANTIES OF ANY KIND,
 * EITHER EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO NON-INFRINGEMENT,
 * MERCHANTABILITY OR FIT FOR A PARTICULAR PURPOSE.
 * See the Mulan PubL v2 for more details.
 */

#define USING_LOG_PREFIX SQL_ENG
#include "share/ob_common_rpc_proxy.h"
#include "sql/resolver/cmd/ob_alter_system_stmt.h"
#include "sql/engine/cmd/ob_restore_executor.h"
#include "sql/engine/ob_exec_context.h"
#include "observer/ob_inner_sql_connection_pool.h"
#include "rootserver/restore/ob_restore_util.h"

namespace oceanbase
{
using namespace common;
using namespace share;
using namespace share::schema;
using namespace rootserver;
namespace sql
{

ObPhysicalRestoreTenantExecutor::ObPhysicalRestoreTenantExecutor()
{
}

ObPhysicalRestoreTenantExecutor::~ObPhysicalRestoreTenantExecutor()
{
}

int ObPhysicalRestoreTenantExecutor::execute(
    ObExecContext &ctx,
    ObPhysicalRestoreTenantStmt &stmt)
{
  int ret = OB_SUCCESS;
  int tmp_ret = OB_SUCCESS;
  ObTaskExecutorCtx *task_exec_ctx = NULL;
  obrpc::ObCommonRpcProxy *common_rpc_proxy = NULL;
  ObSQLSessionInfo *session_info = ctx.get_my_session();
  const obrpc::ObPhysicalRestoreTenantArg &restore_tenant_arg = stmt.get_rpc_arg();
  const bool is_preview = stmt.get_is_preview();
  ObString first_stmt;
  ObObj value;
  obrpc::Int64 job_id = OB_INVALID_ID;
  if (OB_FAIL(stmt.get_first_stmt(first_stmt))) {
    LOG_WARN("fail to get first stmt" , K(ret));
  } else {
    const_cast<obrpc::ObPhysicalRestoreTenantArg&>(restore_tenant_arg).sql_text_ = first_stmt;
  }
  if (OB_FAIL(ret)) {
  } else if (session_info->user_variable_exists(OB_RESTORE_SOURCE_NAME_SESSION_STR)) {
    if (OB_FAIL(session_info->get_user_variable_value(OB_RESTORE_SOURCE_NAME_SESSION_STR, value))) {
      LOG_WARN("failed to get user variable value", K(ret));
    } else {
      const_cast<obrpc::ObPhysicalRestoreTenantArg&>(restore_tenant_arg).multi_uri_ = value.get_char();
    }
  }
  if (OB_FAIL(ret)) {
  } else {
    if (!is_preview) {
      if (OB_ISNULL(task_exec_ctx = GET_TASK_EXECUTOR_CTX(ctx))) {
        ret = OB_NOT_INIT;
        LOG_WARN("get task executor context failed", K(ret));
      } else if (OB_FAIL(task_exec_ctx->get_common_rpc(common_rpc_proxy))) {
        LOG_WARN("get common rpc proxy failed", K(ret));
      } else if (OB_ISNULL(common_rpc_proxy)){
        ret = OB_ERR_UNEXPECTED;
        LOG_WARN("common rpc proxy should not be null", K(ret));
      } else if (OB_FAIL(common_rpc_proxy->physical_restore_tenant(restore_tenant_arg, job_id))) {
        LOG_WARN("rpc proxy restore tenant failed", K(ret), "dst", common_rpc_proxy->get_server());
      }
      if (session_info->user_variable_exists(OB_RESTORE_SOURCE_NAME_SESSION_STR)) {
        tmp_ret = session_info->remove_user_variable(OB_RESTORE_SOURCE_NAME_SESSION_STR);
        if (tmp_ret != OB_SUCCESS) {
          tmp_ret = OB_SUCCESS == ret ? tmp_ret : ret;
          LOG_WARN("failed to remove user variable", KR(tmp_ret));
        }
      }
      if (OB_FAIL(ret)) {
      } else if (OB_FAIL(sync_wait_tenant_created_(ctx, restore_tenant_arg.tenant_name_, job_id))) {
        LOG_WARN("failed to sync wait tenant created", K(ret));
      }
    } else if (OB_FAIL(physical_restore_preview(ctx, stmt))) {
      LOG_WARN("failed to do physical restore preview", K(ret));
    }
  }
  return ret;
}

int ObPhysicalRestoreTenantExecutor::sync_wait_tenant_created_(
    ObExecContext &ctx, const ObString &tenant_name, const int64_t job_id)
{
  int ret = OB_SUCCESS;
  const int64_t timeout = 10 * 60 * 1000 * 1000; // 10min
  const int64_t abs_timeout = ObTimeUtility::current_time() + timeout;
  const int64_t cur_time_us = ObTimeUtility::current_time();
  ObTimeoutCtx timeout_ctx;
  common::ObMySQLProxy *sql_proxy = nullptr;
  ctx.get_physical_plan_ctx()->set_timeout_timestamp(abs_timeout);
  LOG_INFO("sync wait tenant created start", K(timeout), K(abs_timeout), K(tenant_name));
  if (OB_ISNULL(sql_proxy = ctx.get_sql_proxy())) {
    ret = OB_ERR_UNEXPECTED;
    LOG_WARN("sql proxy must not be null", K(ret));
  } else if (OB_FALSE_IT(THIS_WORKER.set_timeout_ts(abs_timeout))) {
  } else if (OB_FAIL(timeout_ctx.set_trx_timeout_us(timeout))) {
    LOG_WARN("failed to set trx timeout us", K(ret), K(timeout));
  } else if (OB_FAIL(timeout_ctx.set_abs_timeout(abs_timeout))) {
    LOG_WARN("failed to set abs timeout", K(ret));
  } else {
    ObSchemaGetterGuard schema_guard;
    ObSchemaGetterGuard meta_tenant_scheam_guard;
    uint64_t user_tenant_id = 0;
    uint64_t meta_tenant_id = 0;
    while (OB_SUCC(ret)) {
      schema_guard.reset();
      meta_tenant_scheam_guard.reset();
      const ObTenantSchema *tenant_info = nullptr;
      if (ObTimeUtility::current_time() > abs_timeout) {
        ret = OB_TIMEOUT;
        LOG_WARN("wait restore tenant timeout", K(ret), K(tenant_name), K(abs_timeout), "cur_time_us", ObTimeUtility::current_time());
      } else if (OB_FAIL(ctx.check_status())) {
        LOG_WARN("check exec ctx failed", K(ret));
      } else if (OB_FAIL(GCTX.schema_service_->get_tenant_schema_guard(OB_SYS_TENANT_ID, schema_guard))) {
        LOG_WARN("failed to get_tenant_schema_guard", KR(ret));
      } else if (OB_FAIL(schema_guard.get_tenant_id(tenant_name, user_tenant_id))) {
          LOG_WARN("failed to get tenant id from schema guard", KR(ret), K(tenant_name));
      } else if (!is_user_tenant(user_tenant_id)) {
        ret = OB_ERR_UNEXPECTED;
        LOG_WARN("invalid user tenant id", K(ret), K(user_tenant_id));
      } else if (OB_FALSE_IT(meta_tenant_id = gen_meta_tenant_id(user_tenant_id))) {
      } else if (OB_FAIL(GCTX.schema_service_->get_tenant_schema_guard(meta_tenant_id, meta_tenant_scheam_guard))) {
        LOG_WARN("failed to get tenant schema guard", K(ret), K(meta_tenant_id));
      } else if (OB_FAIL(meta_tenant_scheam_guard.get_tenant_info(meta_tenant_id, tenant_info))) {
        LOG_WARN("failed to get meta tenant schema guard", K(ret), K(meta_tenant_id));
      } else if (OB_ISNULL(tenant_info)) {
        ret = OB_ERR_UNEXPECTED;
        LOG_WARN("tenant schema must not be null", K(ret), K(meta_tenant_id));
      } else if (!tenant_info->is_normal()) {
        ret = OB_EAGAIN;
        LOG_DEBUG("tenant status not normal, wait later", K(ret), K(meta_tenant_id));
      } else {
        break;
      }

      if (OB_ERR_INVALID_TENANT_NAME == ret || OB_EAGAIN == ret) {
        bool is_failed = false;
        bool is_finish = false;
        if (OB_FAIL(ObRestoreUtil::check_physical_restore_finish(*sql_proxy, job_id, is_finish, is_failed))) {
          LOG_WARN("failed to check physical restore finish", K(ret), K(job_id));
        } else if (!is_finish) {
          sleep(1);
          LOG_DEBUG("restore not finish, wait later", K(ret), K(user_tenant_id));
        } else if (is_failed) {
          char comment[OB_INNER_TABLE_DEFAULT_KEY_LENTH] = { 0 };
          if(OB_FAIL(ObRestoreUtil::get_restore_job_comment(*sql_proxy, job_id, comment, OB_INNER_TABLE_DEFAULT_KEY_LENTH))) {
            LOG_WARN("failed to get failed restore job comment", K(ret), K(job_id));
          }
          ret = OB_RESTORE_TENANT_FAILED;
          LOG_WARN("restore tenant failed.", K(ret), K(tenant_name), K(comment));
          LOG_USER_ERROR(OB_RESTORE_TENANT_FAILED, tenant_name.ptr(), comment);
        } else {
          break;
        }
      }
    }

    if (OB_SUCC(ret)) {
      int cost_ts = (ObTimeUtility::current_time() - cur_time_us) / 1000000;
      LOG_INFO("sync wait tenant created finished", K(cost_ts), K(tenant_name));
    } else {
      int cost_ts = (ObTimeUtility::current_time() - cur_time_us) / 1000000;
      LOG_WARN("sync wait tenant created failed", K(ret), K(cost_ts), K(tenant_name));
    }
  }
  return ret;
}

int ObPhysicalRestoreTenantExecutor::physical_restore_preview(
    ObExecContext &ctx, ObPhysicalRestoreTenantStmt &stmt)
{
  int ret = OB_SUCCESS;
  ObSqlString set_backup_dest_sql;
  ObSqlString set_scn_sql;
  ObSqlString set_timestamp_sql;
  sqlclient::ObISQLConnection *conn = NULL;
  observer::ObInnerSQLConnectionPool *pool = NULL;
  ObMySQLProxy *sql_proxy = ctx.get_sql_proxy();
  ObSQLSessionInfo *session_info = ctx.get_my_session();
  const obrpc::ObPhysicalRestoreTenantArg &restore_tenant_arg = stmt.get_rpc_arg();
  int64_t affected_rows = 0;
  if (OB_ISNULL(session_info)) {
    ret = OB_INVALID_ARGUMENT;
    LOG_WARN("invalid args", K(ret), KP(session_info));
  } else if (OB_ISNULL(sql_proxy = GCTX.sql_proxy_) || OB_ISNULL(sql_proxy->get_pool())) {
    ret = OB_ERR_UNEXPECTED;
    LOG_WARN("sql proxy must not null", K(ret), KP(GCTX.sql_proxy_));
  } else if (sqlclient::INNER_POOL != sql_proxy->get_pool()->get_type()) {
    ret = OB_ERR_UNEXPECTED;
    LOG_WARN("pool type must be inner", K(ret), "type", sql_proxy->get_pool()->get_type());
  } else if (OB_ISNULL(pool = static_cast<observer::ObInnerSQLConnectionPool*>(sql_proxy->get_pool()))) {
    ret = OB_ERR_UNEXPECTED;
    LOG_WARN("pool must not null", K(ret));
  } else if (OB_FAIL(set_backup_dest_sql.assign_fmt("set @%s = '%.*s'",
      OB_RESTORE_PREVIEW_BACKUP_DEST_SESSION_STR, restore_tenant_arg.uri_.length(), restore_tenant_arg.uri_.ptr()))) {
    LOG_WARN("failed to set backup dest", KR(ret), K(set_backup_dest_sql));
  } else if (OB_FAIL(set_scn_sql.assign_fmt("set @%s = '%ld'",
      OB_RESTORE_PREVIEW_SCN_SESSION_STR, restore_tenant_arg.with_restore_scn_ ? restore_tenant_arg.restore_scn_.get_val_for_inner_table_field() : 0))) {
    LOG_WARN("failed to set timestamp", KR(ret), K(set_scn_sql));
  } else if (OB_FAIL(set_scn_sql.assign_fmt("set @%s = '%.*s'",
      OB_RESTORE_PREVIEW_TIMESTAMP_SESSION_STR, restore_tenant_arg.restore_timestamp_.length(), restore_tenant_arg.uri_.ptr()))) {
    LOG_WARN("failed to set timestamp", KR(ret), K(set_scn_sql));
  } else if (OB_FAIL(pool->acquire(session_info, conn))) {
    LOG_WARN("failed to get conn", K(ret));
  } else if (OB_FAIL(conn->execute_write(session_info->get_effective_tenant_id(),
      set_backup_dest_sql.ptr(), affected_rows))) {
    LOG_WARN("failed to set backup dest", K(ret), K(set_backup_dest_sql));
  } else if (OB_FAIL(conn->execute_write(session_info->get_effective_tenant_id(),
      set_scn_sql.ptr(), affected_rows))) {
    LOG_WARN("failed to set restore timestamp", K(ret), K(set_scn_sql));
  }

  return ret;
}

} //end namespace sql
} //end namespace oceanbase