/* libquvi
 * Copyright (C) 2012,2013  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/gi18n-lib.h>
#include <glib.h>
#include <string.h>

#include "quvi.h"
/* -- */
#include "_quvi_s.h"
#include "_quvi_media_s.h"
#include "_quvi_net_s.h"
#include "_quvi_script_s.h"
/* -- */
#include "misc/match_media_script.h"
#include "misc/resolve.h"
#include "misc/media.h"
#include "net/handle.h"
#include "lua/exec.h"

static gboolean _chk_goto_url(_quvi_media_t qm)
{
  if (qm->url.redirect_to->len >0)
    {
      g_string_assign(qm->url.input, qm->url.redirect_to->str);
      g_string_assign(qm->url.redirect_to, "");
      return (TRUE);
    }
  return (FALSE);
}

extern QuviError l_match_url_to_media_script(_quvi_media_t, GSList**);
extern const gchar *show_script; /* m_scan_scripts */

typedef QuviMatchMediaScriptMode _qm_mode;

QuviError m_match_media_script(_quvi_t q, _quvi_media_t *qm,
                               const gchar *url, const _qm_mode mode)
{
  gboolean resolve_flag;
  QuviError rc;
  GSList *s;

  resolve_flag = (mode != QM_MATCH_MS_SUPPORTED_OFFLINE)
                 ? TRUE
                 : FALSE;

  if (*qm == NULL)
    *qm = m_media_new(q, url);

  if (resolve_flag == TRUE) /* Resolve URL redirection. */
    {
      m_resolve(q, (*qm)->url.input);
      if (quvi_ok(q) == QUVI_FALSE)
        return (q->status.rc);
    }

  rc = l_match_url_to_media_script(*qm, &s);
  if (rc == QUVI_ERROR_NO_SUPPORT)
    {
      static const gchar *_E =
        N_("No support: %s: Could not find a media script for URL");

      g_string_printf(q->status.errmsg, g_dgettext(GETTEXT_PACKAGE, _E), url);
      return (rc);
    }
  else if (rc != QUVI_OK)
    return (rc);

  if (show_script != NULL && strlen(show_script) >0)
    {
      const _quvi_script_t qs = (const _quvi_script_t) s->data;

      g_message("[%s] libquvi: %s: input URL accepted",
                __func__, qs->fpath->str);
    }

  switch (mode)
    {
    case QM_MATCH_MS_PARSE:
      rc = l_exec_media_script_parse(*qm, s);
      if (rc == QUVI_OK)
        {
          /* Check if goto_url was set. */
          if (_chk_goto_url(*qm) == TRUE)
            return (m_match_media_script(q, qm, url, mode));
        }
      break;

    case QM_MATCH_MS_SUPPORTED_OFFLINE:
    case QM_MATCH_MS_SUPPORTED_ONLINE:
      break;
    }
  return (rc);
}

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