/* 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/gi18n-lib.h>

#include <glib.h>

#include <curl/curl.h>

#include "quvi.h"

/* -- */

#include "_quvi_s.h"

#include "_quvi_net_resolve_s.h"

/* -- */

#include "curl/autoproxy.h"

/* Set cURL options. */

static void _set_opts(_quvi_net_resolve_t r, CURL *c)

{

  curl_easy_setopt(c, CURLOPT_URL, r->url.addr->str);

  /* Use HEAD request: we're only interested in the header metadata. */

  curl_easy_setopt(c, CURLOPT_NOBODY, 1L); /* GET -> HEAD. */

  c_autoproxy(r->handle.quvi, r->url.addr->str);

}

static void _reset_opts(CURL *c)

{

  curl_easy_setopt(c, CURLOPT_HTTPGET, 1L); /* HEAD -> GET. */

}

static const gchar *_EOK = N_("The server responded with the code %03ld");

/* Check whether the server returned a redirection URL. */

static QuviError _chk_redir(_quvi_net_resolve_t r, CURL *c)

{

  CURLcode curlcode;

  QuviError rc;

  curlcode = curl_easy_perform(c);

  curl_easy_getinfo(c, CURLINFO_RESPONSE_CODE, &r->status.resp_code);

  rc = QUVI_OK;

  if (curlcode == CURLE_OK && r->status.resp_code == 200)

    {

      gchar *u = NULL;

      curl_easy_getinfo(c, CURLINFO_EFFECTIVE_URL, &u);

      /* Leave comparison for resolve_redirections.lua */

      g_string_assign(r->url.dst, u);

    }

  else

    {

      if (curlcode == CURLE_OK)

        {

          g_string_printf(r->status.errmsg,

                          g_dgettext(GETTEXT_PACKAGE, _EOK),

                          r->status.resp_code);

        }

      else

        {

          const gchar *s = curl_easy_strerror(curlcode);

          const glong c = r->status.resp_code;

          const gint cc = curlcode;

#define _ENO "%s (HTTP/%03ld, cURL=0x%03x)"

          g_string_printf(r->status.errmsg, _ENO, s, c, cc);

#undef _ENO

        }

      rc = QUVI_ERROR_CALLBACK;

    }

  return (rc);

}

/* Resolve an URL redirection if needed. */

QuviError c_resolve(_quvi_t q, _quvi_net_resolve_t r)

{

  QuviError rc;

  CURL *c;

  c = q->handle.curl;

  _set_opts(r, c);

  rc = _chk_redir(r, c);

  _reset_opts(c);

  return (rc);

}

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