package stream

import (
	"errors"
	"strings"

	"github.com/chaisql/chai/internal/database"
	"github.com/chaisql/chai/internal/environment"
	"github.com/chaisql/chai/internal/row"
	"github.com/chaisql/chai/internal/tree"
	"github.com/chaisql/chai/internal/types"
)

// UnionOperator is an operator that merges the results of multiple operators.
type UnionOperator struct {
	BaseOperator
	Streams []*Stream
}

// Union returns a new UnionOperator.
func Union(s ...*Stream) *UnionOperator {
	return &UnionOperator{Streams: s}
}

func (it *UnionOperator) Clone() Operator {
	streams := make([]*Stream, len(it.Streams))
	for i, s := range it.Streams {
		streams[i] = s.Clone()
	}

	return &UnionOperator{
		BaseOperator: it.BaseOperator.Clone(),
		Streams:      streams,
	}
}

// Iterate iterates over all the streams and returns their union.
func (it *UnionOperator) Iterate(in *environment.Environment, fn func(out *environment.Environment) error) (err error) {
	var temp *tree.Tree
	var cleanup func() error

	defer func() {
		if cleanup != nil {
			e := cleanup()
			if err == nil {
				err = e
			}
		}
	}()

	// iterate over all the streams and insert each key in the temporary table
	// to deduplicate them
	var buf []byte

	for _, s := range it.Streams {
		err := s.Iterate(in, func(out *environment.Environment) error {
			buf = buf[:0]

			r, ok := out.GetRow()
			if !ok {
				return errors.New("missing row")
			}

			if temp == nil {
				// create a temporary tree
				db := in.GetDB()
				tns := in.GetTx().Catalog.GetFreeTransientNamespace()
				temp, cleanup, err = tree.NewTransient(db.Engine.NewTransientSession(), tns, 0)
				if err != nil {
					return err
				}
			}

			var tableName string
			var encKey []byte

			if dr, ok := r.(database.Row); ok {
				// encode the row key and table name as the value
				tableName = dr.TableName()

				info, err := in.GetTx().Catalog.GetTableInfo(tableName)
				if err != nil {
					return err
				}

				encKey, err = info.EncodeKey(dr.Key())
				if err != nil {
					return err
				}
			}

			key := tree.NewKey(row.Flatten(r)...)
			buf, err = types.EncodeValuesAsKey(buf, types.NewBlobValue(encKey), types.NewTextValue(tableName))
			if err != nil {
				return err
			}

			err = temp.Put(key, buf)
			if err == nil || errors.Is(err, database.ErrIndexDuplicateValue) {
				return nil
			}
			return err
		})
		if err != nil {
			return err
		}
	}

	if temp == nil {
		// the union is empty
		return nil
	}

	var newEnv environment.Environment
	newEnv.SetOuter(in)

	var basicRow database.BasicRow
	// iterate over the temporary index
	return temp.IterateOnRange(nil, false, func(key *tree.Key, value []byte) error {
		kv, err := key.Decode()
		if err != nil {
			return err
		}

		var tableName string
		var pk *tree.Key

		obj := row.Unflatten(kv)

		if len(value) > 1 {
			ser := types.DecodeValues(value)
			pk = tree.NewEncodedKey(types.AsByteSlice(ser[0]))
			tableName = types.AsString(ser[1])
		}

		basicRow.ResetWith(tableName, pk, obj)

		newEnv.SetRow(&basicRow)
		return fn(&newEnv)
	})
}

func (it *UnionOperator) String() string {
	var s strings.Builder

	s.WriteString("union(")
	for i, st := range it.Streams {
		if i > 0 {
			s.WriteString(", ")
		}
		s.WriteString(st.String())
	}
	s.WriteRune(')')

	return s.String()
}