/* * $XdotOrg: grid.c,v 1.4 2001/02/09 02:05:41 xorgcvs Exp $ * $Xorg: grid.c,v 1.4 2001/02/09 02:05:41 xorgcvs Exp $ * * Copyright 1989, 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. * * * Author: Jim Fulton, MIT X Consortium */ /* $XFree86: xc/programs/xfd/grid.c,v 1.9 2002/07/06 00:46:42 keithp Exp $ */ #include #include #include #include #include #include "gridP.h" #ifdef XKB #include #else #define XkbBI_MinorError 2 #define XkbBI_Ignore 11 #endif #ifdef XKB #define Bell(w,n) XkbStdBell(XtDisplay(w), XtWindow(w), 50, n) #else #define Bell(w,n) XBell(XtDisplay(w), 0) #endif static GC get_gc(FontGridWidget fgw, Pixel fore); static void ClassInitialize(void); static void Initialize(Widget request, Widget new, ArgList args, Cardinal *num_args); static void Realize(Widget gw, Mask *valueMask, XSetWindowAttributes *attributes); static void Destroy(Widget gw); static void Resize(Widget gw); static void Redisplay(Widget gw, XEvent *event, Region region); static void paint_grid(FontGridWidget fgw, int col, int row, int ncols, int nrows); static Boolean SetValues(Widget current, Widget request, Widget new, ArgList args, Cardinal *num_args); static void Notify(Widget gw, XEvent *event, String *params, Cardinal *nparams); #define Offset(field) XtOffsetOf(FontGridRec, fontgrid.field) static XtResource resources[] = { { XtNfont, XtCFont, XtRFontStruct, sizeof(XFontStruct *), Offset(text_font), XtRString, (XtPointer) NULL }, { XtNcellColumns, XtCCellColumns, XtRInt, sizeof(int), Offset(cell_cols), XtRImmediate, (XtPointer) 0 }, { XtNcellRows, XtCCellRows, XtRInt, sizeof(int), Offset(cell_rows), XtRImmediate, (XtPointer) 0 }, { XtNcellWidth, XtCCellWidth, XtRInt, sizeof(int), Offset(cell_width), XtRImmediate, (XtPointer) 0 }, { XtNcellHeight, XtCCellHeight, XtRInt, sizeof(int), Offset(cell_height), XtRImmediate, (XtPointer) 0 }, { XtNstartChar, XtCStartChar, XtRLong, sizeof(long), Offset(start_char), XtRImmediate, (XtPointer) 0xffffffff }, #ifndef XRENDER { XtNforeground, XtCForeground, XtRPixel, sizeof(Pixel), Offset(foreground_pixel), XtRString, (XtPointer) XtDefaultForeground }, #endif { XtNcenterChars, XtCCenterChars, XtRBoolean, sizeof(Boolean), Offset(center_chars), XtRImmediate, (XtPointer) FALSE }, { XtNboxChars, XtCBoxChars, XtRBoolean, sizeof(Boolean), Offset(box_chars), XtRImmediate, (XtPointer) FALSE }, { XtNboxColor, XtCForeground, XtRPixel, sizeof(Pixel), Offset(box_pixel), XtRString, (XtPointer) XtDefaultForeground }, { XtNcallback, XtCCallback, XtRCallback, sizeof(XtPointer), Offset(callbacks), XtRCallback, (XtPointer) NULL }, { XtNinternalPad, XtCInternalPad, XtRInt, sizeof(int), Offset(internal_pad), XtRImmediate, (XtPointer) 4 }, { XtNgridWidth, XtCGridWidth, XtRInt, sizeof(int), Offset(grid_width), XtRImmediate, (XtPointer) 1 }, #ifdef XRENDER {XtNforeground, XtCForeground, XtRXftColor, sizeof(XftColor), Offset(fg_color), XtRString, XtDefaultForeground}, {XtNface, XtCFace, XtRXftFont, sizeof (XftFont *), Offset (text_face), XtRString, NULL}, #endif }; #undef Offset static char defaultTranslations[] = ": notify()"; static XtActionsRec actions_list[] = { { "notify", Notify }, }; FontGridClassRec fontgridClassRec = { { /* core fields */ /* superclass */ (WidgetClass) &simpleClassRec, /* class_name */ "FontGrid", /* widget_size */ sizeof(FontGridRec), /* class_initialize */ ClassInitialize, /* class_part_initialize */ NULL, /* class_inited */ FALSE, /* initialize */ Initialize, /* initialize_hook */ NULL, /* realize */ Realize, /* actions */ actions_list, /* num_actions */ XtNumber(actions_list), /* resources */ resources, /* num_resources */ XtNumber(resources), /* xrm_class */ NULLQUARK, /* compress_motion */ TRUE, /* compress_exposure */ TRUE, /* compress_enterleave */ TRUE, /* visible_interest */ FALSE, /* destroy */ Destroy, /* resize */ Resize, /* expose */ Redisplay, /* set_values */ SetValues, /* set_values_hook */ NULL, /* set_values_almost */ XtInheritSetValuesAlmost, /* get_values_hook */ NULL, /* accept_focus */ NULL, /* version */ XtVersion, /* callback_private */ NULL, /* tm_table */ defaultTranslations, /* query_geometry */ XtInheritQueryGeometry, /* display_accelerator */ XtInheritDisplayAccelerator, /* extension */ NULL }, { /* simple fields */ /* change_sensitive */ XtInheritChangeSensitive } }; WidgetClass fontgridWidgetClass = (WidgetClass) &fontgridClassRec; long GridFirstChar (Widget w) { FontGridWidget fgw = (FontGridWidget) w; XFontStruct *fs = fgw->fontgrid.text_font; #ifdef XRENDER XftFont *xft = fgw->fontgrid.text_face; if (xft) { FcChar32 map[FC_CHARSET_MAP_SIZE]; FcChar32 next; FcChar32 first; int i; first = FcCharSetFirstPage (xft->charset, map, &next); for (i = 0; i < FC_CHARSET_MAP_SIZE; i++) if (map[i]) { FcChar32 bits = map[i]; first += i * 32; while (!(bits & 0x1)) { bits >>= 1; first++; } break; } return first; } else #endif if (fs) { return (fs->min_byte1 << 8) | (fs->min_char_or_byte2); } else return 0; } long GridLastChar (Widget w) { FontGridWidget fgw = (FontGridWidget) w; XFontStruct *fs = fgw->fontgrid.text_font; #ifdef XRENDER XftFont *xft = fgw->fontgrid.text_face; if (xft) { FcChar32 this, last, next; FcChar32 map[FC_CHARSET_MAP_SIZE]; int i; last = FcCharSetFirstPage (xft->charset, map, &next); while ((this = FcCharSetNextPage (xft->charset, map, &next)) != FC_CHARSET_DONE) last = this; last &= ~0xff; for (i = FC_CHARSET_MAP_SIZE - 1; i >= 0; i--) if (map[i]) { FcChar32 bits = map[i]; last += i * 32 + 31; while (!(bits & 0x80000000)) { last--; bits <<= 1; } break; } return (long) last; } else #endif if (fs) { return (fs->max_byte1 << 8) | (fs->max_char_or_byte2); } else return 0; } /* * CI_GET_CHAR_INFO_1D - return the charinfo struct for the indicated 8bit * character. If the character is in the column and exists, then return the * appropriate metrics (note that fonts with common per-character metrics will * return min_bounds). */ #define CI_NONEXISTCHAR(cs) (((cs)->width == 0) && \ (((cs)->rbearing|(cs)->lbearing| \ (cs)->ascent|(cs)->descent) == 0)) #define CI_GET_CHAR_INFO_1D(fs,col,cs) \ { \ cs = NULL; \ if (col >= fs->min_char_or_byte2 && col <= fs->max_char_or_byte2) { \ if (fs->per_char == NULL) { \ cs = &fs->min_bounds; \ } else { \ cs = &fs->per_char[(col - fs->min_char_or_byte2)]; \ } \ if (CI_NONEXISTCHAR(cs)) \ cs = NULL; \ } \ } /* * CI_GET_CHAR_INFO_2D - return the charinfo struct for the indicated row and * column. This is used for fonts that have more than row zero. */ #define CI_GET_CHAR_INFO_2D(fs,row,col,cs) \ { \ cs = NULL; \ if (row >= fs->min_byte1 && row <= fs->max_byte1 && \ col >= fs->min_char_or_byte2 && col <= fs->max_char_or_byte2) { \ if (fs->per_char == NULL) { \ cs = &fs->min_bounds; \ } else { \ cs = &fs->per_char[((row - fs->min_byte1) * \ (fs->max_char_or_byte2 - \ fs->min_char_or_byte2 + 1)) + \ (col - fs->min_char_or_byte2)]; \ } \ if (CI_NONEXISTCHAR(cs)) \ cs = NULL; \ } \ } static Boolean GridHasChar (Widget w, long ch) { FontGridWidget fgw = (FontGridWidget) w; #ifdef XRENDER XftFont *xft = fgw->fontgrid.text_face; if (xft) { return FcCharSetHasChar (xft->charset, (FcChar32) ch); } else #endif { XFontStruct *fs = fgw->fontgrid.text_font; XCharStruct *cs; if (!fs) return False; if (fs->max_byte1 == 0) { CI_GET_CHAR_INFO_1D (fs, ch, cs); } else { unsigned int r = (ch >> 8); unsigned int c = (ch & 0xff); CI_GET_CHAR_INFO_2D (fs, r, c, cs); } return cs != NULL; } } /* * public routines */ void GetFontGridCellDimensions(Widget w, long *startp, int *ncolsp, int *nrowsp) { FontGridWidget fgw = (FontGridWidget) w; *startp = fgw->fontgrid.start_char; *ncolsp = fgw->fontgrid.cell_cols; *nrowsp = fgw->fontgrid.cell_rows; } void GetPrevNextStates(Widget w, Bool *prevvalidp, Bool *nextvalidp, Bool *prev16validp, Bool *next16validp) { FontGridWidget fgw = (FontGridWidget) w; long minn = (long) GridFirstChar (w); long maxn = (long) GridLastChar (w); *prev16validp = (fgw->fontgrid.start_char - 0xf00 > minn); *prevvalidp = (fgw->fontgrid.start_char > minn); *nextvalidp = (fgw->fontgrid.start_char + (fgw->fontgrid.cell_cols * fgw->fontgrid.cell_rows) < maxn); *next16validp =((fgw->fontgrid.start_char + 0xf00 + (fgw->fontgrid.cell_cols * fgw->fontgrid.cell_rows)) < maxn); } /* * private routines and methods */ static GC get_gc(FontGridWidget fgw, Pixel fore) { XtGCMask mask; XGCValues gcv; mask = (GCForeground | GCBackground | GCFunction); gcv.foreground = fore; gcv.background = fgw->core.background_pixel; gcv.function = GXcopy; if (fgw->fontgrid.text_font) { mask |= GCFont; gcv.font = fgw->fontgrid.text_font->fid; } gcv.cap_style = CapProjecting; mask |= GCCapStyle; if (fgw->fontgrid.grid_width > 0) { mask |= GCLineWidth; gcv.line_width = ((fgw->fontgrid.grid_width < 2) ? 0 : fgw->fontgrid.grid_width); } return (XtGetGC ((Widget) fgw, mask, &gcv)); } #ifdef XRENDER static XtConvertArgRec xftColorConvertArgs[] = { {XtWidgetBaseOffset, (XtPointer)XtOffsetOf(WidgetRec, core.screen), sizeof(Screen *)}, {XtWidgetBaseOffset, (XtPointer)XtOffsetOf(WidgetRec, core.colormap), sizeof(Colormap)} }; #define donestr(type, value, tstr) \ { \ if (toVal->addr != NULL) { \ if (toVal->size < sizeof(type)) { \ toVal->size = sizeof(type); \ XtDisplayStringConversionWarning(dpy, \ (char*) fromVal->addr, tstr); \ return False; \ } \ *(type*)(toVal->addr) = (value); \ } \ else { \ static type static_val; \ static_val = (value); \ toVal->addr = (XPointer)&static_val; \ } \ toVal->size = sizeof(type); \ return True; \ } static void XmuFreeXftColor (XtAppContext app, XrmValuePtr toVal, XtPointer closure, XrmValuePtr args, Cardinal *num_args) { Screen *screen; Colormap colormap; XftColor *color; if (*num_args != 2) { XtAppErrorMsg (app, "freeXftColor", "wrongParameters", "XtToolkitError", "Freeing an XftColor requires screen and colormap arguments", (String *) NULL, (Cardinal *)NULL); return; } screen = *((Screen **) args[0].addr); colormap = *((Colormap *) args[1].addr); color = (XftColor *) toVal->addr; XftColorFree (DisplayOfScreen (screen), DefaultVisual (DisplayOfScreen (screen), XScreenNumberOfScreen (screen)), colormap, color); } static Boolean XmuCvtStringToXftColor(Display *dpy, XrmValue *args, Cardinal *num_args, XrmValue *fromVal, XrmValue *toVal, XtPointer *converter_data) { char *spec; XRenderColor renderColor; XftColor xftColor; Screen *screen; Colormap colormap; if (*num_args != 2) { XtAppErrorMsg (XtDisplayToApplicationContext (dpy), "cvtStringToXftColor", "wrongParameters", "XtToolkitError", "String to render color conversion needs screen and colormap arguments", (String *) NULL, (Cardinal *)NULL); return False; } screen = *((Screen **) args[0].addr); colormap = *((Colormap *) args[1].addr); spec = (char *) fromVal->addr; if (strcasecmp (spec, XtDefaultForeground) == 0) { renderColor.red = 0; renderColor.green = 0; renderColor.blue = 0; renderColor.alpha = 0xffff; } else if (strcasecmp (spec, XtDefaultBackground) == 0) { renderColor.red = 0xffff; renderColor.green = 0xffff; renderColor.blue = 0xffff; renderColor.alpha = 0xffff; } else if (!XRenderParseColor (dpy, spec, &renderColor)) return False; if (!XftColorAllocValue (dpy, DefaultVisual (dpy, XScreenNumberOfScreen (screen)), colormap, &renderColor, &xftColor)) return False; donestr (XftColor, xftColor, XtRXftColor); } static void XmuFreeXftFont (XtAppContext app, XrmValuePtr toVal, XtPointer closure, XrmValuePtr args, Cardinal *num_args) { Screen *screen; XftFont *font; if (*num_args != 1) { XtAppErrorMsg (app, "freeXftFont", "wrongParameters", "XtToolkitError", "Freeing an XftFont requires screen argument", (String *) NULL, (Cardinal *)NULL); return; } screen = *((Screen **) args[0].addr); font = *((XftFont **) toVal->addr); if (font) XftFontClose (DisplayOfScreen (screen), font); } static Boolean XmuCvtStringToXftFont(Display *dpy, XrmValue *args, Cardinal *num_args, XrmValue *fromVal, XrmValue *toVal, XtPointer *converter_data) { char *name; XftFont *font; Screen *screen; if (*num_args != 1) { XtAppErrorMsg (XtDisplayToApplicationContext (dpy), "cvtStringToXftFont", "wrongParameters", "XtToolkitError", "String to XftFont conversion needs screen argument", (String *) NULL, (Cardinal *)NULL); return False; } screen = *((Screen **) args[0].addr); name = (char *) fromVal->addr; font = NULL; if (name) { font = XftFontOpenName (dpy, XScreenNumberOfScreen (screen), name); if (!font) { XtDisplayStringConversionWarning(dpy, (char *) fromVal->addr, XtRXftFont); return False; } } donestr (XftFont *, font, XtRXftFont); } static XtConvertArgRec xftFontConvertArgs[] = { {XtWidgetBaseOffset, (XtPointer)XtOffsetOf(WidgetRec, core.screen), sizeof(Screen *)}, }; #endif static void ClassInitialize(void) { XtAddConverter (XtRString, XtRLong, XmuCvtStringToLong, NULL, 0); #ifdef XRENDER XtSetTypeConverter (XtRString, XtRXftColor, XmuCvtStringToXftColor, xftColorConvertArgs, XtNumber(xftColorConvertArgs), XtCacheByDisplay, XmuFreeXftColor); XtSetTypeConverter (XtRString, XtRXftFont, XmuCvtStringToXftFont, xftFontConvertArgs, XtNumber(xftFontConvertArgs), XtCacheByDisplay, XmuFreeXftFont); #endif } static void Initialize(Widget request, Widget new, ArgList args, Cardinal *num_args) { FontGridWidget reqfg = (FontGridWidget) request; FontGridWidget newfg = (FontGridWidget) new; XFontStruct *fs = newfg->fontgrid.text_font; #ifdef XRENDER XftFont *xft = newfg->fontgrid.text_face; #endif unsigned maxn; if (reqfg->fontgrid.cell_cols <= 0) newfg->fontgrid.cell_cols = 16; if (reqfg->fontgrid.cell_rows <= 0) { #ifdef XRENDER if (xft) newfg->fontgrid.cell_rows = 16; else #endif if (fs && fs->max_byte1 == 0) { newfg->fontgrid.cell_rows = (fs->max_char_or_byte2 / newfg->fontgrid.cell_cols) + 1; if (newfg->fontgrid.cell_rows > 16) newfg->fontgrid.cell_rows = 16; } else newfg->fontgrid.cell_rows = 16; } if (reqfg->fontgrid.cell_width <= 0) newfg->fontgrid.cell_width = DefaultCellWidth (newfg); if (reqfg->fontgrid.cell_height <= 0) newfg->fontgrid.cell_height = DefaultCellHeight (newfg); /* give a nice size that fits one screen full */ if (newfg->core.width == 0) newfg->core.width = (newfg->fontgrid.cell_width * newfg->fontgrid.cell_cols + newfg->fontgrid.grid_width * (newfg->fontgrid.cell_cols + 1)); if (newfg->core.height == 0) newfg->core.height = (newfg->fontgrid.cell_height * newfg->fontgrid.cell_rows + newfg->fontgrid.grid_width * (newfg->fontgrid.cell_rows + 1)); /* * select the first character */ if (newfg->fontgrid.start_char == 0xffffffff) newfg->fontgrid.start_char = GridFirstChar(new) & ~0xff; maxn = GridLastChar (new); if (newfg->fontgrid.start_char > maxn) newfg->fontgrid.start_char = (maxn + 1 - (newfg->fontgrid.cell_cols * newfg->fontgrid.cell_rows)); } static void Realize(Widget gw, Mask *valueMask, XSetWindowAttributes *attributes) { FontGridWidget fgw = (FontGridWidget) gw; FontGridPart *p = &fgw->fontgrid; p->text_gc = get_gc (fgw, GridForeground (fgw)); p->box_gc = get_gc (fgw, p->box_pixel); Resize (gw); (*(XtSuperclass(gw)->core_class.realize)) (gw, valueMask, attributes); #ifdef XRENDER p->draw = XftDrawCreate (XtDisplay (gw), XtWindow (gw), DefaultVisual (XtDisplay (gw), DefaultScreen(XtDisplay (gw))), fgw->core.colormap); #endif return; } static void Destroy(Widget gw) { FontGridWidget fgw = (FontGridWidget) gw; XtReleaseGC (gw, fgw->fontgrid.text_gc); XtReleaseGC (gw, fgw->fontgrid.box_gc); } static void Resize(Widget gw) { FontGridWidget fgw = (FontGridWidget) gw; /* recompute in case we've changed size */ fgw->fontgrid.cell_width = CellWidth (fgw); if (fgw->fontgrid.cell_width <= 0) fgw->fontgrid.cell_width = 1; fgw->fontgrid.cell_height = CellHeight (fgw); if (fgw->fontgrid.cell_height <= 0) fgw->fontgrid.cell_height = 1; fgw->fontgrid.xoff = (fgw->fontgrid.cell_width - DefaultCellWidth (fgw)) / 2; fgw->fontgrid.yoff = (fgw->fontgrid.cell_height - DefaultCellHeight (fgw)) / 2; } /* ARGSUSED */ static void Redisplay(Widget gw, XEvent *event, Region region) { FontGridWidget fgw = (FontGridWidget) gw; XRectangle rect; /* bounding rect for region */ int left, right, top, bottom; /* which cells were damaged */ int cw, ch; /* cell size */ #ifdef XRENDER if (!fgw->fontgrid.text_face) #endif if (!fgw->fontgrid.text_font) { Bell (gw, XkbBI_BadValue); return; } /* * compute the left, right, top, and bottom cells that were damaged */ XClipBox (region, &rect); cw = fgw->fontgrid.cell_width + fgw->fontgrid.grid_width; ch = fgw->fontgrid.cell_height + fgw->fontgrid.grid_width; if ((left = (((int) rect.x) / cw)) < 0) left = 0; right = (((int) (rect.x + rect.width - 1)) / cw); if ((top = (((int) rect.y) / ch)) < 0) top = 0; bottom = (((int) (rect.y + rect.height - 1)) / ch); paint_grid (fgw, left, top, right - left + 1, bottom - top + 1); } static void paint_grid(FontGridWidget fgw, /* widget in which to draw */ int col, int row, /* where to start */ int ncols, int nrows) /* number of cells */ { FontGridPart *p = &fgw->fontgrid; int i, j; Display *dpy = XtDisplay(fgw); Window wind = XtWindow(fgw); int cw = p->cell_width + p->grid_width; int ch = p->cell_height + p->grid_width; int tcols = p->cell_cols; int trows = p->cell_rows; int x1, y1, x2, y2, x, y; unsigned maxn = GridLastChar ((Widget) fgw); unsigned n, prevn; int startx; if (col + ncols >= tcols) { ncols = tcols - col; if (ncols < 1) return; } if (row + nrows >= trows) { nrows = trows - row; if (nrows < 1) return; } /* * paint the grid lines for the indicated rows */ if (p->grid_width > 0) { int half_grid_width = p->grid_width >> 1; x1 = col * cw + half_grid_width; y1 = row * ch + half_grid_width; x2 = x1 + ncols * cw; y2 = y1 + nrows * ch; for (i = 0, x = x1; i <= ncols; i++, x += cw) { XDrawLine (dpy, wind, p->box_gc, x, y1, x, y2); } for (i = 0, y = y1; i <= nrows; i++, y += ch) { XDrawLine (dpy, wind, p->box_gc, x1, y, x2, y); } } /* * Draw a character in every box; treat all fonts as if they were 16bit * fonts. Store the high eight bits in byte1 and the low eight bits in * byte2. */ prevn = p->start_char + col + row * tcols; startx = col * cw + p->internal_pad + p->grid_width; for (j = 0, y = row * ch + p->internal_pad + p->grid_width + GridFontAscent (fgw); j < nrows; j++, y += ch) { n = prevn; for (i = 0, x = startx; i < ncols; i++, x += cw) { int xoff = p->xoff, yoff = p->yoff; if (n > maxn) goto done; /* no break out of nested */ #ifdef XRENDER if (fgw->fontgrid.text_face) { XftFont *xft = p->text_face; FcChar32 c = n; XGlyphInfo extents; XftTextExtents32 (dpy, xft, &c, 1, &extents); if (p->center_chars) { xoff = (p->cell_width - extents.width) / 2 - extents.x; yoff = (p->cell_height - extents.height) / 2 - extents.y; } if (extents.width && extents.height) { XClearArea (dpy, wind, x + xoff - extents.x, y + yoff - extents.y, extents.width, extents.height, False); if (p->box_chars) XDrawRectangle (dpy, wind, p->box_gc, x + xoff - extents.x, y + yoff - extents.y, extents.width - 1, extents.height - 1); } XftDrawString32 (p->draw, &p->fg_color, xft, x + xoff, y + yoff, &c, 1); } else #endif { XChar2b thechar; thechar.byte1 = (n >> 8); /* high eight bits */ thechar.byte2 = (n & 255); /* low eight bits */ if (p->box_chars || p->center_chars) { XCharStruct metrics; int direction, fontascent, fontdescent; XTextExtents16 (p->text_font, &thechar, 1, &direction, &fontascent, &fontdescent, &metrics); if (p->center_chars) { /* * We want to move the origin by enough to center the ink * within the cell. The left edge will then be at * (cell_width - (rbearing - lbearing)) / 2; so we subtract * the lbearing to find the origin. Ditto for vertical. */ xoff = (((p->cell_width - (metrics.rbearing - metrics.lbearing)) / 2) - p->internal_pad - metrics.lbearing); yoff = (((p->cell_height - (metrics.descent + metrics.ascent)) / 2) - p->internal_pad - p->text_font->ascent + metrics.ascent); } if (p->box_chars) { XDrawRectangle (dpy, wind, p->box_gc, x + xoff, y + yoff - p->text_font->ascent, metrics.width - 1, fontascent + fontdescent - 1); } } XDrawString16 (dpy, wind, p->text_gc, x + xoff, y + yoff, &thechar, 1); } n++; } prevn += tcols; } done: /* * paint the grid lines for the indicated rows */ if (p->grid_width > 0) { int half_grid_width = p->grid_width >> 1; x1 = col * cw + half_grid_width; y1 = row * ch + half_grid_width; x2 = x1 + ncols * cw; y2 = y1 + nrows * ch; for (i = 0, x = x1; i <= ncols; i++, x += cw) { XDrawLine (dpy, wind, p->box_gc, x, y1, x, y2); } for (i = 0, y = y1; i <= nrows; i++, y += ch) { XDrawLine (dpy, wind, p->box_gc, x1, y, x2, y); } } return; } static Boolean PageBlank (Widget w, long first, long last) { while (first <= last) { if (GridHasChar (w, first)) return False; first++; } return True; } /*ARGSUSED*/ static Boolean SetValues(Widget current, Widget request, Widget new, ArgList args, Cardinal *num_args) { FontGridWidget curfg = (FontGridWidget) current; FontGridWidget newfg = (FontGridWidget) new; Boolean redisplay = FALSE; if (curfg->fontgrid.text_font != newfg->fontgrid.text_font || curfg->fontgrid.internal_pad != newfg->fontgrid.internal_pad) { newfg->fontgrid.cell_width = DefaultCellWidth (newfg); newfg->fontgrid.cell_height = DefaultCellHeight (newfg); redisplay = TRUE; } if (GridForeground(curfg) != GridForeground (newfg)) { XtReleaseGC (new, curfg->fontgrid.text_gc); newfg->fontgrid.text_gc = get_gc (newfg, GridForeground (newfg)); redisplay = TRUE; } if (curfg->fontgrid.box_pixel != newfg->fontgrid.box_pixel) { XtReleaseGC (new, curfg->fontgrid.text_gc); newfg->fontgrid.box_gc = get_gc (newfg, newfg->fontgrid.box_pixel); redisplay = TRUE; } if (curfg->fontgrid.center_chars != newfg->fontgrid.center_chars || curfg->fontgrid.box_chars != newfg->fontgrid.box_chars) redisplay = TRUE; if (curfg->fontgrid.start_char != newfg->fontgrid.start_char) { long maxn = GridLastChar (new); long page = newfg->fontgrid.cell_cols * newfg->fontgrid.cell_rows; long dir = page; long start = newfg->fontgrid.start_char; if (start < curfg->fontgrid.start_char) dir = -page; if (start < 0) start = 0; if (start > maxn) start = (maxn / page) * page; while (PageBlank (new, start, start + page - 1)) { long next = start + dir; if (next < 0 || maxn < next) break; start = next; } newfg->fontgrid.start_char = start; redisplay = (curfg->fontgrid.start_char != newfg->fontgrid.start_char); } return redisplay; } /* ARGSUSED */ static void Notify(Widget gw, XEvent *event, String *params, Cardinal *nparams) { FontGridWidget fgw = (FontGridWidget) gw; int x, y; /* where the event happened */ FontGridCharRec rec; /* callback data */ /* * only allow events with (x,y) */ switch (event->type) { case KeyPress: case KeyRelease: x = event->xkey.x; y = event->xkey.y; break; case ButtonPress: case ButtonRelease: x = event->xbutton.x; y = event->xbutton.y; break; case MotionNotify: x = event->xmotion.x; y = event->xmotion.y; break; default: Bell (gw, XkbBI_Ignore); return; } /* * compute the callback data */ { int cw = fgw->fontgrid.cell_width + fgw->fontgrid.grid_width; int ch = fgw->fontgrid.cell_height + fgw->fontgrid.grid_width; unsigned n; if (x > (fgw->fontgrid.cell_cols * cw)) { Bell (gw, XkbBI_InvalidLocation); return; } n= (fgw->fontgrid.start_char + ((y / ch) * fgw->fontgrid.cell_cols) + (x / cw)); rec.thefont = fgw->fontgrid.text_font; #ifdef XRENDER rec.theface = fgw->fontgrid.text_face; #endif rec.thechar = n; } XtCallCallbacks (gw, XtNcallback, (XtPointer) &rec); }