public class AVLTree<K extends Comparable<K>, V> {
private class Node {
public K key;
public V value;
public Node left, right;
public int height;
public Node(K key, V value) {
this.key = key;
this.value = value;
left = right = null;
height = 1;
}
}
private Node root;
private int size;
public AVLTree() {
root = null;
size = 0;
}
public void add(K key, V value) {
root = add(root, key, value);
}
private Node add(Node node, K key, V value) {
if (node == null) {
size++;
return new Node(key, value);
}
if (key.compareTo(node.key)<0) {
node.left = add(node.left, key, value);
} else if (key.compareTo(node.key)>0) {
node.right = add(node.right, key, value);
} else {
node.value = value;
}
node.height = 1+Math.max(getHeight(node.left), getHeight(node.right));
int balanceFactor = getBalanceFactor(node);
if (Math.abs(balanceFactor)>1) {
System.out.println("unbalanced: "+balanceFactor);
}
if (balanceFactor>1 && getBalanceFactor(node.left)>=0) {
return rightRotate(node);
}
if (balanceFactor<-1 && getBalanceFactor(node.right)<=0) {
return leftRotate(node);
}
if (balanceFactor>1 && getBalanceFactor(node.left)<0) {
node.left = leftRotate(node);
return rightRotate(node);
}
if (balanceFactor<-1 && getBalanceFactor(node.right)>0) {
node.right = rightRotate(node);
return leftRotate(node);
}
return node;
}
private Node getNode(Node node, K key) {
if (node == null) {
return null;
}
if (key.compareTo(node.key)==0) {
return node;
} else if (key.compareTo(node.key)<0) {
return getNode(node.left, key);
} else {
return getNode(node.right, key);
}
}
public V remove(K key) {
Node node = getNode(root, key);
if (node != null) {
root = remove(root, key);
return node.value;
}
return null;
}
private Node remove(Node node, K key) {
if (node == null) {
return null;
}
Node retNode;
if (key.compareTo(node.key)<0) {
node.left = remove(node.left, key);
retNode = node;
} else if (key.compareTo(node.key)>0) {
node.right = remove(node.right, key);
retNode = node;
} else {
if (node.left == null) {
Node rightNode = node.right;
node.right = null;
size--;
retNode = rightNode;
} else if (node.right == null) {
Node leftNode = node.left;
node.left = null;
size--;
retNode = leftNode;
} else {
Node successor = miniMum(node.right);
successor.left = node.left;
successor.right = remove(node.right, successor.key);
node.left = node.right = null;
retNode = successor;
}
}
if (retNode == null) return null;
retNode.height = Math.max(getHeight(retNode.left), getHeight(retNode.right))+1;
int balanceFactor = getBalanceFactor(retNode);
if (balanceFactor>1 && getBalanceFactor(retNode.left)<=0) {
return rightRotate(retNode);
}
if (balanceFactor<-1 && getBalanceFactor(retNode.right)>=0) {
return leftRotate(retNode);
}
if (balanceFactor>1 && getBalanceFactor(retNode.left)>0) {
retNode.left = leftRotate(retNode);
return rightRotate(retNode);
}
if (balanceFactor<-1 && getBalanceFactor(retNode.right)<0) {
retNode.right = rightRotate(retNode);
return leftRotate(retNode);
}
return retNode;
}
private Node miniMum(Node node) {
if (node.left == null) {
return node;
}
return miniMum(node.left);
}
public boolean contains(K key) {
return getNode(root, key) != null;
}
public V get(K key) {
Node node = getNode(root, key);
return node == null?null: node.value;
}
public void set(K key, V newValue) {
Node node = getNode(root, key);
if (node == null) {
throw new IllegalArgumentException(key+" doesn't exits!");
}
node.value = newValue;
}
public int getSize() {
return size;
}
public boolean isEmpty() {
return size == 0;
}
private int getHeight(Node node) {
if (node == null) return 0;
return node.height;
}
private int getBalanceFactor(Node node) {
if (node == null) return 0;
return getHeight(node.left)-getHeight(node.right);
}
private Node rightRotate(Node node) {
Node x = node.left;
Node temp = x.right;
x.right = node;
node.left = temp;
node.height = Math.max(getHeight(node.left), getHeight(node.right))+1;
x.height = Math.max(getHeight(x.left), getHeight(x.right))+1;
return x;
}
private Node leftRotate(Node node) {
Node x = node.right;
Node temp = x.left;
x.left = node;
node.right = temp;
node.height = Math.max(getHeight(node.left), getHeight(node.right))+1;
x.height = Math.max(getHeight(x.left), getHeight(x.right))+1;
return x;
}
public boolean isBalanced() {
return isBalanced(root);
}
private boolean isBalanced(Node node) {
if (node == null) return true;
int balanceFactor = getBalanceFactor(node);
if (balanceFactor>1) return false;
return isBalanced(node.left) && isBalanced(node.right);
}
public boolean inBST() {
ArrayList<K> keys = new ArrayList<>();
inOrder(root, keys);
for (int i=1;i<keys.size();i++) {
if (keys.get(i-1).compareTo(keys.get(i))>0) {
return false;
}
}
return true;
}
private void inOrder(Node node, ArrayList<K> keys) {
if (node == null) return;
inOrder(node.left, keys);
keys.add(node.key);
inOrder(node.right, keys);
}
}