dnscrypt-proxy/vendor/github.com/k-sone/critbitgo/critbit.go

389 lines
8.0 KiB
Go

package critbitgo
import (
"bytes"
"encoding/hex"
"fmt"
"io"
"os"
"strconv"
)
// The matrix of most significant bit
var msbMatrix [256]byte
func buildMsbMatrix() {
for i := 0; i < len(msbMatrix); i++ {
b := byte(i)
b |= b >> 1
b |= b >> 2
b |= b >> 4
msbMatrix[i] = b &^ (b >> 1)
}
}
type node struct {
internal *internal
external *external
}
type internal struct {
child [2]node
offset int
bit byte
cont bool // if true, key of child[1] contains key of child[0]
}
type external struct {
key []byte
value interface{}
}
// finding the critical bit.
func (n *external) criticalBit(key []byte) (offset int, bit byte, cont bool) {
nlen := len(n.key)
klen := len(key)
mlen := nlen
if nlen > klen {
mlen = klen
}
// find first differing byte and bit
for offset = 0; offset < mlen; offset++ {
if a, b := key[offset], n.key[offset]; a != b {
bit = msbMatrix[a^b]
return
}
}
if nlen < klen {
bit = msbMatrix[key[offset]]
} else if nlen > klen {
bit = msbMatrix[n.key[offset]]
} else {
// two keys are equal
offset = -1
}
return offset, bit, true
}
// calculate direction.
func (n *internal) direction(key []byte) int {
if n.offset < len(key) && (key[n.offset]&n.bit != 0 || n.cont) {
return 1
}
return 0
}
// Crit-bit Tree
type Trie struct {
root node
size int
}
// searching the tree.
func (t *Trie) search(key []byte) *node {
n := &t.root
for n.internal != nil {
n = &n.internal.child[n.internal.direction(key)]
}
return n
}
// membership testing.
func (t *Trie) Contains(key []byte) bool {
if n := t.search(key); n.external != nil && bytes.Equal(n.external.key, key) {
return true
}
return false
}
// get member.
// if `key` is in Trie, `ok` is true.
func (t *Trie) Get(key []byte) (value interface{}, ok bool) {
if n := t.search(key); n.external != nil && bytes.Equal(n.external.key, key) {
return n.external.value, true
}
return
}
// insert into the tree (replaceable).
func (t *Trie) insert(key []byte, value interface{}, replace bool) bool {
// an empty tree
if t.size == 0 {
t.root.external = &external{
key: key,
value: value,
}
t.size = 1
return true
}
n := t.search(key)
newOffset, newBit, newCont := n.external.criticalBit(key)
// already exists in the tree
if newOffset == -1 {
if replace {
n.external.value = value
return true
}
return false
}
// allocate new node
newNode := &internal{
offset: newOffset,
bit: newBit,
cont: newCont,
}
direction := newNode.direction(key)
newNode.child[direction].external = &external{
key: key,
value: value,
}
// insert new node
wherep := &t.root
for in := wherep.internal; in != nil; in = wherep.internal {
if in.offset > newOffset || (in.offset == newOffset && in.bit < newBit) {
break
}
wherep = &in.child[in.direction(key)]
}
if wherep.internal != nil {
newNode.child[1-direction].internal = wherep.internal
} else {
newNode.child[1-direction].external = wherep.external
wherep.external = nil
}
wherep.internal = newNode
t.size += 1
return true
}
// insert into the tree.
// if `key` is alredy in Trie, return false.
func (t *Trie) Insert(key []byte, value interface{}) bool {
return t.insert(key, value, false)
}
// set into the tree.
func (t *Trie) Set(key []byte, value interface{}) {
t.insert(key, value, true)
}
// deleting elements.
// if `key` is in Trie, `ok` is true.
func (t *Trie) Delete(key []byte) (value interface{}, ok bool) {
// an empty tree
if t.size == 0 {
return
}
var direction int
var whereq *node // pointer to the grandparent
var wherep *node = &t.root
// finding the best candidate to delete
for in := wherep.internal; in != nil; in = wherep.internal {
direction = in.direction(key)
whereq = wherep
wherep = &in.child[direction]
}
// checking that we have the right element
if !bytes.Equal(wherep.external.key, key) {
return
}
value = wherep.external.value
ok = true
// removing the node
if whereq == nil {
wherep.external = nil
} else {
othern := whereq.internal.child[1-direction]
whereq.internal = othern.internal
whereq.external = othern.external
}
t.size -= 1
return
}
// clearing a tree.
func (t *Trie) Clear() {
t.root.internal = nil
t.root.external = nil
t.size = 0
}
// return the number of key in a tree.
func (t *Trie) Size() int {
return t.size
}
// fetching elements with a given prefix.
// handle is called with arguments key and value (if handle returns `false`, the iteration is aborted)
func (t *Trie) Allprefixed(prefix []byte, handle func(key []byte, value interface{}) bool) bool {
// an empty tree
if t.size == 0 {
return true
}
// walk tree, maintaining top pointer
p := &t.root
top := p
if len(prefix) > 0 {
for p.internal != nil {
top = p
p = &p.internal.child[p.internal.direction(prefix)]
}
// check prefix
if !bytes.Contains(p.external.key, prefix) {
return true
}
}
return allprefixed(top, handle)
}
func allprefixed(n *node, handle func([]byte, interface{}) bool) bool {
if n.internal != nil {
// dealing with an internal node while recursing
for i := 0; i < 2; i++ {
if !allprefixed(&n.internal.child[i], handle) {
return false
}
}
} else {
// dealing with an external node while recursing
return handle(n.external.key, n.external.value)
}
return true
}
// Search for the longest matching key from the beginning of the given key.
// if `key` is in Trie, `ok` is true.
func (t *Trie) LongestPrefix(given []byte) (key []byte, value interface{}, ok bool) {
// an empty tree
if t.size == 0 {
return
}
return longestPrefix(&t.root, given)
}
func longestPrefix(n *node, key []byte) ([]byte, interface{}, bool) {
if n.internal != nil {
direction := n.internal.direction(key)
if k, v, ok := longestPrefix(&n.internal.child[direction], key); ok {
return k, v, ok
}
if direction == 1 {
return longestPrefix(&n.internal.child[0], key)
}
} else {
if bytes.HasPrefix(key, n.external.key) {
return n.external.key, n.external.value, true
}
}
return nil, nil, false
}
// Iterating elements from a given start key.
// handle is called with arguments key and value (if handle returns `false`, the iteration is aborted)
func (t *Trie) Walk(start []byte, handle func(key []byte, value interface{}) bool) bool {
var seek bool
if start != nil {
seek = true
}
return walk(&t.root, start, &seek, handle)
}
func walk(n *node, key []byte, seek *bool, handle func([]byte, interface{}) bool) bool {
if n.internal != nil {
var direction int
if *seek {
direction = n.internal.direction(key)
}
if !walk(&n.internal.child[direction], key, seek, handle) {
return false
}
if !(*seek) && direction == 0 {
// iteration another side
return walk(&n.internal.child[1], key, seek, handle)
}
return true
} else {
if *seek {
if bytes.Equal(n.external.key, key) {
// seek completed
*seek = false
} else {
// key is not in Trie
return false
}
}
return handle(n.external.key, n.external.value)
}
}
// dump tree. (for debugging)
func (t *Trie) Dump(w io.Writer) {
if t.root.internal == nil && t.root.external == nil {
return
}
if w == nil {
w = os.Stdout
}
dump(w, &t.root, true, "")
}
func dump(w io.Writer, n *node, right bool, prefix string) {
var ownprefix string
if right {
ownprefix = prefix
} else {
ownprefix = prefix[:len(prefix)-1] + "`"
}
if in := n.internal; in != nil {
fmt.Fprintf(w, "%s-- off=%d, bit=%08b(%02x), cont=%v\n", ownprefix, in.offset, in.bit, in.bit, in.cont)
for i := 0; i < 2; i++ {
var nextprefix string
switch i {
case 0:
nextprefix = prefix + " |"
right = true
case 1:
nextprefix = prefix + " "
right = false
}
dump(w, &in.child[i], right, nextprefix)
}
} else {
fmt.Fprintf(w, "%s-- key=%d (%s)\n", ownprefix, n.external.key, key2str(n.external.key))
}
return
}
func key2str(key []byte) string {
for _, c := range key {
if !strconv.IsPrint(rune(c)) {
return hex.EncodeToString(key)
}
}
return string(key)
}
// create a tree.
func NewTrie() *Trie {
return &Trie{}
}
func init() {
buildMsbMatrix()
}