"""
File: binary_search_tree.py
Created Time: 2022-12-20
Author: a16su (lpluls001@gmail.com)
"""

import sys
from pathlib import Path

sys.path.append(str(Path(__file__).parent.parent))
from modules import TreeNode, print_tree


class BinarySearchTree:
    """二分探索木"""

    def __init__(self):
        """コンストラクタ"""
        # 空の木を初期化する
        self._root = None

    def get_root(self) -> TreeNode | None:
        """二分木の根ノードを取得"""
        return self._root

    def search(self, num: int) -> TreeNode | None:
        """ノードを探索"""
        cur = self._root
        # ループで探索し、葉ノードを越えたら抜ける
        while cur is not None:
            # 目標ノードは cur の右部分木にある
            if cur.val < num:
                cur = cur.right
            # 目標ノードは cur の左部分木にある
            elif cur.val > num:
                cur = cur.left
            # 目標ノードが見つかったらループを抜ける
            else:
                break
        return cur

    def insert(self, num: int):
        """ノードを挿入"""
        # 木が空なら、根ノードを初期化する
        if self._root is None:
            self._root = TreeNode(num)
            return
        # ループで探索し、葉ノードを越えたら抜ける
        cur, pre = self._root, None
        while cur is not None:
            # 重複ノードが見つかったら、直ちに返す
            if cur.val == num:
                return
            pre = cur
            # 挿入位置は cur の右部分木にある
            if cur.val < num:
                cur = cur.right
            # 挿入位置は cur の左部分木にある
            else:
                cur = cur.left
        # ノードを挿入
        node = TreeNode(num)
        if pre.val < num:
            pre.right = node
        else:
            pre.left = node

    def remove(self, num: int):
        """ノードを削除"""
        # 木が空なら、そのまま早期リターンする
        if self._root is None:
            return
        # ループで探索し、葉ノードを越えたら抜ける
        cur, pre = self._root, None
        while cur is not None:
            # 削除対象のノードが見つかったら、ループを抜ける
            if cur.val == num:
                break
            pre = cur
            # 削除対象ノードは cur の右部分木にある
            if cur.val < num:
                cur = cur.right
            # 削除対象ノードは cur の左部分木にある
            else:
                cur = cur.left
        # 削除対象ノードがなければそのまま返す
        if cur is None:
            return

        # 子ノード数 = 0 or 1
        if cur.left is None or cur.right is None:
            # 子ノード数が 0 / 1 のとき、child = null / その子ノード
            child = cur.left or cur.right
            # ノード cur を削除する
            if cur != self._root:
                if pre.left == cur:
                    pre.left = child
                else:
                    pre.right = child
            else:
                # 削除ノードが根ノードなら、根ノードを再設定
                self._root = child
        # 子ノード数 = 2
        else:
            # 中順走査における cur の次ノードを取得
            tmp: TreeNode = cur.right
            while tmp.left is not None:
                tmp = tmp.left
            # ノード tmp を再帰的に削除
            self.remove(tmp.val)
            # tmp で cur を上書きする
            cur.val = tmp.val


"""Driver Code"""
if __name__ == "__main__":
    # 二分探索木を初期化
    bst = BinarySearchTree()
    nums = [8, 4, 12, 2, 6, 10, 14, 1, 3, 5, 7, 9, 11, 13, 15]
    # 注意：挿入順序が異なると異なる二分木が生成される。このシーケンスからは完全二分木を生成できる
    for num in nums:
        bst.insert(num)
    print("\n初期化した二分木は\n")
    print_tree(bst.get_root())

    # ノードを探索
    node = bst.search(7)
    print("\n見つかったノードオブジェクトは: {}、ノードの値 = {}".format(node, node.val))

    # ノードを挿入
    bst.insert(16)
    print("\nノード 16 を挿入した後、二分木は\n")
    print_tree(bst.get_root())

    # ノードを削除
    bst.remove(1)
    print("\nノード 1 を削除した後、二分木は\n")
    print_tree(bst.get_root())

    bst.remove(2)
    print("\nノード 2 を削除した後、二分木は\n")
    print_tree(bst.get_root())

    bst.remove(4)
    print("\nノード 4 を削除した後、二分木は\n")
    print_tree(bst.get_root())