ole32: Keep a list of the loaded dlls for each apartment.
[wine/wine64.git] / dlls / winex11.drv / clipboard.c
blob57c52f6afae184a4eb9032b78de747b6cff68bc6
1 /*
2 * X11 clipboard windows driver
4 * Copyright 1994 Martin Ayotte
5 * 1996 Alex Korobka
6 * 1999 Noel Borthwick
7 * 2003 Ulrich Czekalla for CodeWeavers
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.
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.
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
23 * NOTES:
24 * This file contains the X specific implementation for the windows
25 * Clipboard API.
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
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).
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.
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.
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.
61 * FIXME: global format list needs a critical section
64 #include "config.h"
65 #include "wine/port.h"
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 <time.h>
76 #include <assert.h>
78 #include "windef.h"
79 #include "winbase.h"
80 #include "winreg.h"
81 #include "wine/wingdi16.h"
82 #include "x11drv.h"
83 #include "wine/debug.h"
84 #include "wine/unicode.h"
85 #include "wine/server.h"
87 WINE_DEFAULT_DEBUG_CHANNEL(clipboard);
89 #define HGDIOBJ_32(handle16) ((HGDIOBJ)(ULONG_PTR)(handle16))
91 /* Maximum wait time for selection notify */
92 #define SELECTION_RETRIES 500 /* wait for .1 seconds */
93 #define SELECTION_WAIT 1000 /* us */
94 /* Minimum seconds that must lapse between owner queries */
95 #define OWNERQUERYLAPSETIME 1
97 /* Selection masks */
98 #define S_NOSELECTION 0
99 #define S_PRIMARY 1
100 #define S_CLIPBOARD 2
102 typedef struct
104 HWND hWndOpen;
105 HWND hWndOwner;
106 HWND hWndViewer;
107 UINT seqno;
108 UINT flags;
109 } CLIPBOARDINFO, *LPCLIPBOARDINFO;
111 struct tagWINE_CLIPDATA; /* Forward */
113 typedef HANDLE (*DRVEXPORTFUNC)(Window requestor, Atom aTarget, Atom rprop,
114 struct tagWINE_CLIPDATA* lpData, LPDWORD lpBytes);
115 typedef HANDLE (*DRVIMPORTFUNC)(Window w, Atom prop);
117 typedef struct tagWINE_CLIPFORMAT {
118 UINT wFormatID;
119 LPCWSTR Name;
120 UINT drvData;
121 UINT wFlags;
122 DRVIMPORTFUNC lpDrvImportFunc;
123 DRVEXPORTFUNC lpDrvExportFunc;
124 struct tagWINE_CLIPFORMAT *PrevFormat;
125 struct tagWINE_CLIPFORMAT *NextFormat;
126 } WINE_CLIPFORMAT, *LPWINE_CLIPFORMAT;
128 typedef struct tagWINE_CLIPDATA {
129 UINT wFormatID;
130 HANDLE16 hData16;
131 HANDLE hData32;
132 UINT wFlags;
133 UINT drvData;
134 LPWINE_CLIPFORMAT lpFormat;
135 struct tagWINE_CLIPDATA *PrevData;
136 struct tagWINE_CLIPDATA *NextData;
137 } WINE_CLIPDATA, *LPWINE_CLIPDATA;
139 #define CF_FLAG_BUILTINFMT 0x0001 /* Built-in windows format */
140 #define CF_FLAG_UNOWNED 0x0002 /* cached data is not owned */
141 #define CF_FLAG_SYNTHESIZED 0x0004 /* Implicitly converted data */
142 #define CF_FLAG_UNICODE 0x0008 /* Data is in unicode */
144 static int selectionAcquired = 0; /* Contains the current selection masks */
145 static Window selectionWindow = None; /* The top level X window which owns the selection */
146 static Atom selectionCacheSrc = XA_PRIMARY; /* The selection source from which the clipboard cache was filled */
148 void X11DRV_EmptyClipboard(BOOL keepunowned);
149 void X11DRV_EndClipboardUpdate(void);
150 static HANDLE X11DRV_CLIPBOARD_ImportClipboardData(Window w, Atom prop);
151 static HANDLE X11DRV_CLIPBOARD_ImportEnhMetaFile(Window w, Atom prop);
152 static HANDLE X11DRV_CLIPBOARD_ImportMetaFilePict(Window w, Atom prop);
153 static HANDLE X11DRV_CLIPBOARD_ImportXAPIXMAP(Window w, Atom prop);
154 static HANDLE X11DRV_CLIPBOARD_ImportXAString(Window w, Atom prop);
155 static HANDLE X11DRV_CLIPBOARD_ImportUTF8(Window w, Atom prop);
156 static HANDLE X11DRV_CLIPBOARD_ImportCompoundText(Window w, Atom prop);
157 static HANDLE X11DRV_CLIPBOARD_ExportClipboardData(Window requestor, Atom aTarget,
158 Atom rprop, LPWINE_CLIPDATA lpData, LPDWORD lpBytes);
159 static HANDLE X11DRV_CLIPBOARD_ExportString(Window requestor, Atom aTarget,
160 Atom rprop, LPWINE_CLIPDATA lpData, LPDWORD lpBytes);
161 static HANDLE X11DRV_CLIPBOARD_ExportXAPIXMAP(Window requestor, Atom aTarget,
162 Atom rprop, LPWINE_CLIPDATA lpdata, LPDWORD lpBytes);
163 static HANDLE X11DRV_CLIPBOARD_ExportMetaFilePict(Window requestor, Atom aTarget,
164 Atom rprop, LPWINE_CLIPDATA lpdata, LPDWORD lpBytes);
165 static HANDLE X11DRV_CLIPBOARD_ExportEnhMetaFile(Window requestor, Atom aTarget,
166 Atom rprop, LPWINE_CLIPDATA lpdata, LPDWORD lpBytes);
167 static WINE_CLIPFORMAT *X11DRV_CLIPBOARD_InsertClipboardFormat(LPCWSTR FormatName, Atom prop);
168 static BOOL X11DRV_CLIPBOARD_RenderSynthesizedText(UINT wFormatID);
169 static void X11DRV_CLIPBOARD_FreeData(LPWINE_CLIPDATA lpData);
170 static BOOL X11DRV_CLIPBOARD_IsSelectionOwner(void);
171 static int X11DRV_CLIPBOARD_QueryAvailableData(LPCLIPBOARDINFO lpcbinfo);
172 static BOOL X11DRV_CLIPBOARD_ReadSelectionData(LPWINE_CLIPDATA lpData);
173 static BOOL X11DRV_CLIPBOARD_ReadProperty(Window w, Atom prop,
174 unsigned char** data, unsigned long* datasize);
175 static BOOL X11DRV_CLIPBOARD_RenderFormat(LPWINE_CLIPDATA lpData);
176 static HANDLE X11DRV_CLIPBOARD_SerializeMetafile(INT wformat, HANDLE hdata, LPDWORD lpcbytes, BOOL out);
177 static BOOL X11DRV_CLIPBOARD_SynthesizeData(UINT wFormatID);
178 static BOOL X11DRV_CLIPBOARD_RenderSynthesizedFormat(LPWINE_CLIPDATA lpData);
179 static BOOL X11DRV_CLIPBOARD_RenderSynthesizedDIB(void);
180 static BOOL X11DRV_CLIPBOARD_RenderSynthesizedBitmap(void);
181 static void X11DRV_HandleSelectionRequest( HWND hWnd, XSelectionRequestEvent *event, BOOL bIsMultiple );
183 /* Clipboard formats
184 * WARNING: This data ordering is dependent on the WINE_CLIPFORMAT structure
185 * declared in clipboard.h
187 static const WCHAR wszCF_TEXT[] = {'W','C','F','_','T','E','X','T',0};
188 static const WCHAR wszCF_BITMAP[] = {'W','C','F','_','B','I','T','M','A','P',0};
189 static const WCHAR wszCF_METAFILEPICT[] = {'W','C','F','_','M','E','T','A','F','I','L','E','P','I','C','T',0};
190 static const WCHAR wszCF_SYLK[] = {'W','C','F','_','S','Y','L','K',0};
191 static const WCHAR wszCF_DIF[] = {'W','C','F','_','D','I','F',0};
192 static const WCHAR wszCF_TIFF[] = {'W','C','F','_','T','I','F','F',0};
193 static const WCHAR wszCF_OEMTEXT[] = {'W','C','F','_','O','E','M','T','E','X','T',0};
194 static const WCHAR wszCF_DIB[] = {'W','C','F','_','D','I','B',0};
195 static const WCHAR wszCF_PALETTE[] = {'W','C','F','_','P','A','L','E','T','T','E',0};
196 static const WCHAR wszCF_PENDATA[] = {'W','C','F','_','P','E','N','D','A','T','A',0};
197 static const WCHAR wszCF_RIFF[] = {'W','C','F','_','R','I','F','F',0};
198 static const WCHAR wszCF_WAVE[] = {'W','C','F','_','W','A','V','E',0};
199 static const WCHAR wszCOMPOUNDTEXT[] = {'C','O','M','P','O','U','N','D','_','T','E','X','T',0};
200 static const WCHAR wszUTF8STRING[] = {'U','T','F','8','_','S','T','R','I','N','G',0};
201 static const WCHAR wszCF_ENHMETAFILE[] = {'W','C','F','_','E','N','H','M','E','T','A','F','I','L','E',0};
202 static const WCHAR wszCF_HDROP[] = {'W','C','F','_','H','D','R','O','P',0};
203 static const WCHAR wszCF_LOCALE[] = {'W','C','F','_','L','O','C','A','L','E',0};
204 static const WCHAR wszCF_DIBV5[] = {'W','C','F','_','D','I','B','V','5',0};
205 static const WCHAR wszCF_OWNERDISPLAY[] = {'W','C','F','_','O','W','N','E','R','D','I','S','P','L','A','Y',0};
206 static const WCHAR wszCF_DSPTEXT[] = {'W','C','F','_','D','S','P','T','E','X','T',0};
207 static const WCHAR wszCF_DSPBITMAP[] = {'W','C','F','_','D','S','P','B','I','T','M','A','P',0};
208 static const WCHAR wszCF_DSPMETAFILEPICT[] = {'W','C','F','_','D','S','P','M','E','T','A','F','I','L','E','P','I','C','T',0};
209 static const WCHAR wszCF_DSPENHMETAFILE[] = {'W','C','F','_','D','S','P','E','N','H','M','E','T','A','F','I','L','E',0};
211 static WINE_CLIPFORMAT ClipFormats[] =
213 { CF_TEXT, wszCF_TEXT, XA_STRING, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportXAString,
214 X11DRV_CLIPBOARD_ExportString, NULL, &ClipFormats[1]},
216 { CF_BITMAP, wszCF_BITMAP, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportClipboardData,
217 NULL, &ClipFormats[0], &ClipFormats[2]},
219 { CF_METAFILEPICT, wszCF_METAFILEPICT, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportMetaFilePict,
220 X11DRV_CLIPBOARD_ExportMetaFilePict, &ClipFormats[1], &ClipFormats[3]},
222 { CF_SYLK, wszCF_SYLK, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportClipboardData,
223 X11DRV_CLIPBOARD_ExportClipboardData, &ClipFormats[2], &ClipFormats[4]},
225 { CF_DIF, wszCF_DIF, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportClipboardData,
226 X11DRV_CLIPBOARD_ExportClipboardData, &ClipFormats[3], &ClipFormats[5]},
228 { CF_TIFF, wszCF_TIFF, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportClipboardData,
229 X11DRV_CLIPBOARD_ExportClipboardData, &ClipFormats[4], &ClipFormats[6]},
231 { CF_OEMTEXT, wszCF_OEMTEXT, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportClipboardData,
232 X11DRV_CLIPBOARD_ExportClipboardData, &ClipFormats[5], &ClipFormats[7]},
234 { CF_DIB, wszCF_DIB, XA_PIXMAP, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportXAPIXMAP,
235 X11DRV_CLIPBOARD_ExportXAPIXMAP, &ClipFormats[6], &ClipFormats[8]},
237 { CF_PALETTE, wszCF_PALETTE, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportClipboardData,
238 X11DRV_CLIPBOARD_ExportClipboardData, &ClipFormats[7], &ClipFormats[9]},
240 { CF_PENDATA, wszCF_PENDATA, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportClipboardData,
241 X11DRV_CLIPBOARD_ExportClipboardData, &ClipFormats[8], &ClipFormats[10]},
243 { CF_RIFF, wszCF_RIFF, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportClipboardData,
244 X11DRV_CLIPBOARD_ExportClipboardData, &ClipFormats[9], &ClipFormats[11]},
246 { CF_WAVE, wszCF_WAVE, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportClipboardData,
247 X11DRV_CLIPBOARD_ExportClipboardData, &ClipFormats[10], &ClipFormats[12]},
249 { CF_UNICODETEXT, wszUTF8STRING, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportUTF8,
250 X11DRV_CLIPBOARD_ExportString, &ClipFormats[11], &ClipFormats[13]},
252 /* If UTF8_STRING is not available, attempt COMPUND_TEXT */
253 { CF_UNICODETEXT, wszCOMPOUNDTEXT, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportCompoundText,
254 X11DRV_CLIPBOARD_ExportString, &ClipFormats[12], &ClipFormats[14]},
256 { CF_ENHMETAFILE, wszCF_ENHMETAFILE, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportEnhMetaFile,
257 X11DRV_CLIPBOARD_ExportEnhMetaFile, &ClipFormats[13], &ClipFormats[15]},
259 { CF_HDROP, wszCF_HDROP, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportClipboardData,
260 X11DRV_CLIPBOARD_ExportClipboardData, &ClipFormats[14], &ClipFormats[16]},
262 { CF_LOCALE, wszCF_LOCALE, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportClipboardData,
263 X11DRV_CLIPBOARD_ExportClipboardData, &ClipFormats[15], &ClipFormats[17]},
265 { CF_DIBV5, wszCF_DIBV5, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportClipboardData,
266 X11DRV_CLIPBOARD_ExportClipboardData, &ClipFormats[16], &ClipFormats[18]},
268 { CF_OWNERDISPLAY, wszCF_OWNERDISPLAY, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportClipboardData,
269 X11DRV_CLIPBOARD_ExportClipboardData, &ClipFormats[17], &ClipFormats[19]},
271 { CF_DSPTEXT, wszCF_DSPTEXT, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportClipboardData,
272 X11DRV_CLIPBOARD_ExportClipboardData, &ClipFormats[18], &ClipFormats[20]},
274 { CF_DSPBITMAP, wszCF_DSPBITMAP, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportClipboardData,
275 X11DRV_CLIPBOARD_ExportClipboardData, &ClipFormats[19], &ClipFormats[21]},
277 { CF_DSPMETAFILEPICT, wszCF_DSPMETAFILEPICT, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportClipboardData,
278 X11DRV_CLIPBOARD_ExportClipboardData, &ClipFormats[20], &ClipFormats[22]},
280 { CF_DSPENHMETAFILE, wszCF_DSPENHMETAFILE, 0, CF_FLAG_BUILTINFMT, X11DRV_CLIPBOARD_ImportClipboardData,
281 X11DRV_CLIPBOARD_ExportClipboardData, &ClipFormats[21], NULL}
284 #define GET_ATOM(prop) (((prop) < FIRST_XATOM) ? (Atom)(prop) : X11DRV_Atoms[(prop) - FIRST_XATOM])
286 /* Maps X properties to Windows formats */
287 static const WCHAR wszRichTextFormat[] = {'R','i','c','h',' ','T','e','x','t',' ','F','o','r','m','a','t',0};
288 static const WCHAR wszGIF[] = {'G','I','F',0};
289 static const WCHAR wszHTMLFormat[] = {'H','T','M','L',' ','F','o','r','m','a','t',0};
290 static const struct
292 LPCWSTR lpszFormat;
293 UINT prop;
294 } PropertyFormatMap[] =
296 { wszRichTextFormat, XATOM_text_rtf },
297 { wszRichTextFormat, XATOM_text_richtext },
298 { wszGIF, XATOM_image_gif },
299 { wszHTMLFormat, XATOM_text_html },
304 * Cached clipboard data.
306 static LPWINE_CLIPDATA ClipData = NULL;
307 static UINT ClipDataCount = 0;
310 * Clipboard sequence number
312 static UINT wSeqNo = 0;
314 /**************************************************************************
315 * Internal Clipboard implementation methods
316 **************************************************************************/
318 static Window thread_selection_wnd(void)
320 Window w = x11drv_thread_data()->selection_wnd;
322 if (!w)
324 XSetWindowAttributes attr;
326 attr.event_mask = (ExposureMask | KeyPressMask | KeyReleaseMask | PointerMotionMask |
327 ButtonPressMask | ButtonReleaseMask | EnterWindowMask);
329 wine_tsx11_lock();
330 w = XCreateWindow(thread_display(), root_window, 0, 0, 1, 1, 0, screen_depth,
331 InputOutput, CopyFromParent, CWEventMask, &attr);
332 wine_tsx11_unlock();
334 if (w)
335 x11drv_thread_data()->selection_wnd = w;
336 else
337 FIXME("Failed to create window. Fetching selection data will fail.\n");
340 return w;
343 /**************************************************************************
344 * X11DRV_InitClipboard
346 void X11DRV_InitClipboard(void)
348 UINT i;
350 /* Register known mapping between window formats and X properties */
351 for (i = 0; i < sizeof(PropertyFormatMap)/sizeof(PropertyFormatMap[0]); i++)
352 X11DRV_CLIPBOARD_InsertClipboardFormat(PropertyFormatMap[i].lpszFormat, GET_ATOM(PropertyFormatMap[i].prop));
356 /**************************************************************************
357 * intern_atoms
359 * Intern atoms for formats that don't have one yet.
361 static void intern_atoms(void)
363 LPWINE_CLIPFORMAT format;
364 int i, count, len;
365 char **names;
366 Atom *atoms;
368 for (format = ClipFormats, count = 0; format; format = format->NextFormat)
369 if (!format->drvData) count++;
370 if (!count) return;
372 names = HeapAlloc( GetProcessHeap(), 0, count * sizeof(*names) );
373 atoms = HeapAlloc( GetProcessHeap(), 0, count * sizeof(*atoms) );
375 for (format = ClipFormats, i = 0; format; format = format->NextFormat) {
376 if (!format->drvData) {
377 len = WideCharToMultiByte(CP_UNIXCP, 0, format->Name, -1, NULL, 0, NULL, NULL);
378 names[i] = HeapAlloc(GetProcessHeap(), 0, len);
379 WideCharToMultiByte(CP_UNIXCP, 0, format->Name, -1, names[i++], len, NULL, NULL);
383 wine_tsx11_lock();
384 XInternAtoms( thread_display(), names, count, False, atoms );
385 wine_tsx11_unlock();
387 for (format = ClipFormats, i = 0; format; format = format->NextFormat) {
388 if (!format->drvData) {
389 HeapFree(GetProcessHeap(), 0, names[i]);
390 format->drvData = atoms[i++];
394 HeapFree( GetProcessHeap(), 0, names );
395 HeapFree( GetProcessHeap(), 0, atoms );
399 /**************************************************************************
400 * register_format
402 * Register a custom X clipboard format.
404 static WINE_CLIPFORMAT *register_format( LPCWSTR FormatName, Atom prop )
406 LPWINE_CLIPFORMAT lpFormat = ClipFormats;
408 TRACE("%s\n", debugstr_w(FormatName));
410 /* walk format chain to see if it's already registered */
411 while (lpFormat)
413 if (CompareStringW(LOCALE_SYSTEM_DEFAULT, NORM_IGNORECASE, lpFormat->Name, -1, FormatName, -1) == CSTR_EQUAL
414 && (lpFormat->wFlags & CF_FLAG_BUILTINFMT) == 0)
415 return lpFormat;
416 lpFormat = lpFormat->NextFormat;
419 return X11DRV_CLIPBOARD_InsertClipboardFormat(FormatName, prop);
423 /**************************************************************************
424 * X11DRV_CLIPBOARD_LookupFormat
426 static LPWINE_CLIPFORMAT X11DRV_CLIPBOARD_LookupFormat(WORD wID)
428 LPWINE_CLIPFORMAT lpFormat = ClipFormats;
430 while(lpFormat)
432 if (lpFormat->wFormatID == wID)
433 break;
435 lpFormat = lpFormat->NextFormat;
437 if (lpFormat && !lpFormat->drvData) intern_atoms();
438 return lpFormat;
442 /**************************************************************************
443 * X11DRV_CLIPBOARD_LookupProperty
445 static LPWINE_CLIPFORMAT X11DRV_CLIPBOARD_LookupProperty(LPWINE_CLIPFORMAT current, UINT drvData)
447 for (;;)
449 LPWINE_CLIPFORMAT lpFormat = ClipFormats;
450 BOOL need_intern = FALSE;
452 if (current)
453 lpFormat = current->NextFormat;
455 while(lpFormat)
457 if (lpFormat->drvData == drvData) return lpFormat;
458 if (!lpFormat->drvData) need_intern = TRUE;
459 lpFormat = lpFormat->NextFormat;
461 if (!need_intern) return NULL;
462 intern_atoms();
463 /* restart the search for the new atoms */
468 /**************************************************************************
469 * X11DRV_CLIPBOARD_LookupData
471 static LPWINE_CLIPDATA X11DRV_CLIPBOARD_LookupData(DWORD wID)
473 LPWINE_CLIPDATA lpData = ClipData;
475 if (lpData)
479 if (lpData->wFormatID == wID)
480 break;
482 lpData = lpData->NextData;
484 while(lpData != ClipData);
486 if (lpData->wFormatID != wID)
487 lpData = NULL;
490 return lpData;
494 /**************************************************************************
495 * InsertClipboardFormat
497 static WINE_CLIPFORMAT *X11DRV_CLIPBOARD_InsertClipboardFormat(LPCWSTR FormatName, Atom prop)
499 LPWINE_CLIPFORMAT lpFormat;
500 LPWINE_CLIPFORMAT lpNewFormat;
501 LPWSTR new_name;
503 /* allocate storage for new format entry */
504 lpNewFormat = HeapAlloc(GetProcessHeap(), 0, sizeof(WINE_CLIPFORMAT));
506 if(lpNewFormat == NULL)
508 WARN("No more memory for a new format!\n");
509 return NULL;
512 if (!(new_name = HeapAlloc(GetProcessHeap(), 0, (strlenW(FormatName)+1)*sizeof(WCHAR))))
514 WARN("No more memory for the new format name!\n");
515 HeapFree(GetProcessHeap(), 0, lpNewFormat);
516 return NULL;
519 lpNewFormat->Name = strcpyW(new_name, FormatName);
520 lpNewFormat->wFlags = 0;
521 lpNewFormat->wFormatID = GlobalAddAtomW(lpNewFormat->Name);
522 lpNewFormat->drvData = prop;
523 lpNewFormat->lpDrvImportFunc = X11DRV_CLIPBOARD_ImportClipboardData;
524 lpNewFormat->lpDrvExportFunc = X11DRV_CLIPBOARD_ExportClipboardData;
526 /* Link Format */
527 lpFormat = ClipFormats;
529 while(lpFormat->NextFormat) /* Move to last entry */
530 lpFormat = lpFormat->NextFormat;
532 lpNewFormat->NextFormat = NULL;
533 lpFormat->NextFormat = lpNewFormat;
534 lpNewFormat->PrevFormat = lpFormat;
536 TRACE("Registering format(%d): %s drvData %d\n",
537 lpNewFormat->wFormatID, debugstr_w(FormatName), lpNewFormat->drvData);
539 return lpNewFormat;
545 /**************************************************************************
546 * X11DRV_CLIPBOARD_GetClipboardInfo
548 static BOOL X11DRV_CLIPBOARD_GetClipboardInfo(LPCLIPBOARDINFO cbInfo)
550 BOOL bRet = FALSE;
552 SERVER_START_REQ( set_clipboard_info )
554 req->flags = 0;
556 if (wine_server_call_err( req ))
558 ERR("Failed to get clipboard owner.\n");
560 else
562 cbInfo->hWndOpen = reply->old_clipboard;
563 cbInfo->hWndOwner = reply->old_owner;
564 cbInfo->hWndViewer = reply->old_viewer;
565 cbInfo->seqno = reply->seqno;
566 cbInfo->flags = reply->flags;
568 bRet = TRUE;
571 SERVER_END_REQ;
573 return bRet;
577 /**************************************************************************
578 * X11DRV_CLIPBOARD_ReleaseOwnership
580 static BOOL X11DRV_CLIPBOARD_ReleaseOwnership(void)
582 BOOL bRet = FALSE;
584 SERVER_START_REQ( set_clipboard_info )
586 req->flags = SET_CB_RELOWNER | SET_CB_SEQNO;
588 if (wine_server_call_err( req ))
590 ERR("Failed to set clipboard.\n");
592 else
594 bRet = TRUE;
597 SERVER_END_REQ;
599 return bRet;
604 /**************************************************************************
605 * X11DRV_CLIPBOARD_InsertClipboardData
607 * Caller *must* have the clipboard open and be the owner.
609 static BOOL X11DRV_CLIPBOARD_InsertClipboardData(UINT wFormatID, HANDLE16 hData16,
610 HANDLE hData32, DWORD flags, LPWINE_CLIPFORMAT lpFormat, BOOL override)
612 LPWINE_CLIPDATA lpData = X11DRV_CLIPBOARD_LookupData(wFormatID);
614 TRACE("format=%d lpData=%p hData16=%08x hData32=%p flags=0x%08x lpFormat=%p override=%d\n",
615 wFormatID, lpData, hData16, hData32, flags, lpFormat, override);
617 if (lpData && !override)
618 return TRUE;
620 if (lpData)
622 X11DRV_CLIPBOARD_FreeData(lpData);
624 lpData->hData16 = hData16; /* 0 is legal, see WM_RENDERFORMAT */
625 lpData->hData32 = hData32;
627 else
629 lpData = HeapAlloc(GetProcessHeap(), 0, sizeof(WINE_CLIPDATA));
631 lpData->wFormatID = wFormatID;
632 lpData->hData16 = hData16; /* 0 is legal, see WM_RENDERFORMAT */
633 lpData->hData32 = hData32;
634 lpData->lpFormat = lpFormat;
635 lpData->drvData = 0;
637 if (ClipData)
639 LPWINE_CLIPDATA lpPrevData = ClipData->PrevData;
641 lpData->PrevData = lpPrevData;
642 lpData->NextData = ClipData;
644 lpPrevData->NextData = lpData;
645 ClipData->PrevData = lpData;
647 else
649 lpData->NextData = lpData;
650 lpData->PrevData = lpData;
651 ClipData = lpData;
654 ClipDataCount++;
657 lpData->wFlags = flags;
659 return TRUE;
663 /**************************************************************************
664 * X11DRV_CLIPBOARD_FreeData
666 * Free clipboard data handle.
668 static void X11DRV_CLIPBOARD_FreeData(LPWINE_CLIPDATA lpData)
670 TRACE("%d\n", lpData->wFormatID);
672 if ((lpData->wFormatID >= CF_GDIOBJFIRST &&
673 lpData->wFormatID <= CF_GDIOBJLAST) ||
674 lpData->wFormatID == CF_BITMAP ||
675 lpData->wFormatID == CF_DIB ||
676 lpData->wFormatID == CF_PALETTE)
678 if (lpData->hData32)
679 DeleteObject(lpData->hData32);
681 if (lpData->hData16)
682 DeleteObject(HGDIOBJ_32(lpData->hData16));
684 if ((lpData->wFormatID == CF_DIB) && lpData->drvData)
685 XFreePixmap(gdi_display, lpData->drvData);
687 else if (lpData->wFormatID == CF_METAFILEPICT)
689 if (lpData->hData32)
691 DeleteMetaFile(((METAFILEPICT *)GlobalLock( lpData->hData32 ))->hMF );
692 GlobalFree(lpData->hData32);
694 if (lpData->hData16)
695 /* HMETAFILE16 and HMETAFILE32 are apparently the same thing,
696 and a shallow copy is enough to share a METAFILEPICT
697 structure between 16bit and 32bit clipboards. The MetaFile
698 should of course only be deleted once. */
699 GlobalFree16(lpData->hData16);
702 if (lpData->hData16)
704 METAFILEPICT16* lpMetaPict = (METAFILEPICT16 *) GlobalLock16(lpData->hData16);
706 if (lpMetaPict)
708 /* To delete 16-bit meta file, we just need to free the associated
709 handle. See DeleteMetaFile16() in dlls/gdi/metafile.c. */
710 GlobalFree16(lpMetaPict->hMF);
711 lpMetaPict->hMF = 0;
714 GlobalFree16(lpData->hData16);
717 else if (lpData->wFormatID == CF_ENHMETAFILE)
719 if (lpData->hData32)
720 DeleteEnhMetaFile(lpData->hData32);
722 else if (lpData->wFormatID < CF_PRIVATEFIRST ||
723 lpData->wFormatID > CF_PRIVATELAST)
725 if (lpData->hData32)
726 GlobalFree(lpData->hData32);
728 if (lpData->hData16)
729 GlobalFree16(lpData->hData16);
732 lpData->hData16 = 0;
733 lpData->hData32 = 0;
734 lpData->drvData = 0;
738 /**************************************************************************
739 * X11DRV_CLIPBOARD_UpdateCache
741 static BOOL X11DRV_CLIPBOARD_UpdateCache(LPCLIPBOARDINFO lpcbinfo)
743 BOOL bret = TRUE;
745 if (!X11DRV_CLIPBOARD_IsSelectionOwner())
747 if (!X11DRV_CLIPBOARD_GetClipboardInfo(lpcbinfo))
749 ERR("Failed to retrieve clipboard information.\n");
750 bret = FALSE;
752 else if (wSeqNo < lpcbinfo->seqno)
754 X11DRV_EmptyClipboard(TRUE);
756 if (X11DRV_CLIPBOARD_QueryAvailableData(lpcbinfo) < 0)
758 ERR("Failed to cache clipboard data owned by another process.\n");
759 bret = FALSE;
761 else
763 X11DRV_EndClipboardUpdate();
766 wSeqNo = lpcbinfo->seqno;
770 return bret;
774 /**************************************************************************
775 * X11DRV_CLIPBOARD_RenderFormat
777 static BOOL X11DRV_CLIPBOARD_RenderFormat(LPWINE_CLIPDATA lpData)
779 BOOL bret = TRUE;
781 TRACE(" 0x%04x hData32(%p) hData16(0x%08x)\n",
782 lpData->wFormatID, lpData->hData32, lpData->hData16);
784 if (lpData->hData32 || lpData->hData16)
785 return bret; /* Already rendered */
787 if (lpData->wFlags & CF_FLAG_SYNTHESIZED)
788 bret = X11DRV_CLIPBOARD_RenderSynthesizedFormat(lpData);
789 else if (!X11DRV_CLIPBOARD_IsSelectionOwner())
791 if (!X11DRV_CLIPBOARD_ReadSelectionData(lpData))
793 ERR("Failed to cache clipboard data owned by another process. Format=%d\n",
794 lpData->wFormatID);
795 bret = FALSE;
798 else
800 CLIPBOARDINFO cbInfo;
802 if (X11DRV_CLIPBOARD_GetClipboardInfo(&cbInfo) && cbInfo.hWndOwner)
804 /* Send a WM_RENDERFORMAT message to notify the owner to render the
805 * data requested into the clipboard.
807 TRACE("Sending WM_RENDERFORMAT message to hwnd(%p)\n", cbInfo.hWndOwner);
808 SendMessageW(cbInfo.hWndOwner, WM_RENDERFORMAT, (WPARAM)lpData->wFormatID, 0);
810 if (!lpData->hData32 && !lpData->hData16)
811 bret = FALSE;
813 else
815 ERR("hWndClipOwner is lost!\n");
816 bret = FALSE;
820 return bret;
824 /**************************************************************************
825 * CLIPBOARD_ConvertText
826 * Returns number of required/converted characters - not bytes!
828 static INT CLIPBOARD_ConvertText(WORD src_fmt, void const *src, INT src_size,
829 WORD dst_fmt, void *dst, INT dst_size)
831 UINT cp;
833 if(src_fmt == CF_UNICODETEXT)
835 switch(dst_fmt)
837 case CF_TEXT:
838 cp = CP_ACP;
839 break;
840 case CF_OEMTEXT:
841 cp = CP_OEMCP;
842 break;
843 default:
844 return 0;
846 return WideCharToMultiByte(cp, 0, src, src_size, dst, dst_size, NULL, NULL);
849 if(dst_fmt == CF_UNICODETEXT)
851 switch(src_fmt)
853 case CF_TEXT:
854 cp = CP_ACP;
855 break;
856 case CF_OEMTEXT:
857 cp = CP_OEMCP;
858 break;
859 default:
860 return 0;
862 return MultiByteToWideChar(cp, 0, src, src_size, dst, dst_size);
865 if(!dst_size) return src_size;
867 if(dst_size > src_size) dst_size = src_size;
869 if(src_fmt == CF_TEXT )
870 CharToOemBuffA(src, dst, dst_size);
871 else
872 OemToCharBuffA(src, dst, dst_size);
874 return dst_size;
878 /**************************************************************************
879 * X11DRV_CLIPBOARD_RenderSynthesizedFormat
881 static BOOL X11DRV_CLIPBOARD_RenderSynthesizedFormat(LPWINE_CLIPDATA lpData)
883 BOOL bret = FALSE;
885 TRACE("\n");
887 if (lpData->wFlags & CF_FLAG_SYNTHESIZED)
889 UINT wFormatID = lpData->wFormatID;
891 if (wFormatID == CF_UNICODETEXT || wFormatID == CF_TEXT || wFormatID == CF_OEMTEXT)
892 bret = X11DRV_CLIPBOARD_RenderSynthesizedText(wFormatID);
893 else
895 switch (wFormatID)
897 case CF_DIB:
898 bret = X11DRV_CLIPBOARD_RenderSynthesizedDIB();
899 break;
901 case CF_BITMAP:
902 bret = X11DRV_CLIPBOARD_RenderSynthesizedBitmap();
903 break;
905 case CF_ENHMETAFILE:
906 case CF_METAFILEPICT:
907 FIXME("Synthesizing wFormatID(0x%08x) not implemented\n", wFormatID);
908 break;
910 default:
911 FIXME("Called to synthesize unknown format\n");
912 break;
916 lpData->wFlags &= ~CF_FLAG_SYNTHESIZED;
919 return bret;
923 /**************************************************************************
924 * X11DRV_CLIPBOARD_RenderSynthesizedText
926 * Renders synthesized text
928 static BOOL X11DRV_CLIPBOARD_RenderSynthesizedText(UINT wFormatID)
930 LPCSTR lpstrS;
931 LPSTR lpstrT;
932 HANDLE hData32;
933 INT src_chars, dst_chars, alloc_size;
934 LPWINE_CLIPDATA lpSource = NULL;
936 TRACE(" %d\n", wFormatID);
938 if ((lpSource = X11DRV_CLIPBOARD_LookupData(wFormatID)) &&
939 lpSource->hData32)
940 return TRUE;
942 /* Look for rendered source or non-synthesized source */
943 if ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_UNICODETEXT)) &&
944 (!(lpSource->wFlags & CF_FLAG_SYNTHESIZED) || lpSource->hData32))
946 TRACE("UNICODETEXT -> %d\n", wFormatID);
948 else if ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_TEXT)) &&
949 (!(lpSource->wFlags & CF_FLAG_SYNTHESIZED) || lpSource->hData32))
951 TRACE("TEXT -> %d\n", wFormatID);
953 else if ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_OEMTEXT)) &&
954 (!(lpSource->wFlags & CF_FLAG_SYNTHESIZED) || lpSource->hData32))
956 TRACE("OEMTEXT -> %d\n", wFormatID);
959 if (!lpSource || (lpSource->wFlags & CF_FLAG_SYNTHESIZED &&
960 !lpSource->hData32))
961 return FALSE;
963 /* Ask the clipboard owner to render the source text if necessary */
964 if (!lpSource->hData32 && !X11DRV_CLIPBOARD_RenderFormat(lpSource))
965 return FALSE;
967 if (lpSource->hData32)
969 lpstrS = (LPSTR)GlobalLock(lpSource->hData32);
971 else
973 lpstrS = (LPSTR)GlobalLock16(lpSource->hData16);
976 if (!lpstrS)
977 return FALSE;
979 /* Text always NULL terminated */
980 if(lpSource->wFormatID == CF_UNICODETEXT)
981 src_chars = strlenW((LPCWSTR)lpstrS) + 1;
982 else
983 src_chars = strlen(lpstrS) + 1;
985 /* Calculate number of characters in the destination buffer */
986 dst_chars = CLIPBOARD_ConvertText(lpSource->wFormatID, lpstrS,
987 src_chars, wFormatID, NULL, 0);
989 if (!dst_chars)
990 return FALSE;
992 TRACE("Converting from '%d' to '%d', %i chars\n",
993 lpSource->wFormatID, wFormatID, src_chars);
995 /* Convert characters to bytes */
996 if(wFormatID == CF_UNICODETEXT)
997 alloc_size = dst_chars * sizeof(WCHAR);
998 else
999 alloc_size = dst_chars;
1001 hData32 = GlobalAlloc(GMEM_ZEROINIT | GMEM_MOVEABLE |
1002 GMEM_DDESHARE, alloc_size);
1004 lpstrT = (LPSTR)GlobalLock(hData32);
1006 if (lpstrT)
1008 CLIPBOARD_ConvertText(lpSource->wFormatID, lpstrS, src_chars,
1009 wFormatID, lpstrT, dst_chars);
1010 GlobalUnlock(hData32);
1013 /* Unlock source */
1014 if (lpSource->hData32)
1015 GlobalUnlock(lpSource->hData32);
1016 else
1017 GlobalUnlock16(lpSource->hData16);
1019 return X11DRV_CLIPBOARD_InsertClipboardData(wFormatID, 0, hData32, 0, NULL, TRUE);
1023 /**************************************************************************
1024 * X11DRV_CLIPBOARD_RenderSynthesizedDIB
1026 * Renders synthesized DIB
1028 static BOOL X11DRV_CLIPBOARD_RenderSynthesizedDIB(void)
1030 BOOL bret = FALSE;
1031 LPWINE_CLIPDATA lpSource = NULL;
1033 TRACE("\n");
1035 if ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_DIB)) && lpSource->hData32)
1037 bret = TRUE;
1039 /* If we have a bitmap and it's not synthesized or it has been rendered */
1040 else if ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_BITMAP)) &&
1041 (!(lpSource->wFlags & CF_FLAG_SYNTHESIZED) || lpSource->hData32))
1043 /* Render source if required */
1044 if (lpSource->hData32 || X11DRV_CLIPBOARD_RenderFormat(lpSource))
1046 HDC hdc;
1047 HGLOBAL hData32;
1049 hdc = GetDC(NULL);
1050 hData32 = X11DRV_DIB_CreateDIBFromBitmap(hdc, lpSource->hData32);
1051 ReleaseDC(NULL, hdc);
1053 if (hData32)
1055 X11DRV_CLIPBOARD_InsertClipboardData(CF_DIB, 0, hData32, 0, NULL, TRUE);
1056 bret = TRUE;
1061 return bret;
1065 /**************************************************************************
1066 * X11DRV_CLIPBOARD_RenderSynthesizedBitmap
1068 * Renders synthesized bitmap
1070 static BOOL X11DRV_CLIPBOARD_RenderSynthesizedBitmap(void)
1072 BOOL bret = FALSE;
1073 LPWINE_CLIPDATA lpSource = NULL;
1075 TRACE("\n");
1077 if ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_BITMAP)) && lpSource->hData32)
1079 bret = TRUE;
1081 /* If we have a dib and it's not synthesized or it has been rendered */
1082 else if ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_DIB)) &&
1083 (!(lpSource->wFlags & CF_FLAG_SYNTHESIZED) || lpSource->hData32))
1085 /* Render source if required */
1086 if (lpSource->hData32 || X11DRV_CLIPBOARD_RenderFormat(lpSource))
1088 HDC hdc;
1089 HBITMAP hData32;
1090 unsigned int offset;
1091 LPBITMAPINFOHEADER lpbmih;
1093 hdc = GetDC(NULL);
1094 lpbmih = (LPBITMAPINFOHEADER) GlobalLock(lpSource->hData32);
1096 offset = sizeof(BITMAPINFOHEADER)
1097 + ((lpbmih->biBitCount <= 8) ? (sizeof(RGBQUAD) *
1098 (1 << lpbmih->biBitCount)) : 0);
1100 hData32 = CreateDIBitmap(hdc, lpbmih, CBM_INIT, (LPBYTE)lpbmih +
1101 offset, (LPBITMAPINFO) lpbmih, DIB_RGB_COLORS);
1103 GlobalUnlock(lpSource->hData32);
1104 ReleaseDC(NULL, hdc);
1106 if (hData32)
1108 X11DRV_CLIPBOARD_InsertClipboardData(CF_BITMAP, 0, hData32, 0, NULL, TRUE);
1109 bret = TRUE;
1114 return bret;
1118 /**************************************************************************
1119 * X11DRV_CLIPBOARD_ImportXAString
1121 * Import XA_STRING, converting the string to CF_TEXT.
1123 HANDLE X11DRV_CLIPBOARD_ImportXAString(Window w, Atom prop)
1125 LPBYTE lpdata;
1126 unsigned long cbytes;
1127 LPSTR lpstr;
1128 unsigned long i, inlcount = 0;
1129 HANDLE hText = 0;
1131 if (!X11DRV_CLIPBOARD_ReadProperty(w, prop, &lpdata, &cbytes))
1132 return 0;
1134 for (i = 0; i <= cbytes; i++)
1136 if (lpdata[i] == '\n')
1137 inlcount++;
1140 if ((hText = GlobalAlloc(GMEM_MOVEABLE | GMEM_DDESHARE, cbytes + inlcount + 1)))
1142 lpstr = GlobalLock(hText);
1144 for (i = 0, inlcount = 0; i <= cbytes; i++)
1146 if (lpdata[i] == '\n')
1147 lpstr[inlcount++] = '\r';
1149 lpstr[inlcount++] = lpdata[i];
1152 GlobalUnlock(hText);
1155 /* Free the retrieved property data */
1156 HeapFree(GetProcessHeap(), 0, lpdata);
1158 return hText;
1162 /**************************************************************************
1163 * X11DRV_CLIPBOARD_ImportUTF8
1165 * Import XA_STRING, converting the string to CF_UNICODE.
1167 HANDLE X11DRV_CLIPBOARD_ImportUTF8(Window w, Atom prop)
1169 LPBYTE lpdata;
1170 unsigned long cbytes;
1171 LPSTR lpstr;
1172 unsigned long i, inlcount = 0;
1173 HANDLE hUnicodeText = 0;
1175 if (!X11DRV_CLIPBOARD_ReadProperty(w, prop, &lpdata, &cbytes))
1176 return 0;
1178 for (i = 0; i <= cbytes; i++)
1180 if (lpdata[i] == '\n')
1181 inlcount++;
1184 if ((lpstr = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, cbytes + inlcount + 1)))
1186 UINT count;
1188 for (i = 0, inlcount = 0; i <= cbytes; i++)
1190 if (lpdata[i] == '\n')
1191 lpstr[inlcount++] = '\r';
1193 lpstr[inlcount++] = lpdata[i];
1196 count = MultiByteToWideChar(CP_UTF8, 0, lpstr, -1, NULL, 0);
1197 hUnicodeText = GlobalAlloc(GMEM_MOVEABLE | GMEM_DDESHARE, count * sizeof(WCHAR));
1199 if (hUnicodeText)
1201 WCHAR *textW = GlobalLock(hUnicodeText);
1202 MultiByteToWideChar(CP_UTF8, 0, lpstr, -1, textW, count);
1203 GlobalUnlock(hUnicodeText);
1206 HeapFree(GetProcessHeap(), 0, lpstr);
1209 /* Free the retrieved property data */
1210 HeapFree(GetProcessHeap(), 0, lpdata);
1212 return hUnicodeText;
1216 /**************************************************************************
1217 * X11DRV_CLIPBOARD_ImportCompoundText
1219 * Import COMPOUND_TEXT to CF_UNICODE
1221 static HANDLE X11DRV_CLIPBOARD_ImportCompoundText(Window w, Atom prop)
1223 Display *display = thread_display();
1224 int i, j;
1225 char** srcstr;
1226 int count, lcount;
1227 int srclen, destlen;
1228 HANDLE hUnicodeText;
1229 XTextProperty txtprop;
1231 wine_tsx11_lock();
1232 if (!XGetTextProperty(display, w, &txtprop, prop))
1234 wine_tsx11_unlock();
1235 return 0;
1238 XmbTextPropertyToTextList(display, &txtprop, &srcstr, &count);
1239 wine_tsx11_unlock();
1241 TRACE("Importing %d line(s)\n", count);
1243 /* Compute number of lines */
1244 srclen = strlen(srcstr[0]);
1245 for (i = 0, lcount = 0; i <= srclen; i++)
1247 if (srcstr[0][i] == '\n')
1248 lcount++;
1251 destlen = MultiByteToWideChar(CP_UNIXCP, 0, srcstr[0], -1, NULL, 0);
1253 TRACE("lcount = %d, destlen=%d, srcstr %s\n", lcount, destlen, srcstr[0]);
1255 if ((hUnicodeText = GlobalAlloc(GMEM_MOVEABLE | GMEM_DDESHARE, (destlen + lcount + 1) * sizeof(WCHAR))))
1257 WCHAR *deststr = GlobalLock(hUnicodeText);
1258 MultiByteToWideChar(CP_UNIXCP, 0, srcstr[0], -1, deststr, destlen);
1260 if (lcount)
1262 for (i = destlen - 1, j = destlen + lcount - 1; i >= 0; i--, j--)
1264 deststr[j] = deststr[i];
1266 if (deststr[i] == '\n')
1267 deststr[--j] = '\r';
1271 GlobalUnlock(hUnicodeText);
1274 wine_tsx11_lock();
1275 XFreeStringList(srcstr);
1276 XFree(txtprop.value);
1277 wine_tsx11_unlock();
1279 return hUnicodeText;
1283 /**************************************************************************
1284 * X11DRV_CLIPBOARD_ImportXAPIXMAP
1286 * Import XA_PIXMAP, converting the image to CF_DIB.
1288 HANDLE X11DRV_CLIPBOARD_ImportXAPIXMAP(Window w, Atom prop)
1290 HWND hwnd;
1291 HDC hdc;
1292 LPBYTE lpdata;
1293 unsigned long cbytes;
1294 Pixmap *pPixmap;
1295 HANDLE hClipData = 0;
1297 if (X11DRV_CLIPBOARD_ReadProperty(w, prop, &lpdata, &cbytes))
1299 pPixmap = (Pixmap *) lpdata;
1301 hwnd = GetOpenClipboardWindow();
1302 hdc = GetDC(hwnd);
1304 hClipData = X11DRV_DIB_CreateDIBFromPixmap(*pPixmap, hdc);
1305 ReleaseDC(hwnd, hdc);
1307 /* Free the retrieved property data */
1308 HeapFree(GetProcessHeap(), 0, lpdata);
1311 return hClipData;
1315 /**************************************************************************
1316 * X11DRV_CLIPBOARD_ImportMetaFilePict
1318 * Import MetaFilePict.
1320 HANDLE X11DRV_CLIPBOARD_ImportMetaFilePict(Window w, Atom prop)
1322 LPBYTE lpdata;
1323 unsigned long cbytes;
1324 HANDLE hClipData = 0;
1326 if (X11DRV_CLIPBOARD_ReadProperty(w, prop, &lpdata, &cbytes))
1328 if (cbytes)
1329 hClipData = X11DRV_CLIPBOARD_SerializeMetafile(CF_METAFILEPICT, (HANDLE)lpdata, (LPDWORD)&cbytes, FALSE);
1331 /* Free the retrieved property data */
1332 HeapFree(GetProcessHeap(), 0, lpdata);
1335 return hClipData;
1339 /**************************************************************************
1340 * X11DRV_ImportEnhMetaFile
1342 * Import EnhMetaFile.
1344 HANDLE X11DRV_CLIPBOARD_ImportEnhMetaFile(Window w, Atom prop)
1346 LPBYTE lpdata;
1347 unsigned long cbytes;
1348 HANDLE hClipData = 0;
1350 if (X11DRV_CLIPBOARD_ReadProperty(w, prop, &lpdata, &cbytes))
1352 if (cbytes)
1353 hClipData = X11DRV_CLIPBOARD_SerializeMetafile(CF_ENHMETAFILE, (HANDLE)lpdata, (LPDWORD)&cbytes, FALSE);
1355 /* Free the retrieved property data */
1356 HeapFree(GetProcessHeap(), 0, lpdata);
1359 return hClipData;
1363 /**************************************************************************
1364 * X11DRV_ImportClipbordaData
1366 * Generic import clipboard data routine.
1368 HANDLE X11DRV_CLIPBOARD_ImportClipboardData(Window w, Atom prop)
1370 LPVOID lpClipData;
1371 LPBYTE lpdata;
1372 unsigned long cbytes;
1373 HANDLE hClipData = 0;
1375 if (X11DRV_CLIPBOARD_ReadProperty(w, prop, &lpdata, &cbytes))
1377 if (cbytes)
1379 /* Turn on the DDESHARE flag to enable shared 32 bit memory */
1380 hClipData = GlobalAlloc(GMEM_MOVEABLE | GMEM_DDESHARE, cbytes);
1381 if (hClipData == 0)
1382 return NULL;
1384 if ((lpClipData = GlobalLock(hClipData)))
1386 memcpy(lpClipData, lpdata, cbytes);
1387 GlobalUnlock(hClipData);
1389 else
1391 GlobalFree(hClipData);
1392 hClipData = 0;
1396 /* Free the retrieved property data */
1397 HeapFree(GetProcessHeap(), 0, lpdata);
1400 return hClipData;
1404 /**************************************************************************
1405 X11DRV_CLIPBOARD_ExportClipboardData
1407 * Generic export clipboard data routine.
1409 HANDLE X11DRV_CLIPBOARD_ExportClipboardData(Window requestor, Atom aTarget,
1410 Atom rprop, LPWINE_CLIPDATA lpData, LPDWORD lpBytes)
1412 LPVOID lpClipData;
1413 UINT datasize = 0;
1414 HANDLE hClipData = 0;
1416 *lpBytes = 0; /* Assume failure */
1418 if (!X11DRV_CLIPBOARD_RenderFormat(lpData))
1419 ERR("Failed to export %d format\n", lpData->wFormatID);
1420 else
1422 datasize = GlobalSize(lpData->hData32);
1424 hClipData = GlobalAlloc(GMEM_MOVEABLE | GMEM_DDESHARE, datasize);
1425 if (hClipData == 0) return NULL;
1427 if ((lpClipData = GlobalLock(hClipData)))
1429 LPVOID lpdata = GlobalLock(lpData->hData32);
1431 memcpy(lpClipData, lpdata, datasize);
1432 *lpBytes = datasize;
1434 GlobalUnlock(lpData->hData32);
1435 GlobalUnlock(hClipData);
1436 } else {
1437 GlobalFree(hClipData);
1438 hClipData = 0;
1442 return hClipData;
1446 /**************************************************************************
1447 * X11DRV_CLIPBOARD_ExportXAString
1449 * Export CF_TEXT converting the string to XA_STRING.
1450 * Helper function for X11DRV_CLIPBOARD_ExportString.
1452 static HANDLE X11DRV_CLIPBOARD_ExportXAString(LPWINE_CLIPDATA lpData, LPDWORD lpBytes)
1454 UINT i, j;
1455 UINT size;
1456 LPSTR text, lpstr = NULL;
1458 *lpBytes = 0; /* Assume return has zero bytes */
1460 text = GlobalLock(lpData->hData32);
1461 size = strlen(text);
1463 /* remove carriage returns */
1464 lpstr = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, size + 1);
1465 if (lpstr == NULL)
1466 goto done;
1468 for (i = 0,j = 0; i < size && text[i]; i++)
1470 if (text[i] == '\r' && (text[i+1] == '\n' || text[i+1] == '\0'))
1471 continue;
1472 lpstr[j++] = text[i];
1475 lpstr[j]='\0';
1476 *lpBytes = j; /* Number of bytes in string */
1478 done:
1479 HeapFree(GetProcessHeap(), 0, text);
1480 GlobalUnlock(lpData->hData32);
1482 return lpstr;
1486 /**************************************************************************
1487 * X11DRV_CLIPBOARD_ExportUTF8String
1489 * Export CF_UNICODE converting the string to UTF8.
1490 * Helper function for X11DRV_CLIPBOARD_ExportString.
1492 static HANDLE X11DRV_CLIPBOARD_ExportUTF8String(LPWINE_CLIPDATA lpData, LPDWORD lpBytes)
1494 UINT i, j;
1495 UINT size;
1496 LPWSTR uni_text;
1497 LPSTR text, lpstr = NULL;
1499 *lpBytes = 0; /* Assume return has zero bytes */
1501 uni_text = GlobalLock(lpData->hData32);
1503 size = WideCharToMultiByte(CP_UTF8, 0, uni_text, -1, NULL, 0, NULL, NULL);
1505 text = HeapAlloc(GetProcessHeap(), 0, size);
1506 if (!text)
1507 goto done;
1508 WideCharToMultiByte(CP_UTF8, 0, uni_text, -1, text, size, NULL, NULL);
1510 /* remove carriage returns */
1511 lpstr = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, size--);
1512 if (lpstr == NULL)
1513 goto done;
1515 for (i = 0,j = 0; i < size && text[i]; i++)
1517 if (text[i] == '\r' && (text[i+1] == '\n' || text[i+1] == '\0'))
1518 continue;
1519 lpstr[j++] = text[i];
1521 lpstr[j]='\0';
1523 *lpBytes = j; /* Number of bytes in string */
1525 done:
1526 HeapFree(GetProcessHeap(), 0, text);
1527 GlobalUnlock(lpData->hData32);
1529 return lpstr;
1534 /**************************************************************************
1535 * X11DRV_CLIPBOARD_ExportCompoundText
1537 * Export CF_UNICODE to COMPOUND_TEXT
1538 * Helper function for X11DRV_CLIPBOARD_ExportString.
1540 static HANDLE X11DRV_CLIPBOARD_ExportCompoundText(Window requestor, Atom aTarget, Atom rprop,
1541 LPWINE_CLIPDATA lpData, LPDWORD lpBytes)
1543 Display *display = thread_display();
1544 char* lpstr = 0;
1545 XTextProperty prop;
1546 XICCEncodingStyle style;
1547 UINT i, j;
1548 UINT size;
1549 LPWSTR uni_text;
1551 uni_text = GlobalLock(lpData->hData32);
1553 size = WideCharToMultiByte(CP_UNIXCP, 0, uni_text, -1, NULL, 0, NULL, NULL);
1554 lpstr = HeapAlloc(GetProcessHeap(), 0, size);
1555 if (!lpstr)
1556 return 0;
1558 WideCharToMultiByte(CP_UNIXCP, 0, uni_text, -1, lpstr, size, NULL, NULL);
1560 /* remove carriage returns */
1561 for (i = 0, j = 0; i < size && lpstr[i]; i++)
1563 if (lpstr[i] == '\r' && (lpstr[i+1] == '\n' || lpstr[i+1] == '\0'))
1564 continue;
1565 lpstr[j++] = lpstr[i];
1567 lpstr[j]='\0';
1569 GlobalUnlock(lpData->hData32);
1571 if (aTarget == x11drv_atom(COMPOUND_TEXT))
1572 style = XCompoundTextStyle;
1573 else
1574 style = XStdICCTextStyle;
1576 /* Update the X property */
1577 wine_tsx11_lock();
1578 if (XmbTextListToTextProperty(display, &lpstr, 1, style, &prop) == Success)
1580 XSetTextProperty(display, requestor, &prop, rprop);
1581 XFree(prop.value);
1583 wine_tsx11_unlock();
1585 HeapFree(GetProcessHeap(), 0, lpstr);
1587 return 0;
1590 /**************************************************************************
1591 * X11DRV_CLIPBOARD_ExportString
1593 * Export string
1595 HANDLE X11DRV_CLIPBOARD_ExportString(Window requestor, Atom aTarget, Atom rprop,
1596 LPWINE_CLIPDATA lpData, LPDWORD lpBytes)
1598 if (X11DRV_CLIPBOARD_RenderFormat(lpData))
1600 if (aTarget == XA_STRING)
1601 return X11DRV_CLIPBOARD_ExportXAString(lpData, lpBytes);
1602 else if (aTarget == x11drv_atom(COMPOUND_TEXT) || aTarget == x11drv_atom(TEXT))
1603 return X11DRV_CLIPBOARD_ExportCompoundText(requestor, aTarget,
1604 rprop, lpData, lpBytes);
1605 else
1607 TRACE("Exporting target %ld to default UTF8_STRING\n", aTarget);
1608 return X11DRV_CLIPBOARD_ExportUTF8String(lpData, lpBytes);
1611 else
1612 ERR("Failed to render %d format\n", lpData->wFormatID);
1614 return 0;
1618 /**************************************************************************
1619 * X11DRV_CLIPBOARD_ExportXAPIXMAP
1621 * Export CF_DIB to XA_PIXMAP.
1623 HANDLE X11DRV_CLIPBOARD_ExportXAPIXMAP(Window requestor, Atom aTarget, Atom rprop,
1624 LPWINE_CLIPDATA lpdata, LPDWORD lpBytes)
1626 HDC hdc;
1627 HANDLE hData;
1628 unsigned char* lpData;
1630 if (!X11DRV_CLIPBOARD_RenderFormat(lpdata))
1632 ERR("Failed to export %d format\n", lpdata->wFormatID);
1633 return 0;
1636 if (!lpdata->drvData) /* If not already rendered */
1638 /* For convert from packed DIB to Pixmap */
1639 hdc = GetDC(0);
1640 lpdata->drvData = (UINT) X11DRV_DIB_CreatePixmapFromDIB(lpdata->hData32, hdc);
1641 ReleaseDC(0, hdc);
1644 *lpBytes = sizeof(Pixmap); /* pixmap is a 32bit value */
1646 /* Wrap pixmap so we can return a handle */
1647 hData = GlobalAlloc(0, *lpBytes);
1648 lpData = GlobalLock(hData);
1649 memcpy(lpData, &lpdata->drvData, *lpBytes);
1650 GlobalUnlock(hData);
1652 return (HANDLE) hData;
1656 /**************************************************************************
1657 * X11DRV_CLIPBOARD_ExportMetaFilePict
1659 * Export MetaFilePict.
1661 HANDLE X11DRV_CLIPBOARD_ExportMetaFilePict(Window requestor, Atom aTarget, Atom rprop,
1662 LPWINE_CLIPDATA lpdata, LPDWORD lpBytes)
1664 if (!X11DRV_CLIPBOARD_RenderFormat(lpdata))
1666 ERR("Failed to export %d format\n", lpdata->wFormatID);
1667 return 0;
1670 return X11DRV_CLIPBOARD_SerializeMetafile(CF_METAFILEPICT, (HANDLE)lpdata->hData32,
1671 lpBytes, TRUE);
1675 /**************************************************************************
1676 * X11DRV_CLIPBOARD_ExportEnhMetaFile
1678 * Export EnhMetaFile.
1680 HANDLE X11DRV_CLIPBOARD_ExportEnhMetaFile(Window requestor, Atom aTarget, Atom rprop,
1681 LPWINE_CLIPDATA lpdata, LPDWORD lpBytes)
1683 if (!X11DRV_CLIPBOARD_RenderFormat(lpdata))
1685 ERR("Failed to export %d format\n", lpdata->wFormatID);
1686 return 0;
1689 return X11DRV_CLIPBOARD_SerializeMetafile(CF_ENHMETAFILE, (HANDLE)lpdata->hData32,
1690 lpBytes, TRUE);
1694 /**************************************************************************
1695 * X11DRV_CLIPBOARD_QueryTargets
1697 static BOOL X11DRV_CLIPBOARD_QueryTargets(Display *display, Window w, Atom selection,
1698 Atom target, XEvent *xe)
1700 INT i;
1701 Bool res;
1703 wine_tsx11_lock();
1704 XConvertSelection(display, selection, target,
1705 x11drv_atom(SELECTION_DATA), w, CurrentTime);
1706 wine_tsx11_unlock();
1709 * Wait until SelectionNotify is received
1711 for (i = 0; i < SELECTION_RETRIES; i++)
1713 wine_tsx11_lock();
1714 res = XCheckTypedWindowEvent(display, w, SelectionNotify, xe);
1715 wine_tsx11_unlock();
1716 if (res && xe->xselection.selection == selection) break;
1718 usleep(SELECTION_WAIT);
1721 /* Verify that the selection returned a valid TARGETS property */
1722 if ((xe->xselection.target != target) || (xe->xselection.property == None))
1724 /* Selection owner failed to respond or we missed the SelectionNotify */
1725 WARN("Failed to retrieve TARGETS for selection %ld.\n", selection);
1726 return FALSE;
1729 return TRUE;
1733 /**************************************************************************
1734 * X11DRV_CLIPBOARD_InsertSelectionProperties
1736 * Mark properties available for future retrieval.
1738 static VOID X11DRV_CLIPBOARD_InsertSelectionProperties(Display *display, Atom* properties, UINT count)
1740 UINT i, nb_atoms = 0;
1741 Atom *atoms = NULL;
1743 /* Cache these formats in the clipboard cache */
1744 for (i = 0; i < count; i++)
1746 LPWINE_CLIPFORMAT lpFormat = X11DRV_CLIPBOARD_LookupProperty(NULL, properties[i]);
1748 if (lpFormat)
1750 /* We found at least one Window's format that mapps to the property.
1751 * Continue looking for more.
1753 * If more than one property map to a Window's format then we use the first
1754 * one and ignore the rest.
1756 while (lpFormat)
1758 TRACE("Atom#%d Property(%d): --> FormatID(%d) %s\n",
1759 i, lpFormat->drvData, lpFormat->wFormatID, debugstr_w(lpFormat->Name));
1760 X11DRV_CLIPBOARD_InsertClipboardData(lpFormat->wFormatID, 0, 0, 0, lpFormat, FALSE);
1761 lpFormat = X11DRV_CLIPBOARD_LookupProperty(lpFormat, properties[i]);
1764 else
1766 /* add it to the list of atoms that we don't know about yet */
1767 if (!atoms) atoms = HeapAlloc( GetProcessHeap(), 0,
1768 (count - i) * sizeof(*atoms) );
1769 if (atoms) atoms[nb_atoms++] = properties[i];
1773 /* query all unknown atoms in one go */
1774 if (atoms)
1776 char **names = HeapAlloc( GetProcessHeap(), 0, nb_atoms * sizeof(*names) );
1777 if (names)
1779 wine_tsx11_lock();
1780 /* FIXME: we're at the mercy of the app sending the event here.
1781 * Currently if they send a bogus atom, we will crash.
1782 * We should handle BadAtom errors gracefully in this call.
1784 XGetAtomNames( display, atoms, nb_atoms, names );
1785 wine_tsx11_unlock();
1786 for (i = 0; i < nb_atoms; i++)
1788 WINE_CLIPFORMAT *lpFormat;
1789 LPWSTR wname;
1790 int len = MultiByteToWideChar(CP_UNIXCP, 0, names[i], -1, NULL, 0);
1791 wname = HeapAlloc(GetProcessHeap(), 0, len*sizeof(WCHAR));
1792 MultiByteToWideChar(CP_UNIXCP, 0, names[i], -1, wname, len);
1794 lpFormat = register_format( wname, atoms[i] );
1795 HeapFree(GetProcessHeap(), 0, wname);
1796 if (!lpFormat)
1798 ERR("Failed to register %s property. Type will not be cached.\n", names[i]);
1799 continue;
1801 TRACE("Atom#%d Property(%d): --> FormatID(%d) %s\n",
1802 i, lpFormat->drvData, lpFormat->wFormatID, debugstr_w(lpFormat->Name));
1803 X11DRV_CLIPBOARD_InsertClipboardData(lpFormat->wFormatID, 0, 0, 0, lpFormat, FALSE);
1805 wine_tsx11_lock();
1806 for (i = 0; i < nb_atoms; i++) XFree( names[i] );
1807 wine_tsx11_unlock();
1808 HeapFree( GetProcessHeap(), 0, names );
1810 HeapFree( GetProcessHeap(), 0, atoms );
1815 /**************************************************************************
1816 * X11DRV_CLIPBOARD_QueryAvailableData
1818 * Caches the list of data formats available from the current selection.
1819 * This queries the selection owner for the TARGETS property and saves all
1820 * reported property types.
1822 static int X11DRV_CLIPBOARD_QueryAvailableData(LPCLIPBOARDINFO lpcbinfo)
1824 Display *display = thread_display();
1825 XEvent xe;
1826 Atom atype=AnyPropertyType;
1827 int aformat;
1828 unsigned long remain;
1829 Atom* targetList=NULL;
1830 Window w;
1831 unsigned long cSelectionTargets = 0;
1833 if (selectionAcquired & (S_PRIMARY | S_CLIPBOARD))
1835 ERR("Received request to cache selection but process is owner=(%08x)\n",
1836 (unsigned) selectionWindow);
1837 return -1; /* Prevent self request */
1840 w = thread_selection_wnd();
1841 if (!w)
1843 ERR("No window available to retrieve selection!\n");
1844 return -1;
1848 * Query the selection owner for the TARGETS property
1850 wine_tsx11_lock();
1851 if ((use_primary_selection && XGetSelectionOwner(display,XA_PRIMARY)) ||
1852 XGetSelectionOwner(display,x11drv_atom(CLIPBOARD)))
1854 wine_tsx11_unlock();
1855 if (use_primary_selection && (X11DRV_CLIPBOARD_QueryTargets(display, w, XA_PRIMARY, x11drv_atom(TARGETS), &xe)))
1856 selectionCacheSrc = XA_PRIMARY;
1857 else if (X11DRV_CLIPBOARD_QueryTargets(display, w, x11drv_atom(CLIPBOARD), x11drv_atom(TARGETS), &xe))
1858 selectionCacheSrc = x11drv_atom(CLIPBOARD);
1859 else
1861 Atom xstr = XA_STRING;
1863 /* Selection Owner doesn't understand TARGETS, try retrieving XA_STRING */
1864 if (X11DRV_CLIPBOARD_QueryTargets(display, w, XA_PRIMARY, XA_STRING, &xe))
1866 X11DRV_CLIPBOARD_InsertSelectionProperties(display, &xstr, 1);
1867 selectionCacheSrc = XA_PRIMARY;
1868 return 1;
1870 else if (X11DRV_CLIPBOARD_QueryTargets(display, w, x11drv_atom(CLIPBOARD), XA_STRING, &xe))
1872 X11DRV_CLIPBOARD_InsertSelectionProperties(display, &xstr, 1);
1873 selectionCacheSrc = x11drv_atom(CLIPBOARD);
1874 return 1;
1876 else
1878 WARN("Failed to query selection owner for available data.\n");
1879 return -1;
1883 else /* No selection owner so report 0 targets available */
1885 wine_tsx11_unlock();
1886 return 0;
1889 /* Read the TARGETS property contents */
1890 wine_tsx11_lock();
1891 if(XGetWindowProperty(display, xe.xselection.requestor, xe.xselection.property,
1892 0, 0x3FFF, True, AnyPropertyType/*XA_ATOM*/, &atype, &aformat, &cSelectionTargets,
1893 &remain, (unsigned char**)&targetList) != Success)
1895 wine_tsx11_unlock();
1896 WARN("Failed to read TARGETS property\n");
1898 else
1900 wine_tsx11_unlock();
1901 TRACE("Type %lx,Format %d,nItems %ld, Remain %ld\n",
1902 atype, aformat, cSelectionTargets, remain);
1904 * The TARGETS property should have returned us a list of atoms
1905 * corresponding to each selection target format supported.
1907 if ((atype == XA_ATOM || atype == x11drv_atom(TARGETS)) && aformat == 32)
1908 X11DRV_CLIPBOARD_InsertSelectionProperties(display, targetList, cSelectionTargets);
1910 /* Free the list of targets */
1911 wine_tsx11_lock();
1912 XFree(targetList);
1913 wine_tsx11_unlock();
1916 return cSelectionTargets;
1920 /**************************************************************************
1921 * X11DRV_CLIPBOARD_ReadSelectionData
1923 * This method is invoked only when we DO NOT own the X selection
1925 * We always get the data from the selection client each time,
1926 * since we have no way of determining if the data in our cache is stale.
1928 static BOOL X11DRV_CLIPBOARD_ReadSelectionData(LPWINE_CLIPDATA lpData)
1930 Display *display = thread_display();
1931 Bool res;
1932 DWORD i;
1933 XEvent xe;
1934 BOOL bRet = FALSE;
1936 TRACE("%d\n", lpData->wFormatID);
1938 if (!lpData->lpFormat)
1940 ERR("Requesting format %d but no source format linked to data.\n",
1941 lpData->wFormatID);
1942 return FALSE;
1945 if (!selectionAcquired)
1947 Window w = thread_selection_wnd();
1948 if(!w)
1950 ERR("No window available to read selection data!\n");
1951 return FALSE;
1954 TRACE("Requesting conversion of %s property (%d) from selection type %08x\n",
1955 debugstr_w(lpData->lpFormat->Name), lpData->lpFormat->drvData, (UINT)selectionCacheSrc);
1957 wine_tsx11_lock();
1958 XConvertSelection(display, selectionCacheSrc, lpData->lpFormat->drvData,
1959 x11drv_atom(SELECTION_DATA), w, CurrentTime);
1960 wine_tsx11_unlock();
1962 /* wait until SelectionNotify is received */
1963 for (i = 0; i < SELECTION_RETRIES; i++)
1965 wine_tsx11_lock();
1966 res = XCheckTypedWindowEvent(display, w, SelectionNotify, &xe);
1967 wine_tsx11_unlock();
1968 if (res && xe.xselection.selection == selectionCacheSrc) break;
1970 usleep(SELECTION_WAIT);
1973 /* Verify that the selection returned a valid TARGETS property */
1974 if (xe.xselection.property != None)
1977 * Read the contents of the X selection property
1978 * into WINE's clipboard cache and converting the
1979 * data format if necessary.
1981 HANDLE hData = lpData->lpFormat->lpDrvImportFunc(xe.xselection.requestor,
1982 xe.xselection.property);
1984 bRet = X11DRV_CLIPBOARD_InsertClipboardData(lpData->wFormatID, 0, hData, 0, lpData->lpFormat, TRUE);
1986 else
1988 TRACE("Failed to convert selection\n");
1991 else
1993 ERR("Received request to cache selection data but process is owner\n");
1996 TRACE("Returning %d\n", bRet);
1998 return bRet;
2002 /**************************************************************************
2003 * X11DRV_CLIPBOARD_ReadProperty
2004 * Reads the contents of the X selection property.
2006 static BOOL X11DRV_CLIPBOARD_ReadProperty(Window w, Atom prop,
2007 unsigned char** data, unsigned long* datasize)
2009 Display *display = thread_display();
2010 Atom atype = AnyPropertyType;
2011 int aformat;
2012 unsigned long total, nitems, remain, val_cnt;
2013 long reqlen, bwc;
2014 unsigned char* val;
2015 unsigned char* buffer;
2017 if (prop == None)
2018 return FALSE;
2020 TRACE("Reading property %d from X window %d\n",
2021 (unsigned int)prop, (unsigned int)w);
2024 * First request a zero length in order to figure out the request size.
2026 wine_tsx11_lock();
2027 if(XGetWindowProperty(display,w,prop,0,0,False, AnyPropertyType,
2028 &atype, &aformat, &nitems, &remain, &buffer) != Success)
2030 wine_tsx11_unlock();
2031 WARN("Failed to get property size\n");
2032 return FALSE;
2035 /* Free zero length return data if any */
2036 if (buffer)
2038 XFree(buffer);
2039 buffer = NULL;
2042 bwc = aformat/8;
2043 reqlen = remain * bwc;
2045 TRACE("Retrieving %ld bytes\n", reqlen);
2047 val = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, reqlen);
2049 /* Read property in 4K blocks */
2050 for (total = 0, val_cnt = 0; remain;)
2052 if (XGetWindowProperty(display, w, prop, (total / 4), 4096, False,
2053 AnyPropertyType, &atype, &aformat, &nitems, &remain, &buffer) != Success)
2055 wine_tsx11_unlock();
2056 WARN("Failed to read property\n");
2057 HeapFree(GetProcessHeap(), 0, val);
2058 return FALSE;
2061 bwc = aformat/8;
2062 memcpy(&val[val_cnt], buffer, nitems * bwc);
2063 val_cnt += nitems * bwc;
2064 total += nitems*bwc;
2065 XFree(buffer);
2068 /* Delete the property on the window now that we are done
2069 * This will send a PropertyNotify event to the selection owner. */
2070 XDeleteProperty(display, w, prop);
2072 wine_tsx11_unlock();
2074 *data = val;
2075 *datasize = total;
2077 return TRUE;
2081 /**************************************************************************
2082 * CLIPBOARD_SerializeMetafile
2084 static HANDLE X11DRV_CLIPBOARD_SerializeMetafile(INT wformat, HANDLE hdata, LPDWORD lpcbytes, BOOL out)
2086 HANDLE h = 0;
2088 TRACE(" wFormat=%d hdata=%p out=%d\n", wformat, hdata, out);
2090 if (out) /* Serialize out, caller should free memory */
2092 *lpcbytes = 0; /* Assume failure */
2094 if (wformat == CF_METAFILEPICT)
2096 LPMETAFILEPICT lpmfp = (LPMETAFILEPICT) GlobalLock(hdata);
2097 unsigned int size = GetMetaFileBitsEx(lpmfp->hMF, 0, NULL);
2099 h = GlobalAlloc(0, size + sizeof(METAFILEPICT));
2100 if (h)
2102 char *pdata = GlobalLock(h);
2104 memcpy(pdata, lpmfp, sizeof(METAFILEPICT));
2105 GetMetaFileBitsEx(lpmfp->hMF, size, pdata + sizeof(METAFILEPICT));
2107 *lpcbytes = size + sizeof(METAFILEPICT);
2109 GlobalUnlock(h);
2112 GlobalUnlock(hdata);
2114 else if (wformat == CF_ENHMETAFILE)
2116 int size = GetEnhMetaFileBits(hdata, 0, NULL);
2118 h = GlobalAlloc(0, size);
2119 if (h)
2121 LPVOID pdata = GlobalLock(h);
2123 GetEnhMetaFileBits(hdata, size, pdata);
2124 *lpcbytes = size;
2126 GlobalUnlock(h);
2130 else
2132 if (wformat == CF_METAFILEPICT)
2134 h = GlobalAlloc(0, sizeof(METAFILEPICT));
2135 if (h)
2137 unsigned int wiresize, size;
2138 LPMETAFILEPICT lpmfp = (LPMETAFILEPICT) GlobalLock(h);
2140 memcpy(lpmfp, (LPVOID)hdata, sizeof(METAFILEPICT));
2141 wiresize = *lpcbytes - sizeof(METAFILEPICT);
2142 lpmfp->hMF = SetMetaFileBitsEx(wiresize,
2143 ((const BYTE *)hdata) + sizeof(METAFILEPICT));
2144 size = GetMetaFileBitsEx(lpmfp->hMF, 0, NULL);
2145 GlobalUnlock(h);
2148 else if (wformat == CF_ENHMETAFILE)
2150 h = SetEnhMetaFileBits(*lpcbytes, (LPVOID)hdata);
2154 return h;
2158 /**************************************************************************
2159 * X11DRV_CLIPBOARD_ReleaseSelection
2161 * Release XA_CLIPBOARD and XA_PRIMARY in response to a SelectionClear event.
2163 static void X11DRV_CLIPBOARD_ReleaseSelection(Atom selType, Window w, HWND hwnd, Time time)
2165 Display *display = thread_display();
2167 /* w is the window that lost the selection
2169 TRACE("event->window = %08x (selectionWindow = %08x) selectionAcquired=0x%08x\n",
2170 (unsigned)w, (unsigned)selectionWindow, (unsigned)selectionAcquired);
2172 if (selectionAcquired && (w == selectionWindow))
2174 CLIPBOARDINFO cbinfo;
2176 /* completely give up the selection */
2177 TRACE("Lost CLIPBOARD (+PRIMARY) selection\n");
2179 X11DRV_CLIPBOARD_GetClipboardInfo(&cbinfo);
2181 if (cbinfo.flags & CB_PROCESS)
2183 /* Since we're still the owner, this wasn't initiated by
2184 another Wine process */
2185 if (OpenClipboard(hwnd))
2187 /* Destroy private objects */
2188 SendMessageW(cbinfo.hWndOwner, WM_DESTROYCLIPBOARD, 0, 0);
2190 /* Give up ownership of the windows clipboard */
2191 X11DRV_CLIPBOARD_ReleaseOwnership();
2192 CloseClipboard();
2196 if ((selType == x11drv_atom(CLIPBOARD)) && (selectionAcquired & S_PRIMARY))
2198 TRACE("Lost clipboard. Check if we need to release PRIMARY\n");
2200 wine_tsx11_lock();
2201 if (selectionWindow == XGetSelectionOwner(display, XA_PRIMARY))
2203 TRACE("We still own PRIMARY. Releasing PRIMARY.\n");
2204 XSetSelectionOwner(display, XA_PRIMARY, None, time);
2206 else
2207 TRACE("We no longer own PRIMARY\n");
2208 wine_tsx11_unlock();
2210 else if ((selType == XA_PRIMARY) && (selectionAcquired & S_CLIPBOARD))
2212 TRACE("Lost PRIMARY. Check if we need to release CLIPBOARD\n");
2214 wine_tsx11_lock();
2215 if (selectionWindow == XGetSelectionOwner(display,x11drv_atom(CLIPBOARD)))
2217 TRACE("We still own CLIPBOARD. Releasing CLIPBOARD.\n");
2218 XSetSelectionOwner(display, x11drv_atom(CLIPBOARD), None, time);
2220 else
2221 TRACE("We no longer own CLIPBOARD\n");
2222 wine_tsx11_unlock();
2225 selectionWindow = None;
2227 X11DRV_EmptyClipboard(FALSE);
2229 /* Reset the selection flags now that we are done */
2230 selectionAcquired = S_NOSELECTION;
2235 /**************************************************************************
2236 * IsSelectionOwner (X11DRV.@)
2238 * Returns: TRUE if the selection is owned by this process, FALSE otherwise
2240 static BOOL X11DRV_CLIPBOARD_IsSelectionOwner(void)
2242 return selectionAcquired;
2246 /**************************************************************************
2247 * X11DRV Clipboard Exports
2248 **************************************************************************/
2251 /**************************************************************************
2252 * RegisterClipboardFormat (X11DRV.@)
2254 * Registers a custom X clipboard format
2255 * Returns: Format id or 0 on failure
2257 UINT X11DRV_RegisterClipboardFormat(LPCWSTR FormatName)
2259 LPWINE_CLIPFORMAT lpFormat;
2261 if (FormatName == NULL) return 0;
2262 if (!(lpFormat = register_format( FormatName, 0 ))) return 0;
2263 return lpFormat->wFormatID;
2267 /**************************************************************************
2268 * X11DRV_GetClipboardFormatName
2270 INT X11DRV_GetClipboardFormatName(UINT wFormat, LPWSTR retStr, INT maxlen)
2272 LPWINE_CLIPFORMAT lpFormat;
2274 TRACE("(%04X, %p, %d) !\n", wFormat, retStr, maxlen);
2276 if (wFormat < 0xc000)
2278 SetLastError(ERROR_INVALID_PARAMETER);
2279 return 0;
2282 lpFormat = X11DRV_CLIPBOARD_LookupFormat(wFormat);
2284 if (!lpFormat || (lpFormat->wFlags & CF_FLAG_BUILTINFMT))
2286 TRACE("Unknown format 0x%08x!\n", wFormat);
2287 SetLastError(ERROR_INVALID_HANDLE);
2288 return 0;
2291 lstrcpynW(retStr, lpFormat->Name, maxlen);
2293 return strlenW(retStr);
2297 /**************************************************************************
2298 * AcquireClipboard (X11DRV.@)
2300 int X11DRV_AcquireClipboard(HWND hWndClipWindow)
2302 DWORD procid;
2303 Window owner;
2304 Display *display = thread_display();
2306 TRACE(" %p\n", hWndClipWindow);
2309 * It's important that the selection get acquired from the thread
2310 * that owns the clipboard window. The primary reason is that we know
2311 * it is running a message loop and therefore can process the
2312 * X selection events.
2314 if (hWndClipWindow &&
2315 GetCurrentThreadId() != GetWindowThreadProcessId(hWndClipWindow, &procid))
2317 if (procid != GetCurrentProcessId())
2319 WARN("Setting clipboard owner to other process is not supported\n");
2320 hWndClipWindow = NULL;
2322 else
2324 TRACE("Thread %x is acquiring selection with thread %x's window %p\n",
2325 GetCurrentThreadId(),
2326 GetWindowThreadProcessId(hWndClipWindow, NULL), hWndClipWindow);
2328 return SendMessageW(hWndClipWindow, WM_X11DRV_ACQUIRE_SELECTION, 0, 0);
2332 owner = thread_selection_wnd();
2334 wine_tsx11_lock();
2336 selectionAcquired = 0;
2337 selectionWindow = 0;
2339 /* Grab PRIMARY selection if not owned */
2340 if (use_primary_selection)
2341 XSetSelectionOwner(display, XA_PRIMARY, owner, CurrentTime);
2343 /* Grab CLIPBOARD selection if not owned */
2344 XSetSelectionOwner(display, x11drv_atom(CLIPBOARD), owner, CurrentTime);
2346 if (use_primary_selection && XGetSelectionOwner(display, XA_PRIMARY) == owner)
2347 selectionAcquired |= S_PRIMARY;
2349 if (XGetSelectionOwner(display,x11drv_atom(CLIPBOARD)) == owner)
2350 selectionAcquired |= S_CLIPBOARD;
2352 wine_tsx11_unlock();
2354 if (selectionAcquired)
2356 selectionWindow = owner;
2357 TRACE("Grabbed X selection, owner=(%08x)\n", (unsigned) owner);
2360 return 1;
2364 /**************************************************************************
2365 * X11DRV_EmptyClipboard
2367 * Empty cached clipboard data.
2369 void X11DRV_EmptyClipboard(BOOL keepunowned)
2371 if (ClipData)
2373 LPWINE_CLIPDATA lpData, lpStart;
2374 LPWINE_CLIPDATA lpNext = ClipData;
2376 TRACE(" called with %d entries in cache.\n", ClipDataCount);
2380 lpStart = ClipData;
2381 lpData = lpNext;
2382 lpNext = lpData->NextData;
2384 if (!keepunowned || !(lpData->wFlags & CF_FLAG_UNOWNED))
2386 lpData->PrevData->NextData = lpData->NextData;
2387 lpData->NextData->PrevData = lpData->PrevData;
2389 if (lpData == ClipData)
2390 ClipData = lpNext != lpData ? lpNext : NULL;
2392 X11DRV_CLIPBOARD_FreeData(lpData);
2393 HeapFree(GetProcessHeap(), 0, lpData);
2395 ClipDataCount--;
2397 } while (lpNext != lpStart);
2400 TRACE(" %d entries remaining in cache.\n", ClipDataCount);
2405 /**************************************************************************
2406 * X11DRV_SetClipboardData
2408 BOOL X11DRV_SetClipboardData(UINT wFormat, HANDLE16 hData16, HANDLE hData32, BOOL owner)
2410 DWORD flags = 0;
2411 BOOL bResult = TRUE;
2413 /* If it's not owned, data can only be set if the format data is not already owned
2414 and its rendering is not delayed */
2415 if (!owner)
2417 CLIPBOARDINFO cbinfo;
2418 LPWINE_CLIPDATA lpRender;
2420 X11DRV_CLIPBOARD_UpdateCache(&cbinfo);
2422 if ((!hData16 && !hData32) ||
2423 ((lpRender = X11DRV_CLIPBOARD_LookupData(wFormat)) &&
2424 !(lpRender->wFlags & CF_FLAG_UNOWNED)))
2425 bResult = FALSE;
2426 else
2427 flags = CF_FLAG_UNOWNED;
2430 bResult &= X11DRV_CLIPBOARD_InsertClipboardData(wFormat, hData16, hData32, flags, NULL, TRUE);
2432 return bResult;
2436 /**************************************************************************
2437 * CountClipboardFormats
2439 INT X11DRV_CountClipboardFormats(void)
2441 CLIPBOARDINFO cbinfo;
2443 X11DRV_CLIPBOARD_UpdateCache(&cbinfo);
2445 TRACE(" count=%d\n", ClipDataCount);
2447 return ClipDataCount;
2451 /**************************************************************************
2452 * X11DRV_EnumClipboardFormats
2454 UINT X11DRV_EnumClipboardFormats(UINT wFormat)
2456 CLIPBOARDINFO cbinfo;
2457 UINT wNextFormat = 0;
2459 TRACE("(%04X)\n", wFormat);
2461 X11DRV_CLIPBOARD_UpdateCache(&cbinfo);
2463 if (!wFormat)
2465 if (ClipData)
2466 wNextFormat = ClipData->wFormatID;
2468 else
2470 LPWINE_CLIPDATA lpData = X11DRV_CLIPBOARD_LookupData(wFormat);
2472 if (lpData && lpData->NextData != ClipData)
2473 wNextFormat = lpData->NextData->wFormatID;
2476 return wNextFormat;
2480 /**************************************************************************
2481 * X11DRV_IsClipboardFormatAvailable
2483 BOOL X11DRV_IsClipboardFormatAvailable(UINT wFormat)
2485 BOOL bRet = FALSE;
2486 CLIPBOARDINFO cbinfo;
2488 TRACE("(%04X)\n", wFormat);
2490 X11DRV_CLIPBOARD_UpdateCache(&cbinfo);
2492 if (wFormat != 0 && X11DRV_CLIPBOARD_LookupData(wFormat))
2493 bRet = TRUE;
2495 TRACE("(%04X)- ret(%d)\n", wFormat, bRet);
2497 return bRet;
2501 /**************************************************************************
2502 * GetClipboardData (USER.142)
2504 BOOL X11DRV_GetClipboardData(UINT wFormat, HANDLE16* phData16, HANDLE* phData32)
2506 CLIPBOARDINFO cbinfo;
2507 LPWINE_CLIPDATA lpRender;
2509 TRACE("(%04X)\n", wFormat);
2511 X11DRV_CLIPBOARD_UpdateCache(&cbinfo);
2513 if ((lpRender = X11DRV_CLIPBOARD_LookupData(wFormat)))
2515 if ( !lpRender->hData32 )
2516 X11DRV_CLIPBOARD_RenderFormat(lpRender);
2518 /* Convert between 32 -> 16 bit data, if necessary */
2519 if (lpRender->hData32 && !lpRender->hData16)
2521 int size;
2523 if (lpRender->wFormatID == CF_METAFILEPICT)
2524 size = sizeof(METAFILEPICT16);
2525 else
2526 size = GlobalSize(lpRender->hData32);
2528 lpRender->hData16 = GlobalAlloc16(GMEM_ZEROINIT, size);
2530 if (!lpRender->hData16)
2531 ERR("(%04X) -- not enough memory in 16b heap\n", wFormat);
2532 else
2534 if (lpRender->wFormatID == CF_METAFILEPICT)
2536 FIXME("\timplement function CopyMetaFilePict32to16\n");
2537 FIXME("\tin the appropriate file.\n");
2538 #ifdef SOMEONE_IMPLEMENTED_ME
2539 CopyMetaFilePict32to16(GlobalLock16(lpRender->hData16),
2540 GlobalLock(lpRender->hData32));
2541 #endif
2543 else
2545 memcpy(GlobalLock16(lpRender->hData16),
2546 GlobalLock(lpRender->hData32), size);
2549 GlobalUnlock16(lpRender->hData16);
2550 GlobalUnlock(lpRender->hData32);
2554 /* Convert between 32 -> 16 bit data, if necessary */
2555 if (lpRender->hData16 && !lpRender->hData32)
2557 int size;
2559 if (lpRender->wFormatID == CF_METAFILEPICT)
2560 size = sizeof(METAFILEPICT16);
2561 else
2562 size = GlobalSize(lpRender->hData32);
2564 lpRender->hData32 = GlobalAlloc(GMEM_ZEROINIT | GMEM_MOVEABLE |
2565 GMEM_DDESHARE, size);
2567 if (lpRender->wFormatID == CF_METAFILEPICT)
2569 FIXME("\timplement function CopyMetaFilePict16to32\n");
2570 FIXME("\tin the appropriate file.\n");
2571 #ifdef SOMEONE_IMPLEMENTED_ME
2572 CopyMetaFilePict16to32(GlobalLock16(lpRender->hData32),
2573 GlobalLock(lpRender->hData16));
2574 #endif
2576 else
2578 memcpy(GlobalLock(lpRender->hData32),
2579 GlobalLock16(lpRender->hData16), size);
2582 GlobalUnlock(lpRender->hData32);
2583 GlobalUnlock16(lpRender->hData16);
2586 if (phData16)
2587 *phData16 = lpRender->hData16;
2589 if (phData32)
2590 *phData32 = lpRender->hData32;
2592 TRACE(" returning hData16(%04x) hData32(%p) (type %d)\n",
2593 lpRender->hData16, lpRender->hData32, lpRender->wFormatID);
2595 return lpRender->hData16 || lpRender->hData32;
2598 return 0;
2602 /**************************************************************************
2603 * ResetSelectionOwner
2605 * Called when the thread owning the selection is destroyed and we need to
2606 * preserve the selection ownership. We look for another top level window
2607 * in this process and send it a message to acquire the selection.
2609 void X11DRV_ResetSelectionOwner(void)
2611 HWND hwnd;
2612 DWORD procid;
2614 TRACE("\n");
2616 if (!selectionAcquired || thread_selection_wnd() != selectionWindow)
2617 return;
2619 selectionAcquired = S_NOSELECTION;
2620 selectionWindow = 0;
2622 hwnd = GetWindow(GetDesktopWindow(), GW_CHILD);
2625 if (GetCurrentThreadId() != GetWindowThreadProcessId(hwnd, &procid))
2627 if (GetCurrentProcessId() == procid)
2629 if (SendMessageW(hwnd, WM_X11DRV_ACQUIRE_SELECTION, 0, 0))
2630 return;
2633 } while ((hwnd = GetWindow(hwnd, GW_HWNDNEXT)) != NULL);
2635 WARN("Failed to find another thread to take selection ownership. Clipboard data will be lost.\n");
2637 X11DRV_CLIPBOARD_ReleaseOwnership();
2638 X11DRV_EmptyClipboard(FALSE);
2642 /**************************************************************************
2643 * X11DRV_CLIPBOARD_SynthesizeData
2645 static BOOL X11DRV_CLIPBOARD_SynthesizeData(UINT wFormatID)
2647 BOOL bsyn = TRUE;
2648 LPWINE_CLIPDATA lpSource = NULL;
2650 TRACE(" %d\n", wFormatID);
2652 /* Don't need to synthesize if it already exists */
2653 if (X11DRV_CLIPBOARD_LookupData(wFormatID))
2654 return TRUE;
2656 if (wFormatID == CF_UNICODETEXT || wFormatID == CF_TEXT || wFormatID == CF_OEMTEXT)
2658 bsyn = ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_UNICODETEXT)) &&
2659 ~lpSource->wFlags & CF_FLAG_SYNTHESIZED) ||
2660 ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_TEXT)) &&
2661 ~lpSource->wFlags & CF_FLAG_SYNTHESIZED) ||
2662 ((lpSource = X11DRV_CLIPBOARD_LookupData(CF_OEMTEXT)) &&
2663 ~lpSource->wFlags & CF_FLAG_SYNTHESIZED);
2665 else if (wFormatID == CF_ENHMETAFILE)
2667 bsyn = (lpSource = X11DRV_CLIPBOARD_LookupData(CF_METAFILEPICT)) &&
2668 ~lpSource->wFlags & CF_FLAG_SYNTHESIZED;
2670 else if (wFormatID == CF_METAFILEPICT)
2672 bsyn = (lpSource = X11DRV_CLIPBOARD_LookupData(CF_METAFILEPICT)) &&
2673 ~lpSource->wFlags & CF_FLAG_SYNTHESIZED;
2675 else if (wFormatID == CF_DIB)
2677 bsyn = (lpSource = X11DRV_CLIPBOARD_LookupData(CF_BITMAP)) &&
2678 ~lpSource->wFlags & CF_FLAG_SYNTHESIZED;
2680 else if (wFormatID == CF_BITMAP)
2682 bsyn = (lpSource = X11DRV_CLIPBOARD_LookupData(CF_DIB)) &&
2683 ~lpSource->wFlags & CF_FLAG_SYNTHESIZED;
2686 if (bsyn)
2687 X11DRV_CLIPBOARD_InsertClipboardData(wFormatID, 0, 0, CF_FLAG_SYNTHESIZED, NULL, TRUE);
2689 return bsyn;
2694 /**************************************************************************
2695 * X11DRV_EndClipboardUpdate
2696 * TODO:
2697 * Add locale if it hasn't already been added
2699 void X11DRV_EndClipboardUpdate(void)
2701 INT count = ClipDataCount;
2703 /* Do Unicode <-> Text <-> OEM mapping */
2704 X11DRV_CLIPBOARD_SynthesizeData(CF_UNICODETEXT);
2705 X11DRV_CLIPBOARD_SynthesizeData(CF_TEXT);
2706 X11DRV_CLIPBOARD_SynthesizeData(CF_OEMTEXT);
2708 /* Enhmetafile <-> MetafilePict mapping */
2709 X11DRV_CLIPBOARD_SynthesizeData(CF_ENHMETAFILE);
2710 X11DRV_CLIPBOARD_SynthesizeData(CF_METAFILEPICT);
2712 /* DIB <-> Bitmap mapping */
2713 X11DRV_CLIPBOARD_SynthesizeData(CF_DIB);
2714 X11DRV_CLIPBOARD_SynthesizeData(CF_BITMAP);
2716 TRACE("%d formats added to cached data\n", ClipDataCount - count);
2720 /***********************************************************************
2721 * X11DRV_SelectionRequest_TARGETS
2722 * Service a TARGETS selection request event
2724 static Atom X11DRV_SelectionRequest_TARGETS( Display *display, Window requestor,
2725 Atom target, Atom rprop )
2727 UINT i;
2728 Atom* targets;
2729 ULONG cTargets;
2730 LPWINE_CLIPFORMAT lpFormats;
2731 LPWINE_CLIPDATA lpData;
2733 /* Create X atoms for any clipboard types which don't have atoms yet.
2734 * This avoids sending bogus zero atoms.
2735 * Without this, copying might not have access to all clipboard types.
2736 * FIXME: is it safe to call this here?
2738 intern_atoms();
2741 * Count the number of items we wish to expose as selection targets.
2743 cTargets = 1; /* Include TARGETS */
2745 if (!(lpData = ClipData)) return None;
2749 lpFormats = ClipFormats;
2751 while (lpFormats)
2753 if ((lpFormats->wFormatID == lpData->wFormatID) &&
2754 lpFormats->lpDrvExportFunc && lpFormats->drvData)
2755 cTargets++;
2757 lpFormats = lpFormats->NextFormat;
2760 lpData = lpData->NextData;
2762 while (lpData != ClipData);
2764 TRACE(" found %d formats\n", cTargets);
2766 /* Allocate temp buffer */
2767 targets = HeapAlloc( GetProcessHeap(), 0, cTargets * sizeof(Atom));
2768 if(targets == NULL)
2769 return None;
2771 i = 0;
2772 lpData = ClipData;
2773 targets[i++] = x11drv_atom(TARGETS);
2777 lpFormats = ClipFormats;
2779 while (lpFormats)
2781 if ((lpFormats->wFormatID == lpData->wFormatID) &&
2782 lpFormats->lpDrvExportFunc && lpFormats->drvData)
2783 targets[i++] = lpFormats->drvData;
2785 lpFormats = lpFormats->NextFormat;
2788 lpData = lpData->NextData;
2790 while (lpData != ClipData);
2792 wine_tsx11_lock();
2794 if (TRACE_ON(clipboard))
2796 unsigned int i;
2797 for ( i = 0; i < cTargets; i++)
2799 char *itemFmtName = XGetAtomName(display, targets[i]);
2800 TRACE("\tAtom# %d: Property %ld Type %s\n", i, targets[i], itemFmtName);
2801 XFree(itemFmtName);
2805 /* We may want to consider setting the type to xaTargets instead,
2806 * in case some apps expect this instead of XA_ATOM */
2807 XChangeProperty(display, requestor, rprop, XA_ATOM, 32,
2808 PropModeReplace, (unsigned char *)targets, cTargets);
2809 wine_tsx11_unlock();
2811 HeapFree(GetProcessHeap(), 0, targets);
2813 return rprop;
2817 /***********************************************************************
2818 * X11DRV_SelectionRequest_MULTIPLE
2819 * Service a MULTIPLE selection request event
2820 * rprop contains a list of (target,property) atom pairs.
2821 * The first atom names a target and the second names a property.
2822 * The effect is as if we have received a sequence of SelectionRequest events
2823 * (one for each atom pair) except that:
2824 * 1. We reply with a SelectionNotify only when all the requested conversions
2825 * have been performed.
2826 * 2. If we fail to convert the target named by an atom in the MULTIPLE property,
2827 * we replace the atom in the property by None.
2829 static Atom X11DRV_SelectionRequest_MULTIPLE( HWND hWnd, XSelectionRequestEvent *pevent )
2831 Display *display = pevent->display;
2832 Atom rprop;
2833 Atom atype=AnyPropertyType;
2834 int aformat;
2835 unsigned long remain;
2836 Atom* targetPropList=NULL;
2837 unsigned long cTargetPropList = 0;
2839 /* If the specified property is None the requestor is an obsolete client.
2840 * We support these by using the specified target atom as the reply property.
2842 rprop = pevent->property;
2843 if( rprop == None )
2844 rprop = pevent->target;
2845 if (!rprop)
2846 return 0;
2848 /* Read the MULTIPLE property contents. This should contain a list of
2849 * (target,property) atom pairs.
2851 wine_tsx11_lock();
2852 if(XGetWindowProperty(display, pevent->requestor, rprop,
2853 0, 0x3FFF, False, AnyPropertyType, &atype,&aformat,
2854 &cTargetPropList, &remain,
2855 (unsigned char**)&targetPropList) != Success)
2857 wine_tsx11_unlock();
2858 TRACE("\tCouldn't read MULTIPLE property\n");
2860 else
2862 TRACE("\tType %s,Format %d,nItems %ld, Remain %ld\n",
2863 XGetAtomName(display, atype), aformat, cTargetPropList, remain);
2864 wine_tsx11_unlock();
2867 * Make sure we got what we expect.
2868 * NOTE: According to the X-ICCCM Version 2.0 documentation the property sent
2869 * in a MULTIPLE selection request should be of type ATOM_PAIR.
2870 * However some X apps(such as XPaint) are not compliant with this and return
2871 * a user defined atom in atype when XGetWindowProperty is called.
2872 * The data *is* an atom pair but is not denoted as such.
2874 if(aformat == 32 /* atype == xAtomPair */ )
2876 unsigned int i;
2878 /* Iterate through the ATOM_PAIR list and execute a SelectionRequest
2879 * for each (target,property) pair */
2881 for (i = 0; i < cTargetPropList; i+=2)
2883 XSelectionRequestEvent event;
2885 if (TRACE_ON(clipboard))
2887 char *targetName, *propName;
2888 wine_tsx11_lock();
2889 targetName = XGetAtomName(display, targetPropList[i]);
2890 propName = XGetAtomName(display, targetPropList[i+1]);
2891 TRACE("MULTIPLE(%d): Target='%s' Prop='%s'\n",
2892 i/2, targetName, propName);
2893 XFree(targetName);
2894 XFree(propName);
2895 wine_tsx11_unlock();
2898 /* We must have a non "None" property to service a MULTIPLE target atom */
2899 if ( !targetPropList[i+1] )
2901 TRACE("\tMULTIPLE(%d): Skipping target with empty property!\n", i);
2902 continue;
2905 /* Set up an XSelectionRequestEvent for this (target,property) pair */
2906 memcpy( &event, pevent, sizeof(XSelectionRequestEvent) );
2907 event.target = targetPropList[i];
2908 event.property = targetPropList[i+1];
2910 /* Fire a SelectionRequest, informing the handler that we are processing
2911 * a MULTIPLE selection request event.
2913 X11DRV_HandleSelectionRequest( hWnd, &event, TRUE );
2917 /* Free the list of targets/properties */
2918 wine_tsx11_lock();
2919 XFree(targetPropList);
2920 wine_tsx11_unlock();
2923 return rprop;
2927 /***********************************************************************
2928 * X11DRV_HandleSelectionRequest
2929 * Process an event selection request event.
2930 * The bIsMultiple flag is used to signal when EVENT_SelectionRequest is called
2931 * recursively while servicing a "MULTIPLE" selection target.
2933 * Note: We only receive this event when WINE owns the X selection
2935 static void X11DRV_HandleSelectionRequest( HWND hWnd, XSelectionRequestEvent *event, BOOL bIsMultiple )
2937 Display *display = event->display;
2938 XSelectionEvent result;
2939 Atom rprop = None;
2940 Window request = event->requestor;
2942 TRACE("\n");
2945 * We can only handle the selection request if :
2946 * The selection is PRIMARY or CLIPBOARD, AND we can successfully open the clipboard.
2947 * Don't do these checks or open the clipboard while recursively processing MULTIPLE,
2948 * since this has been already done.
2950 if ( !bIsMultiple )
2952 if (((event->selection != XA_PRIMARY) && (event->selection != x11drv_atom(CLIPBOARD))))
2953 goto END;
2956 /* If the specified property is None the requestor is an obsolete client.
2957 * We support these by using the specified target atom as the reply property.
2959 rprop = event->property;
2960 if( rprop == None )
2961 rprop = event->target;
2963 if(event->target == x11drv_atom(TARGETS)) /* Return a list of all supported targets */
2965 /* TARGETS selection request */
2966 rprop = X11DRV_SelectionRequest_TARGETS( display, request, event->target, rprop );
2968 else if(event->target == x11drv_atom(MULTIPLE)) /* rprop contains a list of (target, property) atom pairs */
2970 /* MULTIPLE selection request */
2971 rprop = X11DRV_SelectionRequest_MULTIPLE( hWnd, event );
2973 else
2975 LPWINE_CLIPFORMAT lpFormat = X11DRV_CLIPBOARD_LookupProperty(NULL, event->target);
2977 if (lpFormat && lpFormat->lpDrvExportFunc)
2979 LPWINE_CLIPDATA lpData = X11DRV_CLIPBOARD_LookupData(lpFormat->wFormatID);
2981 if (lpData)
2983 unsigned char* lpClipData;
2984 DWORD cBytes;
2985 HANDLE hClipData = lpFormat->lpDrvExportFunc(request, event->target,
2986 rprop, lpData, &cBytes);
2988 if (hClipData && (lpClipData = GlobalLock(hClipData)))
2990 TRACE("\tUpdating property %s, %d bytes\n", debugstr_w(lpFormat->Name), cBytes);
2992 wine_tsx11_lock();
2993 XChangeProperty(display, request, rprop, event->target,
2994 8, PropModeReplace, (unsigned char *)lpClipData, cBytes);
2995 wine_tsx11_unlock();
2997 GlobalUnlock(hClipData);
2998 GlobalFree(hClipData);
3004 END:
3005 /* reply to sender
3006 * SelectionNotify should be sent only at the end of a MULTIPLE request
3008 if ( !bIsMultiple )
3010 result.type = SelectionNotify;
3011 result.display = display;
3012 result.requestor = request;
3013 result.selection = event->selection;
3014 result.property = rprop;
3015 result.target = event->target;
3016 result.time = event->time;
3017 TRACE("Sending SelectionNotify event...\n");
3018 wine_tsx11_lock();
3019 XSendEvent(display,event->requestor,False,NoEventMask,(XEvent*)&result);
3020 wine_tsx11_unlock();
3025 /***********************************************************************
3026 * X11DRV_SelectionRequest
3028 void X11DRV_SelectionRequest( HWND hWnd, XEvent *event )
3030 X11DRV_HandleSelectionRequest( hWnd, &event->xselectionrequest, FALSE );
3034 /***********************************************************************
3035 * X11DRV_SelectionClear
3037 void X11DRV_SelectionClear( HWND hWnd, XEvent *xev )
3039 XSelectionClearEvent *event = &xev->xselectionclear;
3040 if (event->selection == XA_PRIMARY || event->selection == x11drv_atom(CLIPBOARD))
3041 X11DRV_CLIPBOARD_ReleaseSelection( event->selection, event->window, hWnd, event->time );