From e8d218109e246b14df0cdf2d818e2575c8108e9f Mon Sep 17 00:00:00 2001 From: Matthias Melcher Date: Tue, 24 Oct 2023 14:28:56 +0200 Subject: FLUID: Adds much more detailed CodeView in preparation for "find" and "reveal" --- fluid/sourceview_panel.fl2 | 365 +++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 365 insertions(+) create mode 100644 fluid/sourceview_panel.fl2 (limited to 'fluid/sourceview_panel.fl2') diff --git a/fluid/sourceview_panel.fl2 b/fluid/sourceview_panel.fl2 new file mode 100644 index 000000000..bc4179292 --- /dev/null +++ b/fluid/sourceview_panel.fl2 @@ -0,0 +1,365 @@ +# data file for the Fltk User Interface Designer (fluid) +version 1.0400 +header_name {.h} +code_name {.cxx} +comment {// +// Code dialogs for the Fast Light Tool Kit (FLTK). +// +// Copyright 1998-2023 by Bill Spitzak and others. +// +// This library is free software. Distribution and use rights are outlined in +// the file "COPYING" which should have been included with this file. If this +// file is missing or damaged, see the license at: +// +// https://www.fltk.org/COPYING.php +// +// Please see the following page on how to report bugs and issues: +// +// https://www.fltk.org/bugs.php +// +} {in_source in_header +} + +decl {\#include "fluid.h"} {private local +} + +decl {\#include "file.h"} {private local +} + +decl {\#include "../src/flstring.h"} {private local +} + +decl {\#include } {private local +} + +decl {\#include } {private local +} + +decl {char *sv_source_filename = NULL;} {private local +} + +decl {char *sv_header_filename = NULL;} {private local +} + +decl {char *sv_design_filename = NULL;} {private local +} + +decl {int sv_code_choice;} {public local +} + +Function {update_sourceview_position()} { + comment {Update the header and source code highlighting depending on the +currently selected object + +The Source View system offers an immediate preview of the code +files that will be generated by FLUID. It also marks the code +generated for the last selected item in the header and the source +file.} open return_type void +} { + code {if (!sourceview_panel || !sourceview_panel->visible()) + return; + if (sv_autoposition->value()==0) + return; + if (sourceview_panel && sourceview_panel->visible() && Fl_Type::current) { + int pos0, pos1; + if (sv_source->visible_r()) { + switch (sv_code_choice) { + case 0: // prolog: not yet (include statements) + pos0 = Fl_Type::current->code1_start; + pos1 = Fl_Type::current->code1_end; + break; + case 1: // static: callbacks, menu declarations + pos0 = Fl_Type::current->code_static_start; + pos1 = Fl_Type::current->code_static_end; + break; + case 2: // code: entire implementation block including children + pos0 = Fl_Type::current->code1_start; + pos1 = Fl_Type::current->code2_end; + break; + case 3: // code1: all implementation code before the children + pos0 = Fl_Type::current->code1_start; + pos1 = Fl_Type::current->code1_end; + break; + case 4: // code1: all implementation code before the children + pos0 = Fl_Type::current->code2_start; + pos1 = Fl_Type::current->code2_end; + break; + } + if (pos0>=0) { + if (pos1buffer()->highlight(pos0, pos1); + int line = sv_source->buffer()->count_lines(0, pos0); + sv_source->scroll(line, 0); + } + } + if (sv_header->visible_r()) { + switch (sv_code_choice) { + case 2: // code: entire implementation block including children + case 3: // code1: all implementation code before the children + case 4: // code1: all implementation code before the children + pos0 = Fl_Type::current->header_start; + pos1 = Fl_Type::current->header_end; + break; + case 0: // prolog: not yet (include statements) + case 1: // static: callbacks, menu declarations + pos0 = Fl_Type::current->header_static_start; + pos1 = Fl_Type::current->header_static_end; + break; + } + if (pos0>=0) { + if (pos1buffer()->highlight(pos0, pos1); + int line = sv_header->buffer()->count_lines(0, pos0); + sv_header->scroll(line, 0); + } + } + }} {} +} + +Function {update_sourceview_position_cb(class Fl_Tabs*, void*)} { + comment {Callback to update the sourceview position.} open return_type void +} { + code {// make sure that the selected tab shows the current view + update_sourceview_cb(0,0); + // highlight the selected widget in the selected tab + update_sourceview_position();} {} +} + +Function {update_sourceview_cb(class Fl_Button*, void*)} { + comment {Generate a header, source, strings, or design file in a temporary directory +and load those into the Code Viewer widgets.} open return_type void +} { + code {if (!sourceview_panel || !sourceview_panel->visible()) + return; + + if (!sv_source_filename) { + sv_source_filename = (char*)malloc(FL_PATH_MAX); + fl_strlcpy(sv_source_filename, get_tmpdir().c_str(), FL_PATH_MAX); + fl_strlcat(sv_source_filename, "source_view_tmp.cxx", FL_PATH_MAX); + } + if (!sv_header_filename) { + sv_header_filename = (char*)malloc(FL_PATH_MAX); + fl_strlcpy(sv_header_filename, get_tmpdir().c_str(), FL_PATH_MAX); + fl_strlcat(sv_header_filename, "source_view_tmp.h", FL_PATH_MAX); + } + if (!sv_design_filename) { + sv_design_filename = (char*)malloc(FL_PATH_MAX); + fl_strlcpy(sv_design_filename, get_tmpdir().c_str(), FL_PATH_MAX); + fl_strlcat(sv_design_filename, "source_view_tmp.fl", FL_PATH_MAX); + } + + if (sv_project->visible_r()) { + write_file(sv_design_filename); + int top = sv_project->top_line(); + sv_project->buffer()->loadfile(sv_design_filename); + sv_project->scroll(top, 0); + } else if (sv_strings->visible_r()) { + static const char *exts[] = { ".txt", ".po", ".msg" }; + char fn[FL_PATH_MAX+1]; + fl_strlcpy(fn, get_tmpdir().c_str(), FL_PATH_MAX); + fl_strlcat(fn, "strings", FL_PATH_MAX); + fl_filename_setext(fn, FL_PATH_MAX, exts[g_project.i18n_type]); + write_strings(fn); + int top = sv_strings->top_line(); + sv_strings->buffer()->loadfile(fn); + sv_strings->scroll(top, 0); + } else if (sv_source->visible_r() || sv_header->visible_r()) { + Fl_String code_file_name_bak = g_project.code_file_name; + g_project.code_file_name = sv_source_filename; + Fl_String header_file_name_bak = g_project.header_file_name; + g_project.header_file_name = sv_header_filename; + + // generate the code and load the files + Fd_Code_Writer f; + // generate files + if (f.write_code(sv_source_filename, sv_header_filename, true)) + { + // load file into source editor + int pos = sv_source->top_line(); + sv_source->buffer()->loadfile(sv_source_filename); + sv_source->scroll(pos, 0); + // load file into header editor + pos = sv_header->top_line(); + sv_header->buffer()->loadfile(sv_header_filename); + sv_header->scroll(pos, 0); + // update the source code highlighting + update_sourceview_position(); + } + + g_project.code_file_name = code_file_name_bak; + g_project.header_file_name = header_file_name_bak; + }} {} +} + +Function {update_sourceview_timer(void*)} { + comment {This is called by the timer itself +} open return_type void +} { + code {update_sourceview_cb(0,0);} {} +} + +Function {sourceview_defer_update()} {open return_type void +} { + code {// we will only update earliest 0.5 seconds after the last change, and only + // if no other change was made, so dragging a widget will not generate any + // CPU load + Fl::remove_timeout(update_sourceview_timer, 0); + Fl::add_timeout(0.5, update_sourceview_timer, 0);} {} +} + +Function {sourceview_toggle_visibility()} { + comment {Show or hide the source code preview. +The state is stored in the app preferences. +} open return_type void +} { + code {if (!sourceview_panel) { + make_sourceview(); + sourceview_panel->callback((Fl_Callback*)toggle_sourceview_cb); + Fl_Preferences svp(fluid_prefs, "sourceview"); + int autorefresh; + svp.get("autorefresh", autorefresh, 1); + sv_autorefresh->value(autorefresh); + int autoposition; + svp.get("autoposition", autoposition, 1); + sv_autoposition->value(autoposition); + int tab; + svp.get("tab", tab, 0); + if (tab>=0 && tabchildren()) sv_tab->value(sv_tab->child(tab)); + svp.get("code_choice", sv_code_choice, 2); + sv_code_choice_w->value(sv_code_choice_w->find_item_with_argument(sv_code_choice)); + if (!position_window(sourceview_panel,"sourceview_pos", 0, 320, 120, 550, 500)) return; + } + + if (sourceview_panel->visible()) { + sourceview_panel->hide(); + sourceview_item->label("Show Source Code..."); + } else { + sourceview_panel->show(); + sourceview_item->label("Hide Source Code..."); + update_sourceview_cb(0,0); + }} {} +} + +Function {make_sourceview()} {open +} { + Fl_Window sourceview_panel { + label {Code View} + callback toggle_sourceview_cb open + xywh {400 569 520 490} type Double align 80 resizable size_range {384 120 0 0} visible + } { + Fl_Tabs sv_tab { + callback update_sourceview_position_cb open + xywh {10 10 500 440} selection_color 4 labelcolor 7 resizable + } { + Fl_Group {} { + label Source open + xywh {10 35 500 415} labelsize 13 resizable + } { + Fl_Text_Editor sv_source {selected + xywh {20 50 480 390} textfont 4 textsize 11 resizable + code0 {\#include "CodeEditor.h"} + code1 {o->linenumber_width(60);} + code2 {o->linenumber_size(o->Fl_Text_Display::textsize());} + class CodeViewer + } + } + Fl_Group {} { + label Header open + xywh {10 35 500 415} labelsize 13 hide + } { + Fl_Text_Editor sv_header { + xywh {20 50 480 390} textfont 4 textsize 11 resizable + code0 {\#include "CodeEditor.h"} + code1 {o->linenumber_width(60);} + code2 {o->linenumber_size(o->Fl_Text_Display::textsize());} + class CodeViewer + } + } + Fl_Group {} { + label Strings open + xywh {10 35 500 415} labelsize 13 hide + } { + Fl_Text_Display sv_strings { + xywh {20 50 480 390} textfont 4 textsize 11 resizable + code1 {o->linenumber_width(60);} + code2 {o->linenumber_size(o->Fl_Text_Display::textsize());} + class TextViewer + } + } + Fl_Group {} { + label Project open + xywh {10 35 500 415} labelsize 13 hide + } { + Fl_Text_Display sv_project { + xywh {20 50 480 390} textfont 4 textsize 11 resizable + code1 {o->linenumber_width(60);} + code2 {o->linenumber_size(o->Fl_Text_Display::textsize());} + class TextViewer + } + } + } + Fl_Group {} {open + xywh {10 460 500 22} + } { + Fl_Button {} { + label Refresh + callback update_sourceview_cb + xywh {10 460 61 20} labelsize 11 + } + Fl_Light_Button sv_autorefresh { + label {Auto-Refresh} + xywh {77 460 91 20} labelsize 11 + code0 {o->callback((Fl_Callback*)update_sourceview_cb);} + } + Fl_Light_Button sv_autoposition { + label {Auto-Position} + xywh {172 460 89 20} labelsize 11 + } + Fl_Choice sv_code_choice_w { + callback {sv_code_choice = (int)o->mvalue()->argument(); +update_sourceview_position();} open + xywh {265 460 70 20} down_box BORDER_BOX labelsize 11 textsize 11 + } { + MenuItem {} { + label prolog + user_data 0 user_data_type long + tooltip {Include statements in header or source code} xywh {0 0 100 20} labelsize 11 + } + MenuItem {} { + label static + user_data 1 user_data_type long + tooltip {static declarations in source code} xywh {10 10 100 20} labelsize 11 + } + MenuItem {} { + label code + user_data 2 user_data_type long + tooltip {widget code block including children} xywh {20 20 100 20} labelsize 11 + } + MenuItem {} { + label {code 1} + user_data 3 user_data_type long + tooltip {widget code block before children} xywh {30 30 100 20} labelsize 11 + } + MenuItem {} { + label {code 2} + user_data 4 user_data_type long + tooltip {widget code block after children} xywh {40 40 100 20} labelsize 11 + } + } + Fl_Box {} { + xywh {375 460 80 20} resizable + } + Fl_Button {} { + label Close + callback toggle_sourceview_b_cb + xywh {460 460 50 20} labelsize 11 + } + } + } +} + +comment { +//} {in_source in_header +} -- cgit v1.2.3