]> git.lyx.org Git - lyx.git/blobdiff - src/WorkArea.C
small changes to ButtonController usage
[lyx.git] / src / WorkArea.C
index 1fd3006829c4d4b47ca143769155c0d1029fa56d..ca9bd91de144b5a0bfe1d53981fc39e69f94fab0 100644 (file)
 #include "debug.h"
 #include "support/lstrings.h"
 #include "BufferView.h"
+#include "LyXView.h"
+#include "lyxfunc.h"
+#include "lyxlookup.h"
 
 using std::endl;
 
 FL_OBJECT * figinset_canvas;
 
-// need to make the c++ compiler find the correct version of abs.
+// needed to make the c++ compiler find the correct version of abs.
 // This is at least true for g++.
 using std::abs;
 
@@ -53,13 +56,13 @@ extern "C" {
 
 
 WorkArea::WorkArea(BufferView * o, int xpos, int ypos, int width, int height)
-       : owner(o), workareapixmap(0), painter_(*this)
+       : owner_(o), workareapixmap(0), painter_(*this)
 {
        fl_freeze_all_forms();
 
        figinset_canvas = 0;
 
-       if (lyxerr.debugging())
+       if (lyxerr.debugging(Debug::GUI))
                lyxerr << "Creating work area: +"
                       << xpos << '+' << ypos << ' '
                       << width << 'x' << height << endl;
@@ -76,7 +79,7 @@ WorkArea::WorkArea(BufferView * o, int xpos, int ypos, int width, int height)
        fl_set_object_gravity(obj, NorthWestGravity, NorthWestGravity);
        
        // a box
-       if (lyxerr.debugging())
+       if (lyxerr.debugging(Debug::GUI))
                lyxerr << "\tbackground box: +"
                       << xpos << '+' << ypos << ' '
                       << width - 15 << 'x' << height << endl;
@@ -108,7 +111,7 @@ WorkArea::WorkArea(BufferView * o, int xpos, int ypos, int width, int height)
 
        // We add this object as late as possible to avoit problems
        // with drawing.
-       if (lyxerr.debugging())
+       if (lyxerr.debugging(Debug::GUI))
                lyxerr << "\tfree object: +"
                       << xpos + bw << '+' << ypos + bw << ' '
                       << width - 15 - 2 * bw << 'x'
@@ -119,7 +122,8 @@ WorkArea::WorkArea(BufferView * o, int xpos, int ypos, int width, int height)
                                      width - 15 - 2 * bw, // scrollbarwidth
                                      height - 2 * bw, "",
                                      C_WorkArea_work_area_handler);
-       obj->wantkey = FL_KEY_TAB;
+       //obj->wantkey = FL_KEY_TAB;
+       obj->wantkey = FL_KEY_ALL;
        obj->u_vdata = this; /* This is how we pass the WorkArea
                                       to the work_area_handler. */
        fl_set_object_boxtype(obj,FL_DOWN_BOX);
@@ -200,7 +204,7 @@ void WorkArea::createPixmap(int width, int height)
        if (workareapixmap)
                XFreePixmap(fl_display, workareapixmap);
 
-       if (lyxerr.debugging())
+       if (lyxerr.debugging(Debug::GUI))
                lyxerr << "Creating pixmap ("
                       << width << 'x' << height << ")" << endl;
        
@@ -209,7 +213,7 @@ void WorkArea::createPixmap(int width, int height)
                                       width,
                                       height, 
                                       fl_get_visual_depth());
-       if (lyxerr.debugging())
+       if (lyxerr.debugging(Debug::GUI))
                lyxerr << "\tpixmap=" << workareapixmap << endl;
 }
 
@@ -254,7 +258,7 @@ void WorkArea::scroll_cb(FL_OBJECT * ob, long)
        // If we really want the accellerating scroll we can do that
        // from here. IMHO that is a waste of effort since we already
        // have other ways to move fast around in the document. (Lgb)
-       area->owner->scrollCB(fl_get_scrollbar_value(ob));
+       area->owner_->scrollCB(fl_get_scrollbar_value(ob));
        waitForX();
 }
 
@@ -262,7 +266,7 @@ bool Lgb_bug_find_hack = false;
 
 int WorkArea::work_area_handler(FL_OBJECT * ob, int event,
                                FL_Coord, FL_Coord ,
-                               int /*key*/, void * xev)
+                               int key, void * xev)
 {
        static int x_old = -1;
        static int y_old = -1;
@@ -273,32 +277,33 @@ int WorkArea::work_area_handler(FL_OBJECT * ob, int event,
 
        if (!area) return 1;
        
-       switch (event){   
+       switch (event){
        case FL_DRAW:
                if (!area->work_area ||
                    !area->work_area->form->visible)
                        return 1;
-               lyxerr.debug() << "Workarea event: DRAW" << endl;
+               lyxerr[Debug::GUI] << "Workarea event: DRAW" << endl;
                area->createPixmap(area->workWidth(), area->height());
                Lgb_bug_find_hack = true;
-               area->owner->workAreaExpose();
+               area->workAreaExpose();
                Lgb_bug_find_hack = false;
                break;
        case FL_PUSH:
                if (!ev) break;
                // Should really have used xbutton.state
-               lyxerr.debug() << "Workarea event: PUSH" << endl;
-               area->owner->workAreaButtonPress(ev->xbutton.x - ob->x,
-                                          ev->xbutton.y - ob->y,
-                                          ev->xbutton.button);
+               lyxerr[Debug::GUI] << "Workarea event: PUSH" << endl;
+               area->workAreaButtonPress(ev->xbutton.x - ob->x,
+                                         ev->xbutton.y - ob->y,
+                                         ev->xbutton.button);
+               //area->workAreaKeyPress(XK_Pointer_Button1, ev->xbutton.state);
                break; 
        case FL_RELEASE:
                if (!ev) break;
                // Should really have used xbutton.state
-               lyxerr.debug() << "Workarea event: RELEASE" << endl;
-               area->owner->workAreaButtonRelease(ev->xbutton.x - ob->x,
-                                            ev->xbutton.y - ob->y,
-                                            ev->xbutton.button);
+               lyxerr[Debug::GUI] << "Workarea event: RELEASE" << endl;
+               area->workAreaButtonRelease(ev->xbutton.x - ob->x,
+                                     ev->xbutton.y - ob->y,
+                                     ev->xbutton.button);
                break;
        case FL_MOUSE:
                if (!ev || ! area->scrollbar) break;
@@ -306,52 +311,164 @@ int WorkArea::work_area_handler(FL_OBJECT * ob, int event,
                    ev->xmotion.y != y_old ||
                    fl_get_scrollbar_value(area->scrollbar) != scrollbar_value_old
                        ) {
-                       lyxerr.debug() << "Workarea event: MOUSE" << endl;
-                       area->owner->workAreaMotionNotify(ev->xmotion.x - ob->x,
-                                                   ev->xmotion.y - ob->y,
-                                                   ev->xbutton.state);
+                       lyxerr[Debug::GUI] << "Workarea event: MOUSE" << endl;
+                       area->workAreaMotionNotify(ev->xmotion.x - ob->x,
+                                            ev->xmotion.y - ob->y,
+                                            ev->xbutton.state);
                }
                break;
-       // Done by the raw callback:
-       //  case FL_KEYBOARD: WorkAreaKeyPress(ob, 0,0,0,ev,0); break;
+       case FL_KEYBOARD:
+       {
+               lyxerr[Debug::KEY] << "Workarea event: KEYBOARD";
+               
+               KeySym keysym = 0;
+               char dummy[1];
+               XKeyEvent * xke = reinterpret_cast<XKeyEvent *>(ev);
+#if FL_REVISION < 89
+               // XForms < 0.89 does not have compose support
+               // so we are using our own compose support
+               LyXLookupString(ev, dummy, 1, &keysym);
+#else
+               XLookupString(xke, dummy, 1, &keysym, 0);
+#endif
+               if (lyxerr.debugging(Debug::KEY)) {
+                       char const * tmp = XKeysymToString(key);
+                       char const * tmp2 = XKeysymToString(keysym);
+                       string stm = (tmp ? tmp : "");
+                       string stm2 = (tmp2 ? tmp2 : "");
+                       
+                       lyxerr << "WorkArea: Key is `" << stm << "' ["
+                              << key << "]" << endl;
+                       lyxerr << "WorkArea: Keysym is `" << stm2 << "' ["
+                              << keysym << "]" << endl;
+               }
+
+#if FL_REVISION < 89
+               if (keysym == NoSymbol) {
+                       lyxerr[Debug::KEY]
+                               << "Empty kdb action (probably composing)"
+                               << endl;
+                       break;
+               }
+               KeySym ret_key = keysym;
+#else
+               if (!key) break;
+               KeySym ret_key = (keysym ? keysym : key);
+#endif 
+               unsigned int ret_state = xke->state;
+               
+               static Time last_time_pressed = 0;
+               static unsigned int last_key_pressed = 0;
+               static unsigned int last_state_pressed = 0;
+               //lyxerr << "Workarea Diff: " << xke->time - last_time_pressed
+               //       << endl;
+               if (xke->time - last_time_pressed < 40 // should perhaps be tunable
+                   && xke->state == last_state_pressed
+                   && xke->keycode == last_key_pressed) {
+                       lyxerr[Debug::KEY]
+                               << "Workarea: Purging X events." << endl;
+                       //lyxerr << "Workarea Events: "
+                       //       << XEventsQueued(fl_get_display(), QueuedAlready)
+                       //       << endl;
+                       if (XEventsQueued(fl_get_display(), QueuedAlready) > 0)
+                               XSync(fl_get_display(), 1);
+                       // This purge make f.ex. scrolling stop immidiatly when
+                       // releasing the PageDown button. The question is if
+                       // this purging of XEvents can cause any harm...
+                       // after some testing I can see no problems, but
+                       // I'd like other reports too.
+                       break;
+               }
+               last_time_pressed = xke->time;
+               last_key_pressed = xke->keycode;
+               last_state_pressed = xke->state;
+               
+               area->workAreaKeyPress(ret_key, ret_state);
+       }
+       break;
        case FL_FOCUS:
-               lyxerr.debug() << "Workarea event: FOCUS" << endl;
+               lyxerr[Debug::GUI] << "Workarea event: FOCUS" << endl;
+               area->workAreaFocus();
                break;
        case FL_UNFOCUS:
-               lyxerr.debug() << "Workarea event: UNFOCUS" << endl;
+               lyxerr[Debug::GUI] << "Workarea event: UNFOCUS" << endl;
+               area->workAreaUnfocus();
                break;
        case FL_ENTER:
-               lyxerr.debug() << "Workarea event: ENTER" << endl;
-               area->owner->enterView();
+               lyxerr[Debug::GUI] << "Workarea event: ENTER" << endl;
+               area->workAreaEnter();
                break;
        case FL_LEAVE:
-               lyxerr.debug() << "Workarea event: LEAVE" << endl;
-               area->owner->leaveView();
+               lyxerr[Debug::GUI] << "Workarea event: LEAVE" << endl;
+               area->workAreaLeave();
                break;
        case FL_DBLCLICK:
                if (!ev) break;
-               lyxerr.debug() << "Workarea event: DBLCLICK" << endl;
-               area->owner->doubleClick(ev->xbutton.x - ob->x,
-                                        ev->xbutton.y - ob->y,
-                                        ev->xbutton.button);
+               lyxerr[Debug::GUI] << "Workarea event: DBLCLICK" << endl;
+               area->workAreaDoubleClick(ev->xbutton.x - ob->x,
+                                         ev->xbutton.y - ob->y,
+                                         ev->xbutton.button);
                break;
        case FL_TRPLCLICK:
                if (!ev) break;
-               lyxerr.debug() << "Workarea event: TRPLCLICK" << endl;
-               area->owner->tripleClick(ev->xbutton.x - ob->x,
-                                        ev->xbutton.y - ob->y,
-                                        ev->xbutton.button);
+               lyxerr[Debug::GUI] << "Workarea event: TRPLCLICK" << endl;
+               area->workAreaTripleClick(ev->xbutton.x - ob->x,
+                                         ev->xbutton.y - ob->y,
+                                         ev->xbutton.button);
                break;
        case FL_OTHER:
                if (!ev) break;
-               if (ev->type == SelectionNotify) {
-                       lyxerr.debug() << "Workarea event: SELECTION" << endl;
-                       area->owner->workAreaSelectionNotify(area->work_area->form->window, ev);
-               } else
-                       lyxerr.debug() << "Workarea event: OTHER" << endl;
+                       lyxerr[Debug::GUI] << "Workarea event: OTHER" << endl;
 
                break;
        }
   
        return 1;
 }
+
+
+static string clipboard_selection;
+static bool clipboard_read = false;
+
+extern "C" {
+       static
+int request_clipboard_cb(FL_OBJECT * /*ob*/, long /*type*/,
+                       void const * data, long size) 
+{
+       clipboard_selection.erase();
+
+       if (size > 0)
+               clipboard_selection.reserve(size);
+       for (int i = 0; i < size; ++i)
+               clipboard_selection += static_cast<char const *>(data)[i];
+       clipboard_read = true;
+       return 0;
+}
+}
+
+string WorkArea::getClipboard() const 
+{
+       clipboard_read = false;
+       
+       if (fl_request_clipboard(work_area, 0, request_clipboard_cb) == -1)
+               return string();
+
+       XEvent ev;
+       
+       while (!clipboard_read) {
+               if (fl_check_forms() == FL_EVENT) {
+                       lyxerr << "LyX: This shouldn't happen..." << endl;
+                       fl_XNextEvent(&ev);
+               }
+       }
+       return clipboard_selection;
+}
+
+       
+void WorkArea::putClipboard(string const & s) const
+{
+       static string hold;
+       hold = s;
+       
+       fl_stuff_clipboard(work_area, 0, hold.c_str(), hold.size(), 0);
+}