/* libquvi

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

 *

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

 *

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

 *

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

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

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

 */

#include "config.h"

#include <locale.h>

#include <stdlib.h>

#include <string.h>

#include <glib.h>

#include <quvi.h>

#include "examples.h"

struct _opts_s

{

  gchar **property;

  gchar *type;

};

static struct _opts_s opts;

static const GOptionEntry entries[] =

{

  {

    "property", 'p', 0, G_OPTION_ARG_STRING_ARRAY, &opts.property,

    "Script property to output", "PROPERTY"

  },

  {

    "type", 't', 0, G_OPTION_ARG_STRING, &opts.type,

    "Script type", "TYPE"

  },

  {NULL, 0, 0, 0, NULL, NULL, NULL}

};

struct _property_lookup_s

{

  QuviScriptProperty to;

  const gchar *from;

};

static const struct _property_lookup_s property_conv[] =

{

  {QUVI_SCRIPT_PROPERTY_EXPORT_FORMAT, "export.format"},

  {QUVI_SCRIPT_PROPERTY_FILEPATH, "filepath"},

  {QUVI_SCRIPT_PROPERTY_FILENAME, "filename"},

  {QUVI_SCRIPT_PROPERTY_DOMAINS,  "domains"},

  {QUVI_SCRIPT_PROPERTY_SHA1,     "sha1"},

  {0, NULL}

};

static void dump_script(QuviScriptType type)

{

  QuviScriptProperty qsp;

  gchar *s;

  gint i,j;

  for (i=0; opts.property[i] != NULL; ++i)

    {

      const gchar *p = opts.property[i];

      for (j=0; property_conv[j].from != NULL; ++j)

        {

          if (g_strcmp0(p, property_conv[j].from) == 0)

            {

              qsp = property_conv[j].to;

              break;

            }

        }

      quvi_script_get(q, type, qsp, &s);

      if (i == 0)

        g_print("[%s]\n", __func__);

      g_print("  %s=%s\n", p, s);

    }

}

static gchar **property_sv()

{

  gchar **r;

  gint i,j;

  i=0;

  while (property_conv[i].from != NULL) ++i;

  r = g_new(gchar*, i+1);

  i=j=0;

  while (property_conv[j].from != NULL)

    r[i++] = g_strdup(property_conv[j++].from);

  r[i] = NULL;

  return (r);

}

static gboolean chk_property_values()

{

  gchar **v, *s;

  gboolean r;

  v = property_sv();

  r = examples_chk_val_sv(opts.property, v, &s);

  if (r == FALSE)

    {

      g_printerr(

        "error: invalid value (`%s') for the option `--property'\n", s);

    }

  g_strfreev(v);

  return (r);

}

struct _type_lookup_s

{

  QuviScriptType to;

  const gchar *from;

};

static const struct _type_lookup_s type_conv[] =

{

  {QUVI_SCRIPT_TYPE_SUBTITLE_EXPORT, "subtitle.export"},

  {QUVI_SCRIPT_TYPE_SUBTITLE, "subtitle"},

  {QUVI_SCRIPT_TYPE_PLAYLIST, "playlist"},

  {QUVI_SCRIPT_TYPE_MEDIA,    "media"},

  {QUVI_SCRIPT_TYPE_SCAN,     "scan"},

  {0, NULL}

};

static gchar **type_sv()

{

  gchar **r;

  gint i,j;

  i=0;

  while (type_conv[i].from != NULL) ++i;

  r = g_new(gchar*, i+1);

  i=j=0;

  while (type_conv[j].from != NULL)

    r[i++] = g_strdup(type_conv[j++].from);

  r[i] = NULL;

  return (r);

}

static gboolean chk_type_values()

{

  gchar **v, *s;

  gboolean r;

  v = type_sv();

  r = examples_chk_val_s(opts.type, v, &s);

  if (r == FALSE)

    {

      g_printerr(

        "error: invalid value (`%s') for the option `--type'\n", s);

    }

  g_strfreev(v);

  v = NULL;

  return (r);

}

static QuviScriptType type_n()

{

  gint i;

  for (i=0; type_conv[i].from != NULL; ++i)

    {

      if (g_strcmp0(opts.type, type_conv[i].from) == 0)

        return (type_conv[i].to);

    }

  return (QUVI_SCRIPT_TYPE_MEDIA);

}

static gint opts_new(gint argc, gchar **argv)

{

  GOptionContext *c;

  GError *e;

  gint r;

  c = g_option_context_new(NULL);

  r = EXIT_SUCCESS;

  e = NULL;

  g_option_context_set_help_enabled(c, TRUE);

  g_option_context_add_main_entries(c, entries, NULL);

  if (g_option_context_parse(c, &argc, &argv, &e) == FALSE)

    {

      g_printerr("error: %s\n", e->message);

      g_error_free(e);

      r = EXIT_FAILURE;

    }

  g_option_context_free(c);

  /* Set the defaults. */

  if (opts.property == NULL)

    {

      gchar *v[] = {"filename", "domains", NULL};

      opts.property = g_strdupv(v);

    }

  if (opts.type == NULL)

    opts.type = g_strdup("media");

  /* Check input. */

  if (chk_property_values() == FALSE)

    return (EXIT_FAILURE);

  if (chk_type_values() == FALSE)

    return (EXIT_FAILURE);

  return (r);

}

static void opts_free()

{

  g_strfreev(opts.property);

  opts.property = NULL;

  g_free(opts.type);

  opts.type = NULL;

}

gint main(gint argc, gchar **argv)

{

  QuviScriptType type;

  gint r;

  setlocale(LC_ALL, "");

  memset(&opts, 0, sizeof(struct _opts_s));

  g_assert(q == NULL);

  r = opts_new(argc, argv);

  if (r != EXIT_SUCCESS)

    return (r);

  q = quvi_new();

  examples_exit_if_error();

  type = type_n();

  {

    gchar *p = g_strjoinv(",", opts.property);

    g_printerr("[%s] type=%s (0x%x), property=%s\n",

               __func__, opts.type, type, p);

    g_free(p);

  }

  while (quvi_script_next(q, type) == QUVI_TRUE)

    dump_script(type);

  examples_cleanup();

  opts_free();

  g_assert(q == NULL);

  return (r);

}

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