X-Git-Url: http://git.harvie.cz/?a=blobdiff_plain;f=plugins%2Fpidgin-plugins%2Fcore-answerscripts%2Fanswerscripts.c;fp=plugins%2Fpidgin-plugins%2Fcore-answerscripts%2Fanswerscripts.c;h=51c49338e3aec3ef6e15d09190f814c87a2a1537;hb=6c6cc56619080a102e2c44555746aaf7321debd1;hp=0000000000000000000000000000000000000000;hpb=0a076ca80e0c3c127bcc286633f8cd40bf52c038;p=mirrors%2FPrograms.git

diff --git a/plugins/pidgin-plugins/core-answerscripts/answerscripts.c b/plugins/pidgin-plugins/core-answerscripts/answerscripts.c
new file mode 100755
index 0000000..51c4933
--- /dev/null
+++ b/plugins/pidgin-plugins/core-answerscripts/answerscripts.c
@@ -0,0 +1,106 @@
+#define PURPLE_PLUGINS
+
+/* Purple headers */
+#include <libpurple/debug.h>
+#include <libpurple/version.h>
+#include <libpurple/conversation.h>
+#include <libpurple/debug.h>
+#include <libpurple/log.h>
+#include <libpurple/plugin.h>
+#include <libpurple/pluginpref.h>
+#include <libpurple/prefs.h>
+#include <libpurple/signals.h>
+#include <libpurple/util.h>
+#include <libpurple/notify.h>
+
+#include <stdio.h>
+#include <stdlib.h>
+
+#define RESPONSE_LINE_LENGTH 4096
+#define HOOK_SCRIPT "answerscripts.exe"
+
+char *buff = NULL;
+char *hook_script = NULL;
+char response[RESPONSE_LINE_LENGTH+1];
+int i;
+
+static void
+received_im_msg_cb(PurpleAccount * account, char *who, char *buffer,
+PurpleConversation * conv, PurpleMessageFlags flags,
+void *data) {
+	/* A workaround to avoid skipping of the first message as a result on NULL-conv: */
+	if (conv == NULL) conv = purple_conversation_new(PURPLE_CONV_TYPE_IM, account, who);
+
+	buff = purple_markup_strip_html(buffer);
+	//printf("\nHarvie received: %s: %s\n", who, buff); //debug
+	//purple_conv_im_send(purple_conversation_get_im_data(conv), ":-*"); //debug
+
+	setenv("PURPLE_FROM", who, 1);
+	setenv("PURPLE_MSG", buff, 1);
+
+	FILE* pipe = popen(hook_script, "r"); //TODO: process scripts and send response asynchronously
+	while (pipe && fgets(response, RESPONSE_LINE_LENGTH, pipe)) {
+		for(i=0;response[i];i++) if(response[i]=='\n') response[i]=0;
+		purple_conv_im_send(purple_conversation_get_im_data(conv), response);
+	}
+	pclose(pipe);
+}
+
+
+static gboolean plugin_load(PurplePlugin * plugin) {
+	asprintf(&hook_script,"%s/%s",purple_user_dir(),HOOK_SCRIPT);
+
+	void *conv_handle = purple_conversations_get_handle();
+
+	purple_signal_connect(conv_handle, "received-im-msg",
+			      plugin, PURPLE_CALLBACK(received_im_msg_cb),
+			      NULL);
+	return TRUE;
+}
+
+static gboolean plugin_unload(PurplePlugin * plugin) {
+	free(hook_script);
+	return TRUE;
+}
+
+static PurplePluginInfo info = {
+	PURPLE_PLUGIN_MAGIC,
+	PURPLE_MAJOR_VERSION,
+	PURPLE_MINOR_VERSION,
+	PURPLE_PLUGIN_STANDARD,
+	NULL,
+	0,
+	NULL,
+	PURPLE_PRIORITY_DEFAULT,
+
+	"core-answerscripts",
+	"AnswerScripts",
+	"0.1",
+	"Framework for writing various hooks for libpurple clients",
+	"This plugin will call ~/.purple/" HOOK_SCRIPT " (or wherever purple_user_dir() points) "
+		"script (or any executable) for each single message called."
+		"Envinronment values PURPLE_MSG and PURPLE_FROM will be set to carry "
+		"informations about message text and sender so script can respond to that message. "
+		"Any text printed to STDOUT by the script will be sent back as answer to message. "
+		"Please see example scripts for more informations...",
+	"Harvie <harvie@email.cz>",
+	"http://github.com/harvie",
+
+	plugin_load,
+	plugin_unload,
+	NULL,
+	NULL,
+	NULL,
+	NULL,
+	NULL,
+	NULL,
+	NULL,
+	NULL,
+	NULL
+};
+
+static void init_plugin(PurplePlugin * plugin) {
+
+}
+
+PURPLE_INIT_PLUGIN(autoanswer, init_plugin, info)