libelf/nextscn.c

   1 /*
   2 nextscn.c - implementation of the elf_nextscn(3) function.
   3 Copyright (C) 1995 Michael Riepe <riepe@ifwsn4.ifw.uni-hannover.de>
   4
   5 This library is free software; you can redistribute it and/or
   6 modify it under the terms of the GNU Library General Public
   7 License as published by the Free Software Foundation; either
   8 version 2 of the License, or (at your option) any later version.
   9
  10 This library is distributed in the hope that it will be useful,
  11 but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13 Library General Public License for more details.
  14
  15 You should have received a copy of the GNU Library General Public
  16 License along with this library; if not, write to the Free Software
  17 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  18 */
  19
  20 #include <private.h>
  21
  22 Elf_Scn*
  23 elf_nextscn(Elf *elf, Elf_Scn *scn) {
  24     if (!elf) {
  25         return NULL;
  26     }
  27     elf_assert(elf->e_magic == ELF_MAGIC);
  28     if (scn) {
  29         elf_assert(scn->s_magic == SCN_MAGIC);
  30         if (scn->s_elf == elf) {
  31             return scn->s_link;
  32         }
  33         seterr(ERROR_ELFSCNMISMATCH);
  34     }
  35     else if (elf->e_kind != ELF_K_ELF) {
  36         seterr(ERROR_NOTELF);
  37     }
  38     else if (elf->e_ehdr || _elf_cook(elf)) {
  39         elf_assert(elf->e_ehdr);
  40         for (scn = elf->e_scn_1; scn; scn = scn->s_link) {
  41             elf_assert(scn->s_magic == SCN_MAGIC);
  42             elf_assert(scn->s_elf == elf);
  43             if (scn->s_index == 1) {
  44                 return scn;
  45             }
  46         }
  47         seterr(ERROR_NOSUCHSCN);
  48     }
  49     return NULL;
  50 }