gtk2/gdk/x11/gdktextlistconverter-x11.c
2020-07-25 00:47:36 +02:00

371 lines
12 KiB
C

/* GIO - GLib Input, Output and Streaming Library
*
* Copyright (C) 2017 Red Hat, Inc.
*
* 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.1 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, see <http://www.gnu.org/licenses/>.
*
* Author: Benjamin Otte <otte@gnome.org>
*/
#include "config.h"
#include "gdktextlistconverter-x11.h"
#include "gdkintl.h"
#include "gdkprivate-x11.h"
#define GDK_X11_TEXT_LIST_CONVERTER_CLASS(k) (G_TYPE_CHECK_CLASS_CAST((k), GDK_TYPE_X11_TEXT_LIST_CONVERTER, GdkX11TextListConverterClass))
#define GDK_IS_X11_TEXT_LIST_CONVERTER_CLASS(k) (G_TYPE_CHECK_CLASS_TYPE ((k), GDK_TYPE_X11_TEXT_LIST_CONVERTER))
#define GDK_X11_TEXT_LIST_CONVERTER_GET_CLASS(o) (G_TYPE_INSTANCE_GET_CLASS ((o), GDK_TYPE_X11_TEXT_LIST_CONVERTER, GdkX11TextListConverterClass))
typedef struct _GdkX11TextListConverterClass GdkX11TextListConverterClass;
struct _GdkX11TextListConverter
{
GObject parent_instance;
GdkDisplay *display;
const char *encoding; /* interned */
int format;
guint encoder : 1;
};
struct _GdkX11TextListConverterClass
{
GObjectClass parent_class;
};
static GConverterResult
write_output (void *outbuf,
gsize outbuf_size,
gsize *bytes_written,
const void *data,
gssize len,
GError **error)
{
if (len < 0)
len = strlen (data) + 1;
if (outbuf_size < len)
{
g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_NO_SPACE,
_("Not enough space in destination"));
return G_CONVERTER_ERROR;
}
memcpy (outbuf, data, len);
*bytes_written = len;
return G_CONVERTER_FINISHED;
}
static GConverterResult
gdk_x11_text_list_converter_decode (GdkX11TextListConverter *conv,
const void *inbuf,
gsize inbuf_size,
void *outbuf,
gsize outbuf_size,
GConverterFlags flags,
gsize *bytes_read,
gsize *bytes_written,
GError **error)
{
int count;
char **list;
if (!(flags & G_CONVERTER_INPUT_AT_END))
{
g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_PARTIAL_INPUT,
_("Need complete input to do conversion"));
return G_CONVERTER_ERROR;
}
count = _gdk_x11_display_text_property_to_utf8_list (conv->display,
conv->encoding,
conv->format,
inbuf,
inbuf_size,
&list);
if (count < 0)
{
/* XXX: add error handling from gdkselection-x11.c */
g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_NO_SPACE,
_("Not enough space in destination"));
return G_CONVERTER_ERROR;
}
else if (count == 0)
{
*bytes_read = inbuf_size;
return write_output (outbuf, outbuf_size, bytes_written, "", 1, error);
}
else
{
GConverterResult result;
result = write_output (outbuf, outbuf_size, bytes_written, list[0], -1, error);
g_strfreev (list);
*bytes_read = inbuf_size;
return result;
}
}
/* 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
*/
char *
gdk_x11_utf8_to_string_target (const char *utf8_str,
gboolean return_latin1)
{
int len = strlen (utf8_str);
GString *result = g_string_sized_new (len);
const char *p = utf8_str;
while (*p)
{
if (*p == '\r')
{
p++;
if (*p == '\n')
p++;
g_string_append_c (result, '\n');
}
else
{
gunichar ch = g_utf8_get_char (p);
if (!((ch < 0x20 && ch != '\t' && ch != '\n') || (ch >= 0x7f && ch < 0xa0)))
{
if (return_latin1)
{
if (ch <= 0xff)
g_string_append_c (result, ch);
else
g_string_append_printf (result,
ch < 0x10000 ? "\\u%04x" : "\\U%08x",
ch);
}
else
{
char buf[7];
int buflen;
buflen = g_unichar_to_utf8 (ch, buf);
g_string_append_len (result, buf, buflen);
}
}
p = g_utf8_next_char (p);
}
}
return g_string_free (result, FALSE);
}
static GConverterResult
gdk_x11_text_list_converter_encode (GdkX11TextListConverter *conv,
const void *inbuf,
gsize inbuf_size,
void *outbuf,
gsize outbuf_size,
GConverterFlags flags,
gsize *bytes_read,
gsize *bytes_written,
GError **error)
{
if (!(flags & G_CONVERTER_INPUT_AT_END))
{
g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_PARTIAL_INPUT,
_("Need complete input to do conversion"));
return G_CONVERTER_ERROR;
}
if (g_str_equal (conv->encoding, "STRING") ||
g_str_equal (conv->encoding, "TEXT"))
{
GConverterResult result;
char *tmp, *latin1;
tmp = g_strndup (inbuf, inbuf_size);
latin1 = gdk_x11_utf8_to_string_target (tmp, TRUE);
g_free (tmp);
if (latin1)
{
result = write_output (outbuf, outbuf_size, bytes_written, latin1, -1, error);
g_free (latin1);
}
else
{
g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_INVALID_DATA,
_("Invalid byte sequence in conversion input"));
result = G_CONVERTER_ERROR;
}
return result;
}
else if (g_str_equal (conv->encoding, "COMPOUND_TEXT"))
{
GConverterResult result;
guchar *text;
const char *encoding;
int format;
int new_length;
char *tmp;
tmp = g_strndup (inbuf, inbuf_size);
if (gdk_x11_display_utf8_to_compound_text (conv->display, tmp,
&encoding, &format, &text, &new_length))
{
if (g_str_equal (encoding, conv->encoding) &&
format == conv->format)
{
result = write_output (outbuf, outbuf_size, bytes_written, text, new_length, error);
}
else
{
g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_FAILED,
_("Invalid formats in compound text conversion."));
result = G_CONVERTER_ERROR;
}
gdk_x11_free_compound_text (text);
}
else
{
g_set_error_literal (error, G_IO_ERROR, G_IO_ERROR_INVALID_DATA,
_("Invalid byte sequence in conversion input"));
result = G_CONVERTER_ERROR;
}
g_free (tmp);
return result;
}
else
{
g_set_error (error, G_IO_ERROR, G_IO_ERROR_FAILED,
_("Unsupported encoding “%s”"), conv->encoding);
return G_CONVERTER_ERROR;
}
return FALSE;
}
static GConverterResult
gdk_x11_text_list_converter_convert (GConverter *converter,
const void *inbuf,
gsize inbuf_size,
void *outbuf,
gsize outbuf_size,
GConverterFlags flags,
gsize *bytes_read,
gsize *bytes_written,
GError **error)
{
GdkX11TextListConverter *conv = GDK_X11_TEXT_LIST_CONVERTER (converter);
if (conv->encoder)
{
return gdk_x11_text_list_converter_encode (conv,
inbuf, inbuf_size,
outbuf, outbuf_size,
flags,
bytes_read, bytes_written,
error);
}
else
{
return gdk_x11_text_list_converter_decode (conv,
inbuf, inbuf_size,
outbuf, outbuf_size,
flags,
bytes_read, bytes_written,
error);
}
}
static void
gdk_x11_text_list_converter_reset (GConverter *converter)
{
}
static void
gdk_x11_text_list_converter_iface_init (GConverterIface *iface)
{
iface->convert = gdk_x11_text_list_converter_convert;
iface->reset = gdk_x11_text_list_converter_reset;
}
G_DEFINE_TYPE_WITH_CODE (GdkX11TextListConverter, gdk_x11_text_list_converter, G_TYPE_OBJECT,
G_IMPLEMENT_INTERFACE (G_TYPE_CONVERTER,
gdk_x11_text_list_converter_iface_init))
static void
gdk_x11_text_list_converter_finalize (GObject *object)
{
GdkX11TextListConverter *conv = GDK_X11_TEXT_LIST_CONVERTER (object);
g_object_unref (conv->display);
G_OBJECT_CLASS (gdk_x11_text_list_converter_parent_class)->finalize (object);
}
static void
gdk_x11_text_list_converter_class_init (GdkX11TextListConverterClass *klass)
{
GObjectClass *object_class = G_OBJECT_CLASS (klass);
object_class->finalize = gdk_x11_text_list_converter_finalize;
}
static void
gdk_x11_text_list_converter_init (GdkX11TextListConverter *local)
{
}
GConverter *
gdk_x11_text_list_converter_to_utf8_new (GdkDisplay *display,
const char *encoding,
int format)
{
GdkX11TextListConverter *conv;
conv = g_object_new (GDK_TYPE_X11_TEXT_LIST_CONVERTER, NULL);
conv->display = g_object_ref (display);
conv->encoding = g_intern_string (encoding);
conv->format = format;
return G_CONVERTER (conv);
}
GConverter *
gdk_x11_text_list_converter_from_utf8_new (GdkDisplay *display,
const char *encoding,
int format)
{
GdkX11TextListConverter *conv;
conv = g_object_new (GDK_TYPE_X11_TEXT_LIST_CONVERTER, NULL);
conv->display = g_object_ref (display);
conv->encoding = g_intern_string (encoding);
conv->format = format;
conv->encoder = TRUE;
return G_CONVERTER (conv);
}