/*

 *  Module "urlregex"   -- Display received URL in the log window

 *

 * Copyright 2011 Mikael Berthe <mikael@lilotux.net>

 * Copyright 2008 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/logprint.h>

#include <mcabber/commands.h>

#include <mcabber/compl.h>

#include <mcabber/hooks.h>

#include <mcabber/screen.h>

#include <mcabber/settings.h>

#include <mcabber/modules.h>

#include <mcabber/config.h>

static void urlregex_init   (void);

static void urlregex_uninit (void);

/* Module description */

module_info_t info_urlregex = {

        .branch          = MCABBER_BRANCH,

        .api             = MCABBER_API_VERSION,

        .version         = MCABBER_VERSION,

        .description     = "Simple URL extractor\n"

                           " Displays URL in the log window.",

        .requires        = NULL,

        .init            = urlregex_init,

        .uninit          = urlregex_uninit,

        .next            = NULL,

};

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

#ifdef HAVE_GLIB_REGEX

static GRegex *url_regex = NULL;

#endif

/* Helper function */

#ifdef HAVE_GLIB_REGEX

static inline void scr_log_urls(const gchar *string)

{

  GMatchInfo *match_info;

  g_regex_match_full(url_regex, string, -1, 0, 0, &match_info, NULL);

  while (g_match_info_matches(match_info)) {

    gchar *url = g_match_info_fetch(match_info, 0);

    scr_print_logwindow(url);

    g_free(url);

    g_match_info_next(match_info, NULL);

  }

  g_match_info_free(match_info);

}

#endif

/* Event handler */

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

{

#ifdef HAVE_GLIB_REGEX

  if (url_regex) {

    int i;

    const char *msg = NULL;

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

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

        msg = args[i].value;

        break;

      }

    }

    if (msg)

      scr_log_urls(msg);

  }

#endif

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

  return HOOK_HANDLER_RESULT_ALLOW_MORE_HANDLERS;

}

/* Initialization */

static void urlregex_init(void)

{

  if (settings_opt_get("url_regex")) {

#ifdef HAVE_GLIB_REGEX

    url_regex = g_regex_new(settings_opt_get("url_regex"),

                            G_REGEX_OPTIMIZE, 0, NULL);

    /* Add handler

     * We are only interested in incoming message events

     */

    urlregex_hid = hk_add_handler(urlregex_hh, HOOK_POST_MESSAGE_IN,

                                  G_PRIORITY_DEFAULT_IDLE, NULL);

#else

    scr_log_print(LPRINT_LOGNORM, "ERROR: Your glib version is too old, "

                  "cannot use url_regex.");

#endif // HAVE_GLIB_REGEX

  }

}

/* Uninitialization */

static void urlregex_uninit(void)

{

  /* Unregister event handler */

  hk_del_handler(HOOK_POST_MESSAGE_IN, urlregex_hid);

#ifdef HAVE_GLIB_REGEX

  if (url_regex) {

    g_regex_unref(url_regex);

    url_regex = NULL;

  }

#endif

}

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