Line data    Source code

       1             : /* Set up a session using libdwfl.
       2             :    Copyright (C) 2005 Red Hat, Inc.
       3             :    This file is part of elfutils.
       4             : 
       5             :    This file is free software; you can redistribute it and/or modify
       6             :    it under the terms of either
       7             : 
       8             :      * the GNU Lesser General Public License as published by the Free
       9             :        Software Foundation; either version 3 of the License, or (at
      10             :        your option) any later version
      11             : 
      12             :    or
      13             : 
      14             :      * the GNU General Public License as published by the Free
      15             :        Software Foundation; either version 2 of the License, or (at
      16             :        your option) any later version
      17             : 
      18             :    or both in parallel, as here.
      19             : 
      20             :    elfutils is distributed in the hope that it will be useful, but
      21             :    WITHOUT ANY WARRANTY; without even the implied warranty of
      22             :    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
      23             :    General Public License for more details.
      24             : 
      25             :    You should have received copies of the GNU General Public License and
      26             :    the GNU Lesser General Public License along with this program.  If
      27             :    not, see <http://www.gnu.org/licenses/>.  */
      28             : 
      29             : #ifdef HAVE_CONFIG_H
      30             : # include <config.h>
      31             : #endif
      32             : 
      33             : #include "libdwflP.h"
      34             : 
      35             : Dwfl *
      36        5350 : dwfl_begin (const Dwfl_Callbacks *callbacks)
      37             : {
      38        5350 :   if (elf_version (EV_CURRENT) == EV_NONE)
      39             :     {
      40           0 :       __libdwfl_seterrno (DWFL_E_LIBELF);
      41           0 :       return NULL;
      42             :     }
      43             : 
      44        5350 :   Dwfl *dwfl = calloc (1, sizeof *dwfl);
      45        5350 :   if (dwfl == NULL)
      46           0 :     __libdwfl_seterrno (DWFL_E_NOMEM);
      47             :   else
      48             :     {
      49        5350 :       dwfl->callbacks = callbacks;
      50        5350 :       dwfl->offline_next_address = OFFLINE_REDZONE;
      51             :     }
      52             : 
      53             :   return dwfl;
      54             : }
      55             : INTDEF (dwfl_begin)