/* libquvi

 * Copyright (C) 2012  Toni Gundogdu <legatvs@gmail.com>

 *

 * This file is part of libquvi <http://quvi.sourceforge.net/>.

 *

 * This library is free software: you can redistribute it and/or

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

 * License as published by the Free Software Foundation, either

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

 *

 * This library 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 Affero General Public License for more details.

 *

 * You should have received a copy of the GNU Affero General

 * Public License along with this library.  If not, see

 * <http://www.gnu.org/licenses/>.

 */

#include "config.h"

#include <glib.h>

#define _W "libquvi: %s: %s"

gchar *m_capture(const gchar *s, const gchar *p)

{

  GMatchInfo *m;

  GError *err;

  GRegex *re;

  gchar *r;

  err = NULL;

  re = g_regex_new(p, G_REGEX_MULTILINE, 0, &err;;

  if (err != NULL)

    {

      g_warning(_W, __func__, err->message);

      g_error_free(err);

      err = NULL;

      return (NULL);

    }

  m = NULL;

  r = NULL;

  if (g_regex_match(re, s, 0, &m) == TRUE)

    r = g_match_info_fetch(m, 1);

  g_match_info_free(m);

  m = NULL;

  g_regex_unref(re);

  re = NULL;

  return (r);

}

/* vim: set ts=2 sw=2 tw=72 expandtab: */