605 lines
16 KiB
C
605 lines
16 KiB
C
/*
|
|
* 'Wine' Clipboard function handling
|
|
*
|
|
* Copyright 1994 Martin Ayotte
|
|
* 1996 Alex Korobka
|
|
*
|
|
*/
|
|
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <sys/types.h>
|
|
#include <sys/stat.h>
|
|
#include <fcntl.h>
|
|
#include <unistd.h>
|
|
#include <string.h>
|
|
#include <X11/Xlib.h>
|
|
#include <X11/Xatom.h>
|
|
#include "windows.h"
|
|
#include "win.h"
|
|
#include "message.h"
|
|
#include "clipboard.h"
|
|
#include "xmalloc.h"
|
|
#include "stddebug.h"
|
|
#include "debug.h"
|
|
|
|
#define CF_REGFORMATBASE 0xC000
|
|
|
|
typedef struct tagCLIPFORMAT {
|
|
WORD wFormatID;
|
|
WORD wRefCount;
|
|
WORD wDataPresent;
|
|
LPSTR Name;
|
|
HANDLE hData;
|
|
DWORD BufSize;
|
|
struct tagCLIPFORMAT *PrevFormat;
|
|
struct tagCLIPFORMAT *NextFormat;
|
|
} CLIPFORMAT, *LPCLIPFORMAT;
|
|
|
|
/* *************************************************************************
|
|
* internal variables
|
|
*/
|
|
|
|
static HWND hWndClipOwner = 0; /* current clipboard owner */
|
|
static HWND hWndClipWindow = 0; /* window that opened clipboard */
|
|
static HWND hWndViewer = 0; /* start of viewers chain */
|
|
|
|
static BOOL bClipChanged = FALSE;
|
|
static WORD LastRegFormat = CF_REGFORMATBASE;
|
|
|
|
static Bool wait_for_selection = False;
|
|
static Bool wineOwnsSelection = False;
|
|
|
|
static CLIPFORMAT ClipFormats[16] = {
|
|
{ CF_TEXT, 1, 0, "Text", (HANDLE)NULL, 0, NULL, &ClipFormats[1] },
|
|
{ CF_BITMAP, 1, 0, "Bitmap", (HANDLE)NULL, 0, &ClipFormats[0], &ClipFormats[2] },
|
|
{ CF_METAFILEPICT, 1, 0, "MetaFile Picture", (HANDLE)NULL, 0, &ClipFormats[1], &ClipFormats[3] },
|
|
{ CF_SYLK, 1, 0, "Sylk", (HANDLE)NULL, 0, &ClipFormats[2], &ClipFormats[4] },
|
|
{ CF_DIF, 1, 0, "DIF", (HANDLE)NULL, 0, &ClipFormats[3], &ClipFormats[5] },
|
|
{ CF_TIFF, 1, 0, "TIFF", (HANDLE)NULL, 0, &ClipFormats[4], &ClipFormats[6] },
|
|
{ CF_OEMTEXT, 1, 0, "OEM Text", (HANDLE)NULL, 0, &ClipFormats[5], &ClipFormats[7] },
|
|
{ CF_DIB, 1, 0, "DIB", (HANDLE)NULL, 0, &ClipFormats[6], &ClipFormats[8] },
|
|
{ CF_PALETTE, 1, 0, "Palette", (HANDLE)NULL, 0, &ClipFormats[7], &ClipFormats[9] },
|
|
{ CF_PENDATA, 1, 0, "PenData", (HANDLE)NULL, 0, &ClipFormats[8], &ClipFormats[10] },
|
|
{ CF_RIFF, 1, 0, "RIFF", (HANDLE)NULL, 0, &ClipFormats[9], &ClipFormats[11] },
|
|
{ CF_WAVE, 1, 0, "Wave", (HANDLE)NULL, 0, &ClipFormats[10], &ClipFormats[12] },
|
|
{ CF_OWNERDISPLAY, 1, 0, "Owner Display", (HANDLE)NULL, 0, &ClipFormats[11], &ClipFormats[13] },
|
|
{ CF_DSPTEXT, 1, 0, "DSPText", (HANDLE)NULL, 0, &ClipFormats[12], &ClipFormats[14] },
|
|
{ CF_DSPMETAFILEPICT, 1, 0, "DSPMetaFile Picture", (HANDLE)NULL, 0, &ClipFormats[13], &ClipFormats[15] },
|
|
{ CF_DSPBITMAP, 1, 0, "DSPBitmap", (HANDLE)NULL, 0, &ClipFormats[14], NULL }
|
|
};
|
|
|
|
/**************************************************************************
|
|
* CLIPBOARD_DisOwn
|
|
*/
|
|
void CLIPBOARD_DisOwn(HWND hWnd)
|
|
{
|
|
LPCLIPFORMAT lpFormat = ClipFormats;
|
|
|
|
if( hWnd != hWndClipOwner || !hWndClipOwner ) return;
|
|
|
|
SendMessage16(hWndClipOwner,WM_RENDERALLFORMATS,0,0L);
|
|
|
|
/* check if all formats were rendered */
|
|
|
|
while(lpFormat)
|
|
{
|
|
if( lpFormat->wDataPresent && !lpFormat->hData )
|
|
{
|
|
dprintf_clipboard(stddeb,"\tdata missing for clipboard format %i\n", lpFormat->wFormatID);
|
|
lpFormat->wDataPresent = 0;
|
|
}
|
|
lpFormat = lpFormat->NextFormat;
|
|
}
|
|
|
|
hWndClipOwner = 0;
|
|
}
|
|
|
|
/**************************************************************************
|
|
* CLIPBOARD_DeleteRecord
|
|
*/
|
|
void CLIPBOARD_DeleteRecord(LPCLIPFORMAT lpFormat)
|
|
{
|
|
if( lpFormat->wFormatID >= CF_GDIOBJFIRST &&
|
|
lpFormat->wFormatID <= CF_GDIOBJLAST )
|
|
DeleteObject(lpFormat->hData);
|
|
else if( lpFormat->hData )
|
|
GlobalFree16(lpFormat->hData);
|
|
|
|
lpFormat->wDataPresent = 0;
|
|
lpFormat->hData = 0;
|
|
|
|
bClipChanged = TRUE;
|
|
}
|
|
|
|
/**************************************************************************
|
|
* CLIPBOARD_RequestXSelection
|
|
*/
|
|
BOOL CLIPBOARD_RequestXSelection()
|
|
{
|
|
HWND hWnd = hWndClipWindow;
|
|
|
|
if( !hWnd ) hWnd = GetActiveWindow();
|
|
|
|
wait_for_selection=True;
|
|
dprintf_clipboard(stddeb,"Requesting selection\n");
|
|
|
|
XConvertSelection(display,XA_PRIMARY,XA_STRING,
|
|
XInternAtom(display,"PRIMARY_TEXT",False),
|
|
WIN_GetXWindow(hWnd),CurrentTime);
|
|
|
|
/* TODO: need time-out for broken clients */
|
|
while(wait_for_selection) EVENT_WaitXEvent( TRUE );
|
|
|
|
return (BOOL)ClipFormats[0].wDataPresent;
|
|
}
|
|
|
|
/**************************************************************************
|
|
* CLIPBOARD_IsPresent
|
|
*/
|
|
BOOL CLIPBOARD_IsPresent(WORD wFormat)
|
|
{
|
|
LPCLIPFORMAT lpFormat = ClipFormats;
|
|
|
|
while(TRUE) {
|
|
if (lpFormat == NULL) return FALSE;
|
|
if (lpFormat->wFormatID == wFormat) break;
|
|
lpFormat = lpFormat->NextFormat;
|
|
}
|
|
return (lpFormat->wDataPresent);
|
|
}
|
|
|
|
/**************************************************************************
|
|
* OpenClipboard [USER.137]
|
|
*/
|
|
BOOL OpenClipboard(HWND hWnd)
|
|
{
|
|
BOOL bRet = FALSE;
|
|
dprintf_clipboard(stddeb,"OpenClipboard(%04x) = ", hWnd);
|
|
|
|
if (!hWndClipWindow)
|
|
{
|
|
hWndClipWindow = hWnd;
|
|
bRet = TRUE;
|
|
}
|
|
bClipChanged = FALSE;
|
|
|
|
dprintf_clipboard(stddeb,"%i\n", bRet);
|
|
return bRet;
|
|
}
|
|
|
|
|
|
/**************************************************************************
|
|
* CloseClipboard [USER.138]
|
|
*/
|
|
BOOL CloseClipboard()
|
|
{
|
|
dprintf_clipboard(stddeb,"CloseClipboard(); !\n");
|
|
|
|
if (hWndClipWindow == 0) return FALSE;
|
|
hWndClipWindow = 0;
|
|
|
|
if (bClipChanged && hWndViewer) SendMessage16(hWndViewer,WM_DRAWCLIPBOARD,0,0L);
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
/**************************************************************************
|
|
* EmptyClipboard [USER.139]
|
|
*/
|
|
BOOL EmptyClipboard()
|
|
{
|
|
LPCLIPFORMAT lpFormat = ClipFormats;
|
|
|
|
dprintf_clipboard(stddeb,"EmptyClipboard()\n");
|
|
|
|
if (hWndClipWindow == 0) return FALSE;
|
|
|
|
/* destroy private objects */
|
|
|
|
if (hWndClipOwner)
|
|
SendMessage16(hWndClipOwner,WM_DESTROYCLIPBOARD,0,0L);
|
|
|
|
while(lpFormat)
|
|
{
|
|
if ( lpFormat->wDataPresent )
|
|
CLIPBOARD_DeleteRecord( lpFormat );
|
|
|
|
lpFormat = lpFormat->NextFormat;
|
|
}
|
|
|
|
hWndClipOwner = hWndClipWindow;
|
|
|
|
if(wineOwnsSelection){
|
|
dprintf_clipboard(stddeb,"Losing selection\n");
|
|
wineOwnsSelection=False;
|
|
XSetSelectionOwner(display,XA_PRIMARY,None,CurrentTime);
|
|
}
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
/**************************************************************************
|
|
* GetClipboardOwner [USER.140]
|
|
*/
|
|
HWND GetClipboardOwner()
|
|
{
|
|
dprintf_clipboard(stddeb,
|
|
"GetClipboardOwner() = %04x !\n", hWndClipOwner);
|
|
return hWndClipOwner;
|
|
}
|
|
|
|
|
|
/**************************************************************************
|
|
* SetClipboardData [USER.141]
|
|
*/
|
|
HANDLE SetClipboardData(WORD wFormat, HANDLE hData)
|
|
{
|
|
LPCLIPFORMAT lpFormat = ClipFormats;
|
|
Window owner;
|
|
|
|
dprintf_clipboard(stddeb,
|
|
"SetClipboardDate(%04X, %04x) !\n", wFormat, hData);
|
|
|
|
while(TRUE)
|
|
{
|
|
if (lpFormat == NULL) return 0;
|
|
if (lpFormat->wFormatID == wFormat) break;
|
|
lpFormat = lpFormat->NextFormat;
|
|
}
|
|
|
|
/* Acquire X selection:
|
|
*
|
|
* doc says we shouldn't use CurrentTime
|
|
* should we become owner of CLIPBOARD as well?
|
|
*/
|
|
|
|
owner = WIN_GetXWindow(hWndClipWindow);
|
|
|
|
XSetSelectionOwner(display,XA_PRIMARY,owner,CurrentTime);
|
|
if( XGetSelectionOwner(display,XA_PRIMARY) == owner )
|
|
{
|
|
wineOwnsSelection = True;
|
|
dprintf_clipboard(stddeb,"Getting selection\n");
|
|
}
|
|
|
|
if ( lpFormat->wDataPresent )
|
|
CLIPBOARD_DeleteRecord(lpFormat);
|
|
|
|
bClipChanged = TRUE;
|
|
lpFormat->wDataPresent = TRUE;
|
|
lpFormat->hData = hData;
|
|
|
|
return lpFormat->hData;
|
|
}
|
|
|
|
|
|
/**************************************************************************
|
|
* GetClipboardData [USER.142]
|
|
*/
|
|
HANDLE GetClipboardData(WORD wFormat)
|
|
{
|
|
LPCLIPFORMAT lpFormat = ClipFormats;
|
|
dprintf_clipboard(stddeb,"GetClipboardData(%04X)\n", wFormat);
|
|
|
|
if (!hWndClipWindow) return 0;
|
|
|
|
/* if(wFormat == CF_TEXT && !wineOwnsSelection)
|
|
CLIPBOARD_RequestXSelection();
|
|
*/
|
|
|
|
while(TRUE) {
|
|
if (lpFormat == NULL) return 0;
|
|
if (lpFormat->wFormatID == wFormat) break;
|
|
lpFormat = lpFormat->NextFormat;
|
|
}
|
|
|
|
if( lpFormat->wDataPresent && !lpFormat->hData )
|
|
if( IsWindow(hWndClipOwner) )
|
|
SendMessage16(hWndClipOwner,WM_RENDERFORMAT,(WPARAM)lpFormat->wFormatID,0L);
|
|
else
|
|
dprintf_clipboard(stddeb,"\thWndClipOwner is lost\n");
|
|
|
|
return lpFormat->hData;
|
|
}
|
|
|
|
|
|
/**************************************************************************
|
|
* CountClipboardFormats [USER.143]
|
|
*/
|
|
INT CountClipboardFormats()
|
|
{
|
|
int FormatCount = 0;
|
|
LPCLIPFORMAT lpFormat = ClipFormats;
|
|
|
|
dprintf_clipboard(stddeb,"CountClipboardFormats()\n");
|
|
|
|
while(TRUE) {
|
|
if (lpFormat == NULL) break;
|
|
if (lpFormat->wDataPresent)
|
|
{
|
|
dprintf_clipboard(stddeb, "\tdata found for format %i\n", lpFormat->wFormatID);
|
|
|
|
FormatCount++;
|
|
}
|
|
lpFormat = lpFormat->NextFormat;
|
|
}
|
|
|
|
dprintf_clipboard(stddeb,"\ttotal %d\n", FormatCount);
|
|
return FormatCount;
|
|
}
|
|
|
|
|
|
/**************************************************************************
|
|
* EnumClipboardFormats [USER.144]
|
|
*/
|
|
UINT EnumClipboardFormats(UINT wFormat)
|
|
{
|
|
LPCLIPFORMAT lpFormat = ClipFormats;
|
|
|
|
dprintf_clipboard(stddeb,"EnumClipboardFormats(%04X)\n", wFormat);
|
|
|
|
if( (!wFormat || wFormat == CF_TEXT) && !wineOwnsSelection)
|
|
CLIPBOARD_RequestXSelection();
|
|
|
|
if (wFormat == 0) {
|
|
if (lpFormat->wDataPresent)
|
|
return lpFormat->wFormatID;
|
|
else
|
|
wFormat = lpFormat->wFormatID;
|
|
}
|
|
|
|
/* walk up to the specified format record */
|
|
|
|
while(TRUE) {
|
|
if (lpFormat == NULL) return 0;
|
|
if (lpFormat->wFormatID == wFormat) break;
|
|
lpFormat = lpFormat->NextFormat;
|
|
}
|
|
|
|
/* find next format with available data */
|
|
|
|
lpFormat = lpFormat->NextFormat;
|
|
while(TRUE) {
|
|
if (lpFormat == NULL) return 0;
|
|
if (lpFormat->wDataPresent ) break;
|
|
lpFormat = lpFormat->NextFormat;
|
|
}
|
|
|
|
dprintf_clipboard(stddeb, "\t got not empty - Id=%04X hData=%04x !\n",
|
|
lpFormat->wFormatID, lpFormat->hData);
|
|
return lpFormat->wFormatID;
|
|
}
|
|
|
|
|
|
/**************************************************************************
|
|
* RegisterClipboardFormat [USER.145]
|
|
*/
|
|
WORD RegisterClipboardFormat(LPCSTR FormatName)
|
|
{
|
|
LPCLIPFORMAT lpNewFormat;
|
|
LPCLIPFORMAT lpFormat = ClipFormats;
|
|
|
|
if (FormatName == NULL) return 0;
|
|
|
|
dprintf_clipboard(stddeb,"RegisterClipboardFormat('%s') !\n", FormatName);
|
|
|
|
/* walk format chain to see if it's already registered */
|
|
|
|
while(TRUE) {
|
|
if ( !strcmp(lpFormat->Name,FormatName) )
|
|
{
|
|
lpFormat->wRefCount++;
|
|
return lpFormat->wFormatID;
|
|
}
|
|
|
|
if ( lpFormat->NextFormat == NULL ) break;
|
|
|
|
lpFormat = lpFormat->NextFormat;
|
|
}
|
|
|
|
/* allocate storage for new format entry */
|
|
|
|
lpNewFormat = (LPCLIPFORMAT)xmalloc(sizeof(CLIPFORMAT));
|
|
lpFormat->NextFormat = lpNewFormat;
|
|
lpNewFormat->wFormatID = LastRegFormat;
|
|
lpNewFormat->wRefCount = 1;
|
|
|
|
lpNewFormat->Name = (LPSTR)xmalloc(strlen(FormatName) + 1);
|
|
strcpy(lpNewFormat->Name, FormatName);
|
|
|
|
lpNewFormat->wDataPresent = 0;
|
|
lpNewFormat->hData = 0;
|
|
lpNewFormat->BufSize = 0;
|
|
lpNewFormat->PrevFormat = lpFormat;
|
|
lpNewFormat->NextFormat = NULL;
|
|
|
|
return LastRegFormat++;
|
|
}
|
|
|
|
|
|
/**************************************************************************
|
|
* GetClipboardFormatName [USER.146]
|
|
*/
|
|
int GetClipboardFormatName(WORD wFormat, LPSTR retStr, short maxlen)
|
|
{
|
|
LPCLIPFORMAT lpFormat = ClipFormats;
|
|
|
|
dprintf_clipboard(stddeb,
|
|
"GetClipboardFormat(%04X, %p, %d) !\n", wFormat, retStr, maxlen);
|
|
|
|
while(TRUE) {
|
|
if (lpFormat == NULL) return 0;
|
|
if (lpFormat->wFormatID == wFormat) break;
|
|
lpFormat = lpFormat->NextFormat;
|
|
}
|
|
|
|
if (lpFormat->Name == NULL ||
|
|
lpFormat->wFormatID < CF_REGFORMATBASE) return 0;
|
|
|
|
dprintf_clipboard(stddeb,
|
|
"GetClipboardFormat // Name='%s' !\n", lpFormat->Name);
|
|
|
|
strncpy(retStr, lpFormat->Name, maxlen - 1);
|
|
retStr[maxlen] = 0;
|
|
|
|
return strlen(retStr);
|
|
}
|
|
|
|
|
|
/**************************************************************************
|
|
* SetClipboardViewer [USER.147]
|
|
*/
|
|
HWND SetClipboardViewer(HWND hWnd)
|
|
{
|
|
HWND hwndPrev = hWndViewer;
|
|
|
|
dprintf_clipboard(stddeb,"SetClipboardViewer(%04x)\n", hWnd);
|
|
|
|
hWndViewer = hWnd;
|
|
return hwndPrev;
|
|
}
|
|
|
|
|
|
/**************************************************************************
|
|
* GetClipboardViewer [USER.148]
|
|
*/
|
|
HWND GetClipboardViewer()
|
|
{
|
|
dprintf_clipboard(stddeb,"GetClipboardFormat() = %04x\n", hWndViewer);
|
|
|
|
return hWndViewer;
|
|
}
|
|
|
|
|
|
/**************************************************************************
|
|
* ChangeClipboardChain [USER.149]
|
|
*/
|
|
BOOL ChangeClipboardChain(HWND hWnd, HWND hWndNext)
|
|
{
|
|
BOOL bRet = 0;
|
|
|
|
dprintf_clipboard(stdnimp, "ChangeClipboardChain(%04x, %04x)\n", hWnd, hWndNext);
|
|
|
|
if( hWndViewer )
|
|
bRet = !SendMessage16( hWndViewer, WM_CHANGECBCHAIN, (WPARAM)hWnd, (LPARAM)hWndNext);
|
|
else
|
|
dprintf_clipboard(stddeb,"ChangeClipboardChain: hWndViewer is lost\n");
|
|
|
|
if( hWnd == hWndViewer ) hWndViewer = hWndNext;
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
/**************************************************************************
|
|
* IsClipboardFormatAvailable [USER.193]
|
|
*/
|
|
BOOL IsClipboardFormatAvailable(WORD wFormat)
|
|
{
|
|
dprintf_clipboard(stddeb,"IsClipboardFormatAvailable(%04X) !\n", wFormat);
|
|
|
|
if(wFormat == CF_TEXT && !wineOwnsSelection)
|
|
CLIPBOARD_RequestXSelection();
|
|
|
|
return CLIPBOARD_IsPresent(wFormat);
|
|
}
|
|
|
|
|
|
/**************************************************************************
|
|
* GetOpenClipboardWindow [USER.248]
|
|
*/
|
|
HWND GetOpenClipboardWindow()
|
|
{
|
|
dprintf_clipboard(stddeb,
|
|
"GetOpenClipboardWindow() = %04x\n", hWndClipWindow);
|
|
return hWndClipWindow;
|
|
}
|
|
|
|
|
|
/**************************************************************************
|
|
* GetPriorityClipboardFormat [USER.402]
|
|
*/
|
|
int GetPriorityClipboardFormat(WORD *lpPriorityList, short nCount)
|
|
{
|
|
dprintf_clipboard(stdnimp,
|
|
"GetPriorityClipboardFormat(%p, %d) !\n", lpPriorityList, nCount);
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
/**************************************************************************
|
|
* CLIPBOARD_ReadSelection
|
|
*
|
|
* The current selection owner has set prop at our window w
|
|
* Transfer the property contents into the Clipboard
|
|
*/
|
|
void CLIPBOARD_ReadSelection(Window w,Atom prop)
|
|
{
|
|
HANDLE hText;
|
|
LPCLIPFORMAT lpFormat = ClipFormats;
|
|
if(prop==None)
|
|
hText=0;
|
|
else
|
|
{
|
|
Atom atype=None;
|
|
int aformat;
|
|
unsigned long nitems,remain;
|
|
unsigned char *val=NULL;
|
|
|
|
dprintf_clipboard(stddeb,"Received prop %s\n",XGetAtomName(display,prop));
|
|
|
|
/* TODO: Properties longer than 64K */
|
|
|
|
if(XGetWindowProperty(display,w,prop,0,0x3FFF,True,XA_STRING,
|
|
&atype, &aformat, &nitems, &remain, &val)!=Success)
|
|
fprintf(stderr,"couldn't read property\n");
|
|
|
|
dprintf_clipboard(stddeb,"Type %s,Format %d,nitems %ld,value %s\n",
|
|
XGetAtomName(display,atype),aformat,nitems,val);
|
|
|
|
if(atype!=XA_STRING || aformat!=8){
|
|
fprintf(stderr,"Property not set\n");
|
|
hText=0;
|
|
} else {
|
|
dprintf_clipboard(stddeb,"Selection is %s\n",val);
|
|
hText=GlobalAlloc16(GMEM_MOVEABLE, nitems+1);
|
|
memcpy(GlobalLock16(hText),val,nitems+1);
|
|
GlobalUnlock16(hText);
|
|
}
|
|
XFree(val);
|
|
}
|
|
|
|
while(TRUE) {
|
|
if (lpFormat == NULL) return;
|
|
if (lpFormat->wFormatID == CF_TEXT) break;
|
|
lpFormat = lpFormat->NextFormat;
|
|
}
|
|
|
|
if (lpFormat->wDataPresent)
|
|
CLIPBOARD_DeleteRecord(lpFormat);
|
|
|
|
wait_for_selection=False;
|
|
|
|
lpFormat->wDataPresent = TRUE;
|
|
lpFormat->hData = hText;
|
|
dprintf_clipboard(stddeb,"Received selection\n");
|
|
}
|
|
|
|
/**************************************************************************
|
|
* CLIPBOARD_ReleaseSelection
|
|
*
|
|
* Wine lost the primary selection.
|
|
* Empty the clipboard, but don't set the current owner to None.
|
|
* Make sure current get/put attempts fail.
|
|
*/
|
|
void CLIPBOARD_ReleaseSelection(HWND hwnd)
|
|
{
|
|
wineOwnsSelection=False;
|
|
OpenClipboard(hwnd);
|
|
EmptyClipboard();
|
|
CloseClipboard();
|
|
}
|