LCOV - code coverage report
Current view: top level - libelf - elf_next.c (source / functions) Hit Total Coverage
Test: lcov.out Lines: 10 10 100.0 %
Date: 2017-01-05 09:15:16 Functions: 1 1 100.0 %
Legend: Lines: hit not hit

          Line data    Source code
       1             : /* Advance in archive to next element.
       2             :    Copyright (C) 1998-2009, 2015 Red Hat, Inc.
       3             :    This file is part of elfutils.
       4             :    Contributed by Ulrich Drepper <drepper@redhat.com>, 1998.
       5             : 
       6             :    This file is free software; you can redistribute it and/or modify
       7             :    it under the terms of either
       8             : 
       9             :      * the GNU Lesser General Public License as published by the Free
      10             :        Software Foundation; either version 3 of the License, or (at
      11             :        your option) any later version
      12             : 
      13             :    or
      14             : 
      15             :      * the GNU General Public License as published by the Free
      16             :        Software Foundation; either version 2 of the License, or (at
      17             :        your option) any later version
      18             : 
      19             :    or both in parallel, as here.
      20             : 
      21             :    elfutils is distributed in the hope that it will be useful, but
      22             :    WITHOUT ANY WARRANTY; without even the implied warranty of
      23             :    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
      24             :    General Public License for more details.
      25             : 
      26             :    You should have received copies of the GNU General Public License and
      27             :    the GNU Lesser General Public License along with this program.  If
      28             :    not, see <http://www.gnu.org/licenses/>.  */
      29             : 
      30             : #ifdef HAVE_CONFIG_H
      31             : # include <config.h>
      32             : #endif
      33             : 
      34             : #include <assert.h>
      35             : #include <libelf.h>
      36             : #include <stddef.h>
      37             : 
      38             : #include "libelfP.h"
      39             : 
      40             : 
      41             : Elf_Cmd
      42        6919 : elf_next (Elf *elf)
      43             : {
      44             :   Elf *parent;
      45             :   Elf_Cmd ret;
      46             : 
      47             :   /* Be gratious, the specs demand it.  */
      48        6919 :   if (elf == NULL || elf->parent == NULL)
      49             :     return ELF_C_NULL;
      50             : 
      51             :   /* We can be sure the parent is an archive.  */
      52        6919 :   parent = elf->parent;
      53        6919 :   assert (parent->kind == ELF_K_AR);
      54             : 
      55             :   rwlock_wrlock (parent->lock);
      56             : 
      57             :   /* Now advance the offset.  */
      58       13838 :   parent->state.ar.offset += (sizeof (struct ar_hdr)
      59        6919 :                               + ((parent->state.ar.elf_ar_hdr.ar_size + 1)
      60        6919 :                                  & ~1l));
      61             : 
      62             :   /* Get the next archive header.  */
      63        6919 :   ret = __libelf_next_arhdr_wrlock (parent) != 0 ? ELF_C_NULL : elf->cmd;
      64             : 
      65             :   /* If necessary, mark the archive header as unusable.  */
      66        6919 :   if (ret == ELF_C_NULL)
      67           5 :     parent->state.ar.elf_ar_hdr.ar_name = NULL;
      68             : 
      69             :   rwlock_unlock (parent->lock);
      70             : 
      71             :   return ret;
      72             : }

Generated by: LCOV version 1.12