545 lines
16 KiB
C
545 lines
16 KiB
C
/*
|
|
* $Xorg: xfd.c,v 1.4 2001/02/09 02:05:42 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/xfd.c,v 1.8 2003/02/20 02:56:40 dawes Exp $ */
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
# include "config.h"
|
|
#endif
|
|
|
|
#include <X11/Intrinsic.h>
|
|
#include <X11/StringDefs.h>
|
|
#include <X11/Xos.h>
|
|
#include <X11/Xatom.h>
|
|
#include <X11/Shell.h>
|
|
#include <X11/Xaw/Cardinals.h>
|
|
#include <X11/Xaw/Paned.h>
|
|
#include <X11/Xaw/Box.h>
|
|
#include <X11/Xaw/Form.h>
|
|
#include <X11/Xaw/Command.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#ifdef USE_GETTEXT
|
|
# include <X11/Xlocale.h>
|
|
# include <libintl.h>
|
|
#else
|
|
# define gettext(a) (a)
|
|
#endif
|
|
#include "grid.h"
|
|
#ifdef XRENDER
|
|
#include <X11/Xft/Xft.h>
|
|
#include <X11/extensions/Xrender.h>
|
|
#endif
|
|
|
|
static char *ProgramName;
|
|
|
|
static XrmOptionDescRec xfd_options[] = {
|
|
{"-fn", "*grid.font", XrmoptionSepArg, (caddr_t) NULL },
|
|
#ifdef XRENDER
|
|
{"-fa", "*grid.face", XrmoptionSepArg, (caddr_t) NULL },
|
|
#endif
|
|
{"-start", "*startChar", XrmoptionSepArg, (caddr_t) NULL },
|
|
{"-box", "*grid.boxChars", XrmoptionNoArg, (caddr_t) "on" },
|
|
{"-bc", "*grid.boxColor", XrmoptionSepArg, (caddr_t) NULL },
|
|
{"-center", "*grid.centerChars", XrmoptionNoArg, (caddr_t) "on" },
|
|
{"-rows", "*grid.cellRows", XrmoptionSepArg, (caddr_t) NULL },
|
|
{"-columns", "*grid.cellColumns", XrmoptionSepArg, (caddr_t) NULL },
|
|
};
|
|
|
|
static void usage(void);
|
|
static void SelectChar(Widget w, XtPointer closure, XtPointer data);
|
|
static void do_quit(Widget w, XEvent *event, String *params,
|
|
Cardinal *num_params);
|
|
static void change_page(int page);
|
|
static void set_button_state(void);
|
|
static void do_prev(Widget w, XEvent *event, String *params,
|
|
Cardinal *num_params);
|
|
static void do_next(Widget w, XEvent *event, String *params,
|
|
Cardinal *num_params);
|
|
static void do_prev16(Widget w, XEvent *event, String *params,
|
|
Cardinal *num_params);
|
|
static void do_next16(Widget w, XEvent *event, String *params,
|
|
Cardinal *num_params);
|
|
static char *get_font_name(Display *dpy, XFontStruct *fs);
|
|
static void CatchFontConversionWarning(String name, String type, String class,
|
|
String defaultp, String *params,
|
|
Cardinal *np);
|
|
|
|
static XtActionsRec xfd_actions[] = {
|
|
{ "Quit", do_quit },
|
|
{ "Prev16", do_prev16 },
|
|
{ "Prev", do_prev },
|
|
{ "Next", do_next },
|
|
{ "Next16", do_next16 },
|
|
};
|
|
|
|
static Atom wm_delete_window;
|
|
|
|
static Widget quitButton, prev16Button, prevButton, nextButton, next16Button;
|
|
|
|
|
|
#define DEF_SELECT_FORMAT "character 0x%04x%02x (%u,%u) (%#o,%#o)"
|
|
#define DEF_METRICS_FORMAT "width %d; left %d, right %d; ascent %d, descent %d (font %d, %d)"
|
|
#define DEF_RANGE_FORMAT "range: 0x%04x%02x (%u,%u) thru 0x%04x%02x (%u,%u)"
|
|
#define DEF_START_FORMAT "upper left: 0x%06x (%d,%d)"
|
|
#define DEF_NOCHAR_FORMAT "no such character 0x%04x%02x (%u,%u) (%#o,%#o)"
|
|
|
|
static struct _xfd_resources {
|
|
char *select_format;
|
|
char *metrics_format;
|
|
char *range_format;
|
|
char *start_format;
|
|
char *nochar_format;
|
|
} xfd_resources;
|
|
|
|
#define Offset(field) XtOffsetOf(struct _xfd_resources, field)
|
|
|
|
static XtResource Resources[] = {
|
|
{ "selectFormat", "SelectFormat", XtRString, sizeof(char *),
|
|
Offset(select_format), XtRString, DEF_SELECT_FORMAT },
|
|
{ "metricsFormat", "MetricsFormat", XtRString, sizeof(char *),
|
|
Offset(metrics_format), XtRString, DEF_METRICS_FORMAT },
|
|
{ "rangeFormat", "RangeFormat", XtRString, sizeof(char *),
|
|
Offset(range_format), XtRString, DEF_RANGE_FORMAT },
|
|
{ "startFormat", "StartFormat", XtRString, sizeof(char *),
|
|
Offset(start_format), XtRString, DEF_START_FORMAT },
|
|
{ "nocharFormat", "NocharFormat", XtRString, sizeof(char *),
|
|
Offset(nochar_format), XtRString, DEF_NOCHAR_FORMAT },
|
|
};
|
|
|
|
#undef Offset
|
|
|
|
static void
|
|
usage(void)
|
|
{
|
|
fprintf (stderr, gettext("usage: %s [-options ...] "), ProgramName);
|
|
fprintf (stderr, "-fn ");
|
|
fprintf (stderr, gettext("font\n\n"));
|
|
#ifdef XRENDER
|
|
fprintf (stderr, gettext(" %s [-options ...] "), ProgramName);
|
|
fprintf (stderr, "-fa ");
|
|
fprintf (stderr, gettext("font\n\n"));
|
|
#endif
|
|
fprintf (stderr, gettext("where options include:\n"));
|
|
fprintf (stderr, " -display ");
|
|
fprintf (stderr, gettext("display X server to contact\n"));
|
|
fprintf (stderr, " -geometry ");
|
|
fprintf (stderr, gettext("geometry size and location of window\n"));
|
|
fprintf (stderr, " -bc ");
|
|
fprintf (stderr, gettext("color color for ImageText boxes\n"));
|
|
fprintf (stderr, " -start ");
|
|
fprintf (stderr, gettext("number first character to show\n"));
|
|
fprintf (stderr, " -box ");
|
|
fprintf (stderr, gettext("show a box around each character\n"));
|
|
fprintf (stderr, " -center ");
|
|
fprintf (stderr, gettext("center each character inside its grid\n"));
|
|
fprintf (stderr, " -rows ");
|
|
fprintf (stderr, gettext("number number of rows in grid\n"));
|
|
fprintf (stderr, " -columns ");
|
|
fprintf (stderr, gettext("number number of columns in grid\n"));
|
|
exit (1);
|
|
}
|
|
|
|
|
|
static Widget selectLabel, metricsLabel, rangeLabel, startLabel, fontGrid;
|
|
|
|
static Boolean fontConversionFailed = False;
|
|
static XtErrorMsgHandler oldWarningHandler;
|
|
|
|
int
|
|
main(int argc, char *argv[])
|
|
{
|
|
XtAppContext xtcontext;
|
|
Widget toplevel, pane, toplabel, box, form;
|
|
char buf[256];
|
|
Arg av[10];
|
|
Cardinal i;
|
|
static XtCallbackRec cb[2] = { { SelectChar, NULL }, { NULL, NULL } };
|
|
XFontStruct *fs;
|
|
#ifdef XRENDER
|
|
XftFont *xft;
|
|
#endif
|
|
char *fontname;
|
|
char *domaindir;
|
|
long minn, maxn;
|
|
|
|
XtSetLanguageProc(NULL, NULL, NULL);
|
|
|
|
ProgramName = argv[0];
|
|
|
|
toplevel = XtAppInitialize (&xtcontext, "Xfd",
|
|
xfd_options, XtNumber(xfd_options),
|
|
&argc, argv, NULL, NULL, 0);
|
|
|
|
#ifdef USE_GETTEXT
|
|
textdomain("xfd");
|
|
|
|
/* mainly for debugging */
|
|
if ((domaindir = getenv ("TEXTDOMAINDIR")) == NULL) {
|
|
domaindir = LOCALEDIR;
|
|
}
|
|
bindtextdomain ("xfd", domaindir);
|
|
#endif
|
|
|
|
Resources[0].default_addr = gettext(DEF_SELECT_FORMAT);
|
|
Resources[1].default_addr = gettext(DEF_METRICS_FORMAT);
|
|
Resources[2].default_addr = gettext(DEF_RANGE_FORMAT);
|
|
Resources[3].default_addr = gettext(DEF_START_FORMAT);
|
|
Resources[4].default_addr = gettext(DEF_NOCHAR_FORMAT);
|
|
|
|
if (argc != 1) usage ();
|
|
XtAppAddActions (xtcontext, xfd_actions, XtNumber (xfd_actions));
|
|
XtOverrideTranslations
|
|
(toplevel, XtParseTranslationTable ("<Message>WM_PROTOCOLS: Quit()"));
|
|
|
|
XtGetApplicationResources (toplevel, (XtPointer) &xfd_resources, Resources,
|
|
XtNumber (Resources), NULL, ZERO);
|
|
|
|
|
|
/* pane wrapping everything */
|
|
pane = XtCreateManagedWidget ("pane", panedWidgetClass, toplevel,
|
|
NULL, ZERO);
|
|
|
|
/* font name */
|
|
toplabel = XtCreateManagedWidget ("fontname", labelWidgetClass, pane,
|
|
NULL, ZERO);
|
|
|
|
/* button box */
|
|
box = XtCreateManagedWidget ("box", boxWidgetClass, pane, NULL, ZERO);
|
|
quitButton = XtCreateManagedWidget ("quit", commandWidgetClass, box,
|
|
NULL, ZERO);
|
|
prev16Button = XtCreateManagedWidget ("prev16", commandWidgetClass, box,
|
|
NULL, ZERO);
|
|
prevButton = XtCreateManagedWidget ("prev", commandWidgetClass, box,
|
|
NULL, ZERO);
|
|
nextButton = XtCreateManagedWidget ("next", commandWidgetClass, box,
|
|
NULL, ZERO);
|
|
next16Button = XtCreateManagedWidget ("next16", commandWidgetClass, box,
|
|
NULL, ZERO);
|
|
|
|
|
|
/* and labels in which to put information */
|
|
selectLabel = XtCreateManagedWidget ("select", labelWidgetClass,
|
|
pane, NULL, ZERO);
|
|
|
|
metricsLabel = XtCreateManagedWidget ("metrics", labelWidgetClass,
|
|
pane, NULL, ZERO);
|
|
|
|
rangeLabel = XtCreateManagedWidget ("range", labelWidgetClass, pane,
|
|
NULL, ZERO);
|
|
|
|
startLabel = XtCreateManagedWidget ("start", labelWidgetClass, pane,
|
|
NULL, ZERO);
|
|
|
|
/* form in which to draw */
|
|
form = XtCreateManagedWidget ("form", formWidgetClass, pane, NULL, ZERO);
|
|
|
|
i = 0;
|
|
XtSetArg (av[i], XtNtop, XtChainTop); i++;
|
|
XtSetArg (av[i], XtNbottom, XtChainBottom); i++;
|
|
XtSetArg (av[i], XtNleft, XtChainLeft); i++;
|
|
XtSetArg (av[i], XtNright, XtChainRight); i++;
|
|
XtSetArg (av[i], XtNcallback, cb); i++;
|
|
|
|
oldWarningHandler = XtAppSetWarningMsgHandler(xtcontext,
|
|
CatchFontConversionWarning);
|
|
|
|
fontGrid = XtCreateManagedWidget ("grid", fontgridWidgetClass, form,
|
|
av, i);
|
|
|
|
XtAppSetWarningMsgHandler(xtcontext, oldWarningHandler);
|
|
|
|
/* set the label at the top to tell us which font this is */
|
|
#ifdef XRENDER
|
|
i = 0;
|
|
XtSetArg (av[i], XtNface, &xft); i++;
|
|
XtGetValues (fontGrid, av, i);
|
|
if (xft)
|
|
{
|
|
FcChar8 *family;
|
|
FcChar8 *style;
|
|
FcPattern *p;
|
|
double size;
|
|
family = (FcChar8 *) "";
|
|
FcPatternGetString (xft->pattern, FC_FAMILY, 0, &family);
|
|
style = (FcChar8 *) "";
|
|
FcPatternGetString (xft->pattern, FC_STYLE, 0, &style);
|
|
size = 0;
|
|
FcPatternGetDouble (xft->pattern, FC_SIZE, 0, &size);
|
|
p = FcPatternBuild (NULL,
|
|
FC_FAMILY, FcTypeString, family,
|
|
FC_STYLE, FcTypeString, style,
|
|
FC_SIZE, FcTypeDouble, size,
|
|
NULL);
|
|
fontname = (char *) FcNameUnparse (p);
|
|
FcPatternDestroy (p);
|
|
}
|
|
else
|
|
#endif
|
|
{
|
|
i = 0;
|
|
XtSetArg (av[i], XtNfont, &fs); i++;
|
|
XtGetValues (fontGrid, av, i);
|
|
if (!fs || fontConversionFailed) {
|
|
fprintf (stderr, gettext("%s: no font to display\n"), ProgramName);
|
|
exit (1);
|
|
}
|
|
fontname = get_font_name (XtDisplay(toplevel), fs);
|
|
if (!fontname) fontname = gettext("unknown font!");
|
|
}
|
|
i = 0;
|
|
XtSetArg (av[i], XtNlabel, fontname); i++;
|
|
XtSetValues (toplabel, av, i);
|
|
|
|
minn = GridFirstChar (fontGrid);
|
|
maxn = GridLastChar (fontGrid);
|
|
sprintf (buf, xfd_resources.range_format,
|
|
minn >> 8, minn & 0xff,
|
|
minn >> 8, minn & 0xff,
|
|
maxn >> 8, maxn & 0xff,
|
|
maxn >> 8, maxn & 0xff);
|
|
|
|
i = 0;
|
|
XtSetArg (av[i], XtNlabel, buf); i++;
|
|
XtSetValues (rangeLabel, av, i);
|
|
|
|
XtRealizeWidget (toplevel);
|
|
|
|
wm_delete_window = XInternAtom(XtDisplay(toplevel), "WM_DELETE_WINDOW",
|
|
False);
|
|
(void) XSetWMProtocols (XtDisplay(toplevel), XtWindow(toplevel),
|
|
&wm_delete_window, 1);
|
|
|
|
change_page (0);
|
|
XtAppMainLoop (xtcontext);
|
|
exit(0);
|
|
}
|
|
|
|
/*ARGSUSED*/
|
|
static void
|
|
SelectChar(Widget w, XtPointer closure, XtPointer data)
|
|
{
|
|
FontGridCharRec *p = (FontGridCharRec *) data;
|
|
XFontStruct *fs = p->thefont;
|
|
long n = p->thechar;
|
|
int direction, fontascent, fontdescent;
|
|
XCharStruct metrics;
|
|
char buf[256];
|
|
Arg arg;
|
|
Boolean has_char = 1;
|
|
|
|
XtSetArg (arg, XtNlabel, buf);
|
|
|
|
buf[0] = '\0';
|
|
#ifdef XRENDER
|
|
if (p->theface)
|
|
{
|
|
XftFont *xft = p->theface;
|
|
FcChar32 c = (FcChar32) n;
|
|
has_char = (Boolean) FcCharSetHasChar (xft->charset, n);
|
|
if (has_char)
|
|
{
|
|
XGlyphInfo extents;
|
|
XftTextExtents32 (XtDisplay (w), xft, &c, 1, &extents);
|
|
sprintf (buf, xfd_resources.metrics_format,
|
|
extents.xOff, - extents.x,
|
|
extents.xOff - extents.width + extents.x,
|
|
extents.y, extents.height - extents.y,
|
|
xft->ascent, xft->descent);
|
|
}
|
|
}
|
|
else
|
|
#endif
|
|
{
|
|
if ((!fs->min_byte1 && !fs->max_byte1) ?
|
|
(n < fs->min_char_or_byte2 || n > fs->max_char_or_byte2) :
|
|
(n >> 8 < fs->min_byte1 || n >> 8 > fs->max_byte1 ||
|
|
(n & 0xff) < fs->min_char_or_byte2 ||
|
|
(n & 0xff) > fs->max_char_or_byte2))
|
|
{
|
|
has_char = 0;
|
|
}
|
|
else
|
|
{
|
|
XChar2b char2b;
|
|
char2b.byte1 = p->thechar >> 8;
|
|
char2b.byte2 = p->thechar & 0xff;
|
|
XTextExtents16 (fs, &char2b, 1, &direction, &fontascent, &fontdescent,
|
|
&metrics);
|
|
sprintf (buf, xfd_resources.metrics_format,
|
|
metrics.width, metrics.lbearing, metrics.rbearing,
|
|
metrics.ascent, metrics.descent, fontascent, fontdescent);
|
|
}
|
|
}
|
|
XtSetValues (metricsLabel, &arg, ONE);
|
|
|
|
if (has_char)
|
|
{
|
|
sprintf (buf, xfd_resources.select_format,
|
|
n >> 8, n & 0xff,
|
|
n >> 8, n & 0xff,
|
|
n >> 8, n & 0xff);
|
|
}
|
|
else
|
|
{
|
|
sprintf (buf, xfd_resources.nochar_format,
|
|
n >> 8, n & 0xff,
|
|
n >> 8, n & 0xff,
|
|
n >> 8, n & 0xff);
|
|
}
|
|
XtSetValues (selectLabel, &arg, ONE);
|
|
|
|
return;
|
|
}
|
|
|
|
|
|
/*ARGSUSED*/
|
|
static void
|
|
do_quit (Widget w, XEvent *event, String *params, Cardinal *num_params)
|
|
{
|
|
exit (0);
|
|
}
|
|
|
|
static void
|
|
change_page(int page)
|
|
{
|
|
long oldstart, newstart;
|
|
int ncols, nrows;
|
|
char buf[256];
|
|
Arg arg;
|
|
|
|
arg.name = XtNstartChar;
|
|
GetFontGridCellDimensions (fontGrid, &oldstart, &ncols, &nrows);
|
|
|
|
if (page) {
|
|
long start = (oldstart +
|
|
((long) ncols) * ((long) nrows) * ((long) page));
|
|
|
|
arg.value = (XtArgVal) start;
|
|
XtSetValues (fontGrid, &arg, ONE);
|
|
}
|
|
|
|
/* find out what it got set to */
|
|
arg.value = (XtArgVal) &newstart;
|
|
XtGetValues (fontGrid, &arg, ONE);
|
|
|
|
/* if not paging, then initialize it, else only do it actually changed */
|
|
if (!page || newstart != oldstart) {
|
|
unsigned int row = (unsigned int) ((newstart >> 8));
|
|
unsigned int col = (unsigned int) (newstart & 0xff);
|
|
|
|
XtSetArg (arg, XtNlabel, buf);
|
|
sprintf (buf, xfd_resources.start_format, newstart, row, col);
|
|
XtSetValues (startLabel, &arg, ONE);
|
|
}
|
|
|
|
set_button_state ();
|
|
|
|
return;
|
|
}
|
|
|
|
|
|
static void
|
|
set_button_state(void)
|
|
{
|
|
Bool prevvalid, nextvalid, prev16valid, next16valid;
|
|
Arg arg;
|
|
|
|
GetPrevNextStates (fontGrid, &prevvalid, &nextvalid, &prev16valid, &next16valid);
|
|
arg.name = XtNsensitive;
|
|
arg.value = (XtArgVal) (prevvalid ? TRUE : FALSE);
|
|
XtSetValues (prevButton, &arg, ONE);
|
|
arg.value = (XtArgVal) (nextvalid ? TRUE : FALSE);
|
|
XtSetValues (nextButton, &arg, ONE);
|
|
arg.name = XtNsensitive;
|
|
arg.value = (XtArgVal) (prev16valid ? TRUE : FALSE);
|
|
XtSetValues (prev16Button, &arg, ONE);
|
|
arg.value = (XtArgVal) (next16valid ? TRUE : FALSE);
|
|
XtSetValues (next16Button, &arg, ONE);
|
|
}
|
|
|
|
|
|
/* ARGSUSED */
|
|
static void
|
|
do_prev16(Widget w, XEvent *event, String *params, Cardinal *num_params)
|
|
{
|
|
change_page (-16);
|
|
}
|
|
|
|
|
|
static void
|
|
do_prev(Widget w, XEvent *event, String *params, Cardinal *num_params)
|
|
{
|
|
change_page (-1);
|
|
}
|
|
|
|
|
|
/* ARGSUSED */
|
|
static void
|
|
do_next(Widget w, XEvent *event, String *params, Cardinal *num_params)
|
|
{
|
|
change_page (1);
|
|
}
|
|
|
|
/* ARGSUSED */
|
|
static void
|
|
do_next16(Widget w, XEvent *event, String *params, Cardinal *num_params)
|
|
{
|
|
change_page (16);
|
|
}
|
|
|
|
|
|
static char *
|
|
get_font_name(Display *dpy, XFontStruct *fs)
|
|
{
|
|
register XFontProp *fp;
|
|
register int i;
|
|
Atom fontatom = XInternAtom (dpy, "FONT", False);
|
|
|
|
for (i = 0, fp = fs->properties; i < fs->n_properties; i++, fp++) {
|
|
if (fp->name == fontatom) {
|
|
return (XGetAtomName (dpy, fp->card32));
|
|
}
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
|
|
static void
|
|
CatchFontConversionWarning(String name, String type, String class,
|
|
String defaultp, String *params, Cardinal *np)
|
|
{
|
|
if (np && *np > 1 &&
|
|
strcmp(name, "conversionError") == 0 &&
|
|
strcmp(type, "string") == 0 &&
|
|
strcmp(class, "XtToolkitError") == 0 &&
|
|
strcmp(params[1], "FontStruct") == 0) fontConversionFailed = True;
|
|
|
|
(*oldWarningHandler)(name, type, class, defaultp, params, np);
|
|
}
|