2000-02-10 17:53:36 +00:00
|
|
|
/* This file is part of
|
|
|
|
* ======================================================
|
|
|
|
*
|
|
|
|
* LyX, The Document Processor
|
|
|
|
*
|
|
|
|
* Copyright 1995 Matthias Ettrich
|
|
|
|
* Copyright 1995-2000 The LyX Team.
|
|
|
|
*
|
|
|
|
* ====================================================== */
|
|
|
|
|
|
|
|
#include <config.h>
|
|
|
|
#include <cmath>
|
|
|
|
|
|
|
|
#ifdef __GNUG__
|
|
|
|
#pragma implementation
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#include "WorkArea.h"
|
|
|
|
#include "debug.h"
|
|
|
|
#include "support/lstrings.h"
|
|
|
|
#include "BufferView.h"
|
|
|
|
|
2000-03-28 02:18:55 +00:00
|
|
|
using std::endl;
|
|
|
|
|
2000-02-10 17:53:36 +00:00
|
|
|
FL_OBJECT * figinset_canvas;
|
|
|
|
|
2000-03-16 04:29:22 +00:00
|
|
|
// need to make the c++ compiler fint the correct version of abs.
|
|
|
|
// This is at least true for g++.
|
|
|
|
using std::abs;
|
|
|
|
|
2000-02-10 17:53:36 +00:00
|
|
|
static inline
|
|
|
|
void waitForX()
|
|
|
|
{
|
|
|
|
XSync(fl_get_display(), 0);
|
|
|
|
}
|
|
|
|
|
2000-02-11 13:52:44 +00:00
|
|
|
extern "C" {
|
|
|
|
// Just a bunch of C wrappers around static members of WorkArea
|
|
|
|
void C_WorkArea_scroll_cb(FL_OBJECT * ob, long buf)
|
|
|
|
{
|
|
|
|
WorkArea::scroll_cb(ob, buf);
|
|
|
|
}
|
|
|
|
|
|
|
|
int C_WorkArea_work_area_handler(FL_OBJECT * ob, int event,
|
|
|
|
FL_Coord, FL_Coord,
|
|
|
|
int key, void * xev)
|
|
|
|
{
|
|
|
|
return WorkArea::work_area_handler(ob, event,
|
|
|
|
0, 0, key, xev);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2000-02-10 17:53:36 +00:00
|
|
|
|
|
|
|
WorkArea::WorkArea(BufferView * o, int xpos, int ypos, int width, int height)
|
2000-02-17 19:59:08 +00:00
|
|
|
: owner(o), workareapixmap(0), painter_(*this)
|
2000-02-10 17:53:36 +00:00
|
|
|
{
|
|
|
|
fl_freeze_all_forms();
|
|
|
|
|
|
|
|
figinset_canvas = 0;
|
2000-03-06 02:42:40 +00:00
|
|
|
|
|
|
|
if (lyxerr.debugging())
|
|
|
|
lyxerr << "Creating work area: +"
|
|
|
|
<< xpos << '+' << ypos << ' '
|
|
|
|
<< width << 'x' << height << endl;
|
2000-02-10 17:53:36 +00:00
|
|
|
//
|
|
|
|
FL_OBJECT * obj;
|
|
|
|
const int bw = int(abs(float(fl_get_border_width())));
|
|
|
|
|
|
|
|
// We really want to get rid of figinset_canvas.
|
|
|
|
::figinset_canvas = figinset_canvas = obj =
|
|
|
|
fl_add_canvas(FL_NORMAL_CANVAS,
|
|
|
|
xpos + 1, ypos + 1, 1, 1, "");
|
|
|
|
fl_set_object_boxtype(obj, FL_NO_BOX);
|
|
|
|
fl_set_object_resize(obj, FL_RESIZE_ALL);
|
|
|
|
fl_set_object_gravity(obj, NorthWestGravity, NorthWestGravity);
|
|
|
|
|
|
|
|
// a box
|
2000-03-06 02:42:40 +00:00
|
|
|
if (lyxerr.debugging())
|
|
|
|
lyxerr << "\tbackground box: +"
|
|
|
|
<< xpos << '+' << ypos << ' '
|
|
|
|
<< width - 15 << 'x' << height << endl;
|
2000-02-10 17:53:36 +00:00
|
|
|
backgroundbox = obj = fl_add_box(FL_BORDER_BOX,
|
|
|
|
xpos, ypos,
|
|
|
|
width - 15,
|
|
|
|
height,"");
|
|
|
|
fl_set_object_resize(obj, FL_RESIZE_ALL);
|
|
|
|
fl_set_object_gravity(obj, NorthWestGravity, SouthEastGravity);
|
|
|
|
|
|
|
|
//
|
|
|
|
// THE SCROLLBAR
|
|
|
|
//
|
|
|
|
|
2000-04-26 13:57:28 +00:00
|
|
|
scrollbar = obj = fl_add_scrollbar(FL_VERT_SCROLLBAR,
|
|
|
|
xpos + width - 15,
|
|
|
|
ypos, 17, height, "");
|
|
|
|
fl_set_object_boxtype(obj, FL_UP_BOX);
|
|
|
|
fl_set_object_resize(obj, FL_RESIZE_ALL);
|
|
|
|
fl_set_object_gravity(obj, NorthEastGravity, SouthEastGravity);
|
|
|
|
obj->u_vdata = this;
|
|
|
|
fl_set_object_callback(obj, C_WorkArea_scroll_cb, 0);
|
2000-02-10 17:53:36 +00:00
|
|
|
|
|
|
|
///
|
|
|
|
/// The free object
|
|
|
|
|
|
|
|
// Create the workarea pixmap
|
|
|
|
createPixmap(width - 15 - 2 * bw, height - 2 * bw);
|
2000-02-17 19:59:08 +00:00
|
|
|
|
2000-02-10 17:53:36 +00:00
|
|
|
// We add this object as late as possible to avoit problems
|
|
|
|
// with drawing.
|
2000-03-06 02:42:40 +00:00
|
|
|
if (lyxerr.debugging())
|
|
|
|
lyxerr << "\tfree object: +"
|
|
|
|
<< xpos + bw << '+' << ypos + bw << ' '
|
|
|
|
<< width - 15 - 2 * bw << 'x'
|
|
|
|
<< height - 2 * bw << endl;
|
|
|
|
|
2000-02-10 17:53:36 +00:00
|
|
|
work_area = obj = fl_add_free(FL_INPUT_FREE,
|
|
|
|
xpos + bw, ypos + bw,
|
|
|
|
width - 15 - 2 * bw, // scrollbarwidth
|
|
|
|
height - 2 * bw, "",
|
2000-02-11 13:52:44 +00:00
|
|
|
C_WorkArea_work_area_handler);
|
2000-02-10 17:53:36 +00:00
|
|
|
obj->wantkey = FL_KEY_TAB;
|
|
|
|
obj->u_vdata = this; /* This is how we pass the WorkArea
|
|
|
|
to the work_area_handler. */
|
|
|
|
fl_set_object_boxtype(obj,FL_DOWN_BOX);
|
|
|
|
fl_set_object_resize(obj, FL_RESIZE_ALL);
|
|
|
|
fl_set_object_gravity(obj, NorthWestGravity, SouthEastGravity);
|
|
|
|
|
|
|
|
fl_unfreeze_all_forms();
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
WorkArea::~WorkArea()
|
|
|
|
{
|
|
|
|
if (workareapixmap)
|
|
|
|
XFreePixmap(fl_display, workareapixmap);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2000-03-07 01:14:37 +00:00
|
|
|
bool WorkArea::belowMouse() const
|
|
|
|
{
|
2000-04-08 17:02:02 +00:00
|
|
|
FL_Coord x, y;
|
|
|
|
unsigned int button;
|
|
|
|
fl_get_mouse(&x, &y, &button);
|
|
|
|
FL_Coord ulx = work_area->form->x + work_area->x;
|
|
|
|
FL_Coord uly = work_area->form->y + work_area->y;
|
|
|
|
FL_Coord w = work_area->w;
|
|
|
|
FL_Coord h = work_area->h;
|
|
|
|
if (x > ulx && y > uly && x < ulx + h && y < uly + w)
|
|
|
|
return true;
|
|
|
|
return false;
|
|
|
|
|
|
|
|
|
|
|
|
//lyxerr << "Mouse: (" << x << ", " << y <<") button = " << button << endl;
|
|
|
|
//lyxerr << "Workarea: (" << work_area->x + work_area->form->x << ", " << work_area->y + work_area->form->y << ", " << work_area->w << ", " << work_area->h << ")" << endl;
|
|
|
|
//lyxerr << "Below mouse: " << work_area->belowmouse << endl;
|
|
|
|
//return work_area->belowmouse;
|
2000-03-07 01:14:37 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
|
2000-02-10 17:53:36 +00:00
|
|
|
void WorkArea::resize(int xpos, int ypos, int width, int height)
|
|
|
|
{
|
|
|
|
fl_freeze_all_forms();
|
|
|
|
|
|
|
|
const int bw = int(abs(float(fl_get_border_width())));
|
|
|
|
|
|
|
|
// a box
|
|
|
|
fl_set_object_geometry(backgroundbox, xpos, ypos, width - 15, height);
|
|
|
|
|
|
|
|
//
|
|
|
|
// THE SCROLLBAR
|
|
|
|
//
|
2000-04-26 13:57:28 +00:00
|
|
|
fl_set_object_geometry(scrollbar, xpos + width - 15,
|
|
|
|
ypos, 17, height);
|
2000-04-27 09:10:51 +00:00
|
|
|
|
2000-02-10 17:53:36 +00:00
|
|
|
// Create the workarea pixmap
|
|
|
|
createPixmap(width - 15 - 2 * bw, height - 2 * bw);
|
|
|
|
|
|
|
|
// the free object
|
|
|
|
fl_set_object_geometry(work_area, xpos + bw, ypos + bw,
|
|
|
|
width - 15 - 2 * bw,
|
|
|
|
height - 2 * bw);
|
|
|
|
|
|
|
|
fl_unfreeze_all_forms();
|
|
|
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
void WorkArea::createPixmap(int width, int height)
|
|
|
|
{
|
|
|
|
static int cur_width = -1;
|
|
|
|
static int cur_height = -1;
|
|
|
|
|
|
|
|
if (cur_width == width && cur_height == height && workareapixmap)
|
|
|
|
return;
|
|
|
|
|
|
|
|
cur_width = width;
|
|
|
|
cur_height = height;
|
|
|
|
|
|
|
|
if (workareapixmap)
|
|
|
|
XFreePixmap(fl_display, workareapixmap);
|
2000-03-06 02:42:40 +00:00
|
|
|
|
|
|
|
if (lyxerr.debugging())
|
|
|
|
lyxerr << "Creating pixmap ("
|
|
|
|
<< width << 'x' << height << ")" << endl;
|
2000-02-10 17:53:36 +00:00
|
|
|
|
|
|
|
workareapixmap = XCreatePixmap(fl_display,
|
|
|
|
RootWindow(fl_display, 0),
|
|
|
|
width,
|
|
|
|
height,
|
|
|
|
fl_get_visual_depth());
|
2000-03-06 02:42:40 +00:00
|
|
|
if (lyxerr.debugging())
|
|
|
|
lyxerr << "\tpixmap=" << workareapixmap << endl;
|
2000-02-10 17:53:36 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
void WorkArea::greyOut() const
|
|
|
|
{
|
|
|
|
fl_winset(FL_ObjWin(work_area));
|
|
|
|
fl_rectangle(1, work_area->x, work_area->y,
|
|
|
|
work_area->w, work_area->h, FL_GRAY63);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
void WorkArea::setFocus() const
|
|
|
|
{
|
|
|
|
fl_set_focus_object(work_area->form, work_area);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
void WorkArea::setScrollbar(double pos, double length_fraction) const
|
|
|
|
{
|
2000-04-26 13:57:28 +00:00
|
|
|
fl_set_scrollbar_value(scrollbar, pos);
|
|
|
|
fl_set_scrollbar_size(scrollbar, scrollbar->h * length_fraction);
|
2000-02-10 17:53:36 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
void WorkArea::setScrollbarBounds(double l1, double l2) const
|
|
|
|
{
|
2000-04-26 13:57:28 +00:00
|
|
|
fl_set_scrollbar_bounds(scrollbar, l1, l2);
|
2000-02-10 17:53:36 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
|
2000-04-26 13:57:28 +00:00
|
|
|
void WorkArea::setScrollbarIncrements(double inc) const
|
2000-02-10 17:53:36 +00:00
|
|
|
{
|
2000-04-26 13:57:28 +00:00
|
|
|
fl_set_scrollbar_increment(scrollbar, work_area->h - inc, inc);
|
2000-02-10 17:53:36 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
// Callback for scrollbar slider
|
|
|
|
void WorkArea::scroll_cb(FL_OBJECT * ob, long)
|
|
|
|
{
|
|
|
|
WorkArea * area = static_cast<WorkArea*>(ob->u_vdata);
|
2000-04-26 13:57:28 +00:00
|
|
|
// 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));
|
2000-02-10 17:53:36 +00:00
|
|
|
waitForX();
|
|
|
|
}
|
|
|
|
|
|
|
|
bool Lgb_bug_find_hack = false;
|
|
|
|
|
|
|
|
int WorkArea::work_area_handler(FL_OBJECT * ob, int event,
|
2000-03-06 02:42:40 +00:00
|
|
|
FL_Coord, FL_Coord ,
|
|
|
|
int /*key*/, void * xev)
|
2000-02-10 17:53:36 +00:00
|
|
|
{
|
|
|
|
static int x_old = -1;
|
|
|
|
static int y_old = -1;
|
|
|
|
static long scrollbar_value_old = -1;
|
|
|
|
|
|
|
|
XEvent * ev = static_cast<XEvent*>(xev);
|
|
|
|
WorkArea * area = static_cast<WorkArea*>(ob->u_vdata);
|
|
|
|
|
|
|
|
if (!area) return 1;
|
|
|
|
|
|
|
|
switch (event){
|
|
|
|
case FL_DRAW:
|
|
|
|
if (!area->work_area ||
|
|
|
|
!area->work_area->form->visible)
|
|
|
|
return 1;
|
|
|
|
lyxerr.debug() << "Workarea event: DRAW" << endl;
|
|
|
|
area->createPixmap(area->workWidth(), area->height());
|
|
|
|
Lgb_bug_find_hack = true;
|
|
|
|
area->owner->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;
|
2000-02-17 19:59:08 +00:00
|
|
|
area->owner->workAreaButtonPress(ev->xbutton.x - ob->x,
|
2000-02-10 17:53:36 +00:00
|
|
|
ev->xbutton.y - ob->y,
|
|
|
|
ev->xbutton.button);
|
|
|
|
break;
|
|
|
|
case FL_RELEASE:
|
|
|
|
if (!ev) break;
|
|
|
|
// Should really have used xbutton.state
|
|
|
|
lyxerr.debug() << "Workarea event: RELEASE" << endl;
|
2000-02-17 19:59:08 +00:00
|
|
|
area->owner->workAreaButtonRelease(ev->xbutton.x - ob->x,
|
2000-02-10 17:53:36 +00:00
|
|
|
ev->xbutton.y - ob->y,
|
|
|
|
ev->xbutton.button);
|
|
|
|
break;
|
|
|
|
case FL_MOUSE:
|
|
|
|
if (!ev || ! area->scrollbar) break;
|
|
|
|
if (ev->xmotion.x != x_old ||
|
|
|
|
ev->xmotion.y != y_old ||
|
2000-04-26 13:57:28 +00:00
|
|
|
fl_get_scrollbar_value(area->scrollbar) != scrollbar_value_old
|
|
|
|
) {
|
2000-02-10 17:53:36 +00:00
|
|
|
lyxerr.debug() << "Workarea event: MOUSE" << endl;
|
2000-02-17 19:59:08 +00:00
|
|
|
area->owner->workAreaMotionNotify(ev->xmotion.x - ob->x,
|
2000-02-10 17:53:36 +00:00
|
|
|
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_FOCUS:
|
2000-03-06 02:42:40 +00:00
|
|
|
lyxerr.debug() << "Workarea event: FOCUS" << endl;
|
2000-02-10 17:53:36 +00:00
|
|
|
break;
|
|
|
|
case FL_UNFOCUS:
|
2000-03-06 02:42:40 +00:00
|
|
|
lyxerr.debug() << "Workarea event: UNFOCUS" << endl;
|
2000-02-10 17:53:36 +00:00
|
|
|
break;
|
|
|
|
case FL_ENTER:
|
2000-03-06 02:42:40 +00:00
|
|
|
lyxerr.debug() << "Workarea event: ENTER" << endl;
|
2000-04-14 19:20:33 +00:00
|
|
|
area->owner->enterView();
|
2000-02-10 17:53:36 +00:00
|
|
|
break;
|
|
|
|
case FL_LEAVE:
|
2000-03-06 02:42:40 +00:00
|
|
|
lyxerr.debug() << "Workarea event: LEAVE" << endl;
|
2000-04-14 19:20:33 +00:00
|
|
|
area->owner->leaveView();
|
2000-02-10 17:53:36 +00:00
|
|
|
break;
|
|
|
|
case FL_DBLCLICK:
|
|
|
|
if (!ev) break;
|
2000-02-23 16:39:03 +00:00
|
|
|
lyxerr.debug() << "Workarea event: DBLCLICK" << endl;
|
|
|
|
area->owner->doubleClick(ev->xbutton.x - ob->x,
|
|
|
|
ev->xbutton.y - ob->y,
|
|
|
|
ev->xbutton.button);
|
2000-02-10 17:53:36 +00:00
|
|
|
break;
|
|
|
|
case FL_TRPLCLICK:
|
|
|
|
if (!ev) break;
|
|
|
|
lyxerr.debug() << "Workarea event: TRPLCLICK" << endl;
|
2000-02-29 02:19:17 +00:00
|
|
|
area->owner->tripleClick(ev->xbutton.x - ob->x,
|
2000-02-23 16:39:03 +00:00
|
|
|
ev->xbutton.y - ob->y,
|
|
|
|
ev->xbutton.button);
|
2000-02-10 17:53:36 +00:00
|
|
|
break;
|
|
|
|
case FL_OTHER:
|
|
|
|
if (!ev) break;
|
|
|
|
if (ev->type == SelectionNotify) {
|
|
|
|
lyxerr.debug() << "Workarea event: SELECTION" << endl;
|
2000-02-17 19:59:08 +00:00
|
|
|
area->owner->workAreaSelectionNotify(area->work_area->form->window, ev);
|
2000-02-10 17:53:36 +00:00
|
|
|
} else
|
|
|
|
lyxerr.debug() << "Workarea event: OTHER" << endl;
|
|
|
|
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
|
|
|
|
return 1;
|
|
|
|
}
|