1 /* This file is part of
2 * ======================================================
4 * LyX, The Document Processor
6 * Copyright 1995 Matthias Ettrich
7 * Copyright 1995-2001 The LyX Team.
9 * ====================================================== */
14 #pragma implementation
17 #include "XFormsView.h"
18 #if FL_VERSION < 1 && (FL_REVISION < 89 || (FL_REVISION == 89 && FL_FIXLEVEL < 5))
19 #include "frontends/xforms/lyxlookup.h"
21 #include "minibuffer.h"
25 #include "support/filetools.h" // OnlyFilename()
26 #include "frontends/Toolbar.h"
27 #include "frontends/Menubar.h"
28 #include "frontends/Timeout.h"
29 #include "MenuBackend.h"
30 #include "ToolbarDefaults.h"
32 #include "BufferView.h"
34 #include <boost/bind.hpp>
39 //extern void AutoSave(BufferView *);
40 extern void QuitLyX();
42 // This is very temporary
43 BufferView * current_view;
48 int C_XFormsView_atCloseMainFormCB(FL_FORM * form, void * p)
50 return XFormsView::atCloseMainFormCB(form, p);
56 XFormsView::XFormsView(int width, int height)
59 create_form_form_main(width, height);
60 fl_set_form_atclose(getForm(), C_XFormsView_atCloseMainFormCB, 0);
62 // Connect the minibuffer signals
63 minibuffer_->stringReady.connect(boost::bind(&LyXFunc::miniDispatch, getLyXFunc(), _1));
64 minibuffer_->timeout.connect(boost::bind(&LyXFunc::initMiniBuffer, getLyXFunc()));
66 // Make sure the buttons are disabled if needed.
71 XFormsView::~XFormsView() {}
74 /// Redraw the main form.
75 void XFormsView::redraw() {
76 lyxerr[Debug::INFO] << "XFormsView::redraw()" << endl;
77 fl_redraw_form(getForm());
78 getMiniBuffer()->redraw();
82 FL_FORM * XFormsView::getForm() const
88 // Callback for close main form from window manager
89 int XFormsView::atCloseMainFormCB(FL_FORM *, void *)
96 void XFormsView::setPosition(int x, int y)
98 fl_set_form_position(getForm(), x, y);
102 void XFormsView::show(int place, int border, string const & title)
104 fl_set_form_minsize(getForm(), getForm()->w, getForm()->h);
105 fl_show_form(getForm(), place, border, title.c_str());
106 getLyXFunc()->initMiniBuffer();
107 #if FL_VERSION < 1 && (FL_REVISION < 89 || (FL_REVISION == 89 && FL_FIXLEVEL < 5))
108 InitLyXLookup(fl_get_display(), getForm()->window);
113 void XFormsView::create_form_form_main(int width, int height)
114 /* to make this work as it should, .lyxrc should have been
115 * read first; OR maybe this one should be made dynamic.
117 * We will probably not have lyxrc before the main form is
118 * initialized, because error messages from lyxrc parsing
119 * are presented (and rightly so) in GUI popups. Asger.
123 form_.reset(fl_bgn_form(FL_NO_BOX, width, height));
124 getForm()->u_vdata = this;
125 FL_OBJECT * obj = fl_add_box(FL_FLAT_BOX, 0, 0, width, height, "");
126 fl_set_object_color(obj, FL_MCOL, FL_MCOL);
128 // Parameters for the appearance of the main form
130 int const bw = abs(fl_get_border_width());
132 menubar_.reset(new Menubar(this, menubackend));
134 toolbar_.reset(new Toolbar(this, air, 30 + air + bw, toolbardefaults));
137 int const ywork = 60 + 2 * air + bw;
138 int const workheight = height - ywork - (25 + 2 * air);
140 bufferview_.reset(new BufferView(this, air, ywork,
141 width - 3 * air, workheight));
142 ::current_view = bufferview_.get();
144 minibuffer_.reset(new MiniBuffer(this, air, height - (25 + air),
145 width - (2 * air), 25));
147 // FIXME: why do this in xforms/ ?
148 autosave_timeout_->timeout.connect(boost::bind(&XFormsView::AutoSave, this));
150 // assign an icon to main form
151 string iconname = LibFileSearch("images", "lyx", "xpm");
152 if (!iconname.empty()) {
154 Pixmap lyx_p, lyx_mask;
155 lyx_p = fl_read_pixmapfile(fl_root,
163 fl_set_form_icon(getForm(), lyx_p, lyx_mask);
167 fl_set_form_minsize(getForm(), 50, 50);
171 minibuffer_->dd_init();
175 void XFormsView::init()
177 // Set the textclass choice
178 invalidateLayoutChoice();
179 updateLayoutChoice();
182 // Start autosave timer
183 if (lyxrc.autosave) {
184 autosave_timeout_->setTimeout(lyxrc.autosave * 1000);
185 autosave_timeout_->start();
188 intl_->InitKeyMapper(lyxrc.use_kbmap);
192 void XFormsView::setWindowTitle(string const & title, string const & icon_title)
194 fl_set_form_title(getForm(), title.c_str());
195 fl_winicontitle(form_->window, icon_title.c_str());
199 // How should this actually work? Should it prohibit input in all BufferViews,
200 // or just in the current one? If "just the current one", then it should be
201 // placed in BufferView. If "all BufferViews" then LyXGUI (I think) should
202 // run "prohibitInput" on all LyXViews which will run prohibitInput on all
203 // BufferViews. Or is it perhaps just the (input in) BufferViews in the
204 // current LyxView that should be prohibited (Lgb) (This applies to
205 // "allowInput" as well.)
206 void XFormsView::prohibitInput() const
208 view()->hideCursor();
210 static Cursor cursor;
211 static bool cursor_undefined = true;
213 if (cursor_undefined) {
214 cursor = XCreateFontCursor(fl_get_display(), XC_watch);
215 XFlush(fl_get_display());
216 cursor_undefined = false;
219 /* set the cursor to the watch for all forms and the canvas */
220 XDefineCursor(fl_get_display(), getForm()->window, cursor);
222 XFlush(fl_get_display());
223 fl_deactivate_all_forms();
227 void XFormsView::allowInput() const
229 /* reset the cursor from the watch for all forms and the canvas */
231 XUndefineCursor(fl_get_display(), getForm()->window);
233 XFlush(fl_get_display());
234 fl_activate_all_forms();