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