--- sourceforge.net/trunk/rdesktop/xwin.c 2000/07/25 12:34:29 9 +++ sourceforge.net/trunk/rdesktop/xwin.c 2002/09/11 11:11:27 116 @@ -1,198 +1,757 @@ /* rdesktop: A Remote Desktop Protocol client. - User interface services - X-Windows - Copyright (C) Matthew Chapman 1999-2000 - + User interface services - X Window System + Copyright (C) Matthew Chapman 1999-2001 + This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. - + This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. - + You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ -#include "includes.h" +#include +#include +#include +#include +#define XK_MISCELLANY +#include +#include "rdesktop.h" +#include "scancodes.h" + +extern int width; +extern int height; +extern BOOL sendmotion; +extern BOOL fullscreen; +extern BOOL grab_keyboard; +extern char title[]; + +Display *display = NULL; +static int x_socket; +static Window wnd; +static GC gc; +static Visual *visual; +static int depth; +static int bpp; +static int dpy_width; +static int dpy_height; + +/* endianness */ +static BOOL host_be; +static BOOL xserver_be; + +/* software backing store */ +static BOOL ownbackstore; +static Pixmap backstore; + +#define FILL_RECTANGLE(x,y,cx,cy)\ +{ \ + XFillRectangle(display, wnd, gc, x, y, cx, cy); \ + if (ownbackstore) \ + XFillRectangle(display, backstore, gc, x, y, cx, cy); \ +} + +/* colour maps */ +static BOOL owncolmap; +static Colormap xcolmap; +static uint32 white; +static uint32 *colmap; +static XIM IM = NULL; +static XIC IC = NULL; + +/* Compose support */ +BOOL enable_compose = False; + +/* toggle fullscreen globals */ +static XSetWindowAttributes attribs; +static unsigned long input_mask; + +#define TRANSLATE(col) ( owncolmap ? col : translate_colour(colmap[col]) ) +#define SET_FOREGROUND(col) XSetForeground(display, gc, TRANSLATE(col)); +#define SET_BACKGROUND(col) XSetBackground(display, gc, TRANSLATE(col)); -HWINDOW ui_create_window(HCONN conn, int width, int height) +static int rop2_map[] = { + GXclear, /* 0 */ + GXnor, /* DPon */ + GXandInverted, /* DPna */ + GXcopyInverted, /* Pn */ + GXandReverse, /* PDna */ + GXinvert, /* Dn */ + GXxor, /* DPx */ + GXnand, /* DPan */ + GXand, /* DPa */ + GXequiv, /* DPxn */ + GXnoop, /* D */ + GXorInverted, /* DPno */ + GXcopy, /* P */ + GXorReverse, /* PDno */ + GXor, /* DPo */ + GXset /* 1 */ +}; + +#define SET_FUNCTION(rop2) { if (rop2 != ROP2_COPY) XSetFunction(display, gc, rop2_map[rop2]); } +#define RESET_FUNCTION(rop2) { if (rop2 != ROP2_COPY) XSetFunction(display, gc, GXcopy); } + +static void +translate8(uint8 * data, uint8 * out, uint8 * end) { - struct window *wnd; - XSetWindowAttributes attribs; - Display *display; - Visual *visual; - Window window; - int black; - GC gc; + while (out < end) + *(out++) = (uint8) colmap[*(data++)]; +} - display = XOpenDisplay(NULL); - if (display == NULL) - return NULL; +static void +translate16(uint8 * data, uint16 * out, uint16 * end) +{ + while (out < end) + *(out++) = (uint16) colmap[*(data++)]; +} + +/* little endian - conversion happens when colourmap is built */ +static void +translate24(uint8 * data, uint8 * out, uint8 * end) +{ + uint32 value; + + while (out < end) + { + value = colmap[*(data++)]; + *(out++) = value; + *(out++) = value >> 8; + *(out++) = value >> 16; + } +} - visual = DefaultVisual(display, DefaultScreen(display)); - black = BlackPixel(display, DefaultScreen(display)); +static void +translate32(uint8 * data, uint32 * out, uint32 * end) +{ + while (out < end) + *(out++) = colmap[*(data++)]; +} - attribs.background_pixel = black; - attribs.backing_store = Always; - window = XCreateWindow(display, DefaultRootWindow(display), 0, 0, - width, height, 0, 8, InputOutput, visual, - CWBackingStore | CWBackPixel, &attribs); +static uint8 * +translate_image(int width, int height, uint8 * data) +{ + int size = width * height * bpp / 8; + uint8 *out = xmalloc(size); + uint8 *end = out + size; - XStoreName(display, window, "rdesktop"); - XMapWindow(display, window); - XSelectInput(display, window, KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask); - XSync(display, True); + switch (bpp) + { + case 8: + translate8(data, out, end); + break; - gc = XCreateGC(display, window, 0, NULL); + case 16: + translate16(data, (uint16 *) out, (uint16 *) end); + break; - wnd = xmalloc(sizeof(struct window)); - wnd->conn = conn; - wnd->width = width; - wnd->height = height; - wnd->display = display; - wnd->wnd = window; - wnd->gc = gc; - wnd->visual = visual; + case 24: + translate24(data, out, end); + break; - return wnd; + case 32: + translate32(data, (uint32 *) out, (uint32 *) end); + break; + } + + return out; } -void ui_destroy_window(HWINDOW wnd) +#define BSWAP16(x) { x = (((x & 0xff) << 8) | (x >> 8)); } +#define BSWAP24(x) { x = (((x & 0xff) << 16) | (x >> 16) | ((x >> 8) & 0xff00)); } +#define BSWAP32(x) { x = (((x & 0xff00ff) << 8) | ((x >> 8) & 0xff00ff)); \ + x = (x << 16) | (x >> 16); } + +static uint32 +translate_colour(uint32 colour) { - XFreeGC(wnd->display, wnd->gc); - XDestroyWindow(wnd->display, wnd->wnd); - XCloseDisplay(wnd->display); + switch (bpp) + { + case 16: + if (host_be != xserver_be) + BSWAP16(colour); + break; + + case 24: + if (xserver_be) + BSWAP24(colour); + break; + + case 32: + if (host_be != xserver_be) + BSWAP32(colour); + break; + } + + return colour; } -static uint8 xwin_translate_key(unsigned long key) +static unsigned long +init_inputmethod(void) { - DEBUG("KEY(code=0x%lx)\n", key); + unsigned long filtered_events = 0; - if ((key > 8) && (key <= 0x60)) - return (key - 8); + IM = XOpenIM(display, NULL, NULL, NULL); + if (IM == NULL) + { + error("Failed to open input method\n"); + } - switch (key) + if (IM != NULL) { - case 0x62: /* left arrow */ - return 0x48; - case 0x64: /* up arrow */ - return 0x4b; - case 0x66: /* down arrow */ - return 0x4d; - case 0x68: /* right arrow */ - return 0x50; - case 0x73: /* Windows key */ - DEBUG("CHECKPOINT\n"); + /* Must be done after XCreateWindow */ + IC = XCreateIC(IM, XNInputStyle, + (XIMPreeditNothing | XIMStatusNothing), + XNClientWindow, wnd, XNFocusWindow, wnd, NULL); + + if (IC == NULL) + { + error("Failed to create input context\n"); + XCloseIM(IM); + IM = NULL; + } } - return 0; + /* For correct Multi_key/Compose processing, I guess. + It seems to work alright anyway, though. */ + if (IC != NULL) + { + if (XGetICValues(IC, XNFilterEvents, &filtered_events, NULL) != NULL) + { + error("Failed to obtain XNFilterEvents value from IC\n"); + filtered_events = 0; + } + } + return filtered_events; } -static uint16 xwin_translate_mouse(unsigned long button) +static void +close_inputmethod(void) { - switch (button) + if (IC != NULL) { - case Button1: /* left */ - return MOUSE_FLAG_BUTTON1; - case Button2: /* middle */ - return MOUSE_FLAG_BUTTON3; - case Button3: /* right */ - return MOUSE_FLAG_BUTTON2; + XDestroyIC(IC); + if (IM != NULL) + { + XCloseIM(IM); + IM = NULL; + } } +} - return 0; +static BOOL +get_key_state(int keysym) +{ + int keysymMask = 0, modifierpos, key; + Window wDummy1, wDummy2; + int iDummy3, iDummy4, iDummy5, iDummy6; + unsigned int current_state; + int offset; + + XModifierKeymap *map = XGetModifierMapping(display); + KeyCode keycode = XKeysymToKeycode(display, keysym); + + if (keycode == NoSymbol) + return False; + + for (modifierpos = 0; modifierpos < 8; modifierpos++) + { + offset = map->max_keypermod * modifierpos; + + for (key = 0; key < map->max_keypermod; key++) + { + if (map->modifiermap[offset + key] == keycode) + keysymMask = 1 << modifierpos; + } + } + + XQueryPointer(display, DefaultRootWindow(display), &wDummy1, + &wDummy2, &iDummy3, &iDummy4, &iDummy5, &iDummy6, ¤t_state); + + XFreeModifiermap(map); + + return (current_state & keysymMask) ? True : False; } -void ui_process_events(HWINDOW wnd, HCONN conn) + +BOOL +ui_init() { - XEvent event; - uint8 scancode; - uint16 button; + Screen *screen; + display = XOpenDisplay(NULL); + if (display == NULL) + { + error("Failed to open display\n"); + return False; + } + if (fullscreen) + { + screen = DefaultScreenOfDisplay(display); + width = WidthOfScreen(screen); + height = HeightOfScreen(screen); + } + return True; +} - if (wnd == NULL) - return; +void +ui_create_window_obj(int xpos, int ypos, int width, int height, int valuemask) +{ + XClassHint *classhints; + XSizeHints *sizehints; + XEvent xevent; + Screen *screen; + + screen = DefaultScreenOfDisplay(display); + + wnd = XCreateWindow(display, RootWindowOfScreen(screen), xpos, + ypos, width, height, 0, CopyFromParent, + InputOutput, CopyFromParent, valuemask, &attribs); + + + XStoreName(display, wnd, title); + + classhints = XAllocClassHint(); + if (classhints != NULL) + { + classhints->res_name = classhints->res_class = "rdesktop"; + XSetClassHint(display, wnd, classhints); + XFree(classhints); + } + + sizehints = XAllocSizeHints(); + if (sizehints) + { + sizehints->flags = PMinSize | PMaxSize; + sizehints->min_width = sizehints->max_width = width; + sizehints->min_height = sizehints->max_height = height; + XSetWMNormalHints(display, wnd, sizehints); + XFree(sizehints); + } + + if (enable_compose) + input_mask |= init_inputmethod(); + + XSelectInput(display, wnd, input_mask); + + gc = XCreateGC(display, wnd, 0, NULL); + + XMapWindow(display, wnd); + + /* Wait for VisibilityNotify Event */ + for (;;) + { + XNextEvent(display, &xevent); + if (xevent.type == VisibilityNotify) + break; + } + + if (ownbackstore) + backstore = XCreatePixmap(display, wnd, width, height, depth); + + /* clear the window so that cached data is not viewed upon start... */ + XSetBackground(display, gc, 0); + XSetForeground(display, gc, 0); + FILL_RECTANGLE(0, 0, width, height); + /* make sure the window is focused */ + XSetInputFocus(display, wnd, RevertToPointerRoot, CurrentTime); +} + +BOOL +ui_create_window() +{ + XPixmapFormatValues *pfm; + Screen *screen; + uint16 test; + int i; + + x_socket = ConnectionNumber(display); + screen = DefaultScreenOfDisplay(display); + visual = DefaultVisualOfScreen(screen); + depth = DefaultDepthOfScreen(screen); + + pfm = XListPixmapFormats(display, &i); + if (pfm != NULL) + { + /* Use maximum bpp for this depth - this is generally + desirable, e.g. 24 bits->32 bits. */ + while (i--) + { + if ((pfm[i].depth == depth) && (pfm[i].bits_per_pixel > bpp)) + { + bpp = pfm[i].bits_per_pixel; + } + } + XFree(pfm); + } + + if (bpp < 8) + { + error("Less than 8 bpp not currently supported.\n"); + XCloseDisplay(display); + return False; + } + + if (depth <= 8) + owncolmap = True; + else + xcolmap = DefaultColormapOfScreen(screen); + + test = 1; + host_be = !(BOOL) (*(uint8 *) (&test)); + xserver_be = (ImageByteOrder(display) == MSBFirst); + + white = WhitePixelOfScreen(screen); + attribs.background_pixel = BlackPixelOfScreen(screen); + attribs.backing_store = DoesBackingStore(screen); + + if (attribs.backing_store == NotUseful) + ownbackstore = True; + + dpy_width = WidthOfScreen(screen); + dpy_height = HeightOfScreen(screen); - while (XCheckWindowEvent(wnd->display, wnd->wnd, 0xffffffff, &event)) + if (fullscreen) { - switch (event.type) + attribs.override_redirect = True; + width = dpy_width; + height = dpy_height; + } + else + { + attribs.override_redirect = False; + } + + input_mask = KeyPressMask | KeyReleaseMask | ButtonPressMask | ButtonReleaseMask | + VisibilityChangeMask | FocusChangeMask; + + if (grab_keyboard) + input_mask |= EnterWindowMask | LeaveWindowMask; + if (sendmotion) + input_mask |= PointerMotionMask; + + if (ownbackstore) + input_mask |= ExposureMask; + + if (fullscreen) + ui_create_window_obj(0, 0, width, height, + CWBackingStore | CWBackPixel | CWOverrideRedirect); + else + ui_create_window_obj(0, 0, width, height, CWBackingStore | CWBackPixel); + + xkeymap_init2(); + + return True; +} + +void +ui_destroy_window() +{ + if (ownbackstore) + XFreePixmap(display, backstore); + + XFreeGC(display, gc); + + close_inputmethod(); + + XDestroyWindow(display, wnd); + XCloseDisplay(display); + display = NULL; +} + +void +reset_keys() +{ + /* reset keys */ + uint32 ev_time; + ev_time = time(NULL); + rdp_send_scancode(ev_time, RDP_KEYRELEASE, SCANCODE_CHAR_LCTRL); + rdp_send_scancode(ev_time, RDP_KEYRELEASE, SCANCODE_CHAR_LALT); + rdp_send_scancode(ev_time, RDP_KEYRELEASE, SCANCODE_CHAR_LSHIFT); + rdp_send_scancode(ev_time, RDP_KEYRELEASE, SCANCODE_CHAR_RCTRL); + rdp_send_scancode(ev_time, RDP_KEYRELEASE, SCANCODE_CHAR_RALT); + rdp_send_scancode(ev_time, RDP_KEYRELEASE, SCANCODE_CHAR_RSHIFT); +} + +void +toggle_fullscreen() +{ + /* save window contents */ + Pixmap pixmap; + pixmap = XCreatePixmap(display, wnd, width, height, depth); + if (ownbackstore) + XCopyArea(display, backstore, pixmap, gc, 0, 0, width, height, 0, 0); + else + XCopyArea(display, wnd, pixmap, gc, 0, 0, width, height, 0, 0); + fullscreen = fullscreen ? False : True; + close_inputmethod(); + if (ownbackstore) + XFreePixmap(display, backstore); + XFreeGC(display, gc); + XDestroyWindow(display, wnd); + if (fullscreen) + { + attribs.override_redirect = True; + ui_create_window_obj(0, 0, dpy_width, dpy_height, + CWBackingStore | CWBackPixel | CWOverrideRedirect); + } + else + { + attribs.override_redirect = False; + ui_create_window_obj(0, 0, width, height, CWBackingStore | CWBackPixel); + } + ui_set_cursor(cache_get_cursor(0)); + ui_move_pointer(width / 2, height / 2); + reset_keys(); + /* restore window contents */ + if (ownbackstore) + XCopyArea(display, pixmap, backstore, gc, 0, 0, width, height, 0, 0); + XCopyArea(display, pixmap, wnd, gc, 0, 0, width, height, 0, 0); + XFreePixmap(display, pixmap); +} + +static void +xwin_process_events() +{ + XEvent xevent; + + KeySym keysym; + uint16 button, flags; + uint32 ev_time; + key_translation tr; + char *ksname = NULL; + char str[256]; + Status status; + + /* Refresh keyboard mapping if it has changed. This is important for + Xvnc, since it allocates keycodes dynamically */ + if (XCheckTypedEvent(display, MappingNotify, &xevent)) + { + if (xevent.xmapping.request == MappingKeyboard + || xevent.xmapping.request == MappingModifier) + XRefreshKeyboardMapping(&xevent.xmapping); + } + + while (XCheckMaskEvent(display, ~0, &xevent)) + { + if (enable_compose && (XFilterEvent(&xevent, None) == True)) + { + DEBUG_KBD(("Filtering event\n")); + continue; + } + + ev_time = time(NULL); + flags = 0; + + switch (xevent.type) { case KeyPress: - scancode = xwin_translate_key(event.xkey.keycode); - if (scancode == 0) + if (IC != NULL) + /* Multi_key compatible version */ + { + XmbLookupString(IC, + (XKeyPressedEvent *) & + xevent, str, sizeof(str), &keysym, &status); + if (!((status == XLookupKeySym) || (status == XLookupBoth))) + { + error("XmbLookupString failed with status 0x%x\n", + status); + break; + } + } + else + { + /* Plain old XLookupString */ + DEBUG_KBD(("No input context, using XLookupString\n")); + XLookupString((XKeyEvent *) & xevent, + str, sizeof(str), &keysym, NULL); + } + + if (keysym == XK_Break) /* toggle full screen */ + { + if (get_key_state(XK_Alt_L) || get_key_state(XK_Alt_R)) + { + toggle_fullscreen(); + break; + } + } + + ksname = get_ksname(keysym); + DEBUG_KBD(("\nKeyPress for (keysym 0x%lx, %s)\n", keysym, ksname)); + + tr = xkeymap_translate_key(keysym, + xevent.xkey.keycode, xevent.xkey.state); + + if (tr.scancode == 0) break; - rdp_send_input(conn, RDP_INPUT_SCANCODE, 0, - scancode, 0); - break; + ensure_remote_modifiers(ev_time, tr); + rdp_send_scancode(ev_time, RDP_KEYPRESS, tr.scancode); + break; case KeyRelease: - scancode = xwin_translate_key(event.xkey.keycode); - if (scancode == 0) + XLookupString((XKeyEvent *) & xevent, str, + sizeof(str), &keysym, NULL); + + ksname = get_ksname(keysym); + DEBUG_KBD(("\nKeyRelease for (keysym 0x%lx, %s)\n", keysym, + ksname)); + + tr = xkeymap_translate_key(keysym, + xevent.xkey.keycode, xevent.xkey.state); + + if (tr.scancode == 0) break; - rdp_send_input(conn, RDP_INPUT_SCANCODE, - KBD_FLAG_DOWN | KBD_FLAG_UP, - scancode, 0); + rdp_send_scancode(ev_time, RDP_KEYRELEASE, tr.scancode); break; case ButtonPress: - button = xwin_translate_mouse(event.xbutton.button); + flags = MOUSE_FLAG_DOWN; + /* fall through */ + case ButtonRelease: + button = xkeymap_translate_button(xevent.xbutton.button); if (button == 0) break; - rdp_send_input(conn, RDP_INPUT_MOUSE, - button | MOUSE_FLAG_DOWN, - event.xbutton.x, - event.xbutton.y); + rdp_send_input(ev_time, RDP_INPUT_MOUSE, + flags | button, xevent.xbutton.x, xevent.xbutton.y); break; - case ButtonRelease: - button = xwin_translate_mouse(event.xbutton.button); - if (button == 0) - break; + case MotionNotify: + rdp_send_input(ev_time, RDP_INPUT_MOUSE, + MOUSE_FLAG_MOVE, xevent.xmotion.x, xevent.xmotion.y); + break; + + case FocusIn: + /* fall through */ + case EnterNotify: + if (grab_keyboard) + XGrabKeyboard(display, wnd, True, + GrabModeAsync, GrabModeAsync, CurrentTime); + break; + + case FocusOut: + reset_keys(); + /* fall through */ + case LeaveNotify: + if (grab_keyboard) + XUngrabKeyboard(display, CurrentTime); + break; + + case Expose: + XCopyArea(display, backstore, wnd, gc, + xevent.xexpose.x, xevent.xexpose.y, + xevent.xexpose.width, + xevent.xexpose.height, + xevent.xexpose.x, xevent.xexpose.y); + break; + } + } +} + +void +ui_select(int rdp_socket) +{ + int n = (rdp_socket > x_socket) ? rdp_socket + 1 : x_socket + 1; + fd_set rfds; + + FD_ZERO(&rfds); + + while (True) + { + FD_ZERO(&rfds); + FD_SET(rdp_socket, &rfds); + if (display != NULL) + { + FD_SET(x_socket, &rfds); + XFlush(display); + } + + switch (select(n, &rfds, NULL, NULL, NULL)) + { + case -1: + error("select: %s\n", strerror(errno)); - rdp_send_input(conn, RDP_INPUT_MOUSE, - button, - event.xbutton.x, - event.xbutton.y); + case 0: + continue; } + + if (FD_ISSET(x_socket, &rfds)) + xwin_process_events(); + + if (FD_ISSET(rdp_socket, &rfds)) + return; } } -void ui_move_pointer(HWINDOW wnd, int x, int y) +void +ui_move_pointer(int x, int y) { - XWarpPointer(wnd->display, wnd->wnd, wnd->wnd, 0, 0, 0, 0, x, y); + XWarpPointer(display, wnd, wnd, 0, 0, 0, 0, x, y); } -HBITMAP ui_create_bitmap(HWINDOW wnd, int width, int height, uint8 *data) +HBITMAP +ui_create_bitmap(int width, int height, uint8 * data) { XImage *image; Pixmap bitmap; + uint8 *tdata; - bitmap = XCreatePixmap(wnd->display, wnd->wnd, width, height, 8); + tdata = (owncolmap ? data : translate_image(width, height, data)); + bitmap = XCreatePixmap(display, wnd, width, height, depth); + image = XCreateImage(display, visual, depth, ZPixmap, 0, + (char *) tdata, width, height, 8, 0); + + XPutImage(display, bitmap, gc, image, 0, 0, 0, 0, width, height); - image = XCreateImage(wnd->display, wnd->visual, 8, ZPixmap, 0, - data, width, height, 8, width); - XSetFunction(wnd->display, wnd->gc, GXcopy); - XPutImage(wnd->display, bitmap, wnd->gc, image, 0, 0, 0, 0, - width, height); XFree(image); - - return (HBITMAP)bitmap; + if (!owncolmap) + xfree(tdata); + return (HBITMAP) bitmap; } -void ui_destroy_bitmap(HWINDOW wnd, HBITMAP bmp) +void +ui_paint_bitmap(int x, int y, int cx, int cy, int width, int height, uint8 * data) { - XFreePixmap(wnd->display, (Pixmap)bmp); + XImage *image; + uint8 *tdata; + + tdata = (owncolmap ? data : translate_image(width, height, data)); + image = XCreateImage(display, visual, depth, ZPixmap, 0, + (char *) tdata, width, height, 8, 0); + + if (ownbackstore) + { + XPutImage(display, backstore, gc, image, 0, 0, x, y, cx, cy); + XCopyArea(display, backstore, wnd, gc, x, y, cx, cy, x, y); + } + else + { + XPutImage(display, wnd, gc, image, 0, 0, x, y, cx, cy); + } + + XFree(image); + if (!owncolmap) + xfree(tdata); } -HGLYPH ui_create_glyph(HWINDOW wnd, int width, int height, uint8 *data) +void +ui_destroy_bitmap(HBITMAP bmp) +{ + XFreePixmap(display, (Pixmap) bmp); +} + +HGLYPH +ui_create_glyph(int width, int height, uint8 * data) { XImage *image; Pixmap bitmap; @@ -201,62 +760,187 @@ scanline = (width + 7) / 8; - bitmap = XCreatePixmap(wnd->display, wnd->wnd, width, height, 1); - gc = XCreateGC(wnd->display, bitmap, 0, NULL); + bitmap = XCreatePixmap(display, wnd, width, height, 1); + gc = XCreateGC(display, bitmap, 0, NULL); + + image = XCreateImage(display, visual, 1, ZPixmap, 0, (char *) data, + width, height, 8, scanline); + image->byte_order = MSBFirst; + image->bitmap_bit_order = MSBFirst; + XInitImage(image); + + XPutImage(display, bitmap, gc, image, 0, 0, 0, 0, width, height); - image = XCreateImage(wnd->display, wnd->visual, 1, ZPixmap, 0, - data, width, height, 8, scanline); - XSetFunction(wnd->display, wnd->gc, GXcopy); - XPutImage(wnd->display, bitmap, gc, image, 0, 0, 0, 0, width, height); XFree(image); - XFreeGC(wnd->display, gc); - - return (HGLYPH)bitmap; + XFreeGC(display, gc); + return (HGLYPH) bitmap; } -void ui_destroy_glyph(HWINDOW wnd, HGLYPH glyph) +void +ui_destroy_glyph(HGLYPH glyph) { - XFreePixmap(wnd->display, (Pixmap)glyph); + XFreePixmap(display, (Pixmap) glyph); } -HCOLOURMAP ui_create_colourmap(HWINDOW wnd, COLOURMAP *colours) +HCURSOR +ui_create_cursor(unsigned int x, unsigned int y, int width, int height, + uint8 * andmask, uint8 * xormask) +{ + HGLYPH maskglyph, cursorglyph; + XColor bg, fg; + Cursor xcursor; + uint8 *cursor, *pcursor; + uint8 *mask, *pmask; + uint8 nextbit; + int scanline, offset; + int i, j; + + scanline = (width + 7) / 8; + offset = scanline * height; + + cursor = xmalloc(offset); + memset(cursor, 0, offset); + + mask = xmalloc(offset); + memset(mask, 0, offset); + + /* approximate AND and XOR masks with a monochrome X pointer */ + for (i = 0; i < height; i++) + { + offset -= scanline; + pcursor = &cursor[offset]; + pmask = &mask[offset]; + + for (j = 0; j < scanline; j++) + { + for (nextbit = 0x80; nextbit != 0; nextbit >>= 1) + { + if (xormask[0] || xormask[1] || xormask[2]) + { + *pcursor |= (~(*andmask) & nextbit); + *pmask |= nextbit; + } + else + { + *pcursor |= ((*andmask) & nextbit); + *pmask |= (~(*andmask) & nextbit); + } + + xormask += 3; + } + + andmask++; + pcursor++; + pmask++; + } + } + + fg.red = fg.blue = fg.green = 0xffff; + bg.red = bg.blue = bg.green = 0x0000; + fg.flags = bg.flags = DoRed | DoBlue | DoGreen; + + cursorglyph = ui_create_glyph(width, height, cursor); + maskglyph = ui_create_glyph(width, height, mask); + + xcursor = + XCreatePixmapCursor(display, (Pixmap) cursorglyph, + (Pixmap) maskglyph, &fg, &bg, x, y); + + ui_destroy_glyph(maskglyph); + ui_destroy_glyph(cursorglyph); + xfree(mask); + xfree(cursor); + return (HCURSOR) xcursor; +} + +void +ui_set_cursor(HCURSOR cursor) +{ + XDefineCursor(display, wnd, (Cursor) cursor); +} + +void +ui_destroy_cursor(HCURSOR cursor) +{ + XFreeCursor(display, (Cursor) cursor); +} + +#define MAKE_XCOLOR(xc,c) \ + (xc)->red = ((c)->red << 8) | (c)->red; \ + (xc)->green = ((c)->green << 8) | (c)->green; \ + (xc)->blue = ((c)->blue << 8) | (c)->blue; \ + (xc)->flags = DoRed | DoGreen | DoBlue; + +HCOLOURMAP +ui_create_colourmap(COLOURMAP * colours) { COLOURENTRY *entry; - XColor *xcolours, *xentry; - Colormap map; int i, ncolours = colours->ncolours; - xcolours = malloc(sizeof(XColor) * ncolours); - for (i = 0; i < ncolours; i++) + if (owncolmap) { - entry = &colours->colours[i]; - xentry = &xcolours[i]; + XColor *xcolours, *xentry; + Colormap map; + + xcolours = xmalloc(sizeof(XColor) * ncolours); + for (i = 0; i < ncolours; i++) + { + entry = &colours->colours[i]; + xentry = &xcolours[i]; + xentry->pixel = i; + MAKE_XCOLOR(xentry, entry); + } + + map = XCreateColormap(display, wnd, visual, AllocAll); + XStoreColors(display, map, xcolours, ncolours); - xentry->pixel = i; - xentry->red = entry->red << 8; - xentry->blue = entry->blue << 8; - xentry->green = entry->green << 8; - xentry->flags = DoRed | DoBlue | DoGreen; + xfree(xcolours); + return (HCOLOURMAP) map; } + else + { + uint32 *map = xmalloc(sizeof(*colmap) * ncolours); + XColor xentry; + uint32 colour; - map = XCreateColormap(wnd->display, wnd->wnd, wnd->visual, AllocAll); - XStoreColors(wnd->display, map, xcolours, ncolours); + for (i = 0; i < ncolours; i++) + { + entry = &colours->colours[i]; + MAKE_XCOLOR(&xentry, entry); - free(xcolours); - return (HCOLOURMAP)map; + if (XAllocColor(display, xcolmap, &xentry) != 0) + colour = xentry.pixel; + else + colour = white; + + /* byte swap here to make translate_image faster */ + map[i] = translate_colour(colour); + } + + return map; + } } -void ui_destroy_colourmap(HWINDOW wnd, HCOLOURMAP map) +void +ui_destroy_colourmap(HCOLOURMAP map) { - XFreeColormap(wnd->display, (Colormap)map); + if (owncolmap) + XFreeColormap(display, (Colormap) map); + else + xfree(map); } -void ui_set_colourmap(HWINDOW wnd, HCOLOURMAP map) +void +ui_set_colourmap(HCOLOURMAP map) { - XSetWindowColormap(wnd->display, wnd->wnd, (Colormap)map); + if (owncolmap) + XSetWindowColormap(display, wnd, (Colormap) map); + else + colmap = map; } -void ui_set_clip(HWINDOW wnd, int x, int y, int cx, int cy) +void +ui_set_clip(int x, int y, int cx, int cy) { XRectangle rect; @@ -264,240 +948,331 @@ rect.y = y; rect.width = cx; rect.height = cy; - XSetClipRectangles(wnd->display, wnd->gc, 0, 0, &rect, 1, YXBanded); + XSetClipRectangles(display, gc, 0, 0, &rect, 1, YXBanded); } -void ui_reset_clip(HWINDOW wnd) +void +ui_reset_clip() { XRectangle rect; rect.x = 0; rect.y = 0; - rect.width = wnd->width; - rect.height = wnd->height; - XSetClipRectangles(wnd->display, wnd->gc, 0, 0, &rect, 1, YXBanded); + rect.width = width; + rect.height = height; + XSetClipRectangles(display, gc, 0, 0, &rect, 1, YXBanded); } -static int rop2_map[] = { - GXclear, /* 0 */ - GXnor, /* DPon */ - GXandInverted, /* DPna */ - GXcopyInverted, /* Pn */ - GXandReverse, /* PDna */ - GXinvert, /* Dn */ - GXxor, /* DPx */ - GXnand, /* DPan */ - GXand, /* DPa */ - GXequiv, /* DPxn */ - GXnoop, /* D */ - GXorInverted, /* DPno */ - GXcopy, /* P */ - GXorReverse, /* PDno */ - GXor, /* DPo */ - GXset /* 1 */ -}; - -static void xwin_set_function(HWINDOW wnd, uint8 rop2) +void +ui_bell() { - XSetFunction(wnd->display, wnd->gc, rop2_map[rop2]); + XBell(display, 0); } -void ui_destblt(HWINDOW wnd, uint8 opcode, - /* dest */ int x, int y, int cx, int cy) +void +ui_destblt(uint8 opcode, + /* dest */ int x, int y, int cx, int cy) { - xwin_set_function(wnd, opcode); - - XFillRectangle(wnd->display, wnd->wnd, wnd->gc, x, y, cx, cy); + SET_FUNCTION(opcode); + FILL_RECTANGLE(x, y, cx, cy); + RESET_FUNCTION(opcode); } -void ui_patblt(HWINDOW wnd, uint8 opcode, - /* dest */ int x, int y, int cx, int cy, - /* brush */ BRUSH *brush, int bgcolour, int fgcolour) +void +ui_patblt(uint8 opcode, + /* dest */ int x, int y, int cx, int cy, + /* brush */ BRUSH * brush, int bgcolour, int fgcolour) { - Display *dpy = wnd->display; - GC gc = wnd->gc; Pixmap fill; + uint8 i, ipattern[8]; - xwin_set_function(wnd, opcode); + SET_FUNCTION(opcode); switch (brush->style) { - case 0: /* Solid */ - XSetForeground(dpy, gc, fgcolour); - XFillRectangle(dpy, wnd->wnd, gc, x, y, cx, cy); + case 0: /* Solid */ + SET_FOREGROUND(fgcolour); + FILL_RECTANGLE(x, y, cx, cy); break; - case 3: /* Pattern */ - fill = (Pixmap)ui_create_glyph(wnd, 8, 8, brush->pattern); - - XSetForeground(dpy, gc, fgcolour); - XSetBackground(dpy, gc, bgcolour); - XSetFillStyle(dpy, gc, FillOpaqueStippled); - XSetStipple(dpy, gc, fill); - - XFillRectangle(dpy, wnd->wnd, gc, x, y, cx, cy); - - XSetFillStyle(dpy, gc, FillSolid); - ui_destroy_glyph(wnd, (HGLYPH)fill); + case 3: /* Pattern */ + for (i = 0; i != 8; i++) + ipattern[7 - i] = brush->pattern[i]; + fill = (Pixmap) ui_create_glyph(8, 8, ipattern); + + SET_FOREGROUND(bgcolour); + SET_BACKGROUND(fgcolour); + XSetFillStyle(display, gc, FillOpaqueStippled); + XSetStipple(display, gc, fill); + XSetTSOrigin(display, gc, brush->xorigin, brush->yorigin); + + FILL_RECTANGLE(x, y, cx, cy); + + XSetFillStyle(display, gc, FillSolid); + XSetTSOrigin(display, gc, 0, 0); + ui_destroy_glyph((HGLYPH) fill); break; default: - NOTIMP("brush style %d\n", brush->style); + unimpl("brush %d\n", brush->style); } -} -void ui_screenblt(HWINDOW wnd, uint8 opcode, - /* dest */ int x, int y, int cx, int cy, - /* src */ int srcx, int srcy) -{ - xwin_set_function(wnd, opcode); - - XCopyArea(wnd->display, wnd->wnd, wnd->wnd, wnd->gc, srcx, srcy, - cx, cy, x, y); + RESET_FUNCTION(opcode); } -void ui_memblt(HWINDOW wnd, uint8 opcode, - /* dest */ int x, int y, int cx, int cy, - /* src */ HBITMAP src, int srcx, int srcy) -{ - xwin_set_function(wnd, opcode); - - XCopyArea(wnd->display, (Pixmap)src, wnd->wnd, wnd->gc, srcx, srcy, - cx, cy, x, y); -} - -void ui_triblt(HWINDOW wnd, uint8 opcode, - /* dest */ int x, int y, int cx, int cy, - /* src */ HBITMAP src, int srcx, int srcy, - /* brush */ BRUSH *brush, int bgcolour, int fgcolour) +void +ui_screenblt(uint8 opcode, + /* dest */ int x, int y, int cx, int cy, + /* src */ int srcx, int srcy) +{ + SET_FUNCTION(opcode); + XCopyArea(display, wnd, wnd, gc, srcx, srcy, cx, cy, x, y); + if (ownbackstore) + XCopyArea(display, backstore, backstore, gc, srcx, srcy, cx, cy, x, y); + RESET_FUNCTION(opcode); +} + +void +ui_memblt(uint8 opcode, + /* dest */ int x, int y, int cx, int cy, + /* src */ HBITMAP src, int srcx, int srcy) +{ + SET_FUNCTION(opcode); + XCopyArea(display, (Pixmap) src, wnd, gc, srcx, srcy, cx, cy, x, y); + if (ownbackstore) + XCopyArea(display, (Pixmap) src, backstore, gc, srcx, srcy, cx, cy, x, y); + RESET_FUNCTION(opcode); +} + +void +ui_triblt(uint8 opcode, + /* dest */ int x, int y, int cx, int cy, + /* src */ HBITMAP src, int srcx, int srcy, + /* brush */ BRUSH * brush, int bgcolour, int fgcolour) { /* This is potentially difficult to do in general. Until someone - comes up with an efficient way of doing that I am using cases. */ + comes up with a more efficient way of doing it I am using cases. */ switch (opcode) { - case 0xb8: /* PSDPxax */ - ui_patblt(wnd, ROP2_XOR, x, y, cx, cy, - brush, bgcolour, fgcolour); - ui_memblt(wnd, ROP2_AND, x, y, cx, cy, - src, srcx, srcy); - ui_patblt(wnd, ROP2_XOR, x, y, cx, cy, - brush, bgcolour, fgcolour); + case 0x69: /* PDSxxn */ + ui_memblt(ROP2_XOR, x, y, cx, cy, src, srcx, srcy); + ui_patblt(ROP2_NXOR, x, y, cx, cy, brush, bgcolour, fgcolour); break; - default: - NOTIMP("triblt opcode 0x%x\n", opcode); - ui_memblt(wnd, ROP2_COPY, x, y, cx, cy, - brush, bgcolour, fgcolour); - } -} - -void ui_line(HWINDOW wnd, uint8 opcode, - /* dest */ int startx, int starty, int endx, int endy, - /* pen */ PEN *pen) -{ - xwin_set_function(wnd, opcode); - - XSetForeground(wnd->display, wnd->gc, pen->colour); - XDrawLine(wnd->display, wnd->wnd, wnd->gc, startx, starty, endx, endy); -} - -void ui_rect(HWINDOW wnd, - /* dest */ int x, int y, int cx, int cy, - /* brush */ int colour) -{ - xwin_set_function(wnd, ROP2_COPY); - - XSetForeground(wnd->display, wnd->gc, colour); - XFillRectangle(wnd->display, wnd->wnd, wnd->gc, x, y, cx, cy); -} - -void ui_draw_glyph(HWINDOW wnd, int mixmode, - /* dest */ int x, int y, int cx, int cy, - /* src */ HGLYPH glyph, int srcx, int srcy, int bgcolour, int fgcolour) -{ - Pixmap pixmap = (Pixmap)glyph; - - xwin_set_function(wnd, ROP2_COPY); - - XSetForeground(wnd->display, wnd->gc, fgcolour); - - switch (mixmode) - { - case MIX_TRANSPARENT: - XSetStipple(wnd->display, wnd->gc, pixmap); - XSetFillStyle(wnd->display, wnd->gc, FillStippled); - XSetTSOrigin(wnd->display, wnd->gc, x, y); - XFillRectangle(wnd->display, wnd->wnd, wnd->gc, - x, y, cx, cy); - XSetFillStyle(wnd->display, wnd->gc, FillSolid); + case 0xb8: /* PSDPxax */ + ui_patblt(ROP2_XOR, x, y, cx, cy, brush, bgcolour, fgcolour); + ui_memblt(ROP2_AND, x, y, cx, cy, src, srcx, srcy); + ui_patblt(ROP2_XOR, x, y, cx, cy, brush, bgcolour, fgcolour); break; - case MIX_OPAQUE: - XSetBackground(wnd->display, wnd->gc, bgcolour); - XCopyPlane(wnd->display, pixmap, wnd->wnd, wnd->gc, - srcx, srcy, cx, cy, x, y, 1); + case 0xc0: /* PSa */ + ui_memblt(ROP2_COPY, x, y, cx, cy, src, srcx, srcy); + ui_patblt(ROP2_AND, x, y, cx, cy, brush, bgcolour, fgcolour); break; default: - NOTIMP("mix mode %d\n", mixmode); + unimpl("triblt 0x%x\n", opcode); + ui_memblt(ROP2_COPY, x, y, cx, cy, src, srcx, srcy); } } -void ui_draw_text(HWINDOW wnd, uint8 font, uint8 flags, int mixmode, int x, - int y, int boxx, int boxy, int boxcx, int boxcy, - int bgcolour, int fgcolour, uint8 *text, uint8 length) -{ - FONT_GLYPH *glyph; - int i; +void +ui_line(uint8 opcode, + /* dest */ int startx, int starty, int endx, int endy, + /* pen */ PEN * pen) +{ + SET_FUNCTION(opcode); + SET_FOREGROUND(pen->colour); + XDrawLine(display, wnd, gc, startx, starty, endx, endy); + if (ownbackstore) + XDrawLine(display, backstore, gc, startx, starty, endx, endy); + RESET_FUNCTION(opcode); +} + +void +ui_rect( + /* dest */ int x, int y, int cx, int cy, + /* brush */ int colour) +{ + SET_FOREGROUND(colour); + FILL_RECTANGLE(x, y, cx, cy); +} + +void +ui_draw_glyph(int mixmode, + /* dest */ int x, int y, int cx, int cy, + /* src */ HGLYPH glyph, int srcx, int srcy, + int bgcolour, int fgcolour) +{ + SET_FOREGROUND(fgcolour); + SET_BACKGROUND(bgcolour); + + XSetFillStyle(display, gc, + (mixmode == MIX_TRANSPARENT) ? FillStippled : FillOpaqueStippled); + XSetStipple(display, gc, (Pixmap) glyph); + XSetTSOrigin(display, gc, x, y); + + FILL_RECTANGLE(x, y, cx, cy); + + XSetFillStyle(display, gc, FillSolid); +} + +#define DO_GLYPH(ttext,idx) \ +{\ + glyph = cache_get_font (font, ttext[idx]);\ + if (!(flags & TEXT2_IMPLICIT_X))\ + {\ + xyoffset = ttext[++idx];\ + if ((xyoffset & 0x80))\ + {\ + if (flags & TEXT2_VERTICAL) \ + y += ttext[idx+1] | (ttext[idx+2] << 8);\ + else\ + x += ttext[idx+1] | (ttext[idx+2] << 8);\ + idx += 2;\ + }\ + else\ + {\ + if (flags & TEXT2_VERTICAL) \ + y += xyoffset;\ + else\ + x += xyoffset;\ + }\ + }\ + if (glyph != NULL)\ + {\ + ui_draw_glyph (mixmode, x + (short) glyph->offset,\ + y + (short) glyph->baseline,\ + glyph->width, glyph->height,\ + glyph->pixmap, 0, 0, bgcolour, fgcolour);\ + if (flags & TEXT2_IMPLICIT_X)\ + x += glyph->width;\ + }\ +} + +void +ui_draw_text(uint8 font, uint8 flags, int mixmode, int x, int y, + int clipx, int clipy, int clipcx, int clipcy, + int boxx, int boxy, int boxcx, int boxcy, int bgcolour, + int fgcolour, uint8 * text, uint8 length) +{ + FONTGLYPH *glyph; + int i, j, xyoffset; + DATABLOB *entry; + + SET_FOREGROUND(bgcolour); if (boxcx > 1) { - ui_rect(wnd, boxx, boxy, boxcx, boxcy, bgcolour); + FILL_RECTANGLE(boxx, boxy, boxcx, boxcy); + } + else if (mixmode == MIX_OPAQUE) + { + FILL_RECTANGLE(clipx, clipy, clipcx, clipcy); } /* Paint text, character by character */ - for (i = 0; i < length; i++) + for (i = 0; i < length;) { - glyph = cache_get_font(wnd->conn, font, text[i]); - - if (glyph != NULL) + switch (text[i]) { - ui_draw_glyph(wnd, mixmode, x, - y + (short)glyph->baseline, - glyph->width, glyph->height, - glyph->pixmap, 0, 0, - bgcolour, fgcolour); + case 0xff: + if (i + 2 < length) + cache_put_text(text[i + 1], text, text[i + 2]); + else + { + error("this shouldn't be happening\n"); + break; + } + /* this will move pointer from start to first character after FF command */ + length -= i + 3; + text = &(text[i + 3]); + i = 0; + break; - if (flags & TEXT2_IMPLICIT_X) - x += glyph->width; - else - x += text[++i]; + case 0xfe: + entry = cache_get_text(text[i + 1]); + if (entry != NULL) + { + if ((((uint8 *) (entry->data))[1] == + 0) && (!(flags & TEXT2_IMPLICIT_X))) + { + if (flags & TEXT2_VERTICAL) + y += text[i + 2]; + else + x += text[i + 2]; + } + if (i + 2 < length) + i += 3; + else + i += 2; + length -= i; + /* this will move pointer from start to first character after FE command */ + text = &(text[i]); + i = 0; + for (j = 0; j < entry->size; j++) + DO_GLYPH(((uint8 *) (entry->data)), j); + } + break; + + default: + DO_GLYPH(text, i); + i++; + break; } } + + } -void ui_desktop_save(HWINDOW wnd, uint8 *data, int x, int y, int cx, int cy) +void +ui_desktop_save(uint32 offset, int x, int y, int cx, int cy) { + Pixmap pix; XImage *image; - int scanline; - scanline = (cx + 3) & ~3; - image = XGetImage(wnd->display, wnd->wnd, x, y, cx, cy, - 0xffffffff, ZPixmap); - memcpy(data, image->data, scanline*cy); + if (ownbackstore) + { + image = XGetImage(display, backstore, x, y, cx, cy, AllPlanes, ZPixmap); + } + else + { + pix = XCreatePixmap(display, wnd, cx, cy, depth); + XCopyArea(display, wnd, pix, gc, x, y, cx, cy, 0, 0); + image = XGetImage(display, pix, 0, 0, cx, cy, AllPlanes, ZPixmap); + XFreePixmap(display, pix); + } + + offset *= bpp / 8; + cache_put_desktop(offset, cx, cy, image->bytes_per_line, bpp / 8, (uint8 *) image->data); + XDestroyImage(image); } -void ui_desktop_restore(HWINDOW wnd, uint8 *data, int x, int y, int cx, int cy) +void +ui_desktop_restore(uint32 offset, int x, int y, int cx, int cy) { XImage *image; - int scanline; + uint8 *data; + + offset *= bpp / 8; + data = cache_get_desktop(offset, cx, cy, bpp / 8); + if (data == NULL) + return; + + image = XCreateImage(display, visual, depth, ZPixmap, 0, + (char *) data, cx, cy, BitmapPad(display), cx * bpp / 8); + + if (ownbackstore) + { + XPutImage(display, backstore, gc, image, 0, 0, x, y, cx, cy); + XCopyArea(display, backstore, wnd, gc, x, y, cx, cy, x, y); + } + else + { + XPutImage(display, wnd, gc, image, 0, 0, x, y, cx, cy); + } - scanline = (cx + 3) & ~3; - image = XCreateImage(wnd->display, wnd->visual, 8, ZPixmap, 0, - data, cx, cy, 32, scanline); - XSetFunction(wnd->display, wnd->gc, GXcopy); - XPutImage(wnd->display, wnd->wnd, wnd->gc, image, 0, 0, x, y, cx, cy); XFree(image); }