[FarGroup/FarManager] master: Add regex testing UI - far:regex (7c7fc5e40)

[farg...@farmanager.com]

Repository : https://github.com/FarGroup/FarManager
On branch : master
Link : https://github.com/FarGroup/FarManager/commit/7c7fc5e405e4271f61873b930a64dbef652d99c2

>---------------------------------------------------------------

commit 7c7fc5e405e4271f61873b930a64dbef652d99c2
Author: Alex Alabuzhev <alab...@gmail.com>
Date: Mon Oct 3 23:23:56 2022 +0100

Add regex testing UI - far:regex


>---------------------------------------------------------------

7c7fc5e405e4271f61873b930a64dbef652d99c2
far/cmdline.cpp | 7 ++
far/stddlg.cpp | 235 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++
far/stddlg.hpp | 2 +
3 files changed, 244 insertions(+)

diff --git a/far/cmdline.cpp b/far/cmdline.cpp
index 47dc273fb..d52390624 100644
--- a/far/cmdline.cpp
+++ b/far/cmdline.cpp
@@ -74,6 +74,7 @@ THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
#include "global.hpp"
#include "log.hpp"
#include "char_width.hpp"
+#include "stddlg.hpp"

// Platform:
#include "platform.env.hpp"
@@ -982,6 +983,12 @@ static bool ProcessFarCommands(string_view Command, function_ref<void(bool)> con
}
}

+ if (equal_icase(Command, L"regex"sv))
+ {
+ regex_playground();
+ return true;
+ }
+
return false;
}

diff --git a/far/stddlg.cpp b/far/stddlg.cpp
index 5c1d7f434..9f3442cf8 100644
--- a/far/stddlg.cpp
+++ b/far/stddlg.cpp
@@ -59,6 +59,7 @@ THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
#include "copy_progress.hpp"
#include "keyboard.hpp"
#include "pathmix.hpp"
+#include "colormix.hpp"

// Platform:
#include "platform.com.hpp"
@@ -67,6 +68,7 @@ THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
// Common:
#include "common/from_string.hpp"
#include "common/function_ref.hpp"
+#include "common/view/enumerate.hpp"

// External:
#include "format.hpp"
@@ -930,6 +932,239 @@ bool RetryAbort(std::vector<string>&& Messages)
});
}

+void regex_playground()
+{
+ enum
+ {
+ rp_doublebox,
+ rp_text_regex,
+ rp_edit_regex,
+ rp_text_cursor,
+ rp_text_test,
+ rp_edit_test,
+ rp_text_substitution,
+ rp_edit_substitution,
+ rp_text_result,
+ rp_edit_result,
+ rp_list_matches,
+ rp_text_status,
+ rp_edit_status,
+ rp_separator,
+ rp_button_ok,
+
+ rp_count
+ };
+
+ auto RegexDlgItems = MakeDialogItems<rp_count>(
+ {
+ { DI_DOUBLEBOX, {{3, 1}, {72,15}}, DIF_NONE, L"Regular expressions", },
+ { DI_TEXT, {{5, 2}, {0, 2}}, DIF_NONE, L"Regex:" },
+ { DI_EDIT, {{5, 3}, {45, 3}}, DIF_HISTORY, },
+ { DI_TEXT, {{5, 4}, {45, 4}}, DIF_NONE, L"" },
+ { DI_TEXT, {{5, 5}, {0, 5}}, DIF_NONE, L"Test string:" },
+ { DI_EDIT, {{5, 6}, {45, 6}}, DIF_HISTORY, },
+ { DI_TEXT, {{5, 7}, {0, 7}}, DIF_NONE, L"Substitution:" },
+ { DI_EDIT, {{5, 8}, {45, 8}}, DIF_HISTORY, },
+ { DI_TEXT, {{5, 9}, {0, 9}}, DIF_NONE, L"Result:" },
+ { DI_EDIT, {{5, 10}, {45,10}}, DIF_READONLY, },
+ { DI_LISTBOX, {{47, 2}, {70,11}}, DIF_NONE, L"Matches" },
+ { DI_TEXT, {{5, 11}, {0, 11}}, DIF_NONE, L"Status:" },
+ { DI_EDIT, {{5, 12}, {70,12}}, DIF_READONLY, },
+ { DI_TEXT, {{-1,13}, {0, 13}}, DIF_SEPARATOR, },
+ { DI_BUTTON, {{0, 14}, {0, 14}}, DIF_CENTERGROUP | DIF_DEFAULTBUTTON, msg(lng::MOk), },
+ });
+
+ RegexDlgItems[rp_edit_regex].strHistory = L"RegexTestRegex"sv;
+ RegexDlgItems[rp_edit_test].strHistory = L"RegexTestTest"sv;
+ RegexDlgItems[rp_edit_substitution].strHistory = L"RegexTestSubstitution"sv;
+
+ RegExp Regex;
+ std::vector<RegExpMatch> Match;
+ named_regex_match NamedMatch;
+
+ std::vector<string> ListStrings;
+ std::vector<FarListItem> ListItems;
+
+ enum class status
+ {
+ normal,
+ warning,
+ error
+ }
+ Status{};
+
+ const auto status_to_color = [&]
+ {
+ switch (Status)
+ {
+ case status::normal: return F_LIGHTGREEN;
+ case status::warning: return F_YELLOW;
+ case status::error: return F_LIGHTRED;
+ default: UNREACHABLE;
+ }
+ };
+
+ const auto RegexDlg = Dialog::create(RegexDlgItems, [&](Dialog* const Dlg, intptr_t const Msg, intptr_t const Param1, void* const Param2)
+ {
+ const auto update_substitution = [&]
+ {
+ const auto TestStr = view_as<const wchar_t*>(Dlg->SendMessage(DM_GETCONSTTEXTPTR, rp_edit_test, {}));
+ const auto ReplaceStr = view_as<const wchar_t*>(Dlg->SendMessage(DM_GETCONSTTEXTPTR, rp_edit_substitution, {}));
+
+ int CurPos = 0;
+ int SearchLength;
+ const auto Str = ReplaceBrackets(TestStr, ReplaceStr, Match, &NamedMatch, CurPos, SearchLength);
+ Status = status::normal;
+ Dlg->SendMessage(DM_SETTEXTPTR, rp_edit_result, UNSAFE_CSTR(Str));
+ };
+
+ const auto update_matches = [&]
+ {
+ FarList List{ sizeof(List), ListItems.size(), ListItems.data() };
+ Dlg->SendMessage(DM_LISTSET, rp_list_matches, &List);
+ };
+
+ const auto clear_matches = [&]
+ {
+ Match.clear();
+ NamedMatch.Matches.clear();
+ ListItems.clear();
+
+ update_matches();
+ };
+
+ const auto update_cursor = [&](std::optional<size_t> const& Position = {})
+ {
+ Dlg->SendMessage(DM_SETTEXTPTR, rp_text_cursor, Position? UNSAFE_CSTR(string(*Position, L' ') + L'↑') : nullptr);
+ };
+
+ const auto update_status = [&](status const NewStatus, string const& Message)
+ {
+ Status = NewStatus;
+ Dlg->SendMessage(DM_SETTEXTPTR, rp_edit_status, UNSAFE_CSTR(Message));
+ };
+
+ const auto update_test = [&]
+ {
+ string_view const TestStr = view_as<const wchar_t*>(Dlg->SendMessage(DM_GETCONSTTEXTPTR, rp_edit_test, {}));
+
+ bool IsMatch;
+
+ try
+ {
+ IsMatch = Regex.Search(TestStr, Match, &NamedMatch);
+ }
+ catch (regex_exception const& e)
+ {
+ clear_matches();
+ update_cursor(e.position());
+ update_status(status::error, e.message());
+ return false;
+ }
+
+ if (!IsMatch)
+ {
+ clear_matches();
+ update_status(status::warning, L"Not found"s);
+ return false;
+ }
+
+ update_status(status::normal, L"Found"s);
+
+ ListItems.clear();
+ ListStrings.clear();
+
+ reserve_exp_noshrink(ListItems, Match.size());
+ reserve_exp_noshrink(ListStrings, Match.size());
+
+ const auto match_str = [&](RegExpMatch const& m)
+ {
+ return m.start < 0? L""sv : TestStr.substr(m.start, m.end - m.start);
+ };
+
+ for (const auto& [i, Index] : enumerate(Match))
+ {
+ ListStrings.emplace_back(format(FSTR(L"${}: {}"sv), Index, match_str(i)));
+ ListItems.emplace_back(i.start < 0? LIF_GRAYED : LIF_NONE, ListStrings.back().c_str(), 0, 0);
+ }
+
+ for (const auto& [k, v] : NamedMatch.Matches)
+ {
+ const auto& m = Match[v];
+ ListStrings[v] = format(FSTR(L"${{{}}}: {}"sv), k, match_str(m));
+ ListItems[v].Text = ListStrings[v].c_str();
+ }
+
+ update_matches();
+ update_substitution();
+ return true;
+ };
+
+ const auto update_regex = [&]
+ {
+ const auto RegexStr = view_as<const wchar_t*>(Dlg->SendMessage(DM_GETCONSTTEXTPTR, rp_edit_regex, {}));
+
+ try
+ {
+ Regex.Compile(RegexStr, starts_with(RegexStr, L'/')? OP_PERLSTYLE : 0);
+ }
+ catch (regex_exception const& e)
+ {
+ clear_matches();
+ update_cursor(e.position());
+ update_status(status::error, e.message());
+ return false;
+ }
+
+ update_cursor();
+ update_status(status::normal, msg(lng::MOk));
+ return update_test();
+ };
+
+ switch (Msg)
+ {
+ case DN_CTLCOLORDLGITEM:
+ if (Param1 == rp_edit_status)
+ {
+ const auto& Colors = *static_cast<FarDialogItemColors const*>(Param2);
+ Colors.Colors[0] = Colors.Colors[2] = colors::NtColorToFarColor(B_BLACK | status_to_color());
+ }
+ break;
+
+ case DN_EDITCHANGE:
+ {
+ SCOPED_ACTION(Dialog::suppress_redraw)(Dlg);
+
+ switch (Param1)
+ {
+ case rp_edit_regex:
+ update_regex();
+ break;
+
+ case rp_edit_test:
+ update_test();
+ break;
+
+ case rp_edit_substitution:
+ update_substitution();
+ break;
+ }
+ }
+ break;
+ }
+
+ return Dlg->DefProc(Msg, Param1, Param2);
+ });
+
+ const auto
+ DlgWidth = static_cast<int>(RegexDlgItems[rp_doublebox].X2) + 4,
+ DlgHeight = static_cast<int>(RegexDlgItems[rp_doublebox].Y2) + 2;
+
+ RegexDlg->SetPosition({ -1, -1, DlgWidth, DlgHeight });
+ RegexDlg->SetHelp(L"RegExp"sv);
+ RegexDlg->Process();
+}
+
progress_impl::~progress_impl()
{
if (m_Dialog)
diff --git a/far/stddlg.hpp b/far/stddlg.hpp
index 7cea18e5c..4e934a593 100644
--- a/far/stddlg.hpp
+++ b/far/stddlg.hpp
@@ -195,6 +195,8 @@ bool ConfirmAbort();
bool CheckForEscAndConfirmAbort();
bool RetryAbort(std::vector<string>&& Messages);

+void regex_playground();
+
class progress_impl
{
protected: