sync code with last improvements from OpenBSD
This commit is contained in:
commit
88965415ff
GPG key ID:
F42C07F07E2E35B7
26235 changed files with 29195616 additions and 0 deletions
975
lib/libXaw/src/MultiSink.c
Normal file
975
lib/libXaw/src/MultiSink.c
Normal file
|
|
@ -0,0 +1,975 @@
|
|||
/*
|
||||
* Copyright 1991 by OMRON Corporation
|
||||
*
|
||||
* Permission to use, copy, modify, distribute, and sell this software and its
|
||||
* documentation for any purpose is hereby granted without fee, provided that
|
||||
* the above copyright notice appear in all copies and that both that
|
||||
* copyright notice and this permission notice appear in supporting
|
||||
* documentation, and that the name of OMRON not be used in advertising
|
||||
* or publicity pertaining to distribution of the software without specific,
|
||||
* written prior permission. OMRON makes no representations about the
|
||||
* suitability of this software for any purpose. It is provided "as is"
|
||||
* without express or implied warranty.
|
||||
*
|
||||
* OMRON DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE,
|
||||
* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO
|
||||
* EVENT SHALL OMRON BE LIABLE FOR ANY SPECIAL, INDIRECT OR
|
||||
* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE,
|
||||
* DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER
|
||||
* TORTUOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
|
||||
* PERFORMANCE OF THIS SOFTWARE.
|
||||
*
|
||||
* Author: Li Yuhong OMRON Corporation
|
||||
*/
|
||||
|
||||
/***********************************************************
|
||||
|
||||
Copyright 1987, 1988, 1994, 1998 The Open Group
|
||||
|
||||
Permission to use, copy, modify, distribute, and sell this software and its
|
||||
documentation for any purpose is hereby granted without fee, provided that
|
||||
the above copyright notice appear in all copies and that both that
|
||||
copyright notice and this permission notice appear in supporting
|
||||
documentation.
|
||||
|
||||
The above copyright notice and this permission notice shall be included in
|
||||
all copies or substantial portions of the Software.
|
||||
|
||||
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
||||
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
||||
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
||||
OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
|
||||
AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
|
||||
CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
||||
|
||||
Except as contained in this notice, the name of The Open Group shall not be
|
||||
used in advertising or otherwise to promote the sale, use or other dealings
|
||||
in this Software without prior written authorization from The Open Group.
|
||||
|
||||
|
||||
Copyright 1987, 1988 by Digital Equipment Corporation, Maynard, Massachusetts.
|
||||
|
||||
All Rights Reserved
|
||||
|
||||
Permission to use, copy, modify, and distribute this software and its
|
||||
documentation for any purpose and without fee is hereby granted,
|
||||
provided that the above copyright notice appear in all copies and that
|
||||
both that copyright notice and this permission notice appear in
|
||||
supporting documentation, and that the name of Digital not be
|
||||
used in advertising or publicity pertaining to distribution of the
|
||||
software without specific, written prior permission.
|
||||
|
||||
DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
|
||||
ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
|
||||
DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
|
||||
ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
|
||||
WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
|
||||
ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
|
||||
SOFTWARE.
|
||||
|
||||
******************************************************************/
|
||||
|
||||
#ifdef HAVE_CONFIG_H
|
||||
#include <config.h>
|
||||
#endif
|
||||
#include <X11/IntrinsicP.h>
|
||||
#include <X11/StringDefs.h>
|
||||
#include <X11/Xatom.h>
|
||||
#include <X11/Xaw/XawInit.h>
|
||||
#include <X11/Xaw/MultiSinkP.h>
|
||||
#include <X11/Xaw/MultiSrcP.h>
|
||||
#include <X11/Xaw/TextP.h>
|
||||
#include "XawI18n.h"
|
||||
#include <stdio.h>
|
||||
#include <ctype.h>
|
||||
#include "Private.h"
|
||||
|
||||
#ifdef GETLASTPOS
|
||||
#undef GETLASTPOS /* We will use our own GETLASTPOS */
|
||||
#endif
|
||||
|
||||
#define GETLASTPOS \
|
||||
XawTextSourceScan(source, 0, XawstAll, XawsdRight, 1, True)
|
||||
|
||||
/*
|
||||
* Class Methods
|
||||
*/
|
||||
static void XawMultiSinkClassInitialize(void);
|
||||
static void XawMultiSinkInitialize(Widget, Widget, ArgList, Cardinal*);
|
||||
static void XawMultiSinkDestroy(Widget);
|
||||
static void XawMultiSinkResize(Widget);
|
||||
static Boolean XawMultiSinkSetValues(Widget, Widget, Widget,
|
||||
ArgList, Cardinal*);
|
||||
static int MaxLines(Widget, unsigned int);
|
||||
static int MaxHeight(Widget, int);
|
||||
static void SetTabs(Widget, int, short*);
|
||||
static void DisplayText(Widget, int, int,
|
||||
XawTextPosition, XawTextPosition, Bool);
|
||||
static void InsertCursor(Widget, int, int, XawTextInsertState);
|
||||
static void FindPosition(Widget, XawTextPosition, int, int, Bool,
|
||||
XawTextPosition*, int*, int*);
|
||||
static void FindDistance(Widget, XawTextPosition, int, XawTextPosition, int*,
|
||||
XawTextPosition*, int*);
|
||||
static void Resolve(Widget, XawTextPosition, int, int, XawTextPosition*);
|
||||
static void GetCursorBounds(Widget, XRectangle*);
|
||||
|
||||
/*
|
||||
* Prototypes
|
||||
*/
|
||||
static void GetGC(MultiSinkObject);
|
||||
static int CharWidth(MultiSinkObject, XFontSet, int, wchar_t);
|
||||
static unsigned int PaintText(Widget w, GC gc, int x, int y,
|
||||
wchar_t *buf, int len, Bool);
|
||||
|
||||
/*
|
||||
* Defined in TextSink.c
|
||||
*/
|
||||
void _XawTextSinkClearToBackground(Widget, int, int, unsigned, unsigned);
|
||||
|
||||
/*
|
||||
* Initialization
|
||||
*/
|
||||
static wchar_t wspace[2];
|
||||
|
||||
#define offset(field) XtOffsetOf(MultiSinkRec, multi_sink.field)
|
||||
static XtResource resources[] = {
|
||||
{
|
||||
XtNfontSet,
|
||||
XtCFontSet,
|
||||
XtRFontSet,
|
||||
sizeof(XFontSet),
|
||||
offset(fontset),
|
||||
XtRString,
|
||||
(XtPointer)XtDefaultFontSet
|
||||
},
|
||||
{
|
||||
XtNecho,
|
||||
XtCOutput,
|
||||
XtRBoolean,
|
||||
sizeof(Boolean),
|
||||
offset(echo),
|
||||
XtRImmediate,
|
||||
(XtPointer)True
|
||||
},
|
||||
{
|
||||
XtNdisplayNonprinting,
|
||||
XtCOutput,
|
||||
XtRBoolean,
|
||||
sizeof(Boolean),
|
||||
offset(display_nonprinting),
|
||||
XtRImmediate,
|
||||
(XtPointer)True
|
||||
},
|
||||
};
|
||||
#undef offset
|
||||
|
||||
#define SuperClass (&textSinkClassRec)
|
||||
MultiSinkClassRec multiSinkClassRec = {
|
||||
/* object */
|
||||
{
|
||||
(WidgetClass)SuperClass, /* superclass */
|
||||
"MultiSink", /* class_name */
|
||||
sizeof(MultiSinkRec), /* widget_size */
|
||||
XawMultiSinkClassInitialize, /* class_initialize */
|
||||
NULL, /* class_part_initialize */
|
||||
False, /* class_inited */
|
||||
XawMultiSinkInitialize, /* initialize */
|
||||
NULL, /* initialize_hook */
|
||||
NULL, /* obj1 */
|
||||
NULL, /* obj2 */
|
||||
0, /* obj3 */
|
||||
resources, /* resources */
|
||||
XtNumber(resources), /* num_resources */
|
||||
NULLQUARK, /* xrm_class */
|
||||
False, /* obj4 */
|
||||
False, /* obj5 */
|
||||
False, /* obj6 */
|
||||
False, /* obj7 */
|
||||
XawMultiSinkDestroy, /* destroy */
|
||||
(XtProc)XawMultiSinkResize, /* obj8 */
|
||||
NULL, /* obj9 */
|
||||
XawMultiSinkSetValues, /* set_values */
|
||||
NULL, /* set_values_hook */
|
||||
NULL, /* obj10 */
|
||||
NULL, /* get_values_hook */
|
||||
NULL, /* obj11 */
|
||||
XtVersion, /* version */
|
||||
NULL, /* callback_private */
|
||||
NULL, /* obj12 */
|
||||
NULL, /* obj13 */
|
||||
NULL, /* obj14 */
|
||||
NULL, /* extension */
|
||||
},
|
||||
/* text_sink */
|
||||
{
|
||||
DisplayText, /* DisplayText */
|
||||
InsertCursor, /* InsertCursor */
|
||||
XtInheritClearToBackground, /* ClearToBackground */
|
||||
FindPosition, /* FindPosition */
|
||||
FindDistance, /* FindDistance */
|
||||
Resolve, /* Resolve */
|
||||
MaxLines, /* MaxLines */
|
||||
MaxHeight, /* MaxHeight */
|
||||
SetTabs, /* SetTabs */
|
||||
GetCursorBounds, /* GetCursorBounds */
|
||||
},
|
||||
/* multi_sink */
|
||||
{
|
||||
NULL, /* extension */
|
||||
}
|
||||
};
|
||||
|
||||
WidgetClass multiSinkObjectClass = (WidgetClass)&multiSinkClassRec;
|
||||
|
||||
/*
|
||||
* Implementation
|
||||
*/
|
||||
static int
|
||||
CharWidth(MultiSinkObject sink, XFontSet fontset, int x, wchar_t c)
|
||||
{
|
||||
int width = 0;
|
||||
|
||||
if (c == _Xaw_atowc(XawLF))
|
||||
return (0);
|
||||
|
||||
if (c == _Xaw_atowc(XawTAB)) {
|
||||
int i;
|
||||
Position *tab;
|
||||
|
||||
width = x;
|
||||
/* Adjust for Left Margin. */
|
||||
x -= ((TextWidget)XtParent((Widget)sink))->text.left_margin;
|
||||
|
||||
i = 0;
|
||||
tab = sink->text_sink.tabs;
|
||||
/*CONSTCOND*/
|
||||
while (1) {
|
||||
if (x < *tab)
|
||||
return (*tab - x);
|
||||
/* Start again */
|
||||
if (++i >= sink->text_sink.tab_count) {
|
||||
x -= *tab;
|
||||
i = 0;
|
||||
tab = sink->text_sink.tabs;
|
||||
if (width == x)
|
||||
return (0);
|
||||
}
|
||||
else
|
||||
++tab;
|
||||
}
|
||||
/*NOTREACHED*/
|
||||
}
|
||||
|
||||
if (XwcTextEscapement(fontset, &c, 1) == 0) {
|
||||
if (sink->multi_sink.display_nonprinting)
|
||||
c = _Xaw_atowc('@');
|
||||
else
|
||||
c = _Xaw_atowc(XawSP);
|
||||
}
|
||||
|
||||
/*
|
||||
* if more efficiency(suppose one column is one ASCII char)
|
||||
|
||||
width = XwcGetColumn(fontset->font_charset, fontset->num_of_fonts, c) *
|
||||
fontset->font_struct_list[0]->min_bounds.width;
|
||||
*
|
||||
* WARNING: Very Slower!!!
|
||||
*
|
||||
* Li Yuhong.
|
||||
*/
|
||||
|
||||
width = XwcTextEscapement(fontset, &c, 1);
|
||||
|
||||
return (width);
|
||||
}
|
||||
|
||||
/*
|
||||
* Function:
|
||||
* PaintText
|
||||
*
|
||||
* Parameters:
|
||||
* w - text sink object
|
||||
* gc - gc to paint text
|
||||
* x - location to paint the text
|
||||
* y - ""
|
||||
* buf - buffer and length of text to paint
|
||||
* len - ""
|
||||
* clear_bg - clear background before drawing ?
|
||||
*
|
||||
* Description:
|
||||
* Actually paints the text into the window.
|
||||
*
|
||||
* Returns:
|
||||
* The width of the text painted
|
||||
*/
|
||||
static unsigned int
|
||||
PaintText(Widget w, GC gc, int x, int y, wchar_t *buf, int len, Bool clear_bg)
|
||||
{
|
||||
MultiSinkObject sink = (MultiSinkObject)w;
|
||||
TextWidget ctx = (TextWidget)XtParent(w);
|
||||
XFontSet fontset = sink->multi_sink.fontset;
|
||||
unsigned int width = (unsigned)XwcTextEscapement(fontset, buf, len);
|
||||
|
||||
if (((int)width) <= -x) /* Don't draw if we can't see it */
|
||||
return (width);
|
||||
|
||||
if (clear_bg) {
|
||||
XFontSetExtents *ext = XExtentsOfFontSet(fontset);
|
||||
|
||||
_XawTextSinkClearToBackground(w, x, y - abs(ext->max_logical_extent.y),
|
||||
width, ext->max_logical_extent.height);
|
||||
XwcDrawString(XtDisplay(ctx), XtWindow(ctx), fontset, gc, x, y, buf, len);
|
||||
}
|
||||
else
|
||||
XwcDrawImageString(XtDisplay(ctx), XtWindow(ctx), fontset, gc,
|
||||
x, y, buf, len);
|
||||
|
||||
return (width);
|
||||
}
|
||||
|
||||
/* Sink Object Functions */
|
||||
/*
|
||||
* This function does not know about drawing more than one line of text
|
||||
*/
|
||||
static void
|
||||
DisplayText(Widget w, int x, int y,
|
||||
XawTextPosition pos1, XawTextPosition pos2, Bool highlight)
|
||||
{
|
||||
TextWidget ctx = (TextWidget)XtParent(w);
|
||||
MultiSinkObject sink = (MultiSinkObject)w;
|
||||
XFontSet fontset = sink->multi_sink.fontset;
|
||||
Widget source = XawTextGetSource(XtParent(w));
|
||||
wchar_t buf[256];
|
||||
XFontSetExtents *ext = XExtentsOfFontSet(fontset);
|
||||
int j, k;
|
||||
XawTextBlock blk;
|
||||
GC gc, invgc, tabgc;
|
||||
int max_x;
|
||||
Bool clear_bg;
|
||||
|
||||
if (!sink->multi_sink.echo || !ctx->text.lt.lines)
|
||||
return;
|
||||
|
||||
max_x = (int)XtWidth(ctx) - ctx->text.r_margin.right;
|
||||
clear_bg = !highlight && ctx->core.background_pixmap != XtUnspecifiedPixmap;
|
||||
|
||||
gc = highlight ? sink->multi_sink.invgc : sink->multi_sink.normgc;
|
||||
invgc = highlight ? sink->multi_sink.normgc : sink->multi_sink.invgc;
|
||||
|
||||
if (highlight && sink->multi_sink.xorgc)
|
||||
tabgc = sink->multi_sink.xorgc;
|
||||
else
|
||||
tabgc = invgc;
|
||||
|
||||
y += abs(ext->max_logical_extent.y);
|
||||
for (j = 0; pos1 < pos2;) {
|
||||
pos1 = XawTextSourceRead(source, pos1, &blk, (int) (pos2 - pos1));
|
||||
for (k = 0; k < blk.length; k++) {
|
||||
if ((unsigned) j >= (sizeof(buf) / sizeof(wchar_t)) - 1) {
|
||||
/* buffer full, dump the text */
|
||||
if ((x = (int)((unsigned)x + PaintText(w, gc, x, y, buf, j, clear_bg))) >= max_x)
|
||||
return;
|
||||
j = 0;
|
||||
}
|
||||
buf[j] = ((wchar_t *)blk.ptr)[k];
|
||||
if (buf[j] == _Xaw_atowc(XawLF))
|
||||
continue;
|
||||
|
||||
else if (buf[j] == _Xaw_atowc(XawTAB)) {
|
||||
unsigned int width;
|
||||
|
||||
if (j != 0 &&
|
||||
(x = (int)((unsigned)x + PaintText(w, gc, x, y, buf, j, clear_bg))) >= max_x)
|
||||
return;
|
||||
|
||||
width = (unsigned)CharWidth(sink, fontset, x, _Xaw_atowc(XawTAB));
|
||||
if (clear_bg)
|
||||
_XawTextSinkClearToBackground(w,
|
||||
x, y - abs(ext->max_logical_extent.y),
|
||||
width, ext->max_logical_extent.height);
|
||||
else
|
||||
XFillRectangle(XtDisplayOfObject(w), XtWindowOfObject(w),
|
||||
tabgc, x,
|
||||
y - abs(ext->max_logical_extent.y),
|
||||
width,
|
||||
ext->max_logical_extent.height);
|
||||
x = (int)((unsigned)x + width);
|
||||
j = -1;
|
||||
}
|
||||
else if (XwcTextEscapement(sink->multi_sink.fontset, &buf[j], 1)
|
||||
== 0) {
|
||||
if (sink->multi_sink.display_nonprinting)
|
||||
buf[j] = _Xaw_atowc('@');
|
||||
else
|
||||
buf[j] = _Xaw_atowc(XawSP);
|
||||
}
|
||||
j++;
|
||||
}
|
||||
}
|
||||
|
||||
if (j > 0)
|
||||
(void)PaintText(w, gc, x, y, buf, j, clear_bg);
|
||||
}
|
||||
|
||||
/*
|
||||
* Function:
|
||||
* GetCursorBounds
|
||||
*
|
||||
* Parameters:
|
||||
* w - text sink object
|
||||
* rect - X rectangle to return the cursor bounds
|
||||
*
|
||||
* Description:
|
||||
* Returns the size and location of the cursor.
|
||||
*/
|
||||
static void
|
||||
GetCursorBounds(Widget w, XRectangle *rect)
|
||||
{
|
||||
MultiSinkObject sink = (MultiSinkObject)w;
|
||||
|
||||
rect->width = (unsigned short)CharWidth(sink, sink->multi_sink.fontset, 0, _Xaw_atowc(XawSP));
|
||||
rect->height = (XExtentsOfFontSet(sink->multi_sink.fontset)
|
||||
->max_logical_extent.height);
|
||||
rect->x = sink->multi_sink.cursor_x;
|
||||
rect->y = (short)(sink->multi_sink.cursor_y - (short)rect->height);
|
||||
}
|
||||
|
||||
/*
|
||||
* The following procedure manages the "insert" cursor
|
||||
*/
|
||||
static void
|
||||
InsertCursor(Widget w, int x, int y, XawTextInsertState state)
|
||||
{
|
||||
MultiSinkObject sink = (MultiSinkObject)w;
|
||||
XFontSet fontset = sink->multi_sink.fontset;
|
||||
Widget ctx = XtParent(w);
|
||||
XawTextPosition position = XawTextGetInsertionPoint(ctx);
|
||||
|
||||
if (XtIsRealized(ctx)) {
|
||||
int fheight, fdiff;
|
||||
XawTextBlock block;
|
||||
wchar_t c;
|
||||
XawTextPosition selection_start, selection_end;
|
||||
Boolean has_selection;
|
||||
XFontSetExtents *ext = XExtentsOfFontSet(fontset);
|
||||
|
||||
XawTextGetSelectionPos((Widget)ctx, &selection_start, &selection_end);
|
||||
has_selection = selection_start != selection_end;
|
||||
|
||||
fheight = ext->max_logical_extent.height;
|
||||
fdiff = fheight - abs(ext->max_logical_extent.y);
|
||||
|
||||
if ((sink->multi_sink.cursor_position != position || state == XawisOff)
|
||||
&& !has_selection && sink->multi_sink.laststate != XawisOff) {
|
||||
wchar_t *ochar;
|
||||
|
||||
(void)XawTextSourceRead(XawTextGetSource(ctx),
|
||||
sink->multi_sink.cursor_position,
|
||||
&block, 1);
|
||||
if (!block.length)
|
||||
ochar = NULL;
|
||||
else {
|
||||
c = ((wchar_t *)block.ptr)[0];
|
||||
if (c == _Xaw_atowc(XawLF))
|
||||
ochar = NULL;
|
||||
else if (c == _Xaw_atowc(XawTAB))
|
||||
ochar = wspace;
|
||||
else
|
||||
ochar = (wchar_t *)block.ptr;
|
||||
}
|
||||
|
||||
if (!ochar)
|
||||
_XawTextSinkClearToBackground(w, sink->multi_sink.cursor_x,
|
||||
(sink->multi_sink.cursor_y - 1 -
|
||||
fheight),
|
||||
(unsigned)CharWidth(sink, fontset, 0, wspace[0]),
|
||||
(unsigned)fheight);
|
||||
else {
|
||||
if (XwcTextEscapement(sink->multi_sink.fontset, ochar, 1) != 0)
|
||||
DisplayText(w, sink->multi_sink.cursor_x,
|
||||
sink->multi_sink.cursor_y - 1 - fheight,
|
||||
sink->multi_sink.cursor_position,
|
||||
sink->multi_sink.cursor_position + 1,
|
||||
False);
|
||||
else
|
||||
PaintText(w, sink->multi_sink.normgc,
|
||||
sink->multi_sink.cursor_x,
|
||||
sink->multi_sink.cursor_y - 1 - fdiff,
|
||||
ochar, 1,
|
||||
ctx->core.background_pixmap != XtUnspecifiedPixmap);
|
||||
}
|
||||
}
|
||||
|
||||
if (!has_selection && state != XawisOff) {
|
||||
wchar_t *nchar;
|
||||
Boolean focus = ((TextWidget)ctx)->text.hasfocus;
|
||||
|
||||
(void)XawTextSourceRead(XawTextGetSource(ctx),
|
||||
position, &block, 1);
|
||||
c = ((wchar_t *)block.ptr)[0];
|
||||
if (!block.length || c == _Xaw_atowc(XawLF)
|
||||
|| c == _Xaw_atowc(XawTAB))
|
||||
nchar = wspace;
|
||||
else
|
||||
nchar = (wchar_t *)block.ptr;
|
||||
|
||||
if (focus) {
|
||||
if (XwcTextEscapement(sink->multi_sink.fontset, nchar, 1) != 0)
|
||||
XwcDrawImageString(XtDisplay(ctx), XtWindow(ctx),
|
||||
fontset, sink->multi_sink.invgc,
|
||||
x, (y - 1 - fdiff), nchar, 1);
|
||||
else
|
||||
DisplayText(w, x, y - 1 - fheight,
|
||||
position, position + 1, True);
|
||||
}
|
||||
else
|
||||
XDrawRectangle(XtDisplay(ctx), XtWindow(ctx),
|
||||
sink->multi_sink.xorgc ?
|
||||
sink->multi_sink.xorgc : sink->multi_sink.normgc,
|
||||
x, y - 1 - fheight,
|
||||
(unsigned)(CharWidth(sink, fontset, 0, *nchar) - 1),
|
||||
(unsigned)(fheight - 1));
|
||||
}
|
||||
}
|
||||
|
||||
sink->multi_sink.cursor_x = (short)x;
|
||||
sink->multi_sink.cursor_y = (short)y;
|
||||
sink->multi_sink.laststate = state;
|
||||
sink->multi_sink.cursor_position = position;
|
||||
}
|
||||
|
||||
/*
|
||||
* Given two positions, find the distance between them
|
||||
*/
|
||||
static void
|
||||
FindDistance(Widget w, XawTextPosition fromPos, int fromx,
|
||||
XawTextPosition toPos, int *resWidth,
|
||||
XawTextPosition *resPos, int *resHeight)
|
||||
{
|
||||
MultiSinkObject sink = (MultiSinkObject)w;
|
||||
XFontSet fontset = sink->multi_sink.fontset;
|
||||
TextWidget ctx = (TextWidget)XtParent(w);
|
||||
Widget source = ctx->text.source;
|
||||
XawTextPosition idx, pos;
|
||||
wchar_t c;
|
||||
XFontSetExtents *ext = XExtentsOfFontSet(fontset);
|
||||
XawTextBlock blk;
|
||||
int i, rWidth;
|
||||
|
||||
pos = XawTextSourceRead(source, fromPos, &blk, (int)(toPos - fromPos));
|
||||
rWidth = 0;
|
||||
for (i = 0, idx = fromPos; idx < toPos; i++, idx++) {
|
||||
if (i >= blk.length) {
|
||||
i = 0;
|
||||
XawTextSourceRead(source, pos, &blk, (int)(toPos - pos));
|
||||
if (blk.length == 0)
|
||||
break;
|
||||
}
|
||||
c = ((wchar_t *)blk.ptr)[i];
|
||||
rWidth += CharWidth(sink, fontset, fromx + rWidth, c);
|
||||
if (c == _Xaw_atowc(XawLF)) {
|
||||
idx++;
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
*resPos = idx;
|
||||
*resWidth = rWidth;
|
||||
*resHeight = ext->max_logical_extent.height;
|
||||
}
|
||||
|
||||
static void
|
||||
FindPosition(Widget w, XawTextPosition fromPos, int fromx, int width,
|
||||
Bool stopAtWordBreak, XawTextPosition *resPos, int *resWidth,
|
||||
int *resHeight)
|
||||
{
|
||||
MultiSinkObject sink = (MultiSinkObject)w;
|
||||
TextWidget ctx = (TextWidget)XtParent(w);
|
||||
Widget source = ctx->text.source;
|
||||
XFontSet fontset = sink->multi_sink.fontset;
|
||||
XawTextPosition idx, pos, whiteSpacePosition = 0;
|
||||
int i, lastWidth, whiteSpaceWidth, rWidth;
|
||||
Boolean whiteSpaceSeen;
|
||||
wchar_t c;
|
||||
XFontSetExtents *ext = XExtentsOfFontSet(fontset);
|
||||
XawTextBlock blk;
|
||||
|
||||
pos = XawTextSourceRead(source, fromPos, &blk, BUFSIZ);
|
||||
rWidth = lastWidth = whiteSpaceWidth = 0;
|
||||
whiteSpaceSeen = False;
|
||||
c = 0;
|
||||
|
||||
for (i = 0, idx = fromPos; rWidth <= width; i++, idx++) {
|
||||
if (i >= blk.length) {
|
||||
i = 0;
|
||||
pos = XawTextSourceRead(source, pos, &blk, BUFSIZ);
|
||||
if (blk.length == 0)
|
||||
break;
|
||||
}
|
||||
c = ((wchar_t *)blk.ptr)[i];
|
||||
lastWidth = rWidth;
|
||||
rWidth += CharWidth(sink, fontset, fromx + rWidth, c);
|
||||
|
||||
if (c == _Xaw_atowc(XawLF)) {
|
||||
idx++;
|
||||
break;
|
||||
}
|
||||
else if ((c == _Xaw_atowc(XawSP) || c == _Xaw_atowc(XawTAB))
|
||||
&& rWidth <= width) {
|
||||
whiteSpaceSeen = True;
|
||||
whiteSpacePosition = idx;
|
||||
whiteSpaceWidth = rWidth;
|
||||
}
|
||||
}
|
||||
|
||||
if (rWidth > width && idx > fromPos) {
|
||||
idx--;
|
||||
rWidth = lastWidth;
|
||||
if (stopAtWordBreak && whiteSpaceSeen) {
|
||||
idx = whiteSpacePosition + 1;
|
||||
rWidth = whiteSpaceWidth;
|
||||
}
|
||||
}
|
||||
|
||||
if (idx >= ctx->text.lastPos && c != _Xaw_atowc(XawLF))
|
||||
idx = ctx->text.lastPos + 1;
|
||||
|
||||
*resPos = idx;
|
||||
*resWidth = rWidth;
|
||||
*resHeight = ext->max_logical_extent.height;
|
||||
}
|
||||
|
||||
static void
|
||||
Resolve(Widget w, XawTextPosition pos, int fromx, int width,
|
||||
XawTextPosition *pos_return)
|
||||
{
|
||||
int resWidth, resHeight;
|
||||
Widget source = XawTextGetSource(XtParent(w));
|
||||
|
||||
FindPosition(w, pos, fromx, width, False, pos_return, &resWidth, &resHeight);
|
||||
if (*pos_return > GETLASTPOS)
|
||||
*pos_return = GETLASTPOS;
|
||||
}
|
||||
|
||||
static void
|
||||
GetGC(MultiSinkObject sink)
|
||||
{
|
||||
XtGCMask valuemask = (GCGraphicsExposures | GCClipXOrigin |
|
||||
GCForeground | GCBackground);
|
||||
XGCValues values;
|
||||
|
||||
/* XXX We dont want do share a gc that will change the clip-mask */
|
||||
values.clip_x_origin = (int)(long)sink;
|
||||
values.clip_mask = None;
|
||||
values.graphics_exposures = False;
|
||||
|
||||
values.foreground = sink->text_sink.foreground;
|
||||
values.background = sink->text_sink.background;
|
||||
|
||||
sink->multi_sink.normgc = XtAllocateGC((Widget)sink, 0, valuemask, &values,
|
||||
GCFont | GCClipMask, 0);
|
||||
|
||||
values.foreground = sink->text_sink.background;
|
||||
#ifndef OLDXAW
|
||||
values.background = sink->text_sink.cursor_color;
|
||||
#else
|
||||
values.background = sink->text_sink.foreground;
|
||||
#endif
|
||||
sink->multi_sink.invgc = XtAllocateGC((Widget)sink, 0, valuemask, &values,
|
||||
GCFont | GCClipMask, 0);
|
||||
#ifndef OLDXAW
|
||||
if (sink->text_sink.cursor_color != sink->text_sink.foreground) {
|
||||
values.foreground = sink->text_sink.cursor_color;
|
||||
values.background = sink->text_sink.foreground;
|
||||
sink->multi_sink.xorgc = XtAllocateGC((Widget)sink, 0, valuemask,
|
||||
&values, GCFont | GCClipMask, 0);
|
||||
}
|
||||
else
|
||||
#endif /* OLDXAW */
|
||||
sink->multi_sink.xorgc = NULL;
|
||||
|
||||
XawMultiSinkResize((Widget)sink);
|
||||
}
|
||||
|
||||
static void
|
||||
XawMultiSinkClassInitialize(void)
|
||||
{
|
||||
wspace[0] = _Xaw_atowc(XawSP);
|
||||
XawInitializeWidgetSet();
|
||||
}
|
||||
|
||||
/*
|
||||
* Function:
|
||||
* XawMultiSinkInitialize
|
||||
*
|
||||
* Parameters:
|
||||
* request - requested and new values for the object instance
|
||||
* cnew - ""
|
||||
*
|
||||
* Description:
|
||||
* Initializes the TextSink Object.
|
||||
*/
|
||||
/* ARGSUSED */
|
||||
static void
|
||||
XawMultiSinkInitialize(Widget request _X_UNUSED, Widget cnew,
|
||||
ArgList args _X_UNUSED, Cardinal *num_args _X_UNUSED)
|
||||
{
|
||||
MultiSinkObject sink = (MultiSinkObject)cnew;
|
||||
|
||||
GetGC(sink);
|
||||
|
||||
if (!sink->multi_sink.fontset) XtError("Aborting: no fontset found\n");
|
||||
|
||||
sink->multi_sink.cursor_position = 0;
|
||||
sink->multi_sink.laststate = XawisOff;
|
||||
sink->multi_sink.cursor_x = sink->multi_sink.cursor_y = 0;
|
||||
}
|
||||
|
||||
/*
|
||||
* Function:
|
||||
* XawMultiSinkDestroy
|
||||
*
|
||||
* Parameters:
|
||||
* w - MultiSink Object
|
||||
*
|
||||
* Description:
|
||||
* This function cleans up when the object is destroyed.
|
||||
*/
|
||||
static void
|
||||
XawMultiSinkDestroy(Widget w)
|
||||
{
|
||||
MultiSinkObject sink = (MultiSinkObject)w;
|
||||
|
||||
XtReleaseGC(w, sink->multi_sink.normgc);
|
||||
XtReleaseGC(w, sink->multi_sink.invgc);
|
||||
if (sink->multi_sink.xorgc)
|
||||
XtReleaseGC(w, sink->multi_sink.xorgc);
|
||||
sink->multi_sink.normgc =
|
||||
sink->multi_sink.invgc =
|
||||
sink->multi_sink.xorgc = NULL;
|
||||
}
|
||||
|
||||
static void
|
||||
XawMultiSinkResize(Widget w)
|
||||
{
|
||||
TextWidget ctx = (TextWidget)XtParent(w);
|
||||
MultiSinkObject sink = (MultiSinkObject)w;
|
||||
XRectangle rect;
|
||||
int width, height;
|
||||
|
||||
if (w->core.widget_class != multiSinkObjectClass)
|
||||
return;
|
||||
|
||||
rect.x = ctx->text.r_margin.left;
|
||||
rect.y = ctx->text.r_margin.top;
|
||||
width = (int)XtWidth(ctx) -
|
||||
(int)ctx->text.r_margin.right - (int)ctx->text.r_margin.left;
|
||||
height = (int)XtHeight(ctx) -
|
||||
(int)ctx->text.r_margin.top - (int)ctx->text.r_margin.bottom;
|
||||
rect.width = (unsigned short)width;
|
||||
rect.height = (unsigned short)height;
|
||||
|
||||
if (sink->multi_sink.normgc) {
|
||||
if (width >= 0 && height >= 0)
|
||||
XSetClipRectangles(XtDisplay((Widget)ctx), sink->multi_sink.normgc,
|
||||
0, 0, &rect, 1, Unsorted);
|
||||
else
|
||||
XSetClipMask(XtDisplay((Widget)ctx), sink->multi_sink.normgc, None);
|
||||
}
|
||||
if (sink->multi_sink.invgc) {
|
||||
if (width >= 0 && height >= 0)
|
||||
XSetClipRectangles(XtDisplay((Widget)ctx), sink->multi_sink.invgc,
|
||||
0, 0, &rect, 1, Unsorted);
|
||||
else
|
||||
XSetClipMask(XtDisplay((Widget)ctx), sink->multi_sink.invgc, None);
|
||||
}
|
||||
if (sink->multi_sink.xorgc) {
|
||||
if (width >= 0 && height >= 0)
|
||||
XSetClipRectangles(XtDisplay((Widget)ctx), sink->multi_sink.xorgc,
|
||||
0, 0, &rect, 1, Unsorted);
|
||||
else
|
||||
XSetClipMask(XtDisplay((Widget)ctx), sink->multi_sink.xorgc, None);
|
||||
}
|
||||
}
|
||||
|
||||
/*
|
||||
* Function:
|
||||
* XawMultiSinkSetValues
|
||||
*
|
||||
* Parameters:
|
||||
* current - current state of the object
|
||||
* request - what was requested
|
||||
* cnew - what the object will become
|
||||
*
|
||||
* Description:
|
||||
* Sets the values for the MultiSink.
|
||||
*
|
||||
* Returns:
|
||||
* True if redisplay is needed
|
||||
*/
|
||||
/*ARGSUSED*/
|
||||
static Boolean
|
||||
XawMultiSinkSetValues(Widget current, Widget request _X_UNUSED, Widget cnew,
|
||||
ArgList args _X_UNUSED, Cardinal *num_args _X_UNUSED)
|
||||
{
|
||||
MultiSinkObject w = (MultiSinkObject)cnew;
|
||||
MultiSinkObject old_w = (MultiSinkObject)current;
|
||||
|
||||
/* Font set is not in the GC! Do not make a new GC when font set changes! */
|
||||
|
||||
if (w->multi_sink.fontset != old_w->multi_sink.fontset) {
|
||||
((TextWidget)XtParent(cnew))->text.redisplay_needed = True;
|
||||
#ifndef NO_TAB_FIX
|
||||
SetTabs((Widget)w, w->text_sink.tab_count, w->text_sink.char_tabs);
|
||||
#endif
|
||||
}
|
||||
|
||||
if (w->text_sink.background != old_w->text_sink.background
|
||||
|| w->text_sink.foreground != old_w->text_sink.foreground
|
||||
#ifndef OLDXAW
|
||||
|| w->text_sink.cursor_color != old_w->text_sink.cursor_color
|
||||
#endif
|
||||
) {
|
||||
XtReleaseGC(cnew, w->multi_sink.normgc);
|
||||
XtReleaseGC(cnew, w->multi_sink.invgc);
|
||||
if (w->multi_sink.xorgc)
|
||||
XtReleaseGC(cnew, w->multi_sink.xorgc);
|
||||
GetGC(w);
|
||||
((TextWidget)XtParent(cnew))->text.redisplay_needed = True;
|
||||
}
|
||||
else if (w->multi_sink.echo != old_w->multi_sink.echo
|
||||
|| w->multi_sink.display_nonprinting
|
||||
!= old_w->multi_sink.display_nonprinting)
|
||||
((TextWidget)XtParent(cnew))->text.redisplay_needed = True;
|
||||
|
||||
return (False);
|
||||
}
|
||||
|
||||
/*
|
||||
* Function:
|
||||
* MaxLines
|
||||
*
|
||||
* Parameters:
|
||||
* w - MultiSink Object
|
||||
* height - height to fit lines into
|
||||
*
|
||||
* Description:
|
||||
* Finds the Maximum number of lines that will fit in a given height.
|
||||
*
|
||||
* Returns:
|
||||
* The number of lines that will fit
|
||||
*/
|
||||
/*ARGSUSED*/
|
||||
static int
|
||||
MaxLines(Widget w, unsigned int height)
|
||||
{
|
||||
MultiSinkObject sink = (MultiSinkObject)w;
|
||||
int font_height;
|
||||
XFontSetExtents *ext = XExtentsOfFontSet(sink->multi_sink.fontset);
|
||||
|
||||
font_height = ext->max_logical_extent.height;
|
||||
return (int)(height / (unsigned)font_height);
|
||||
}
|
||||
|
||||
/*
|
||||
* Function:
|
||||
* MaxHeight
|
||||
*
|
||||
* Parameters:
|
||||
* w - MultiSink Object
|
||||
* lines - number of lines
|
||||
*
|
||||
* Description:
|
||||
* Finds the Minimum height that will contain a given number lines.
|
||||
* Returns:
|
||||
* The height
|
||||
*/
|
||||
/*ARGSUSED*/
|
||||
static int
|
||||
MaxHeight(Widget w, int lines)
|
||||
{
|
||||
MultiSinkObject sink = (MultiSinkObject)w;
|
||||
XFontSetExtents *ext = XExtentsOfFontSet(sink->multi_sink.fontset);
|
||||
|
||||
return (lines * ext->max_logical_extent.height);
|
||||
}
|
||||
|
||||
/*
|
||||
* Function:
|
||||
* SetTabs
|
||||
*
|
||||
* Arguments:
|
||||
* w - MultiSink Object
|
||||
* tab_count - number of tabs in the list
|
||||
* tabs - text positions of the tabs
|
||||
*
|
||||
* Description:
|
||||
* Sets the Tab stops.
|
||||
*/
|
||||
static void
|
||||
SetTabs(Widget w, int tab_count, short* tabs)
|
||||
{
|
||||
MultiSinkObject sink = (MultiSinkObject)w;
|
||||
int i;
|
||||
Atom XA_FIGURE_WIDTH;
|
||||
unsigned long figure_width = 0;
|
||||
XFontStruct *font;
|
||||
|
||||
/*
|
||||
* Bug:
|
||||
* Suppose the first font of fontset stores the unit of column.
|
||||
*
|
||||
* By Li Yuhong, Mar. 14, 1991
|
||||
*/
|
||||
{
|
||||
XFontStruct **f_list;
|
||||
char **f_name;
|
||||
|
||||
(void)XFontsOfFontSet(sink->multi_sink.fontset, &f_list, &f_name);
|
||||
font = f_list[0];
|
||||
}
|
||||
|
||||
/*
|
||||
* Find the figure width of the current font
|
||||
*/
|
||||
XA_FIGURE_WIDTH = XInternAtom(XtDisplayOfObject(w), "FIGURE_WIDTH", False);
|
||||
if (XA_FIGURE_WIDTH != None
|
||||
&& (!XGetFontProperty(font, XA_FIGURE_WIDTH, &figure_width)
|
||||
|| figure_width == 0)) {
|
||||
if (font->per_char && font->min_char_or_byte2 <= '$'
|
||||
&& font->max_char_or_byte2 >= '$')
|
||||
figure_width = (unsigned long)font->per_char['$' - font->min_char_or_byte2].width;
|
||||
else
|
||||
figure_width = (unsigned long)font->max_bounds.width;
|
||||
}
|
||||
|
||||
if (tab_count > sink->text_sink.tab_count) {
|
||||
sink->text_sink.tabs = (Position *)
|
||||
XtRealloc((char *)sink->text_sink.tabs,
|
||||
(Cardinal)((unsigned long)tab_count * sizeof(Position)));
|
||||
sink->text_sink.char_tabs = (short *)
|
||||
XtRealloc((char *)sink->text_sink.char_tabs,
|
||||
(Cardinal)((unsigned long)tab_count * sizeof(short)));
|
||||
}
|
||||
|
||||
for (i = 0 ; i < tab_count ; i++) {
|
||||
sink->text_sink.tabs[i] = (Position)((unsigned long)tabs[i] * figure_width);
|
||||
sink->text_sink.char_tabs[i] = tabs[i];
|
||||
}
|
||||
|
||||
sink->text_sink.tab_count = tab_count;
|
||||
|
||||
#ifndef NO_TAB_FIX
|
||||
((TextWidget)XtParent(w))->text.redisplay_needed = True;
|
||||
#endif
|
||||
}
|
||||
|
||||
void
|
||||
_XawMultiSinkPosToXY(Widget w, XawTextPosition pos, Position *x, Position *y)
|
||||
{
|
||||
MultiSinkObject sink = (MultiSinkObject)((TextWidget)w)->text.sink;
|
||||
XFontSetExtents *ext = XExtentsOfFontSet(sink->multi_sink.fontset);
|
||||
|
||||
_XawTextPosToXY(w, pos, x, y);
|
||||
*y = (Position)(*y + abs(ext->max_logical_extent.y));
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue