// Copyright 2021 Chaos Mesh Authors.
//
// 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 ec2stop

import (
	"context"
	"encoding/json"

	"github.com/aws/aws-sdk-go-v2/aws"
	awscfg "github.com/aws/aws-sdk-go-v2/config"
	"github.com/aws/aws-sdk-go-v2/credentials"
	"github.com/aws/aws-sdk-go-v2/service/ec2"
	"github.com/go-logr/logr"
	v1 "k8s.io/api/core/v1"
	"k8s.io/apimachinery/pkg/types"
	"sigs.k8s.io/controller-runtime/pkg/client"

	"github.com/chaos-mesh/chaos-mesh/api/v1alpha1"
	impltypes "github.com/chaos-mesh/chaos-mesh/controllers/chaosimpl/types"
)

var _ impltypes.ChaosImpl = (*Impl)(nil)

type Impl struct {
	client.Client

	Log logr.Logger
}

func (impl *Impl) Apply(ctx context.Context, index int, records []*v1alpha1.Record, obj v1alpha1.InnerObject) (v1alpha1.Phase, error) {
	awschaos := obj.(*v1alpha1.AWSChaos)

	var selected v1alpha1.AWSSelector
	err := json.Unmarshal([]byte(records[index].Id), &selected)
	if err != nil {
		impl.Log.Error(err, "fail to unmarshal the selector")
		return v1alpha1.NotInjected, err
	}

	opts := []func(*awscfg.LoadOptions) error{
		awscfg.WithRegion(selected.AWSRegion),
	}

	if selected.Endpoint != nil {
		opts = append(opts, awscfg.WithEndpointResolver(aws.EndpointResolverFunc(func(service, region string) (aws.Endpoint, error) {
			return aws.Endpoint{URL: *selected.Endpoint, SigningRegion: region}, nil
		})))
	}

	if awschaos.Spec.SecretName != nil {
		secret := &v1.Secret{}
		err := impl.Client.Get(ctx, types.NamespacedName{
			Name:      *awschaos.Spec.SecretName,
			Namespace: awschaos.Namespace,
		}, secret)
		if err != nil {
			impl.Log.Error(err, "fail to get cloud secret")
			return v1alpha1.NotInjected, err
		}
		opts = append(opts, awscfg.WithCredentialsProvider(credentials.NewStaticCredentialsProvider(
			string(secret.Data["aws_access_key_id"]),
			string(secret.Data["aws_secret_access_key"]),
			string(secret.Data["aws_session_token"]),
		)))
	}
	cfg, err := awscfg.LoadDefaultConfig(ctx, opts...)
	if err != nil {
		impl.Log.Error(err, "unable to load aws SDK config")
		return v1alpha1.NotInjected, err
	}
	ec2client := ec2.NewFromConfig(cfg)

	_, err = ec2client.StopInstances(context.TODO(), &ec2.StopInstancesInput{
		InstanceIds: []string{selected.Ec2Instance},
	})

	if err != nil {
		return v1alpha1.NotInjected, err
	}

	return v1alpha1.Injected, nil
}

func (impl *Impl) Recover(ctx context.Context, index int, records []*v1alpha1.Record, obj v1alpha1.InnerObject) (v1alpha1.Phase, error) {
	awschaos := obj.(*v1alpha1.AWSChaos)

	var selected v1alpha1.AWSSelector
	err := json.Unmarshal([]byte(records[index].Id), &selected)
	if err != nil {
		impl.Log.Error(err, "fail to unmarshal the selector")
		return v1alpha1.NotInjected, err
	}

	opts := []func(*awscfg.LoadOptions) error{
		awscfg.WithRegion(selected.AWSRegion),
	}

	if selected.Endpoint != nil {
		opts = append(opts, awscfg.WithEndpointResolver(aws.EndpointResolverFunc(func(service, region string) (aws.Endpoint, error) {
			return aws.Endpoint{URL: *selected.Endpoint, SigningRegion: region}, nil
		})))
	}
	if awschaos.Spec.SecretName != nil {
		secret := &v1.Secret{}
		err := impl.Client.Get(ctx, types.NamespacedName{
			Name:      *awschaos.Spec.SecretName,
			Namespace: awschaos.Namespace,
		}, secret)
		if err != nil {
			impl.Log.Error(err, "fail to get cloud secret")
			return v1alpha1.Injected, err
		}
		opts = append(opts, awscfg.WithCredentialsProvider(credentials.NewStaticCredentialsProvider(
			string(secret.Data["aws_access_key_id"]),
			string(secret.Data["aws_secret_access_key"]),
			string(secret.Data["aws_session_token"]),
		)))
	}
	cfg, err := awscfg.LoadDefaultConfig(ctx, opts...)
	if err != nil {
		impl.Log.Error(err, "unable to load aws SDK config")
		return v1alpha1.Injected, err
	}
	ec2client := ec2.NewFromConfig(cfg)

	_, err = ec2client.StartInstances(context.TODO(), &ec2.StartInstancesInput{
		InstanceIds: []string{selected.Ec2Instance},
	})

	if err != nil {
		impl.Log.Error(err, "fail to start the instance")
		return v1alpha1.Injected, err
	}

	return v1alpha1.NotInjected, nil
}

func NewImpl(c client.Client, log logr.Logger) *Impl {
	return &Impl{
		Client: c,
		Log:    log.WithName("ec2stop"),
	}
}
