HGKeeper

* Purple Plugin Pack

* See ../AUTHORS for a list of all authors

* eight_ball: Provides Magic 8-ball-like functionality

* This program is free software; you can redistribute it and/or

* modify it under the terms of the GNU General Public License

* as published by the Free Software Foundation; either version 2

* of the License, or (at your option) any later version.

* This program is distributed in the hope that it will be useful,

* but WITHOUT ANY WARRANTY; without even the implied warranty of

* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the

* GNU General Public License for more details.

* You should have received a copy of the GNU General Public License

* along with this program; if not, write to the Free Software

* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.

#include "../common/pp_internal.h"

/* libc */

#include <ctype.h>

#include <stdlib.h>

#include <string.h>

#include <time.h>

/* Purple */

#include <cmds.h>

#include <conversation.h>

#include <debug.h>

#include <plugin.h>

/* TODO: add to these, but be careful NOT to use real 8-ball messages!!! */

static const gchar *eight_ball_strings[] = {

"Unclear",

"Certainly",

"Ask again later",

"Not likely",

"It's possible",

};

/* feel free to add */

static const gchar *sg_ball_strings[] = {

"Indeed",

"I got nothin\'",

"Ask me tomorrow", /* from "Window of Opportunity" */

"According to quantum physics, it's theoretically possible...",

"That's what you get for dickin' around", /* from "Fallout" */

"Jaffa! Cree!",

"Tec ma te",

"Kneel before your god!",

"I believe a medical attack could be successful."

};

static const gchar *fullcrap_strings[] = {

"you are only fullcrap",

"this is only fooling blabber",

"thats nots really nice",

"Oh I at all do not understand a pancake about what you here talk.",

"it shall be visible will be?",

"it becomes a complex rainbow of confusion."

};

static PurpleCmdId eight_ball_cmd_id = 0,

sg_ball_cmd_id = 0,

fullcrap_cmd_id = 0;

static PurpleCmdRet

eight_ball_cmd_func(PurpleConversation *conv, const gchar *cmd, gchar **args,

gchar *error, void *data)

{

GString *msgstr = NULL;

gchar *msgprefix = NULL;

const gchar **msgs = NULL;

gint numstrings = 0, index = 0;

msgstr = g_string_new("");

srand(time(NULL));

if(!strcmp(cmd, "sgball")) {

numstrings = sizeof(sg_ball_strings) / sizeof(sg_ball_strings[0]);

msgprefix = "The Purple Stargate Ball says";

msgs = sg_ball_strings;

} else if(!strcmp(cmd, "fullcrap")) {

numstrings = sizeof(fullcrap_strings) / sizeof(fullcrap_strings[0]);

msgprefix = "The Purple Fullcrap Ball says";

msgs = fullcrap_strings;

} else {

numstrings = sizeof(eight_ball_strings) / sizeof(eight_ball_strings[0]);

msgprefix = "The Purple 8 Ball says";

msgs = eight_ball_strings;

}

if(*args == NULL || args[0] == NULL)

index = rand() % numstrings;

else

index = atoi(args[0]);

if(index < 0)

index *= -1;

if(index > numstrings)

index %= numstrings;

g_string_append_printf(msgstr, "%s: %s", msgprefix, msgs[index]);

switch(purple_conversation_get_type(conv)) {

case PURPLE_CONV_TYPE_IM:

purple_conv_im_send(PURPLE_CONV_IM(conv), msgstr->str);

break;

case PURPLE_CONV_TYPE_CHAT:

purple_conv_chat_send(PURPLE_CONV_CHAT(conv), msgstr->str);

break;

default:

g_string_free(msgstr, TRUE);

return PURPLE_CMD_RET_FAILED;

}

g_string_free(msgstr, TRUE);

return PURPLE_CMD_RET_OK;

}

static gboolean

plugin_load(PurplePlugin *plugin)

{

const gchar *eight_ball_help, *sg_ball_help, *fullcrap_help;

eight_ball_help = _("8ball: sends a random 8ball message");

sg_ball_help = _("sgball: sends a random Stargate Ball message");

fullcrap_help = _("fullcrap: sends random fooling blabber");

eight_ball_cmd_id = purple_cmd_register("8ball", "w", PURPLE_CMD_P_PLUGIN,

PURPLE_CMD_FLAG_IM | PURPLE_CMD_FLAG_CHAT |

PURPLE_CMD_FLAG_ALLOW_WRONG_ARGS, NULL,

PURPLE_CMD_FUNC(eight_ball_cmd_func),

eight_ball_help, NULL);

sg_ball_cmd_id = purple_cmd_register("sgball", "w", PURPLE_CMD_P_PLUGIN,

PURPLE_CMD_FLAG_IM | PURPLE_CMD_FLAG_CHAT |

PURPLE_CMD_FLAG_ALLOW_WRONG_ARGS, NULL,

PURPLE_CMD_FUNC(eight_ball_cmd_func),

sg_ball_help, NULL);

fullcrap_cmd_id = purple_cmd_register("fullcrap", "w", PURPLE_CMD_P_PLUGIN,

PURPLE_CMD_FLAG_IM | PURPLE_CMD_FLAG_CHAT |

PURPLE_CMD_FLAG_ALLOW_WRONG_ARGS, NULL,

PURPLE_CMD_FUNC(eight_ball_cmd_func),

fullcrap_help, NULL);

return TRUE;

}

static gboolean

plugin_unload(PurplePlugin *plugin)

{

purple_cmd_unregister(eight_ball_cmd_id);

purple_cmd_unregister(sg_ball_cmd_id);

return TRUE;

}

static PurplePluginInfo eight_ball_info =

{

PURPLE_PLUGIN_MAGIC, /* Do you believe in magic? */

PURPLE_MAJOR_VERSION,

PURPLE_MINOR_VERSION,

PURPLE_PLUGIN_STANDARD,

NULL,

PURPLE_PRIORITY_DEFAULT,

"core-plugin_pack-eight_ball",

NULL,

PP_VERSION,

NULL,

"John Bailey <rekkanoryo@rekkanoryo.org>",

PP_WEBSITE,

plugin_load,

plugin_unload,

NULL,

NULL

};

static void

init_plugin(PurplePlugin *plugin)

{

#ifdef ENABLE_NLS

bindtextdomain(GETTEXT_PACKAGE, PP_LOCALEDIR);

bind_textdomain_codeset(GETTEXT_PACKAGE, "UTF-8");

#endif /* ENABLE_NLS */

eight_ball_info.name = _("Magic 8 Ball");

eight_ball_info.summary = _("Provides Magic 8-ball like functionality");

eight_ball_info.description = _("Provides Magic 8-ball like functionality "

"with the /8ball command, as well as similar "

"functionality for common Stargate words or "

"phrases with the /sg-ball command.");

return;

}

PURPLE_INIT_PLUGIN(eight_ball, init_plugin, eight_ball_info)

pidgin/purple-plugin-pack