diff gtk/plugins/perl/common/GtkConvWin.xs @ 14416:eeca8be382a5

[gaim-migrate @ 17124] This is a Gaim::Gtk perl module for use by gaim plugins to get access to the gtkgaim interface functions. It isn't complete because anything dealing with Gtk widgets themselves doesn't work yet (I need to figure out the best way to do that). To use this a perl plugin just needs to include 'use Gaim::Gtk;' either on top of 'use Gaim;' or instead of it. I'm not done with this yet. At the moment you have to 'use Gaim;' or 'use Gaim::Gtk;' which loads all the parts, I'm planning to let you actually say 'use Gaim::Gtk::Debug;' to just get the gtkdebug.h functions. Though 'use Gaim' would work the same way as always. committer: Tailor Script <[e-mail]>

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/gtk/plugins/perl/common/GtkConvWin.xs	Sat Sep 02 05:31:10 2006 +0000
@@ -0,0 +1,139 @@
+#include "gtkmodule.h"
+
+MODULE = Gaim::Gtk::Conversation::Window  PACKAGE = Gaim::Gtk::Conversation::Window  PREFIX = gaim_gtk_conv_window_
+PROTOTYPES: ENABLE
+
+Gaim::Gtk::Conversation::Window
+gaim_gtk_conv_window_new()
+
+void
+gaim_gtk_conv_window_destroy(win)
+	Gaim::Gtk::Conversation::Window win
+
+void
+gaim_gtk_conv_window_show(win)
+	Gaim::Gtk::Conversation::Window win
+
+void
+gaim_gtk_conv_window_hide(win)
+	Gaim::Gtk::Conversation::Window win
+
+void
+gaim_gtk_conv_window_raise(win)
+	Gaim::Gtk::Conversation::Window win
+
+void
+gaim_gtk_conv_window_switch_gtkconv(win, gtkconv)
+	Gaim::Gtk::Conversation::Window win
+	Gaim::Gtk::Conversation gtkconv
+
+void
+gaim_gtk_conv_window_add_gtkconv(win, gtkconv)
+	Gaim::Gtk::Conversation::Window win
+	Gaim::Gtk::Conversation gtkconv
+
+void
+gaim_gtk_conv_window_remove_gtkconv(win, gtkconv)
+	Gaim::Gtk::Conversation::Window win
+	Gaim::Gtk::Conversation gtkconv
+
+Gaim::Gtk::Conversation
+gaim_gtk_conv_window_get_gtkconv_at_index(win, index)
+	Gaim::Gtk::Conversation::Window win
+	int index
+
+Gaim::Gtk::Conversation
+gaim_gtk_conv_window_get_active_gtkconv(win)
+	Gaim::Gtk::Conversation::Window win
+
+Gaim::Conversation
+gaim_gtk_conv_window_get_active_conversation(win)
+	Gaim::Gtk::Conversation::Window win
+
+gboolean
+gaim_gtk_conv_window_is_active_conversation(conv)
+	Gaim::Conversation conv
+
+gboolean
+gaim_gtk_conv_window_has_focus(win)
+	Gaim::Gtk::Conversation::Window win
+
+Gaim::Gtk::Conversation::Window
+gaim_gtk_conv_window_get_at_xy(x, y)
+	int x
+	int y
+
+void
+gaim_gtk_conv_window_get_gtkconvs(win)
+	Gaim::Gtk::Conversation::Window win
+PREINIT:
+	GList *l;
+PPCODE:
+	for (l = gaim_gtk_conv_window_get_gtkconvs(win); l != NULL; l = l->next) {
+		XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::Gtk::Conversation")));
+	}
+
+guint
+gaim_gtk_conv_window_get_gtkconv_count(win)
+	Gaim::Gtk::Conversation::Window win
+
+Gaim::Gtk::Conversation::Window
+gaim_gtk_conv_window_first_with_type(type)
+	Gaim::ConversationType type
+
+Gaim::Gtk::Conversation::Window
+gaim_gtk_conv_window_last_with_type(type)
+	Gaim::ConversationType type
+
+MODULE = Gaim::Gtk::Conversation::Window  PACKAGE = Gaim::Gtk::Conversation::Placement  PREFIX = gaim_gtkconv_placement_
+PROTOTYPES: ENABLE
+
+void
+gaim_gtkconv_placement_get_options()
+PREINIT:
+	GList *l;
+PPCODE:
+	for (l = gaim_gtkconv_placement_get_options(); l != NULL; l = l->next) {
+		XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::Gtk::Conversation::Window")));
+	}
+
+void
+gaim_gtkconv_placement_add_fnc(id, name, fnc)
+	const char * id
+	const char * name
+	Gaim::Conversation::PlacementFunc fnc
+
+void
+gaim_gtkconv_placement_remove_fnc(id)
+	const char * id
+
+const char *
+gaim_gtkconv_placement_get_name(id)
+	const char * id
+
+Gaim::Conversation::PlacementFunc
+gaim_gtkconv_placement_get_fnc(id)
+	const char * id
+
+void
+gaim_gtkconv_placement_set_current_func(func)
+	Gaim::Conversation::PlacementFunc func
+
+Gaim::Conversation::PlacementFunc
+gaim_gtkconv_placement_get_current_func()
+
+void
+gaim_gtkconv_placement_place(gtkconv)
+	Gaim::Gtk::Conversation gtkconv
+
+MODULE = Gaim::Gtk::Conversation::Window  PACKAGE = Gaim::Gtk::Conversation::Windows  PREFIX = gaim_gtk_conv_windows_
+PROTOTYPES: ENABLE
+
+void
+gaim_gtk_conv_windows_get_list()
+PREINIT:
+	GList *l;
+PPCODE:
+	for (l = gaim_gtk_conv_windows_get_list(); l != NULL; l = l->next) {
+		XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::Gtk::Conversation::Window")));
+	}