mirror of
https://github.com/jamessanford/kegs.git
synced 2024-09-11 12:55:04 +00:00
1339 lines
29 KiB
C
1339 lines
29 KiB
C
|
/************************************************************************/
|
||
|
/* KEGS: Apple //gs Emulator */
|
||
|
/* Copyright 2002 by Kent Dickey */
|
||
|
/* */
|
||
|
/* This code is covered by the GNU GPL */
|
||
|
/* */
|
||
|
/* The KEGS web page is kegs.sourceforge.net */
|
||
|
/* You may contact the author at: kadickey@alumni.princeton.edu */
|
||
|
/************************************************************************/
|
||
|
|
||
|
const char rcsid_xdriver_c[] = "@(#)$KmKId: xdriver.c,v 1.187 2004-11-15 16:24:19-05 kentd Exp $";
|
||
|
|
||
|
# if !defined(__CYGWIN__) && !defined(__POWERPC__)
|
||
|
/* No shared memory on Cygwin */
|
||
|
# define X_SHARED_MEM
|
||
|
#endif /* CYGWIN */
|
||
|
|
||
|
#include <X11/Xlib.h>
|
||
|
#include <X11/Xutil.h>
|
||
|
#include <X11/keysym.h>
|
||
|
#include <time.h>
|
||
|
#include <stdlib.h>
|
||
|
#include <signal.h>
|
||
|
|
||
|
#ifdef X_SHARED_MEM
|
||
|
# include <sys/ipc.h>
|
||
|
# include <sys/shm.h>
|
||
|
# include <X11/extensions/XShm.h>
|
||
|
#endif
|
||
|
|
||
|
int XShmQueryExtension(Display *display);
|
||
|
void _XInitImageFuncPtrs(XImage *xim);
|
||
|
|
||
|
#include "defc.h"
|
||
|
#include "protos_xdriver.h"
|
||
|
|
||
|
#define FONT_NAME_STATUS "8x13"
|
||
|
|
||
|
extern int Verbose;
|
||
|
|
||
|
extern int g_warp_pointer;
|
||
|
extern int g_screen_depth;
|
||
|
extern int g_force_depth;
|
||
|
int g_screen_mdepth = 0;
|
||
|
|
||
|
extern int _Xdebug;
|
||
|
|
||
|
extern int g_send_sound_to_file;
|
||
|
|
||
|
extern int g_quit_sim_now;
|
||
|
|
||
|
int g_has_focus = 0;
|
||
|
int g_auto_repeat_on = -1;
|
||
|
int g_x_shift_control_state = 0;
|
||
|
|
||
|
|
||
|
Display *g_display = 0;
|
||
|
Visual *g_vis = 0;
|
||
|
Window g_a2_win;
|
||
|
GC g_a2_winGC;
|
||
|
XFontStruct *g_text_FontSt;
|
||
|
Colormap g_a2_colormap = 0;
|
||
|
Colormap g_default_colormap = 0;
|
||
|
int g_needs_cmap = 0;
|
||
|
|
||
|
extern word32 g_red_mask;
|
||
|
extern word32 g_green_mask;
|
||
|
extern word32 g_blue_mask;
|
||
|
extern int g_red_left_shift;
|
||
|
extern int g_green_left_shift;
|
||
|
extern int g_blue_left_shift;
|
||
|
extern int g_red_right_shift;
|
||
|
extern int g_green_right_shift;
|
||
|
extern int g_blue_right_shift;
|
||
|
|
||
|
#ifdef X_SHARED_MEM
|
||
|
int g_use_shmem = 1;
|
||
|
#else
|
||
|
int g_use_shmem = 0;
|
||
|
#endif
|
||
|
|
||
|
extern Kimage g_mainwin_kimage;
|
||
|
|
||
|
extern int Max_color_size;
|
||
|
|
||
|
XColor g_xcolor_a2vid_array[256];
|
||
|
|
||
|
extern word32 g_palette_8to1624[256];
|
||
|
extern word32 g_a2palette_8to1624[256];
|
||
|
|
||
|
int g_alt_left_up = 1;
|
||
|
int g_alt_right_up = 1;
|
||
|
|
||
|
extern word32 g_full_refresh_needed;
|
||
|
|
||
|
extern int g_border_sides_refresh_needed;
|
||
|
extern int g_border_special_refresh_needed;
|
||
|
extern int g_status_refresh_needed;
|
||
|
|
||
|
extern int g_lores_colors[];
|
||
|
extern int g_cur_a2_stat;
|
||
|
|
||
|
extern int g_a2vid_palette;
|
||
|
|
||
|
extern int g_installed_full_superhires_colormap;
|
||
|
|
||
|
extern int g_screen_redraw_skip_amt;
|
||
|
|
||
|
extern word32 g_a2_screen_buffer_changed;
|
||
|
|
||
|
extern char *g_status_ptrs[MAX_STATUS_LINES];
|
||
|
|
||
|
Cursor g_cursor;
|
||
|
Pixmap g_cursor_shape;
|
||
|
Pixmap g_cursor_mask;
|
||
|
|
||
|
XColor g_xcolor_black = { 0, 0x0000, 0x0000, 0x0000, DoRed|DoGreen|DoBlue, 0 };
|
||
|
XColor g_xcolor_white = { 0, 0xffff, 0xffff, 0xffff, DoRed|DoGreen|DoBlue, 0 };
|
||
|
|
||
|
int g_depth_attempt_list[] = { 16, 24, 15, 8 };
|
||
|
|
||
|
|
||
|
#define X_EVENT_LIST_ALL_WIN \
|
||
|
(ExposureMask | ButtonPressMask | ButtonReleaseMask | \
|
||
|
OwnerGrabButtonMask | KeyPressMask | KeyReleaseMask | \
|
||
|
KeymapStateMask | ColormapChangeMask | FocusChangeMask)
|
||
|
|
||
|
#define X_BASE_WIN_EVENT_LIST \
|
||
|
(X_EVENT_LIST_ALL_WIN | PointerMotionMask | ButtonMotionMask)
|
||
|
|
||
|
#define X_A2_WIN_EVENT_LIST \
|
||
|
(X_BASE_WIN_EVENT_LIST)
|
||
|
|
||
|
int g_num_a2_keycodes = 0;
|
||
|
|
||
|
int a2_key_to_xsym[][3] = {
|
||
|
{ 0x35, XK_Escape, 0 },
|
||
|
{ 0x7a, XK_F1, 0 },
|
||
|
{ 0x78, XK_F2, 0 },
|
||
|
{ 0x63, XK_F3, 0 },
|
||
|
{ 0x76, XK_F4, 0 },
|
||
|
{ 0x60, XK_F5, 0 },
|
||
|
{ 0x61, XK_F6, 0 },
|
||
|
{ 0x62, XK_F7, 0 },
|
||
|
{ 0x64, XK_F8, 0 },
|
||
|
{ 0x65, XK_F9, 0 },
|
||
|
{ 0x6d, XK_F10, 0 },
|
||
|
{ 0x67, XK_F11, 0 },
|
||
|
{ 0x6f, XK_F12, 0 },
|
||
|
{ 0x69, XK_F13, 0 },
|
||
|
{ 0x6b, XK_F14, 0 },
|
||
|
{ 0x71, XK_F15, 0 },
|
||
|
{ 0x7f, XK_Pause, XK_Break },
|
||
|
{ 0x32, '`', '~' }, /* Key number 18? */
|
||
|
{ 0x12, '1', '!' },
|
||
|
{ 0x13, '2', '@' },
|
||
|
{ 0x14, '3', '#' },
|
||
|
{ 0x15, '4', '$' },
|
||
|
{ 0x17, '5', '%' },
|
||
|
{ 0x16, '6', '^' },
|
||
|
{ 0x1a, '7', '&' },
|
||
|
{ 0x1c, '8', '*' },
|
||
|
{ 0x19, '9', '(' },
|
||
|
{ 0x1d, '0', ')' },
|
||
|
{ 0x1b, '-', '_' },
|
||
|
{ 0x18, '=', '+' },
|
||
|
{ 0x33, XK_BackSpace, 0 },
|
||
|
{ 0x72, XK_Insert, XK_Help }, /* Help? */
|
||
|
/* { 0x73, XK_Home, 0 }, alias XK_Home to be XK_KP_Equal! */
|
||
|
{ 0x74, XK_Page_Up, 0 },
|
||
|
{ 0x47, XK_Num_Lock, XK_Clear }, /* Clear */
|
||
|
{ 0x51, XK_KP_Equal, XK_Home }, /* Note XK_Home alias! */
|
||
|
{ 0x4b, XK_KP_Divide, 0 },
|
||
|
{ 0x43, XK_KP_Multiply, 0 },
|
||
|
|
||
|
{ 0x30, XK_Tab, 0 },
|
||
|
{ 0x0c, 'q', 'Q' },
|
||
|
{ 0x0d, 'w', 'W' },
|
||
|
{ 0x0e, 'e', 'E' },
|
||
|
{ 0x0f, 'r', 'R' },
|
||
|
{ 0x11, 't', 'T' },
|
||
|
{ 0x10, 'y', 'Y' },
|
||
|
{ 0x20, 'u', 'U' },
|
||
|
{ 0x22, 'i', 'I' },
|
||
|
{ 0x1f, 'o', 'O' },
|
||
|
{ 0x23, 'p', 'P' },
|
||
|
{ 0x21, '[', '{' },
|
||
|
{ 0x1e, ']', '}' },
|
||
|
{ 0x2a, 0x5c, '|' }, /* backslash, bar */
|
||
|
{ 0x75, XK_Delete, 0 },
|
||
|
{ 0x77, XK_End, 0 },
|
||
|
{ 0x79, XK_Page_Down, 0 },
|
||
|
{ 0x59, XK_KP_7, XK_KP_Home },
|
||
|
{ 0x5b, XK_KP_8, XK_KP_Up },
|
||
|
{ 0x5c, XK_KP_9, XK_KP_Page_Up },
|
||
|
{ 0x4e, XK_KP_Subtract, 0 },
|
||
|
|
||
|
{ 0x39, XK_Caps_Lock, 0 },
|
||
|
{ 0x00, 'a', 'A' },
|
||
|
{ 0x01, 's', 'S' },
|
||
|
{ 0x02, 'd', 'D' },
|
||
|
{ 0x03, 'f', 'F' },
|
||
|
{ 0x05, 'g', 'G' },
|
||
|
{ 0x04, 'h', 'H' },
|
||
|
{ 0x26, 'j', 'J' },
|
||
|
{ 0x28, 'k', 'K' },
|
||
|
{ 0x25, 'l', 'L' },
|
||
|
{ 0x29, ';', ':' },
|
||
|
{ 0x27, 0x27, '"' }, /* single quote */
|
||
|
{ 0x24, XK_Return, 0 },
|
||
|
{ 0x56, XK_KP_4, XK_KP_Left },
|
||
|
{ 0x57, XK_KP_5, 0 },
|
||
|
{ 0x58, XK_KP_6, XK_KP_Right },
|
||
|
{ 0x45, XK_KP_Add, 0 },
|
||
|
|
||
|
{ 0x38, XK_Shift_L, XK_Shift_R },
|
||
|
{ 0x06, 'z', 'Z' },
|
||
|
{ 0x07, 'x', 'X' },
|
||
|
{ 0x08, 'c', 'C' },
|
||
|
{ 0x09, 'v', 'V' },
|
||
|
{ 0x0b, 'b', 'B' },
|
||
|
{ 0x2d, 'n', 'N' },
|
||
|
{ 0x2e, 'm', 'M' },
|
||
|
{ 0x2b, ',', '<' },
|
||
|
{ 0x2f, '.', '>' },
|
||
|
{ 0x2c, '/', '?' },
|
||
|
{ 0x3e, XK_Up, 0 },
|
||
|
{ 0x53, XK_KP_1, XK_KP_End },
|
||
|
{ 0x54, XK_KP_2, XK_KP_Down },
|
||
|
{ 0x55, XK_KP_3, XK_KP_Page_Down },
|
||
|
|
||
|
{ 0x36, XK_Control_L, XK_Control_R },
|
||
|
{ 0x3a, XK_Print, XK_Sys_Req }, /* Option */
|
||
|
{ 0x37, XK_Scroll_Lock, 0 }, /* Command */
|
||
|
{ 0x31, ' ', 0 },
|
||
|
{ 0x3b, XK_Left, 0 },
|
||
|
{ 0x3d, XK_Down, 0 },
|
||
|
{ 0x3c, XK_Right, 0 },
|
||
|
{ 0x52, XK_KP_0, XK_KP_Insert },
|
||
|
{ 0x41, XK_KP_Decimal, XK_KP_Separator },
|
||
|
{ 0x4c, XK_KP_Enter, 0 },
|
||
|
{ -1, -1, -1 }
|
||
|
};
|
||
|
|
||
|
int
|
||
|
main(int argc, char **argv)
|
||
|
{
|
||
|
return kegsmain(argc, argv);
|
||
|
}
|
||
|
|
||
|
void
|
||
|
x_dialog_create_kegs_conf(const char *str)
|
||
|
{
|
||
|
/* do nothing -- not implemented yet */
|
||
|
return;
|
||
|
}
|
||
|
|
||
|
int
|
||
|
x_show_alert(int is_fatal, const char *str)
|
||
|
{
|
||
|
/* Not implemented yet */
|
||
|
adb_all_keys_up();
|
||
|
|
||
|
clear_fatal_logs();
|
||
|
return 0;
|
||
|
}
|
||
|
|
||
|
|
||
|
#define MAKE_2(val) ( (val << 8) + val)
|
||
|
|
||
|
void
|
||
|
x_update_color(int col_num, int red, int green, int blue, word32 rgb)
|
||
|
{
|
||
|
XColor *xcol;
|
||
|
|
||
|
xcol = &(g_xcolor_a2vid_array[col_num]);
|
||
|
xcol->red = MAKE_2(red);
|
||
|
xcol->green = MAKE_2(green);
|
||
|
xcol->blue = MAKE_2(blue);
|
||
|
xcol->flags = DoRed | DoGreen | DoBlue;
|
||
|
}
|
||
|
|
||
|
void
|
||
|
x_update_physical_colormap()
|
||
|
{
|
||
|
if(g_needs_cmap) {
|
||
|
XStoreColors(g_display, g_a2_colormap,
|
||
|
&g_xcolor_a2vid_array[0], Max_color_size);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
void
|
||
|
show_xcolor_array()
|
||
|
{
|
||
|
int i;
|
||
|
|
||
|
for(i = 0; i < 256; i++) {
|
||
|
printf("%02x: %08x\n", i, g_palette_8to1624[i]);
|
||
|
|
||
|
#if 0
|
||
|
printf("%02x: %04x %04x %04x, %02x %x\n",
|
||
|
i, xcolor_array[i].red, xcolor_array[i].green,
|
||
|
xcolor_array[i].blue, (word32)xcolor_array[i].pixel,
|
||
|
xcolor_array[i].flags);
|
||
|
#endif
|
||
|
}
|
||
|
}
|
||
|
|
||
|
|
||
|
int
|
||
|
my_error_handler(Display *display, XErrorEvent *ev)
|
||
|
{
|
||
|
char msg[1024];
|
||
|
XGetErrorText(display, ev->error_code, msg, 1000);
|
||
|
printf("X Error code %s\n", msg);
|
||
|
fflush(stdout);
|
||
|
|
||
|
return 0;
|
||
|
}
|
||
|
|
||
|
void
|
||
|
xdriver_end()
|
||
|
{
|
||
|
|
||
|
printf("xdriver_end\n");
|
||
|
if(g_display) {
|
||
|
x_auto_repeat_on(1);
|
||
|
XFlush(g_display);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
void
|
||
|
show_colormap(char *str, Colormap cmap, int index1, int index2, int index3)
|
||
|
{
|
||
|
XColor xcol;
|
||
|
int i;
|
||
|
int pix;
|
||
|
|
||
|
printf("Show colormap: %08x = %s, cmap cells: %d,%d,%d\n",
|
||
|
(int)cmap, str, index1, index2, index3);
|
||
|
for(i = 0; i < index1 + index2 + index3; i++) {
|
||
|
pix = i;
|
||
|
if(i >= index1) {
|
||
|
pix = (i-index1)*index1;
|
||
|
if(i >= (index1 + index2)) {
|
||
|
pix = (i - index1 - index2)*index2*index1;
|
||
|
}
|
||
|
}
|
||
|
if(i == 0 && index1 < 250) {
|
||
|
pix = 0x842;
|
||
|
}
|
||
|
xcol.pixel = pix;
|
||
|
XQueryColor(g_display, cmap, &xcol);
|
||
|
printf("Cell %03x: pix: %03x, R:%04x, G:%04x, B:%04x\n",
|
||
|
i, (int)xcol.pixel, xcol.red, xcol.green, xcol.blue);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
void
|
||
|
x_badpipe(int signum)
|
||
|
{
|
||
|
/* restore normal sigpipe handling */
|
||
|
signal(SIGPIPE, SIG_DFL);
|
||
|
|
||
|
/* attempt to xset r */
|
||
|
system("xset r");
|
||
|
my_exit(5);
|
||
|
}
|
||
|
|
||
|
void
|
||
|
dev_video_init()
|
||
|
{
|
||
|
int tmp_array[0x80];
|
||
|
XGCValues new_gc;
|
||
|
XSetWindowAttributes win_attr;
|
||
|
XSizeHints my_winSizeHints;
|
||
|
XClassHint my_winClassHint;
|
||
|
XTextProperty my_winText;
|
||
|
XVisualInfo *visualList;
|
||
|
char **font_ptr;
|
||
|
char cursor_data;
|
||
|
word32 create_win_list;
|
||
|
int depth;
|
||
|
int len;
|
||
|
int cmap_alloc_amt;
|
||
|
int cnt;
|
||
|
int font_height;
|
||
|
int base_height;
|
||
|
int screen_num;
|
||
|
char *myTextString[1];
|
||
|
word32 lores_col;
|
||
|
int ret;
|
||
|
int i;
|
||
|
int keycode;
|
||
|
|
||
|
printf("Preparing X Windows graphics system\n");
|
||
|
ret = 0;
|
||
|
|
||
|
signal(SIGPIPE, x_badpipe);
|
||
|
|
||
|
g_num_a2_keycodes = 0;
|
||
|
for(i = 0; i <= 0x7f; i++) {
|
||
|
tmp_array[i] = 0;
|
||
|
}
|
||
|
for(i = 0; i < 0x7f; i++) {
|
||
|
keycode = a2_key_to_xsym[i][0];
|
||
|
if(keycode < 0) {
|
||
|
g_num_a2_keycodes = i;
|
||
|
break;
|
||
|
} else if(keycode > 0x7f) {
|
||
|
printf("a2_key_to_xsym[%d] = %02x!\n", i, keycode);
|
||
|
exit(2);
|
||
|
} else {
|
||
|
if(tmp_array[keycode]) {
|
||
|
printf("a2_key_to_x[%d] = %02x used by %d\n",
|
||
|
i, keycode, tmp_array[keycode] - 1);
|
||
|
}
|
||
|
tmp_array[keycode] = i + 1;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
#if 0
|
||
|
printf("Setting _Xdebug = 1, makes X synchronous\n");
|
||
|
_Xdebug = 1;
|
||
|
#endif
|
||
|
|
||
|
g_display = XOpenDisplay(NULL);
|
||
|
if(g_display == NULL) {
|
||
|
fprintf(stderr, "Can't open display\n");
|
||
|
exit(1);
|
||
|
}
|
||
|
|
||
|
vid_printf("Just opened display = %p\n", g_display);
|
||
|
fflush(stdout);
|
||
|
|
||
|
screen_num = DefaultScreen(g_display);
|
||
|
|
||
|
len = sizeof(g_depth_attempt_list)/sizeof(int);
|
||
|
if(g_force_depth > 0) {
|
||
|
/* Only use the requested user depth */
|
||
|
len = 1;
|
||
|
g_depth_attempt_list[0] = g_force_depth;
|
||
|
}
|
||
|
g_vis = 0;
|
||
|
for(i = 0; i < len; i++) {
|
||
|
depth = g_depth_attempt_list[i];
|
||
|
|
||
|
g_vis = x_try_find_visual(depth, screen_num,
|
||
|
&visualList);
|
||
|
if(g_vis != 0) {
|
||
|
break;
|
||
|
}
|
||
|
}
|
||
|
if(g_vis == 0) {
|
||
|
fprintf(stderr, "Couldn't find any visuals at any depth!\n");
|
||
|
exit(2);
|
||
|
}
|
||
|
|
||
|
g_default_colormap = XDefaultColormap(g_display, screen_num);
|
||
|
if(!g_default_colormap) {
|
||
|
printf("g_default_colormap == 0!\n");
|
||
|
exit(4);
|
||
|
}
|
||
|
|
||
|
g_a2_colormap = -1;
|
||
|
cmap_alloc_amt = AllocNone;
|
||
|
if(g_needs_cmap) {
|
||
|
cmap_alloc_amt = AllocAll;
|
||
|
}
|
||
|
g_a2_colormap = XCreateColormap(g_display,
|
||
|
RootWindow(g_display,screen_num), g_vis,
|
||
|
cmap_alloc_amt);
|
||
|
|
||
|
vid_printf("g_a2_colormap: %08x, main: %08x\n",
|
||
|
(word32)g_a2_colormap, (word32)g_default_colormap);
|
||
|
|
||
|
if(g_needs_cmap && g_a2_colormap == g_default_colormap) {
|
||
|
printf("A2_colormap = default colormap!\n");
|
||
|
exit(4);
|
||
|
}
|
||
|
|
||
|
/* and define cursor */
|
||
|
cursor_data = 0;
|
||
|
g_cursor_shape = XCreatePixmapFromBitmapData(g_display,
|
||
|
RootWindow(g_display,screen_num), &cursor_data, 1, 1, 1, 0, 1);
|
||
|
g_cursor_mask = XCreatePixmapFromBitmapData(g_display,
|
||
|
RootWindow(g_display,screen_num), &cursor_data, 1, 1, 1, 0, 1);
|
||
|
|
||
|
g_cursor = XCreatePixmapCursor(g_display, g_cursor_shape,
|
||
|
g_cursor_mask, &g_xcolor_black, &g_xcolor_white, 0, 0);
|
||
|
|
||
|
XFreePixmap(g_display, g_cursor_shape);
|
||
|
XFreePixmap(g_display, g_cursor_mask);
|
||
|
|
||
|
XFlush(g_display);
|
||
|
|
||
|
win_attr.event_mask = X_A2_WIN_EVENT_LIST;
|
||
|
win_attr.colormap = g_a2_colormap;
|
||
|
win_attr.backing_store = WhenMapped;
|
||
|
win_attr.border_pixel = 1;
|
||
|
win_attr.background_pixel = 0;
|
||
|
if(g_warp_pointer) {
|
||
|
win_attr.cursor = g_cursor;
|
||
|
} else {
|
||
|
win_attr.cursor = None;
|
||
|
}
|
||
|
|
||
|
vid_printf("About to a2_win, depth: %d\n", g_screen_depth);
|
||
|
fflush(stdout);
|
||
|
|
||
|
create_win_list = CWEventMask | CWBackingStore | CWCursor;
|
||
|
create_win_list |= CWColormap | CWBorderPixel | CWBackPixel;
|
||
|
|
||
|
base_height = X_A2_WINDOW_HEIGHT + (MAX_STATUS_LINES * 13);
|
||
|
|
||
|
g_a2_win = XCreateWindow(g_display, RootWindow(g_display, screen_num),
|
||
|
0, 0, BASE_WINDOW_WIDTH, base_height,
|
||
|
0, g_screen_depth, InputOutput, g_vis,
|
||
|
create_win_list, &win_attr);
|
||
|
|
||
|
XSetWindowColormap(g_display, g_a2_win, g_a2_colormap);
|
||
|
|
||
|
XFlush(g_display);
|
||
|
|
||
|
/* Check for XShm */
|
||
|
#ifdef X_SHARED_MEM
|
||
|
if(g_use_shmem) {
|
||
|
ret = XShmQueryExtension(g_display);
|
||
|
if(ret == 0) {
|
||
|
printf("XShmQueryExt ret: %d\n", ret);
|
||
|
printf("not using shared memory\n");
|
||
|
g_use_shmem = 0;
|
||
|
} else {
|
||
|
printf("Will use shared memory for X\n");
|
||
|
}
|
||
|
}
|
||
|
#endif
|
||
|
|
||
|
video_get_kimages();
|
||
|
if(g_screen_depth != 8) {
|
||
|
video_get_kimage(&g_mainwin_kimage, 0, g_screen_depth,
|
||
|
g_screen_mdepth);
|
||
|
}
|
||
|
|
||
|
if(!g_use_shmem) {
|
||
|
if(g_screen_redraw_skip_amt < 0) {
|
||
|
g_screen_redraw_skip_amt = 3;
|
||
|
}
|
||
|
printf("Not using shared memory, setting skip_amt = %d\n",
|
||
|
g_screen_redraw_skip_amt);
|
||
|
}
|
||
|
|
||
|
/* Done with visualList now */
|
||
|
XFree(visualList);
|
||
|
|
||
|
for(i = 0; i < 256; i++) {
|
||
|
g_xcolor_a2vid_array[i].pixel = i;
|
||
|
lores_col = g_lores_colors[i & 0xf];
|
||
|
video_update_color_raw(i, lores_col);
|
||
|
g_a2palette_8to1624[i] = g_palette_8to1624[i];
|
||
|
}
|
||
|
|
||
|
x_update_physical_colormap();
|
||
|
|
||
|
g_installed_full_superhires_colormap = !g_needs_cmap;
|
||
|
|
||
|
myTextString[0] = "KEGS";
|
||
|
|
||
|
XStringListToTextProperty(myTextString, 1, &my_winText);
|
||
|
|
||
|
my_winSizeHints.flags = PSize | PMinSize | PMaxSize;
|
||
|
my_winSizeHints.width = BASE_WINDOW_WIDTH;
|
||
|
my_winSizeHints.height = base_height;
|
||
|
my_winSizeHints.min_width = BASE_WINDOW_WIDTH;
|
||
|
my_winSizeHints.min_height = base_height;
|
||
|
my_winSizeHints.max_width = BASE_WINDOW_WIDTH;
|
||
|
my_winSizeHints.max_height = base_height;
|
||
|
my_winClassHint.res_name = "KEGS";
|
||
|
my_winClassHint.res_class = "KEGS";
|
||
|
|
||
|
XSetWMProperties(g_display, g_a2_win, &my_winText, &my_winText, 0,
|
||
|
0, &my_winSizeHints, 0, &my_winClassHint);
|
||
|
XMapRaised(g_display, g_a2_win);
|
||
|
|
||
|
XSync(g_display, False);
|
||
|
|
||
|
g_a2_winGC = XCreateGC(g_display, g_a2_win, 0, (XGCValues *) 0);
|
||
|
font_ptr = XListFonts(g_display, FONT_NAME_STATUS, 4, &cnt);
|
||
|
|
||
|
vid_printf("act_cnt of fonts: %d\n", cnt);
|
||
|
for(i = 0; i < cnt; i++) {
|
||
|
vid_printf("Font %d: %s\n", i, font_ptr[i]);
|
||
|
}
|
||
|
fflush(stdout);
|
||
|
g_text_FontSt = XLoadQueryFont(g_display, FONT_NAME_STATUS);
|
||
|
vid_printf("font # returned: %08x\n", (word32)(g_text_FontSt->fid));
|
||
|
font_height = g_text_FontSt->ascent + g_text_FontSt->descent;
|
||
|
vid_printf("font_height: %d\n", font_height);
|
||
|
|
||
|
vid_printf("widest width: %d\n", g_text_FontSt->max_bounds.width);
|
||
|
|
||
|
new_gc.font = g_text_FontSt->fid;
|
||
|
new_gc.fill_style = FillSolid;
|
||
|
XChangeGC(g_display, g_a2_winGC, GCFillStyle | GCFont, &new_gc);
|
||
|
|
||
|
/* XSync(g_display, False); */
|
||
|
#if 0
|
||
|
/* MkLinux for Powermac depth 15 has bugs--this was to try to debug them */
|
||
|
if(g_screen_depth == 15) {
|
||
|
/* draw phony screen */
|
||
|
ptr16 = (word16 *)dint_main_win;
|
||
|
for(i = 0; i < 320*400; i++) {
|
||
|
ptr16[i] = 0;
|
||
|
}
|
||
|
for(i = 0; i < 400; i++) {
|
||
|
for(j = 0; j < 640; j++) {
|
||
|
sh = (j / 20) & 0x1f;
|
||
|
val = sh;
|
||
|
val = val;
|
||
|
*ptr16++ = val;
|
||
|
}
|
||
|
}
|
||
|
XPutImage(g_display, g_a2_win, g_a2_winGC, xint_main_win,
|
||
|
0, 0,
|
||
|
BASE_MARGIN_LEFT, BASE_MARGIN_TOP,
|
||
|
640, 400);
|
||
|
XFlush(g_display);
|
||
|
}
|
||
|
#endif
|
||
|
|
||
|
|
||
|
XFlush(g_display);
|
||
|
fflush(stdout);
|
||
|
}
|
||
|
|
||
|
Visual *
|
||
|
x_try_find_visual(int depth, int screen_num, XVisualInfo **visual_list_ptr)
|
||
|
{
|
||
|
XVisualInfo *visualList;
|
||
|
XVisualInfo *v_chosen;
|
||
|
XVisualInfo vTemplate;
|
||
|
int visualsMatched;
|
||
|
int mdepth;
|
||
|
int needs_cmap;
|
||
|
int visual_chosen;
|
||
|
int match8, match24;
|
||
|
int i;
|
||
|
|
||
|
vTemplate.screen = screen_num;
|
||
|
vTemplate.depth = depth;
|
||
|
|
||
|
visualList = XGetVisualInfo(g_display,
|
||
|
(VisualScreenMask | VisualDepthMask),
|
||
|
&vTemplate, &visualsMatched);
|
||
|
|
||
|
vid_printf("visuals matched: %d\n", visualsMatched);
|
||
|
if(visualsMatched == 0) {
|
||
|
return (Visual *)0;
|
||
|
}
|
||
|
|
||
|
visual_chosen = -1;
|
||
|
needs_cmap = 0;
|
||
|
for(i = 0; i < visualsMatched; i++) {
|
||
|
printf("Visual %d\n", i);
|
||
|
printf(" id: %08x, screen: %d, depth: %d, class: %d\n",
|
||
|
(word32)visualList[i].visualid,
|
||
|
visualList[i].screen,
|
||
|
visualList[i].depth,
|
||
|
visualList[i].class);
|
||
|
printf(" red: %08lx, green: %08lx, blue: %08lx\n",
|
||
|
visualList[i].red_mask,
|
||
|
visualList[i].green_mask,
|
||
|
visualList[i].blue_mask);
|
||
|
printf(" cmap size: %d, bits_per_rgb: %d\n",
|
||
|
visualList[i].colormap_size,
|
||
|
visualList[i].bits_per_rgb);
|
||
|
match8 = (visualList[i].class == PseudoColor);
|
||
|
match24 = (visualList[i].class == TrueColor);
|
||
|
if((depth == 8) && match8) {
|
||
|
visual_chosen = i;
|
||
|
Max_color_size = visualList[i].colormap_size;
|
||
|
needs_cmap = 1;
|
||
|
break;
|
||
|
}
|
||
|
if((depth != 8) && match24) {
|
||
|
visual_chosen = i;
|
||
|
Max_color_size = -1;
|
||
|
needs_cmap = 0;
|
||
|
break;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
if(visual_chosen < 0) {
|
||
|
printf("Couldn't find any good visuals at depth %d!\n",
|
||
|
depth);
|
||
|
return (Visual *)0;
|
||
|
}
|
||
|
|
||
|
printf("Chose visual: %d, max_colors: %d\n", visual_chosen,
|
||
|
Max_color_size);
|
||
|
|
||
|
v_chosen = &(visualList[visual_chosen]);
|
||
|
x_set_mask_and_shift(v_chosen->red_mask, &g_red_mask,
|
||
|
&g_red_left_shift, &g_red_right_shift);
|
||
|
x_set_mask_and_shift(v_chosen->green_mask, &g_green_mask,
|
||
|
&g_green_left_shift, &g_green_right_shift);
|
||
|
x_set_mask_and_shift(v_chosen->blue_mask, &g_blue_mask,
|
||
|
&g_blue_left_shift, &g_blue_right_shift);
|
||
|
|
||
|
g_screen_depth = depth;
|
||
|
mdepth = depth;
|
||
|
if(depth > 8) {
|
||
|
mdepth = 16;
|
||
|
}
|
||
|
if(depth > 16) {
|
||
|
mdepth = 32;
|
||
|
}
|
||
|
g_screen_mdepth = mdepth;
|
||
|
g_needs_cmap = needs_cmap;
|
||
|
*visual_list_ptr = visualList;
|
||
|
|
||
|
return v_chosen->visual;
|
||
|
}
|
||
|
|
||
|
void
|
||
|
x_set_mask_and_shift(word32 x_mask, word32 *mask_ptr, int *shift_left_ptr,
|
||
|
int *shift_right_ptr)
|
||
|
{
|
||
|
int shift;
|
||
|
int i;
|
||
|
|
||
|
/* Shift until we find first set bit in mask, then remember mask,shift*/
|
||
|
|
||
|
shift = 0;
|
||
|
for(i = 0; i < 32; i++) {
|
||
|
if(x_mask & 1) {
|
||
|
/* we're done! */
|
||
|
break;
|
||
|
}
|
||
|
x_mask = x_mask >> 1;
|
||
|
shift++;
|
||
|
}
|
||
|
*mask_ptr = x_mask;
|
||
|
*shift_left_ptr = shift;
|
||
|
/* Now, calculate shift_right_ptr */
|
||
|
shift = 0;
|
||
|
x_mask |= 1; // make sure at least one bit is set
|
||
|
while(x_mask < 0x80) {
|
||
|
shift++;
|
||
|
x_mask = x_mask << 1;
|
||
|
}
|
||
|
|
||
|
*shift_right_ptr = shift;
|
||
|
return;
|
||
|
|
||
|
}
|
||
|
|
||
|
int g_xshm_error = 0;
|
||
|
|
||
|
int
|
||
|
xhandle_shm_error(Display *display, XErrorEvent *event)
|
||
|
{
|
||
|
g_xshm_error = 1;
|
||
|
return 0;
|
||
|
}
|
||
|
|
||
|
void
|
||
|
x_get_kimage(Kimage *kimage_ptr) {
|
||
|
if(g_use_shmem) {
|
||
|
g_use_shmem = get_shm(kimage_ptr);
|
||
|
}
|
||
|
if(!g_use_shmem) {
|
||
|
get_ximage(kimage_ptr);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
int
|
||
|
get_shm(Kimage *kimage_ptr)
|
||
|
{
|
||
|
#ifdef X_SHARED_MEM
|
||
|
XShmSegmentInfo *seginfo;
|
||
|
XImage *xim;
|
||
|
int (*old_x_handler)(Display *, XErrorEvent *);
|
||
|
int width;
|
||
|
int height;
|
||
|
int depth;
|
||
|
|
||
|
width = kimage_ptr->width_req;
|
||
|
height = kimage_ptr->height;
|
||
|
depth = kimage_ptr->depth;
|
||
|
|
||
|
seginfo = (XShmSegmentInfo *)malloc(sizeof(XShmSegmentInfo));
|
||
|
xim = XShmCreateImage(g_display, g_vis, depth, ZPixmap,
|
||
|
(char *)0, seginfo, width, height);
|
||
|
|
||
|
/* check mdepth! */
|
||
|
if(xim->bits_per_pixel != kimage_ptr->mdepth) {
|
||
|
printf("get_shm bits_per_pix: %d != %d\n",
|
||
|
xim->bits_per_pixel, g_screen_mdepth);
|
||
|
}
|
||
|
|
||
|
vid_printf("xim: %p\n", xim);
|
||
|
kimage_ptr->dev_handle = xim;
|
||
|
kimage_ptr->dev_handle2 = seginfo;
|
||
|
if(xim == 0) {
|
||
|
return 0;
|
||
|
}
|
||
|
|
||
|
/* It worked, we got it */
|
||
|
seginfo->shmid = shmget(IPC_PRIVATE, xim->bytes_per_line * xim->height,
|
||
|
IPC_CREAT | 0777);
|
||
|
vid_printf("seginfo->shmid = %d\n", seginfo->shmid);
|
||
|
if(seginfo->shmid < 0) {
|
||
|
XDestroyImage(xim);
|
||
|
return 0;
|
||
|
}
|
||
|
|
||
|
/* Still working */
|
||
|
seginfo->shmaddr = (char *)shmat(seginfo->shmid, 0, 0);
|
||
|
vid_printf("seginfo->shmaddr: %p\n", seginfo->shmaddr);
|
||
|
if(seginfo->shmaddr == ((char *) -1)) {
|
||
|
XDestroyImage(xim);
|
||
|
return 0;
|
||
|
}
|
||
|
|
||
|
/* Still working */
|
||
|
xim->data = seginfo->shmaddr;
|
||
|
seginfo->readOnly = False;
|
||
|
|
||
|
/* XShmAttach will trigger X error if server is remote, so catch it */
|
||
|
g_xshm_error = 0;
|
||
|
old_x_handler = XSetErrorHandler(xhandle_shm_error);
|
||
|
|
||
|
XShmAttach(g_display, seginfo);
|
||
|
XSync(g_display, False);
|
||
|
|
||
|
|
||
|
vid_printf("about to RMID the shmid\n");
|
||
|
shmctl(seginfo->shmid, IPC_RMID, 0);
|
||
|
|
||
|
XFlush(g_display);
|
||
|
XSetErrorHandler(old_x_handler);
|
||
|
|
||
|
if(g_xshm_error) {
|
||
|
XDestroyImage(xim);
|
||
|
/* We could release the shared mem segment, but by doing the */
|
||
|
/* RMID, it will go away when we die now, so just leave it */
|
||
|
printf("Not using shared memory\n");
|
||
|
return 0;
|
||
|
}
|
||
|
|
||
|
kimage_ptr->data_ptr = (byte *)xim->data;
|
||
|
vid_printf("Sharing memory. xim: %p, xim->data: %p\n", xim, xim->data);
|
||
|
|
||
|
return 1;
|
||
|
#else
|
||
|
return 0; /* No shared memory */
|
||
|
#endif /* X_SHARED_MEM */
|
||
|
}
|
||
|
|
||
|
void
|
||
|
get_ximage(Kimage *kimage_ptr)
|
||
|
{
|
||
|
XImage *xim;
|
||
|
byte *ptr;
|
||
|
int width;
|
||
|
int height;
|
||
|
int depth;
|
||
|
int mdepth;
|
||
|
|
||
|
width = kimage_ptr->width_req;
|
||
|
height = kimage_ptr->height;
|
||
|
depth = kimage_ptr->depth;
|
||
|
mdepth = kimage_ptr->mdepth;
|
||
|
|
||
|
ptr = (byte *)malloc((width * height * mdepth) >> 3);
|
||
|
|
||
|
vid_printf("ptr: %p\n", ptr);
|
||
|
|
||
|
if(ptr == 0) {
|
||
|
printf("malloc for data failed, mdepth: %d\n", mdepth);
|
||
|
exit(2);
|
||
|
}
|
||
|
|
||
|
kimage_ptr->data_ptr = ptr;
|
||
|
|
||
|
xim = XCreateImage(g_display, g_vis, depth, ZPixmap, 0,
|
||
|
(char *)ptr, width, height, 8, 0);
|
||
|
|
||
|
#ifdef KEGS_LITTLE_ENDIAN
|
||
|
xim->byte_order = LSBFirst;
|
||
|
#else
|
||
|
xim->byte_order = MSBFirst;
|
||
|
#endif
|
||
|
_XInitImageFuncPtrs(xim); /* adjust to new byte order */
|
||
|
|
||
|
/* check mdepth! */
|
||
|
if(xim->bits_per_pixel != mdepth) {
|
||
|
printf("shm_ximage bits_per_pix: %d != %d\n",
|
||
|
xim->bits_per_pixel, mdepth);
|
||
|
}
|
||
|
|
||
|
vid_printf("xim: %p\n", xim);
|
||
|
|
||
|
kimage_ptr->dev_handle = xim;
|
||
|
|
||
|
return;
|
||
|
}
|
||
|
|
||
|
|
||
|
void
|
||
|
x_redraw_status_lines()
|
||
|
{
|
||
|
char *buf;
|
||
|
int line;
|
||
|
int height;
|
||
|
int margin;
|
||
|
word32 white, black;
|
||
|
|
||
|
height = g_text_FontSt->ascent + g_text_FontSt->descent;
|
||
|
margin = g_text_FontSt->ascent;
|
||
|
|
||
|
white = (g_a2vid_palette << 4) + 0xf;
|
||
|
black = (g_a2vid_palette << 4) + 0x0;
|
||
|
if(g_screen_depth != 8) {
|
||
|
white = (2 << (g_screen_depth - 1)) - 1;
|
||
|
black = 0;
|
||
|
}
|
||
|
XSetForeground(g_display, g_a2_winGC, white);
|
||
|
XSetBackground(g_display, g_a2_winGC, black);
|
||
|
|
||
|
for(line = 0; line < MAX_STATUS_LINES; line++) {
|
||
|
buf = g_status_ptrs[line];
|
||
|
if(buf == 0) {
|
||
|
/* skip it */
|
||
|
continue;
|
||
|
}
|
||
|
XDrawImageString(g_display, g_a2_win, g_a2_winGC, 0,
|
||
|
X_A2_WINDOW_HEIGHT + height*line + margin,
|
||
|
buf, strlen(buf));
|
||
|
}
|
||
|
|
||
|
XFlush(g_display);
|
||
|
}
|
||
|
|
||
|
|
||
|
|
||
|
void
|
||
|
x_push_kimage(Kimage *kimage_ptr, int destx, int desty, int srcx, int srcy,
|
||
|
int width, int height)
|
||
|
{
|
||
|
XImage *xim;
|
||
|
|
||
|
xim = (XImage *)kimage_ptr->dev_handle;
|
||
|
|
||
|
#ifdef X_SHARED_MEM
|
||
|
if(g_use_shmem) {
|
||
|
XShmPutImage(g_display, g_a2_win, g_a2_winGC, xim,
|
||
|
srcx, srcy, destx, desty, width, height, False);
|
||
|
}
|
||
|
#endif
|
||
|
if(!g_use_shmem) {
|
||
|
XPutImage(g_display, g_a2_win, g_a2_winGC, xim,
|
||
|
srcx, srcy, destx, desty, width, height);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
void
|
||
|
x_push_done()
|
||
|
{
|
||
|
XFlush(g_display);
|
||
|
}
|
||
|
|
||
|
|
||
|
#define KEYBUFLEN 128
|
||
|
|
||
|
int g_num_check_input_calls = 0;
|
||
|
int g_check_input_flush_rate = 2;
|
||
|
|
||
|
int
|
||
|
x_update_mouse(int raw_x, int raw_y, int button_states, int buttons_valid)
|
||
|
{
|
||
|
int x, y;
|
||
|
|
||
|
x = raw_x - BASE_MARGIN_LEFT;
|
||
|
y = raw_y - BASE_MARGIN_TOP;
|
||
|
|
||
|
if(g_warp_pointer && (x == A2_WINDOW_WIDTH/2) &&
|
||
|
(y == A2_WINDOW_HEIGHT/2) && (buttons_valid == 0) ) {
|
||
|
/* tell adb routs to recenter but ignore this motion */
|
||
|
update_mouse(x, y, 0, -1);
|
||
|
return 0;
|
||
|
}
|
||
|
return update_mouse(x, y, button_states, buttons_valid & 7);
|
||
|
}
|
||
|
|
||
|
void
|
||
|
check_input_events()
|
||
|
{
|
||
|
XEvent ev;
|
||
|
int len;
|
||
|
int motion;
|
||
|
int buttons;
|
||
|
int refresh_needed;
|
||
|
|
||
|
g_num_check_input_calls--;
|
||
|
if(g_num_check_input_calls < 0) {
|
||
|
len = XPending(g_display);
|
||
|
g_num_check_input_calls = g_check_input_flush_rate;
|
||
|
} else {
|
||
|
len = QLength(g_display);
|
||
|
}
|
||
|
|
||
|
motion = 0;
|
||
|
refresh_needed = 0;
|
||
|
while(len > 0) {
|
||
|
XNextEvent(g_display, &ev);
|
||
|
len--;
|
||
|
if(len == 0) {
|
||
|
/* Xaccel on linux only buffers one X event */
|
||
|
/* must look for more now */
|
||
|
len = XPending(g_display);
|
||
|
}
|
||
|
switch(ev.type) {
|
||
|
case FocusIn:
|
||
|
case FocusOut:
|
||
|
if(ev.xfocus.type == FocusOut) {
|
||
|
/* Allow keyrepeat again! */
|
||
|
vid_printf("Left window, auto repeat on\n");
|
||
|
x_auto_repeat_on(0);
|
||
|
g_has_focus = 0;
|
||
|
} else if(ev.xfocus.type == FocusIn) {
|
||
|
/* Allow keyrepeat again! */
|
||
|
vid_printf("Enter window, auto repeat off\n");
|
||
|
x_auto_repeat_off(0);
|
||
|
g_has_focus = 1;
|
||
|
}
|
||
|
break;
|
||
|
case EnterNotify:
|
||
|
case LeaveNotify:
|
||
|
/* These events are disabled now */
|
||
|
printf("Enter/Leave event for winow %08x, sub: %08x\n",
|
||
|
(word32)ev.xcrossing.window,
|
||
|
(word32)ev.xcrossing.subwindow);
|
||
|
printf("Enter/L mode: %08x, detail: %08x, type:%02x\n",
|
||
|
ev.xcrossing.mode, ev.xcrossing.detail,
|
||
|
ev.xcrossing.type);
|
||
|
break;
|
||
|
case ButtonPress:
|
||
|
vid_printf("Got button press of button %d!\n",
|
||
|
ev.xbutton.button);
|
||
|
buttons = (1 << ev.xbutton.button) >> 1;
|
||
|
motion |= x_update_mouse(ev.xbutton.x, ev.xbutton.y,
|
||
|
buttons, buttons & 7);
|
||
|
|
||
|
break;
|
||
|
case ButtonRelease:
|
||
|
buttons = (1 << ev.xbutton.button) >> 1;
|
||
|
motion |= x_update_mouse(ev.xbutton.x, ev.xbutton.y, 0,
|
||
|
buttons & 7);
|
||
|
break;
|
||
|
case MotionNotify:
|
||
|
if(ev.xmotion.window != g_a2_win) {
|
||
|
printf("Motion in window %08x unknown!\n",
|
||
|
(word32)ev.xmotion.window);
|
||
|
}
|
||
|
motion |= x_update_mouse(ev.xmotion.x, ev.xmotion.y, 0,
|
||
|
0);
|
||
|
break;
|
||
|
case Expose:
|
||
|
refresh_needed = -1;
|
||
|
break;
|
||
|
case NoExpose:
|
||
|
/* do nothing */
|
||
|
break;
|
||
|
case KeyPress:
|
||
|
case KeyRelease:
|
||
|
handle_keysym(&ev);
|
||
|
break;
|
||
|
case KeymapNotify:
|
||
|
break;
|
||
|
case ColormapNotify:
|
||
|
vid_printf("ColormapNotify for %08x\n",
|
||
|
(word32)(ev.xcolormap.window));
|
||
|
vid_printf("colormap: %08x, new: %d, state: %d\n",
|
||
|
(word32)ev.xcolormap.colormap,
|
||
|
ev.xcolormap.new, ev.xcolormap.state);
|
||
|
break;
|
||
|
default:
|
||
|
printf("X event 0x%08x is unknown!\n",
|
||
|
ev.type);
|
||
|
break;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
if(motion && g_warp_pointer) {
|
||
|
XWarpPointer(g_display, None, g_a2_win, 0, 0, 0, 0,
|
||
|
BASE_MARGIN_LEFT + (A2_WINDOW_WIDTH/2),
|
||
|
BASE_MARGIN_TOP + (A2_WINDOW_HEIGHT/2));
|
||
|
}
|
||
|
|
||
|
if(refresh_needed) {
|
||
|
printf("Full refresh needed\n");
|
||
|
g_a2_screen_buffer_changed = -1;
|
||
|
g_full_refresh_needed = -1;
|
||
|
|
||
|
g_border_sides_refresh_needed = 1;
|
||
|
g_border_special_refresh_needed = 1;
|
||
|
g_status_refresh_needed = 1;
|
||
|
|
||
|
/* x_refresh_ximage(); */
|
||
|
/* redraw_border(); */
|
||
|
}
|
||
|
|
||
|
}
|
||
|
|
||
|
void
|
||
|
x_hide_pointer(int do_hide)
|
||
|
{
|
||
|
if(do_hide) {
|
||
|
XDefineCursor(g_display, g_a2_win, g_cursor);
|
||
|
} else {
|
||
|
XDefineCursor(g_display, g_a2_win, None);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
|
||
|
void
|
||
|
handle_keysym(XEvent *xev_in)
|
||
|
{
|
||
|
KeySym keysym;
|
||
|
word32 state;
|
||
|
int keycode;
|
||
|
int a2code;
|
||
|
int type;
|
||
|
int is_up;
|
||
|
|
||
|
keycode = xev_in->xkey.keycode;
|
||
|
type = xev_in->xkey.type;
|
||
|
|
||
|
keysym = XLookupKeysym(&(xev_in->xkey), 0);
|
||
|
|
||
|
state = xev_in->xkey.state;
|
||
|
|
||
|
vid_printf("keycode: %d, type: %d, state:%d, sym: %08x\n",
|
||
|
keycode, type, state, (word32)keysym);
|
||
|
|
||
|
x_update_modifier_state(state);
|
||
|
|
||
|
is_up = 0;
|
||
|
if(type == KeyRelease) {
|
||
|
is_up = 1;
|
||
|
}
|
||
|
|
||
|
#if 0
|
||
|
if(keysym == XK_Alt_L || keysym == XK_Meta_L) {
|
||
|
g_alt_left_up = is_up;
|
||
|
}
|
||
|
|
||
|
if(keysym == XK_Alt_R || keysym == XK_Meta_R) {
|
||
|
g_alt_right_up = is_up;
|
||
|
}
|
||
|
|
||
|
if(g_alt_left_up == 0 && g_alt_right_up == 0) {
|
||
|
printf("Sending sound to file\n");
|
||
|
g_send_sound_to_file = 1;
|
||
|
} else {
|
||
|
if(g_send_sound_to_file) {
|
||
|
printf("Stopping sending sound to file\n");
|
||
|
close_sound_file();
|
||
|
}
|
||
|
g_send_sound_to_file = 0;
|
||
|
}
|
||
|
#endif
|
||
|
|
||
|
/* first, do conversions */
|
||
|
switch(keysym) {
|
||
|
case XK_Alt_R:
|
||
|
case XK_Meta_R:
|
||
|
case XK_Super_R:
|
||
|
case XK_Mode_switch:
|
||
|
case XK_Cancel:
|
||
|
keysym = XK_Print; /* option */
|
||
|
break;
|
||
|
case XK_Alt_L:
|
||
|
case XK_Meta_L:
|
||
|
case XK_Super_L:
|
||
|
case XK_Menu:
|
||
|
keysym = XK_Scroll_Lock; /* cmd */
|
||
|
break;
|
||
|
case 0x1000003:
|
||
|
if(keycode == 0x3c) {
|
||
|
/* enter key on Mac OS X laptop--make it option */
|
||
|
keysym = XK_Print;
|
||
|
}
|
||
|
break;
|
||
|
case NoSymbol:
|
||
|
switch(keycode) {
|
||
|
/* 94-95 are for my PC101 kbd + windows keys on HPUX */
|
||
|
case 0x0095:
|
||
|
/* left windows key = option */
|
||
|
keysym = XK_Print;
|
||
|
break;
|
||
|
case 0x0096:
|
||
|
case 0x0094:
|
||
|
/* right windows key = cmd */
|
||
|
keysym = XK_Scroll_Lock;
|
||
|
break;
|
||
|
/* 0072 is for cra@WPI.EDU who says it's Break under XFree86 */
|
||
|
case 0x0072:
|
||
|
/* 006e is break according to mic@research.nj.nec.com */
|
||
|
case 0x006e:
|
||
|
keysym = XK_Break;
|
||
|
break;
|
||
|
|
||
|
/* 0x0042, 0x0046, and 0x0048 are the windows keys according */
|
||
|
/* to Geoff Weiss on Solaris x86 */
|
||
|
case 0x0042:
|
||
|
case 0x0046:
|
||
|
/* flying windows == open apple */
|
||
|
keysym = XK_Scroll_Lock;
|
||
|
break;
|
||
|
case 0x0048:
|
||
|
case 0x0076: /* Windows menu key on Mac OS X */
|
||
|
/* menu windows == option */
|
||
|
keysym = XK_Print;
|
||
|
break;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
a2code = x_keysym_to_a2code(keysym, is_up);
|
||
|
if(a2code >= 0) {
|
||
|
adb_physical_key_update(a2code, is_up);
|
||
|
} else if(a2code != -2) {
|
||
|
printf("Keysym: %04x of keycode: %02x unknown\n",
|
||
|
(word32)keysym, keycode);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
int
|
||
|
x_keysym_to_a2code(int keysym, int is_up)
|
||
|
{
|
||
|
int i;
|
||
|
|
||
|
if(keysym == 0) {
|
||
|
return -1;
|
||
|
}
|
||
|
|
||
|
if((keysym == XK_Shift_L) || (keysym == XK_Shift_R)) {
|
||
|
if(is_up) {
|
||
|
g_x_shift_control_state &= ~ShiftMask;
|
||
|
} else {
|
||
|
g_x_shift_control_state |= ShiftMask;
|
||
|
}
|
||
|
}
|
||
|
if(keysym == XK_Caps_Lock) {
|
||
|
if(is_up) {
|
||
|
g_x_shift_control_state &= ~LockMask;
|
||
|
} else {
|
||
|
g_x_shift_control_state |= LockMask;
|
||
|
}
|
||
|
}
|
||
|
if((keysym == XK_Control_L) || (keysym == XK_Control_R)) {
|
||
|
if(is_up) {
|
||
|
g_x_shift_control_state &= ~ControlMask;
|
||
|
} else {
|
||
|
g_x_shift_control_state |= ControlMask;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
/* Look up Apple 2 keycode */
|
||
|
for(i = g_num_a2_keycodes - 1; i >= 0; i--) {
|
||
|
if((keysym == a2_key_to_xsym[i][1]) ||
|
||
|
(keysym == a2_key_to_xsym[i][2])) {
|
||
|
|
||
|
vid_printf("Found keysym:%04x = a[%d] = %04x or %04x\n",
|
||
|
(int)keysym, i, a2_key_to_xsym[i][1],
|
||
|
a2_key_to_xsym[i][2]);
|
||
|
|
||
|
return a2_key_to_xsym[i][0];
|
||
|
}
|
||
|
}
|
||
|
|
||
|
return -1;
|
||
|
}
|
||
|
|
||
|
void
|
||
|
x_update_modifier_state(int state)
|
||
|
{
|
||
|
int state_xor;
|
||
|
int is_up;
|
||
|
|
||
|
state = state & (ControlMask | LockMask | ShiftMask);
|
||
|
state_xor = g_x_shift_control_state ^ state;
|
||
|
is_up = 0;
|
||
|
if(state_xor & ControlMask) {
|
||
|
is_up = ((state & ControlMask) == 0);
|
||
|
adb_physical_key_update(0x36, is_up);
|
||
|
}
|
||
|
if(state_xor & LockMask) {
|
||
|
is_up = ((state & LockMask) == 0);
|
||
|
adb_physical_key_update(0x39, is_up);
|
||
|
}
|
||
|
if(state_xor & ShiftMask) {
|
||
|
is_up = ((state & ShiftMask) == 0);
|
||
|
adb_physical_key_update(0x38, is_up);
|
||
|
}
|
||
|
|
||
|
g_x_shift_control_state = state;
|
||
|
}
|
||
|
|
||
|
void
|
||
|
x_auto_repeat_on(int must)
|
||
|
{
|
||
|
if((g_auto_repeat_on <= 0) || must) {
|
||
|
g_auto_repeat_on = 1;
|
||
|
XAutoRepeatOn(g_display);
|
||
|
XFlush(g_display);
|
||
|
adb_kbd_repeat_off();
|
||
|
}
|
||
|
}
|
||
|
|
||
|
void
|
||
|
x_auto_repeat_off(int must)
|
||
|
{
|
||
|
if((g_auto_repeat_on != 0) || must) {
|
||
|
XAutoRepeatOff(g_display);
|
||
|
XFlush(g_display);
|
||
|
g_auto_repeat_on = 0;
|
||
|
adb_kbd_repeat_off();
|
||
|
}
|
||
|
}
|
||
|
|
||
|
void
|
||
|
x_full_screen(int do_full)
|
||
|
{
|
||
|
return;
|
||
|
}
|