package envoy

import (
	"context"
	"fmt"
	"os"
	"testing"

	"github.com/cortezaproject/corteza/server/compose/types"
	"github.com/cortezaproject/corteza/server/pkg/envoyx"
	"github.com/cortezaproject/corteza/server/pkg/rbac"
	"github.com/cortezaproject/corteza/server/store"
	systemTypes "github.com/cortezaproject/corteza/server/system/types"
	"github.com/davecgh/go-spew/spew"
	"github.com/stretchr/testify/require"
)

func TestRbacImportExport(t *testing.T) {
	var (
		ctx   = context.Background()
		req   = require.New(t)
		nodes envoyx.NodeSet
		gg    *envoyx.DepGraph
		err   error
	)

	cleanup(t)

	// The test
	//
	// * imports some YAML files
	// * checks the DB state
	// * exports the DB into a YAML
	// * clears the DB
	// * imports the YAML
	// * checks the DB state the same way as before
	//
	// The above outlined flow allows us to trivially check if the data is both
	// imported and exported correctly.
	//
	// The initial step could also manually populate the DB but the YAML import
	// is more convenient.

	t.Run("initial import", func(t *testing.T) {
		t.Run("parse configs", func(t *testing.T) {
			nodes, _, err = defaultEnvoy.Decode(ctx, envoyx.DecodeParams{
				Type: envoyx.DecodeTypeURI,
				Params: map[string]any{
					"uri": "file://testdata/rbac",
				},
			})
			req.NoError(err)
		})

		t.Run("bake", func(t *testing.T) {
			gg, err = defaultEnvoy.Bake(ctx, envoyx.EncodeParams{
				Type: envoyx.EncodeTypeStore,
				Params: map[string]any{
					"storer": defaultStore,
					"dal":    defaultDal,
				},
			}, nil, nodes...)
			req.NoError(err)
		})

		t.Run("import into DB", func(t *testing.T) {
			err = defaultEnvoy.Encode(ctx, envoyx.EncodeParams{
				Type: envoyx.EncodeTypeStore,
				Params: map[string]any{
					"storer": defaultStore,
					"dal":    defaultDal,
				},
			}, gg)
			req.NoError(err)
		})

		assertRBACState(ctx, t, defaultStore, req)
	})

	// Prepare a temp file where we'll dump the YAML into
	auxFile, err := os.CreateTemp(os.TempDir(), "*.yaml")
	req.NoError(err)
	spew.Dump(auxFile.Name())
	// defer os.Remove(auxFile.Name())
	defer auxFile.Close()

	var rules envoyx.NodeSet
	t.Run("export", func(t *testing.T) {
		t.Run("export from DB", func(t *testing.T) {
			nodes, _, err = defaultEnvoy.Decode(ctx, envoyx.DecodeParams{
				Type: envoyx.DecodeTypeStore,
				Params: map[string]any{
					"storer": defaultStore,
					"dal":    defaultDal,
				},
				Filter: map[string]envoyx.ResourceFilter{
					types.ModuleResourceType:    {},
					types.NamespaceResourceType: {},

					systemTypes.RoleResourceType: {},
				},
			})
			req.NoError(err)
		})

		var rr rbac.RuleSet
		t.Run("get all rules", func(t *testing.T) {
			rr, _, err = store.SearchRbacRules(ctx, defaultStore, rbac.RuleFilter{})
			req.NoError(err)
		})

		t.Run("connect rules to resources", func(t *testing.T) {
			rules, err = envoyx.RBACRulesForNodes(rr, nodes...)
			req.NoError(err)

			nodes = append(nodes, rules...)
		})

		t.Run("bake", func(t *testing.T) {
			gg, err = defaultEnvoy.Bake(ctx, envoyx.EncodeParams{
				Type: envoyx.EncodeTypeStore,
				Params: map[string]any{
					"storer": defaultStore,
					"dal":    defaultDal,
				},
			}, nil, nodes...)
			req.NoError(err)
		})

		t.Run("write file", func(t *testing.T) {
			err = defaultEnvoy.Encode(ctx, envoyx.EncodeParams{
				Type: envoyx.EncodeTypeIo,
				Params: map[string]any{
					"writer": auxFile,
				},
			}, gg)
			req.NoError(err)
		})
	})

	cleanup(t)

	t.Run("second import", func(t *testing.T) {
		t.Run("yaml parse", func(t *testing.T) {
			nodes, _, err = defaultEnvoy.Decode(ctx, envoyx.DecodeParams{
				Type: envoyx.DecodeTypeURI,
				Params: map[string]any{
					"uri": fmt.Sprintf("file://%s", auxFile.Name()),
				},
			})
			req.NoError(err)
		})

		t.Run("bake", func(t *testing.T) {
			gg, err = defaultEnvoy.Bake(ctx, envoyx.EncodeParams{
				Type: envoyx.EncodeTypeStore,
				Params: map[string]any{
					"storer": defaultStore,
					"dal":    defaultDal,
				},
			}, nil, nodes...)
			req.NoError(err)
		})

		t.Run("run import", func(t *testing.T) {
			err = defaultEnvoy.Encode(ctx, envoyx.EncodeParams{
				Type: envoyx.EncodeTypeStore,
				Params: map[string]any{
					"storer": defaultStore,
					"dal":    defaultDal,
				},
			}, gg)
			req.NoError(err)
		})

		assertRBACState(ctx, t, defaultStore, req)
	})
}

func assertRBACState(ctx context.Context, t *testing.T, s store.Storer, req *require.Assertions) {
	t.Run("check state", func(t *testing.T) {
		namespaces, _, err := store.SearchComposeNamespaces(ctx, defaultStore, types.NamespaceFilter{})
		req.NoError(err)
		ns1 := namespaces[0]

		modules, _, err := store.SearchComposeModules(ctx, defaultStore, types.ModuleFilter{})
		req.NoError(err)
		mod1 := modules[0]

		roles, _, err := store.SearchRoles(ctx, defaultStore, systemTypes.RoleFilter{})
		req.NoError(err)
		role1 := roles.FindByHandle("test_role_1")
		role2 := roles.FindByHandle("test_role_2")

		rr, _, err := store.SearchRbacRules(ctx, defaultStore, rbac.RuleFilter{})
		req.NoError(err)

		allows := rr.FilterAccess(rbac.Allow)
		compareRules(req, *allows.FilterOperation("op2")[0], rbac.Rule{
			RoleID:    role1.ID,
			Resource:  fmt.Sprintf("corteza::compose:namespace/%d", ns1.ID),
			Operation: "op2",
			Access:    rbac.Allow,
		})

		compareRules(req, *allows.FilterOperation("op3")[0], rbac.Rule{
			RoleID:    role1.ID,
			Resource:  fmt.Sprintf("corteza::compose:module/%d/*", ns1.ID),
			Operation: "op3",
			Access:    rbac.Allow,
		})

		compareRules(req, *allows.FilterOperation("op4")[0], rbac.Rule{
			RoleID:    role1.ID,
			Resource:  fmt.Sprintf("corteza::compose:module/%d/%d", ns1.ID, mod1.ID),
			Operation: "op4",
			Access:    rbac.Allow,
		})

		denies := rr.FilterAccess(rbac.Deny)
		compareRules(req, *denies.FilterOperation("op2")[0], rbac.Rule{
			RoleID:    role2.ID,
			Resource:  fmt.Sprintf("corteza::compose:namespace/%d", ns1.ID),
			Operation: "op2",
			Access:    rbac.Deny,
		})

		compareRules(req, *denies.FilterOperation("op3")[0], rbac.Rule{
			RoleID:    role2.ID,
			Resource:  fmt.Sprintf("corteza::compose:module/%d/*", ns1.ID),
			Operation: "op3",
			Access:    rbac.Deny,
		})

		compareRules(req, *denies.FilterOperation("op4")[0], rbac.Rule{
			RoleID:    role2.ID,
			Resource:  fmt.Sprintf("corteza::compose:module/%d/%d", ns1.ID, mod1.ID),
			Operation: "op4",
			Access:    rbac.Deny,
		})
	})
}

func compareRules(req *require.Assertions, a, b rbac.Rule) {
	if a.RoleID != b.RoleID {
		req.FailNow("RoleID missmatch")
	}

	if a.Resource != b.Resource {
		req.FailNow("Resource missmatch")
	}

	if a.Operation != b.Operation {
		req.FailNow("Operation missmatch")
	}

	if a.Access != b.Access {
		req.FailNow("Access missmatch")
	}
}