gtkbfc/gtkbfc.c

/* this file is published under the gnu gpl license, version 3 or any later */

#define _GNU_SOURCE

#include <dlfcn.h>
#include <glib.h>
#include <gtk/gtk.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>

static const char gtkbfc_version_string[] = "gtkbfc version 0.1";

static char *helper = "/etc/gtkbfc-helper";

static GObject *(*old_constructor) (GType type, guint n_construct_properties, GObjectConstructParam *construct_properties);

static gchar *last_path;
static gchar *last_filename;

#if 1
# define DEBUG(stmt) stmt;
#else
# define DEBUG(stmt)
#endif

/////////////////////////////////////////////////////////////////////////////

gchar *gtk_file_chooser_get_filename (GtkFileChooser *chooser)
{
  DEBUG ((printf ("gtk_file_chooser_get_filename<%s>\n", last_path)))
  return g_strdup (last_path ? last_path : "/nonex1st4nt");
}

gboolean gtk_file_chooser_select_filename (GtkFileChooser *chooser, const char *filename)
{
  return 1;
}

void gtk_file_chooser_unselect_all (GtkFileChooser *chooser)
{
}

gboolean gtk_file_chooser_set_filename (GtkFileChooser *chooser, const char *filename)
{
  DEBUG ((printf ("gtk_file_chooser_set_filename<%s>\n", filename)))
  g_free (last_filename); last_filename = g_strdup (filename);
  return 1;
}

void gtk_file_chooser_set_current_name (GtkFileChooser *chooser, const char *filename)
{
  DEBUG ((printf ("gtk_file_chooser_set_current_name<%s>\n", filename)))
}

GSList *gtk_file_chooser_get_filenames (GtkFileChooser *chooser)
{
  DEBUG ((printf ("gtk_file_chooser_get_filenames\n")))
  return g_slist_prepend (0, gtk_file_chooser_get_filename (chooser));
}

gboolean gtk_file_chooser_set_current_folder (GtkFileChooser *chooser, const gchar *folder)
{
  DEBUG ((printf ("gtk_file_chooser_set_current_folder<%s>\n", folder)))
  g_free (last_filename); last_filename = 0;
  return 1;
}

gchar * gtk_file_chooser_get_current_folder (GtkFileChooser *chooser)
{
  DEBUG ((printf ("gtk_file_chooser_get_current_folder\n")))
  g_free (last_filename); last_filename = 0;
  return g_strdup ("/tmp/gtkbfc");
}

/////////////////////////////////////////////////////////////////////////////

static const gchar *
from_uri (const gchar *uri)
{
  const gchar *rv = uri;

  if (!strncmp (uri, "file:///", sizeof ("file:///") - 1))
    rv += sizeof ("file:///") - 1;

  return rv;
}

static gchar *
to_uri (gchar *file)
{
  gchar *rv = NULL;

  if (file)
    {
      GString *str = g_string_new ("file://");
      str = g_string_append (str, file);
      rv = g_strdup (str->str);
      g_string_free (str, TRUE);
      g_free (file);
    }

  return rv;
}

static GSList *
to_uris (GSList *files)
{
  GSList *item = files;

  for (; item; item = g_slist_next (item))
    {
      GString *str = g_string_new ("file://");
      gchar *cur = item->data;

      str = g_string_append (str, cur);
      item->data = g_string_free (str, FALSE);
      g_free (cur);
    }

  return files;
}

gchar *gtk_file_chooser_get_uri (GtkFileChooser *chooser)
{
  gchar *uri = to_uri(gtk_file_chooser_get_filename (chooser));
  DEBUG ((printf ("gtk_file_chooser_get_uri<%s>\n", uri)))
  return uri;
}

gboolean gtk_file_chooser_set_uri (GtkFileChooser *chooser, const char *uri)
{
  return gtk_file_chooser_set_filename (chooser, from_uri (uri));
}

GSList *gtk_file_chooser_get_uris (GtkFileChooser *chooser)
{
  DEBUG ((printf ("gtk_file_chooser_get_uris\n")))
  return to_uris (gtk_file_chooser_get_filenames (chooser));
}

gboolean gtk_file_chooser_set_current_folder_uri(GtkFileChooser *chooser, const gchar *uri)
{
  return gtk_file_chooser_set_current_folder (chooser, from_uri (uri));
}

gchar *gtk_file_chooser_get_current_folder_uri (GtkFileChooser *chooser)
{
  DEBUG ((printf ("gtk_file_chooser_get_current_folder\n")))
  return to_uri (gtk_file_chooser_get_current_folder (chooser));
}

/////////////////////////////////////////////////////////////////////////////

static gboolean disable_cb (gpointer data)
{
  ((void (*)(void *, const char *)) dlsym (RTLD_NEXT, "gtk_file_chooser_set_filename"))(GTK_FILE_CHOOSER (data), "/tmp/gtkbfc/empty");

  GtkWidget *toplevel = gtk_widget_get_toplevel (data);
  if (toplevel) gtk_widget_set_sensitive (toplevel, 0);

  gtk_widget_unref (data);
  return FALSE;
}

static gboolean read_result (GIOChannel *source, GIOCondition condition, gpointer data)
{
  g_free (last_path); last_path = 0;

  g_io_channel_read_to_end (source, &last_path, 0, 0);
  g_io_channel_unref (source);

  GtkWidget *toplevel = gtk_widget_get_toplevel (data);
  if (toplevel) gtk_widget_set_sensitive (toplevel, 1);

  if (!last_path || *last_path != '/')
    {
      DEBUG ((printf ("read_result cancel\n")))
      g_free (last_path);
      last_path = 0;

      if (toplevel)
        {
          GdkEvent ev = { GDK_DELETE };
          g_signal_emit_by_name (toplevel, "delete-event", &ev);
        }
    }
  else
    {
      DEBUG ((printf ("read_result<%s>\n", last_path)));
      gtk_file_chooser_set_do_overwrite_confirmation (GTK_FILE_CHOOSER (data), FALSE);
      g_signal_emit_by_name (GTK_FILE_CHOOSER (data), "file-activated");
    }

  gtk_widget_unref (data);
  return FALSE;
}

static gboolean map_cb (GtkWidget *widget, gpointer user_data) 
{
  gchar *argv[10];
  gboolean save = 0;
  char xid [40];

  argv [0] = helper;

  switch (gtk_file_chooser_get_action (GTK_FILE_CHOOSER (widget)))
    {
      case GTK_FILE_CHOOSER_ACTION_SAVE:          argv [1] = "save "; save = 1;break;
      case GTK_FILE_CHOOSER_ACTION_OPEN:          argv [1] = "load "; break;
      case GTK_FILE_CHOOSER_ACTION_CREATE_FOLDER: argv [1] = "mkdir "; save = 1; break;
      case GTK_FILE_CHOOSER_ACTION_SELECT_FOLDER: argv [1] = "cd "; break;
      default: argv [1] = "<unknown action> "; break;
    }

  GdkWindow *w = gtk_widget_get_parent_window (GTK_WIDGET (widget));

  snprintf (xid, 40, "%lu", (unsigned long)(w ? gdk_x11_drawable_get_xid (w) : 0));
  argv [2] = xid;
  argv [3] = last_filename; // may be 0
  argv [4] = 0;

  mkdir ("/tmp/gtkbfc", 0777);
  close (open ("/tmp/gtkbfc/empty", O_WRONLY|O_CREAT|O_TRUNC, 0666));

  ((void (*)(void *, const char *)) dlsym (RTLD_NEXT, "gtk_file_chooser_set_filename"))(GTK_FILE_CHOOSER (widget), "/tmp/gtkbfc/empty");

  gint stdout_fd = -1;

  gtk_widget_ref (widget); disable_cb (widget);

  if (g_spawn_async_with_pipes (0, argv, 0, 0, 0, 0, 0, 0, &stdout_fd, 0, 0))
    {
      GIOChannel *channel = g_io_channel_unix_new (stdout_fd);

      gtk_widget_ref (widget); g_io_add_watch (channel, G_IO_IN  | G_IO_ERR | G_IO_HUP, read_result, widget);

      // disable again in an idle handler, to get around race conditions
      gtk_widget_ref (widget); g_idle_add (disable_cb, widget);
    }
}

static GObject *new_constructor (GType type, guint n_construct_properties, GObjectConstructParam *construct_properties)
{
  GObject *ob = old_constructor (type, n_construct_properties, construct_properties);
  g_signal_connect_after (ob, "map", G_CALLBACK (map_cb), 0);
  return ob;
}

__attribute__ ((constructor))
static void init ()
{
  g_type_init ();

  GType type = GTK_TYPE_FILE_CHOOSER_WIDGET;
  GObjectClass *klass = g_type_class_ref (type);

  old_constructor = klass->constructor;
  klass->constructor = new_constructor;
}

Revision:	1.22
Committed:	Tue Jun 29 17:18:28 2010 UTC (15 years, 8 months ago) by root
Content type:	text/plain
Branch:	MAIN
CVS Tags:	HEAD
Changes since 1.21:	+5 -2 lines
Log Message:	µikachu
#	Content
1	/* this file is published under the gnu gpl license, version 3 or any later */
2
3	#define _GNU_SOURCE
4
5	#include <dlfcn.h>
6	#include <glib.h>
7	#include <gtk/gtk.h>
8	#include <stdlib.h>
9	#include <string.h>
10	#include <unistd.h>
11	#include <sys/types.h>
12	#include <sys/stat.h>
13	#include <fcntl.h>
14
15	static const char gtkbfc_version_string[] = "gtkbfc version 0.1";
16
17	static char *helper = "/etc/gtkbfc-helper";
18
19	static GObject (old_constructor) (GType type, guint n_construct_properties, GObjectConstructParam *construct_properties);
20
21	static gchar *last_path;
22	static gchar *last_filename;
23
24	#if 1
25	# define DEBUG(stmt) stmt;
26	#else
27	# define DEBUG(stmt)
28	#endif
29
30	/////////////////////////////////////////////////////////////////////////////
31
32	gchar gtk_file_chooser_get_filename (GtkFileChooser chooser)
33	{
34	DEBUG ((printf ("gtk_file_chooser_get_filename<%s>\n", last_path)))
35	return g_strdup (last_path ? last_path : "/nonex1st4nt");
36	}
37
38	gboolean gtk_file_chooser_select_filename (GtkFileChooser chooser, const char filename)
39	{
40	return 1;
41	}
42
43	void gtk_file_chooser_unselect_all (GtkFileChooser *chooser)
44	{
45	}
46
47	gboolean gtk_file_chooser_set_filename (GtkFileChooser chooser, const char filename)
48	{
49	DEBUG ((printf ("gtk_file_chooser_set_filename<%s>\n", filename)))
50	g_free (last_filename); last_filename = g_strdup (filename);
51	return 1;
52	}
53
54	void gtk_file_chooser_set_current_name (GtkFileChooser chooser, const char filename)
55	{
56	DEBUG ((printf ("gtk_file_chooser_set_current_name<%s>\n", filename)))
57	}
58
59	GSList gtk_file_chooser_get_filenames (GtkFileChooser chooser)
60	{
61	DEBUG ((printf ("gtk_file_chooser_get_filenames\n")))
62	return g_slist_prepend (0, gtk_file_chooser_get_filename (chooser));
63	}
64
65	gboolean gtk_file_chooser_set_current_folder (GtkFileChooser chooser, const gchar folder)
66	{
67	DEBUG ((printf ("gtk_file_chooser_set_current_folder<%s>\n", folder)))
68	g_free (last_filename); last_filename = 0;
69	return 1;
70	}
71
72	gchar * gtk_file_chooser_get_current_folder (GtkFileChooser *chooser)
73	{
74	DEBUG ((printf ("gtk_file_chooser_get_current_folder\n")))
75	g_free (last_filename); last_filename = 0;
76	return g_strdup ("/tmp/gtkbfc");
77	}
78
79	/////////////////////////////////////////////////////////////////////////////
80
81	static const gchar *
82	from_uri (const gchar *uri)
83	{
84	const gchar *rv = uri;
85
86	if (!strncmp (uri, "file:///", sizeof ("file:///") - 1))
87	rv += sizeof ("file:///") - 1;
88
89	return rv;
90	}
91
92	static gchar *
93	to_uri (gchar *file)
94	{
95	gchar *rv = NULL;
96
97	if (file)
98	{
99	GString *str = g_string_new ("file://");
100	str = g_string_append (str, file);
101	rv = g_strdup (str->str);
102	g_string_free (str, TRUE);
103	g_free (file);
104	}
105
106	return rv;
107	}
108
109	static GSList *
110	to_uris (GSList *files)
111	{
112	GSList *item = files;
113
114	for (; item; item = g_slist_next (item))
115	{
116	GString *str = g_string_new ("file://");
117	gchar *cur = item->data;
118
119	str = g_string_append (str, cur);
120	item->data = g_string_free (str, FALSE);
121	g_free (cur);
122	}
123
124	return files;
125	}
126
127	gchar gtk_file_chooser_get_uri (GtkFileChooser chooser)
128	{
129	gchar *uri = to_uri(gtk_file_chooser_get_filename (chooser));
130	DEBUG ((printf ("gtk_file_chooser_get_uri<%s>\n", uri)))
131	return uri;
132	}
133
134	gboolean gtk_file_chooser_set_uri (GtkFileChooser chooser, const char uri)
135	{
136	return gtk_file_chooser_set_filename (chooser, from_uri (uri));
137	}
138
139	GSList gtk_file_chooser_get_uris (GtkFileChooser chooser)
140	{
141	DEBUG ((printf ("gtk_file_chooser_get_uris\n")))
142	return to_uris (gtk_file_chooser_get_filenames (chooser));
143	}
144
145	gboolean gtk_file_chooser_set_current_folder_uri(GtkFileChooser chooser, const gchar uri)
146	{
147	return gtk_file_chooser_set_current_folder (chooser, from_uri (uri));
148	}
149
150	gchar gtk_file_chooser_get_current_folder_uri (GtkFileChooser chooser)
151	{
152	DEBUG ((printf ("gtk_file_chooser_get_current_folder\n")))
153	return to_uri (gtk_file_chooser_get_current_folder (chooser));
154	}
155
156	/////////////////////////////////////////////////////////////////////////////
157
158	static gboolean disable_cb (gpointer data)
159	{
160	((void ()(void , const char *)) dlsym (RTLD_NEXT, "gtk_file_chooser_set_filename"))(GTK_FILE_CHOOSER (data), "/tmp/gtkbfc/empty");
161
162	GtkWidget *toplevel = gtk_widget_get_toplevel (data);
163	if (toplevel) gtk_widget_set_sensitive (toplevel, 0);
164
165	gtk_widget_unref (data);
166	return FALSE;
167	}
168
169	static gboolean read_result (GIOChannel *source, GIOCondition condition, gpointer data)
170	{
171	g_free (last_path); last_path = 0;
172
173	g_io_channel_read_to_end (source, &last_path, 0, 0);
174	g_io_channel_unref (source);
175
176	GtkWidget *toplevel = gtk_widget_get_toplevel (data);
177	if (toplevel) gtk_widget_set_sensitive (toplevel, 1);
178
179	if (!last_path \|\| *last_path != '/')
180	{
181	DEBUG ((printf ("read_result cancel\n")))
182	g_free (last_path);
183	last_path = 0;
184
185	if (toplevel)
186	{
187	GdkEvent ev = { GDK_DELETE };
188	g_signal_emit_by_name (toplevel, "delete-event", &ev);
189	}
190	}
191	else
192	{
193	DEBUG ((printf ("read_result<%s>\n", last_path)));
194	gtk_file_chooser_set_do_overwrite_confirmation (GTK_FILE_CHOOSER (data), FALSE);
195	g_signal_emit_by_name (GTK_FILE_CHOOSER (data), "file-activated");
196	}
197
198	gtk_widget_unref (data);
199	return FALSE;
200	}
201
202	static gboolean map_cb (GtkWidget *widget, gpointer user_data)
203	{
204	gchar *argv[10];
205	gboolean save = 0;
206	char xid [40];
207
208	argv [0] = helper;
209
210	switch (gtk_file_chooser_get_action (GTK_FILE_CHOOSER (widget)))
211	{
212	case GTK_FILE_CHOOSER_ACTION_SAVE: argv [1] = "save "; save = 1;break;
213	case GTK_FILE_CHOOSER_ACTION_OPEN: argv [1] = "load "; break;
214	case GTK_FILE_CHOOSER_ACTION_CREATE_FOLDER: argv [1] = "mkdir "; save = 1; break;
215	case GTK_FILE_CHOOSER_ACTION_SELECT_FOLDER: argv [1] = "cd "; break;
216	default: argv [1] = "<unknown action> "; break;
217	}
218
219	GdkWindow *w = gtk_widget_get_parent_window (GTK_WIDGET (widget));
220
221	snprintf (xid, 40, "%lu", (unsigned long)(w ? gdk_x11_drawable_get_xid (w) : 0));
222	argv [2] = xid;
223	argv [3] = last_filename; // may be 0
224	argv [4] = 0;
225
226	mkdir ("/tmp/gtkbfc", 0777);
227	close (open ("/tmp/gtkbfc/empty", O_WRONLY\|O_CREAT\|O_TRUNC, 0666));
228
229	((void ()(void , const char *)) dlsym (RTLD_NEXT, "gtk_file_chooser_set_filename"))(GTK_FILE_CHOOSER (widget), "/tmp/gtkbfc/empty");
230
231	gint stdout_fd = -1;
232
233	gtk_widget_ref (widget); disable_cb (widget);
234
235	if (g_spawn_async_with_pipes (0, argv, 0, 0, 0, 0, 0, 0, &stdout_fd, 0, 0))
236	{
237	GIOChannel *channel = g_io_channel_unix_new (stdout_fd);
238
239	gtk_widget_ref (widget); g_io_add_watch (channel, G_IO_IN \| G_IO_ERR \| G_IO_HUP, read_result, widget);
240
241	// disable again in an idle handler, to get around race conditions
242	gtk_widget_ref (widget); g_idle_add (disable_cb, widget);
243	}
244	}
245
246	static GObject new_constructor (GType type, guint n_construct_properties, GObjectConstructParam construct_properties)
247	{
248	GObject *ob = old_constructor (type, n_construct_properties, construct_properties);
249	g_signal_connect_after (ob, "map", G_CALLBACK (map_cb), 0);
250	return ob;
251	}
252
253	__attribute__ ((constructor))
254	static void init ()
255	{
256	g_type_init ();
257
258	GType type = GTK_TYPE_FILE_CHOOSER_WIDGET;
259	GObjectClass *klass = g_type_class_ref (type);
260
261	old_constructor = klass->constructor;
262	klass->constructor = new_constructor;
263	}
264