plugins/perl/common/Plugin.xs

Thu, 18 Aug 2005 01:35:14 +0000

author
John H. Kelm <johnkelm@gmail.com>
date
Thu, 18 Aug 2005 01:35:14 +0000
changeset 11290
136722ebf145
parent 11170
d8941580d87f
child 12788
0d00c65ec73e
permissions
-rw-r--r--

[gaim-migrate @ 13490]
Did some house cleaning on the code finished up some of the "TODO" stuff
that was left over from when I originally did the XSUBs. Furthermore,
the dynamically loaded Perl package problems should be corrected now that
the context is set before one of the concurrent perl interpreters is run.

#include "module.h"

MODULE = Gaim::Plugin  PACKAGE = Gaim::Plugin  PREFIX = gaim_plugin_
PROTOTYPES: ENABLE

void 
gaim_plugin_destroy(plugin)
	Gaim::Plugin plugin

void 
gaim_plugin_ipc_unregister(plugin, command)
	Gaim::Plugin plugin
	const char *command

void 
gaim_plugin_ipc_unregister_all(plugin)
	Gaim::Plugin plugin

gboolean 
gaim_plugin_is_loaded(plugin)
	Gaim::Plugin plugin

gboolean 
gaim_plugin_load(plugin)
	Gaim::Plugin plugin

Gaim::Plugin
gaim_plugin_new(native, path)
	gboolean native
	const char *path

Gaim::Plugin
gaim_plugin_probe(filename)
	const char *filename

gboolean 
gaim_plugin_register(plugin)
	Gaim::Plugin plugin

gboolean 
gaim_plugin_reload(plugin)
	Gaim::Plugin plugin

gboolean 
gaim_plugin_unload(plugin)
	Gaim::Plugin plugin




MODULE = Gaim::Plugin  PACKAGE = Gaim::Plugins  PREFIX = gaim_plugins_
PROTOTYPES: ENABLE


void 
gaim_plugins_add_search_path(path)
	const char *path

void 
gaim_plugins_destroy_all()
 

gboolean 
gaim_plugins_enabled()
 

Gaim::Plugin
gaim_plugins_find_with_basename(basename)
	const char *basename

Gaim::Plugin
gaim_plugins_find_with_filename(filename)
	const char *filename

Gaim::Plugin
gaim_plugins_find_with_id(id)
	const char *id

Gaim::Plugin
gaim_plugins_find_with_name(name)
	const char *name

void
gaim_plugins_get_all()
PREINIT:
        GList *l;
PPCODE:
        for (l = gaim_plugins_get_all(); l != NULL; l = l->next) {
                XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::PTR")));
        }
 

void *
gaim_plugins_get_handle()
 

void
gaim_plugins_get_loaded()
PREINIT:
        GList *l;
PPCODE:
        for (l = gaim_plugins_get_loaded(); l != NULL; l = l->next) {
                XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::PTR")));
        }
 

void
gaim_plugins_get_protocols()
PREINIT:
        GList *l;
PPCODE:
        for (l = gaim_plugins_get_protocols(); l != NULL; l = l->next) {
                XPUSHs(sv_2mortal(gaim_perl_bless_object(l->data, "Gaim::PTR")));
        }
 

void 
gaim_plugins_init()
 

void 
gaim_plugins_load_saved(key)
	const char *key

void 
gaim_plugins_probe(ext)
	const char *ext

void 
gaim_plugins_uninit()
 

void 
gaim_plugins_unload_all()

mercurial