// Licensed to the Apache Software Foundation (ASF) under one

// or more contributor license agreements.  See the NOTICE file

// distributed with this work for additional information

// regarding copyright ownership.  The ASF licenses this file

// to you 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.

#include "cloud/cloud_base_compaction.h"

#include <gen_cpp/cloud.pb.h>

#include <algorithm>

#include <boost/container_hash/hash.hpp>

#include "cloud/cloud_meta_mgr.h"

#include "cloud/config.h"

#include "common/config.h"

#include "core/value/vdatetime_value.h"

#include "cpp/sync_point.h"

#include "service/backend_options.h"

#include "storage/compaction/compaction.h"

#include "storage/task/engine_checksum_task.h"

#include "util/thread.h"

#include "util/uuid_generator.h"

namespace doris {

using namespace ErrorCode;

bvar::Adder<uint64_t> base_output_size("base_compaction", "output_size");

bvar::Adder<uint64_t> base_input_cached_size("base_compaction", "input_cached_size");

bvar::Adder<uint64_t> base_input_size("base_compaction", "input_size");

bvar::LatencyRecorder g_base_compaction_hold_delete_bitmap_lock_time_ms(

        "base_compaction_hold_delete_bitmap_lock_time_ms");

CloudBaseCompaction::CloudBaseCompaction(CloudStorageEngine& engine, CloudTabletSPtr tablet)

        : CloudCompactionMixin(engine, tablet,

                               "BaseCompaction:" + std::to_string(tablet->tablet_id())) {}

CloudBaseCompaction::~CloudBaseCompaction() = default;

Status CloudBaseCompaction::prepare_compact() {

    Status st;

    Defer defer_set_st([&] {

        if (!st.ok()) {

            cloud_tablet()->set_last_base_compaction_status(st.to_string());

            cloud_tablet()->set_last_base_compaction_failure_time(UnixMillis());

        }

    });

    if (_tablet->tablet_state() != TABLET_RUNNING) {

        st = Status::InternalError("invalid tablet state. tablet_id={}", _tablet->tablet_id());

        return st;

    }

    bool need_sync_tablet = true;

    {

        std::shared_lock rlock(_tablet->get_header_lock());

        // If number of rowsets is equal to approximate_num_rowsets, it is very likely that this tablet has been

        // synchronized with meta-service.

        if (_tablet->tablet_meta()->all_rs_metas().size() >=

                    cloud_tablet()->fetch_add_approximate_num_rowsets(0) &&

            cloud_tablet()->last_sync_time_s > 0) {

            need_sync_tablet = false;

        }

    }

    if (need_sync_tablet) {

        st = cloud_tablet()->sync_rowsets();

        RETURN_IF_ERROR(st);

    }

    st = pick_rowsets_to_compact();

    RETURN_IF_ERROR(st);

    for (auto& rs : _input_rowsets) {

        _input_row_num += rs->num_rows();

        _input_segments += rs->num_segments();

        _input_rowsets_data_size += rs->data_disk_size();

        _input_rowsets_index_size += rs->index_disk_size();

        _input_rowsets_total_size += rs->total_disk_size();

        _input_rowsets_cached_data_size += rs->approximate_cached_data_size();

        _input_rowsets_cached_index_size += rs->approximate_cache_index_size();

    }

    LOG_INFO("start CloudBaseCompaction, tablet_id={}, range=[{}-{}]", _tablet->tablet_id(),

             _input_rowsets.front()->start_version(), _input_rowsets.back()->end_version())

            .tag("job_id", _uuid)

            .tag("input_rowsets", _input_rowsets.size())

            .tag("input_rows", _input_row_num)

            .tag("input_segments", _input_segments)

            .tag("input_rowsets_data_size", _input_rowsets_data_size)

            .tag("input_rowsets_index_size", _input_rowsets_index_size)

            .tag("input_rowsets_total_size", _input_rowsets_total_size)

            .tag("input_rowsets_cached_data_size", _input_rowsets_cached_data_size)

            .tag("input_rowsets_cached_index_size", _input_rowsets_cached_index_size);

    base_input_cached_size << (_input_rowsets_cached_data_size + _input_rowsets_cached_index_size);

    base_input_size << _input_rowsets_total_size;

    return Status::OK();

}

Status CloudBaseCompaction::request_global_lock() {

    // prepare compaction job

    cloud::TabletJobInfoPB job;

    auto idx = job.mutable_idx();

    idx->set_tablet_id(_tablet->tablet_id());

    idx->set_table_id(_tablet->table_id());

    idx->set_index_id(_tablet->index_id());

    idx->set_partition_id(_tablet->partition_id());

    auto compaction_job = job.add_compaction();

    compaction_job->set_id(_uuid);

    compaction_job->set_initiator(BackendOptions::get_localhost() + ':' +

                                  std::to_string(config::heartbeat_service_port));

    compaction_job->set_type(cloud::TabletCompactionJobPB::BASE);

    compaction_job->set_base_compaction_cnt(_base_compaction_cnt);

    compaction_job->set_cumulative_compaction_cnt(_cumulative_compaction_cnt);

    compaction_job->add_input_versions(_input_rowsets.front()->start_version());

    compaction_job->add_input_versions(_input_rowsets.back()->end_version());

    using namespace std::chrono;

    int64_t now = duration_cast<seconds>(system_clock::now().time_since_epoch()).count();

    _expiration = now + config::compaction_timeout_seconds;

    compaction_job->set_expiration(_expiration);

    compaction_job->set_lease(now + config::lease_compaction_interval_seconds * 4);

    cloud::StartTabletJobResponse resp;

    auto st = _engine.meta_mgr().prepare_tablet_job(job, &resp);

    cloud_tablet()->set_last_base_compaction_status(st.to_string());

    if (resp.has_alter_version()) {

        (static_cast<CloudTablet*>(_tablet.get()))->set_alter_version(resp.alter_version());

    }

    if (!st.ok()) {

        cloud_tablet()->set_last_base_compaction_failure_time(UnixMillis());

        if (resp.status().code() == cloud::STALE_TABLET_CACHE) {

            // set last_sync_time to 0 to force sync tablet next time

            cloud_tablet()->last_sync_time_s = 0;

        } else if (resp.status().code() == cloud::TABLET_NOT_FOUND) {

            // tablet not found

            cloud_tablet()->clear_cache();

        } else if (resp.status().code() == cloud::JOB_CHECK_ALTER_VERSION) {

            auto* cloud_tablet = (static_cast<CloudTablet*>(_tablet.get()));

            std::stringstream ss;

            ss << "failed to prepare cumu compaction. Check compaction input versions "

                  "failed in schema change. The input version end must "

                  "less than or equal to alter_version."

                  "current alter version in BE is not correct."

                  "input_version_start="

               << compaction_job->input_versions(0)

               << " input_version_end=" << compaction_job->input_versions(1)

               << " current alter_version=" << cloud_tablet->alter_version()

               << " schema_change_alter_version=" << resp.alter_version();

            std::string msg = ss.str();

            LOG(WARNING) << msg;

            return Status::InternalError(msg);

        }

    }

    return st;

}

void CloudBaseCompaction::_filter_input_rowset() {

    // if dup_key and no delete predicate

    // we skip big files to save resources

    if (_tablet->keys_type() != KeysType::DUP_KEYS) {

        return;

    }

    for (auto& rs : _input_rowsets) {

        if (rs->rowset_meta()->has_delete_predicate()) {

            return;

        }

    }

    int64_t max_size = config::base_compaction_dup_key_max_file_size_mbytes * 1024 * 1024;

    // first find a proper rowset for start

    auto rs_iter = _input_rowsets.begin();

    while (rs_iter != _input_rowsets.end()) {

        if ((*rs_iter)->rowset_meta()->total_disk_size() >= max_size) {

            rs_iter = _input_rowsets.erase(rs_iter);

        } else {

            break;

        }

    }

}

Status CloudBaseCompaction::pick_rowsets_to_compact() {

    _input_rowsets.clear();

    {

        std::shared_lock rlock(_tablet->get_header_lock());

        _base_compaction_cnt = cloud_tablet()->base_compaction_cnt();

        _cumulative_compaction_cnt = cloud_tablet()->cumulative_compaction_cnt();

        _input_rowsets = cloud_tablet()->pick_candidate_rowsets_to_base_compaction_unlocked();

    }

    if (auto st = check_version_continuity(_input_rowsets); !st.ok()) {

        DCHECK(false) << st;

        return st;

    }

    _filter_input_rowset();

    if (_input_rowsets.size() <= 1) {

        return Status::Error<BE_NO_SUITABLE_VERSION>(

                "insufficent compaction input rowset, #rowsets={}", _input_rowsets.size());

    }

    if (_input_rowsets.size() == 2 && _input_rowsets[0]->end_version() == 1) {

        // the tablet is with rowset: [0-1], [2-y]

        // and [0-1] has no data. in this situation, no need to do base compaction.

        return Status::Error<BE_NO_SUITABLE_VERSION>("no suitable versions for compaction");

    }

    int score = 0;

    int rowset_cnt = 0;

    int64_t max_compaction_score = _tablet->keys_type() == KeysType::UNIQUE_KEYS &&

                                                   _tablet->enable_unique_key_merge_on_write()

                                           ? config::mow_base_compaction_max_compaction_score

                                           : config::base_compaction_max_compaction_score;

    while (rowset_cnt < _input_rowsets.size()) {

        score += _input_rowsets[rowset_cnt++]->rowset_meta()->get_compaction_score();

        if (score > max_compaction_score) {

            break;

        }

    }

    _input_rowsets.resize(rowset_cnt);

    // 1. cumulative rowset must reach base_compaction_min_rowset_num threshold

    if (_input_rowsets.size() > config::base_compaction_min_rowset_num) {

        VLOG_NOTICE << "satisfy the base compaction policy. tablet=" << _tablet->tablet_id()

                    << ", num_cumulative_rowsets=" << _input_rowsets.size() - 1

                    << ", base_compaction_num_cumulative_rowsets="

                    << config::base_compaction_min_rowset_num;

        apply_txn_size_truncation_and_log("CloudBaseCompaction");

        return Status::OK();

    }

    // 2. the ratio between base rowset and all input cumulative rowsets reaches the threshold

    // `_input_rowsets` has been sorted by end version, so we consider `_input_rowsets[0]` is the base rowset.

    int64_t base_size = _input_rowsets.front()->data_disk_size();

    int64_t cumulative_total_size = 0;

    for (auto it = _input_rowsets.begin() + 1; it != _input_rowsets.end(); ++it) {

        cumulative_total_size += (*it)->data_disk_size();

    }

    double base_cumulative_delta_ratio = config::base_compaction_min_data_ratio;

    if (base_size == 0) {

        // base_size == 0 means this may be a base version [0-1], which has no data.

        // set to 1 to void divide by zero

        base_size = 1;

    }

    double cumulative_base_ratio = static_cast<double>(cumulative_total_size) / base_size;

    if (cumulative_base_ratio > base_cumulative_delta_ratio) {

        VLOG_NOTICE << "satisfy the base compaction policy. tablet=" << _tablet->tablet_id()

                    << ", cumulative_total_size=" << cumulative_total_size

                    << ", base_size=" << base_size

                    << ", cumulative_base_ratio=" << cumulative_base_ratio

                    << ", policy_ratio=" << base_cumulative_delta_ratio;

        apply_txn_size_truncation_and_log("CloudBaseCompaction");

        return Status::OK();

    }

    // 3. the interval since last base compaction reaches the threshold

    int64_t base_creation_time = _input_rowsets[0]->creation_time();

    int64_t interval_threshold = config::base_compaction_interval_seconds_since_last_operation;

    int64_t interval_since_last_base_compaction = time(nullptr) - base_creation_time;

    if (interval_since_last_base_compaction > interval_threshold) {

        VLOG_NOTICE << "satisfy the base compaction policy. tablet=" << _tablet->tablet_id()

                    << ", interval_since_last_base_compaction="

                    << interval_since_last_base_compaction

                    << ", interval_threshold=" << interval_threshold;

        apply_txn_size_truncation_and_log("CloudBaseCompaction");

        return Status::OK();

    }

    VLOG_NOTICE << "don't satisfy the base compaction policy. tablet=" << _tablet->tablet_id()

                << ", num_cumulative_rowsets=" << _input_rowsets.size() - 1

                << ", cumulative_base_ratio=" << cumulative_base_ratio

                << ", interval_since_last_base_compaction=" << interval_since_last_base_compaction;

    return Status::Error<BE_NO_SUITABLE_VERSION>("no suitable versions for compaction");

}

Status CloudBaseCompaction::execute_compact() {

#ifndef __APPLE__

    if (config::enable_base_compaction_idle_sched) {

        Thread::set_idle_sched();

    }

#endif

    SCOPED_ATTACH_TASK(_mem_tracker);

    using namespace std::chrono;

    auto start = steady_clock::now();

    Status st;

    Defer defer_set_st([&] {

        cloud_tablet()->set_last_base_compaction_status(st.to_string());

        if (!st.ok()) {

            cloud_tablet()->set_last_base_compaction_failure_time(UnixMillis());

        } else {

            cloud_tablet()->set_last_base_compaction_success_time(UnixMillis());

        }

    });

    st = CloudCompactionMixin::execute_compact();

    if (!st.ok()) {

        LOG(WARNING) << "fail to do " << compaction_name() << ". res=" << st

                     << ", tablet=" << _tablet->tablet_id()

                     << ", output_version=" << _output_version;

        return st;

    }

    LOG_INFO("finish CloudBaseCompaction, tablet_id={}, cost={}ms range=[{}-{}]",

             _tablet->tablet_id(), duration_cast<milliseconds>(steady_clock::now() - start).count(),

             _input_rowsets.front()->start_version(), _input_rowsets.back()->end_version())

            .tag("job_id", _uuid)

            .tag("input_rowsets", _input_rowsets.size())

            .tag("input_rows", _input_row_num)

            .tag("input_segments", _input_segments)

            .tag("input_rowsets_data_size", _input_rowsets_data_size)

            .tag("input_rowsets_index_size", _input_rowsets_index_size)

            .tag("input_rowsets_total", _input_rowsets_total_size)

            .tag("output_rows", _output_rowset->num_rows())

            .tag("output_segments", _output_rowset->num_segments())

            .tag("output_rowset_data_size", _output_rowset->data_disk_size())

            .tag("output_rowset_index_size", _output_rowset->index_disk_size())

            .tag("output_rowset_total_size", _output_rowset->total_disk_size())

            .tag("local_read_time_us", _stats.cloud_local_read_time)

            .tag("remote_read_time_us", _stats.cloud_remote_read_time)

            .tag("local_read_bytes", _local_read_bytes_total)

            .tag("remote_read_bytes", _remote_read_bytes_total);

    //_compaction_succeed = true;

    _state = CompactionState::SUCCESS;

    DorisMetrics::instance()->base_compaction_deltas_total->increment(_input_rowsets.size());

    DorisMetrics::instance()->base_compaction_bytes_total->increment(_input_rowsets_total_size);

    base_output_size << _output_rowset->total_disk_size();

    st = Status::OK();

    return st;

}

Status CloudBaseCompaction::modify_rowsets() {

    // commit compaction job

    cloud::TabletJobInfoPB job;

    auto idx = job.mutable_idx();

    idx->set_tablet_id(_tablet->tablet_id());

    idx->set_table_id(_tablet->table_id());

    idx->set_index_id(_tablet->index_id());

    idx->set_partition_id(_tablet->partition_id());

    auto compaction_job = job.add_compaction();

    compaction_job->set_id(_uuid);

    compaction_job->set_initiator(BackendOptions::get_localhost() + ':' +

                                  std::to_string(config::heartbeat_service_port));

    compaction_job->set_type(cloud::TabletCompactionJobPB::BASE);

    compaction_job->set_input_cumulative_point(cloud_tablet()->cumulative_layer_point());

    compaction_job->set_output_cumulative_point(cloud_tablet()->cumulative_layer_point());

    compaction_job->set_num_input_rows(_input_row_num);

    compaction_job->set_num_output_rows(_output_rowset->num_rows());

    compaction_job->set_size_input_rowsets(_input_rowsets_total_size);

    compaction_job->set_size_output_rowsets(_output_rowset->total_disk_size());

    compaction_job->set_num_input_segments(_input_segments);

    compaction_job->set_num_output_segments(_output_rowset->num_segments());

    compaction_job->set_num_input_rowsets(num_input_rowsets());

    compaction_job->set_num_output_rowsets(1);

    compaction_job->add_input_versions(_input_rowsets.front()->start_version());

    compaction_job->add_input_versions(_input_rowsets.back()->end_version());

    compaction_job->add_output_versions(_output_rowset->end_version());

    compaction_job->add_txn_id(_output_rowset->txn_id());

    compaction_job->add_output_rowset_ids(_output_rowset->rowset_id().to_string());

    compaction_job->set_index_size_input_rowsets(_input_rowsets_index_size);

    compaction_job->set_segment_size_input_rowsets(_input_rowsets_data_size);

    compaction_job->set_index_size_output_rowsets(_output_rowset->index_disk_size());

    compaction_job->set_segment_size_output_rowsets(_output_rowset->data_disk_size());

    DeleteBitmapPtr output_rowset_delete_bitmap = nullptr;

    int64_t get_delete_bitmap_lock_start_time = 0;

    if (_tablet->keys_type() == KeysType::UNIQUE_KEYS &&

        _tablet->enable_unique_key_merge_on_write()) {

        int64_t initiator = this->initiator();

        RETURN_IF_ERROR(cloud_tablet()->calc_delete_bitmap_for_compaction(

                _input_rowsets, _output_rowset, *_rowid_conversion, compaction_type(),

                _stats.merged_rows, _stats.filtered_rows, initiator, output_rowset_delete_bitmap,

                _allow_delete_in_cumu_compaction, get_delete_bitmap_lock_start_time));

        LOG_INFO("update delete bitmap in CloudBaseCompaction, tablet_id={}, range=[{}-{}]",

                 _tablet->tablet_id(), _input_rowsets.front()->start_version(),

                 _input_rowsets.back()->end_version())

                .tag("job_id", _uuid)

                .tag("initiator", initiator)

                .tag("input_rowsets", _input_rowsets.size())

                .tag("input_rows", _input_row_num)

                .tag("input_segments", _input_segments)

                .tag("num_output_delete_bitmap", output_rowset_delete_bitmap->delete_bitmap.size());

        compaction_job->set_delete_bitmap_lock_initiator(initiator);

    }

    cloud::FinishTabletJobResponse resp;

    auto st = _engine.meta_mgr().commit_tablet_job(job, &resp);

    if (_tablet->keys_type() == KeysType::UNIQUE_KEYS &&

        _tablet->enable_unique_key_merge_on_write()) {

        int64_t hold_delete_bitmap_lock_time_ms =

                (MonotonicMicros() - get_delete_bitmap_lock_start_time) / 1000;

        g_base_compaction_hold_delete_bitmap_lock_time_ms << hold_delete_bitmap_lock_time_ms;

    }

    if (!st.ok()) {

        if (resp.status().code() == cloud::TABLET_NOT_FOUND) {

            cloud_tablet()->clear_cache();

        } else if (resp.status().code() == cloud::JOB_CHECK_ALTER_VERSION) {

            auto* cloud_tablet = (static_cast<CloudTablet*>(_tablet.get()));

            std::stringstream ss;

            ss << "failed to prepare cumu compaction. Check compaction input versions "

                  "failed in schema change. The input version end must "

                  "less than or equal to alter_version."

                  "current alter version in BE is not correct."

                  "input_version_start="

               << compaction_job->input_versions(0)

               << " input_version_end=" << compaction_job->input_versions(1)

               << " current alter_version=" << cloud_tablet->alter_version()

               << " schema_change_alter_version=" << resp.alter_version();

            std::string msg = ss.str();

            LOG(WARNING) << msg;

            cloud_tablet->set_alter_version(resp.alter_version());

            return Status::InternalError(msg);

        }

        return st;

    }

    auto& stats = resp.stats();

    LOG(INFO) << "tablet stats=" << stats.ShortDebugString();

    {

        std::unique_lock wrlock(_tablet->get_header_lock());

        // clang-format off

        cloud_tablet()->set_last_base_compaction_success_time(std::max(cloud_tablet()->last_base_compaction_success_time(), stats.last_base_compaction_time_ms()));

        cloud_tablet()->set_last_cumu_compaction_success_time(std::max(cloud_tablet()->last_cumu_compaction_success_time(), stats.last_cumu_compaction_time_ms()));

        cloud_tablet()->set_last_full_compaction_success_time(std::max(cloud_tablet()->last_full_compaction_success_time(), stats.last_full_compaction_time_ms()));

        // clang-format on

        if (cloud_tablet()->base_compaction_cnt() >= stats.base_compaction_cnt()) {

            // This could happen while calling `sync_tablet_rowsets` during `commit_tablet_job`

            return Status::OK();

        }

        // Try to make output rowset visible immediately in tablet cache, instead of waiting for next synchronization from meta-service.

        cloud_tablet()->delete_rowsets(_input_rowsets, wrlock);

        cloud_tablet()->add_rowsets({_output_rowset}, false, wrlock);

        // ATTN: MUST NOT update `cumu_compaction_cnt` or `cumu_point` which are used when sync rowsets, otherwise may cause

        // the tablet to be unable to synchronize the rowset meta changes generated by cumu compaction.

        cloud_tablet()->set_base_compaction_cnt(stats.base_compaction_cnt());

        if (output_rowset_delete_bitmap) {

            _tablet->tablet_meta()->delete_bitmap().merge(*output_rowset_delete_bitmap);

        }

        if (stats.cumulative_compaction_cnt() >= cloud_tablet()->cumulative_compaction_cnt()) {

            cloud_tablet()->reset_approximate_stats(stats.num_rowsets(), stats.num_segments(),

                                                    stats.num_rows(), stats.data_size());

        }

    }

    _tablet->prefill_dbm_agg_cache_after_compaction(_output_rowset);

    return Status::OK();

}

Status CloudBaseCompaction::garbage_collection() {

    RETURN_IF_ERROR(CloudCompactionMixin::garbage_collection());

    cloud::TabletJobInfoPB job;

    auto idx = job.mutable_idx();

    idx->set_tablet_id(_tablet->tablet_id());

    idx->set_table_id(_tablet->table_id());

    idx->set_index_id(_tablet->index_id());

    idx->set_partition_id(_tablet->partition_id());

    auto compaction_job = job.add_compaction();

    compaction_job->set_id(_uuid);

    compaction_job->set_initiator(BackendOptions::get_localhost() + ':' +

                                  std::to_string(config::heartbeat_service_port));

    compaction_job->set_type(cloud::TabletCompactionJobPB::BASE);

    if (_tablet->keys_type() == KeysType::UNIQUE_KEYS &&

        _tablet->enable_unique_key_merge_on_write()) {

        compaction_job->set_delete_bitmap_lock_initiator(this->initiator());

    }

    auto st = _engine.meta_mgr().abort_tablet_job(job);

    if (!st.ok()) {

        LOG_WARNING("failed to abort compaction job")

                .tag("job_id", _uuid)

                .tag("tablet_id", _tablet->tablet_id())

                .error(st);

    }

    return st;

}

void CloudBaseCompaction::do_lease() {

    cloud::TabletJobInfoPB job;

    if (_state == CompactionState::SUCCESS) {

        return;

    }

    auto idx = job.mutable_idx();

    idx->set_tablet_id(_tablet->tablet_id());

    idx->set_table_id(_tablet->table_id());

    idx->set_index_id(_tablet->index_id());

    idx->set_partition_id(_tablet->partition_id());

    auto compaction_job = job.add_compaction();

    compaction_job->set_id(_uuid);

    using namespace std::chrono;

    int64_t lease_time = duration_cast<seconds>(system_clock::now().time_since_epoch()).count() +

                         config::lease_compaction_interval_seconds * 4;

    compaction_job->set_lease(lease_time);

    auto st = _engine.meta_mgr().lease_tablet_job(job);

    if (!st.ok()) {

        LOG_WARNING("failed to lease compaction job")

                .tag("job_id", _uuid)

                .tag("tablet_id", _tablet->tablet_id())

                .error(st);

    }

}

} // namespace doris