/*
* Monstrous hack.
*/
static void Term_xtra_xaw_react_aux(term_data *td)
{
AngbandWidget wnew = td->widget;
Display *dpy = XtDisplay((Widget) wnew);
int depth = DefaultDepthOfScreen(XtScreen((Widget) wnew));
int i;
/* See if any colors need to be changed */
for (i = 0; i < NUM_COLORS; i++)
{
if (depth > 1)
{
if ((wnew->angband.color[i][0] != angband_color_table[i][0]) ||
(wnew->angband.color[i][1] != angband_color_table[i][1]) ||
(wnew->angband.color[i][2] != angband_color_table[i][2]) ||
(wnew->angband.color[i][3] != angband_color_table[i][3]))
{
unsigned long pixel;
/* Save new values */
wnew->angband.color[i][0] = angband_color_table[i][0];
wnew->angband.color[i][1] = angband_color_table[i][1];
wnew->angband.color[i][2] = angband_color_table[i][2];
wnew->angband.color[i][3] = angband_color_table[i][3];
/* Create pixel */
pixel = create_pixel(dpy,
wnew->angband.color[i][1],
wnew->angband.color[i][2],
wnew->angband.color[i][3]);
/* Change */
XSetForeground(dpy, wnew->angband.gc[i], pixel);
}
}
}
}
/*
* React to changes
*/
static errr Term_xtra_x11_react(void)
{
int i;
if (Metadpy->color)
{
/* Check the colors */
for (i = 0; i < 256; i++)
{
if ((color_table[i][0] != angband_color_table[i][0]) ||
(color_table[i][1] != angband_color_table[i][1]) ||
(color_table[i][2] != angband_color_table[i][2]) ||
(color_table[i][3] != angband_color_table[i][3]))
{
Pixell pixel;
/* Save new values */
color_table[i][0] = angband_color_table[i][0];
color_table[i][1] = angband_color_table[i][1];
color_table[i][2] = angband_color_table[i][2];
color_table[i][3] = angband_color_table[i][3];
/* Create pixel */
pixel = create_pixel(Metadpy->dpy,
color_table[i][1],
color_table[i][2],
color_table[i][3]);
/* Change the foreground */
Infoclr_set(clr[i]);
Infoclr_change_fg(pixel);
}
}
}
/* Success */
return (0);
}
/*
* Procedure Initialize() is called during the widget creation
* process. Initialize() load fonts and calculates window geometry.
* The request parameter is filled in by parents to this widget. The
* wnew parameter is the request parameter plus data filled in by this
* widget. All changes should be done to the wnew parameter.
*/
static void Initialize(AngbandWidget request, AngbandWidget wnew)
{
Display *dpy = XtDisplay(wnew);
int depth = DefaultDepthOfScreen(XtScreen((Widget) wnew));
XGCValues gcv;
TopLevelShellWidget parent =
(TopLevelShellWidget)XtParent((Widget) wnew);
int i;
/* Default background pixel */
unsigned long bg = create_pixel(dpy,
angband_color_table[0][1],
angband_color_table[0][2],
angband_color_table[0][3]);
/* Default foreground pixel */
unsigned long fg = create_pixel(dpy,
angband_color_table[1][1],
angband_color_table[1][2],
angband_color_table[1][3]);
/* Fix the background color */
wnew->core.background_pixel = bg;
/* Get some information about the font */
wnew->angband.fnt = getFont(wnew, wnew->angband.font, TRUE);
wnew->angband.fontheight = wnew->angband.fnt->ascent +
wnew->angband.fnt->descent;
wnew->angband.fontwidth = wnew->angband.fnt->max_bounds.width;
wnew->angband.fontascent = wnew->angband.fnt->ascent;
/* Create and initialize the graphics contexts */ /* GXset? */
gcv.font = wnew->angband.fnt->fid;
gcv.graphics_exposures = FALSE;
gcv.background = bg;
for (i = 0; i < NUM_COLORS; i++)
{
unsigned long pixel;
/* Acquire Angband colors */
wnew->angband.color[i][0] = angband_color_table[i][0];
wnew->angband.color[i][1] = angband_color_table[i][1];
wnew->angband.color[i][2] = angband_color_table[i][2];
wnew->angband.color[i][3] = angband_color_table[i][3];
if (depth > 1)
{
/* Create pixel */
pixel = create_pixel(dpy,
wnew->angband.color[i][1],
wnew->angband.color[i][2],
wnew->angband.color[i][3]);
}
else
{
/* Use background or foreground */
pixel = ((i == 0) ? bg : fg);
}
gcv.foreground = pixel;
/* Copy */
gcv.function = 3;
wnew->angband.gc[i] = XtGetGC((Widget)wnew,
(GCFont | GCForeground | GCFunction |
GCBackground | GCGraphicsExposures),
&gcv);
}
/* Create a special GC for highlighting */
gcv.foreground = (BlackPixelOfScreen(XtScreen((Widget)wnew)) ^
WhitePixelOfScreen(XtScreen((Widget)wnew)));
gcv.background = 0;
gcv.function = GXxor;
wnew->angband.gc[COLOR_XOR] = XtGetGC((Widget)wnew,
(GCFunction | GCForeground | GCBackground |
GCGraphicsExposures),
&gcv);
/* Calculate window geometry */
wnew->core.height = (wnew->angband.start_rows * wnew->angband.fontheight +
2 * wnew->angband.internal_border);
wnew->core.width = (wnew->angband.start_columns * wnew->angband.fontwidth +
2 * wnew->angband.internal_border);
/* We need to be able to resize the Widget if the user wants to */
/* change font on the fly! */
parent->shell.allow_shell_resize = TRUE;
/* Calculates all the size hints */
calculateSizeHints(wnew);
}
/*
* Initialization function for an "X11" module to Angband
*/
errr init_x11(int argc, char **argv)
{
int i;
cptr dpy_name = "";
int num_term = 1;
#ifdef USE_GRAPHICS
cptr bitmap_file = "";
char filename[1024];
int pict_wid = 0;
int pict_hgt = 0;
char *TmpData;
#endif /* USE_GRAPHICS */
/* Parse args */
for (i = 1; i < argc; i++)
{
if (prefix(argv[i], "-d"))
{
dpy_name = &argv[i][2];
continue;
}
#ifdef USE_GRAPHICS
if (prefix(argv[i], "-s"))
{
smoothRescaling = FALSE;
continue;
}
if (prefix(argv[i], "-o"))
{
arg_graphics = GRAPHICS_ORIGINAL;
continue;
}
if (prefix(argv[i], "-a"))
{
arg_graphics = GRAPHICS_ADAM_BOLT;
continue;
}
if (prefix(argv[i], "-g"))
{
smoothRescaling = FALSE;
arg_graphics = GRAPHICS_DAVID_GERVAIS;
continue;
}
if (prefix(argv[i], "-b"))
{
use_bigtile = TRUE;
continue;
}
#endif /* USE_GRAPHICS */
if (prefix(argv[i], "-n"))
{
num_term = atoi(&argv[i][2]);
if (num_term > MAX_TERM_DATA) num_term = MAX_TERM_DATA;
else if (num_term < 1) num_term = 1;
continue;
}
plog_fmt("Ignoring option: %s", argv[i]);
}
/* Init the Metadpy if possible */
if (Metadpy_init_name(dpy_name)) return (-1);
/* Prepare cursor color */
MAKE(xor, infoclr);
Infoclr_set(xor);
Infoclr_init_ppn(Metadpy->fg, Metadpy->bg, "xor", 0);
/* Prepare normal colors */
for (i = 0; i < 256; ++i)
{
Pixell pixel;
MAKE(clr[i], infoclr);
Infoclr_set(clr[i]);
/* Acquire Angband colors */
color_table[i][0] = angband_color_table[i][0];
color_table[i][1] = angband_color_table[i][1];
color_table[i][2] = angband_color_table[i][2];
color_table[i][3] = angband_color_table[i][3];
/* Default to monochrome */
pixel = ((i == 0) ? Metadpy->bg : Metadpy->fg);
/* Handle color */
if (Metadpy->color)
{
/* Create pixel */
pixel = create_pixel(Metadpy->dpy,
color_table[i][1],
color_table[i][2],
color_table[i][3]);
}
/* Initialize the color */
Infoclr_init_ppn(pixel, Metadpy->bg, "cpy", 0);
}
/* Initialize the windows */
for (i = 0; i < num_term; i++)
{
term_data *td = &data[i];
/* Initialize the term_data */
term_data_init(td, i);
/* Save global entry */
angband_term[i] = Term;
}
/* Raise the "Angband" window */
Infowin_set(data[0].win);
Infowin_raise();
/* Activate the "Angband" window screen */
Term_activate(&data[0].t);
#ifdef USE_GRAPHICS
/* Try graphics */
switch (arg_graphics)
{
case GRAPHICS_ADAM_BOLT:
/* Use tile graphics of Adam Bolt */
bitmap_file = "16x16.bmp";
/* Try the "16x16.bmp" file */
path_build(filename, sizeof(filename), ANGBAND_DIR_XTRA, format("graf/%s", bitmap_file));
/* Use the "16x16.bmp" file if it exists */
if (0 == fd_close(fd_open(filename, O_RDONLY)))
{
/* Use graphics */
use_graphics = TRUE;
use_transparency = TRUE;
pict_wid = pict_hgt = 16;
ANGBAND_GRAF = "new";
break;
}
/* Fall through */
case GRAPHICS_ORIGINAL:
/* Use original tile graphics */
bitmap_file = "8x8.bmp";
/* Try the "8x8.bmp" file */
path_build(filename, sizeof(filename), ANGBAND_DIR_XTRA, format("graf/%s", bitmap_file));
/* Use the "8x8.bmp" file if it exists */
if (0 == fd_close(fd_open(filename, O_RDONLY)))
{
/* Use graphics */
use_graphics = TRUE;
pict_wid = pict_hgt = 8;
ANGBAND_GRAF = "old";
break;
}
break;
case GRAPHICS_DAVID_GERVAIS:
/* Use tile graphics of David Gervais */
bitmap_file = "32x32.bmp";
/* Use graphics */
use_graphics = TRUE;
use_transparency = TRUE;
pict_wid = pict_hgt = 32;
ANGBAND_GRAF = "david";
break;
}
/* Load graphics */
if (use_graphics)
{
Display *dpy = Metadpy->dpy;
XImage *tiles_raw;
/* Initialize */
for (i = 0; i < num_term; i++)
{
term_data *td = &data[i];
td->tiles = NULL;
}
path_build(filename, sizeof(filename), ANGBAND_DIR_XTRA, format("graf/%s", bitmap_file));
/* Load the graphical tiles */
tiles_raw = ReadBMP(dpy, filename);
if (tiles_raw)
{
/* Initialize the windows */
for (i = 0; i < num_term; i++)
{
int j;
bool same = FALSE;
term_data *td = &data[i];
term_data *o_td = NULL;
term *t = &td->t;
/* Graphics hook */
t->pict_hook = Term_pict_x11;
/* Use graphics sometimes */
t->higher_pict = TRUE;
/* Look for another term with same font size */
for (j = 0; j < i; j++)
{
o_td = &data[j];
if ((td->fnt->twid == o_td->fnt->twid) && (td->fnt->hgt == o_td->fnt->hgt))
{
same = TRUE;
break;
}
}
if (!same)
{
/* Resize tiles */
td->tiles = ResizeImage(dpy, tiles_raw,
pict_wid, pict_hgt,
td->fnt->twid, td->fnt->hgt);
}
else
{
/* Use same graphics */
td->tiles = o_td->tiles;
}
}
/* Free tiles_raw */
FREE(tiles_raw);
}
/* Initialize the transparency masks */
for (i = 0; i < num_term; i++)
{
term_data *td = &data[i];
int ii, jj;
int depth = DefaultDepth(dpy, DefaultScreen(dpy));
Visual *visual = DefaultVisual(dpy, DefaultScreen(dpy));
int total;
/* Determine total bytes needed for image */
ii = 1;
jj = (depth - 1) >> 2;
while (jj >>= 1) ii <<= 1;
total = td->fnt->twid * td->fnt->hgt * ii;
TmpData = (char *)malloc(total);
td->TmpImage = XCreateImage(dpy,visual,depth,
ZPixmap, 0, TmpData,
td->fnt->twid, td->fnt->hgt, 32, 0);
}
}
#endif /* USE_GRAPHICS */
/* Success */
return (0);
}
