package terraform

import (
	"log"

	"github.com/hashicorp/terraform/addrs"

	"github.com/hashicorp/hcl/v2"
	"github.com/hashicorp/terraform/configs/configschema"
	"github.com/zclconf/go-cty/cty"
)

// EvalConfigBlock is an EvalNode implementation that takes a raw
// configuration block and evaluates any expressions within it.
//
// ExpandedConfig is populated with the result of expanding any "dynamic"
// blocks in the given body, which can be useful for extracting correct source
// location information for specific attributes in the result.
type EvalConfigBlock struct {
	Config         *hcl.Body
	Schema         *configschema.Block
	SelfAddr       addrs.Referenceable
	Output         *cty.Value
	ExpandedConfig *hcl.Body
	ContinueOnErr  bool
}

func (n *EvalConfigBlock) Eval(ctx EvalContext) (interface{}, error) {
	val, body, diags := ctx.EvaluateBlock(*n.Config, n.Schema, n.SelfAddr, EvalDataForNoInstanceKey)
	if diags.HasErrors() && n.ContinueOnErr {
		log.Printf("[WARN] Block evaluation failed: %s", diags.Err())
		return nil, EvalEarlyExitError{}
	}

	if n.Output != nil {
		*n.Output = val
	}
	if n.ExpandedConfig != nil {
		*n.ExpandedConfig = body
	}

	return nil, diags.ErrWithWarnings()
}

// EvalConfigExpr is an EvalNode implementation that takes a raw configuration
// expression and evaluates it.
type EvalConfigExpr struct {
	Expr     hcl.Expression
	SelfAddr addrs.Referenceable
	Output   *cty.Value
}

func (n *EvalConfigExpr) Eval(ctx EvalContext) (interface{}, error) {
	val, diags := ctx.EvaluateExpr(n.Expr, cty.DynamicPseudoType, n.SelfAddr)

	if n.Output != nil {
		*n.Output = val
	}

	return nil, diags.ErrWithWarnings()
}