mirror of
https://gitlab.gnome.org/GNOME/gtk.git
synced 2024-12-27 06:00:22 +00:00
df9768cf3a
2005-03-16 Tor Lillqvist <tml@novell.com> * gdk/win32/gdkdisplay-win32.c (_win32_on_clipboard_change): Print debugging output only if asked for, not always. * gdk/win32/*.c: Use the %+d%+d format for coordinate pairs in debugging printout instead of +%d+%d. Misc other additions and cosmetic improvements to debugging printouts. Use API_CALL() and GDI_CALL() macros in more places. * gdk/win32/gdkwindow-win32.c (gdk_window_move, gdk_window_resize, gdk_window_move_resize): To detect child windows, check whether the real parent is not the desktop window, instead of relying on the GDK window type being GDK_WINDOW_CHILD. Foreign GtkPlug windows have a GDK window type GDK_WINDOW_FOREIGN, but are still de facto child windows.
971 lines
26 KiB
C
971 lines
26 KiB
C
/* GDK - The GIMP Drawing Kit
|
|
* Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
|
|
* Copyright (C) 1998-2002 Tor Lillqvist
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the
|
|
* Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
|
* Boston, MA 02111-1307, USA.
|
|
*/
|
|
|
|
/*
|
|
* Modified by the GTK+ Team and others 1997-2000. See the AUTHORS
|
|
* file for a list of people on the GTK+ Team. See the ChangeLog
|
|
* files for a list of changes. These files are distributed with
|
|
* GTK+ at ftp://ftp.gtk.org/pub/gtk/.
|
|
*/
|
|
|
|
#include <config.h>
|
|
#include <string.h>
|
|
#include <stdlib.h>
|
|
|
|
#include "gdkproperty.h"
|
|
#include "gdkselection.h"
|
|
#include "gdkdisplay.h"
|
|
#include "gdkprivate-win32.h"
|
|
|
|
/* We emulate the GDK_SELECTION window properties of windows (as used
|
|
* in the X11 backend) by using a hash table from GdkWindows to
|
|
* GdkSelProp structs.
|
|
*/
|
|
|
|
typedef struct {
|
|
guchar *data;
|
|
gsize length;
|
|
gint format;
|
|
GdkAtom type;
|
|
} GdkSelProp;
|
|
|
|
static GHashTable *sel_prop_table = NULL;
|
|
|
|
static GdkSelProp *dropfiles_prop = NULL;
|
|
|
|
/* We store the owner of each selection in this table. Obviously, this only
|
|
* is valid intra-app, and in fact it is necessary for the intra-app DND to work.
|
|
*/
|
|
static GHashTable *sel_owner_table = NULL;
|
|
|
|
void
|
|
_gdk_win32_selection_init (void)
|
|
{
|
|
sel_prop_table = g_hash_table_new (NULL, NULL);
|
|
sel_owner_table = g_hash_table_new (NULL, NULL);
|
|
}
|
|
|
|
/* The specifications for COMPOUND_TEXT and STRING specify that C0 and
|
|
* C1 are not allowed except for \n and \t, however the X conversions
|
|
* routines for COMPOUND_TEXT only enforce this in one direction,
|
|
* causing cut-and-paste of \r and \r\n separated text to fail.
|
|
* This routine strips out all non-allowed C0 and C1 characters
|
|
* from the input string and also canonicalizes \r, and \r\n to \n
|
|
*/
|
|
static gchar *
|
|
sanitize_utf8 (const gchar *src,
|
|
gint length)
|
|
{
|
|
GString *result = g_string_sized_new (length + 1);
|
|
const gchar *p = src;
|
|
const gchar *endp = src + length;
|
|
|
|
while (p < endp)
|
|
{
|
|
if (*p == '\r')
|
|
{
|
|
p++;
|
|
if (*p == '\n')
|
|
p++;
|
|
|
|
g_string_append_c (result, '\n');
|
|
}
|
|
else
|
|
{
|
|
gunichar ch = g_utf8_get_char (p);
|
|
char buf[7];
|
|
gint buflen;
|
|
|
|
if (!((ch < 0x20 && ch != '\t' && ch != '\n') || (ch >= 0x7f && ch < 0xa0)))
|
|
{
|
|
buflen = g_unichar_to_utf8 (ch, buf);
|
|
g_string_append_len (result, buf, buflen);
|
|
}
|
|
|
|
p = g_utf8_next_char (p);
|
|
}
|
|
}
|
|
g_string_append_c (result, '\0');
|
|
|
|
return g_string_free (result, FALSE);
|
|
}
|
|
|
|
static gchar *
|
|
_gdk_utf8_to_string_target_internal (const gchar *str,
|
|
gint length)
|
|
{
|
|
GError *error = NULL;
|
|
|
|
gchar *tmp_str = sanitize_utf8 (str, length);
|
|
gchar *result = g_convert_with_fallback (tmp_str, -1,
|
|
"ISO-8859-1", "UTF-8",
|
|
NULL, NULL, NULL, &error);
|
|
if (!result)
|
|
{
|
|
g_warning ("Error converting from UTF-8 to STRING: %s",
|
|
error->message);
|
|
g_error_free (error);
|
|
}
|
|
|
|
g_free (tmp_str);
|
|
return result;
|
|
}
|
|
|
|
static void
|
|
_gdk_selection_property_store (GdkWindow *owner,
|
|
GdkAtom type,
|
|
gint format,
|
|
guchar *data,
|
|
gint length)
|
|
{
|
|
GdkSelProp *prop;
|
|
GSList *prop_list;
|
|
|
|
prop = g_new (GdkSelProp, 1);
|
|
|
|
if (type == GDK_TARGET_STRING)
|
|
{
|
|
/* We know that data is UTF-8 */
|
|
prop->data = _gdk_utf8_to_string_target_internal (data, length);
|
|
g_free (data);
|
|
|
|
if (!prop->data)
|
|
{
|
|
g_free (prop);
|
|
|
|
return;
|
|
}
|
|
else
|
|
prop->length = strlen (prop->data) + 1;
|
|
}
|
|
else
|
|
{
|
|
prop->data = data;
|
|
prop->length = length;
|
|
}
|
|
prop->format = format;
|
|
prop->type = type;
|
|
prop_list = g_hash_table_lookup (sel_prop_table, GDK_WINDOW_HWND (owner));
|
|
prop_list = g_slist_append (prop_list, prop);
|
|
g_hash_table_insert (sel_prop_table, GDK_WINDOW_HWND (owner), prop_list);
|
|
}
|
|
|
|
void
|
|
_gdk_dropfiles_store (gchar *data)
|
|
{
|
|
if (data != NULL)
|
|
{
|
|
g_assert (dropfiles_prop == NULL);
|
|
|
|
dropfiles_prop = g_new (GdkSelProp, 1);
|
|
dropfiles_prop->data = data;
|
|
dropfiles_prop->length = strlen (data) + 1;
|
|
dropfiles_prop->format = 8;
|
|
dropfiles_prop->type = _text_uri_list;
|
|
}
|
|
else
|
|
{
|
|
if (dropfiles_prop != NULL)
|
|
{
|
|
g_free (dropfiles_prop->data);
|
|
g_free (dropfiles_prop);
|
|
}
|
|
dropfiles_prop = NULL;
|
|
}
|
|
}
|
|
|
|
gboolean
|
|
gdk_selection_owner_set_for_display (GdkDisplay *display,
|
|
GdkWindow *owner,
|
|
GdkAtom selection,
|
|
guint32 time,
|
|
gboolean send_event)
|
|
{
|
|
HWND hwnd;
|
|
GdkEvent tmp_event;
|
|
gchar *sel_name;
|
|
|
|
g_return_val_if_fail (display == _gdk_display, FALSE);
|
|
g_return_val_if_fail (selection != GDK_NONE, FALSE);
|
|
|
|
GDK_NOTE (DND,
|
|
(sel_name = gdk_atom_name (selection),
|
|
g_print ("gdk_selection_owner_set: %p %#x (%s)\n",
|
|
(owner ? GDK_WINDOW_HWND (owner) : NULL),
|
|
(guint) selection, sel_name),
|
|
g_free (sel_name)));
|
|
|
|
if (selection != GDK_SELECTION_CLIPBOARD)
|
|
{
|
|
if (owner != NULL)
|
|
g_hash_table_insert (sel_owner_table, selection, GDK_WINDOW_HWND (owner));
|
|
else
|
|
g_hash_table_remove (sel_owner_table, selection);
|
|
return TRUE;
|
|
}
|
|
|
|
/* Rest of this function handles the CLIPBOARD selection */
|
|
if (owner != NULL)
|
|
{
|
|
if (GDK_WINDOW_DESTROYED (owner))
|
|
return FALSE;
|
|
|
|
hwnd = GDK_WINDOW_HWND (owner);
|
|
}
|
|
else
|
|
hwnd = NULL;
|
|
|
|
if (!API_CALL (OpenClipboard, (hwnd)))
|
|
return FALSE;
|
|
|
|
_ignore_destroy_clipboard = TRUE;
|
|
if (!API_CALL (EmptyClipboard, ()))
|
|
{
|
|
_ignore_destroy_clipboard = FALSE;
|
|
API_CALL (CloseClipboard, ());
|
|
return FALSE;
|
|
}
|
|
_ignore_destroy_clipboard = FALSE;
|
|
|
|
if (!API_CALL (CloseClipboard, ()))
|
|
return FALSE;
|
|
|
|
if (owner != NULL)
|
|
{
|
|
/* Send ourselves a selection request message so that
|
|
* gdk_property_change will be called to store the clipboard
|
|
* data.
|
|
*/
|
|
GDK_NOTE (DND, g_print ("... sending GDK_SELECTION_REQUEST to ourselves\n"));
|
|
tmp_event.selection.type = GDK_SELECTION_REQUEST;
|
|
tmp_event.selection.window = owner;
|
|
tmp_event.selection.send_event = FALSE;
|
|
tmp_event.selection.selection = selection;
|
|
tmp_event.selection.target = _utf8_string;
|
|
tmp_event.selection.property = _gdk_selection_property;
|
|
tmp_event.selection.requestor = (guint32) hwnd;
|
|
tmp_event.selection.time = time;
|
|
|
|
gdk_event_put (&tmp_event);
|
|
}
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
GdkWindow*
|
|
gdk_selection_owner_get_for_display (GdkDisplay *display,
|
|
GdkAtom selection)
|
|
{
|
|
GdkWindow *window;
|
|
gchar *sel_name;
|
|
|
|
g_return_val_if_fail (display == _gdk_display, NULL);
|
|
g_return_val_if_fail (selection != GDK_NONE, NULL);
|
|
|
|
/* Return NULL for CLIPBOARD, because otherwise cut&paste inside the
|
|
* same application doesn't work. We must pretend to gtk that we
|
|
* don't have the selection, so that we always fetch it from the
|
|
* Windows clipboard. See also comments in
|
|
* gdk_selection_send_notify().
|
|
*/
|
|
if (selection == GDK_SELECTION_CLIPBOARD)
|
|
return NULL;
|
|
|
|
window = gdk_window_lookup ((GdkNativeWindow) g_hash_table_lookup (sel_owner_table, selection));
|
|
|
|
GDK_NOTE (DND,
|
|
(sel_name = gdk_atom_name (selection),
|
|
g_print ("gdk_selection_owner_get: %#x (%s) = %p\n",
|
|
(guint) selection, sel_name,
|
|
(window ? GDK_WINDOW_HWND (window) : NULL)),
|
|
g_free (sel_name)));
|
|
|
|
return window;
|
|
}
|
|
|
|
static void
|
|
generate_selection_notify (GdkWindow *requestor,
|
|
GdkAtom selection,
|
|
GdkAtom target,
|
|
GdkAtom property,
|
|
guint32 time)
|
|
{
|
|
GdkEvent tmp_event;
|
|
|
|
tmp_event.selection.type = GDK_SELECTION_NOTIFY;
|
|
tmp_event.selection.window = requestor;
|
|
tmp_event.selection.send_event = FALSE;
|
|
tmp_event.selection.selection = selection;
|
|
tmp_event.selection.target = target;
|
|
tmp_event.selection.property = property;
|
|
tmp_event.selection.requestor = 0;
|
|
tmp_event.selection.time = time;
|
|
|
|
gdk_event_put (&tmp_event);
|
|
}
|
|
|
|
void
|
|
gdk_selection_convert (GdkWindow *requestor,
|
|
GdkAtom selection,
|
|
GdkAtom target,
|
|
guint32 time)
|
|
{
|
|
HGLOBAL hdata;
|
|
GdkAtom property = _gdk_selection_property;
|
|
gchar *sel_name, *tgt_name;
|
|
GError *error = NULL;
|
|
|
|
g_return_if_fail (selection != GDK_NONE);
|
|
g_return_if_fail (requestor != NULL);
|
|
|
|
if (GDK_WINDOW_DESTROYED (requestor))
|
|
return;
|
|
|
|
GDK_NOTE (DND,
|
|
(sel_name = gdk_atom_name (selection),
|
|
tgt_name = gdk_atom_name (target),
|
|
g_print ("gdk_selection_convert: %p %#x (%s) %#x (%s)\n",
|
|
GDK_WINDOW_HWND (requestor),
|
|
(guint) selection, sel_name,
|
|
(guint) target, tgt_name),
|
|
g_free (sel_name),
|
|
g_free (tgt_name)));
|
|
|
|
if (selection == GDK_SELECTION_CLIPBOARD && target == _targets)
|
|
{
|
|
/* He wants to know what formats are on the clipboard. If there
|
|
* is some kind of text, tell him so.
|
|
*/
|
|
if (!API_CALL (OpenClipboard, (GDK_WINDOW_HWND (requestor))))
|
|
return;
|
|
|
|
if (IsClipboardFormatAvailable (CF_UNICODETEXT) ||
|
|
IsClipboardFormatAvailable (_cf_utf8_string) ||
|
|
IsClipboardFormatAvailable (CF_TEXT))
|
|
{
|
|
GdkAtom *data = g_new (GdkAtom, 1);
|
|
*data = _utf8_string;
|
|
_gdk_selection_property_store (requestor, GDK_SELECTION_TYPE_ATOM,
|
|
32, (guchar *) data, 1 * sizeof (GdkAtom));
|
|
}
|
|
else if (IsClipboardFormatAvailable (CF_BITMAP) ||
|
|
IsClipboardFormatAvailable (CF_DIB))
|
|
{
|
|
GdkAtom *data = g_new (GdkAtom, 1);
|
|
GdkAtom atom = gdk_atom_intern ("image/bmp", FALSE);
|
|
*data = atom;
|
|
_gdk_selection_property_store (requestor, GDK_SELECTION_TYPE_ATOM,
|
|
32, (guchar *) data, 1 * sizeof (GdkAtom));
|
|
}
|
|
else if (CountClipboardFormats() > 0)
|
|
{
|
|
/* if there is anything else in the clipboard, enum it all although we don't
|
|
* offer special conversion services
|
|
*/
|
|
int fmt = 0, i = 0;
|
|
GdkAtom *data = g_new (GdkAtom, CountClipboardFormats());
|
|
|
|
for ( ; 0 != (fmt = EnumClipboardFormats (fmt)); )
|
|
{
|
|
char sFormat[80];
|
|
|
|
if (GetClipboardFormatName (fmt, sFormat, 80) > 0)
|
|
{
|
|
GdkAtom atom = gdk_atom_intern (sFormat, FALSE);
|
|
data[i] = atom;
|
|
i++;
|
|
}
|
|
}
|
|
_gdk_selection_property_store (requestor, GDK_SELECTION_TYPE_ATOM,
|
|
32, (guchar *) data, i * sizeof (GdkAtom));
|
|
}
|
|
else
|
|
property = GDK_NONE;
|
|
|
|
API_CALL (CloseClipboard, ());
|
|
}
|
|
else if (selection == GDK_SELECTION_CLIPBOARD &&
|
|
(target == GDK_TARGET_STRING ||
|
|
target == _utf8_string))
|
|
{
|
|
/* Converting the CLIPBOARD selection means he wants the
|
|
* contents of the clipboard. Get the clipboard data, and store
|
|
* it for later.
|
|
*/
|
|
if (!API_CALL (OpenClipboard, (GDK_WINDOW_HWND (requestor))))
|
|
return;
|
|
|
|
/* Try various formats. First the simplest, CF_UNICODETEXT. */
|
|
if (G_WIN32_IS_NT_BASED () && (hdata = GetClipboardData (CF_UNICODETEXT)) != NULL)
|
|
{
|
|
wchar_t *ptr, *wcs, *p, *q;
|
|
guchar *data;
|
|
glong length, wclen;
|
|
|
|
if ((ptr = GlobalLock (hdata)) != NULL)
|
|
{
|
|
length = GlobalSize (hdata);
|
|
|
|
GDK_NOTE (DND, g_print ("... CF_UNICODETEXT: %ld bytes\n",
|
|
length));
|
|
|
|
/* Strip out \r */
|
|
wcs = g_new (wchar_t, length / 2 + 1);
|
|
p = ptr;
|
|
q = wcs;
|
|
wclen = 0;
|
|
while (p < ptr + length / 2)
|
|
{
|
|
if (*p != '\r')
|
|
{
|
|
*q++ = *p;
|
|
wclen++;
|
|
}
|
|
p++;
|
|
}
|
|
|
|
data = g_utf16_to_utf8 (wcs, wclen, NULL, NULL, &error);
|
|
g_free (wcs);
|
|
|
|
if (!data)
|
|
{
|
|
g_error_free (error);
|
|
}
|
|
else
|
|
_gdk_selection_property_store (requestor, target, 8,
|
|
data, strlen (data) + 1);
|
|
GlobalUnlock (hdata);
|
|
}
|
|
}
|
|
else if ((hdata = GetClipboardData (_cf_utf8_string)) != NULL)
|
|
{
|
|
/* UTF8_STRING is a format we store ourselves when necessary */
|
|
guchar *ptr;
|
|
gint length;
|
|
|
|
if ((ptr = GlobalLock (hdata)) != NULL)
|
|
{
|
|
length = GlobalSize (hdata);
|
|
|
|
GDK_NOTE (DND, g_print ("... UTF8_STRING: %d bytes: %.10s\n",
|
|
length, ptr));
|
|
|
|
_gdk_selection_property_store (requestor, target, 8,
|
|
g_memdup (ptr, length), length);
|
|
GlobalUnlock (hdata);
|
|
}
|
|
}
|
|
else if ((hdata = GetClipboardData (CF_TEXT)) != NULL)
|
|
{
|
|
/* We must always assume the data can contain non-ASCII
|
|
* in either the current code page, or if there is CF_LOCALE
|
|
* data, in that locale's default code page.
|
|
*/
|
|
HGLOBAL hlcid;
|
|
UINT cp = CP_ACP;
|
|
wchar_t *wcs, *wcs2, *p, *q;
|
|
guchar *ptr, *data;
|
|
glong length, wclen, wclen2;
|
|
|
|
if ((ptr = GlobalLock (hdata)) != NULL)
|
|
{
|
|
length = GlobalSize (hdata);
|
|
|
|
GDK_NOTE (DND, g_print ("... CF_TEXT: %ld bytes: %.10s\n",
|
|
length, ptr));
|
|
|
|
if ((hlcid = GetClipboardData (CF_LOCALE)) != NULL)
|
|
{
|
|
gchar buf[10];
|
|
LCID *lcidptr = GlobalLock (hlcid);
|
|
if (GetLocaleInfo (*lcidptr, LOCALE_IDEFAULTANSICODEPAGE,
|
|
buf, sizeof (buf)))
|
|
{
|
|
cp = atoi (buf);
|
|
GDK_NOTE (DND, g_print ("... CF_LOCALE: %#lx cp:%d\n",
|
|
*lcidptr, cp));
|
|
}
|
|
GlobalUnlock (hlcid);
|
|
}
|
|
|
|
wcs = g_new (wchar_t, length + 1);
|
|
wclen = MultiByteToWideChar (cp, 0, ptr, length,
|
|
wcs, length + 1);
|
|
|
|
/* Strip out \r */
|
|
wcs2 = g_new (wchar_t, wclen);
|
|
p = wcs;
|
|
q = wcs2;
|
|
wclen2 = 0;
|
|
while (p < wcs + wclen)
|
|
{
|
|
if (*p != '\r')
|
|
{
|
|
*q++ = *p;
|
|
wclen2++;
|
|
}
|
|
p++;
|
|
}
|
|
g_free (wcs);
|
|
|
|
data = g_utf16_to_utf8 (wcs2, wclen2, NULL, &length, &error);
|
|
g_free (wcs2);
|
|
|
|
if (!data)
|
|
g_error_free (error);
|
|
else
|
|
_gdk_selection_property_store (requestor, target, 8,
|
|
data, length + 1);
|
|
GlobalUnlock (hdata);
|
|
}
|
|
}
|
|
else
|
|
property = GDK_NONE;
|
|
|
|
API_CALL (CloseClipboard, ());
|
|
}
|
|
else if (selection == GDK_SELECTION_CLIPBOARD &&
|
|
target == gdk_atom_intern ("image/bmp", TRUE))
|
|
{
|
|
if (!API_CALL (OpenClipboard, (GDK_WINDOW_HWND (requestor))))
|
|
return;
|
|
if ((hdata = GetClipboardData (CF_DIB)) != NULL)
|
|
{
|
|
BITMAPINFOHEADER *ptr;
|
|
guchar *data;
|
|
|
|
if ((ptr = GlobalLock (hdata)) != NULL)
|
|
{
|
|
BITMAPFILEHEADER *hdr; /* need to add a file header so gdk-pixbuf can load it */
|
|
gint length = GlobalSize (hdata) + sizeof(BITMAPFILEHEADER);
|
|
|
|
GDK_NOTE (DND, g_print ("... BITMAP: %d bytes\n", length));
|
|
|
|
data = g_try_malloc (length);
|
|
if (data)
|
|
{
|
|
hdr = (BITMAPFILEHEADER *)data;
|
|
hdr->bfType = 0x4d42; /* 0x42 = "B" 0x4d = "M" */
|
|
/* Compute the size of the entire file. */
|
|
hdr->bfSize = (DWORD) (sizeof(BITMAPFILEHEADER)
|
|
+ ptr->biSize + ptr->biClrUsed
|
|
* sizeof(RGBQUAD) + ptr->biSizeImage);
|
|
hdr->bfReserved1 = 0;
|
|
hdr->bfReserved2 = 0;
|
|
/* Compute the offset to the array of color indices. */
|
|
hdr->bfOffBits = (DWORD) sizeof(BITMAPFILEHEADER)
|
|
+ ptr->biSize + ptr->biClrUsed * sizeof (RGBQUAD);
|
|
/* copy the data behind it */
|
|
memcpy (data + sizeof(BITMAPFILEHEADER), ptr, length - sizeof(BITMAPFILEHEADER));
|
|
_gdk_selection_property_store (requestor, target, 8,
|
|
data, length);
|
|
}
|
|
GlobalUnlock (hdata);
|
|
}
|
|
|
|
}
|
|
|
|
API_CALL (CloseClipboard, ());
|
|
}
|
|
else if (selection == GDK_SELECTION_CLIPBOARD)
|
|
{
|
|
const char *targetname = gdk_atom_name (target);
|
|
UINT fmt = 0;
|
|
|
|
if (!API_CALL (OpenClipboard, (GDK_WINDOW_HWND (requestor))))
|
|
return;
|
|
/* check if its available */
|
|
for ( ; 0 != (fmt = EnumClipboardFormats (fmt)); )
|
|
{
|
|
char sFormat[80];
|
|
|
|
if (GetClipboardFormatName (fmt, sFormat, 80) > 0 &&
|
|
strcmp (sFormat, targetname) == 0)
|
|
{
|
|
if ((hdata = GetClipboardData (fmt)) != NULL)
|
|
{
|
|
/* simply get it without conversion */
|
|
guchar *ptr;
|
|
gint length;
|
|
|
|
if ((ptr = GlobalLock (hdata)) != NULL)
|
|
{
|
|
length = GlobalSize (hdata);
|
|
|
|
GDK_NOTE (DND, g_print ("... %s: %d bytes\n", targetname, length));
|
|
|
|
_gdk_selection_property_store (requestor, target, 8,
|
|
g_memdup (ptr, length), length);
|
|
GlobalUnlock (hdata);
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
API_CALL (CloseClipboard, ());
|
|
}
|
|
else if (selection == _gdk_win32_dropfiles)
|
|
{
|
|
/* This means he wants the names of the dropped files.
|
|
* gdk_dropfiles_filter already has stored the text/uri-list
|
|
* data temporarily in dropfiles_prop.
|
|
*/
|
|
if (dropfiles_prop != NULL)
|
|
{
|
|
_gdk_selection_property_store
|
|
(requestor, selection, dropfiles_prop->format,
|
|
dropfiles_prop->data, dropfiles_prop->length);
|
|
g_free (dropfiles_prop);
|
|
dropfiles_prop = NULL;
|
|
}
|
|
}
|
|
else
|
|
property = GDK_NONE;
|
|
|
|
/* Generate a selection notify message so that we actually fetch
|
|
* the data (if property == _gdk_selection_property) or indicating failure
|
|
* (if property == GDK_NONE).
|
|
*/
|
|
generate_selection_notify (requestor, selection, target, property, time);
|
|
}
|
|
|
|
gint
|
|
gdk_selection_property_get (GdkWindow *requestor,
|
|
guchar **data,
|
|
GdkAtom *ret_type,
|
|
gint *ret_format)
|
|
{
|
|
GdkSelProp *prop;
|
|
GSList *prop_list;
|
|
|
|
g_return_val_if_fail (requestor != NULL, 0);
|
|
g_return_val_if_fail (GDK_IS_WINDOW (requestor), 0);
|
|
|
|
if (GDK_WINDOW_DESTROYED (requestor))
|
|
return 0;
|
|
|
|
GDK_NOTE (DND, g_print ("gdk_selection_property_get: %p\n",
|
|
GDK_WINDOW_HWND (requestor)));
|
|
|
|
prop_list = g_hash_table_lookup (sel_prop_table, GDK_WINDOW_HWND (requestor));
|
|
prop = prop_list ? (GdkSelProp *) prop_list->data : NULL;
|
|
|
|
if (prop == NULL)
|
|
{
|
|
*data = NULL;
|
|
return 0;
|
|
}
|
|
|
|
*data = g_malloc (prop->length);
|
|
if (prop->length > 0)
|
|
memmove (*data, prop->data, prop->length);
|
|
|
|
if (ret_type)
|
|
*ret_type = prop->type;
|
|
|
|
if (ret_format)
|
|
*ret_format = prop->format;
|
|
|
|
return prop->length;
|
|
}
|
|
|
|
void
|
|
_gdk_selection_property_delete (GdkWindow *window)
|
|
{
|
|
GdkSelProp *prop;
|
|
GSList *prop_list;
|
|
|
|
GDK_NOTE (DND, g_print ("_gdk_selection_property_delete: %p\n",
|
|
GDK_WINDOW_HWND (window)));
|
|
|
|
prop_list = g_hash_table_lookup (sel_prop_table, GDK_WINDOW_HWND (window));
|
|
if (prop_list && (prop = (GdkSelProp *) prop_list->data) != NULL)
|
|
{
|
|
g_free (prop->data);
|
|
prop_list = g_slist_remove (prop_list, prop);
|
|
g_free (prop);
|
|
g_hash_table_insert (sel_prop_table, GDK_WINDOW_HWND (window), prop_list);
|
|
}
|
|
}
|
|
|
|
void
|
|
gdk_selection_send_notify_for_display (GdkDisplay *display,
|
|
guint32 requestor,
|
|
GdkAtom selection,
|
|
GdkAtom target,
|
|
GdkAtom property,
|
|
guint32 time)
|
|
{
|
|
GdkEvent tmp_event;
|
|
gchar *sel_name, *tgt_name, *prop_name;
|
|
|
|
g_return_if_fail (display == _gdk_display);
|
|
|
|
GDK_NOTE (DND,
|
|
(sel_name = gdk_atom_name (selection),
|
|
tgt_name = gdk_atom_name (target),
|
|
prop_name = gdk_atom_name (property),
|
|
g_print ("gdk_selection_send_notify: %#x %#x (%s) %#x (%s) %#x (%s)\n",
|
|
requestor,
|
|
(guint) selection, sel_name,
|
|
(guint) target, tgt_name,
|
|
(guint) property, prop_name),
|
|
g_free (sel_name),
|
|
g_free (tgt_name),
|
|
g_free (prop_name)));
|
|
}
|
|
|
|
/* It's hard to say whether implementing this actually is of any use
|
|
* on the Win32 platform? gtk calls only
|
|
* gdk_text_property_to_utf8_list_for_display().
|
|
*/
|
|
gint
|
|
gdk_text_property_to_text_list_for_display (GdkDisplay *display,
|
|
GdkAtom encoding,
|
|
gint format,
|
|
const guchar *text,
|
|
gint length,
|
|
gchar ***list)
|
|
{
|
|
GError *error = NULL;
|
|
gchar *enc_name;
|
|
gchar *result;
|
|
const gchar *charset;
|
|
const gchar *source_charset = NULL;
|
|
|
|
g_return_val_if_fail (display == _gdk_display, 0);
|
|
|
|
GDK_NOTE (DND, (enc_name = gdk_atom_name (encoding),
|
|
g_print ("gdk_text_property_to_text_list: %s %d %.20s %d\n",
|
|
enc_name, format, text, length),
|
|
g_free (enc_name)));
|
|
|
|
if (!list)
|
|
return 0;
|
|
|
|
if (encoding == GDK_TARGET_STRING)
|
|
source_charset = "ISO-8859-1";
|
|
else if (encoding == _utf8_string)
|
|
source_charset = "UTF-8";
|
|
else
|
|
source_charset = gdk_atom_name (encoding);
|
|
|
|
g_get_charset (&charset);
|
|
|
|
result = g_convert (text, length, charset, source_charset,
|
|
NULL, NULL, &error);
|
|
if (!result)
|
|
{
|
|
g_error_free (error);
|
|
return 0;
|
|
}
|
|
|
|
*list = g_new (gchar *, 1);
|
|
**list = result;
|
|
|
|
return 1;
|
|
}
|
|
|
|
void
|
|
gdk_free_text_list (gchar **list)
|
|
{
|
|
g_return_if_fail (list != NULL);
|
|
|
|
g_free (*list);
|
|
g_free (list);
|
|
}
|
|
|
|
static gint
|
|
make_list (const gchar *text,
|
|
gint length,
|
|
gboolean latin1,
|
|
gchar ***list)
|
|
{
|
|
GSList *strings = NULL;
|
|
gint n_strings = 0;
|
|
gint i;
|
|
const gchar *p = text;
|
|
const gchar *q;
|
|
GSList *tmp_list;
|
|
GError *error = NULL;
|
|
|
|
while (p < text + length)
|
|
{
|
|
gchar *str;
|
|
|
|
q = p;
|
|
while (*q && q < text + length)
|
|
q++;
|
|
|
|
if (latin1)
|
|
{
|
|
str = g_convert (p, q - p,
|
|
"UTF-8", "ISO-8859-1",
|
|
NULL, NULL, &error);
|
|
|
|
if (!str)
|
|
{
|
|
g_warning ("Error converting selection from STRING: %s",
|
|
error->message);
|
|
g_error_free (error);
|
|
}
|
|
}
|
|
else
|
|
str = g_strndup (p, q - p);
|
|
|
|
if (str)
|
|
{
|
|
strings = g_slist_prepend (strings, str);
|
|
n_strings++;
|
|
}
|
|
|
|
p = q + 1;
|
|
}
|
|
|
|
if (list)
|
|
*list = g_new (gchar *, n_strings + 1);
|
|
|
|
(*list)[n_strings] = NULL;
|
|
|
|
i = n_strings;
|
|
tmp_list = strings;
|
|
while (tmp_list)
|
|
{
|
|
if (list)
|
|
(*list)[--i] = tmp_list->data;
|
|
else
|
|
g_free (tmp_list->data);
|
|
|
|
tmp_list = tmp_list->next;
|
|
}
|
|
|
|
g_slist_free (strings);
|
|
|
|
return n_strings;
|
|
}
|
|
|
|
gint
|
|
gdk_text_property_to_utf8_list_for_display (GdkDisplay *display,
|
|
GdkAtom encoding,
|
|
gint format,
|
|
const guchar *text,
|
|
gint length,
|
|
gchar ***list)
|
|
{
|
|
g_return_val_if_fail (text != NULL, 0);
|
|
g_return_val_if_fail (length >= 0, 0);
|
|
g_return_val_if_fail (display == _gdk_display, 0);
|
|
|
|
if (encoding == GDK_TARGET_STRING)
|
|
{
|
|
return make_list ((gchar *)text, length, TRUE, list);
|
|
}
|
|
else if (encoding == _utf8_string)
|
|
{
|
|
return make_list ((gchar *)text, length, FALSE, list);
|
|
}
|
|
else
|
|
{
|
|
g_warning ("gdk_text_property_to_utf8_list_for_display: encoding %s not handled\n", gdk_atom_name (encoding));
|
|
|
|
if (list)
|
|
*list = NULL;
|
|
|
|
return 0;
|
|
}
|
|
}
|
|
|
|
gint
|
|
gdk_string_to_compound_text_for_display (GdkDisplay *display,
|
|
const gchar *str,
|
|
GdkAtom *encoding,
|
|
gint *format,
|
|
guchar **ctext,
|
|
gint *length)
|
|
{
|
|
g_return_val_if_fail (str != NULL, 0);
|
|
g_return_val_if_fail (length >= 0, 0);
|
|
g_return_val_if_fail (display == _gdk_display, 0);
|
|
|
|
GDK_NOTE (DND, g_print ("gdk_string_to_compound_text_for_display: %.20s\n", str));
|
|
|
|
/* Always fail on Win32. No COMPOUND_TEXT support. */
|
|
|
|
if (encoding)
|
|
*encoding = GDK_NONE;
|
|
|
|
if (format)
|
|
*format = 0;
|
|
|
|
if (ctext)
|
|
*ctext = NULL;
|
|
|
|
if (length)
|
|
*length = 0;
|
|
|
|
return -1;
|
|
}
|
|
|
|
gchar *
|
|
gdk_utf8_to_string_target (const gchar *str)
|
|
{
|
|
return _gdk_utf8_to_string_target_internal (str, strlen (str));
|
|
}
|
|
|
|
gboolean
|
|
gdk_utf8_to_compound_text_for_display (GdkDisplay *display,
|
|
const gchar *str,
|
|
GdkAtom *encoding,
|
|
gint *format,
|
|
guchar **ctext,
|
|
gint *length)
|
|
{
|
|
g_return_val_if_fail (str != NULL, FALSE);
|
|
g_return_val_if_fail (display == _gdk_display, FALSE);
|
|
|
|
GDK_NOTE (DND, g_print ("gdk_utf8_to_compound_text_for_display: %.20s\n", str));
|
|
|
|
/* Always fail on Win32. No COMPOUND_TEXT support. */
|
|
|
|
if (encoding)
|
|
*encoding = GDK_NONE;
|
|
|
|
if (format)
|
|
*format = 0;
|
|
|
|
if (ctext)
|
|
*ctext = NULL;
|
|
|
|
if (length)
|
|
*length = 0;
|
|
|
|
return FALSE;
|
|
}
|
|
|
|
void
|
|
gdk_free_compound_text (guchar *ctext)
|
|
{
|
|
/* As we never generate anything claimed to be COMPOUND_TEXT, this
|
|
* should never be called. Or if it is called, ctext should be the
|
|
* NULL returned for conversions to COMPOUND_TEXT above.
|
|
*/
|
|
g_return_if_fail (ctext == NULL);
|
|
}
|