/* GObject introspection: typelib inspector
 *
 * Copyright (C) 2011-2016 Dominique Leuenberger <dimstar@opensuse.org>
 * Copyright © 2016 Igor Gnatenko <ignatenko@redhat.com>
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2 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
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the
 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
 * Boston, MA 02111-1307, USA.
 */

#include <glib.h>
#include <girepository.h>
#include <stdlib.h>

G_DEFINE_AUTOPTR_CLEANUP_FUNC(GITypelib, g_typelib_free)

static void
print_shlibs (const gchar *namespace)
{
  guint i = 0;

  /* Finding the shared library we depend on (if any) */
  const gchar *shlibs = g_irepository_get_shared_library (NULL, namespace);
  if (shlibs && shlibs[0] != '\0')
    {
      /* shlibs is a comma-separated list of libraries */
      g_auto(GStrv) libs = g_strsplit (shlibs, ",", -1);
      for (i; libs[i]; i++)
        g_print ("shlib: %s\n", libs[i]);
    }
}

static void
print_typelibs (const gchar *namespace)
{
  guint i = 0;

  /* Finding all the typelib-based Requires */
  g_auto(GStrv) deps = g_irepository_get_dependencies (NULL, namespace);
  if (deps)
    {
      for (i; deps[i]; i++)
        g_print ("typelib: %s\n", deps[i]);
    }
}

gint
main (gint   argc,
      gchar *argv[])
{
  g_autoptr(GError) error = NULL;
  g_autoptr(GITypelib) typelib = NULL;

  g_autofree gchar *version = NULL;
  gboolean opt_shlibs = FALSE;
  gboolean opt_typelibs = FALSE;
  g_auto(GStrv) namespaces = NULL;
  const gchar *namespace = NULL;
  const GOptionEntry options[] = {
    { "version", 0, 0, G_OPTION_ARG_STRING, &version, "Version", "VERSION" },
    { "print-shlibs", 0, 0, G_OPTION_ARG_NONE, &opt_shlibs, "List the shared libraries the typelib requires" },
    { "print-typelibs", 0, 0, G_OPTION_ARG_NONE, &opt_typelibs, "List other typelibs the inspected typelib requires" },
    { G_OPTION_REMAINING, 0, 0, G_OPTION_ARG_STRING_ARRAY, &namespaces, "The typelib to inspect", "NAMESPACE" },
    { NULL },
  };

  g_autoptr(GOptionContext) context = g_option_context_new ("- Inspect GI typelib");
  g_option_context_add_main_entries (context, options, NULL);
  if (!g_option_context_parse (context, &argc, &argv, &error))
    {
      g_printerr ("Failed to parse command line options: %s\n", error->message);
      return EXIT_FAILURE;
    }

  if (!namespaces)
    {
      g_printerr ("Please specify at least one namespace\n");
      return EXIT_FAILURE;
    }

  if (g_strv_length (namespaces) > 1)
    {
      g_printerr ("Please specify only one namespace\n");
      return EXIT_FAILURE;
    }
  namespace = namespaces[0];

  if (!opt_shlibs && !opt_typelibs)
    {
      g_printerr ("Please specify --print-shlibs, --print-typelibs or both.\n");
      return EXIT_FAILURE;
    }

  typelib = g_irepository_require (NULL, namespace, version, 0, &error);
  if (!typelib)
    {
      g_printerr ("Failed to load typelib: %s\n", error->message);
      return EXIT_FAILURE;
    }

  if (opt_shlibs)
    print_shlibs (namespace);
  if (opt_typelibs)
    print_typelibs (namespace);

  return EXIT_SUCCESS;
}