#ifndef WX_PRECOMP
#include <wx/wx.h>
#endif

#include <wx/gdicmn.h> // wxPointに必要
#include <wx/frame.h>  // wxFrameに必要



// wxBufferedPaintDC のinclude
#include <wx/dcbuffer.h>

/////////////////////////////////////
/////////////////////////////////////
/////////////////////////////////////

#include <string>
#include <memory>
#include <unordered_map>
 

// リストボックスが一度に表示可能なアイテム数を取得
int GetVisibleItemCount(wxListBox * listBox)
{
    // リストボックスのDCを使って一行の高さを取得し
    // リストボックスのクライアントサイズから表示可能なアイテム数を計算する


    // リストボックスのクライアントサイズを取得
    wxSize clientSize = listBox->GetClientSize();

    // wxClientDCを使用してデフォルトのアイテム高さを取得
    wxClientDC dc(listBox);
    wxCoord textWidth, textHeight;
    // 指定した文字列の幅と高さを取得
    dc.GetTextExtent("TEXT", &textWidth, &textHeight);

    // 表示可能なアイテム数を計算
    int visibleItemCount = clientSize.GetHeight() / textHeight;

    return visibleItemCount;
}

// スクロールバー付きリスト
class ExList : public wxPanel {

    int itemCount = 100; // アイテム数
    int visibleItemCount;// 一度に表示できるアイテム数

    wxBoxSizer* mainSizer;
    wxScrollBar* scrollBar;

    // リストコントロール
    wxListBox* listBox;

    void PostCreate() {

        visibleItemCount = GetVisibleItemCount(listBox);

        // スクロールバーの範囲とサムサイズを設定
        scrollBar->SetScrollbar(0, visibleItemCount, itemCount, 5, true);

        disp();

    }

public:
    // コンストラクタ
    ExList(wxWindow* parent) : wxPanel(parent, wxID_ANY) {
        // メインSizer
        mainSizer = new wxBoxSizer(wxHORIZONTAL);
        this->SetSizer(mainSizer);

        // リストコントロール
        listBox = new wxListBox(this, wxID_ANY, wxDefaultPosition, wxDefaultSize, 0, nullptr);
        mainSizer->Add(listBox, 1, wxEXPAND | wxALL, 5);

        // スクロールバー
        scrollBar = new wxScrollBar(this, wxID_ANY, wxDefaultPosition, wxDefaultSize, wxSB_VERTICAL);
        mainSizer->Add(scrollBar, 0, wxEXPAND | wxALL, 5);


        this->Layout();
        CallAfter(&ExList::PostCreate);

        // スクロールバーのイベント
        scrollBar->Bind(wxEVT_SCROLL_PAGEUP, &ExList::OnScrollPageUp, this);
        scrollBar->Bind(wxEVT_SCROLL_PAGEDOWN, &ExList::OnScrollPageDown, this);
        scrollBar->Bind(wxEVT_SCROLL_THUMBTRACK, &ExList::OnScrollThumbTrack, this);
        scrollBar->Bind(wxEVT_SCROLL_LINEUP, &ExList::OnScrollUp, this);
        scrollBar->Bind(wxEVT_SCROLL_LINEDOWN, &ExList::OnScrollDown, this);

        // サイズイベント
        this->Bind(wxEVT_SIZE, &ExList::OnSize, this);

    }

    void disp() {
        listBox->Clear();

        int offset = scrollBar->GetThumbPosition();

        // デバッグにposを表示
        std::string debugMessage = "pos: " + std::to_string(offset) + "\n";
        OutputDebugStringA(debugMessage.c_str());
        
        /////////////////////////////////////////////
        // 現在の表示範囲のアイテムを追加
        for (int i = 0; i < visibleItemCount; i++) {

            int item_id = offset + i;

            // 番外のアイテムは *** で表示
            if (item_id >= itemCount) {
                listBox->Append("***");
                continue;
            }

            listBox->Append(wxString::Format("Item %d", item_id));
        }
    }
    

    void OnScrollPageUp(wxScrollEvent& event) {
        disp();
    }

    void OnScrollPageDown(wxScrollEvent& event) {
        disp();
    }

    void OnScrollThumbTrack(wxScrollEvent& event) {
        disp();
    }

    // 下方向クリック
    void OnScrollDown(wxScrollEvent& event) {
        disp();
    }
    // 上方向クリック
    void OnScrollUp(wxScrollEvent& event) {
        disp();
    }

    void OnSize(wxSizeEvent& event) {       
        // イベントを処理済みにする
        event.Skip();
    }


};



// ウィンドウ作成
class MyFrame : public wxFrame
{
    wxBoxSizer* mainSizer;

    ExList* exList; // スクロールバー付きリスト

public:

    void PostCreate() {


        this->Layout(); // レイアウトの更新
    }


    MyFrame(const wxString& title, const wxPoint& pos, const wxSize& size)
        : wxFrame(NULL, wxID_ANY, title, pos, size)
    
    {

        // メインSizer
        mainSizer = new wxBoxSizer(wxHORIZONTAL);
        this->SetSizer(mainSizer);


        // リストコントロール
        exList = new ExList(this);
        mainSizer->Add(exList, 1, wxEXPAND | wxALL, 5);


        // CallAfter : 現在処理中のイベントが終わったらPostCreateを実行
        // コンストラクタはウィンドウ生成イベント扱い
        CallAfter(&MyFrame::PostCreate);


    }

private:
};

/////////////////////////////////////
/////////////////////////////////////
/////////////////////////////////////

// wxWidgetsのアプリケーション作成
class MyApp : public wxApp {
public:

    virtual bool OnInit() {
        MyFrame* frame = new MyFrame("Hello World", wxPoint(50, 50), wxSize(450, 340));
        frame->Show(true);

        return true;
    }

};

/////////////////////////////////////
/////////////////////////////////////
/////////////////////////////////////

// WinMainをマクロで定義
wxIMPLEMENT_APP(MyApp);

int GetVisibleItemCount2(wxListBox* listBox)
{
    // アイテムを一つ追加し、そのアイテムの高さを取得
    listBox->Append("Sample Item");
    wxRect rect;
    listBox->GetItemRect(0, rect);
    listBox->Clear(); // 追加したアイテムを削除

    // アイテムの高さを取得
    wxSize clientSize = listBox->GetClientSize();

    // 表示可能なアイテム数を計算
    int visibleItemCount = clientSize.GetHeight() / rect.height;
    return visibleItemCount;

}

// リストボックスが一度に表示可能なアイテム数を取得
int GetVisibleItemCount(wxListBox * listBox)
{
    // リストボックスのDCを使って一行の高さを取得し
    // リストボックスのクライアントサイズから表示可能なアイテム数を計算する


    // リストボックスのクライアントサイズを取得
    wxSize clientSize = listBox->GetClientSize();

    // wxClientDCを使用してデフォルトのアイテム高さを取得
    wxClientDC dc(listBox);
    wxCoord textWidth, textHeight;
    // 指定した文字列の幅と高さを取得
    dc.GetTextExtent("TEXT", &textWidth, &textHeight);

    // 表示可能なアイテム数を計算
    int visibleItemCount = clientSize.GetHeight() / textHeight;

    return visibleItemCount;
}

// ウィンドウ作成
class MyFrame : public wxFrame
{
    // リストコントロール
    wxListBox* listBox;
    wxBoxSizer* mainSizer;

public:

    void PostCreate() {

        int itemCount = listBox->GetCount();

        int count = GetVisibleItemCount(listBox);

        int count2 = GetVisibleItemCount2(listBox);

        assert(count == count2);

        // listBoxにcount個のアイテムを追加
        for (int i = 0; i < count; i++) {
            listBox->Append(wxString::Format("Item %d", i + 1));
        }

        // メッセージボックスでcountを表示
        wxMessageBox(wxString::Format("表示可能なアイテム数: %d %d", count,count2));


        this->Layout(); // レイアウトの更新
    }


    MyFrame(const wxString& title, const wxPoint& pos, const wxSize& size)
        : wxFrame(NULL, wxID_ANY, title, pos, size)
    
    {

        // メインSizer
        mainSizer = new wxBoxSizer(wxHORIZONTAL);
        this->SetSizer(mainSizer);


        // リストコントロール
        listBox = new wxListBox(this, wxID_ANY, wxDefaultPosition, wxDefaultSize, 0, nullptr);
        mainSizer->Add(listBox, 1, wxEXPAND | wxALL, 5);


        // CallAfter : 現在処理中のイベントが終わったらPostCreateを実行
        // コンストラクタはウィンドウ生成イベント扱い
        CallAfter(&MyFrame::PostCreate);


    }

private:
};

#ifndef TREE_H
#define TREE_H

#endif //TREE_H

#include <algorithm>

using namespace std::literals::string_literals;

// ノードを継承したクラスに asString() メンバ関数があるかを判定するコンセプト
template<typename T>
concept HasAsString = requires(T a) {
    { a.asString() } -> std::same_as<std::string>;
};

// ノードの基底クラス
class NodeBase {
protected:
public:
    std::shared_ptr<NodeBase> parent;

    virtual ~NodeBase() = default;
    virtual std::string asString() const = 0;  // 必ず実装させる仮想関数
    virtual std::shared_ptr<NodeBase> getParent() const { return parent; }
};

      
// フォルダクラス
template <HasAsString T>
class Folder : public NodeBase, public std::enable_shared_from_this < Folder<T> > {
    std::vector<std::shared_ptr<NodeBase>> children;  // 子ノードは NodeBase 型を保持

    T value;
    bool isOpen;
public:
    Folder(const T& data) : value(data), isOpen(false) {}

    // 子ノードを追加するメソッド
    void add(const std::shared_ptr<NodeBase>& node) {
        children.push_back(node);
        node->parent = std::dynamic_pointer_cast<NodeBase>(this->shared_from_this());
    }

    const T& getName() const {
        return value;
    }

    std::string asString() const override {
        return value.asString();
    }

    const std::vector<std::shared_ptr<NodeBase>>& getChildren() const {
        return children;
    }
    std::vector<std::shared_ptr<NodeBase>>& getChildren() {
        return children;
    }

    bool getIsOpen() const {
        return isOpen;
    }

    void setIsOpen(bool open) {
        isOpen = open;
    }
};


// アイテムクラス
// フォルダに入れるデータを保持するクラス
template <HasAsString T>
class Item : public NodeBase, public std::enable_shared_from_this < Item<T> >  {
    T value;
public:
    Item(const T& data) : value(data) {}

    std::string asString() const override {
        return value.asString();
    }
};



/////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////

// 全てのノードの数をカウントする関数
template <HasAsString FT>
int getAllNodeCount(const std::shared_ptr<NodeBase>& node) {
    int count = 1;  // 自分自身をカウント

    // フォルダの場合は、子ノードも再帰的にカウント
    if (auto folder = std::dynamic_pointer_cast<Folder<FT>>(node)) {
        for (const auto& child : folder->getChildren()) {
            count += getAllNodeCount<FT>(child);
        }
    }

    return count;
}


// 開いているノードの数をカウントする関数
template <HasAsString FT>
int getOpenNodeCount(const std::shared_ptr<NodeBase>& node) {
    int count = 1;  // 自分自身をカウント

    // フォルダの場合、開いているかどうかを確認
    if (auto folder = std::dynamic_pointer_cast<Folder<FT>>(node)) {
        if (folder->getIsOpen()) {
            // 開いている場合、子ノードも再帰的にカウント
            for (const auto& child : folder->getChildren()) {
                count += getOpenNodeCount<FT>(child);
            }
        }
    }

    return count;
}

////////////////////////////////////////////////////
////////////////////////////////////////////////////
////////////////////////////////////////////////////
 
// 指定した index のノードを取得する関数の補助関数
template <HasAsString FT>
std::shared_ptr<NodeBase> getNodeHelper(const std::shared_ptr<NodeBase>& node, int& currentIndex, int targetIndex, bool open = false) {
    // 現在のノードをカウント
    if (currentIndex == targetIndex) {
        return node;
    }
    currentIndex++;

    // フォルダの場合は、開閉状態を確認し、再帰的に子ノードを探索
    if (auto folder = std::dynamic_pointer_cast<Folder<FT>>(node)) {
        if (open || folder->getIsOpen()) {
            for (const auto& child : folder->getChildren()) {
                auto result = getNodeHelper<FT>(child, currentIndex, targetIndex, open);
                if (result) {
                    return result;
                }
            }
        }
    }

    return nullptr; // 見つからなかった場合
}


// 指定した index のノードを取得する関数
// ここでの index は、開いているノードのみでカウントする
template <HasAsString FT>
std::shared_ptr<NodeBase> getNodeOnlyOpen(const std::shared_ptr<NodeBase>& root, int targetIndex) {
    int currentIndex = 0; // ノードのカウント用
    return getNodeHelper<FT>(root, currentIndex, targetIndex,false);
}

////////////////////////////////////////////////////
////////////////////////////////////////////////////
////////////////////////////////////////////////////

// ノードを削除する関数
template <HasAsString FT>
void deleteNode(std::shared_ptr<NodeBase> node) {
    if (auto parent = node->getParent()) {
        if (auto parentFolder = std::dynamic_pointer_cast<Folder<FT>>(parent)) {
            auto& siblings = parentFolder->getChildren();
            siblings.erase(std::remove(siblings.begin(), siblings.end(), node), siblings.end());
        }
    }
}


// 指定したノードの管理情報を取得する関数
// 戻り値 1 親ノード
// 戻り値 2 posで指定したノードを持つ親ノードの、子ノードリストのインデクス
template <HasAsString FT>
std::pair< std::shared_ptr<NodeBase>,int> GetNodeListPos(std::shared_ptr<NodeBase> root,int pos) {

    // posの位置の現在のノードを取得
    auto now_node = getNodeOnlyOpen<FT>(root, pos);

    // now_nodeの親ノードを取得
    auto parent_node = now_node->getParent();

    // now_nodeの親ノードの子ノードリストを取得
    auto parent_folder = std::dynamic_pointer_cast<Folder<FT>>(parent_node);
    auto& siblings = parent_folder->getChildren();

    // now_nodeの親ノードの子ノードリストのインデクスを取得
    auto it = std::find(siblings.begin(), siblings.end(), now_node);
    int index = std::distance(siblings.begin(), it);


    return { parent_node,index };

}


template <HasAsString FT, HasAsString IT>
void addNodeUnder(std::shared_ptr<NodeBase> root, std::shared_ptr<NodeBase> node) {
	// nodeをrootの最後に追加
	auto folder = std::dynamic_pointer_cast<Folder<FT>>(root);
	folder->getChildren().push_back(node);
	node->parent = root;
}


template <HasAsString FT, HasAsString IT>
void addNodeHere(std::shared_ptr<NodeBase> root, std::shared_ptr<NodeBase> node, int pos) {
    // ノードを追加する関数
    // 挿入位置は番号posで指定する
    // 新しく追加したアイテムが必ずpos番目になる
    // 必ず、追加前のposのノードと同じ階層に追加する

    // 番号posは開いているノードのみでカウントする
    // 例えばfolder21がノードを持っていても、folder21は開いていないのでその中のノードはカウントしない
    // 0 - folder1
    // 1   - folder2
    // 2      item21
    // 3      item22
    // 4      + folder21
    // 5   - folder3
    // 6      item31
    // 7      item32
    // 8      item33

    // getNode(folder1,3) == item21
    // この時、
    // 例１ addNode(NewFolder,2) で
    // 1   - folder2
    // 2      + NewFolder
    // 3      item21
    // 4      item22


    auto childinfo = GetNodeListPos<FT>(root, pos);
    std::shared_ptr<NodeBase> childlist = childinfo.first;
    auto index = childinfo.second;

    // nodeをchildlistのindex番に追加
    auto folder = std::dynamic_pointer_cast<Folder<FT>>(childlist);
    folder->getChildren().insert(folder->getChildren().begin() + index, node);
    node->parent = childlist;

}
////////////////////////////////////////////////////
////////////////////////////////////////////////////
////////////////////////////////////////////////////
 
struct TreeSliceItem {
    int pos;
    std::shared_ptr<NodeBase> node;
    int hierarchy;
};


template <HasAsString FT>
void GetTreeSliceTraverse(const std::shared_ptr<NodeBase>& node, int hierarchy, int& currentIndex, int from, int to, std::vector<TreeSliceItem>& slice) {
    if (currentIndex >= from && currentIndex <= to) {
        slice.push_back({ currentIndex, node, hierarchy });
    }
    currentIndex++;

    if (auto folder = std::dynamic_pointer_cast<Folder<FT>>(node)) {
        if (folder->getIsOpen()) {
            for (const auto& child : folder->getChildren()) {
                GetTreeSliceTraverse<FT>(child, hierarchy + 1, currentIndex, from, to, slice);
            }
        }
    }
}


// ツリーから一部を取り出す関数
template <HasAsString FT>
std::vector< TreeSliceItem> GetTreeSlice(std::shared_ptr<NodeBase> root, int from,int to) {
    // 例えば、以下の状態の時、
    // 0 - folder1
    // 1   - folder2
    // 2      item21
    // 3      item22
    // 4      + folder21
    // 5   - folder3
    // 6      item31
    // 7      item32
    // 8      item33

    // GetTreeSlice(folder1,2,6) で
    // 2      item21
    // 3      item22
    // 4      + folder21
    // 5   - folder3
    // 6      item31
    // を取得

    std::vector<TreeSliceItem> slice;
    int currentIndex = 0;
    int currentHierarchy = 0;

    GetTreeSliceTraverse<FT>(root, currentHierarchy, currentIndex, from, to, slice);

    return slice;

}