git.oblomov.eu Git - wine/blob - dlls/winex11.drv/clipboard.c

   1 /*
   2  * X11 clipboard windows driver
   3  *
   4  * Copyright 1994 Martin Ayotte
   5  *           1996 Alex Korobka
   6  *           1999 Noel Borthwick
   7  *           2003 Ulrich Czekalla for CodeWeavers
   8  *
   9  * This library is free software; you can redistribute it and/or
  10  * modify it under the terms of the GNU Lesser General Public
  11  * License as published by the Free Software Foundation; either
  12  * version 2.1 of the License, or (at your option) any later version.
  13  *
  14  * This library is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  17  * Lesser General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU Lesser General Public
  20  * License along with this library; if not, write to the Free Software
  21  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  22  *
  23  * NOTES:
  24  *    This file contains the X specific implementation for the windows
  25  *    Clipboard API.
  26  *
  27  *    Wine's internal clipboard is exposed to external apps via the X
  28  *    selection mechanism.
  29  *    Currently the driver asserts ownership via two selection atoms:
  30  *    1. PRIMARY(XA_PRIMARY)
  31  *    2. CLIPBOARD
  32  *
  33  *    In our implementation, the CLIPBOARD selection takes precedence over PRIMARY,
  34  *    i.e. if a CLIPBOARD selection is available, it is used instead of PRIMARY.
  35  *    When Wine takes ownership of the clipboard, it takes ownership of BOTH selections.
  36  *    While giving up selection ownership, if the CLIPBOARD selection is lost,
  37  *    it will lose both PRIMARY and CLIPBOARD and empty the clipboard.
  38  *    However if only PRIMARY is lost, it will continue to hold the CLIPBOARD selection
  39  *    (leaving the clipboard cache content unaffected).
  40  *
  41  *      Every format exposed via a windows clipboard format is also exposed through
  42  *    a corresponding X selection target. A selection target atom is synthesized
  43  *    whenever a new Windows clipboard format is registered via RegisterClipboardFormat,
  44  *    or when a built-in format is used for the first time.
  45  *    Windows native format are exposed by prefixing the format name with "<WCF>"
  46  *    This allows us to uniquely identify windows native formats exposed by other
  47  *    running WINE apps.
  48  *
  49  *      In order to allow external applications to query WINE for supported formats,
  50  *    we respond to the "TARGETS" selection target. (See EVENT_SelectionRequest
  51  *    for implementation) We use the same mechanism to query external clients for
  52  *    availability of a particular format, by caching the list of available targets
  53  *    by using the clipboard cache's "delayed render" mechanism. If a selection client
  54  *    does not support the "TARGETS" selection target, we actually attempt to retrieve
  55  *    the format requested as a fallback mechanism.
  56  *
  57  *      Certain Windows native formats are automatically converted to X native formats
  58  *    and vice versa. If a native format is available in the selection, it takes
  59  *    precedence, in order to avoid unnecessary conversions.
  60  *
  61  * FIXME: global format list needs a critical section
  62  */
  63
  64 #include "config.h"
  65 #include "wine/port.h"
  66
  67 #include <string.h>
  68 #include <stdarg.h>
  69 #include <stdio.h>
  70 #include <stdlib.h>
  71 #ifdef HAVE_UNISTD_H
  72 # include <unistd.h>
  73 #endif
  74 #include <fcntl.h>
  75 #include <limits.h>
  76 #include <time.h>
  77 #include <assert.h>
  78
  79 #include "windef.h"
  80 #include "winbase.h"
  81 #include "x11drv.h"
  82 #include "wine/list.h"
  83 #include "wine/debug.h"
  84 #include "wine/unicode.h"
  85 #include "wine/server.h"
  86
  87 WINE_DEFAULT_DEBUG_CHANNEL(clipboard);
  88
  89 /* Maximum wait time for selection notify */
  90 #define SELECTION_RETRIES 500  /* wait for .5 seconds */
  91 #define SELECTION_WAIT    1000 /* us */
  92
  93 /* Selection masks */
  94 #define S_NOSELECTION    0
  95 #define S_PRIMARY        1
  96 #define S_CLIPBOARD      2
  97
  98 typedef struct
  99 {
 100     HWND hWndOpen;
 101     HWND hWndOwner;
 102     HWND hWndViewer;
 103     UINT seqno;
 104     UINT flags;
 105 } CLIPBOARDINFO, *LPCLIPBOARDINFO;
 106
 107 struct tagWINE_CLIPDATA; /* Forward */
 108
 109 typedef HANDLE (*DRVEXPORTFUNC)(Display *display, Window requestor, Atom aTarget, Atom rprop,
 110     struct tagWINE_CLIPDATA* lpData, LPDWORD lpBytes);
 111 typedef HANDLE (*DRVIMPORTFUNC)(Display *d, Window w, Atom prop);
 112
 113 typedef struct tagWINE_CLIPFORMAT {
 114     struct list entry;
 115     UINT        wFormatID;
 116     UINT        drvData;
 117     DRVIMPORTFUNC  lpDrvImportFunc;
 118     DRVEXPORTFUNC  lpDrvExportFunc;
 119 } WINE_CLIPFORMAT, *LPWINE_CLIPFORMAT;
 120
 121 typedef struct tagWINE_CLIPDATA {
 122     struct list entry;
 123     UINT        wFormatID;
 124     HANDLE      hData;
 125     UINT        wFlags;
 126     UINT        drvData;
 127     LPWINE_CLIPFORMAT lpFormat;
 128 } WINE_CLIPDATA, *LPWINE_CLIPDATA;
 129
 130 #define CF_FLAG_UNOWNED      0x0001 /* cached data is not owned */
 131 #define CF_FLAG_SYNTHESIZED  0x0002 /* Implicitly converted data */
 132
 133 static int selectionAcquired = 0;              /* Contains the current selection masks */
 134 static Window selectionWindow = None;          /* The top level X window which owns the selection */
 135 static Atom selectionCacheSrc = XA_PRIMARY;    /* The selection source from which the clipboard cache was filled */
 136
 137 void CDECL X11DRV_EmptyClipboard(BOOL keepunowned);
 138 void CDECL X11DRV_EndClipboardUpdate(void);
 139 static HANDLE X11DRV_CLIPBOARD_ImportClipboardData(Display *d, Window w, Atom prop);
 140 static HANDLE X11DRV_CLIPBOARD_ImportEnhMetaFile(Display *d, Window w, Atom prop);
 141 static HANDLE X11DRV_CLIPBOARD_ImportMetaFilePict(Display *d, Window w, Atom prop);
 142 static HANDLE X11DRV_CLIPBOARD_ImportXAPIXMAP(Display *d, Window w, Atom prop);
 143 static HANDLE X11DRV_CLIPBOARD_ImportImageBmp(Display *d, Window w, Atom prop);
 144 static HANDLE X11DRV_CLIPBOARD_ImportXAString(Display *d, Window w, Atom prop);
 145 static HANDLE X11DRV_CLIPBOARD_ImportUTF8(Display *d, Window w, Atom prop);
 146 static HANDLE X11DRV_CLIPBOARD_ImportCompoundText(Display *d, Window w, Atom prop);
 147 static HANDLE X11DRV_CLIPBOARD_ExportClipboardData(Display *display, Window requestor, Atom aTarget,
 148     Atom rprop, LPWINE_CLIPDATA lpData, LPDWORD lpBytes);
 149 static HANDLE X11DRV_CLIPBOARD_ExportString(Display *display, Window requestor, Atom aTarget,
 150     Atom rprop, LPWINE_CLIPDATA lpData, LPDWORD lpBytes);
 151 static HANDLE X11DRV_CLIPBOARD_ExportXAPIXMAP(Display *display, Window requestor, Atom aTarget,
 152     Atom rprop, LPWINE_CLIPDATA lpdata, LPDWORD lpBytes);
 153 static HANDLE X11DRV_CLIPBOARD_ExportImageBmp(Display *display, Window requestor, Atom aTarget,
 154     Atom rprop, LPWINE_CLIPDATA lpdata, LPDWORD lpBytes);
 155 static HANDLE X11DRV_CLIPBOARD_ExportMetaFilePict(Display *display, Window requestor, Atom aTarget,
 156     Atom rprop, LPWINE_CLIPDATA lpdata, LPDWORD lpBytes);
 157 static HANDLE X11DRV_CLIPBOARD_ExportEnhMetaFile(Display *display, Window requestor, Atom aTarget,
 158     Atom rprop, LPWINE_CLIPDATA lpdata, LPDWORD lpBytes);
 159 static HANDLE X11DRV_CLIPBOARD_ExportTextHtml(Display *display, Window requestor, Atom aTarget,
 160     Atom rprop, LPWINE_CLIPDATA lpdata, LPDWORD lpBytes);
 161 static WINE_CLIPFORMAT *X11DRV_CLIPBOARD_InsertClipboardFormat(UINT id, Atom prop);
 162 static BOOL X11DRV_CLIPBOARD_RenderSynthesizedText(Display *display, UINT wFormatID);
 163 static void X11DRV_CLIPBOARD_FreeData(LPWINE_CLIPDATA lpData);
 164 static BOOL X11DRV_CLIPBOARD_IsSelectionOwner(void);
 165 static int X11DRV_CLIPBOARD_QueryAvailableData(Display *display, LPCLIPBOARDINFO lpcbinfo);
 166 static BOOL X11DRV_CLIPBOARD_ReadSelectionData(Display *display, LPWINE_CLIPDATA lpData);
 167 static BOOL X11DRV_CLIPBOARD_ReadProperty(Display *display, Window w, Atom prop,
 168     unsigned char** data, unsigned long* datasize);
 169 static BOOL X11DRV_CLIPBOARD_RenderFormat(Display *display, LPWINE_CLIPDATA lpData);
 170 static HANDLE X11DRV_CLIPBOARD_SerializeMetafile(INT wformat, HANDLE hdata, LPDWORD lpcbytes, BOOL out);
 171 static BOOL X11DRV_CLIPBOARD_SynthesizeData(UINT wFormatID);
 172 static BOOL X11DRV_CLIPBOARD_RenderSynthesizedFormat(Display *display, LPWINE_CLIPDATA lpData);
 173 static BOOL X11DRV_CLIPBOARD_RenderSynthesizedDIB(Display *display);
 174 static BOOL X11DRV_CLIPBOARD_RenderSynthesizedBitmap(Display *display);
 175 static BOOL X11DRV_CLIPBOARD_RenderSynthesizedEnhMetaFile(Display *display);
 176 static void X11DRV_HandleSelectionRequest( HWND hWnd, XSelectionRequestEvent *event, BOOL bIsMultiple );
 177
 178 /* Clipboard formats */
 179
 180 static const struct
 181 {
 182     UINT          id;
 183     UINT          data;
 184     DRVIMPORTFUNC import;
 185     DRVEXPORTFUNC export;
 186 } builtin_formats[] =
 187 {
 188     { CF_TEXT, XA_STRING, X11DRV_CLIPBOARD_ImportXAString, X11DRV_CLIPBOARD_ExportString},
 189     { CF_BITMAP, XATOM_WCF_BITMAP, X11DRV_CLIPBOARD_ImportClipboardData, NULL},
 190     { CF_METAFILEPICT, XATOM_WCF_METAFILEPICT, X11DRV_CLIPBOARD_ImportMetaFilePict, X11DRV_CLIPBOARD_ExportMetaFilePict },
 191     { CF_SYLK, XATOM_WCF_SYLK, X11DRV_CLIPBOARD_ImportClipboardData, X11DRV_CLIPBOARD_ExportClipboardData },
 192     { CF_DIF, XATOM_WCF_DIF, X11DRV_CLIPBOARD_ImportClipboardData, X11DRV_CLIPBOARD_ExportClipboardData },
 193     { CF_TIFF, XATOM_WCF_TIFF, X11DRV_CLIPBOARD_ImportClipboardData, X11DRV_CLIPBOARD_ExportClipboardData },
 194     { CF_OEMTEXT, XATOM_WCF_OEMTEXT, X11DRV_CLIPBOARD_ImportClipboardData, X11DRV_CLIPBOARD_ExportClipboardData },
 195     { CF_DIB, XA_PIXMAP, X11DRV_CLIPBOARD_ImportXAPIXMAP, X11DRV_CLIPBOARD_ExportXAPIXMAP },
 196     { CF_PALETTE, XATOM_WCF_PALETTE, X11DRV_CLIPBOARD_ImportClipboardData, X11DRV_CLIPBOARD_ExportClipboardData },
 197     { CF_PENDATA, XATOM_WCF_PENDATA, X11DRV_CLIPBOARD_ImportClipboardData, X11DRV_CLIPBOARD_ExportClipboardData },
 198     { CF_RIFF, XATOM_WCF_RIFF, X11DRV_CLIPBOARD_ImportClipboardData, X11DRV_CLIPBOARD_ExportClipboardData },
 199     { CF_WAVE, XATOM_WCF_WAVE, X11DRV_CLIPBOARD_ImportClipboardData, X11DRV_CLIPBOARD_ExportClipboardData },
 200     { CF_UNICODETEXT, XATOM_UTF8_STRING, X11DRV_CLIPBOARD_ImportUTF8, X11DRV_CLIPBOARD_ExportString },
 201     /* If UTF8_STRING is not available, attempt COMPOUND_TEXT */
 202     { CF_UNICODETEXT, XATOM_COMPOUND_TEXT, X11DRV_CLIPBOARD_ImportCompoundText, X11DRV_CLIPBOARD_ExportString },
 203     { CF_ENHMETAFILE, XATOM_WCF_ENHMETAFILE, X11DRV_CLIPBOARD_ImportEnhMetaFile, X11DRV_CLIPBOARD_ExportEnhMetaFile },
 204     { CF_HDROP, XATOM_WCF_HDROP, X11DRV_CLIPBOARD_ImportClipboardData, X11DRV_CLIPBOARD_ExportClipboardData },
 205     { CF_LOCALE, XATOM_WCF_LOCALE, X11DRV_CLIPBOARD_ImportClipboardData, X11DRV_CLIPBOARD_ExportClipboardData },
 206     { CF_DIBV5, XATOM_WCF_DIBV5, X11DRV_CLIPBOARD_ImportClipboardData, X11DRV_CLIPBOARD_ExportClipboardData },
 207     { CF_OWNERDISPLAY, XATOM_WCF_OWNERDISPLAY, X11DRV_CLIPBOARD_ImportClipboardData, X11DRV_CLIPBOARD_ExportClipboardData },
 208     { CF_DSPTEXT, XATOM_WCF_DSPTEXT, X11DRV_CLIPBOARD_ImportClipboardData, X11DRV_CLIPBOARD_ExportClipboardData },
 209     { CF_DSPBITMAP, XATOM_WCF_DSPBITMAP, X11DRV_CLIPBOARD_ImportClipboardData, X11DRV_CLIPBOARD_ExportClipboardData },
 210     { CF_DSPMETAFILEPICT, XATOM_WCF_DSPMETAFILEPICT, X11DRV_CLIPBOARD_ImportClipboardData, X11DRV_CLIPBOARD_ExportClipboardData },
 211     { CF_DSPENHMETAFILE, XATOM_WCF_DSPENHMETAFILE, X11DRV_CLIPBOARD_ImportClipboardData, X11DRV_CLIPBOARD_ExportClipboardData },
 212     { CF_DIB, XATOM_image_bmp, X11DRV_CLIPBOARD_ImportImageBmp, X11DRV_CLIPBOARD_ExportImageBmp },
 213 };
 214
 215 static struct list format_list = LIST_INIT( format_list );
 216
 217 #define GET_ATOM(prop)  (((prop) < FIRST_XATOM) ? (Atom)(prop) : X11DRV_Atoms[(prop) - FIRST_XATOM])
 218
 219 /* Maps X properties to Windows formats */
 220 static const WCHAR wszRichTextFormat[] = {'R','i','c','h',' ','T','e','x','t',' ','F','o','r','m','a','t',0};
 221 static const WCHAR wszGIF[] = {'G','I','F',0};
 222 static const WCHAR wszJFIF[] = {'J','F','I','F',0};
 223 static const WCHAR wszPNG[] = {'P','N','G',0};
 224 static const WCHAR wszHTMLFormat[] = {'H','T','M','L',' ','F','o','r','m','a','t',0};
 225 static const struct
 226 {
 227     LPCWSTR lpszFormat;
 228     UINT   prop;
 229 } PropertyFormatMap[] =
 230 {
 231     { wszRichTextFormat, XATOM_text_rtf },
 232     { wszRichTextFormat, XATOM_text_richtext },
 233     { wszGIF, XATOM_image_gif },
 234     { wszJFIF, XATOM_image_jpeg },
 235     { wszPNG, XATOM_image_png },
 236     { wszHTMLFormat, XATOM_HTML_Format }, /* prefer this to text/html */
 237 };
 238
 239
 240 /*
 241  * Cached clipboard data.
 242  */
 243 static struct list data_list = LIST_INIT( data_list );
 244 static UINT ClipDataCount = 0;
 245
 246 /*
 247  * Clipboard sequence number
 248  */
 249 static UINT wSeqNo = 0;
 250
 251 /**************************************************************************
 252  *                Internal Clipboard implementation methods
 253  **************************************************************************/
 254
 255 static Window thread_selection_wnd(void)
 256 {
 257     struct x11drv_thread_data *thread_data = x11drv_init_thread_data();
 258     Window w = thread_data->selection_wnd;
 259
 260     if (!w)
 261     {
 262         w = XCreateWindow(thread_data->display, root_window, 0, 0, 1, 1, 0, CopyFromParent,
 263                           InputOnly, CopyFromParent, 0, NULL);
 264         if (w)
 265             thread_data->selection_wnd = w;
 266         else
 267             FIXME("Failed to create window. Fetching selection data will fail.\n");
 268     }
 269
 270     return w;
 271 }
 272
 273 static const char *debugstr_format( UINT id )
 274 {
 275     WCHAR buffer[256];
 276
 277     if (GetClipboardFormatNameW( id, buffer, 256 ))
 278         return wine_dbg_sprintf( "%04x %s", id, debugstr_w(buffer) );
 279
 280     switch (id)
 281     {
 282 #define BUILTIN(id) case id: return #id;
 283     BUILTIN(CF_TEXT)
 284     BUILTIN(CF_BITMAP)
 285     BUILTIN(CF_METAFILEPICT)
 286     BUILTIN(CF_SYLK)
 287     BUILTIN(CF_DIF)
 288     BUILTIN(CF_TIFF)
 289     BUILTIN(CF_OEMTEXT)
 290     BUILTIN(CF_DIB)
 291     BUILTIN(CF_PALETTE)
 292     BUILTIN(CF_PENDATA)
 293     BUILTIN(CF_RIFF)
 294     BUILTIN(CF_WAVE)
 295     BUILTIN(CF_UNICODETEXT)
 296     BUILTIN(CF_ENHMETAFILE)
 297     BUILTIN(CF_HDROP)
 298     BUILTIN(CF_LOCALE)
 299     BUILTIN(CF_DIBV5)
 300     BUILTIN(CF_OWNERDISPLAY)
 301     BUILTIN(CF_DSPTEXT)
 302     BUILTIN(CF_DSPBITMAP)
 303     BUILTIN(CF_DSPMETAFILEPICT)
 304     BUILTIN(CF_DSPENHMETAFILE)
 305 #undef BUILTIN
 306     default: return wine_dbg_sprintf( "%04x", id );
 307     }
 308 }
 309
 310 /**************************************************************************
 311  *              X11DRV_InitClipboard
 312  */
 313 void X11DRV_InitClipboard(void)
 314 {
 315     UINT i;
 316     WINE_CLIPFORMAT *format;
 317
 318     /* Register built-in formats */
 319     for (i = 0; i < sizeof(builtin_formats)/sizeof(builtin_formats[0]); i++)
 320     {
 321         if (!(format = HeapAlloc( GetProcessHeap(), 0, sizeof(*format )))) break;
 322         format->wFormatID       = builtin_formats[i].id;
 323         format->drvData         = GET_ATOM(builtin_formats[i].data);
 324         format->lpDrvImportFunc = builtin_formats[i].import;
 325         format->lpDrvExportFunc = builtin_formats[i].export;
 326         list_add_tail( &format_list, &format->entry );
 327     }
 328
 329     /* Register known mapping between window formats and X properties */
 330     for (i = 0; i < sizeof(PropertyFormatMap)/sizeof(PropertyFormatMap[0]); i++)
 331         X11DRV_CLIPBOARD_InsertClipboardFormat( RegisterClipboardFormatW(PropertyFormatMap[i].lpszFormat),
 332                                                 GET_ATOM(PropertyFormatMap[i].prop));
 333
 334     /* Set up a conversion function from "HTML Format" to "text/html" */
 335     format = X11DRV_CLIPBOARD_InsertClipboardFormat( RegisterClipboardFormatW(wszHTMLFormat),
 336                                                      GET_ATOM(XATOM_text_html));
 337     format->lpDrvExportFunc = X11DRV_CLIPBOARD_ExportTextHtml;
 338 }
 339
 340
 341 /**************************************************************************
 342  *                intern_atoms
 343  *
 344  * Intern atoms for formats that don't have one yet.
 345  */
 346 static void intern_atoms(void)
 347 {
 348     LPWINE_CLIPFORMAT format;
 349     int i, count, len;
 350     char **names;
 351     Atom *atoms;
 352     Display *display;
 353     WCHAR buffer[256];
 354
 355     count = 0;
 356     LIST_FOR_EACH_ENTRY( format, &format_list, WINE_CLIPFORMAT, entry )
 357         if (!format->drvData) count++;
 358     if (!count) return;
 359
 360     display = thread_init_display();
 361
 362     names = HeapAlloc( GetProcessHeap(), 0, count * sizeof(*names) );
 363     atoms = HeapAlloc( GetProcessHeap(), 0, count * sizeof(*atoms) );
 364
 365     i = 0;
 366     LIST_FOR_EACH_ENTRY( format, &format_list, WINE_CLIPFORMAT, entry )
 367         if (!format->drvData) {
 368             GetClipboardFormatNameW( format->wFormatID, buffer, 256 );
 369             len = WideCharToMultiByte(CP_UNIXCP, 0, buffer, -1, NULL, 0, NULL, NULL);
 370             names[i] = HeapAlloc(GetProcessHeap(), 0, len);
 371             WideCharToMultiByte(CP_UNIXCP, 0, buffer, -1, names[i++], len, NULL, NULL);
 372         }
 373
 374     XInternAtoms( display, names, count, False, atoms );
 375
 376     i = 0;
 377     LIST_FOR_EACH_ENTRY( format, &format_list, WINE_CLIPFORMAT, entry )
 378         if (!format->drvData) {
 379             HeapFree(GetProcessHeap(), 0, names[i]);
 380             format->drvData = atoms[i++];
 381         }
 382
 383     HeapFree( GetProcessHeap(), 0, names );
 384     HeapFree( GetProcessHeap(), 0, atoms );
 385 }
 386
 387
 388 /**************************************************************************
 389  *              register_format
 390  *
 391  * Register a custom X clipboard format.
 392  */
 393 static WINE_CLIPFORMAT *register_format( UINT id, Atom prop )
 394 {
 395     LPWINE_CLIPFORMAT lpFormat;
 396
 397     /* walk format chain to see if it's already registered */
 398     LIST_FOR_EACH_ENTRY( lpFormat, &format_list, WINE_CLIPFORMAT, entry )
 399         if (lpFormat->wFormatID == id) return lpFormat;
 400
 401     return X11DRV_CLIPBOARD_InsertClipboardFormat(id, prop);
 402 }
 403
 404
 405 /**************************************************************************
 406  *                X11DRV_CLIPBOARD_LookupProperty
 407  */
 408 static LPWINE_CLIPFORMAT X11DRV_CLIPBOARD_LookupProperty(LPWINE_CLIPFORMAT current, UINT drvData)
 409 {
 410     for (;;)
 411     {
 412         struct list *ptr = current ? &current->entry : &format_list;
 413         BOOL need_intern = FALSE;
 414
 415         while ((ptr = list_next( &format_list, ptr )))
 416         {
 417             LPWINE_CLIPFORMAT lpFormat = LIST_ENTRY( ptr, WINE_CLIPFORMAT, entry );
 418             if (lpFormat->drvData == drvData) return lpFormat;
 419             if (!lpFormat->drvData) need_intern = TRUE;
 420         }
 421         if (!need_intern) return NULL;
 422         intern_atoms();
 423         /* restart the search for the new atoms */
 424     }
 425 }
 426
 427
 428 /**************************************************************************
 429  *               X11DRV_CLIPBOARD_LookupData
 430  */
 431 static LPWINE_CLIPDATA X11DRV_CLIPBOARD_LookupData(DWORD wID)
 432 {
 433     WINE_CLIPDATA *data;
 434
 435     LIST_FOR_EACH_ENTRY( data, &data_list, WINE_CLIPDATA, entry )
 436         if (data->wFormatID == wID) return data;
 437
 438     return NULL;
 439 }
 440
 441
 442 /**************************************************************************
 443  *              InsertClipboardFormat
 444  */
 445 static WINE_CLIPFORMAT *X11DRV_CLIPBOARD_InsertClipboardFormat( UINT id, Atom prop )
 446 {
 447     LPWINE_CLIPFORMAT lpNewFormat;
 448
 449     /* allocate storage for new format entry */
 450     lpNewFormat = HeapAlloc(GetProcessHeap(), 0, sizeof(WINE_CLIPFORMAT));
 451
 452     if(lpNewFormat == NULL)
 453     {
 454         WARN("No more memory for a new format!\n");
 455         return NULL;
 456     }
 457     lpNewFormat->wFormatID = id;
 458     lpNewFormat->drvData = prop;
 459     lpNewFormat->lpDrvImportFunc = X11DRV_CLIPBOARD_ImportClipboardData;
 460     lpNewFormat->lpDrvExportFunc = X11DRV_CLIPBOARD_ExportClipboardData;
 461
 462     list_add_tail( &format_list, &lpNewFormat->entry );
 463
 464     TRACE("Registering format %s drvData %d\n",
 465           debugstr_format(lpNewFormat->wFormatID), lpNewFormat->drvData);
 466
 467     return lpNewFormat;
 468 }
 469
 470
 471
 472
 473 /**************************************************************************
 474  *                      X11DRV_CLIPBOARD_GetClipboardInfo
 475  */
 476 static BOOL X11DRV_CLIPBOARD_GetClipboardInfo(LPCLIPBOARDINFO cbInfo)
 477 {
 478     BOOL bRet = FALSE;
 479
 480     SERVER_START_REQ( set_clipboard_info )
 481     {
 482         req->flags = 0;
 483
 484         if (wine_server_call_err( req ))
 485         {
 486             ERR("Failed to get clipboard owner.\n");
 487         }
 488         else
 489         {
 490             cbInfo->hWndOpen = wine_server_ptr_handle( reply->old_clipboard );
 491             cbInfo->hWndOwner = wine_server_ptr_handle( reply->old_owner );
 492             cbInfo->hWndViewer = wine_server_ptr_handle( reply->old_viewer );
 493             cbInfo->seqno = reply->seqno;
 494             cbInfo->flags = reply->flags;
 495
 496             bRet = TRUE;
 497         }
 498     }
 499     SERVER_END_REQ;
 500
 501     return bRet;
 502 }
 503
 504
 505 /**************************************************************************
 506  *      X11DRV_CLIPBOARD_ReleaseOwnership
 507  */
 508 static BOOL X11DRV_CLIPBOARD_ReleaseOwnership(void)
 509 {
 510     BOOL bRet = FALSE;
 511
 512     SERVER_START_REQ( set_clipboard_info )
 513     {
 514         req->flags = SET_CB_RELOWNER | SET_CB_SEQNO;
 515
 516         if (wine_server_call_err( req ))
 517         {
 518             ERR("Failed to set clipboard.\n");
 519         }
 520         else
 521         {
 522             bRet = TRUE;
 523         }
 524     }
 525     SERVER_END_REQ;
 526
 527     return bRet;
 528 }
 529
 530
 531
 532 /**************************************************************************
 533  *                      X11DRV_CLIPBOARD_InsertClipboardData
 534  *
 535  * Caller *must* have the clipboard open and be the owner.
 536  */
 537 static BOOL X11DRV_CLIPBOARD_InsertClipboardData(UINT wFormatID, HANDLE hData, DWORD flags,
 538                                                  LPWINE_CLIPFORMAT lpFormat, BOOL override)
 539 {
 540     LPWINE_CLIPDATA lpData = X11DRV_CLIPBOARD_LookupData(wFormatID);
 541
 542     TRACE("format=%04x lpData=%p hData=%p flags=0x%08x lpFormat=%p override=%d\n",
 543         wFormatID, lpData, hData, flags, lpFormat, override);
 544
 545     /* make sure the format exists */
 546     if (!lpFormat) register_format( wFormatID, 0 );
 547
 548     if (lpData && !override)
 549         return TRUE;
 550
 551     if (lpData)
 552     {
 553         X11DRV_CLIPBOARD_FreeData(lpData);
 554
 555         lpData->hData = hData;
 556     }
 557     else
 558     {
 559         lpData = HeapAlloc(GetProcessHeap(), 0, sizeof(WINE_CLIPDATA));
 560
 561         lpData->wFormatID = wFormatID;
 562         lpData->hData = hData;
 563         lpData->lpFormat = lpFormat;
 564         lpData->drvData = 0;
 565
 566         list_add_tail( &data_list, &lpData->entry );
 567         ClipDataCount++;
 568     }
 569
 570     lpData->wFlags = flags;
 571
 572     return TRUE;
 573 }
 574
 575
 576 /**************************************************************************
 577  *                      X11DRV_CLIPBOARD_FreeData
 578  *
 579  * Free clipboard data handle.
 580  */
 581 static void X11DRV_CLIPBOARD_FreeData(LPWINE_CLIPDATA lpData)
 582 {
 583     TRACE("%04x\n", lpData->wFormatID);
 584
 585     if ((lpData->wFormatID >= CF_GDIOBJFIRST &&
 586         lpData->wFormatID <= CF_GDIOBJLAST) ||
 587         lpData->wFormatID == CF_BITMAP ||
 588         lpData->wFormatID == CF_DIB ||
 589         lpData->wFormatID == CF_PALETTE)
 590     {
 591       if (lpData->hData)
 592         DeleteObject(lpData->hData);
 593
 594       if ((lpData->wFormatID == CF_DIB) && lpData->drvData)
 595           XFreePixmap(gdi_display, lpData->drvData);
 596     }
 597     else if (lpData->wFormatID == CF_METAFILEPICT)
 598     {
 599       if (lpData->hData)
 600       {
 601         DeleteMetaFile(((METAFILEPICT *)GlobalLock( lpData->hData ))->hMF );
 602         GlobalFree(lpData->hData);
 603       }
 604     }
 605     else if (lpData->wFormatID == CF_ENHMETAFILE)
 606     {
 607         if (lpData->hData)
 608             DeleteEnhMetaFile(lpData->hData);
 609     }
 610     else if (lpData->wFormatID < CF_PRIVATEFIRST ||
 611              lpData->wFormatID > CF_PRIVATELAST)
 612     {
 613       if (lpData->hData)
 614         GlobalFree(lpData->hData);
 615     }
 616
 617     lpData->hData = 0;
 618     lpData->drvData = 0;
 619 }
 620
 621
 622 /**************************************************************************
 623  *                      X11DRV_CLIPBOARD_UpdateCache
 624  */
 625 static BOOL X11DRV_CLIPBOARD_UpdateCache(LPCLIPBOARDINFO lpcbinfo)
 626 {
 627     BOOL bret = TRUE;
 628
 629     if (!X11DRV_CLIPBOARD_IsSelectionOwner())
 630     {
 631         if (!X11DRV_CLIPBOARD_GetClipboardInfo(lpcbinfo))
 632         {
 633             ERR("Failed to retrieve clipboard information.\n");
 634             bret = FALSE;
 635         }
 636         else if (wSeqNo < lpcbinfo->seqno)
 637         {
 638             X11DRV_EmptyClipboard(TRUE);
 639
 640             if (X11DRV_CLIPBOARD_QueryAvailableData(thread_init_display(), lpcbinfo) < 0)
 641             {
 642                 ERR("Failed to cache clipboard data owned by another process.\n");
 643                 bret = FALSE;
 644             }
 645             else
 646             {
 647                 X11DRV_EndClipboardUpdate();
 648             }
 649
 650             wSeqNo = lpcbinfo->seqno;
 651         }
 652     }
 653
 654     return bret;
 655 }
 656
 657
 658 /**************************************************************************
 659  *                      X11DRV_CLIPBOARD_RenderFormat
 660  */
 661 static BOOL X11DRV_CLIPBOARD_RenderFormat(Display *display, LPWINE_CLIPDATA lpData)
 662 {
 663     BOOL bret = TRUE;
 664
 665     TRACE(" 0x%04x hData(%p)\n", lpData->wFormatID, lpData->hData);
 666
 667     if (lpData->hData) return bret; /* Already rendered */
 668
 669     if (lpData->wFlags & CF_FLAG_SYNTHESIZED)
 670         bret = X11DRV_CLIPBOARD_RenderSynthesizedFormat(display, lpData);
 671     else if (!X11DRV_CLIPBOARD_IsSelectionOwner())
 672     {
 673         if (!X11DRV_CLIPBOARD_ReadSelectionData(display, lpData))
 674         {
 675             ERR("Failed to cache clipboard data owned by another process. Format=%04x\n",
 676                 lpData->wFormatID);
 677             bret = FALSE;
 678         }
 679     }
 680     else
 681     {
 682         CLIPBOARDINFO cbInfo;
 683
 684         if (X11DRV_CLIPBOARD_GetClipboardInfo(&cbInfo) && cbInfo.hWndOwner)
 685         {
 686             /* Send a WM_RENDERFORMAT message to notify the owner to render the
 687              * data requested into the clipboard.
 688              */
 689             TRACE("Sending WM_RENDERFORMAT message to hwnd(%p)\n", cbInfo.hWndOwner);
 690             SendMessageW(cbInfo.hWndOwner, WM_RENDERFORMAT, lpData->wFormatID, 0);
 691
 692             if (!lpData->hData) bret = FALSE;
 693         }
 694         else
 695         {
 696             ERR("hWndClipOwner is lost!\n");
 697             bret = FALSE;
 698         }
 699     }
 700
 701     return bret;
 702 }
 703
 704
 705 /**************************************************************************
 706  *                      CLIPBOARD_ConvertText
 707  * Returns number of required/converted characters - not bytes!
 708  */
 709 static INT CLIPBOARD_ConvertText(WORD src_fmt, void const *src, INT src_size,
 710                                  WORD dst_fmt, void *dst, INT dst_size)
 711 {
 712     UINT cp;
 713
 714     if(src_fmt == CF_UNICODETEXT)
 715     {
 716         switch(dst_fmt)
 717         {
 718         case CF_TEXT:
 719             cp = CP_ACP;
 720             break;
 721         case CF_OEMTEXT:
 722             cp = CP_OEMCP;
 723             break;
 724         default:
 725             return 0;
 726         }
 727         return WideCharToMultiByte(cp, 0, src, src_size, dst, dst_size, NULL, NULL);
 728     }
 729
 730     if(dst_fmt == CF_UNICODETEXT)
 731     {
 732         switch(src_fmt)
 733         {
 734         case CF_TEXT:
 735             cp = CP_ACP;
 736             break;
 737         case CF_OEMTEXT:
 738             cp = CP_OEMCP;
 739             break;
 740         default:
 741             return 0;
 742         }
 743         return MultiByteToWideChar(cp, 0, src, src_size, dst, dst_size);
 744     }
 745
 746     if(!dst_size) return src_size;
 747
 748     if(dst_size > src_size) dst_size = src_size;
 749
 750     if(src_fmt == CF_TEXT )
 751         CharToOemBuffA(src, dst, dst_size);
 752     else
 753         OemToCharBuffA(src, dst, dst_size);
 754
 755     return dst_size;
 756 }
 757
 758
 759 /**************************************************************************
 760  *                      X11DRV_CLIPBOARD_RenderSynthesizedFormat
 761  */
 762 static BOOL X11DRV_CLIPBOARD_RenderSynthesizedFormat(Display *display, LPWINE_CLIPDATA lpData)
 763 {
 764     BOOL bret = FALSE;
 765
 766     TRACE("\n");
 767
 768     if (lpData->wFlags & CF_FLAG_SYNTHESIZED)
 769     {
 770         UINT wFormatID = lpData->wFormatID;
 771
 772         if (wFormatID == CF_UNICODETEXT || wFormatID == CF_TEXT || wFormatID == CF_OEMTEXT)
 773             bret = X11DRV_CLIPBOARD_RenderSynthesizedText(display, wFormatID);
 774         else
 775         {
 776             switch (wFormatID)
 777             {
 778                 case CF_DIB:
 779                     bret = X11DRV_CLIPBOARD_RenderSynthesizedDIB( display );
 780                     break;
 781
 782                 case CF_BITMAP:
 783                     bret = X11DRV_CLIPBOARD_RenderSynthesizedBitmap( display );
 784                     break;
 785
 786                 case CF_ENHMETAFILE:
 787                     bret = X11DRV_CLIPBOARD_RenderSynthesizedEnhMetaFile( display );
 788                     break;
 789
 790                 case CF_METAFILEPICT:
 791                     FIXME("Synthesizing CF_METAFILEPICT not implemented\n");
 792                     break;
 793
 794                 default:
 795                     FIXME("Called to synthesize unknown format 0x%08x\n", wFormatID);
 796                     break;
 797             }
 798         }
 799
 800         lpData->wFlags &= ~CF_FLAG_SYNTHESIZED;
 801     }
 802
 803     return bret;
 804 }
 805
 806
 807 /**************************************************************************
 808  *                      X11DRV_CLIPBOARD_RenderSynthesizedText
 809  *
 810  * Renders synthesized text
 811  */
 812 static BOOL X11DRV_CLIPBOARD_RenderSynthesizedText(Display *display, UINT wFormatID)
 813 {
 814     LPCSTR lpstrS;
 815     LPSTR  lpstrT;
 816     HANDLE hData;
 817     INT src_chars, dst_chars, alloc_size;
 818     LPWINE_CLIPDATA lpSource = NULL;
 819
 820     TRACE("%04x\n", wFormatID);
 821
 822     if ((lpSource = X11DRV_CLIPBOARD_LookupData(wFormatID)) &&
 823         lpSource->hData)
 824         return TRUE;
 825
 826     /* Look for rendered source or non-synthesized source */
 827     if ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_UNICODETEXT)) &&
 828         (!(lpSource->wFlags & CF_FLAG_SYNTHESIZED) || lpSource->hData))
 829     {
 830         TRACE("UNICODETEXT -> %04x\n", wFormatID);
 831     }
 832     else if ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_TEXT)) &&
 833         (!(lpSource->wFlags & CF_FLAG_SYNTHESIZED) || lpSource->hData))
 834     {
 835         TRACE("TEXT -> %04x\n", wFormatID);
 836     }
 837     else if ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_OEMTEXT)) &&
 838         (!(lpSource->wFlags & CF_FLAG_SYNTHESIZED) || lpSource->hData))
 839     {
 840         TRACE("OEMTEXT -> %04x\n", wFormatID);
 841     }
 842
 843     if (!lpSource || (lpSource->wFlags & CF_FLAG_SYNTHESIZED &&
 844         !lpSource->hData))
 845         return FALSE;
 846
 847     /* Ask the clipboard owner to render the source text if necessary */
 848     if (!lpSource->hData && !X11DRV_CLIPBOARD_RenderFormat(display, lpSource))
 849         return FALSE;
 850
 851     lpstrS = GlobalLock(lpSource->hData);
 852     if (!lpstrS)
 853         return FALSE;
 854
 855     /* Text always NULL terminated */
 856     if(lpSource->wFormatID == CF_UNICODETEXT)
 857         src_chars = strlenW((LPCWSTR)lpstrS) + 1;
 858     else
 859         src_chars = strlen(lpstrS) + 1;
 860
 861     /* Calculate number of characters in the destination buffer */
 862     dst_chars = CLIPBOARD_ConvertText(lpSource->wFormatID, lpstrS,
 863         src_chars, wFormatID, NULL, 0);
 864
 865     if (!dst_chars)
 866         return FALSE;
 867
 868     TRACE("Converting from '%04x' to '%04x', %i chars\n",
 869         lpSource->wFormatID, wFormatID, src_chars);
 870
 871     /* Convert characters to bytes */
 872     if(wFormatID == CF_UNICODETEXT)
 873         alloc_size = dst_chars * sizeof(WCHAR);
 874     else
 875         alloc_size = dst_chars;
 876
 877     hData = GlobalAlloc(GMEM_ZEROINIT | GMEM_MOVEABLE |
 878         GMEM_DDESHARE, alloc_size);
 879
 880     lpstrT = GlobalLock(hData);
 881
 882     if (lpstrT)
 883     {
 884         CLIPBOARD_ConvertText(lpSource->wFormatID, lpstrS, src_chars,
 885             wFormatID, lpstrT, dst_chars);
 886         GlobalUnlock(hData);
 887     }
 888
 889     GlobalUnlock(lpSource->hData);
 890
 891     return X11DRV_CLIPBOARD_InsertClipboardData(wFormatID, hData, 0, NULL, TRUE);
 892 }
 893
 894
 895 /***********************************************************************
 896  *           bitmap_info_size
 897  *
 898  * Return the size of the bitmap info structure including color table.
 899  */
 900 static int bitmap_info_size( const BITMAPINFO * info, WORD coloruse )
 901 {
 902     unsigned int colors, size, masks = 0;
 903
 904     if (info->bmiHeader.biSize == sizeof(BITMAPCOREHEADER))
 905     {
 906         const BITMAPCOREHEADER *core = (const BITMAPCOREHEADER *)info;
 907         colors = (core->bcBitCount <= 8) ? 1 << core->bcBitCount : 0;
 908         return sizeof(BITMAPCOREHEADER) + colors *
 909              ((coloruse == DIB_RGB_COLORS) ? sizeof(RGBTRIPLE) : sizeof(WORD));
 910     }
 911     else  /* assume BITMAPINFOHEADER */
 912     {
 913         colors = info->bmiHeader.biClrUsed;
 914         if (!colors && (info->bmiHeader.biBitCount <= 8))
 915             colors = 1 << info->bmiHeader.biBitCount;
 916         if (info->bmiHeader.biCompression == BI_BITFIELDS) masks = 3;
 917         size = max( info->bmiHeader.biSize, sizeof(BITMAPINFOHEADER) + masks * sizeof(DWORD) );
 918         return size + colors * ((coloruse == DIB_RGB_COLORS) ? sizeof(RGBQUAD) : sizeof(WORD));
 919     }
 920 }
 921
 922
 923 /***********************************************************************
 924  *           create_dib_from_bitmap
 925  *
 926  *  Allocates a packed DIB and copies the bitmap data into it.
 927  */
 928 static HGLOBAL create_dib_from_bitmap(HBITMAP hBmp)
 929 {
 930     BITMAP bmp;
 931     HDC hdc;
 932     HGLOBAL hPackedDIB;
 933     LPBYTE pPackedDIB;
 934     LPBITMAPINFOHEADER pbmiHeader;
 935     unsigned int cDataSize, cPackedSize, OffsetBits;
 936     int nLinesCopied;
 937
 938     if (!GetObjectW( hBmp, sizeof(bmp), &bmp )) return 0;
 939
 940     /*
 941      * A packed DIB contains a BITMAPINFO structure followed immediately by
 942      * an optional color palette and the pixel data.
 943      */
 944
 945     /* Calculate the size of the packed DIB */
 946     cDataSize = abs( bmp.bmHeight ) * (((bmp.bmWidth * bmp.bmBitsPixel + 31) / 8) & ~3);
 947     cPackedSize = sizeof(BITMAPINFOHEADER)
 948                   + ( (bmp.bmBitsPixel <= 8) ? (sizeof(RGBQUAD) * (1 << bmp.bmBitsPixel)) : 0 )
 949                   + cDataSize;
 950     /* Get the offset to the bits */
 951     OffsetBits = cPackedSize - cDataSize;
 952
 953     /* Allocate the packed DIB */
 954     TRACE("\tAllocating packed DIB of size %d\n", cPackedSize);
 955     hPackedDIB = GlobalAlloc(GMEM_MOVEABLE | GMEM_DDESHARE /*| GMEM_ZEROINIT*/,
 956                              cPackedSize );
 957     if ( !hPackedDIB )
 958     {
 959         WARN("Could not allocate packed DIB!\n");
 960         return 0;
 961     }
 962
 963     /* A packed DIB starts with a BITMAPINFOHEADER */
 964     pPackedDIB = GlobalLock(hPackedDIB);
 965     pbmiHeader = (LPBITMAPINFOHEADER)pPackedDIB;
 966
 967     /* Init the BITMAPINFOHEADER */
 968     pbmiHeader->biSize = sizeof(BITMAPINFOHEADER);
 969     pbmiHeader->biWidth = bmp.bmWidth;
 970     pbmiHeader->biHeight = bmp.bmHeight;
 971     pbmiHeader->biPlanes = 1;
 972     pbmiHeader->biBitCount = bmp.bmBitsPixel;
 973     pbmiHeader->biCompression = BI_RGB;
 974     pbmiHeader->biSizeImage = 0;
 975     pbmiHeader->biXPelsPerMeter = pbmiHeader->biYPelsPerMeter = 0;
 976     pbmiHeader->biClrUsed = 0;
 977     pbmiHeader->biClrImportant = 0;
 978
 979     /* Retrieve the DIB bits from the bitmap and fill in the
 980      * DIB color table if present */
 981     hdc = GetDC( 0 );
 982     nLinesCopied = GetDIBits(hdc,                       /* Handle to device context */
 983                              hBmp,                      /* Handle to bitmap */
 984                              0,                         /* First scan line to set in dest bitmap */
 985                              bmp.bmHeight,              /* Number of scan lines to copy */
 986                              pPackedDIB + OffsetBits,   /* [out] Address of array for bitmap bits */
 987                              (LPBITMAPINFO) pbmiHeader, /* [out] Address of BITMAPINFO structure */
 988                              0);                        /* RGB or palette index */
 989     GlobalUnlock(hPackedDIB);
 990     ReleaseDC( 0, hdc );
 991
 992     /* Cleanup if GetDIBits failed */
 993     if (nLinesCopied != bmp.bmHeight)
 994     {
 995         TRACE("\tGetDIBits returned %d. Actual lines=%d\n", nLinesCopied, bmp.bmHeight);
 996         GlobalFree(hPackedDIB);
 997         hPackedDIB = 0;
 998     }
 999     return hPackedDIB;
1000 }
1001
1002
1003 /**************************************************************************
1004  *                      X11DRV_CLIPBOARD_RenderSynthesizedDIB
1005  *
1006  * Renders synthesized DIB
1007  */
1008 static BOOL X11DRV_CLIPBOARD_RenderSynthesizedDIB(Display *display)
1009 {
1010     BOOL bret = FALSE;
1011     LPWINE_CLIPDATA lpSource = NULL;
1012
1013     TRACE("\n");
1014
1015     if ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_DIB)) && lpSource->hData)
1016     {
1017         bret = TRUE;
1018     }
1019     /* If we have a bitmap and it's not synthesized or it has been rendered */
1020     else if ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_BITMAP)) &&
1021         (!(lpSource->wFlags & CF_FLAG_SYNTHESIZED) || lpSource->hData))
1022     {
1023         /* Render source if required */
1024         if (lpSource->hData || X11DRV_CLIPBOARD_RenderFormat(display, lpSource))
1025         {
1026             HGLOBAL hData = create_dib_from_bitmap( lpSource->hData );
1027             if (hData)
1028             {
1029                 X11DRV_CLIPBOARD_InsertClipboardData(CF_DIB, hData, 0, NULL, TRUE);
1030                 bret = TRUE;
1031             }
1032         }
1033     }
1034
1035     return bret;
1036 }
1037
1038
1039 /**************************************************************************
1040  *                      X11DRV_CLIPBOARD_RenderSynthesizedBitmap
1041  *
1042  * Renders synthesized bitmap
1043  */
1044 static BOOL X11DRV_CLIPBOARD_RenderSynthesizedBitmap(Display *display)
1045 {
1046     BOOL bret = FALSE;
1047     LPWINE_CLIPDATA lpSource = NULL;
1048
1049     TRACE("\n");
1050
1051     if ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_BITMAP)) && lpSource->hData)
1052     {
1053         bret = TRUE;
1054     }
1055     /* If we have a dib and it's not synthesized or it has been rendered */
1056     else if ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_DIB)) &&
1057         (!(lpSource->wFlags & CF_FLAG_SYNTHESIZED) || lpSource->hData))
1058     {
1059         /* Render source if required */
1060         if (lpSource->hData || X11DRV_CLIPBOARD_RenderFormat(display, lpSource))
1061         {
1062             HDC hdc;
1063             HBITMAP hData = NULL;
1064             unsigned int offset;
1065             LPBITMAPINFOHEADER lpbmih;
1066
1067             hdc = GetDC(NULL);
1068             lpbmih = GlobalLock(lpSource->hData);
1069             if (lpbmih)
1070             {
1071                 offset = sizeof(BITMAPINFOHEADER)
1072                       + ((lpbmih->biBitCount <= 8) ? (sizeof(RGBQUAD) *
1073                         (1 << lpbmih->biBitCount)) : 0);
1074
1075                 hData = CreateDIBitmap(hdc, lpbmih, CBM_INIT, (LPBYTE)lpbmih +
1076                     offset, (LPBITMAPINFO) lpbmih, DIB_RGB_COLORS);
1077
1078                 GlobalUnlock(lpSource->hData);
1079             }
1080             ReleaseDC(NULL, hdc);
1081
1082             if (hData)
1083             {
1084                 X11DRV_CLIPBOARD_InsertClipboardData(CF_BITMAP, hData, 0, NULL, TRUE);
1085                 bret = TRUE;
1086             }
1087         }
1088     }
1089
1090     return bret;
1091 }
1092
1093
1094 /**************************************************************************
1095  *                      X11DRV_CLIPBOARD_RenderSynthesizedEnhMetaFile
1096  */
1097 static BOOL X11DRV_CLIPBOARD_RenderSynthesizedEnhMetaFile(Display *display)
1098 {
1099     LPWINE_CLIPDATA lpSource = NULL;
1100
1101     TRACE("\n");
1102
1103     if ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_ENHMETAFILE)) && lpSource->hData)
1104         return TRUE;
1105     /* If we have a MF pict and it's not synthesized or it has been rendered */
1106     else if ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_METAFILEPICT)) &&
1107         (!(lpSource->wFlags & CF_FLAG_SYNTHESIZED) || lpSource->hData))
1108     {
1109         /* Render source if required */
1110         if (lpSource->hData || X11DRV_CLIPBOARD_RenderFormat(display, lpSource))
1111         {
1112             METAFILEPICT *pmfp;
1113             HENHMETAFILE hData = NULL;
1114
1115             pmfp = GlobalLock(lpSource->hData);
1116             if (pmfp)
1117             {
1118                 UINT size_mf_bits = GetMetaFileBitsEx(pmfp->hMF, 0, NULL);
1119                 void *mf_bits = HeapAlloc(GetProcessHeap(), 0, size_mf_bits);
1120                 if (mf_bits)
1121                 {
1122                     GetMetaFileBitsEx(pmfp->hMF, size_mf_bits, mf_bits);
1123                     hData = SetWinMetaFileBits(size_mf_bits, mf_bits, NULL, pmfp);
1124                     HeapFree(GetProcessHeap(), 0, mf_bits);
1125                 }
1126                 GlobalUnlock(lpSource->hData);
1127             }
1128
1129             if (hData)
1130             {
1131                 X11DRV_CLIPBOARD_InsertClipboardData(CF_ENHMETAFILE, hData, 0, NULL, TRUE);
1132                 return TRUE;
1133             }
1134         }
1135     }
1136
1137     return FALSE;
1138 }
1139
1140
1141 /**************************************************************************
1142  *              X11DRV_CLIPBOARD_ImportXAString
1143  *
1144  *  Import XA_STRING, converting the string to CF_TEXT.
1145  */
1146 static HANDLE X11DRV_CLIPBOARD_ImportXAString(Display *display, Window w, Atom prop)
1147 {
1148     LPBYTE lpdata;
1149     unsigned long cbytes;
1150     LPSTR lpstr;
1151     unsigned long i, inlcount = 0;
1152     HANDLE hText = 0;
1153
1154     if (!X11DRV_CLIPBOARD_ReadProperty(display, w, prop, &lpdata, &cbytes))
1155         return 0;
1156
1157     for (i = 0; i <= cbytes; i++)
1158     {
1159         if (lpdata[i] == '\n')
1160             inlcount++;
1161     }
1162
1163     if ((hText = GlobalAlloc(GMEM_MOVEABLE | GMEM_DDESHARE, cbytes + inlcount + 1)))
1164     {
1165         lpstr = GlobalLock(hText);
1166
1167         for (i = 0, inlcount = 0; i <= cbytes; i++)
1168         {
1169             if (lpdata[i] == '\n')
1170                 lpstr[inlcount++] = '\r';
1171
1172             lpstr[inlcount++] = lpdata[i];
1173         }
1174
1175         GlobalUnlock(hText);
1176     }
1177
1178     /* Free the retrieved property data */
1179     HeapFree(GetProcessHeap(), 0, lpdata);
1180
1181     return hText;
1182 }
1183
1184
1185 /**************************************************************************
1186  *              X11DRV_CLIPBOARD_ImportUTF8
1187  *
1188  *  Import XA_STRING, converting the string to CF_UNICODE.
1189  */
1190 static HANDLE X11DRV_CLIPBOARD_ImportUTF8(Display *display, Window w, Atom prop)
1191 {
1192     LPBYTE lpdata;
1193     unsigned long cbytes;
1194     LPSTR lpstr;
1195     unsigned long i, inlcount = 0;
1196     HANDLE hUnicodeText = 0;
1197
1198     if (!X11DRV_CLIPBOARD_ReadProperty(display, w, prop, &lpdata, &cbytes))
1199         return 0;
1200
1201     for (i = 0; i <= cbytes; i++)
1202     {
1203         if (lpdata[i] == '\n')
1204             inlcount++;
1205     }
1206
1207     if ((lpstr = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, cbytes + inlcount + 1)))
1208     {
1209         UINT count;
1210
1211         for (i = 0, inlcount = 0; i <= cbytes; i++)
1212         {
1213             if (lpdata[i] == '\n')
1214                 lpstr[inlcount++] = '\r';
1215
1216             lpstr[inlcount++] = lpdata[i];
1217         }
1218
1219         count = MultiByteToWideChar(CP_UTF8, 0, lpstr, -1, NULL, 0);
1220         hUnicodeText = GlobalAlloc(GMEM_MOVEABLE | GMEM_DDESHARE, count * sizeof(WCHAR));
1221
1222         if (hUnicodeText)
1223         {
1224             WCHAR *textW = GlobalLock(hUnicodeText);
1225             MultiByteToWideChar(CP_UTF8, 0, lpstr, -1, textW, count);
1226             GlobalUnlock(hUnicodeText);
1227         }
1228
1229         HeapFree(GetProcessHeap(), 0, lpstr);
1230     }
1231
1232     /* Free the retrieved property data */
1233     HeapFree(GetProcessHeap(), 0, lpdata);
1234
1235     return hUnicodeText;
1236 }
1237
1238
1239 /**************************************************************************
1240  *              X11DRV_CLIPBOARD_ImportCompoundText
1241  *
1242  *  Import COMPOUND_TEXT to CF_UNICODE
1243  */
1244 static HANDLE X11DRV_CLIPBOARD_ImportCompoundText(Display *display, Window w, Atom prop)
1245 {
1246     int i, j, ret;
1247     char** srcstr;
1248     int count, lcount;
1249     int srclen, destlen;
1250     HANDLE hUnicodeText;
1251     XTextProperty txtprop;
1252
1253     if (!X11DRV_CLIPBOARD_ReadProperty(display, w, prop, &txtprop.value, &txtprop.nitems))
1254     {
1255         return 0;
1256     }
1257
1258     txtprop.encoding = x11drv_atom(COMPOUND_TEXT);
1259     txtprop.format = 8;
1260     ret = XmbTextPropertyToTextList(display, &txtprop, &srcstr, &count);
1261     HeapFree(GetProcessHeap(), 0, txtprop.value);
1262     if (ret != Success || !count) return 0;
1263
1264     TRACE("Importing %d line(s)\n", count);
1265
1266     /* Compute number of lines */
1267     srclen = strlen(srcstr[0]);
1268     for (i = 0, lcount = 0; i <= srclen; i++)
1269     {
1270         if (srcstr[0][i] == '\n')
1271             lcount++;
1272     }
1273
1274     destlen = MultiByteToWideChar(CP_UNIXCP, 0, srcstr[0], -1, NULL, 0);
1275
1276     TRACE("lcount = %d, destlen=%d, srcstr %s\n", lcount, destlen, srcstr[0]);
1277
1278     if ((hUnicodeText = GlobalAlloc(GMEM_MOVEABLE | GMEM_DDESHARE, (destlen + lcount + 1) * sizeof(WCHAR))))
1279     {
1280         WCHAR *deststr = GlobalLock(hUnicodeText);
1281         MultiByteToWideChar(CP_UNIXCP, 0, srcstr[0], -1, deststr, destlen);
1282
1283         if (lcount)
1284         {
1285             for (i = destlen - 1, j = destlen + lcount - 1; i >= 0; i--, j--)
1286             {
1287                 deststr[j] = deststr[i];
1288
1289                 if (deststr[i] == '\n')
1290                     deststr[--j] = '\r';
1291             }
1292         }
1293
1294         GlobalUnlock(hUnicodeText);
1295     }
1296
1297     XFreeStringList(srcstr);
1298
1299     return hUnicodeText;
1300 }
1301
1302
1303 /**************************************************************************
1304  *              X11DRV_CLIPBOARD_ImportXAPIXMAP
1305  *
1306  *  Import XA_PIXMAP, converting the image to CF_DIB.
1307  */
1308 static HANDLE X11DRV_CLIPBOARD_ImportXAPIXMAP(Display *display, Window w, Atom prop)
1309 {
1310     LPBYTE lpdata;
1311     unsigned long cbytes;
1312     Pixmap *pPixmap;
1313     HANDLE hClipData = 0;
1314
1315     if (X11DRV_CLIPBOARD_ReadProperty(display, w, prop, &lpdata, &cbytes))
1316     {
1317         XVisualInfo vis = default_visual;
1318         char buffer[FIELD_OFFSET( BITMAPINFO, bmiColors[256] )];
1319         BITMAPINFO *info = (BITMAPINFO *)buffer;
1320         struct gdi_image_bits bits;
1321         Window root;
1322         int x,y;               /* Unused */
1323         unsigned border_width; /* Unused */
1324         unsigned int depth, width, height;
1325
1326         pPixmap = (Pixmap *) lpdata;
1327
1328         /* Get the Pixmap dimensions and bit depth */
1329         if (!XGetGeometry(gdi_display, *pPixmap, &root, &x, &y, &width, &height,
1330                           &border_width, &depth)) depth = 0;
1331         if (!pixmap_formats[depth]) return 0;
1332
1333         TRACE("\tPixmap properties: width=%d, height=%d, depth=%d\n",
1334               width, height, depth);
1335
1336         if (depth != vis.depth) switch (pixmap_formats[depth]->bits_per_pixel)
1337         {
1338         case 1:
1339         case 4:
1340         case 8:
1341             break;
1342         case 16:  /* assume R5G5B5 */
1343             vis.red_mask   = 0x7c00;
1344             vis.green_mask = 0x03e0;
1345             vis.blue_mask  = 0x001f;
1346             break;
1347         case 24:  /* assume R8G8B8 */
1348         case 32:  /* assume A8R8G8B8 */
1349             vis.red_mask   = 0xff0000;
1350             vis.green_mask = 0x00ff00;
1351             vis.blue_mask  = 0x0000ff;
1352             break;
1353         default:
1354             return 0;
1355         }
1356
1357         if (!get_pixmap_image( *pPixmap, width, height, &vis, info, &bits ))
1358         {
1359             DWORD info_size = bitmap_info_size( info, DIB_RGB_COLORS );
1360             BYTE *ptr;
1361
1362             hClipData = GlobalAlloc( GMEM_MOVEABLE | GMEM_DDESHARE,
1363                                      info_size + info->bmiHeader.biSizeImage );
1364             if (hClipData)
1365             {
1366                 ptr = GlobalLock( hClipData );
1367                 memcpy( ptr, info, info_size );
1368                 memcpy( ptr + info_size, bits.ptr, info->bmiHeader.biSizeImage );
1369                 GlobalUnlock( hClipData );
1370             }
1371             if (bits.free) bits.free( &bits );
1372         }
1373     }
1374
1375     return hClipData;
1376 }
1377
1378
1379 /**************************************************************************
1380  *              X11DRV_CLIPBOARD_ImportImageBmp
1381  *
1382  *  Import image/bmp, converting the image to CF_DIB.
1383  */
1384 static HANDLE X11DRV_CLIPBOARD_ImportImageBmp(Display *display, Window w, Atom prop)
1385 {
1386     LPBYTE lpdata;
1387     unsigned long cbytes;
1388     HANDLE hClipData = 0;
1389
1390     if (X11DRV_CLIPBOARD_ReadProperty(display, w, prop, &lpdata, &cbytes))
1391     {
1392         BITMAPFILEHEADER *bfh = (BITMAPFILEHEADER*)lpdata;
1393
1394         if (cbytes >= sizeof(BITMAPFILEHEADER)+sizeof(BITMAPCOREHEADER) &&
1395             bfh->bfType == 0x4d42 /* "BM" */)
1396         {
1397             BITMAPINFO *bmi = (BITMAPINFO*)(bfh+1);
1398             HBITMAP hbmp;
1399             HDC hdc;
1400
1401             hdc = GetDC(0);
1402             hbmp = CreateDIBitmap(
1403                 hdc,
1404                 &(bmi->bmiHeader),
1405                 CBM_INIT,
1406                 lpdata+bfh->bfOffBits,
1407                 bmi,
1408                 DIB_RGB_COLORS
1409                 );
1410
1411             hClipData = create_dib_from_bitmap( hbmp );
1412
1413             DeleteObject(hbmp);
1414             ReleaseDC(0, hdc);
1415         }
1416
1417         /* Free the retrieved property data */
1418         HeapFree(GetProcessHeap(), 0, lpdata);
1419     }
1420
1421     return hClipData;
1422 }
1423
1424
1425 /**************************************************************************
1426  *              X11DRV_CLIPBOARD_ImportMetaFilePict
1427  *
1428  *  Import MetaFilePict.
1429  */
1430 static HANDLE X11DRV_CLIPBOARD_ImportMetaFilePict(Display *display, Window w, Atom prop)
1431 {
1432     LPBYTE lpdata;
1433     unsigned long cbytes;
1434     HANDLE hClipData = 0;
1435
1436     if (X11DRV_CLIPBOARD_ReadProperty(display, w, prop, &lpdata, &cbytes))
1437     {
1438         if (cbytes)
1439             hClipData = X11DRV_CLIPBOARD_SerializeMetafile(CF_METAFILEPICT, lpdata, (LPDWORD)&cbytes, FALSE);
1440
1441         /* Free the retrieved property data */
1442         HeapFree(GetProcessHeap(), 0, lpdata);
1443     }
1444
1445     return hClipData;
1446 }
1447
1448
1449 /**************************************************************************
1450  *              X11DRV_ImportEnhMetaFile
1451  *
1452  *  Import EnhMetaFile.
1453  */
1454 static HANDLE X11DRV_CLIPBOARD_ImportEnhMetaFile(Display *display, Window w, Atom prop)
1455 {
1456     LPBYTE lpdata;
1457     unsigned long cbytes;
1458     HANDLE hClipData = 0;
1459
1460     if (X11DRV_CLIPBOARD_ReadProperty(display, w, prop, &lpdata, &cbytes))
1461     {
1462         if (cbytes)
1463             hClipData = X11DRV_CLIPBOARD_SerializeMetafile(CF_ENHMETAFILE, lpdata, (LPDWORD)&cbytes, FALSE);
1464
1465         /* Free the retrieved property data */
1466         HeapFree(GetProcessHeap(), 0, lpdata);
1467     }
1468
1469     return hClipData;
1470 }
1471
1472
1473 /**************************************************************************
1474  *              X11DRV_ImportClipbordaData
1475  *
1476  *  Generic import clipboard data routine.
1477  */
1478 static HANDLE X11DRV_CLIPBOARD_ImportClipboardData(Display *display, Window w, Atom prop)
1479 {
1480     LPVOID lpClipData;
1481     LPBYTE lpdata;
1482     unsigned long cbytes;
1483     HANDLE hClipData = 0;
1484
1485     if (X11DRV_CLIPBOARD_ReadProperty(display, w, prop, &lpdata, &cbytes))
1486     {
1487         if (cbytes)
1488         {
1489             /* Turn on the DDESHARE flag to enable shared 32 bit memory */
1490             hClipData = GlobalAlloc(GMEM_MOVEABLE | GMEM_DDESHARE, cbytes);
1491             if (hClipData == 0)
1492                 return NULL;
1493
1494             if ((lpClipData = GlobalLock(hClipData)))
1495             {
1496                 memcpy(lpClipData, lpdata, cbytes);
1497                 GlobalUnlock(hClipData);
1498             }
1499             else
1500             {
1501                 GlobalFree(hClipData);
1502                 hClipData = 0;
1503             }
1504         }
1505
1506         /* Free the retrieved property data */
1507         HeapFree(GetProcessHeap(), 0, lpdata);
1508     }
1509
1510     return hClipData;
1511 }
1512
1513
1514 /**************************************************************************
1515                 X11DRV_CLIPBOARD_ExportClipboardData
1516  *
1517  *  Generic export clipboard data routine.
1518  */
1519 static HANDLE X11DRV_CLIPBOARD_ExportClipboardData(Display *display, Window requestor, Atom aTarget,
1520                                             Atom rprop, LPWINE_CLIPDATA lpData, LPDWORD lpBytes)
1521 {
1522     LPVOID lpClipData;
1523     UINT datasize = 0;
1524     HANDLE hClipData = 0;
1525
1526     *lpBytes = 0; /* Assume failure */
1527
1528     if (!X11DRV_CLIPBOARD_RenderFormat(display, lpData))
1529         ERR("Failed to export %04x format\n", lpData->wFormatID);
1530     else
1531     {
1532         datasize = GlobalSize(lpData->hData);
1533
1534         hClipData = GlobalAlloc(GMEM_MOVEABLE | GMEM_DDESHARE, datasize);
1535         if (hClipData == 0) return NULL;
1536
1537         if ((lpClipData = GlobalLock(hClipData)))
1538         {
1539             LPVOID lpdata = GlobalLock(lpData->hData);
1540
1541             memcpy(lpClipData, lpdata, datasize);
1542             *lpBytes = datasize;
1543
1544             GlobalUnlock(lpData->hData);
1545             GlobalUnlock(hClipData);
1546         } else {
1547             GlobalFree(hClipData);
1548             hClipData = 0;
1549         }
1550     }
1551
1552     return hClipData;
1553 }
1554
1555
1556 /**************************************************************************
1557  *              X11DRV_CLIPBOARD_ExportXAString
1558  *
1559  *  Export CF_TEXT converting the string to XA_STRING.
1560  *  Helper function for X11DRV_CLIPBOARD_ExportString.
1561  */
1562 static HANDLE X11DRV_CLIPBOARD_ExportXAString(LPWINE_CLIPDATA lpData, LPDWORD lpBytes)
1563 {
1564     UINT i, j;
1565     UINT size;
1566     LPSTR text, lpstr = NULL;
1567
1568     *lpBytes = 0; /* Assume return has zero bytes */
1569
1570     text = GlobalLock(lpData->hData);
1571     size = strlen(text);
1572
1573     /* remove carriage returns */
1574     lpstr = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, size + 1);
1575     if (lpstr == NULL)
1576         goto done;
1577
1578     for (i = 0,j = 0; i < size && text[i]; i++)
1579     {
1580         if (text[i] == '\r' && (text[i+1] == '\n' || text[i+1] == '\0'))
1581             continue;
1582         lpstr[j++] = text[i];
1583     }
1584
1585     lpstr[j]='\0';
1586     *lpBytes = j; /* Number of bytes in string */
1587
1588 done:
1589     GlobalUnlock(lpData->hData);
1590
1591     return lpstr;
1592 }
1593
1594
1595 /**************************************************************************
1596  *              X11DRV_CLIPBOARD_ExportUTF8String
1597  *
1598  *  Export CF_UNICODE converting the string to UTF8.
1599  *  Helper function for X11DRV_CLIPBOARD_ExportString.
1600  */
1601 static HANDLE X11DRV_CLIPBOARD_ExportUTF8String(LPWINE_CLIPDATA lpData, LPDWORD lpBytes)
1602 {
1603     UINT i, j;
1604     UINT size;
1605     LPWSTR uni_text;
1606     LPSTR text, lpstr = NULL;
1607
1608     *lpBytes = 0; /* Assume return has zero bytes */
1609
1610     uni_text = GlobalLock(lpData->hData);
1611
1612     size = WideCharToMultiByte(CP_UTF8, 0, uni_text, -1, NULL, 0, NULL, NULL);
1613
1614     text = HeapAlloc(GetProcessHeap(), 0, size);
1615     if (!text)
1616         goto done;
1617     WideCharToMultiByte(CP_UTF8, 0, uni_text, -1, text, size, NULL, NULL);
1618
1619     /* remove carriage returns */
1620     lpstr = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, size--);
1621     if (lpstr == NULL)
1622         goto done;
1623
1624     for (i = 0,j = 0; i < size && text[i]; i++)
1625     {
1626         if (text[i] == '\r' && (text[i+1] == '\n' || text[i+1] == '\0'))
1627             continue;
1628         lpstr[j++] = text[i];
1629     }
1630     lpstr[j]='\0';
1631
1632     *lpBytes = j; /* Number of bytes in string */
1633
1634 done:
1635     HeapFree(GetProcessHeap(), 0, text);
1636     GlobalUnlock(lpData->hData);
1637
1638     return lpstr;
1639 }
1640
1641
1642
1643 /**************************************************************************
1644  *              X11DRV_CLIPBOARD_ExportCompoundText
1645  *
1646  *  Export CF_UNICODE to COMPOUND_TEXT
1647  *  Helper function for X11DRV_CLIPBOARD_ExportString.
1648  */
1649 static HANDLE X11DRV_CLIPBOARD_ExportCompoundText(Display *display, Window requestor, Atom aTarget, Atom rprop,
1650     LPWINE_CLIPDATA lpData, LPDWORD lpBytes)
1651 {
1652     char* lpstr = 0;
1653     XTextProperty prop;
1654     XICCEncodingStyle style;
1655     UINT i, j;
1656     UINT size;
1657     LPWSTR uni_text;
1658
1659     uni_text = GlobalLock(lpData->hData);
1660
1661     size = WideCharToMultiByte(CP_UNIXCP, 0, uni_text, -1, NULL, 0, NULL, NULL);
1662     lpstr = HeapAlloc(GetProcessHeap(), 0, size);
1663     if (!lpstr)
1664         return 0;
1665
1666     WideCharToMultiByte(CP_UNIXCP, 0, uni_text, -1, lpstr, size, NULL, NULL);
1667
1668     /* remove carriage returns */
1669     for (i = 0, j = 0; i < size && lpstr[i]; i++)
1670     {
1671         if (lpstr[i] == '\r' && (lpstr[i+1] == '\n' || lpstr[i+1] == '\0'))
1672             continue;
1673         lpstr[j++] = lpstr[i];
1674     }
1675     lpstr[j]='\0';
1676
1677     GlobalUnlock(lpData->hData);
1678
1679     if (aTarget == x11drv_atom(COMPOUND_TEXT))
1680         style = XCompoundTextStyle;
1681     else
1682         style = XStdICCTextStyle;
1683
1684     /* Update the X property */
1685     if (XmbTextListToTextProperty(display, &lpstr, 1, style, &prop) == Success)
1686     {
1687         XSetTextProperty(display, requestor, &prop, rprop);
1688         XFree(prop.value);
1689     }
1690
1691     HeapFree(GetProcessHeap(), 0, lpstr);
1692
1693     return 0;
1694 }
1695
1696 /**************************************************************************
1697  *              X11DRV_CLIPBOARD_ExportString
1698  *
1699  *  Export string
1700  */
1701 static HANDLE X11DRV_CLIPBOARD_ExportString(Display *display, Window requestor, Atom aTarget, Atom rprop,
1702                                      LPWINE_CLIPDATA lpData, LPDWORD lpBytes)
1703 {
1704     if (X11DRV_CLIPBOARD_RenderFormat(display, lpData))
1705     {
1706         if (aTarget == XA_STRING)
1707             return X11DRV_CLIPBOARD_ExportXAString(lpData, lpBytes);
1708         else if (aTarget == x11drv_atom(COMPOUND_TEXT) || aTarget == x11drv_atom(TEXT))
1709             return X11DRV_CLIPBOARD_ExportCompoundText(display, requestor, aTarget,
1710                 rprop, lpData, lpBytes);
1711         else
1712         {
1713             TRACE("Exporting target %ld to default UTF8_STRING\n", aTarget);
1714             return X11DRV_CLIPBOARD_ExportUTF8String(lpData, lpBytes);
1715         }
1716     }
1717     else
1718         ERR("Failed to render %04x format\n", lpData->wFormatID);
1719
1720     return 0;
1721 }
1722
1723
1724 /**************************************************************************
1725  *              X11DRV_CLIPBOARD_ExportXAPIXMAP
1726  *
1727  *  Export CF_DIB to XA_PIXMAP.
1728  */
1729 static HANDLE X11DRV_CLIPBOARD_ExportXAPIXMAP(Display *display, Window requestor, Atom aTarget, Atom rprop,
1730     LPWINE_CLIPDATA lpdata, LPDWORD lpBytes)
1731 {
1732     HANDLE hData;
1733     unsigned char* lpData;
1734
1735     if (!X11DRV_CLIPBOARD_RenderFormat(display, lpdata))
1736     {
1737         ERR("Failed to export %04x format\n", lpdata->wFormatID);
1738         return 0;
1739     }
1740
1741     if (!lpdata->drvData) /* If not already rendered */
1742     {
1743         Pixmap pixmap;
1744         LPBITMAPINFO pbmi;
1745         struct gdi_image_bits bits;
1746
1747         pbmi = GlobalLock( lpdata->hData );
1748         bits.ptr = (LPBYTE)pbmi + bitmap_info_size( pbmi, DIB_RGB_COLORS );
1749         bits.free = NULL;
1750         bits.is_copy = FALSE;
1751         pixmap = create_pixmap_from_image( 0, &default_visual, pbmi, &bits, DIB_RGB_COLORS );
1752         GlobalUnlock( lpdata->hData );
1753         lpdata->drvData = pixmap;
1754     }
1755
1756     *lpBytes = sizeof(Pixmap); /* pixmap is a 32bit value */
1757
1758     /* Wrap pixmap so we can return a handle */
1759     hData = GlobalAlloc(0, *lpBytes);
1760     lpData = GlobalLock(hData);
1761     memcpy(lpData, &lpdata->drvData, *lpBytes);
1762     GlobalUnlock(hData);
1763
1764     return hData;
1765 }
1766
1767
1768 /**************************************************************************
1769  *              X11DRV_CLIPBOARD_ExportImageBmp
1770  *
1771  *  Export CF_DIB to image/bmp.
1772  */
1773 static HANDLE X11DRV_CLIPBOARD_ExportImageBmp(Display *display, Window requestor, Atom aTarget, Atom rprop,
1774     LPWINE_CLIPDATA lpdata, LPDWORD lpBytes)
1775 {
1776     HANDLE hpackeddib;
1777     LPBYTE dibdata;
1778     UINT bmpsize;
1779     HANDLE hbmpdata;
1780     LPBYTE bmpdata;
1781     BITMAPFILEHEADER *bfh;
1782
1783     *lpBytes = 0;
1784
1785     if (!X11DRV_CLIPBOARD_RenderFormat(display, lpdata))
1786     {
1787         ERR("Failed to export %04x format\n", lpdata->wFormatID);
1788         return 0;
1789     }
1790
1791     hpackeddib = lpdata->hData;
1792
1793     dibdata = GlobalLock(hpackeddib);
1794     if (!dibdata)
1795     {
1796         ERR("Failed to lock packed DIB\n");
1797         return 0;
1798     }
1799
1800     bmpsize = sizeof(BITMAPFILEHEADER) + GlobalSize(hpackeddib);
1801
1802     hbmpdata = GlobalAlloc(0, bmpsize);
1803
1804     if (hbmpdata)
1805     {
1806         bmpdata = GlobalLock(hbmpdata);
1807
1808         if (!bmpdata)
1809         {
1810             GlobalFree(hbmpdata);
1811             GlobalUnlock(hpackeddib);
1812             return 0;
1813         }
1814
1815         /* bitmap file header */
1816         bfh = (BITMAPFILEHEADER*)bmpdata;
1817         bfh->bfType = 0x4d42; /* "BM" */
1818         bfh->bfSize = bmpsize;
1819         bfh->bfReserved1 = 0;
1820         bfh->bfReserved2 = 0;
1821         bfh->bfOffBits = sizeof(BITMAPFILEHEADER) + bitmap_info_size((BITMAPINFO*)dibdata, DIB_RGB_COLORS);
1822
1823         /* rest of bitmap is the same as the packed dib */
1824         memcpy(bfh+1, dibdata, bmpsize-sizeof(BITMAPFILEHEADER));
1825
1826         *lpBytes = bmpsize;
1827
1828         GlobalUnlock(hbmpdata);
1829     }
1830
1831     GlobalUnlock(hpackeddib);
1832
1833     return hbmpdata;
1834 }
1835
1836
1837 /**************************************************************************
1838  *              X11DRV_CLIPBOARD_ExportMetaFilePict
1839  *
1840  *  Export MetaFilePict.
1841  */
1842 static HANDLE X11DRV_CLIPBOARD_ExportMetaFilePict(Display *display, Window requestor, Atom aTarget, Atom rprop,
1843                                            LPWINE_CLIPDATA lpdata, LPDWORD lpBytes)
1844 {
1845     if (!X11DRV_CLIPBOARD_RenderFormat(display, lpdata))
1846     {
1847         ERR("Failed to export %04x format\n", lpdata->wFormatID);
1848         return 0;
1849     }
1850
1851     return X11DRV_CLIPBOARD_SerializeMetafile(CF_METAFILEPICT, lpdata->hData, lpBytes, TRUE);
1852 }
1853
1854
1855 /**************************************************************************
1856  *              X11DRV_CLIPBOARD_ExportEnhMetaFile
1857  *
1858  *  Export EnhMetaFile.
1859  */
1860 static HANDLE X11DRV_CLIPBOARD_ExportEnhMetaFile(Display *display, Window requestor, Atom aTarget, Atom rprop,
1861                                           LPWINE_CLIPDATA lpdata, LPDWORD lpBytes)
1862 {
1863     if (!X11DRV_CLIPBOARD_RenderFormat(display, lpdata))
1864     {
1865         ERR("Failed to export %04x format\n", lpdata->wFormatID);
1866         return 0;
1867     }
1868
1869     return X11DRV_CLIPBOARD_SerializeMetafile(CF_ENHMETAFILE, lpdata->hData, lpBytes, TRUE);
1870 }
1871
1872
1873 /**************************************************************************
1874  *              get_html_description_field
1875  *
1876  *  Find the value of a field in an HTML Format description.
1877  */
1878 static LPCSTR get_html_description_field(LPCSTR data, LPCSTR keyword)
1879 {
1880     LPCSTR pos=data;
1881
1882     while (pos && *pos && *pos != '<')
1883     {
1884         if (memcmp(pos, keyword, strlen(keyword)) == 0)
1885             return pos+strlen(keyword);
1886
1887         pos = strchr(pos, '\n');
1888         if (pos) pos++;
1889     }
1890
1891     return NULL;
1892 }
1893
1894
1895 /**************************************************************************
1896  *              X11DRV_CLIPBOARD_ExportTextHtml
1897  *
1898  *  Export HTML Format to text/html.
1899  *
1900  * FIXME: We should attempt to add an <a base> tag and convert windows paths.
1901  */
1902 static HANDLE X11DRV_CLIPBOARD_ExportTextHtml(Display *display, Window requestor, Atom aTarget,
1903     Atom rprop, LPWINE_CLIPDATA lpdata, LPDWORD lpBytes)
1904 {
1905     HANDLE hdata;
1906     LPCSTR data, field_value;
1907     UINT fragmentstart, fragmentend, htmlsize;
1908     HANDLE hhtmldata=NULL;
1909     LPSTR htmldata;
1910
1911     *lpBytes = 0;
1912
1913     if (!X11DRV_CLIPBOARD_RenderFormat(display, lpdata))
1914     {
1915         ERR("Failed to export %04x format\n", lpdata->wFormatID);
1916         return 0;
1917     }
1918
1919     hdata = lpdata->hData;
1920
1921     data = GlobalLock(hdata);
1922     if (!data)
1923     {
1924         ERR("Failed to lock HTML Format data\n");
1925         return 0;
1926     }
1927
1928     /* read the important fields */
1929     field_value = get_html_description_field(data, "StartFragment:");
1930     if (!field_value)
1931     {
1932         ERR("Couldn't find StartFragment value\n");
1933         goto end;
1934     }
1935     fragmentstart = atoi(field_value);
1936
1937     field_value = get_html_description_field(data, "EndFragment:");
1938     if (!field_value)
1939     {
1940         ERR("Couldn't find EndFragment value\n");
1941         goto end;
1942     }
1943     fragmentend = atoi(field_value);
1944
1945     /* export only the fragment */
1946     htmlsize = fragmentend - fragmentstart + 1;
1947
1948     hhtmldata = GlobalAlloc(0, htmlsize);
1949
1950     if (hhtmldata)
1951     {
1952         htmldata = GlobalLock(hhtmldata);
1953
1954         if (!htmldata)
1955         {
1956             GlobalFree(hhtmldata);
1957             htmldata = NULL;
1958             goto end;
1959         }
1960
1961         memcpy(htmldata, &data[fragmentstart], fragmentend-fragmentstart);
1962         htmldata[htmlsize-1] = '\0';
1963
1964         *lpBytes = htmlsize;
1965
1966         GlobalUnlock(htmldata);
1967     }
1968
1969 end:
1970
1971     GlobalUnlock(hdata);
1972
1973     return hhtmldata;
1974 }
1975
1976
1977 /**************************************************************************
1978  *              X11DRV_CLIPBOARD_QueryTargets
1979  */
1980 static BOOL X11DRV_CLIPBOARD_QueryTargets(Display *display, Window w, Atom selection,
1981     Atom target, XEvent *xe)
1982 {
1983     INT i;
1984
1985     XConvertSelection(display, selection, target, x11drv_atom(SELECTION_DATA), w, CurrentTime);
1986
1987     /*
1988      * Wait until SelectionNotify is received
1989      */
1990     for (i = 0; i < SELECTION_RETRIES; i++)
1991     {
1992         Bool res = XCheckTypedWindowEvent(display, w, SelectionNotify, xe);
1993         if (res && xe->xselection.selection == selection) break;
1994
1995         usleep(SELECTION_WAIT);
1996     }
1997
1998     if (i == SELECTION_RETRIES)
1999     {
2000         ERR("Timed out waiting for SelectionNotify event\n");
2001         return FALSE;
2002     }
2003     /* Verify that the selection returned a valid TARGETS property */
2004     if ((xe->xselection.target != target) || (xe->xselection.property == None))
2005     {
2006         /* Selection owner failed to respond or we missed the SelectionNotify */
2007         WARN("Failed to retrieve TARGETS for selection %ld.\n", selection);
2008         return FALSE;
2009     }
2010
2011     return TRUE;
2012 }
2013
2014
2015 static int is_atom_error( Display *display, XErrorEvent *event, void *arg )
2016 {
2017     return (event->error_code == BadAtom);
2018 }
2019
2020 /**************************************************************************
2021  *              X11DRV_CLIPBOARD_InsertSelectionProperties
2022  *
2023  * Mark properties available for future retrieval.
2024  */
2025 static VOID X11DRV_CLIPBOARD_InsertSelectionProperties(Display *display, Atom* properties, UINT count)
2026 {
2027      UINT i, nb_atoms = 0;
2028      Atom *atoms = NULL;
2029
2030      /* Cache these formats in the clipboard cache */
2031      for (i = 0; i < count; i++)
2032      {
2033          LPWINE_CLIPFORMAT lpFormat = X11DRV_CLIPBOARD_LookupProperty(NULL, properties[i]);
2034
2035          if (lpFormat)
2036          {
2037              /* We found at least one Window's format that mapps to the property.
2038               * Continue looking for more.
2039               *
2040               * If more than one property map to a Window's format then we use the first
2041               * one and ignore the rest.
2042               */
2043              while (lpFormat)
2044              {
2045                  TRACE("Atom#%d Property(%d): --> Format %s\n",
2046                        i, lpFormat->drvData, debugstr_format(lpFormat->wFormatID));
2047                  X11DRV_CLIPBOARD_InsertClipboardData(lpFormat->wFormatID, 0, 0, lpFormat, FALSE);
2048                  lpFormat = X11DRV_CLIPBOARD_LookupProperty(lpFormat, properties[i]);
2049              }
2050          }
2051          else if (properties[i])
2052          {
2053              /* add it to the list of atoms that we don't know about yet */
2054              if (!atoms) atoms = HeapAlloc( GetProcessHeap(), 0,
2055                                             (count - i) * sizeof(*atoms) );
2056              if (atoms) atoms[nb_atoms++] = properties[i];
2057          }
2058      }
2059
2060      /* query all unknown atoms in one go */
2061      if (atoms)
2062      {
2063          char **names = HeapAlloc( GetProcessHeap(), 0, nb_atoms * sizeof(*names) );
2064          if (names)
2065          {
2066              X11DRV_expect_error( display, is_atom_error, NULL );
2067              if (!XGetAtomNames( display, atoms, nb_atoms, names )) nb_atoms = 0;
2068              if (X11DRV_check_error())
2069              {
2070                  WARN( "got some bad atoms, ignoring\n" );
2071                  nb_atoms = 0;
2072              }
2073              for (i = 0; i < nb_atoms; i++)
2074              {
2075                  WINE_CLIPFORMAT *lpFormat;
2076                  LPWSTR wname;
2077                  int len = MultiByteToWideChar(CP_UNIXCP, 0, names[i], -1, NULL, 0);
2078                  wname = HeapAlloc(GetProcessHeap(), 0, len*sizeof(WCHAR));
2079                  MultiByteToWideChar(CP_UNIXCP, 0, names[i], -1, wname, len);
2080
2081                  lpFormat = register_format( RegisterClipboardFormatW(wname), atoms[i] );
2082                  HeapFree(GetProcessHeap(), 0, wname);
2083                  if (!lpFormat)
2084                  {
2085                      ERR("Failed to register %s property. Type will not be cached.\n", names[i]);
2086                      continue;
2087                  }
2088                  TRACE("Atom#%d Property(%d): --> Format %s\n",
2089                        i, lpFormat->drvData, debugstr_format(lpFormat->wFormatID));
2090                  X11DRV_CLIPBOARD_InsertClipboardData(lpFormat->wFormatID, 0, 0, lpFormat, FALSE);
2091              }
2092              for (i = 0; i < nb_atoms; i++) XFree( names[i] );
2093              HeapFree( GetProcessHeap(), 0, names );
2094          }
2095          HeapFree( GetProcessHeap(), 0, atoms );
2096      }
2097 }
2098
2099
2100 /**************************************************************************
2101  *              X11DRV_CLIPBOARD_QueryAvailableData
2102  *
2103  * Caches the list of data formats available from the current selection.
2104  * This queries the selection owner for the TARGETS property and saves all
2105  * reported property types.
2106  */
2107 static int X11DRV_CLIPBOARD_QueryAvailableData(Display *display, LPCLIPBOARDINFO lpcbinfo)
2108 {
2109     XEvent         xe;
2110     Atom           atype=AnyPropertyType;
2111     int            aformat;
2112     unsigned long  remain;
2113     Atom*          targetList=NULL;
2114     Window         w;
2115     unsigned long  cSelectionTargets = 0;
2116
2117     if (selectionAcquired & (S_PRIMARY | S_CLIPBOARD))
2118     {
2119         ERR("Received request to cache selection but process is owner=(%08x)\n",
2120             (unsigned) selectionWindow);
2121         return -1; /* Prevent self request */
2122     }
2123
2124     w = thread_selection_wnd();
2125     if (!w)
2126     {
2127         ERR("No window available to retrieve selection!\n");
2128         return -1;
2129     }
2130
2131     /*
2132      * Query the selection owner for the TARGETS property
2133      */
2134     if ((use_primary_selection && XGetSelectionOwner(display,XA_PRIMARY)) ||
2135         XGetSelectionOwner(display,x11drv_atom(CLIPBOARD)))
2136     {
2137         if (use_primary_selection && (X11DRV_CLIPBOARD_QueryTargets(display, w, XA_PRIMARY, x11drv_atom(TARGETS), &xe)))
2138             selectionCacheSrc = XA_PRIMARY;
2139         else if (X11DRV_CLIPBOARD_QueryTargets(display, w, x11drv_atom(CLIPBOARD), x11drv_atom(TARGETS), &xe))
2140             selectionCacheSrc = x11drv_atom(CLIPBOARD);
2141         else
2142         {
2143             Atom xstr = XA_STRING;
2144
2145             /* Selection Owner doesn't understand TARGETS, try retrieving XA_STRING */
2146             if (X11DRV_CLIPBOARD_QueryTargets(display, w, XA_PRIMARY, XA_STRING, &xe))
2147             {
2148                 X11DRV_CLIPBOARD_InsertSelectionProperties(display, &xstr, 1);
2149                 selectionCacheSrc = XA_PRIMARY;
2150                 return 1;
2151             }
2152             else if (X11DRV_CLIPBOARD_QueryTargets(display, w, x11drv_atom(CLIPBOARD), XA_STRING, &xe))
2153             {
2154                 X11DRV_CLIPBOARD_InsertSelectionProperties(display, &xstr, 1);
2155                 selectionCacheSrc = x11drv_atom(CLIPBOARD);
2156                 return 1;
2157             }
2158             else
2159             {
2160                 WARN("Failed to query selection owner for available data.\n");
2161                 return -1;
2162             }
2163         }
2164     }
2165     else return 0; /* No selection owner so report 0 targets available */
2166
2167     /* Read the TARGETS property contents */
2168     if (!XGetWindowProperty(display, xe.xselection.requestor, xe.xselection.property,
2169         0, 0x3FFF, True, AnyPropertyType/*XA_ATOM*/, &atype, &aformat, &cSelectionTargets,
2170         &remain, (unsigned char**)&targetList) != Success)
2171     {
2172        TRACE("Type %lx,Format %d,nItems %ld, Remain %ld\n",
2173              atype, aformat, cSelectionTargets, remain);
2174        /*
2175         * The TARGETS property should have returned us a list of atoms
2176         * corresponding to each selection target format supported.
2177         */
2178        if (atype == XA_ATOM || atype == x11drv_atom(TARGETS))
2179        {
2180            if (aformat == 32)
2181            {
2182                X11DRV_CLIPBOARD_InsertSelectionProperties(display, targetList, cSelectionTargets);
2183            }
2184            else if (aformat == 8)  /* work around quartz-wm brain damage */
2185            {
2186                unsigned long i, count = cSelectionTargets / sizeof(CARD32);
2187                Atom *atoms = HeapAlloc( GetProcessHeap(), 0, count * sizeof(Atom) );
2188                for (i = 0; i < count; i++)
2189                    atoms[i] = ((CARD32 *)targetList)[i];  /* FIXME: byte swapping */
2190                X11DRV_CLIPBOARD_InsertSelectionProperties( display, atoms, count );
2191                HeapFree( GetProcessHeap(), 0, atoms );
2192            }
2193        }
2194
2195        /* Free the list of targets */
2196        XFree(targetList);
2197     }
2198     else WARN("Failed to read TARGETS property\n");
2199
2200     return cSelectionTargets;
2201 }
2202
2203
2204 /**************************************************************************
2205  *      X11DRV_CLIPBOARD_ReadSelectionData
2206  *
2207  * This method is invoked only when we DO NOT own the X selection
2208  *
2209  * We always get the data from the selection client each time,
2210  * since we have no way of determining if the data in our cache is stale.
2211  */
2212 static BOOL X11DRV_CLIPBOARD_ReadSelectionData(Display *display, LPWINE_CLIPDATA lpData)
2213 {
2214     Bool res;
2215     DWORD i;
2216     XEvent xe;
2217     BOOL bRet = FALSE;
2218
2219     TRACE("%04x\n", lpData->wFormatID);
2220
2221     if (!lpData->lpFormat)
2222     {
2223         ERR("Requesting format %04x but no source format linked to data.\n",
2224             lpData->wFormatID);
2225         return FALSE;
2226     }
2227
2228     if (!selectionAcquired)
2229     {
2230         Window w = thread_selection_wnd();
2231         if(!w)
2232         {
2233             ERR("No window available to read selection data!\n");
2234             return FALSE;
2235         }
2236
2237         TRACE("Requesting conversion of %s property (%d) from selection type %08x\n",
2238               debugstr_format(lpData->lpFormat->wFormatID), lpData->lpFormat->drvData,
2239               (UINT)selectionCacheSrc);
2240
2241         XConvertSelection(display, selectionCacheSrc, lpData->lpFormat->drvData,
2242                           x11drv_atom(SELECTION_DATA), w, CurrentTime);
2243
2244         /* wait until SelectionNotify is received */
2245         for (i = 0; i < SELECTION_RETRIES; i++)
2246         {
2247             res = XCheckTypedWindowEvent(display, w, SelectionNotify, &xe);
2248             if (res && xe.xselection.selection == selectionCacheSrc) break;
2249
2250             usleep(SELECTION_WAIT);
2251         }
2252
2253         if (i == SELECTION_RETRIES)
2254         {
2255             ERR("Timed out waiting for SelectionNotify event\n");
2256         }
2257         /* Verify that the selection returned a valid TARGETS property */
2258         else if (xe.xselection.property != None)
2259         {
2260             /*
2261              *  Read the contents of the X selection property
2262              *  into WINE's clipboard cache and converting the
2263              *  data format if necessary.
2264              */
2265              HANDLE hData = lpData->lpFormat->lpDrvImportFunc(display, xe.xselection.requestor,
2266                  xe.xselection.property);
2267
2268              if (hData)
2269                  bRet = X11DRV_CLIPBOARD_InsertClipboardData(lpData->wFormatID, hData, 0, lpData->lpFormat, TRUE);
2270              else
2271                  TRACE("Import function failed\n");
2272         }
2273         else
2274         {
2275             TRACE("Failed to convert selection\n");
2276         }
2277     }
2278     else
2279     {
2280         ERR("Received request to cache selection data but process is owner\n");
2281     }
2282
2283     TRACE("Returning %d\n", bRet);
2284
2285     return bRet;
2286 }
2287
2288
2289 /**************************************************************************
2290  *              X11DRV_CLIPBOARD_GetProperty
2291  *  Gets type, data and size.
2292  */
2293 static BOOL X11DRV_CLIPBOARD_GetProperty(Display *display, Window w, Atom prop,
2294     Atom *atype, unsigned char** data, unsigned long* datasize)
2295 {
2296     int aformat;
2297     unsigned long pos = 0, nitems, remain, count;
2298     unsigned char *val = NULL, *buffer;
2299
2300     TRACE("Reading property %lu from X window %lx\n", prop, w);
2301
2302     for (;;)
2303     {
2304         if (XGetWindowProperty(display, w, prop, pos, INT_MAX / 4, False,
2305                                AnyPropertyType, atype, &aformat, &nitems, &remain, &buffer) != Success)
2306         {
2307             WARN("Failed to read property\n");
2308             HeapFree( GetProcessHeap(), 0, val );
2309             return FALSE;
2310         }
2311
2312         count = get_property_size( aformat, nitems );
2313         if (!val) *data = HeapAlloc( GetProcessHeap(), 0, pos * sizeof(int) + count + 1 );
2314         else *data = HeapReAlloc( GetProcessHeap(), 0, val, pos * sizeof(int) + count + 1 );
2315
2316         if (!*data)
2317         {
2318             XFree( buffer );
2319             HeapFree( GetProcessHeap(), 0, val );
2320             return FALSE;
2321         }
2322         val = *data;
2323         memcpy( (int *)val + pos, buffer, count );
2324         XFree( buffer );
2325         if (!remain)
2326         {
2327             *datasize = pos * sizeof(int) + count;
2328             val[*datasize] = 0;
2329             break;
2330         }
2331         pos += count / sizeof(int);
2332     }
2333
2334     /* Delete the property on the window now that we are done
2335      * This will send a PropertyNotify event to the selection owner. */
2336     XDeleteProperty(display, w, prop);
2337     return TRUE;
2338 }
2339
2340
2341 /**************************************************************************
2342  *              X11DRV_CLIPBOARD_ReadProperty
2343  *  Reads the contents of the X selection property.
2344  */
2345 static BOOL X11DRV_CLIPBOARD_ReadProperty(Display *display, Window w, Atom prop,
2346     unsigned char** data, unsigned long* datasize)
2347 {
2348     Atom atype;
2349     XEvent xe;
2350
2351     if (prop == None)
2352         return FALSE;
2353
2354     if (!X11DRV_CLIPBOARD_GetProperty(display, w, prop, &atype, data, datasize))
2355         return FALSE;
2356
2357     while (XCheckTypedWindowEvent(display, w, PropertyNotify, &xe))
2358         ;
2359
2360     if (atype == x11drv_atom(INCR))
2361     {
2362         unsigned char *buf = *data;
2363         unsigned long bufsize = 0;
2364
2365         for (;;)
2366         {
2367             int i;
2368             unsigned char *prop_data, *tmp;
2369             unsigned long prop_size;
2370
2371             /* Wait until PropertyNotify is received */
2372             for (i = 0; i < SELECTION_RETRIES; i++)
2373             {
2374                 Bool res;
2375
2376                 res = XCheckTypedWindowEvent(display, w, PropertyNotify, &xe);
2377                 if (res && xe.xproperty.atom == prop &&
2378                     xe.xproperty.state == PropertyNewValue)
2379                     break;
2380                 usleep(SELECTION_WAIT);
2381             }
2382
2383             if (i >= SELECTION_RETRIES ||
2384                 !X11DRV_CLIPBOARD_GetProperty(display, w, prop, &atype, &prop_data, &prop_size))
2385             {
2386                 HeapFree(GetProcessHeap(), 0, buf);
2387                 return FALSE;
2388             }
2389
2390             /* Retrieved entire data. */
2391             if (prop_size == 0)
2392             {
2393                 HeapFree(GetProcessHeap(), 0, prop_data);
2394                 *data = buf;
2395                 *datasize = bufsize;
2396                 return TRUE;
2397             }
2398
2399             tmp = HeapReAlloc(GetProcessHeap(), 0, buf, bufsize + prop_size + 1);
2400             if (!tmp)
2401             {
2402                 HeapFree(GetProcessHeap(), 0, buf);
2403                 return FALSE;
2404             }
2405
2406             buf = tmp;
2407             memcpy(buf + bufsize, prop_data, prop_size + 1);
2408             bufsize += prop_size;
2409             HeapFree(GetProcessHeap(), 0, prop_data);
2410         }
2411     }
2412
2413     return TRUE;
2414 }
2415
2416
2417 /**************************************************************************
2418  *              CLIPBOARD_SerializeMetafile
2419  */
2420 static HANDLE X11DRV_CLIPBOARD_SerializeMetafile(INT wformat, HANDLE hdata, LPDWORD lpcbytes, BOOL out)
2421 {
2422     HANDLE h = 0;
2423
2424     TRACE(" wFormat=%d hdata=%p out=%d\n", wformat, hdata, out);
2425
2426     if (out) /* Serialize out, caller should free memory */
2427     {
2428         *lpcbytes = 0; /* Assume failure */
2429
2430         if (wformat == CF_METAFILEPICT)
2431         {
2432             LPMETAFILEPICT lpmfp = GlobalLock(hdata);
2433             unsigned int size = GetMetaFileBitsEx(lpmfp->hMF, 0, NULL);
2434
2435             h = GlobalAlloc(0, size + sizeof(METAFILEPICT));
2436             if (h)
2437             {
2438                 char *pdata = GlobalLock(h);
2439
2440                 memcpy(pdata, lpmfp, sizeof(METAFILEPICT));
2441                 GetMetaFileBitsEx(lpmfp->hMF, size, pdata + sizeof(METAFILEPICT));
2442
2443                 *lpcbytes = size + sizeof(METAFILEPICT);
2444
2445                 GlobalUnlock(h);
2446             }
2447
2448             GlobalUnlock(hdata);
2449         }
2450         else if (wformat == CF_ENHMETAFILE)
2451         {
2452             int size = GetEnhMetaFileBits(hdata, 0, NULL);
2453
2454             h = GlobalAlloc(0, size);
2455             if (h)
2456             {
2457                 LPVOID pdata = GlobalLock(h);
2458
2459                 GetEnhMetaFileBits(hdata, size, pdata);
2460                 *lpcbytes = size;
2461
2462                 GlobalUnlock(h);
2463             }
2464         }
2465     }
2466     else
2467     {
2468         if (wformat == CF_METAFILEPICT)
2469         {
2470             h = GlobalAlloc(0, sizeof(METAFILEPICT));
2471             if (h)
2472             {
2473                 unsigned int wiresize;
2474                 LPMETAFILEPICT lpmfp = GlobalLock(h);
2475
2476                 memcpy(lpmfp, hdata, sizeof(METAFILEPICT));
2477                 wiresize = *lpcbytes - sizeof(METAFILEPICT);
2478                 lpmfp->hMF = SetMetaFileBitsEx(wiresize,
2479                     ((const BYTE *)hdata) + sizeof(METAFILEPICT));
2480                 GlobalUnlock(h);
2481             }
2482         }
2483         else if (wformat == CF_ENHMETAFILE)
2484         {
2485             h = SetEnhMetaFileBits(*lpcbytes, hdata);
2486         }
2487     }
2488
2489     return h;
2490 }
2491
2492
2493 /**************************************************************************
2494  *              X11DRV_CLIPBOARD_ReleaseSelection
2495  *
2496  * Release XA_CLIPBOARD and XA_PRIMARY in response to a SelectionClear event.
2497  */
2498 static void X11DRV_CLIPBOARD_ReleaseSelection(Display *display, Atom selType, Window w, HWND hwnd, Time time)
2499 {
2500     /* w is the window that lost the selection
2501      */
2502     TRACE("event->window = %08x (selectionWindow = %08x) selectionAcquired=0x%08x\n",
2503           (unsigned)w, (unsigned)selectionWindow, (unsigned)selectionAcquired);
2504
2505     if (selectionAcquired && (w == selectionWindow))
2506     {
2507         CLIPBOARDINFO cbinfo;
2508
2509         /* completely give up the selection */
2510         TRACE("Lost CLIPBOARD (+PRIMARY) selection\n");
2511
2512         X11DRV_CLIPBOARD_GetClipboardInfo(&cbinfo);
2513
2514         if (cbinfo.flags & CB_PROCESS)
2515         {
2516             /* Since we're still the owner, this wasn't initiated by
2517                another Wine process */
2518             if (OpenClipboard(hwnd))
2519             {
2520                 /* Destroy private objects */
2521                 SendMessageW(cbinfo.hWndOwner, WM_DESTROYCLIPBOARD, 0, 0);
2522
2523                 /* Give up ownership of the windows clipboard */
2524                 X11DRV_CLIPBOARD_ReleaseOwnership();
2525                 CloseClipboard();
2526             }
2527         }
2528
2529         if ((selType == x11drv_atom(CLIPBOARD)) && (selectionAcquired & S_PRIMARY))
2530         {
2531             TRACE("Lost clipboard. Check if we need to release PRIMARY\n");
2532
2533             if (selectionWindow == XGetSelectionOwner(display, XA_PRIMARY))
2534             {
2535                 TRACE("We still own PRIMARY. Releasing PRIMARY.\n");
2536                 XSetSelectionOwner(display, XA_PRIMARY, None, time);
2537             }
2538             else
2539                 TRACE("We no longer own PRIMARY\n");
2540         }
2541         else if ((selType == XA_PRIMARY) && (selectionAcquired & S_CLIPBOARD))
2542         {
2543             TRACE("Lost PRIMARY. Check if we need to release CLIPBOARD\n");
2544
2545             if (selectionWindow == XGetSelectionOwner(display,x11drv_atom(CLIPBOARD)))
2546             {
2547                 TRACE("We still own CLIPBOARD. Releasing CLIPBOARD.\n");
2548                 XSetSelectionOwner(display, x11drv_atom(CLIPBOARD), None, time);
2549             }
2550             else
2551                 TRACE("We no longer own CLIPBOARD\n");
2552         }
2553
2554         selectionWindow = None;
2555
2556         X11DRV_EmptyClipboard(FALSE);
2557
2558         /* Reset the selection flags now that we are done */
2559         selectionAcquired = S_NOSELECTION;
2560     }
2561 }
2562
2563
2564 /**************************************************************************
2565  *              IsSelectionOwner (X11DRV.@)
2566  *
2567  * Returns: TRUE if the selection is owned by this process, FALSE otherwise
2568  */
2569 static BOOL X11DRV_CLIPBOARD_IsSelectionOwner(void)
2570 {
2571     return selectionAcquired;
2572 }
2573
2574
2575 /**************************************************************************
2576  *                X11DRV Clipboard Exports
2577  **************************************************************************/
2578
2579
2580 static void selection_acquire(void)
2581 {
2582     Window owner;
2583     Display *display;
2584
2585     owner = thread_selection_wnd();
2586     display = thread_display();
2587
2588     selectionAcquired = 0;
2589     selectionWindow = 0;
2590
2591     /* Grab PRIMARY selection if not owned */
2592     if (use_primary_selection)
2593         XSetSelectionOwner(display, XA_PRIMARY, owner, CurrentTime);
2594
2595     /* Grab CLIPBOARD selection if not owned */
2596     XSetSelectionOwner(display, x11drv_atom(CLIPBOARD), owner, CurrentTime);
2597
2598     if (use_primary_selection && XGetSelectionOwner(display, XA_PRIMARY) == owner)
2599         selectionAcquired |= S_PRIMARY;
2600
2601     if (XGetSelectionOwner(display,x11drv_atom(CLIPBOARD)) == owner)
2602         selectionAcquired |= S_CLIPBOARD;
2603
2604     if (selectionAcquired)
2605     {
2606         selectionWindow = owner;
2607         TRACE("Grabbed X selection, owner=(%08x)\n", (unsigned) owner);
2608     }
2609 }
2610
2611 static DWORD WINAPI selection_thread_proc(LPVOID p)
2612 {
2613     HANDLE event = p;
2614
2615     TRACE("\n");
2616
2617     selection_acquire();
2618     SetEvent(event);
2619
2620     while (selectionAcquired)
2621     {
2622         MsgWaitForMultipleObjectsEx(0, NULL, INFINITE, QS_SENDMESSAGE, 0);
2623     }
2624
2625     return 0;
2626 }
2627
2628 /**************************************************************************
2629  *              AcquireClipboard (X11DRV.@)
2630  */
2631 int CDECL X11DRV_AcquireClipboard(HWND hWndClipWindow)
2632 {
2633     DWORD procid;
2634     HANDLE selectionThread;
2635
2636     TRACE(" %p\n", hWndClipWindow);
2637
2638     /*
2639      * It's important that the selection get acquired from the thread
2640      * that owns the clipboard window. The primary reason is that we know
2641      * it is running a message loop and therefore can process the
2642      * X selection events.
2643      */
2644     if (hWndClipWindow &&
2645         GetCurrentThreadId() != GetWindowThreadProcessId(hWndClipWindow, &procid))
2646     {
2647         if (procid != GetCurrentProcessId())
2648         {
2649             WARN("Setting clipboard owner to other process is not supported\n");
2650             hWndClipWindow = NULL;
2651         }
2652         else
2653         {
2654             TRACE("Thread %x is acquiring selection with thread %x's window %p\n",
2655                 GetCurrentThreadId(),
2656                 GetWindowThreadProcessId(hWndClipWindow, NULL), hWndClipWindow);
2657
2658             return SendMessageW(hWndClipWindow, WM_X11DRV_ACQUIRE_SELECTION, 0, 0);
2659         }
2660     }
2661
2662     if (hWndClipWindow)
2663     {
2664         selection_acquire();
2665     }
2666     else
2667     {
2668         HANDLE event = CreateEventW(NULL, FALSE, FALSE, NULL);
2669         selectionThread = CreateThread(NULL, 0, selection_thread_proc, event, 0, NULL);
2670
2671         if (!selectionThread)
2672         {
2673             WARN("Could not start clipboard thread\n");
2674             CloseHandle(event);
2675             return 0;
2676         }
2677
2678         WaitForSingleObject(event, INFINITE);
2679         CloseHandle(event);
2680         CloseHandle(selectionThread);
2681     }
2682
2683     return 1;
2684 }
2685
2686
2687 /**************************************************************************
2688  *      X11DRV_EmptyClipboard
2689  *
2690  * Empty cached clipboard data.
2691  */
2692 void CDECL X11DRV_EmptyClipboard(BOOL keepunowned)
2693 {
2694     WINE_CLIPDATA *data, *next;
2695
2696     LIST_FOR_EACH_ENTRY_SAFE( data, next, &data_list, WINE_CLIPDATA, entry )
2697     {
2698         if (keepunowned && (data->wFlags & CF_FLAG_UNOWNED)) continue;
2699         list_remove( &data->entry );
2700         X11DRV_CLIPBOARD_FreeData( data );
2701         HeapFree( GetProcessHeap(), 0, data );
2702         ClipDataCount--;
2703     }
2704
2705     TRACE(" %d entries remaining in cache.\n", ClipDataCount);
2706 }
2707
2708
2709
2710 /**************************************************************************
2711  *              X11DRV_SetClipboardData
2712  */
2713 BOOL CDECL X11DRV_SetClipboardData(UINT wFormat, HANDLE hData, BOOL owner)
2714 {
2715     DWORD flags = 0;
2716     BOOL bResult = TRUE;
2717
2718     /* If it's not owned, data can only be set if the format data is not already owned
2719        and its rendering is not delayed */
2720     if (!owner)
2721     {
2722         CLIPBOARDINFO cbinfo;
2723         LPWINE_CLIPDATA lpRender;
2724
2725         X11DRV_CLIPBOARD_UpdateCache(&cbinfo);
2726
2727         if (!hData ||
2728             ((lpRender = X11DRV_CLIPBOARD_LookupData(wFormat)) &&
2729             !(lpRender->wFlags & CF_FLAG_UNOWNED)))
2730             bResult = FALSE;
2731         else
2732             flags = CF_FLAG_UNOWNED;
2733     }
2734
2735     bResult &= X11DRV_CLIPBOARD_InsertClipboardData(wFormat, hData, flags, NULL, TRUE);
2736
2737     return bResult;
2738 }
2739
2740
2741 /**************************************************************************
2742  *              CountClipboardFormats
2743  */
2744 INT CDECL X11DRV_CountClipboardFormats(void)
2745 {
2746     CLIPBOARDINFO cbinfo;
2747
2748     X11DRV_CLIPBOARD_UpdateCache(&cbinfo);
2749
2750     TRACE(" count=%d\n", ClipDataCount);
2751
2752     return ClipDataCount;
2753 }
2754
2755
2756 /**************************************************************************
2757  *              X11DRV_EnumClipboardFormats
2758  */
2759 UINT CDECL X11DRV_EnumClipboardFormats(UINT wFormat)
2760 {
2761     CLIPBOARDINFO cbinfo;
2762     struct list *ptr = NULL;
2763
2764     TRACE("(%04X)\n", wFormat);
2765
2766     X11DRV_CLIPBOARD_UpdateCache(&cbinfo);
2767
2768     if (!wFormat)
2769     {
2770         ptr = list_head( &data_list );
2771     }
2772     else
2773     {
2774         LPWINE_CLIPDATA lpData = X11DRV_CLIPBOARD_LookupData(wFormat);
2775         if (lpData) ptr = list_next( &data_list, &lpData->entry );
2776     }
2777
2778     if (!ptr) return 0;
2779     return LIST_ENTRY( ptr, WINE_CLIPDATA, entry )->wFormatID;
2780 }
2781
2782
2783 /**************************************************************************
2784  *              X11DRV_IsClipboardFormatAvailable
2785  */
2786 BOOL CDECL X11DRV_IsClipboardFormatAvailable(UINT wFormat)
2787 {
2788     BOOL bRet = FALSE;
2789     CLIPBOARDINFO cbinfo;
2790
2791     TRACE("(%04X)\n", wFormat);
2792
2793     X11DRV_CLIPBOARD_UpdateCache(&cbinfo);
2794
2795     if (wFormat != 0 && X11DRV_CLIPBOARD_LookupData(wFormat))
2796         bRet = TRUE;
2797
2798     TRACE("(%04X)- ret(%d)\n", wFormat, bRet);
2799
2800     return bRet;
2801 }
2802
2803
2804 /**************************************************************************
2805  *              GetClipboardData (USER.142)
2806  */
2807 HANDLE CDECL X11DRV_GetClipboardData(UINT wFormat)
2808 {
2809     CLIPBOARDINFO cbinfo;
2810     LPWINE_CLIPDATA lpRender;
2811
2812     TRACE("(%04X)\n", wFormat);
2813
2814     X11DRV_CLIPBOARD_UpdateCache(&cbinfo);
2815
2816     if ((lpRender = X11DRV_CLIPBOARD_LookupData(wFormat)))
2817     {
2818         if ( !lpRender->hData )
2819             X11DRV_CLIPBOARD_RenderFormat(thread_init_display(), lpRender);
2820
2821         TRACE(" returning %p (type %04x)\n", lpRender->hData, lpRender->wFormatID);
2822         return lpRender->hData;
2823     }
2824
2825     return 0;
2826 }
2827
2828
2829 /**************************************************************************
2830  *              ResetSelectionOwner
2831  *
2832  * Called when the thread owning the selection is destroyed and we need to
2833  * preserve the selection ownership. We look for another top level window
2834  * in this process and send it a message to acquire the selection.
2835  */
2836 void X11DRV_ResetSelectionOwner(void)
2837 {
2838     HWND hwnd;
2839     DWORD procid;
2840
2841     TRACE("\n");
2842
2843     if (!selectionAcquired  || thread_selection_wnd() != selectionWindow)
2844         return;
2845
2846     selectionAcquired = S_NOSELECTION;
2847     selectionWindow = 0;
2848
2849     hwnd = GetWindow(GetDesktopWindow(), GW_CHILD);
2850     do
2851     {
2852         if (GetCurrentThreadId() != GetWindowThreadProcessId(hwnd, &procid))
2853         {
2854             if (GetCurrentProcessId() == procid)
2855             {
2856                 if (SendMessageW(hwnd, WM_X11DRV_ACQUIRE_SELECTION, 0, 0))
2857                     return;
2858             }
2859         }
2860     } while ((hwnd = GetWindow(hwnd, GW_HWNDNEXT)) != NULL);
2861
2862     WARN("Failed to find another thread to take selection ownership. Clipboard data will be lost.\n");
2863
2864     X11DRV_CLIPBOARD_ReleaseOwnership();
2865     X11DRV_EmptyClipboard(FALSE);
2866 }
2867
2868
2869 /**************************************************************************
2870  *                      X11DRV_CLIPBOARD_SynthesizeData
2871  */
2872 static BOOL X11DRV_CLIPBOARD_SynthesizeData(UINT wFormatID)
2873 {
2874     BOOL bsyn = TRUE;
2875     LPWINE_CLIPDATA lpSource = NULL;
2876
2877     TRACE(" %04x\n", wFormatID);
2878
2879     /* Don't need to synthesize if it already exists */
2880     if (X11DRV_CLIPBOARD_LookupData(wFormatID))
2881         return TRUE;
2882
2883     if (wFormatID == CF_UNICODETEXT || wFormatID == CF_TEXT || wFormatID == CF_OEMTEXT)
2884     {
2885         bsyn = ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_UNICODETEXT)) &&
2886             ~lpSource->wFlags & CF_FLAG_SYNTHESIZED) ||
2887             ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_TEXT)) &&
2888             ~lpSource->wFlags & CF_FLAG_SYNTHESIZED) ||
2889             ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_OEMTEXT)) &&
2890             ~lpSource->wFlags & CF_FLAG_SYNTHESIZED);
2891     }
2892     else if (wFormatID == CF_ENHMETAFILE)
2893     {
2894         bsyn = (lpSource = X11DRV_CLIPBOARD_LookupData(CF_METAFILEPICT)) &&
2895             ~lpSource->wFlags & CF_FLAG_SYNTHESIZED;
2896     }
2897     else if (wFormatID == CF_METAFILEPICT)
2898     {
2899         bsyn = (lpSource = X11DRV_CLIPBOARD_LookupData(CF_ENHMETAFILE)) &&
2900             ~lpSource->wFlags & CF_FLAG_SYNTHESIZED;
2901     }
2902     else if (wFormatID == CF_DIB)
2903     {
2904         bsyn = (lpSource = X11DRV_CLIPBOARD_LookupData(CF_BITMAP)) &&
2905             ~lpSource->wFlags & CF_FLAG_SYNTHESIZED;
2906     }
2907     else if (wFormatID == CF_BITMAP)
2908     {
2909         bsyn = (lpSource = X11DRV_CLIPBOARD_LookupData(CF_DIB)) &&
2910             ~lpSource->wFlags & CF_FLAG_SYNTHESIZED;
2911     }
2912
2913     if (bsyn)
2914         X11DRV_CLIPBOARD_InsertClipboardData(wFormatID, 0, CF_FLAG_SYNTHESIZED, NULL, TRUE);
2915
2916     return bsyn;
2917 }
2918
2919
2920
2921 /**************************************************************************
2922  *              X11DRV_EndClipboardUpdate
2923  * TODO:
2924  *  Add locale if it hasn't already been added
2925  */
2926 void CDECL X11DRV_EndClipboardUpdate(void)
2927 {
2928     INT count = ClipDataCount;
2929
2930     /* Do Unicode <-> Text <-> OEM mapping */
2931     X11DRV_CLIPBOARD_SynthesizeData(CF_TEXT);
2932     X11DRV_CLIPBOARD_SynthesizeData(CF_OEMTEXT);
2933     X11DRV_CLIPBOARD_SynthesizeData(CF_UNICODETEXT);
2934
2935     /* Enhmetafile <-> MetafilePict mapping */
2936     X11DRV_CLIPBOARD_SynthesizeData(CF_ENHMETAFILE);
2937     X11DRV_CLIPBOARD_SynthesizeData(CF_METAFILEPICT);
2938
2939     /* DIB <-> Bitmap mapping */
2940     X11DRV_CLIPBOARD_SynthesizeData(CF_DIB);
2941     X11DRV_CLIPBOARD_SynthesizeData(CF_BITMAP);
2942
2943     TRACE("%d formats added to cached data\n", ClipDataCount - count);
2944 }
2945
2946
2947 /***********************************************************************
2948  *           X11DRV_SelectionRequest_TARGETS
2949  *  Service a TARGETS selection request event
2950  */
2951 static Atom X11DRV_SelectionRequest_TARGETS( Display *display, Window requestor,
2952                                              Atom target, Atom rprop )
2953 {
2954     UINT i;
2955     Atom* targets;
2956     ULONG cTargets;
2957     LPWINE_CLIPFORMAT format;
2958     LPWINE_CLIPDATA lpData;
2959
2960     /* Create X atoms for any clipboard types which don't have atoms yet.
2961      * This avoids sending bogus zero atoms.
2962      * Without this, copying might not have access to all clipboard types.
2963      * FIXME: is it safe to call this here?
2964      */
2965     intern_atoms();
2966
2967     /*
2968      * Count the number of items we wish to expose as selection targets.
2969      */
2970     cTargets = 1; /* Include TARGETS */
2971
2972     if (!list_head( &data_list )) return None;
2973
2974     LIST_FOR_EACH_ENTRY( lpData, &data_list, WINE_CLIPDATA, entry )
2975         LIST_FOR_EACH_ENTRY( format, &format_list, WINE_CLIPFORMAT, entry )
2976             if ((format->wFormatID == lpData->wFormatID) &&
2977                 format->lpDrvExportFunc && format->drvData)
2978                 cTargets++;
2979
2980     TRACE(" found %d formats\n", cTargets);
2981
2982     /* Allocate temp buffer */
2983     targets = HeapAlloc( GetProcessHeap(), 0, cTargets * sizeof(Atom));
2984     if(targets == NULL)
2985         return None;
2986
2987     i = 0;
2988     targets[i++] = x11drv_atom(TARGETS);
2989
2990     LIST_FOR_EACH_ENTRY( lpData, &data_list, WINE_CLIPDATA, entry )
2991         LIST_FOR_EACH_ENTRY( format, &format_list, WINE_CLIPFORMAT, entry )
2992             if ((format->wFormatID == lpData->wFormatID) &&
2993                 format->lpDrvExportFunc && format->drvData)
2994                 targets[i++] = format->drvData;
2995
2996     if (TRACE_ON(clipboard))
2997     {
2998         unsigned int i;
2999         for ( i = 0; i < cTargets; i++)
3000         {
3001             char *itemFmtName = XGetAtomName(display, targets[i]);
3002             TRACE("\tAtom# %d:  Property %ld Type %s\n", i, targets[i], itemFmtName);
3003             XFree(itemFmtName);
3004         }
3005     }
3006
3007     /* We may want to consider setting the type to xaTargets instead,
3008      * in case some apps expect this instead of XA_ATOM */
3009     XChangeProperty(display, requestor, rprop, XA_ATOM, 32,
3010                     PropModeReplace, (unsigned char *)targets, cTargets);
3011
3012     HeapFree(GetProcessHeap(), 0, targets);
3013
3014     return rprop;
3015 }
3016
3017
3018 /***********************************************************************
3019  *           X11DRV_SelectionRequest_MULTIPLE
3020  *  Service a MULTIPLE selection request event
3021  *  rprop contains a list of (target,property) atom pairs.
3022  *  The first atom names a target and the second names a property.
3023  *  The effect is as if we have received a sequence of SelectionRequest events
3024  *  (one for each atom pair) except that:
3025  *  1. We reply with a SelectionNotify only when all the requested conversions
3026  *  have been performed.
3027  *  2. If we fail to convert the target named by an atom in the MULTIPLE property,
3028  *  we replace the atom in the property by None.
3029  */
3030 static Atom X11DRV_SelectionRequest_MULTIPLE( HWND hWnd, XSelectionRequestEvent *pevent )
3031 {
3032     Display *display = pevent->display;
3033     Atom           rprop;
3034     Atom           atype=AnyPropertyType;
3035     int            aformat;
3036     unsigned long  remain;
3037     Atom*          targetPropList=NULL;
3038     unsigned long  cTargetPropList = 0;
3039
3040     /* If the specified property is None the requestor is an obsolete client.
3041      * We support these by using the specified target atom as the reply property.
3042      */
3043     rprop = pevent->property;
3044     if( rprop == None )
3045         rprop = pevent->target;
3046     if (!rprop)
3047         return 0;
3048
3049     /* Read the MULTIPLE property contents. This should contain a list of
3050      * (target,property) atom pairs.
3051      */
3052     if (!XGetWindowProperty(display, pevent->requestor, rprop,
3053                             0, 0x3FFF, False, AnyPropertyType, &atype,&aformat,
3054                             &cTargetPropList, &remain,
3055                             (unsigned char**)&targetPropList) != Success)
3056     {
3057         if (TRACE_ON(clipboard))
3058         {
3059             char * const typeName = XGetAtomName(display, atype);
3060             TRACE("\tType %s,Format %d,nItems %ld, Remain %ld\n",
3061                   typeName, aformat, cTargetPropList, remain);
3062             XFree(typeName);
3063         }
3064
3065         /*
3066          * Make sure we got what we expect.
3067          * NOTE: According to the X-ICCCM Version 2.0 documentation the property sent
3068          * in a MULTIPLE selection request should be of type ATOM_PAIR.
3069          * However some X apps(such as XPaint) are not compliant with this and return
3070          * a user defined atom in atype when XGetWindowProperty is called.
3071          * The data *is* an atom pair but is not denoted as such.
3072          */
3073         if(aformat == 32 /* atype == xAtomPair */ )
3074         {
3075             unsigned int i;
3076
3077             /* Iterate through the ATOM_PAIR list and execute a SelectionRequest
3078              * for each (target,property) pair */
3079
3080             for (i = 0; i < cTargetPropList; i+=2)
3081             {
3082                 XSelectionRequestEvent event;
3083
3084                 if (TRACE_ON(clipboard))
3085                 {
3086                     char *targetName, *propName;
3087                     targetName = XGetAtomName(display, targetPropList[i]);
3088                     propName = XGetAtomName(display, targetPropList[i+1]);
3089                     TRACE("MULTIPLE(%d): Target='%s' Prop='%s'\n",
3090                           i/2, targetName, propName);
3091                     XFree(targetName);
3092                     XFree(propName);
3093                 }
3094
3095                 /* We must have a non "None" property to service a MULTIPLE target atom */
3096                 if ( !targetPropList[i+1] )
3097                 {
3098                     TRACE("\tMULTIPLE(%d): Skipping target with empty property!\n", i);
3099                     continue;
3100                 }
3101
3102                 /* Set up an XSelectionRequestEvent for this (target,property) pair */
3103                 event = *pevent;
3104                 event.target = targetPropList[i];
3105                 event.property = targetPropList[i+1];
3106
3107                 /* Fire a SelectionRequest, informing the handler that we are processing
3108                  * a MULTIPLE selection request event.
3109                  */
3110                 X11DRV_HandleSelectionRequest( hWnd, &event, TRUE );
3111             }
3112         }
3113
3114         /* Free the list of targets/properties */
3115         XFree(targetPropList);
3116     }
3117     else TRACE("Couldn't read MULTIPLE property\n");
3118
3119     return rprop;
3120 }
3121
3122
3123 /***********************************************************************
3124  *           X11DRV_HandleSelectionRequest
3125  *  Process an event selection request event.
3126  *  The bIsMultiple flag is used to signal when EVENT_SelectionRequest is called
3127  *  recursively while servicing a "MULTIPLE" selection target.
3128  *
3129  *  Note: We only receive this event when WINE owns the X selection
3130  */
3131 static void X11DRV_HandleSelectionRequest( HWND hWnd, XSelectionRequestEvent *event, BOOL bIsMultiple )
3132 {
3133     Display *display = event->display;
3134     XSelectionEvent result;
3135     Atom rprop = None;
3136     Window request = event->requestor;
3137
3138     TRACE("\n");
3139
3140     /*
3141      * We can only handle the selection request if :
3142      * The selection is PRIMARY or CLIPBOARD, AND we can successfully open the clipboard.
3143      * Don't do these checks or open the clipboard while recursively processing MULTIPLE,
3144      * since this has been already done.
3145      */
3146     if ( !bIsMultiple )
3147     {
3148         if (((event->selection != XA_PRIMARY) && (event->selection != x11drv_atom(CLIPBOARD))))
3149             goto END;
3150     }
3151
3152     /* If the specified property is None the requestor is an obsolete client.
3153      * We support these by using the specified target atom as the reply property.
3154      */
3155     rprop = event->property;
3156     if( rprop == None )
3157         rprop = event->target;
3158
3159     if(event->target == x11drv_atom(TARGETS))  /*  Return a list of all supported targets */
3160     {
3161         /* TARGETS selection request */
3162         rprop = X11DRV_SelectionRequest_TARGETS( display, request, event->target, rprop );
3163     }
3164     else if(event->target == x11drv_atom(MULTIPLE))  /*  rprop contains a list of (target, property) atom pairs */
3165     {
3166         /* MULTIPLE selection request */
3167         rprop = X11DRV_SelectionRequest_MULTIPLE( hWnd, event );
3168     }
3169     else
3170     {
3171         LPWINE_CLIPFORMAT lpFormat = X11DRV_CLIPBOARD_LookupProperty(NULL, event->target);
3172
3173         if (lpFormat && lpFormat->lpDrvExportFunc)
3174         {
3175             LPWINE_CLIPDATA lpData = X11DRV_CLIPBOARD_LookupData(lpFormat->wFormatID);
3176
3177             if (lpData)
3178             {
3179                 unsigned char* lpClipData;
3180                 DWORD cBytes;
3181                 HANDLE hClipData = lpFormat->lpDrvExportFunc(display, request, event->target,
3182                                                              rprop, lpData, &cBytes);
3183
3184                 if (hClipData && (lpClipData = GlobalLock(hClipData)))
3185                 {
3186                     int mode = PropModeReplace;
3187
3188                     TRACE("\tUpdating property %s, %d bytes\n",
3189                           debugstr_format(lpFormat->wFormatID), cBytes);
3190                     do
3191                     {
3192                         int nelements = min(cBytes, 65536);
3193                         XChangeProperty(display, request, rprop, event->target,
3194                                         8, mode, lpClipData, nelements);
3195                         mode = PropModeAppend;
3196                         cBytes -= nelements;
3197                         lpClipData += nelements;
3198                     } while (cBytes > 0);
3199
3200                     GlobalUnlock(hClipData);
3201                     GlobalFree(hClipData);
3202                 }
3203             }
3204         }
3205     }
3206
3207 END:
3208     /* reply to sender
3209      * SelectionNotify should be sent only at the end of a MULTIPLE request
3210      */
3211     if ( !bIsMultiple )
3212     {
3213         result.type = SelectionNotify;
3214         result.display = display;
3215         result.requestor = request;
3216         result.selection = event->selection;
3217         result.property = rprop;
3218         result.target = event->target;
3219         result.time = event->time;
3220         TRACE("Sending SelectionNotify event...\n");
3221         XSendEvent(display,event->requestor,False,NoEventMask,(XEvent*)&result);
3222     }
3223 }
3224
3225
3226 /***********************************************************************
3227  *           X11DRV_SelectionRequest
3228  */
3229 void X11DRV_SelectionRequest( HWND hWnd, XEvent *event )
3230 {
3231     X11DRV_HandleSelectionRequest( hWnd, &event->xselectionrequest, FALSE );
3232 }
3233
3234
3235 /***********************************************************************
3236  *           X11DRV_SelectionClear
3237  */
3238 void X11DRV_SelectionClear( HWND hWnd, XEvent *xev )
3239 {
3240     XSelectionClearEvent *event = &xev->xselectionclear;
3241     if (event->selection == XA_PRIMARY || event->selection == x11drv_atom(CLIPBOARD))
3242         X11DRV_CLIPBOARD_ReleaseSelection( event->display, event->selection,
3243                                            event->window, hWnd, event->time );
3244 }