/**
 * Copyright (c) 2021 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.
 */

#include "forInStatement.h"

#include <binder/binder.h>
#include <binder/scope.h>
#include <compiler/base/catchTable.h>
#include <compiler/base/lreference.h>
#include <compiler/core/labelTarget.h>
#include <compiler/core/pandagen.h>
#include <typescript/checker.h>

#include <ir/astDump.h>
#include <ir/expression.h>

namespace panda::es2panda::ir {

void ForInStatement::Iterate(const NodeTraverser &cb) const
{
    cb(left_);
    cb(right_);
    cb(body_);
}

void ForInStatement::Dump(ir::AstDumper *dumper) const
{
    dumper->Add({{"type", "ForInStatement"}, {"left", left_}, {"right", right_}, {"body", body_}});
}

void ForInStatement::Compile(compiler::PandaGen *pg) const
{
    if (scope_->NeedLexEnv()) {
        pg->NewLexEnv(this, scope_->LexicalSlots());
    }

    compiler::LocalRegScope loopRegScope(pg, scope_);
    compiler::VReg iter = pg->AllocReg();
    compiler::VReg propName = pg->AllocReg();

    // create enumerator
    {
        compiler::TryContext enumeratorInitTryCtx(pg);
        const auto &labelSet = enumeratorInitTryCtx.LabelSet();
        pg->SetLabel(right_, labelSet.TryBegin());
        right_->Compile(pg);
        pg->SetLabel(right_, labelSet.TryEnd());
        pg->Branch(right_, labelSet.CatchEnd());

        pg->SetLabel(right_, labelSet.CatchBegin());
        compiler::VReg exception = pg->AllocReg();
        pg->StoreAccumulator(right_, exception);
        if (scope_->NeedLexEnv()) {
            pg->PopLexEnv(this);
        }
        pg->LoadAccumulator(right_, exception);
        pg->EmitThrow(right_);
        pg->SetLabel(right_, labelSet.CatchEnd());
    }

    // if no exception occurred, the target object should be in acc
    pg->GetPropIterator(this);
    pg->StoreAccumulator(this, iter);

    if (scope_->NeedLexEnv()) {
        pg->PopLexEnv(this);
    }

    compiler::LabelTarget labelTarget(pg);
    // loop start
    pg->SetLabel(this, labelTarget.ContinueTarget());

    // get next prop of enumerator
    pg->GetNextPropName(this, iter);
    pg->StoreAccumulator(this, propName);
    pg->BranchIfUndefined(this, labelTarget.BreakTarget());

    auto lref = compiler::LReference::CreateLRef(pg, left_, false);
    {
        compiler::LoopEnvScope envScope(pg, scope_, labelTarget);
        pg->LoadAccumulator(this, propName);
        lref.SetValue();
        body_->Compile(pg);
    }

    pg->Branch(this, labelTarget.ContinueTarget());
    pg->SetLabel(this, labelTarget.BreakTarget());
}

checker::Type *ForInStatement::Check([[maybe_unused]] checker::Checker *checker) const
{
    return nullptr;
}

void ForInStatement::UpdateSelf(const NodeUpdater &cb, binder::Binder *binder)
{
    auto *loopScope = Scope();
    auto loopCtx = binder::LexicalScope<binder::LoopScope>::Enter(binder, loopScope);
    left_ = std::get<ir::AstNode *>(cb(left_));
    right_ = std::get<ir::AstNode *>(cb(right_))->AsExpression();

    body_ = UpdateChildStatement(cb, binder, body_);
}

}  // namespace panda::es2panda::ir