/*

 *  Module "ignore_auth" -- ignore subscription requests

 *

 * Copyright 2010 Frank Zschockelt <mcabber@freakysoft.de>

 *

 * This module 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, see <http://www.gnu.org/licenses/>.

 */

#include <string.h>

#include <mcabber/commands.h>

#include <mcabber/hooks.h>

#include <mcabber/modules.h>

#include <mcabber/screen.h>

#include <mcabber/settings.h>

#include <mcabber/xmpp.h>

static void ignore_auth_init   (void);

static void ignore_auth_uninit (void);

/* Module description */

module_info_t info_ignore_auth = {

        .branch          = MCABBER_BRANCH,

        .api             = MCABBER_API_VERSION,

        .version         = MCABBER_VERSION,

        .description     = "ignore auth requests by specifying a jid regex",

        .requires        = NULL,

        .init            = ignore_auth_init,

        .uninit          = ignore_auth_uninit,

        .next            = NULL,

};

#ifdef MCABBER_API_HAVE_CMD_ID

static gpointer ignoreauth_cmdid;

#endif

GSList *regexlist = NULL;

static guint ignore_auth_hid = 0;  /* Hook handler id */

static guint ignore_hh(const gchar *hookname, hk_arg_t *args, gpointer userdata)

{

  guint subscription;

  const char *bjid = NULL, *type = NULL, *msg = NULL;

  if (settings_opt_get_int("ignore_auth")) {

    int i;

    for (i = 0; args[i].name; i++) {

      if (!strcmp(args[i].name, "type"))

        type = args[i].value;

      if (!strcmp(args[i].name, "message"))

        msg = args[i].value;

      if (!strcmp(args[i].name, "jid"))

        bjid = args[i].value;

    }

    /* shouldn't happen */

    if (!bjid || !type || !msg)

      return HOOK_HANDLER_RESULT_ALLOW_MORE_HANDLERS;

    subscription = roster_getsubscription(bjid);

    /* only ignore subscription requests when no subscription exists */

    if ((subscription == sub_none) && (!strcmp(type, "subscribe"))) {

      GSList *head;

      int ignore_it = FALSE;

      /* try to match against one of our regular expressions */

      for (head = regexlist; head && !ignore_it; head = g_slist_next(head)) {

        GMatchInfo *match_info;

        g_regex_match(head->data, bjid, 0, &match_info);

        if (g_match_info_matches(match_info))

          ignore_it = TRUE;

        g_match_info_free (match_info);

      }

      if(ignore_it) {

        xmpp_send_s10n(bjid, LM_MESSAGE_SUB_TYPE_UNSUBSCRIBED);

        scr_log_print(LPRINT_NORMAL, "Ignored auth request from %s (%s)",

                      bjid, msg);

        return HOOK_HANDLER_RESULT_NO_MORE_HANDLER_DROP_DATA;

      }

    }

  }

  /* we're done, let the other handlers do their job! */

  return HOOK_HANDLER_RESULT_ALLOW_MORE_HANDLERS;

}

/* ignore command handler */

static void do_ignore_auth(char *args)

{

  GRegex *new_regex;

  if (!args || !*args) {

    GSList *head;

    for (head = regexlist; head; head = g_slist_next(head))

      scr_log_print(LPRINT_NORMAL, "Ignoring %s",

                    g_regex_get_pattern(head->data));

    return;

  }

  new_regex = g_regex_new(args, G_REGEX_OPTIMIZE, 0, NULL);

  if (!new_regex) {

    scr_log_print(LPRINT_NORMAL, "That wasn't a glib regex");

    return;

  }

  regexlist = g_slist_append(regexlist, new_regex);

}

/* Initialization */

static void ignore_auth_init(void)

{

  /* Add command */

#ifdef MCABBER_API_HAVE_CMD_ID

  ignoreauth_cmdid = cmd_add("ignore_auth", "", 0, 0, do_ignore_auth, NULL);

#else

  cmd_add("ignore_auth", "", 0, 0, do_ignore_auth, NULL);

#endif

  /* Add handler */

  ignore_auth_hid = hk_add_handler(ignore_hh, HOOK_SUBSCRIPTION,

                                   G_PRIORITY_DEFAULT_IDLE, NULL);

  settings_set(SETTINGS_TYPE_OPTION, "ignore_auth", "1");

}

/* Uninitialization */

static void ignore_auth_uninit(void)

{

  GSList *head;

  /* Unregister command */

#ifdef MCABBER_API_HAVE_CMD_ID

  cmd_del(ignoreauth_cmdid);

#else

  cmd_del("ignore_auth");

#endif

  /* Unregister event handler */

  hk_del_handler(HOOK_SUBSCRIPTION, ignore_auth_hid);

  /* unref every regex */

  for (head = regexlist; head; head = g_slist_next(head))

    g_regex_unref(head->data);

  g_slist_free(regexlist);

  regexlist = NULL;

}

/* vim: set et cindent cinoptions=>2\:2(0 ts=2 sw=2:  For Vim users... */