/* Test dwfl_linux_proc_attach works without any modules.

   Copyright (C) 2015 Red Hat, Inc.

   This file is part of elfutils.

   This file 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.

   elfutils 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/>.  */

#include <config.h>

#include <inttypes.h>

#include <stdio.h>

#include <stdlib.h>

#include <errno.h>

#include <unistd.h>

#ifdef __linux__

#include <sys/types.h>

#include <sys/stat.h>

#include <sys/user.h>

#include <fcntl.h>

#include <string.h>

#include ELFUTILS_HEADER(dwfl)

#include <pthread.h>

#endif

#include "system.h"

#ifndef __linux__

int

main (int argc __attribute__ ((unused)), char **argv __attribute__ ((unused)))

{

  printf ("dwfl_linux_proc_attach unsupported.\n");

  return 77;

}

#else /* __linux__ */

static pthread_t thread1;

static pthread_t thread2;

static void *

sleeper (void* d __attribute__ ((unused)))

{

  sleep (60);

  return NULL;

}

static char *debuginfo_path = NULL;

static const Dwfl_Callbacks proc_callbacks =

  {

    .find_elf = dwfl_linux_proc_find_elf,

    .find_debuginfo = dwfl_standard_find_debuginfo,

    .debuginfo_path = &debuginfo_path,

  };

static int

thread_callback (Dwfl_Thread *thread, void *thread_arg)

{

  int *threads = (int *) thread_arg;

  pid_t tid = dwfl_thread_tid (thread);

  printf ("thread tid: %d\n", tid);

  (*threads)++;

  return DWARF_CB_OK;

}

int

main (int argc __attribute__ ((unused)),

      char **argv __attribute__ ((unused)))

{

  /* Create two extra threads to iterate through.  */

  int err;

  if ((err = pthread_create (&thread1, NULL, sleeper, NULL)) != 0)

    error (-1, err, "Couldn't create thread1");

  if ((err = pthread_create (&thread2, NULL, sleeper, NULL)) != 0)

    error (-1, err, "Couldn't create thread2");

  Dwfl *dwfl = dwfl_begin (&proc_callbacks);

  if (dwfl == NULL)

    error (-1, 0, "dwfl_begin: %s", dwfl_errmsg (-1));

  pid_t pid = getpid ();

  /* This used to fail, since we don't have any modules yet.  */

  if (dwfl_linux_proc_attach (dwfl, pid, false) < 0)

    error (-1, 0, "dwfl_linux_proc_attach pid %d: %s", pid,

	   dwfl_errmsg (-1));

  /* Did we see all 3 threads?  */

  int threads = 0;

  if (dwfl_getthreads (dwfl, thread_callback, &threads) != DWARF_CB_OK)

    error (-1, 0, "dwfl_getthreads failed: %s", dwfl_errmsg (-1));

  return (threads == 3) ? 0 : -1;

}

#endif /* __linux__ */