// Copyright 2019 The go-ethereum Authors
// This file is part of the go-ethereum library.
//
// The go-ethereum library is free software: you can redistribute it and/or modify
// it under the terms of the GNU Lesser General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
//
// The go-ethereum library is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty off
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU Lesser General Public License for more details.
//
// You should have received a copy of the GNU Lesser General Public License
// along with the go-ethereum library. If not, see <http://www.gnu.org/licenses/>.

package trie

import (
	"bytes"
	"sort"

	"github.com/ledgerwatch/turbo-geth/common"
)

// ResolveSet encapsulates the set of keys that are required to be fully available, or resolved
// (by using `BRANCH` opcode instead of `HASHER`) after processing of the sequence of key-value
// pairs
// DESCRIBED: docs/programmers_guide/guide.md#converting-sequence-of-keys-and-value-into-a-multiproof
type ResolveSet struct {
	inited      bool // Whether keys are sorted and "LTE" and "GT" indices set
	binary      bool // if true, use binary encoding instead of Hex
	minLength   int  // Mininum length of prefixes for which `HashOnly` function can return `true`
	lteIndex    int  // Index of the "LTE" key in the keys slice. Next one is "GT"
	hexes       sortable
	codeTouches map[common.Hash]struct{}
}

// NewResolveSet creates new ResolveSet
func NewResolveSet(minLength int) *ResolveSet {
	return &ResolveSet{minLength: minLength, codeTouches: make(map[common.Hash]struct{})}
}

func NewBinaryResolveSet(minLength int) *ResolveSet {
	return &ResolveSet{minLength: minLength, codeTouches: make(map[common.Hash]struct{}), binary: true}
}

// AddKey adds a new key (in KEY encoding) to the set
func (rs *ResolveSet) AddKey(key []byte) {
	hex := keybytesToHex(key)
	rs.AddHex(hex)
}

// AddHex adds a new key (in HEX encoding) to the set
func (rs *ResolveSet) AddHex(hex []byte) {
	if rs.binary {
		rs.hexes = append(rs.hexes, keyHexToBin(hex))
	} else {
		rs.hexes = append(rs.hexes, hex)
	}
}

// AddCodeTouch adds a new code touch into the resolve set
func (rs *ResolveSet) AddCodeTouch(codeHash common.Hash) {
	rs.codeTouches[codeHash] = struct{}{}
}

func (rs *ResolveSet) IsCodeTouched(codeHash common.Hash) bool {
	_, ok := rs.codeTouches[codeHash]
	return ok
}

func (rs *ResolveSet) ensureInited() {
	if rs.inited {
		return
	}
	if !sort.IsSorted(rs.hexes) {
		sort.Sort(rs.hexes)
	}
	rs.lteIndex = 0
	rs.inited = true
}

// HashOnly decides whether to emit `HASHER` or `BRANCH` for a given prefix, by
// checking if this is prefix of any of the keys added to the set
// Since keys in the set are sorted, and we expect that the prefixes will
// come in monotonically ascending order, we optimise for this, though
// the function would still work if the order is different
func (rs *ResolveSet) HashOnly(prefix []byte) bool {
	rs.ensureInited()
	if len(prefix) < rs.minLength {
		return false
	}
	// Adjust "GT" if necessary
	var gtAdjusted bool
	for rs.lteIndex < len(rs.hexes)-1 && bytes.Compare(rs.hexes[rs.lteIndex+1], prefix) <= 0 {
		rs.lteIndex++
		gtAdjusted = true
	}
	// Adjust "LTE" if necessary (normally will not be necessary)
	for !gtAdjusted && rs.lteIndex > 0 && bytes.Compare(rs.hexes[rs.lteIndex], prefix) > 0 {
		rs.lteIndex--
	}
	if rs.lteIndex < len(rs.hexes) {
		h := rs.hexes[rs.lteIndex]
		if len(h) > 0 && h[len(h)-1] == 16 {
			h = h[:len(h)-1]
		}
		if bytes.HasPrefix(h, prefix) {
			return false
		}
	}

	if rs.lteIndex < len(rs.hexes)-1 {
		h := rs.hexes[rs.lteIndex+1]
		if len(h) > 0 && h[len(h)-1] == 16 {
			h = h[:len(h)-1]
		}
		if bytes.HasPrefix(h, prefix) {
			return false
		}
	}

	return true
}

// Current returns the hex value that has been used for the latest comparison in `HashOnly` function
// It is only used in one edge case at the moment - to distinguish between the accounts' key
// and the storage keys of the same account
func (rs *ResolveSet) Current() []byte {
	return rs.hexes[rs.lteIndex]
}