/* sysprof-symbol-dirs.c
 *
 * Copyright 2017-2019 Christian Hergert <chergert@redhat.com>
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU 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 General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 *
 * SPDX-License-Identifier: GPL-3.0-or-later
 */

#include "config.h"

#include "sysprof-symbol-dirs.h"

static GPtrArray *sysprof_symbol_dirs;

G_LOCK_DEFINE (sysprof_symbol_dirs);

static GPtrArray *
sysprof_get_symbol_dirs_locked (void)
{
  if (sysprof_symbol_dirs == NULL)
    {
      sysprof_symbol_dirs = g_ptr_array_new ();
      g_ptr_array_add (sysprof_symbol_dirs, g_strdup ("/usr/lib/debug"));

      /* Add path to host system if we have it */
      if (g_file_test ("/.flatpak-info", G_FILE_TEST_EXISTS))
        {
          static gchar *tries[] = {
            "/var/run/host/usr/lib/debug",
          };

          for (guint i = 0; i < G_N_ELEMENTS (tries); i++)
            {
              if (g_file_test (tries[i], G_FILE_TEST_EXISTS))
                g_ptr_array_add (sysprof_symbol_dirs, g_strdup (tries[i]));
            }
        }
    }

  return sysprof_symbol_dirs;
}

void
sysprof_symbol_dirs_add (const gchar *path)
{
  GPtrArray *ar;

  G_LOCK (sysprof_symbol_dirs);

  ar = sysprof_get_symbol_dirs_locked ();

  for (guint i = 0; i < ar->len; i++)
    {
      const gchar *ele = g_ptr_array_index (ar, i);

      if (g_strcmp0 (path, ele) == 0)
        goto skip;
    }

  g_ptr_array_add (ar, g_strdup (path));

skip:
  G_UNLOCK (sysprof_symbol_dirs);
}

void
sysprof_symbol_dirs_remove (const gchar *path)
{
  GPtrArray *ar;

  G_LOCK (sysprof_symbol_dirs);

  ar = sysprof_get_symbol_dirs_locked ();

  for (guint i = 0; i < ar->len; i++)
    {
      const gchar *ele = g_ptr_array_index (ar, i);

      if (g_strcmp0 (path, ele) == 0)
        {
          g_ptr_array_remove_index (ar, i);
          break;
        }
    }

  G_UNLOCK (sysprof_symbol_dirs);
}

/**
 * sysprof_symbol_dirs_get_paths:
 * @dir: the directory containing the library
 * @name: the name of the file in @dir
 *
 * This function will build an array of files to look at to resolve the
 * debug symbols for the file at path "dir/name".
 *
 * Returns: (transfer full): A #GStrv of possible paths.
 */
gchar **
sysprof_symbol_dirs_get_paths (const gchar *dir,
                          const gchar *name)
{
  GPtrArray *ret = g_ptr_array_new ();
  GPtrArray *ar;

  g_ptr_array_add (ret, g_build_filename (dir, name, NULL));

  G_LOCK (sysprof_symbol_dirs);

  ar = sysprof_get_symbol_dirs_locked ();

  for (guint i = 0; i < ar->len; i++)
    {
      const gchar *ele = g_ptr_array_index (ar, i);

      g_ptr_array_add (ret, g_build_filename (ele, name, NULL));
      g_ptr_array_add (ret, g_build_filename (ele, dir, name, NULL));
    }

  g_ptr_array_add (ret, g_build_filename (dir, ".debug", name, NULL));
  g_ptr_array_add (ret, g_build_filename (DEBUGDIR, dir, name, NULL));

  G_UNLOCK (sysprof_symbol_dirs);

  g_ptr_array_add (ret, NULL);

  return (gchar **)g_ptr_array_free (ret, FALSE);
}