package set

import (
	"testing"

	"github.com/nalgeon/be"
	"github.com/nalgeon/redka/internal/core"
	"github.com/nalgeon/redka/internal/redis"
)

func TestSMoveParse(t *testing.T) {
	tests := []struct {
		cmd  string
		want SMove
		err  error
	}{
		{
			cmd:  "smove",
			want: SMove{},
			err:  redis.ErrInvalidArgNum,
		},
		{
			cmd:  "smove src",
			want: SMove{},
			err:  redis.ErrInvalidArgNum,
		},
		{
			cmd:  "smove src dest",
			want: SMove{},
			err:  redis.ErrInvalidArgNum,
		},
		{
			cmd:  "smove src dest one",
			want: SMove{src: "src", dest: "dest", member: []byte("one")},
			err:  nil,
		},
	}

	for _, test := range tests {
		t.Run(test.cmd, func(t *testing.T) {
			cmd, err := redis.Parse(ParseSMove, test.cmd)
			be.Equal(t, err, test.err)
			if err == nil {
				be.Equal(t, cmd.src, test.want.src)
				be.Equal(t, cmd.dest, test.want.dest)
				be.Equal(t, cmd.member, test.want.member)
			} else {
				be.Equal(t, cmd, test.want)
			}
		})
	}
}

func TestSMoveExec(t *testing.T) {
	t.Run("move", func(t *testing.T) {
		red := getRedka(t)
		_, _ = red.Set().Add("src", "one", "two")
		_, _ = red.Set().Add("dest", "thr", "fou")

		cmd := redis.MustParse(ParseSMove, "smove src dest one")
		conn := redis.NewFakeConn()
		res, err := cmd.Run(conn, red)
		be.Err(t, err, nil)
		be.Equal(t, res, 1)
		be.Equal(t, conn.Out(), "1")

		sone, _ := red.Set().Exists("src", "one")
		be.Equal(t, sone, false)
		done, _ := red.Set().Exists("dest", "one")
		be.Equal(t, done, true)
	})
	t.Run("dest not found", func(t *testing.T) {
		red := getRedka(t)
		_, _ = red.Set().Add("src", "one", "two")

		cmd := redis.MustParse(ParseSMove, "smove src dest one")
		conn := redis.NewFakeConn()
		res, err := cmd.Run(conn, red)
		be.Err(t, err, nil)
		be.Equal(t, res, 1)
		be.Equal(t, conn.Out(), "1")

		sone, _ := red.Set().Exists("src", "one")
		be.Equal(t, sone, false)
		done, _ := red.Set().Exists("dest", "one")
		be.Equal(t, done, true)
	})
	t.Run("src elem not found", func(t *testing.T) {
		red := getRedka(t)
		_, _ = red.Set().Add("src", "two")
		_, _ = red.Set().Add("dest", "thr", "fou")

		cmd := redis.MustParse(ParseSMove, "smove src dest one")
		conn := redis.NewFakeConn()
		res, err := cmd.Run(conn, red)
		be.Err(t, err, nil)
		be.Equal(t, res, 0)
		be.Equal(t, conn.Out(), "0")

		sone, _ := red.Set().Exists("src", "one")
		be.Equal(t, sone, false)
		done, _ := red.Set().Exists("dest", "one")
		be.Equal(t, done, false)
	})
	t.Run("src key not found", func(t *testing.T) {
		red := getRedka(t)
		_, _ = red.Set().Add("dest", "thr", "fou")

		cmd := redis.MustParse(ParseSMove, "smove src dest one")
		conn := redis.NewFakeConn()
		res, err := cmd.Run(conn, red)
		be.Err(t, err, nil)
		be.Equal(t, res, 0)
		be.Equal(t, conn.Out(), "0")

		sone, _ := red.Set().Exists("src", "one")
		be.Equal(t, sone, false)
		done, _ := red.Set().Exists("dest", "one")
		be.Equal(t, done, false)
	})
	t.Run("dest type mismatch", func(t *testing.T) {
		red := getRedka(t)
		_, _ = red.Set().Add("src", "one", "two")
		_ = red.Str().Set("dest", "str")

		cmd := redis.MustParse(ParseSMove, "smove src dest one")
		conn := redis.NewFakeConn()
		res, err := cmd.Run(conn, red)
		be.Err(t, err, core.ErrKeyType)
		be.Equal(t, res, nil)
		be.Equal(t, conn.Out(), core.ErrKeyType.Error()+" (smove)")

		sone, _ := red.Set().Exists("src", "one")
		be.Equal(t, sone, true)
		done, _ := red.Set().Exists("dest", "one")
		be.Equal(t, done, false)
	})
	t.Run("src type mismatch", func(t *testing.T) {
		red := getRedka(t)
		_ = red.Str().Set("src", "one")
		_, _ = red.Set().Add("dest", "thr", "fou")

		cmd := redis.MustParse(ParseSMove, "smove src dest one")
		conn := redis.NewFakeConn()
		res, err := cmd.Run(conn, red)
		be.Err(t, err, nil)
		be.Equal(t, res, 0)
		be.Equal(t, conn.Out(), "0")

		sone, _ := red.Set().Exists("src", "one")
		be.Equal(t, sone, false)
		done, _ := red.Set().Exists("dest", "one")
		be.Equal(t, done, false)
	})
}