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 #include FORMS_H_LOCATION
19 #if FL_VERSION < 1 && (FL_REVISION < 89 || (FL_REVISION == 89 && FL_FIXLEVEL < 5))
20 #include "frontends/xforms/lyxlookup.h"
22 #include "frontends/MiniBuffer.h"
23 #include "frontends/xforms/XMiniBuffer.h"
27 #include "support/filetools.h" // OnlyFilename()
28 #include "frontends/Toolbar.h"
29 #include "frontends/Menubar.h"
30 #include "frontends/Timeout.h"
31 #include "frontends/Dialogs.h"
32 #include "MenuBackend.h"
33 #include "ToolbarDefaults.h"
35 #include "BufferView.h"
37 #include <boost/bind.hpp>
42 //extern void AutoSave(BufferView *);
43 extern void QuitLyX();
45 // This is very temporary
46 BufferView * current_view;
51 int C_XFormsView_atCloseMainFormCB(FL_FORM * form, void * p)
53 return XFormsView::atCloseMainFormCB(form, p);
59 XFormsView::XFormsView(int width, int height)
62 create_form_form_main(*getDialogs(), width, height);
63 fl_set_form_atclose(getForm(), C_XFormsView_atCloseMainFormCB, 0);
65 // Connect the minibuffer signals
66 minibuffer_->inputReady.connect(boost::bind(&LyXFunc::miniDispatch, getLyXFunc(), _1));
67 minibuffer_->timeout.connect(boost::bind(&LyXFunc::initMiniBuffer, getLyXFunc()));
69 view_state_changed.connect(boost::bind(&XFormsView::update_view_state, this));
71 // Make sure the buttons are disabled if needed.
73 getDialogs()->redrawGUI.connect(boost::bind(&XFormsView::redraw, this));
77 XFormsView::~XFormsView()
84 /// Redraw the main form.
85 void XFormsView::redraw()
87 lyxerr[Debug::INFO] << "XFormsView::redraw()" << endl;
88 fl_redraw_form(getForm());
89 // This is dangerous, but we know it is safe
90 XMiniBuffer * m = static_cast<XMiniBuffer *>(getMiniBuffer());
95 FL_FORM * XFormsView::getForm() const
101 // Callback for close main form from window manager
102 int XFormsView::atCloseMainFormCB(FL_FORM *, void *)
109 void XFormsView::show(int x, int y, string const & title)
111 FL_FORM * form = getForm();
113 fl_set_form_minsize(form, form->w, form->h);
115 int placement = FL_PLACE_CENTER | FL_FREE_SIZE;
117 // Did we get a valid geometry position ?
118 if (x >= 0 && y >= 0) {
119 fl_set_form_position(form, x, y);
120 placement = FL_PLACE_POSITION;
123 fl_show_form(form, placement, FL_FULLBORDER, title.c_str());
125 getLyXFunc()->initMiniBuffer();
126 #if FL_VERSION < 1 && (FL_REVISION < 89 || (FL_REVISION == 89 && FL_FIXLEVEL < 5))
127 InitLyXLookup(fl_get_display(), form_->window);
132 void XFormsView::create_form_form_main(Dialogs & dia, int width, int height)
133 /* to make this work as it should, .lyxrc should have been
134 * read first; OR maybe this one should be made dynamic.
136 * We will probably not have lyxrc before the main form is
137 * initialized, because error messages from lyxrc parsing
138 * are presented (and rightly so) in GUI popups. Asger.
142 form_ = fl_bgn_form(FL_NO_BOX, width, height);
143 getForm()->u_vdata = this;
144 FL_OBJECT * obj = fl_add_box(FL_FLAT_BOX, 0, 0, width, height, "");
145 fl_set_object_color(obj, FL_MCOL, FL_MCOL);
147 // Parameters for the appearance of the main form
149 int const bw = abs(fl_get_border_width());
151 menubar_.reset(new Menubar(this, menubackend));
153 toolbar_.reset(new Toolbar(this, dia,
154 air, 30 + air + bw, toolbardefaults));
157 int const ywork = 60 + 2 * air + bw;
158 int const workheight = height - ywork - (25 + 2 * air);
160 bufferview_.reset(new BufferView(this, air, ywork,
161 width - 3 * air, workheight));
162 ::current_view = bufferview_.get();
164 minibuffer_.reset(new XMiniBuffer(this, air, height - (25 + air),
165 width - (2 * air), 25));
167 // FIXME: why do this in xforms/ ?
168 autosave_timeout_->timeout.connect(boost::bind(&XFormsView::autoSave, this));
170 // assign an icon to main form
171 string iconname = LibFileSearch("images", "lyx", "xpm");
172 if (!iconname.empty()) {
174 Pixmap lyx_p, lyx_mask;
175 lyx_p = fl_read_pixmapfile(fl_root,
183 fl_set_form_icon(getForm(), lyx_p, lyx_mask);
187 fl_set_form_minsize(getForm(), 50, 50);
191 // This is dangerous, but we know it is safe in this situation
192 static_cast<XMiniBuffer *>(minibuffer_.get())->dd_init();
196 void XFormsView::setWindowTitle(string const & title, string const & icon_title)
198 fl_set_form_title(getForm(), title.c_str());
199 fl_winicontitle(form_->window, icon_title.c_str());
203 void XFormsView::update_view_state()
205 minibuffer_->message(currentState(view()));
209 // How should this actually work? Should it prohibit input in all BufferViews,
210 // or just in the current one? If "just the current one", then it should be
211 // placed in BufferView. If "all BufferViews" then LyXGUI (I think) should
212 // run "prohibitInput" on all LyXViews which will run prohibitInput on all
213 // BufferViews. Or is it perhaps just the (input in) BufferViews in the
214 // current LyxView that should be prohibited (Lgb) (This applies to
215 // "allowInput" as well.)
216 void XFormsView::prohibitInput() const
218 view()->hideCursor();
220 static Cursor cursor;
221 static bool cursor_undefined = true;
223 if (cursor_undefined) {
224 cursor = XCreateFontCursor(fl_get_display(), XC_watch);
225 XFlush(fl_get_display());
226 cursor_undefined = false;
229 /* set the cursor to the watch for all forms and the canvas */
230 XDefineCursor(fl_get_display(), getForm()->window, cursor);
232 XFlush(fl_get_display());
233 fl_deactivate_all_forms();
237 void XFormsView::allowInput() const
239 /* reset the cursor from the watch for all forms and the canvas */
241 XUndefineCursor(fl_get_display(), getForm()->window);
243 XFlush(fl_get_display());
244 fl_activate_all_forms();