]> git.lyx.org Git - lyx.git/blob - src/frontends/xforms/XFormsView.C
fix rbearing
[lyx.git] / src / frontends / xforms / XFormsView.C
1 /**
2  * \file XFormsView.C
3  * This file is part of LyX, the document processor.
4  * Licence details can be found in the file COPYING.
5  *
6  * \author unknown
7  *
8  * Full author contact details are available in file CREDITS
9  */
10
11 #include <config.h>
12
13 #ifdef __GNUG__
14 #pragma implementation
15 #endif
16
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"
21 #endif
22 #include "frontends/xforms/XMiniBuffer.h"
23 #include "debug.h"
24 #include "intl.h"
25 #include "lyxrc.h"
26 #include "support/filetools.h"        // OnlyFilename()
27 #include "frontends/Toolbar.h"
28 #include "frontends/Menubar.h"
29 #include "frontends/Timeout.h"
30 #include "frontends/Dialogs.h"
31 #include "MenuBackend.h"
32 #include "ToolbarDefaults.h"
33 #include "lyxfunc.h"
34 #include "bufferview_funcs.h"
35 #include "BufferView.h"
36
37 #include <boost/bind.hpp>
38 #include <boost/signals/connection.hpp>
39 using std::abs;
40 using std::endl;
41
42 //extern void AutoSave(BufferView *);
43 extern void QuitLyX();
44
45 // This is very temporary
46 BufferView * current_view;
47
48 extern "C" {
49
50 static
51 int C_XFormsView_atCloseMainFormCB(FL_FORM * form, void * p)
52 {
53         return XFormsView::atCloseMainFormCB(form, p);
54 }
55
56 }
57
58
59 XFormsView::XFormsView(int width, int height)
60         : LyXView()
61 {
62         create_form_form_main(width, height);
63         fl_set_form_atclose(getForm(), C_XFormsView_atCloseMainFormCB, 0);
64
65         view_state_con = view_state_changed.connect(boost::bind(&XFormsView::show_view_state, this));
66         focus_con = focus_command_buffer.connect(boost::bind(&XMiniBuffer::focus, minibuffer_.get()));
67
68         // Make sure the buttons are disabled if needed.
69         updateToolbar();
70         redraw_con = getDialogs().redrawGUI().connect(boost::bind(&XFormsView::redraw, this));
71 }
72
73
74 XFormsView::~XFormsView()
75 {
76         minibuffer_->freeze();
77         fl_hide_form(form_);
78         fl_free_form(form_);
79 }
80
81
82 /// Redraw the main form.
83 void XFormsView::redraw()
84 {
85         lyxerr[Debug::INFO] << "XFormsView::redraw()" << endl;
86         fl_redraw_form(getForm());
87         minibuffer_->redraw();
88 }
89
90
91 FL_FORM * XFormsView::getForm() const
92 {
93         return form_;
94 }
95
96
97 // Callback for close main form from window manager
98 int XFormsView::atCloseMainFormCB(FL_FORM *, void *)
99 {
100         QuitLyX();
101         return FL_IGNORE;
102 }
103
104
105 void XFormsView::show(int x, int y, string const & title)
106 {
107         FL_FORM * form = getForm();
108
109         fl_set_form_minsize(form, form->w, form->h);
110
111         int placement = FL_PLACE_CENTER | FL_FREE_SIZE;
112
113         // Did we get a valid geometry position ?
114         if (x >= 0 && y >= 0) {
115                 fl_set_form_position(form, x, y);
116                 placement = FL_PLACE_POSITION;
117         }
118
119         fl_show_form(form, placement, FL_FULLBORDER, title.c_str());
120
121         show_view_state();
122 #if FL_VERSION < 1 && (FL_REVISION < 89 || (FL_REVISION == 89 && FL_FIXLEVEL < 5))
123         InitLyXLookup(fl_get_display(), form_->window);
124 #endif
125 }
126
127
128 void XFormsView::create_form_form_main(int width, int height)
129         /* to make this work as it should, .lyxrc should have been
130          * read first; OR maybe this one should be made dynamic.
131          * Hmmmm. Lgb.
132          * We will probably not have lyxrc before the main form is
133          * initialized, because error messages from lyxrc parsing
134          * are presented (and rightly so) in GUI popups. Asger.
135          */
136 {
137         // the main form
138         form_ = fl_bgn_form(FL_NO_BOX, width, height);
139         getForm()->u_vdata = this;
140         FL_OBJECT * obj = fl_add_box(FL_FLAT_BOX, 0, 0, width, height, "");
141         fl_set_object_color(obj, FL_MCOL, FL_MCOL);
142
143         // Parameters for the appearance of the main form
144         int const air = 2;
145         int const bw = abs(fl_get_border_width());
146
147         menubar_.reset(new Menubar(this, menubackend));
148
149         toolbar_.reset(new Toolbar(this, air, 30 + air + bw, toolbardefaults));
150
151         int const ywork = 60 + 2 * air + bw;
152         int const workheight = height - ywork - (25 + 2 * air);
153
154         bufferview_.reset(new BufferView(this, air, ywork,
155                 width - 3 * air, workheight));
156         ::current_view = bufferview_.get();
157
158         minibuffer_.reset(new XMiniBuffer(this, *controlcommand_,
159                 air, height - (25 + air), width - (2 * air), 25));
160
161         //  assign an icon to main form
162         string iconname = LibFileSearch("images", "lyx", "xpm");
163         if (!iconname.empty()) {
164                 unsigned int w, h;
165                 Pixmap lyx_p, lyx_mask;
166                 lyx_p = fl_read_pixmapfile(fl_root,
167                                            iconname.c_str(),
168                                            &w,
169                                            &h,
170                                            &lyx_mask,
171                                            0,
172                                            0,
173                                            0); // this leaks
174                 fl_set_form_icon(getForm(), lyx_p, lyx_mask);
175         }
176
177         // set min size
178         fl_set_form_minsize(getForm(), 50, 50);
179
180         fl_end_form();
181
182         minibuffer_->dd_init();
183 }
184
185
186 void XFormsView::setWindowTitle(string const & title, string const & icon_title)
187 {
188         fl_set_form_title(getForm(), title.c_str());
189         fl_winicontitle(form_->window, icon_title.c_str());
190 }
191
192
193 void XFormsView::message(string const & str)
194 {
195         minibuffer_->message(str);
196 }
197
198
199 void XFormsView::show_view_state()
200 {
201         message(getLyXFunc().view_status_message());
202 }
203
204
205 // How should this actually work? Should it prohibit input in all BufferViews,
206 // or just in the current one? If "just the current one", then it should be
207 // placed in BufferView. If "all BufferViews" then LyXGUI (I think) should
208 // run "prohibitInput" on all LyXViews which will run prohibitInput on all
209 // BufferViews. Or is it perhaps just the (input in) BufferViews in the
210 // current LyXView that should be prohibited (Lgb) (This applies to
211 // "allowInput" as well.)
212 void XFormsView::prohibitInput() const
213 {
214         view()->hideCursor();
215
216         static Cursor cursor;
217         static bool cursor_undefined = true;
218
219         if (cursor_undefined) {
220                 cursor = XCreateFontCursor(fl_get_display(), XC_watch);
221                 XFlush(fl_get_display());
222                 cursor_undefined = false;
223         }
224
225         /* set the cursor to the watch for all forms and the canvas */
226         XDefineCursor(fl_get_display(), getForm()->window, cursor);
227
228         XFlush(fl_get_display());
229         fl_deactivate_all_forms();
230 }
231
232
233 void XFormsView::allowInput() const
234 {
235         /* reset the cursor from the watch for all forms and the canvas */
236
237         XUndefineCursor(fl_get_display(), getForm()->window);
238
239         XFlush(fl_get_display());
240         fl_activate_all_forms();
241 }