mirror of
https://github.com/DNSCrypt/dnscrypt-proxy.git
synced 2024-12-11 22:35:40 +01:00
391 lines
8.0 KiB
Go
391 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 q := p.internal; q != nil; q = p.internal {
|
|
p = &q.child[q.direction(prefix)]
|
|
if q.offset < len(prefix) {
|
|
top = p
|
|
}
|
|
}
|
|
|
|
// 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()
|
|
}
|