/*
Copyright 2021.

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.
*/

package tiflow

import (
	"context"
	"fmt"
	"time"

	corev1 "k8s.io/api/core/v1"
	apierrors "k8s.io/apimachinery/pkg/api/errors"
	"k8s.io/apimachinery/pkg/types"
	ctrl "sigs.k8s.io/controller-runtime"
	"sigs.k8s.io/controller-runtime/pkg/builder"
	"sigs.k8s.io/controller-runtime/pkg/client"
	"sigs.k8s.io/controller-runtime/pkg/controller"
	"sigs.k8s.io/controller-runtime/pkg/controller/controllerutil"
	"sigs.k8s.io/controller-runtime/pkg/log"
	"sigs.k8s.io/controller-runtime/pkg/predicate"

	eksv1alpha1 "github.com/tidbcloud/eks-provider/api/v1alpha1"
	"github.com/tidbcloud/eks-provider/controllers/tiflow/task"
	"github.com/tidbcloud/eks-provider/controllers/tiflow/task/job"
	"github.com/tidbcloud/infra-provider/pkg/config"
	"github.com/tidbcloud/infra-provider/pkg/controllers/common"
	"github.com/tidbcloud/infra-provider/pkg/deploy"
	metricsctrl "github.com/tidbcloud/infra-provider/pkg/metrics/controller"
	"github.com/tidbcloud/infra-provider/pkg/procedure"
)

// TiflowJobReconciler reconciles a TiflowJob object
type TiflowJobReconciler struct {
	BaseTiflowReconciler
}

func NewTiflowJobReconciler(mgr ctrl.Manager, infraCli client.Client, infraReader client.Reader, config config.RootConfig, svc procedure.AWSService) *TiflowJobReconciler {
	tiflowJobReconciler := &TiflowJobReconciler{
		BaseTiflowReconciler: BaseTiflowReconciler{
			Scheme:        mgr.GetScheme(),
			Local:         infraCli,
			Logger:        ctrl.Log.WithName("controllers").WithName("TiflowJob"),
			Config:        config,
			Cache:         infraReader,
			EventRecorder: mgr.GetEventRecorderFor("tiflow-job-controller"),
			AWSSVC:        svc,
		},
	}
	return tiflowJobReconciler
}

//+kubebuilder:rbac:groups=eks.infra.pingcap.com,resources=tiflowjobs,verbs=get;list;watch;create;update;patch;delete
//+kubebuilder:rbac:groups=eks.infra.pingcap.com,resources=tiflowjobs/status,verbs=get;update;patch
//+kubebuilder:rbac:groups=eks.infra.pingcap.com,resources=tiflowjobs/finalizers,verbs=update

// Reconcile is part of the main kubernetes reconciliation loop which aims to
// move the current state of the cluster closer to the desired state.
//
// For more details, check Reconcile and its Result here:
// - https://pkg.go.dev/sigs.k8s.io/controller-runtime@v0.12.2/pkg/reconcile
func (r *TiflowJobReconciler) Reconcile(ctx context.Context, req ctrl.Request) (ctrl.Result, error) {
	log := r.Logger.WithValues("object", req.NamespacedName)
	log.Info("Reconciling Tiflow Job")
	start := time.Now()
	defer func() {
		metricsctrl.ReconcileDuration.
			WithLabelValues("tiflow_job").Observe(time.Since(start).Seconds())
		log.Info("Finish tiflow job reconcile", "take", time.Since(start))
	}()

	tiflowJob := &eksv1alpha1.TiflowJob{}
	if err := r.Cache.Get(ctx, req.NamespacedName, tiflowJob); err != nil {
		if apierrors.IsNotFound(err) {
			return ctrl.Result{}, nil
		}
		return ctrl.Result{}, fmt.Errorf("unable to get tiflow job %s: %v", req.NamespacedName, err)
	}

	c, err := r.buildContext(ctx, tiflowJob)
	if err != nil {
		r.Logger.Error(err, "unable to build context for tiflow cluster job", "name", req.NamespacedName)
		return ctrl.Result{RequeueAfter: time.Minute * 1}, nil
	}

	tasks := r.buildTaskGroup(c)
	d := deploy.NewDeployer(tasks, nil, r.Logger)
	var res ctrl.Result
	if tiflowJob.DeletionTimestamp.IsZero() {
		res, err = r.updateCreate(ctx, c, d.Deploy(ctx))
	} else {
		res, err = r.updateDelete(ctx, c, d.Destroy(ctx))
	}

	if err == nil {
		r.EventRecorder.Event(tiflowJob, corev1.EventTypeNormal, "ReconcileSuccess", "")
	} else {
		r.EventRecorder.Event(tiflowJob, corev1.EventTypeWarning, "ReconcileFail", err.Error())
	}
	return res, err
}

func (r *TiflowJobReconciler) buildContext(ctx context.Context, tiflowJob *eksv1alpha1.TiflowJob) (*job.Context, error) {
	network, err := r.QueryNetworkInfo(ctx, tiflowJob.Namespace, tiflowJob.Spec.NetworkName)
	if err != nil {
		return nil, err
	}

	_, err = r.CheckAndGetExecutorSpecCode(ctx, network, tiflowJob.Spec.SpecCode)
	if err != nil {
		return nil, err
	}

	c := (&job.Context{
		Local:  r.Local,
		Config: r.Config,
		Logger: r.Logger,

		TiflowJob: tiflowJob,
		Network:   network,
	}).Default()
	return c, nil
}

func (r *TiflowJobReconciler) buildTaskGroup(c *job.Context) []deploy.Task {
	tasks := []deploy.Task{
		job.NewGuardian(c),
		job.NewTiflowJobPhase(c),
		job.NewClusterMaster(c),
		job.NewClusterExecutor(c),
	}
	return tasks
}

func (r *TiflowJobReconciler) updateCreate(ctx context.Context, t *job.Context, results []deploy.Result) (res ctrl.Result, err error) {
	res, err, retriableErrs := deploy.MinRequeue(results)
	switch phase := t.TiflowJob.Status.Phase; phase {
	case eksv1alpha1.TiflowJobPhaseCreating:
		if err == nil && retriableErrs == nil {
			log.FromContext(ctx).Info("mark tiflow job become running when creating job",
				"sinceCreate", time.Since(t.TiflowJob.CreationTimestamp.Time))
			t.TiflowJob.Status.Phase = eksv1alpha1.TiflowJobPhaseRunning
		}
	default:
	}
	if err := r.update(ctx, t.Local, t.TiflowJob); err != nil {
		return res, err
	}
	return
}

func (r *TiflowJobReconciler) updateDelete(ctx context.Context, t *job.Context, results []deploy.Result) (res ctrl.Result, err error) {
	// If the cluster is pending delete, then the deletion tasks are not actually performed
	res, err, retriableErrs := deploy.MinRequeue(results)
	switch phase := t.TiflowJob.Status.Phase; phase {
	case eksv1alpha1.TiflowJobPhasePhaseDeleting:
		if err == nil && retriableErrs == nil {
			controllerutil.RemoveFinalizer(t.TiflowJob, task.Finalizer)
		}
	default:
	}
	if err := r.update(ctx, t.Local, t.TiflowJob); err != nil {
		return res, err
	}
	return
}

func (r *TiflowJobReconciler) update(ctx context.Context, cli client.Client, tiflowJob *eksv1alpha1.TiflowJob) error {
	tiflowJobStatus := tiflowJob.Status.DeepCopy()
	if err := cli.Update(ctx, tiflowJob); err != nil {
		return err
	}
	if err := cli.Get(ctx, types.NamespacedName{Name: tiflowJob.Name, Namespace: tiflowJob.Namespace}, tiflowJob); err != nil {
		return err
	}
	tiflowJob.Status = *tiflowJobStatus
	return cli.Status().Update(ctx, tiflowJob)
}

// SetupWithManager sets up the controller with the Manager.
func (r *TiflowJobReconciler) SetupWithManager(mgr ctrl.Manager, p ...predicate.Predicate) error {
	return ctrl.NewControllerManagedBy(mgr).
		For(&eksv1alpha1.TiflowJob{}, builder.WithPredicates(p...)).
		WithOptions(controller.Options{RateLimiter: common.DefaultRateLimiter(), MaxConcurrentReconciles: 10}).
		Complete(r)
}