/*
 * sslinfo - Gets info about your currently loaded ssl plugin
 * Copyright (C) 2004-2008 Gary Kramlich <grim@reaperworld.com>
 *
 * 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., 51 Franklin Street, Fifth Floor, Boston, MA 02111-1301, USA.
 */

/* If you can't figure out what this line is for, DON'T TOUCH IT. */
#include "../common/pp_internal.h"

#include <string.h>

#include <notify.h>
#include <plugin.h>

static PurplePlugin *my_plugin = NULL;

static PurplePlugin *
sslinfo_find_ssl_plugin() {
	PurplePlugin *plugin, *ssl_plugin = NULL;
	GList *l;

	for(l = purple_plugins_get_all(); l; l = l->next) {
		plugin = (PurplePlugin *)l->data;

		if(plugin == my_plugin)
			continue;

		if(plugin->info && plugin->info->id &&
		   !strncmp(plugin->info->id, "ssl-", 4))
		{
			if(purple_plugin_is_loaded(plugin) || purple_plugin_load(plugin)) {
				ssl_plugin = plugin;
				break;
			}
		}
	}

	return ssl_plugin;
}

static void
sslinfo_show(PurplePluginAction *action) {
	PurplePlugin *ssl_plugin = NULL;
	GString *text = NULL;
	gchar *escaped = NULL;

	text = g_string_new("");

	ssl_plugin = sslinfo_find_ssl_plugin();
	if(ssl_plugin && ssl_plugin->info) {
		if(ssl_plugin->info->name) {
			escaped = g_markup_escape_text(ssl_plugin->info->name,
										   strlen(ssl_plugin->info->name));
			g_string_append_printf(text, _("<b>Name:</b> %s<br>"), escaped);
			g_free(escaped);
		}

		if(ssl_plugin->info->version) {
			escaped = g_markup_escape_text(ssl_plugin->info->version,
										   strlen(ssl_plugin->info->version));
			g_string_append_printf(text, _("<b>Version:</b> %s<br>"), escaped);
			g_free(escaped);
		}

		if(ssl_plugin->info->author) {
			escaped = g_markup_escape_text(ssl_plugin->info->author,
										   strlen(ssl_plugin->info->author));
			g_string_append_printf(text, _("<b>Author:</b> %s<br>"), escaped);
			g_free(escaped);
		}
	}

	purple_notify_formatted(action->plugin, _("SSL Info"), _("SSL Info"), NULL,
						  text->str, NULL, NULL);

	g_string_free(text, TRUE);
}

static GList *
sslinfo_actions(PurplePlugin *plugin, gpointer context) {
	GList *l = NULL;
	PurplePluginAction *act = NULL;

	act = purple_plugin_action_new(_("Get SSL info"), sslinfo_show);
	l = g_list_append(l, act);

	return l;
}

static PurplePluginInfo info = {
	PURPLE_PLUGIN_MAGIC,
	PURPLE_MAJOR_VERSION,
	PURPLE_MINOR_VERSION,
	PURPLE_PLUGIN_STANDARD,
	NULL,
	0,
	NULL,
	PURPLE_PRIORITY_DEFAULT,

	"core-plugin_pack-sslinfo",
	NULL,
	PP_VERSION,
	NULL,
	NULL,
	"Gary Kramlich <grim@reaperworld.com>",
	PP_WEBSITE,

	NULL,
	NULL,
	NULL,

	NULL,
	NULL,
	NULL,
	sslinfo_actions,
	NULL,
	NULL,
	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 */

	info.name = _("SSL Info");
	info.summary = _("Displays info about your currently loaded SSL plugin");
	info.description = _("Displays info about your currently loaded SSL plugin.");

	my_plugin = plugin;
}

PURPLE_INIT_PLUGIN(sslinfo, init_plugin, info)
