Bugfixes: checkboxes to radiobuttons (from J�rgen S) and remove a little

[lyx.git] / src / frontends / xforms / GUIRunTime.C

diff --git a/src/frontends/xforms/GUIRunTime.C b/src/frontends/xforms/GUIRunTime.C
index b7763baf4efc8fb2ced12d8a5591bad4ac5e6261..9d4305856ad91255adf62d93be521e0dc5756d73 100644 (file)
--- a/src/frontends/xforms/GUIRunTime.C
+++ b/src/frontends/xforms/GUIRunTime.C
@@ -3,44 +3,151 @@
  * 
  *           LyX, The Document Processor
  *      
- *           Copyright 2000 The LyX Team.
+ *           Copyright 2000-2001 The LyX Team.
  *
  *======================================================*/
 
 #include <config.h>
 
+#include FORMS_H_LOCATION
+
 #ifdef __GNUG__
 #pragma implementation
 #endif
 
-#include FORMS_H_LOCATION
 #include "GUIRunTime.h"
+#include "XFormsView.h"
 #include "debug.h"
 
+// I keep these here so that it will be processed as early in
+// the compilation process as possible.
+#if !defined(FL_REVISION) || FL_REVISION < 88 || FL_VERSION != 0
+#error LyX will not compile with this version of XForms.\
+       Please get version 0.89.\
+       If you want to try to compile anyway, delete this test in src/frontends/xforms/GUIRunTime.C.
+#endif
+
 using std::endl;
 
 extern bool finished;
 
+namespace {
 
-void GUIRunTime::processEvents() 
+int const xforms_include_version = FL_INCLUDE_VERSION;
+
+} // namespace anon
+
+
+int GUIRunTime::initApplication(int &, char **)
 {
-    XEvent ev;
+       // Check the XForms version in the forms.h header against
+       // the one in the libforms. If they don't match quit the
+       // execution of LyX. Better with a clean fast exit than
+       // a strange segfault later.
+       // I realize that this check have to be moved when we
+       // support several toolkits, but IMO all the toolkits
+       // should try to have the same kind of check. This could
+       // be done by having a CheckHeaderAndLib function in
+       // all the toolkit implementations, this function is
+       // responsible for notifing the user.
+       // if (!CheckHeaderAndLib()) {
+       //         // header vs. lib version failed
+       //         return 1;
+       // }
+       int xforms_lib_version = fl_library_version(0, 0);
+       if (xforms_include_version != xforms_lib_version) {
+               lyxerr << "You are either running LyX with wrong "
+                       "version of a dynamic XForms library\n"
+                       "or you have build LyX with conflicting header "
+                       "and library (different\n"
+                       "versions of XForms. Sorry but there is no point "
+                       "in continuing executing LyX!" << endl;
+               return 1;
+       }
+       return 0;
+}
 
-    if (fl_do_forms() == FL_EVENT) {
-       lyxerr << "LyX: This shouldn't happen..." << endl;
-       fl_XNextEvent(&ev);
-    }
+
+void GUIRunTime::processEvents() 
+{
+       if (fl_do_forms() == FL_EVENT) {
+               XEvent ev;
+               fl_XNextEvent(&ev);
+               lyxerr << "Received unhandled X11 event" << endl;
+               lyxerr << "Type: 0x" << std::hex << ev.xany.type <<
+                       "Target: 0x" << std::hex << ev.xany.window << endl;
+       }
 }
 
 
 void GUIRunTime::runTime()
 {
-       XEvent ev;
        while (!finished) {
                if (fl_check_forms() == FL_EVENT) {
-                       lyxerr << "LyX: This shouldn't appen..." << endl;
+                       XEvent ev;
                        fl_XNextEvent(&ev);
+                       lyxerr << "Received unhandled X11 event" << endl;
+                       lyxerr << "Type: 0x" << std::hex << ev.xany.type <<
+                               "Target: 0x" << std::hex << ev.xany.window << endl;
                }
        }
 }
 
+
+void GUIRunTime::setDefaults()
+{
+       FL_IOPT cntl;
+       cntl.buttonFontSize = FL_NORMAL_SIZE;
+       cntl.browserFontSize = FL_NORMAL_SIZE;
+       cntl.labelFontSize = FL_NORMAL_SIZE;
+       cntl.choiceFontSize = FL_NORMAL_SIZE;
+       cntl.inputFontSize = FL_NORMAL_SIZE;
+       cntl.menuFontSize  = FL_NORMAL_SIZE;
+       cntl.borderWidth = -1;
+       cntl.vclass = FL_DefaultVisual;
+       fl_set_defaults(FL_PDVisual
+                       | FL_PDButtonFontSize
+                       | FL_PDBrowserFontSize
+                       | FL_PDLabelFontSize
+                       | FL_PDChoiceFontSize
+                       | FL_PDInputFontSize
+                       | FL_PDMenuFontSize
+                       | FL_PDBorderWidth, &cntl);
+}
+
+
+LyXView * GUIRunTime::createMainView(int w, int h)
+{
+       return new XFormsView(w, h);
+}
+
+
+Display * GUIRunTime::x11Display()
+{
+       return fl_get_display();
+}
+
+
+int GUIRunTime::x11Screen()
+{
+       return fl_screen;
+}
+
+
+Colormap GUIRunTime::x11Colormap()
+{
+       return fl_state[fl_get_vclass()].colormap;
+}
+
+
+int GUIRunTime::x11VisualDepth()
+{
+       return fl_get_visual_depth();
+}
+
+float GUIRunTime::getScreenDPI()
+{
+       Screen * scr = ScreenOfDisplay(fl_get_display(), fl_screen);
+       return ((HeightOfScreen(scr) * 25.4 / HeightMMOfScreen(scr)) +
+               (WidthOfScreen(scr) * 25.4 / WidthMMOfScreen(scr))) / 2;
+}