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)
{
  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)
{
  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)
{
  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, 80, "%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.21
Committed:	Thu Oct 9 07:35:43 2008 UTC (15 years, 7 months ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.20:	+13 -11 lines
Log Message:	* empty log message *
#	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	return g_slist_prepend (0, gtk_file_chooser_get_filename (chooser));
62	}
63
64	gboolean gtk_file_chooser_set_current_folder (GtkFileChooser chooser, const gchar folder)
65	{
66	DEBUG ((printf ("gtk_file_chooser_set_current_folder<%s>\n", folder)))
67	g_free (last_filename); last_filename = 0;
68	return 1;
69	}
70
71	gchar * gtk_file_chooser_get_current_folder (GtkFileChooser *chooser)
72	{
73	DEBUG ((printf ("gtk_file_chooser_get_current_folder\n")))
74	g_free (last_filename); last_filename = 0;
75	return g_strdup ("/tmp/gtkbfc");
76	}
77
78	/////////////////////////////////////////////////////////////////////////////
79
80	static const gchar *
81	from_uri (const gchar *uri)
82	{
83	const gchar *rv = uri;
84
85	if (!strncmp (uri, "file:///", sizeof ("file:///") - 1))
86	rv += sizeof ("file:///") - 1;
87
88	return rv;
89	}
90
91	static gchar *
92	to_uri (gchar *file)
93	{
94	gchar *rv = NULL;
95
96	if (file)
97	{
98	GString *str = g_string_new ("file://");
99	str = g_string_append (str, file);
100	rv = g_strdup (str->str);
101	g_string_free (str, TRUE);
102	g_free (file);
103	}
104
105	return rv;
106	}
107
108	static GSList *
109	to_uris (GSList *files)
110	{
111	GSList *item = files;
112
113	for (; item; item = g_slist_next (item))
114	{
115	GString *str = g_string_new ("file://");
116	gchar *cur = item->data;
117
118	str = g_string_append (str, cur);
119	item->data = g_string_free (str, FALSE);
120	g_free (cur);
121	}
122
123	return files;
124	}
125
126	gchar gtk_file_chooser_get_uri (GtkFileChooser chooser)
127	{
128	gchar *uri = to_uri(gtk_file_chooser_get_filename (chooser));
129	DEBUG ((printf ("gtk_file_chooser_get_uri<%s>\n", uri)))
130	return uri;
131	}
132
133	gboolean gtk_file_chooser_set_uri (GtkFileChooser chooser, const char uri)
134	{
135	return gtk_file_chooser_set_filename (chooser, from_uri (uri));
136	}
137
138	GSList gtk_file_chooser_get_uris (GtkFileChooser chooser)
139	{
140	return to_uris (gtk_file_chooser_get_filenames (chooser));
141	}
142
143	gboolean gtk_file_chooser_set_current_folder_uri(GtkFileChooser chooser, const gchar uri)
144	{
145	return gtk_file_chooser_set_current_folder (chooser, from_uri (uri));
146	}
147
148	gchar gtk_file_chooser_get_current_folder_uri (GtkFileChooser chooser)
149	{
150	return to_uri (gtk_file_chooser_get_current_folder (chooser));
151	}
152
153	/////////////////////////////////////////////////////////////////////////////
154
155	static gboolean disable_cb (gpointer data)
156	{
157	((void ()(void , const char *)) dlsym (RTLD_NEXT, "gtk_file_chooser_set_filename"))(GTK_FILE_CHOOSER (data), "/tmp/gtkbfc/empty");
158
159	GtkWidget *toplevel = gtk_widget_get_toplevel (data);
160	if (toplevel) gtk_widget_set_sensitive (toplevel, 0);
161
162	gtk_widget_unref (data);
163	return FALSE;
164	}
165
166	static gboolean read_result (GIOChannel *source, GIOCondition condition, gpointer data)
167	{
168	g_free (last_path); last_path = 0;
169
170	g_io_channel_read_to_end (source, &last_path, 0, 0);
171	g_io_channel_unref (source);
172
173	GtkWidget *toplevel = gtk_widget_get_toplevel (data);
174	if (toplevel) gtk_widget_set_sensitive (toplevel, 1);
175
176	if (!last_path \|\| *last_path != '/')
177	{
178	DEBUG ((printf ("read_result cancel\n")))
179	g_free (last_path);
180	last_path = 0;
181
182	if (toplevel)
183	{
184	GdkEvent ev = { GDK_DELETE };
185	g_signal_emit_by_name (toplevel, "delete-event", &ev);
186	}
187	}
188	else
189	{
190	DEBUG ((printf ("read_result<%s>\n", last_path)))
191	gtk_file_chooser_set_do_overwrite_confirmation (GTK_FILE_CHOOSER (data), FALSE);
192	g_signal_emit_by_name (GTK_FILE_CHOOSER (data), "file-activated");
193	}
194
195	gtk_widget_unref (data);
196	return FALSE;
197	}
198
199	static gboolean map_cb (GtkWidget *widget, gpointer user_data)
200	{
201	gchar *argv[10];
202	gboolean save = 0;
203	char xid [40];
204
205	argv [0] = helper;
206
207	switch (gtk_file_chooser_get_action (GTK_FILE_CHOOSER (widget)))
208	{
209	case GTK_FILE_CHOOSER_ACTION_SAVE: argv [1] = "save "; save = 1;break;
210	case GTK_FILE_CHOOSER_ACTION_OPEN: argv [1] = "load "; break;
211	case GTK_FILE_CHOOSER_ACTION_CREATE_FOLDER: argv [1] = "mkdir "; save = 1; break;
212	case GTK_FILE_CHOOSER_ACTION_SELECT_FOLDER: argv [1] = "cd "; break;
213	default: argv [1] = "<unknown action> "; break;
214	}
215
216	GdkWindow *w = gtk_widget_get_parent_window (GTK_WIDGET (widget));
217
218	snprintf (xid, 80, "%lu", (unsigned long)(w ? gdk_x11_drawable_get_xid (w) : 0));
219	argv [2] = xid;
220	argv [3] = last_filename; // may be 0
221	argv [4] = 0;
222
223	mkdir ("/tmp/gtkbfc", 0777);
224	close (open ("/tmp/gtkbfc/empty", O_WRONLY\|O_CREAT\|O_TRUNC, 0666));
225
226	((void ()(void , const char *)) dlsym (RTLD_NEXT, "gtk_file_chooser_set_filename"))(GTK_FILE_CHOOSER (widget), "/tmp/gtkbfc/empty");
227
228	gint stdout_fd = -1;
229
230	gtk_widget_ref (widget); disable_cb (widget);
231
232	if (g_spawn_async_with_pipes (0, argv, 0, 0, 0, 0, 0, 0, &stdout_fd, 0, 0))
233	{
234	GIOChannel *channel = g_io_channel_unix_new (stdout_fd);
235
236	gtk_widget_ref (widget); g_io_add_watch (channel, G_IO_IN \| G_IO_ERR \| G_IO_HUP, read_result, widget);
237
238	// disable again in an idle handler, to get around race conditions
239	gtk_widget_ref (widget); g_idle_add (disable_cb, widget);
240	}
241	}
242
243	static GObject new_constructor (GType type, guint n_construct_properties, GObjectConstructParam construct_properties)
244	{
245	GObject *ob = old_constructor (type, n_construct_properties, construct_properties);
246	g_signal_connect_after (ob, "map", G_CALLBACK (map_cb), 0);
247	return ob;
248	}
249
250	__attribute__ ((constructor))
251	static void init ()
252	{
253	g_type_init ();
254
255	GType type = GTK_TYPE_FILE_CHOOSER_WIDGET;
256	GObjectClass *klass = g_type_class_ref (type);
257
258	old_constructor = klass->constructor;
259	klass->constructor = new_constructor;
260	}
261