/**
 * File: array_binary_tree.cpp
 * Created Time: 2023-07-19
 * Author: krahets (krahets@163.com)
 */

#include "../utils/common.hpp"

/* Класс двоичного дерева в массивном представлении */
class ArrayBinaryTree {
  public:
    /* Конструктор */
    ArrayBinaryTree(vector<int> arr) {
        tree = arr;
    }

    /* Вместимость списка */
    int size() {
        return tree.size();
    }

    /* Получить значение узла с индексом i */
    int val(int i) {
        // Если индекс выходит за границы, вернуть INT_MAX, обозначающий пустую позицию
        if (i < 0 || i >= size())
            return INT_MAX;
        return tree[i];
    }

    /* Получить индекс левого дочернего узла узла с индексом i */
    int left(int i) {
        return 2 * i + 1;
    }

    /* Получить индекс правого дочернего узла узла с индексом i */
    int right(int i) {
        return 2 * i + 2;
    }

    /* Получить индекс родительского узла узла с индексом i */
    int parent(int i) {
        return (i - 1) / 2;
    }

    /* Обход в ширину */
    vector<int> levelOrder() {
        vector<int> res;
        // Непосредственно обходить массив
        for (int i = 0; i < size(); i++) {
            if (val(i) != INT_MAX)
                res.push_back(val(i));
        }
        return res;
    }

    /* Предварительный обход */
    vector<int> preOrder() {
        vector<int> res;
        dfs(0, "pre", res);
        return res;
    }

    /* Симметричный обход */
    vector<int> inOrder() {
        vector<int> res;
        dfs(0, "in", res);
        return res;
    }

    /* Обратный обход */
    vector<int> postOrder() {
        vector<int> res;
        dfs(0, "post", res);
        return res;
    }

  private:
    vector<int> tree;

    /* Обход в глубину */
    void dfs(int i, string order, vector<int> &res) {
        // Если это пустая позиция, вернуть
        if (val(i) == INT_MAX)
            return;
        // Предварительный обход
        if (order == "pre")
            res.push_back(val(i));
        dfs(left(i), order, res);
        // Симметричный обход
        if (order == "in")
            res.push_back(val(i));
        dfs(right(i), order, res);
        // Обратный обход
        if (order == "post")
            res.push_back(val(i));
    }
};

/* Driver Code */
int main() {
    // Инициализировать двоичное дерево
    // Использовать INT_MAX для обозначения пустой позиции nullptr
    vector<int> arr = {1, 2, 3, 4, INT_MAX, 6, 7, 8, 9, INT_MAX, INT_MAX, 12, INT_MAX, INT_MAX, 15};
    TreeNode *root = vectorToTree(arr);
    cout << "\nИнициализация двоичного дерева\n";
    cout << "Массивное представление двоичного дерева:\n";
    printVector(arr);
    cout << "Связное представление двоичного дерева:\n";
    printTree(root);

    // Класс двоичного дерева в массивном представлении
    ArrayBinaryTree abt(arr);

    // Доступ к узлу
    int i = 1;
    int l = abt.left(i), r = abt.right(i), p = abt.parent(i);
    cout << "\nТекущий узел: индекс = " << i << ", значение = " << abt.val(i) << "\n";
    cout << "Индекс левого дочернего узла = " << l << ", значение = " << (abt.val(l) != INT_MAX ? to_string(abt.val(l)) : "nullptr") << "\n";
    cout << "Индекс правого дочернего узла = " << r << ", значение = " << (abt.val(r) != INT_MAX ? to_string(abt.val(r)) : "nullptr") << "\n";
    cout << "Индекс родительского узла = " << p << ", значение = " << (abt.val(p) != INT_MAX ? to_string(abt.val(p)) : "nullptr") << "\n";

    // Обходить дерево
    vector<int> res = abt.levelOrder();
    cout << "\nОбход в ширину: ";
    printVector(res);
    res = abt.preOrder();
    cout << "Предварительный обход: ";
    printVector(res);
    res = abt.inOrder();
    cout << "Симметричный обход: ";
    printVector(res);
    res = abt.postOrder();
    cout << "Обратный обход: ";
    printVector(res);

    return 0;
}