// Copyright Elasticsearch B.V. and/or licensed to Elasticsearch B.V. under one
// or more contributor license agreements. Licensed under the Elastic License;
// you may not use this file except in compliance with the Elastic License.

package beater

import (
	"context"
	"fmt"
	"os"
	"strings"
	"time"

	"github.com/elastic/beats/libbeat/common/fmtstr"

	"github.com/elastic/beats/libbeat/beat"
	"github.com/elastic/beats/libbeat/common"
	"github.com/elastic/beats/libbeat/logp"
	"github.com/elastic/beats/libbeat/monitoring"
	"github.com/elastic/beats/libbeat/processors"
	"github.com/elastic/beats/x-pack/functionbeat/config"
	"github.com/elastic/beats/x-pack/functionbeat/function/core"
	"github.com/elastic/beats/x-pack/functionbeat/function/provider"
	"github.com/elastic/beats/x-pack/functionbeat/function/telemetry"
	"github.com/elastic/beats/x-pack/libbeat/licenser"
)

var (
	graceDelay       = 45 * time.Minute
	refreshDelay     = 15 * time.Minute
	supportedOutputs = []string{
		"elasticsearch",
		"logstash",
		"console", // for local debugging
	}
)

// Functionbeat is a beat designed to run under a serverless environment and listen to external triggers,
// each invocation will generate one or more events to Elasticsearch.
//
// Each serverless implementation is different but functionbeat follows a few execution rules.
// - Publishing events from the source to the output is done synchronously.
// - Execution can be suspended.
// - Run on a read only filesystem
// - More execution constraints based on speed and memory usage.
type Functionbeat struct {
	Ctx       context.Context
	log       *logp.Logger
	cancel    context.CancelFunc
	telemetry telemetry.T
	Provider  provider.Provider
	Config    *config.Config
}

// New creates an instance of functionbeat.
func New(b *beat.Beat, cfg *common.Config) (beat.Beater, error) {
	c := &config.DefaultConfig
	if err := cfg.Unpack(c); err != nil {
		return nil, fmt.Errorf("error reading config file: %+v", err)
	}

	provider, err := provider.Create(c.Provider)
	if err != nil {
		return nil, err
	}
	ctx, cancel := context.WithCancel(context.Background())

	telemetryReg := monitoring.GetNamespace("state").GetRegistry().NewRegistry("functionbeat")

	bt := &Functionbeat{
		Ctx:       ctx,
		log:       logp.NewLogger("functionbeat"),
		cancel:    cancel,
		telemetry: telemetry.New(telemetryReg),
		Provider:  provider,
		Config:    c,
	}
	return bt, nil
}

// Run starts functionbeat.
func (bt *Functionbeat) Run(b *beat.Beat) error {
	defer bt.cancel()

	outputName := b.Config.Output.Name()
	if !isOutputSupported(outputName) {
		return fmt.Errorf("unsupported output type: %s; supported ones: %+v", outputName, supportedOutputs)
	}

	if outputName == "elasticsearch" {
		licenser.Enforce(b.Info.Name, licenser.BasicAndAboveOrTrial)
	}

	bt.log.Info("Functionbeat is running")
	defer bt.log.Info("Functionbeat stopped running")

	clientFactory := makeClientFactory(bt.log, b.Publisher, b.Info)

	enabledFunctions := bt.enabledFunctions()
	bt.log.Infof("Functionbeat is configuring enabled functions: %s", strings.Join(enabledFunctions, ", "))
	// Create a client per function and wrap them into a runnable function by the coordinator.
	functions, err := bt.Provider.CreateFunctions(clientFactory, enabledFunctions)
	if err != nil {
		return fmt.Errorf("error when creating the functions, error: %+v", err)
	}

	// manages the goroutine related to the function handlers, if an error occurs and its not handled
	// by the function itself, it will reach the coordinator, we log the error and shutdown beats.
	// When an error reach the coordinator we assume that we cannot recover from it and we initiate
	// a shutdown and return an aggregated errors.
	coordinator := core.NewCoordinator(logp.NewLogger("coordinator"), functions...)
	err = coordinator.Run(bt.Ctx, bt.telemetry)
	if err != nil {
		return err
	}
	return nil
}

// enabledFunctions returns the enabled function types
func (bt *Functionbeat) enabledFunctions() (values []string) {
	raw, found := os.LookupEnv("ENABLED_FUNCTIONS")
	if !found {
		return values
	}
	return strings.Split(raw, ",")
}

// Stop stops functionbeat.
func (bt *Functionbeat) Stop() {
	bt.log.Info("Functionbeat is stopping")
	defer bt.log.Info("Functionbeat is stopped")
	bt.cancel()
}

func isOutputSupported(name string) bool {
	for _, output := range supportedOutputs {
		if name == output {
			return true
		}
	}
	return false
}

type fnExtraConfig struct {
	Processors processors.PluginConfig `config:"processors"`

	// KeepNull determines whether published events will keep null values or omit them.
	KeepNull bool `config:"keep_null"`

	common.EventMetadata `config:",inline"` // Fields and tags to add to events.

	// ES output index pattern
	Index fmtstr.EventFormatString `config:"index"`
}

func makeClientFactory(log *logp.Logger, pipeline beat.Pipeline, beatInfo beat.Info) func(*common.Config) (core.Client, error) {
	// Each function has his own client to the publisher pipeline,
	// publish operation will block the calling thread, when the method unwrap we have received the
	// ACK for the batch.
	return func(cfg *common.Config) (core.Client, error) {
		c := fnExtraConfig{}

		if err := cfg.Unpack(&c); err != nil {
			return nil, err
		}

		funcProcessors, err := processorsForFunction(beatInfo, c)
		if err != nil {
			return nil, err
		}

		client, err := core.NewSyncClient(log, pipeline, beat.ClientConfig{
			PublishMode: beat.GuaranteedSend,
			Processing: beat.ProcessingConfig{
				Processor:     funcProcessors,
				EventMetadata: c.EventMetadata,
				KeepNull:      c.KeepNull,
			},
		})

		return client, err
	}
}
