/[rdesktop]/sourceforge.net/trunk/rdesktop/xwin.c
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /sourceforge.net/trunk/rdesktop/xwin.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 6 by matty, Wed Jul 5 07:44:21 2000 UTC revision 70 by astrand, Sat Jul 27 23:09:32 2002 UTC
# Line 1  Line 1 
1  /*  /*
2     rdesktop: A Remote Desktop Protocol client.     rdesktop: A Remote Desktop Protocol client.
3     User interface services - X-Windows     User interface services - X Window System
4     Copyright (C) Matthew Chapman 1999-2000     Copyright (C) Matthew Chapman 1999-2001
5      
6     This program is free software; you can redistribute it and/or modify     This program is free software; you can redistribute it and/or modify
7     it under the terms of the GNU General Public License as published by     it under the terms of the GNU General Public License as published by
8     the Free Software Foundation; either version 2 of the License, or     the Free Software Foundation; either version 2 of the License, or
9     (at your option) any later version.     (at your option) any later version.
10      
11     This program is distributed in the hope that it will be useful,     This program is distributed in the hope that it will be useful,
12     but WITHOUT ANY WARRANTY; without even the implied warranty of     but WITHOUT ANY WARRANTY; without even the implied warranty of
13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14     GNU General Public License for more details.     GNU General Public License for more details.
15      
16     You should have received a copy of the GNU General Public License     You should have received a copy of the GNU General Public License
17     along with this program; if not, write to the Free Software     along with this program; if not, write to the Free Software
18     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
19  */  */
20    
21  #include "includes.h"  #include <X11/Xlib.h>
22    #include <X11/Xutil.h>
23    #include <time.h>
24    #include <errno.h>
25    #define XK_MISCELLANY
26    #include <X11/keysymdef.h>
27    #include "rdesktop.h"
28    
29    extern int width;
30    extern int height;
31    extern BOOL sendmotion;
32    extern BOOL fullscreen;
33    
34    Display *display = NULL;
35    static int x_socket;
36    static Window wnd;
37    static GC gc;
38    static Visual *visual;
39    static int depth;
40    static int bpp;
41    
42    /* endianness */
43    static BOOL host_be;
44    static BOOL xserver_be;
45    
46    /* software backing store */
47    static BOOL ownbackstore;
48    static Pixmap backstore;
49    
50    #define FILL_RECTANGLE(x,y,cx,cy)\
51    { \
52            XFillRectangle(display, wnd, gc, x, y, cx, cy); \
53            if (ownbackstore) \
54                    XFillRectangle(display, backstore, gc, x, y, cx, cy); \
55    }
56    
57    /* colour maps */
58    static BOOL owncolmap;
59    static Colormap xcolmap;
60    static uint32 white;
61    static uint32 *colmap;
62    static XIM IM = NULL;
63    static XIC IC = NULL;
64    
65    /* Compose support */
66    BOOL enable_compose = False;
67    
68    #define TRANSLATE(col)          ( owncolmap ? col : translate_colour(colmap[col]) )
69    #define SET_FOREGROUND(col)     XSetForeground(display, gc, TRANSLATE(col));
70    #define SET_BACKGROUND(col)     XSetBackground(display, gc, TRANSLATE(col));
71    
72  HWINDOW ui_create_window(int width, int height)  static int rop2_map[] = {
73            GXclear,                /* 0 */
74            GXnor,                  /* DPon */
75            GXandInverted,          /* DPna */
76            GXcopyInverted,         /* Pn */
77            GXandReverse,           /* PDna */
78            GXinvert,               /* Dn */
79            GXxor,                  /* DPx */
80            GXnand,                 /* DPan */
81            GXand,                  /* DPa */
82            GXequiv,                /* DPxn */
83            GXnoop,                 /* D */
84            GXorInverted,           /* DPno */
85            GXcopy,                 /* P */
86            GXorReverse,            /* PDno */
87            GXor,                   /* DPo */
88            GXset                   /* 1 */
89    };
90    
91    #define SET_FUNCTION(rop2)      { if (rop2 != ROP2_COPY) XSetFunction(display, gc, rop2_map[rop2]); }
92    #define RESET_FUNCTION(rop2)    { if (rop2 != ROP2_COPY) XSetFunction(display, gc, GXcopy); }
93    
94    static void
95    translate8(uint8 * data, uint8 * out, uint8 * end)
96  {  {
97          struct window *wnd;          while (out < end)
98          Display *display;                  *(out++) = (uint8) colmap[*(data++)];
99          Window window;  }
100          int black;  
101          GC gc;  static void
102    translate16(uint8 * data, uint16 * out, uint16 * end)
103    {
104            while (out < end)
105                    *(out++) = (uint16) colmap[*(data++)];
106    }
107    
108    /* little endian - conversion happens when colourmap is built */
109    static void
110    translate24(uint8 * data, uint8 * out, uint8 * end)
111    {
112            uint32 value;
113    
114            while (out < end)
115            {
116                    value = colmap[*(data++)];
117                    *(out++) = value;
118                    *(out++) = value >> 8;
119                    *(out++) = value >> 16;
120            }
121    }
122    
123    static void
124    translate32(uint8 * data, uint32 * out, uint32 * end)
125    {
126            while (out < end)
127                    *(out++) = colmap[*(data++)];
128    }
129    
130    static uint8 *
131    translate_image(int width, int height, uint8 * data)
132    {
133            int size = width * height * bpp / 8;
134            uint8 *out = xmalloc(size);
135            uint8 *end = out + size;
136    
137            switch (bpp)
138            {
139                    case 8:
140                            translate8(data, out, end);
141                            break;
142    
143                    case 16:
144                            translate16(data, (uint16 *) out, (uint16 *) end);
145                            break;
146    
147                    case 24:
148                            translate24(data, out, end);
149                            break;
150    
151                    case 32:
152                            translate32(data, (uint32 *) out, (uint32 *) end);
153                            break;
154            }
155    
156            return out;
157    }
158    
159    #define BSWAP16(x) { x = (((x & 0xff) << 8) | (x >> 8)); }
160    #define BSWAP24(x) { x = (((x & 0xff) << 16) | (x >> 16) | ((x >> 8) & 0xff00)); }
161    #define BSWAP32(x) { x = (((x & 0xff00ff) << 8) | ((x >> 8) & 0xff00ff)); \
162                            x = (x << 16) | (x >> 16); }
163    
164    static uint32
165    translate_colour(uint32 colour)
166    {
167            switch (bpp)
168            {
169                    case 16:
170                            if (host_be != xserver_be)
171                                    BSWAP16(colour);
172                            break;
173    
174                    case 24:
175                            if (xserver_be)
176                                    BSWAP24(colour);
177                            break;
178    
179                    case 32:
180                            if (host_be != xserver_be)
181                                    BSWAP32(colour);
182                            break;
183            }
184    
185            return colour;
186    }
187    
188    static unsigned long
189    init_inputmethod(void)
190    {
191            unsigned long filtered_events = 0;
192    
193            IM = XOpenIM(display, NULL, NULL, NULL);
194            if (IM == NULL)
195            {
196                    error("Failed to open input method\n");
197            }
198    
199            if (IM != NULL)
200            {
201                    /* Must be done after XCreateWindow */
202                    IC = XCreateIC(IM, XNInputStyle,
203                                   (XIMPreeditNothing | XIMStatusNothing),
204                                   XNClientWindow, wnd, XNFocusWindow, wnd, NULL);
205    
206                    if (IC == NULL)
207                    {
208                            error("Failed to create input context\n");
209                            XCloseIM(IM);
210                            IM = NULL;
211                    }
212            }
213    
214            /* For correct Multi_key/Compose processing, I guess.
215               It seems to work alright anyway, though. */
216            if (IC != NULL)
217            {
218                    if (XGetICValues(IC, XNFilterEvents, &filtered_events, NULL)
219                        != NULL)
220                    {
221                            error("Failed to obtain XNFilterEvents value from IC\n");
222                            filtered_events = 0;
223                    }
224            }
225            return filtered_events;
226    }
227    
228    static void
229    close_inputmethod(void)
230    {
231            if (IC != NULL)
232            {
233                    XDestroyIC(IC);
234                    if (IM != NULL)
235                    {
236                            XCloseIM(IM);
237                            IM = NULL;
238                    }
239            }
240    }
241    
242    
243    BOOL
244    ui_create_window(char *title)
245    {
246            XSetWindowAttributes attribs;
247            XClassHint *classhints;
248            XSizeHints *sizehints;
249            unsigned long input_mask;
250            XPixmapFormatValues *pfm;
251            Screen *screen;
252            uint16 test;
253            int i;
254    
255          display = XOpenDisplay(NULL);          display = XOpenDisplay(NULL);
256    
257          if (display == NULL)          if (display == NULL)
258                  return NULL;          {
259                    error("Failed to open display\n");
260                    return False;
261            }
262    
263            x_socket = ConnectionNumber(display);
264            screen = DefaultScreenOfDisplay(display);
265            visual = DefaultVisualOfScreen(screen);
266            depth = DefaultDepthOfScreen(screen);
267    
268            pfm = XListPixmapFormats(display, &i);
269            if (pfm != NULL)
270            {
271                    /* Use maximum bpp for this depth - this is generally
272                       desirable, e.g. 24 bits->32 bits. */
273                    while (i--)
274                    {
275                            if ((pfm[i].depth == depth)
276                                && (pfm[i].bits_per_pixel > bpp))
277                            {
278                                    bpp = pfm[i].bits_per_pixel;
279                            }
280                    }
281                    XFree(pfm);
282            }
283    
284            if (bpp < 8)
285            {
286                    error("Less than 8 bpp not currently supported.\n");
287                    XCloseDisplay(display);
288                    return False;
289            }
290    
291            if (depth <= 8)
292                    owncolmap = True;
293            else
294                    xcolmap = DefaultColormapOfScreen(screen);
295    
296            test = 1;
297            host_be = !(BOOL) (*(uint8 *) (&test));
298            xserver_be = (ImageByteOrder(display) == MSBFirst);
299    
300            white = WhitePixelOfScreen(screen);
301            attribs.background_pixel = BlackPixelOfScreen(screen);
302            attribs.backing_store = DoesBackingStore(screen);
303    
304            if (attribs.backing_store == NotUseful)
305                    ownbackstore = True;
306    
307          black = BlackPixel(display, DefaultScreen(display));          if (fullscreen)
308          window = XCreateSimpleWindow(display, DefaultRootWindow(display),          {
309                                  0, 0, width, height, 0, black, black);                  attribs.override_redirect = True;
310                    width = WidthOfScreen(screen);
311                    height = HeightOfScreen(screen);
312            }
313            else
314            {
315                    attribs.override_redirect = False;
316            }
317    
318          XMapWindow(display, window);          width = (width + 3) & ~3;       /* make width a multiple of 32 bits */
         XSync(display, True);  
319    
320          gc = XCreateGC(display, window, 0, NULL);          wnd = XCreateWindow(display, RootWindowOfScreen(screen),
321                                0, 0, width, height, 0, CopyFromParent,
322                                InputOutput, CopyFromParent,
323                                CWBackingStore | CWBackPixel | CWOverrideRedirect,
324                                &attribs);
325    
326          wnd = xmalloc(sizeof(struct window));          XStoreName(display, wnd, title);
327          wnd->display = display;  
328          wnd->wnd = window;          classhints = XAllocClassHint();
329          wnd->gc = gc;          if (classhints != NULL)
330          return wnd;          {
331                    classhints->res_name = classhints->res_class = "rdesktop";
332                    XSetClassHint(display, wnd, classhints);
333                    XFree(classhints);
334            }
335    
336            sizehints = XAllocSizeHints();
337            if (sizehints)
338            {
339                    sizehints->flags = PMinSize | PMaxSize;
340                    sizehints->min_width = sizehints->max_width = width;
341                    sizehints->min_height = sizehints->max_height = height;
342                    XSetWMNormalHints(display, wnd, sizehints);
343                    XFree(sizehints);
344            }
345    
346            xkeymap_init2();
347    
348            input_mask =
349                    KeyPressMask | KeyReleaseMask | ButtonPressMask |
350                    ButtonReleaseMask | EnterWindowMask | LeaveWindowMask;
351            if (sendmotion)
352                    input_mask |= PointerMotionMask;
353    
354            if (ownbackstore)
355                    input_mask |= ExposureMask;
356    
357            if (enable_compose)
358                    input_mask |= init_inputmethod();
359    
360            XSelectInput(display, wnd, input_mask);
361    
362            gc = XCreateGC(display, wnd, 0, NULL);
363    
364            if (ownbackstore)
365                    backstore = XCreatePixmap(display, wnd, width, height, depth);
366    
367            XMapWindow(display, wnd);
368    
369            return True;
370  }  }
371    
372  void ui_destroy_window(HWINDOW wnd)  void
373    ui_destroy_window()
374  {  {
375          XFreeGC(wnd->display, wnd->gc);          if (ownbackstore)
376          XDestroyWindow(wnd->display, wnd->wnd);                  XFreePixmap(display, backstore);
377          XCloseDisplay(wnd->display);  
378            XFreeGC(display, gc);
379    
380            close_inputmethod();
381    
382            XDestroyWindow(display, wnd);
383            XCloseDisplay(display);
384            display = NULL;
385  }  }
386    
387  HBITMAP ui_create_bitmap(HWINDOW wnd, int width, int height, uint8 *data)  static void
388    xwin_process_events()
389    {
390            XEvent xevent;
391    
392            KeySym keysym;
393            uint16 button, flags;
394            uint32 ev_time;
395            key_translation tr;
396            char *ksname = NULL;
397            char str[256];
398            Status status;
399    
400            /* Refresh keyboard mapping if it has changed. This is important for
401               Xvnc, since it allocates keycodes dynamically */
402            if (XCheckTypedEvent(display, MappingNotify, &xevent))
403            {
404                    if (xevent.xmapping.request == MappingKeyboard
405                        || xevent.xmapping.request == MappingModifier)
406                            XRefreshKeyboardMapping(&xevent.xmapping);
407            }
408    
409            while (XCheckMaskEvent(display, ~0, &xevent))
410            {
411                    if (enable_compose && (XFilterEvent(&xevent, None) == True))
412                    {
413                            DEBUG_KBD("Filtering event\n");
414                            continue;
415                    }
416    
417                    ev_time = time(NULL);
418                    flags = 0;
419    
420                    switch (xevent.type)
421                    {
422                            case KeyPress:
423                                    if (IC != NULL)
424                                            /* Multi_key compatible version */
425                                    {
426                                            XmbLookupString(IC,
427                                                            (XKeyPressedEvent *) &
428                                                            xevent, str,
429                                                            sizeof(str), &keysym,
430                                                            &status);
431                                            if (!
432                                                ((status == XLookupKeySym)
433                                                 || (status == XLookupBoth)))
434                                            {
435                                                    error("XmbLookupString failed with status 0x%x\n", status);
436                                                    break;
437                                            }
438                                    }
439                                    else
440                                    {
441                                            /* Plain old XLookupString */
442                                            DEBUG_KBD
443                                                    ("No input context, using XLookupString\n");
444                                            XLookupString((XKeyEvent *) & xevent,
445                                                          str, sizeof(str),
446                                                          &keysym, NULL);
447                                    }
448    
449                                    ksname = get_ksname(keysym);
450                                    DEBUG_KBD
451                                            ("\nKeyPress for (keysym 0x%lx, %s)\n",
452                                             keysym, ksname);
453    
454                                    if (inhibit_key(keysym))
455                                    {
456                                            DEBUG_KBD("Inhibiting key\n");
457                                            break;
458                                    }
459    
460                                    tr = xkeymap_translate_key(keysym,
461                                                               xevent.xkey.
462                                                               keycode,
463                                                               xevent.xkey.state);
464    
465                                    ensure_remote_modifiers(ev_time, tr);
466    
467                                    if (tr.scancode == 0)
468                                            break;
469    
470                                    rdp_send_scancode(ev_time, RDP_KEYPRESS,
471                                                      tr.scancode);
472                                    break;
473                            case KeyRelease:
474                                    XLookupString((XKeyEvent *) & xevent, str,
475                                                  sizeof(str), &keysym, NULL);
476    
477                                    ksname = get_ksname(keysym);
478                                    DEBUG_KBD
479                                            ("\nKeyRelease for (keysym 0x%lx, %s)\n",
480                                             keysym, ksname);
481    
482                                    if (inhibit_key(keysym))
483                                            break;
484    
485                                    tr = xkeymap_translate_key(keysym,
486                                                               xevent.xkey.
487                                                               keycode,
488                                                               xevent.xkey.state);
489    
490                                    if (tr.scancode == 0)
491                                            break;
492    
493                                    rdp_send_scancode(ev_time, RDP_KEYRELEASE,
494                                                      tr.scancode);
495                                    break;
496    
497                            case ButtonPress:
498                                    flags = MOUSE_FLAG_DOWN;
499                                    /* fall through */
500    
501                            case ButtonRelease:
502                                    button = xkeymap_translate_button(xevent.
503                                                                      xbutton.
504                                                                      button);
505                                    if (button == 0)
506                                            break;
507    
508                                    rdp_send_input(ev_time, RDP_INPUT_MOUSE,
509                                                   flags | button,
510                                                   xevent.xbutton.x,
511                                                   xevent.xbutton.y);
512                                    break;
513    
514                            case MotionNotify:
515                                    rdp_send_input(ev_time, RDP_INPUT_MOUSE,
516                                                   MOUSE_FLAG_MOVE,
517                                                   xevent.xmotion.x,
518                                                   xevent.xmotion.y);
519                                    break;
520    
521                            case EnterNotify:
522                                    XGrabKeyboard(display, wnd, True,
523                                                  GrabModeAsync, GrabModeAsync,
524                                                  CurrentTime);
525                                    break;
526    
527                            case LeaveNotify:
528                                    XUngrabKeyboard(display, CurrentTime);
529                                    break;
530    
531                            case Expose:
532                                    XCopyArea(display, backstore, wnd, gc,
533                                              xevent.xexpose.x, xevent.xexpose.y,
534                                              xevent.xexpose.width,
535                                              xevent.xexpose.height,
536                                              xevent.xexpose.x, xevent.xexpose.y);
537                                    break;
538                    }
539            }
540    }
541    
542    void
543    ui_select(int rdp_socket)
544    {
545            int n = (rdp_socket > x_socket) ? rdp_socket + 1 : x_socket + 1;
546            fd_set rfds;
547    
548            FD_ZERO(&rfds);
549    
550            while (True)
551            {
552                    FD_ZERO(&rfds);
553                    FD_SET(rdp_socket, &rfds);
554                    if (display != NULL)
555                    {
556                            FD_SET(x_socket, &rfds);
557                            XFlush(display);
558                    }
559    
560                    switch (select(n, &rfds, NULL, NULL, NULL))
561                    {
562                            case -1:
563                                    error("select: %s\n", strerror(errno));
564    
565                            case 0:
566                                    continue;
567                    }
568    
569                    if (FD_ISSET(x_socket, &rfds))
570                            xwin_process_events();
571    
572                    if (FD_ISSET(rdp_socket, &rfds))
573                            return;
574            }
575    }
576    
577    void
578    ui_move_pointer(int x, int y)
579    {
580            XWarpPointer(display, wnd, wnd, 0, 0, 0, 0, x, y);
581    }
582    
583    HBITMAP
584    ui_create_bitmap(int width, int height, uint8 * data)
585  {  {
586          XImage *image;          XImage *image;
587          Visual *visual;          Pixmap bitmap;
588            uint8 *tdata;
589    
590          visual = DefaultVisual(wnd->display, DefaultScreen(wnd->display));          tdata = (owncolmap ? data : translate_image(width, height, data));
591          image = XCreateImage(wnd->display, visual, 8, ZPixmap, 0,          bitmap = XCreatePixmap(display, wnd, width, height, depth);
592                                  data, width, height, 32, width);          image = XCreateImage(display, visual, depth, ZPixmap, 0, tdata, width,
593                                 height, 8, 0);
594    
595          return (HBITMAP)image;          XPutImage(display, bitmap, gc, image, 0, 0, 0, 0, width, height);
596    
597            XFree(image);
598            if (!owncolmap)
599                    xfree(tdata);
600            return (HBITMAP) bitmap;
601  }  }
602    
603  void ui_destroy_bitmap(HBITMAP bmp)  void
604    ui_paint_bitmap(int x, int y, int cx, int cy, int width, int height,
605                    uint8 * data)
606  {  {
607          XDestroyImage((XImage *)bmp);          XImage *image;
608            uint8 *tdata;
609    
610            tdata = (owncolmap ? data : translate_image(width, height, data));
611            image = XCreateImage(display, visual, depth, ZPixmap, 0, tdata, width,
612                                 height, 8, 0);
613    
614            if (ownbackstore)
615            {
616                    XPutImage(display, backstore, gc, image, 0, 0, x, y, cx, cy);
617                    XCopyArea(display, backstore, wnd, gc, x, y, cx, cy, x, y);
618            }
619            else
620            {
621                    XPutImage(display, wnd, gc, image, 0, 0, x, y, cx, cy);
622            }
623    
624            XFree(image);
625            if (!owncolmap)
626                    xfree(tdata);
627  }  }
628    
629  void ui_paint_bitmap(HWINDOW wnd, HBITMAP bmp, int x, int y)  void
630    ui_destroy_bitmap(HBITMAP bmp)
631  {  {
632          XImage *image = (XImage *)bmp;          XFreePixmap(display, (Pixmap) bmp);
633    }
634    
635    HGLYPH
636    ui_create_glyph(int width, int height, uint8 * data)
637    {
638            XImage *image;
639            Pixmap bitmap;
640            int scanline;
641            GC gc;
642    
643            scanline = (width + 7) / 8;
644    
645            bitmap = XCreatePixmap(display, wnd, width, height, 1);
646            gc = XCreateGC(display, bitmap, 0, NULL);
647    
648            image = XCreateImage(display, visual, 1, ZPixmap, 0, data, width,
649                                 height, 8, scanline);
650            image->byte_order = MSBFirst;
651            image->bitmap_bit_order = MSBFirst;
652            XInitImage(image);
653    
654            XPutImage(display, bitmap, gc, image, 0, 0, 0, 0, width, height);
655    
656            XFree(image);
657            XFreeGC(display, gc);
658            return (HGLYPH) bitmap;
659    }
660    
661    void
662    ui_destroy_glyph(HGLYPH glyph)
663    {
664            XFreePixmap(display, (Pixmap) glyph);
665    }
666    
667    HCURSOR
668    ui_create_cursor(unsigned int x, unsigned int y, int width, int height,
669                     uint8 * andmask, uint8 * xormask)
670    {
671            HGLYPH maskglyph, cursorglyph;
672            XColor bg, fg;
673            Cursor xcursor;
674            uint8 *cursor, *pcursor;
675            uint8 *mask, *pmask;
676            uint8 nextbit;
677            int scanline, offset;
678            int i, j;
679    
680            scanline = (width + 7) / 8;
681            offset = scanline * height;
682    
683            cursor = xmalloc(offset);
684            memset(cursor, 0, offset);
685    
686            mask = xmalloc(offset);
687            memset(mask, 0, offset);
688    
689            /* approximate AND and XOR masks with a monochrome X pointer */
690            for (i = 0; i < height; i++)
691            {
692                    offset -= scanline;
693                    pcursor = &cursor[offset];
694                    pmask = &mask[offset];
695    
696                    for (j = 0; j < scanline; j++)
697                    {
698                            for (nextbit = 0x80; nextbit != 0; nextbit >>= 1)
699                            {
700                                    if (xormask[0] || xormask[1] || xormask[2])
701                                    {
702                                            *pcursor |= (~(*andmask) & nextbit);
703                                            *pmask |= nextbit;
704                                    }
705                                    else
706                                    {
707                                            *pcursor |= ((*andmask) & nextbit);
708                                            *pmask |= (~(*andmask) & nextbit);
709                                    }
710    
711                                    xormask += 3;
712                            }
713    
714                            andmask++;
715                            pcursor++;
716                            pmask++;
717                    }
718            }
719    
720            fg.red = fg.blue = fg.green = 0xffff;
721            bg.red = bg.blue = bg.green = 0x0000;
722            fg.flags = bg.flags = DoRed | DoBlue | DoGreen;
723    
724            cursorglyph = ui_create_glyph(width, height, cursor);
725            maskglyph = ui_create_glyph(width, height, mask);
726    
727            xcursor =
728                    XCreatePixmapCursor(display, (Pixmap) cursorglyph,
729                                        (Pixmap) maskglyph, &fg, &bg, x, y);
730    
731            ui_destroy_glyph(maskglyph);
732            ui_destroy_glyph(cursorglyph);
733            xfree(mask);
734            xfree(cursor);
735            return (HCURSOR) xcursor;
736    }
737    
738    void
739    ui_set_cursor(HCURSOR cursor)
740    {
741            XDefineCursor(display, wnd, (Cursor) cursor);
742    }
743    
744    void
745    ui_destroy_cursor(HCURSOR cursor)
746    {
747            XFreeCursor(display, (Cursor) cursor);
748    }
749    
750    #define MAKE_XCOLOR(xc,c) \
751                    (xc)->red   = ((c)->red   << 8) | (c)->red; \
752                    (xc)->green = ((c)->green << 8) | (c)->green; \
753                    (xc)->blue  = ((c)->blue  << 8) | (c)->blue; \
754                    (xc)->flags = DoRed | DoGreen | DoBlue;
755    
756    HCOLOURMAP
757    ui_create_colourmap(COLOURMAP * colours)
758    {
759            COLOURENTRY *entry;
760            int i, ncolours = colours->ncolours;
761    
762            if (owncolmap)
763            {
764                    XColor *xcolours, *xentry;
765                    Colormap map;
766    
767                    xcolours = xmalloc(sizeof(XColor) * ncolours);
768                    for (i = 0; i < ncolours; i++)
769                    {
770                            entry = &colours->colours[i];
771                            xentry = &xcolours[i];
772                            xentry->pixel = i;
773                            MAKE_XCOLOR(xentry, entry);
774                    }
775    
776                    map = XCreateColormap(display, wnd, visual, AllocAll);
777                    XStoreColors(display, map, xcolours, ncolours);
778    
779                    xfree(xcolours);
780                    return (HCOLOURMAP) map;
781            }
782            else
783            {
784                    uint32 *map = xmalloc(sizeof(*colmap) * ncolours);
785                    XColor xentry;
786                    uint32 colour;
787    
788                    for (i = 0; i < ncolours; i++)
789                    {
790                            entry = &colours->colours[i];
791                            MAKE_XCOLOR(&xentry, entry);
792    
793                            if (XAllocColor(display, xcolmap, &xentry) != 0)
794                                    colour = xentry.pixel;
795                            else
796                                    colour = white;
797    
798                            /* byte swap here to make translate_image faster */
799                            map[i] = translate_colour(colour);
800                    }
801    
802                    return map;
803            }
804    }
805    
806    void
807    ui_destroy_colourmap(HCOLOURMAP map)
808    {
809            if (owncolmap)
810                    XFreeColormap(display, (Colormap) map);
811            else
812                    xfree(map);
813    }
814    
815    void
816    ui_set_colourmap(HCOLOURMAP map)
817    {
818            if (owncolmap)
819                    XSetWindowColormap(display, wnd, (Colormap) map);
820            else
821                    colmap = map;
822    }
823    
824    void
825    ui_set_clip(int x, int y, int cx, int cy)
826    {
827            XRectangle rect;
828    
829            rect.x = x;
830            rect.y = y;
831            rect.width = cx;
832            rect.height = cy;
833            XSetClipRectangles(display, gc, 0, 0, &rect, 1, YXBanded);
834    }
835    
836    void
837    ui_reset_clip()
838    {
839            XRectangle rect;
840    
841            rect.x = 0;
842            rect.y = 0;
843            rect.width = width;
844            rect.height = height;
845            XSetClipRectangles(display, gc, 0, 0, &rect, 1, YXBanded);
846    }
847    
848    void
849    ui_bell()
850    {
851            XBell(display, 0);
852    }
853    
854    void
855    ui_destblt(uint8 opcode,
856               /* dest */ int x, int y, int cx, int cy)
857    {
858            SET_FUNCTION(opcode);
859            FILL_RECTANGLE(x, y, cx, cy);
860            RESET_FUNCTION(opcode);
861    }
862    
863    void
864    ui_patblt(uint8 opcode,
865              /* dest */ int x, int y, int cx, int cy,
866              /* brush */ BRUSH * brush, int bgcolour, int fgcolour)
867    {
868            Pixmap fill;
869            uint8 i, ipattern[8];
870    
871            SET_FUNCTION(opcode);
872    
873            switch (brush->style)
874            {
875                    case 0: /* Solid */
876                            SET_FOREGROUND(fgcolour);
877                            FILL_RECTANGLE(x, y, cx, cy);
878                            break;
879    
880                    case 3: /* Pattern */
881                            for (i = 0; i != 8; i++)
882                                    ipattern[7 - i] = brush->pattern[i];
883                            fill = (Pixmap) ui_create_glyph(8, 8, ipattern);
884    
885                            SET_FOREGROUND(bgcolour);
886                            SET_BACKGROUND(fgcolour);
887                            XSetFillStyle(display, gc, FillOpaqueStippled);
888                            XSetStipple(display, gc, fill);
889                            XSetTSOrigin(display, gc, brush->xorigin,
890                                         brush->yorigin);
891    
892                            FILL_RECTANGLE(x, y, cx, cy);
893    
894                            XSetFillStyle(display, gc, FillSolid);
895                            ui_destroy_glyph((HGLYPH) fill);
896                            break;
897    
898                    default:
899                            unimpl("brush %d\n", brush->style);
900            }
901    
902            RESET_FUNCTION(opcode);
903    }
904    
905    void
906    ui_screenblt(uint8 opcode,
907                 /* dest */ int x, int y, int cx, int cy,
908                 /* src */ int srcx, int srcy)
909    {
910            SET_FUNCTION(opcode);
911            XCopyArea(display, wnd, wnd, gc, srcx, srcy, cx, cy, x, y);
912            if (ownbackstore)
913                    XCopyArea(display, backstore, backstore, gc, srcx, srcy, cx,
914                              cy, x, y);
915            RESET_FUNCTION(opcode);
916    }
917    
918    void
919    ui_memblt(uint8 opcode,
920              /* dest */ int x, int y, int cx, int cy,
921              /* src */ HBITMAP src, int srcx, int srcy)
922    {
923            SET_FUNCTION(opcode);
924            XCopyArea(display, (Pixmap) src, wnd, gc, srcx, srcy, cx, cy, x, y);
925            if (ownbackstore)
926                    XCopyArea(display, (Pixmap) src, backstore, gc, srcx, srcy,
927                              cx, cy, x, y);
928            RESET_FUNCTION(opcode);
929    }
930    
931    void
932    ui_triblt(uint8 opcode,
933              /* dest */ int x, int y, int cx, int cy,
934              /* src */ HBITMAP src, int srcx, int srcy,
935              /* brush */ BRUSH * brush, int bgcolour, int fgcolour)
936    {
937            /* This is potentially difficult to do in general. Until someone
938               comes up with a more efficient way of doing it I am using cases. */
939    
940            switch (opcode)
941            {
942                    case 0x69:      /* PDSxxn */
943                            ui_memblt(ROP2_XOR, x, y, cx, cy, src, srcx, srcy);
944                            ui_patblt(ROP2_NXOR, x, y, cx, cy, brush, bgcolour,
945                                      fgcolour);
946                            break;
947    
948                    case 0xb8:      /* PSDPxax */
949                            ui_patblt(ROP2_XOR, x, y, cx, cy, brush, bgcolour,
950                                      fgcolour);
951                            ui_memblt(ROP2_AND, x, y, cx, cy, src, srcx, srcy);
952                            ui_patblt(ROP2_XOR, x, y, cx, cy, brush, bgcolour,
953                                      fgcolour);
954                            break;
955    
956                    case 0xc0:      /* PSa */
957                            ui_memblt(ROP2_COPY, x, y, cx, cy, src, srcx, srcy);
958                            ui_patblt(ROP2_AND, x, y, cx, cy, brush, bgcolour,
959                                      fgcolour);
960                            break;
961    
962                    default:
963                            unimpl("triblt 0x%x\n", opcode);
964                            ui_memblt(ROP2_COPY, x, y, cx, cy, src, srcx, srcy);
965            }
966    }
967    
968    void
969    ui_line(uint8 opcode,
970            /* dest */ int startx, int starty, int endx, int endy,
971            /* pen */ PEN * pen)
972    {
973            SET_FUNCTION(opcode);
974            SET_FOREGROUND(pen->colour);
975            XDrawLine(display, wnd, gc, startx, starty, endx, endy);
976            if (ownbackstore)
977                    XDrawLine(display, backstore, gc, startx, starty, endx, endy);
978            RESET_FUNCTION(opcode);
979    }
980    
981    void
982    ui_rect(
983                   /* dest */ int x, int y, int cx, int cy,
984                   /* brush */ int colour)
985    {
986            SET_FOREGROUND(colour);
987            FILL_RECTANGLE(x, y, cx, cy);
988    }
989    
990    void
991    ui_draw_glyph(int mixmode,
992                  /* dest */ int x, int y, int cx, int cy,
993                  /* src */ HGLYPH glyph, int srcx, int srcy,
994                  int bgcolour, int fgcolour)
995    {
996            SET_FOREGROUND(fgcolour);
997            SET_BACKGROUND(bgcolour);
998    
999            XSetFillStyle(display, gc,
1000                          (mixmode ==
1001                           MIX_TRANSPARENT) ? FillStippled : FillOpaqueStippled);
1002            XSetStipple(display, gc, (Pixmap) glyph);
1003            XSetTSOrigin(display, gc, x, y);
1004    
1005            FILL_RECTANGLE(x, y, cx, cy);
1006    
1007            XSetFillStyle(display, gc, FillSolid);
1008    }
1009    
1010    #define DO_GLYPH(ttext,idx) \
1011    {\
1012      glyph = cache_get_font (font, ttext[idx]);\
1013      if (!(flags & TEXT2_IMPLICIT_X))\
1014        {\
1015          xyoffset = ttext[++idx];\
1016          if ((xyoffset & 0x80))\
1017            {\
1018              if (flags & TEXT2_VERTICAL) \
1019                y += ttext[++idx] | (ttext[++idx] << 8);\
1020              else\
1021                x += ttext[++idx] | (ttext[++idx] << 8);\
1022            }\
1023          else\
1024            {\
1025              if (flags & TEXT2_VERTICAL) \
1026                y += xyoffset;\
1027              else\
1028                x += xyoffset;\
1029            }\
1030        }\
1031      if (glyph != NULL)\
1032        {\
1033          ui_draw_glyph (mixmode, x + (short) glyph->offset,\
1034                         y + (short) glyph->baseline,\
1035                         glyph->width, glyph->height,\
1036                         glyph->pixmap, 0, 0, bgcolour, fgcolour);\
1037          if (flags & TEXT2_IMPLICIT_X)\
1038            x += glyph->width;\
1039        }\
1040    }
1041    
1042    void
1043    ui_draw_text(uint8 font, uint8 flags, int mixmode, int x, int y,
1044                 int clipx, int clipy, int clipcx, int clipcy,
1045                 int boxx, int boxy, int boxcx, int boxcy, int bgcolour,
1046                 int fgcolour, uint8 * text, uint8 length)
1047    {
1048            FONTGLYPH *glyph;
1049            int i, j, xyoffset;
1050            DATABLOB *entry;
1051    
1052            SET_FOREGROUND(bgcolour);
1053    
1054            if (boxcx > 1)
1055            {
1056                    FILL_RECTANGLE(boxx, boxy, boxcx, boxcy);
1057            }
1058            else if (mixmode == MIX_OPAQUE)
1059            {
1060                    FILL_RECTANGLE(clipx, clipy, clipcx, clipcy);
1061            }
1062    
1063            /* Paint text, character by character */
1064            for (i = 0; i < length;)
1065            {
1066                    switch (text[i])
1067                    {
1068                            case 0xff:
1069                                    if (i + 2 < length)
1070                                            cache_put_text(text[i + 1], text,
1071                                                           text[i + 2]);
1072                                    else
1073                                    {
1074                                            error("this shouldn't be happening\n");
1075                                            break;
1076                                    }
1077                                    /* this will move pointer from start to first character after FF command */
1078                                    length -= i + 3;
1079                                    text = &(text[i + 3]);
1080                                    i = 0;
1081                                    break;
1082    
1083                            case 0xfe:
1084                                    entry = cache_get_text(text[i + 1]);
1085                                    if (entry != NULL)
1086                                    {
1087                                            if ((((uint8 *) (entry->data))[1] ==
1088                                                 0)
1089                                                && (!(flags & TEXT2_IMPLICIT_X)))
1090                                            {
1091                                                    if (flags & TEXT2_VERTICAL)
1092                                                            y += text[i + 2];
1093                                                    else
1094                                                            x += text[i + 2];
1095                                            }
1096                                            if (i + 2 < length)
1097                                                    i += 3;
1098                                            else
1099                                                    i += 2;
1100                                            length -= i;
1101                                            /* this will move pointer from start to first character after FE command */
1102                                            text = &(text[i]);
1103                                            i = 0;
1104                                            for (j = 0; j < entry->size; j++)
1105                                                    DO_GLYPH(((uint8 *) (entry->
1106                                                                         data)),
1107                                                             j);
1108                                    }
1109                                    break;
1110    
1111                            default:
1112                                    DO_GLYPH(text, i);
1113                                    i++;
1114                                    break;
1115                    }
1116            }
1117    
1118    
1119    }
1120    
1121    void
1122    ui_desktop_save(uint32 offset, int x, int y, int cx, int cy)
1123    {
1124            Pixmap pix;
1125            XImage *image;
1126    
1127            if (ownbackstore)
1128            {
1129                    image = XGetImage(display, backstore, x, y, cx, cy, AllPlanes,
1130                                      ZPixmap);
1131            }
1132            else
1133            {
1134                    pix = XCreatePixmap(display, wnd, cx, cy, depth);
1135                    XCopyArea(display, wnd, pix, gc, x, y, cx, cy, 0, 0);
1136                    image = XGetImage(display, pix, 0, 0, cx, cy, AllPlanes,
1137                                      ZPixmap);
1138                    XFreePixmap(display, pix);
1139            }
1140    
1141            offset *= bpp / 8;
1142            cache_put_desktop(offset, cx, cy, image->bytes_per_line, bpp / 8,
1143                              (uint8 *) image->data);
1144    
1145            XDestroyImage(image);
1146    }
1147    
1148    void
1149    ui_desktop_restore(uint32 offset, int x, int y, int cx, int cy)
1150    {
1151            XImage *image;
1152            uint8 *data;
1153    
1154            offset *= bpp / 8;
1155            data = cache_get_desktop(offset, cx, cy, bpp / 8);
1156            if (data == NULL)
1157                    return;
1158    
1159            image = XCreateImage(display, visual, depth, ZPixmap, 0, data, cx, cy,
1160                                 BitmapPad(display), cx * bpp / 8);
1161    
1162          XPutImage(wnd->display, wnd->wnd, wnd->gc, image,          if (ownbackstore)
1163                          0, 0, x, y, image->width, image->height);          {
1164                    XPutImage(display, backstore, gc, image, 0, 0, x, y, cx, cy);
1165                    XCopyArea(display, backstore, wnd, gc, x, y, cx, cy, x, y);
1166            }
1167            else
1168            {
1169                    XPutImage(display, wnd, gc, image, 0, 0, x, y, cx, cy);
1170            }
1171    
1172          XSync(wnd->display, True);          XFree(image);
1173  }  }
Legend:
Removed from v.6  
changed lines
  Added in v.70
  ViewVC Help
Powered by ViewVC 1.1.26