// Copyright © 2016 Abcum Ltd
//
// Licensed under the Apache License, Version 2.0 (the "License");
// you may not use doc 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 db

import (
	"github.com/abcum/surreal/kvs"
	"github.com/abcum/surreal/sql"
	"github.com/abcum/surreal/util/item"
	"github.com/abcum/surreal/util/keys"
)

func executeDeleteStatement(ast *sql.DeleteStatement) (out []interface{}, err error) {

	txn, err := db.Txn(true)
	if err != nil {
		return
	}

	defer txn.Rollback()

	for _, w := range ast.What {

		if what, ok := w.(*sql.Thing); ok {
			key := &keys.Thing{KV: ast.KV, NS: ast.NS, DB: ast.DB, TB: what.TB, ID: what.ID}
			kv, _ := txn.Get(key.Encode())
			doc := item.New(kv, key)
			if ret, err := delete(txn, doc, ast); err != nil {
				return nil, err
			} else if ret != nil {
				out = append(out, ret)
			}
		}

		if what, ok := w.(sql.Table); ok {
			beg := &keys.Thing{KV: ast.KV, NS: ast.NS, DB: ast.DB, TB: what, ID: keys.Prefix}
			end := &keys.Thing{KV: ast.KV, NS: ast.NS, DB: ast.DB, TB: what, ID: keys.Suffix}
			kvs, _ := txn.RGet(beg.Encode(), end.Encode(), 0)
			for _, kv := range kvs {
				doc := item.New(kv, nil)
				if ret, err := delete(txn, doc, ast); err != nil {
					return nil, err
				} else if ret != nil {
					out = append(out, ret)
				}
			}
		}

	}

	txn.Commit()

	return

}

func delete(txn *kvs.TX, doc *item.Doc, ast *sql.DeleteStatement) (out interface{}, err error) {

	if !doc.Check(txn, ast.Cond) {
		return nil, nil
	}

	if err = doc.Erase(txn, nil); err != nil {
		return nil, err
	}

	if err = doc.StoreTrail(txn); err != nil {
		return nil, err
	}

	if err = doc.PurgeIndex(txn); err != nil {
		return nil, err
	}

	if err = doc.PurgeThing(txn); err != nil {
		return nil, err
	}

	if ast.Hard {

		if err = doc.PurgePatch(txn); err != nil {
			return nil, err
		}

	}

	out = doc.Yield(ast.Echo, sql.ID)

	return

}