LCOV - code coverage report
Current view: top level - libasm - asm_end.c (source / functions) Hit Total Coverage
Test: elfutils-0.190 Lines: 258 285 90.5 %
Date: 2023-11-14 21:22:18 Functions: 4 5 80.0 %
Legend: Lines: hit not hit | Branches: + taken - not taken # not executed Branches: 92 130 70.8 %

           Branch data     Line data    Source code
       1                 :            : /* Finalize operations on the assembler context, free all resources.
       2                 :            :    Copyright (C) 2002, 2003, 2005, 2016 Red Hat, Inc.
       3                 :            :    This file is part of elfutils.
       4                 :            :    Written by Ulrich Drepper <drepper@redhat.com>, 2002.
       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 <stdio.h>
      36                 :            : #include <stdlib.h>
      37                 :            : #include <string.h>
      38                 :            : #include <sys/stat.h>
      39                 :            : 
      40                 :            : #include <libasmP.h>
      41                 :            : #include <libelf.h>
      42                 :            : 
      43                 :            : 
      44                 :            : static int
      45                 :          0 : text_end (AsmCtx_t *ctx __attribute__ ((unused)))
      46                 :            : {
      47         [ #  # ]:          0 :   if (fflush (ctx->out.file) != 0)
      48                 :            :     {
      49                 :          0 :       __libasm_seterrno (ASM_E_IOERROR);
      50                 :          0 :       return -1;
      51                 :            :     }
      52                 :            : 
      53                 :            :   return 0;
      54                 :            : }
      55                 :            : 
      56                 :            : 
      57                 :            : static int
      58                 :         18 : binary_end (AsmCtx_t *ctx)
      59                 :            : {
      60                 :         18 :   void *symtab = NULL;
      61                 :         18 :   Dwelf_Strent *symscn_strent = NULL;
      62                 :         18 :   Dwelf_Strent *strscn_strent = NULL;
      63                 :         18 :   Dwelf_Strent *xndxscn_strent = NULL;
      64                 :         18 :   Elf_Scn *shstrscn;
      65                 :         18 :   Dwelf_Strent *shstrscn_strent;
      66                 :         18 :   size_t shstrscnndx;
      67                 :         18 :   size_t symscnndx = 0;
      68                 :         18 :   size_t strscnndx = 0;
      69                 :         18 :   size_t xndxscnndx = 0;
      70                 :         18 :   Elf_Data *data;
      71                 :         18 :   Elf_Data *shstrtabdata;
      72                 :         18 :   Elf_Data *strtabdata = NULL;
      73                 :         18 :   Elf_Data *xndxdata = NULL;
      74                 :         18 :   GElf_Shdr shdr_mem;
      75                 :         18 :   GElf_Shdr *shdr;
      76                 :         18 :   GElf_Ehdr ehdr_mem;
      77                 :         18 :   GElf_Ehdr *ehdr;
      78                 :         18 :   AsmScn_t *asmscn;
      79                 :         18 :   int result = 0;
      80                 :            : 
      81                 :            :   /* Iterate over the created sections and compute the offsets of the
      82                 :            :      various subsections and fill in the content.  */
      83         [ +  + ]:     352028 :   for (asmscn = ctx->section_list; asmscn != NULL; asmscn = asmscn->allnext)
      84                 :            :     {
      85                 :            : #if 0
      86                 :            :       Elf_Scn *scn = elf_getscn (ctx->out.elf, asmscn->data.main.scnndx);
      87                 :            : #else
      88                 :     352010 :       Elf_Scn *scn = asmscn->data.main.scn;
      89                 :            : #endif
      90                 :     352010 :       off_t offset = 0;
      91                 :     352010 :       AsmScn_t *asmsubscn = asmscn;
      92                 :            : 
      93                 :     352014 :       do
      94                 :            :         {
      95                 :     352014 :           struct AsmData *content = asmsubscn->content;
      96                 :     352014 :           bool first = true;
      97                 :            : 
      98                 :     352014 :           offset = ((offset + asmsubscn->max_align - 1)
      99                 :     352014 :                     & ~(asmsubscn->max_align - 1));
     100                 :            : 
     101                 :            :           /* Update the offset for this subsection.  This field now
     102                 :            :              stores the offset of the first by in this subsection.  */
     103                 :     352014 :           asmsubscn->offset = offset;
     104                 :            : 
     105                 :            :           /* Note that the content list is circular.  */
     106         [ +  + ]:     352014 :           if (content != NULL)
     107                 :     352010 :             do
     108                 :            :               {
     109                 :     352010 :                 Elf_Data *newdata = elf_newdata (scn);
     110                 :            : 
     111         [ -  + ]:     352010 :                 if (newdata == NULL)
     112                 :            :                   {
     113                 :          0 :                     __libasm_seterrno (ASM_E_LIBELF);
     114                 :          0 :                     return -1;
     115                 :            :                   }
     116                 :            : 
     117                 :     352010 :                 newdata->d_buf = content->data;
     118                 :     352010 :                 newdata->d_type = ELF_T_BYTE;
     119                 :     352010 :                 newdata->d_size = content->len;
     120                 :     352010 :                 newdata->d_off = offset;
     121                 :     352010 :                 newdata->d_align = first ? asmsubscn->max_align : 1;
     122                 :            : 
     123                 :     352010 :                 offset += content->len;
     124                 :            :               }
     125         [ -  + ]:     352010 :             while ((content = content->next) != asmsubscn->content);
     126                 :            :         }
     127         [ +  + ]:     352014 :       while ((asmsubscn = asmsubscn->subnext) != NULL);
     128                 :            :     }
     129                 :            : 
     130                 :            : 
     131                 :            :   /* Create the symbol table if necessary.  */
     132         [ +  + ]:         18 :   if (ctx->nsymbol_tab > 0)
     133                 :            :     {
     134                 :            :       /* Create the symbol table and string table section names.  */
     135                 :         10 :       symscn_strent = dwelf_strtab_add_len (ctx->section_strtab, ".symtab", 8);
     136                 :         10 :       strscn_strent = dwelf_strtab_add_len (ctx->section_strtab, ".strtab", 8);
     137                 :            : 
     138                 :            :       /* Create the symbol string table section.  */
     139                 :         10 :       Elf_Scn *strscn = elf_newscn (ctx->out.elf);
     140                 :         10 :       strtabdata = elf_newdata (strscn);
     141                 :         10 :       shdr = gelf_getshdr (strscn, &shdr_mem);
     142         [ -  + ]:         10 :       if (strtabdata == NULL || shdr == NULL)
     143                 :            :         {
     144                 :          0 :           __libasm_seterrno (ASM_E_LIBELF);
     145                 :          0 :           return -1;
     146                 :            :         }
     147                 :         10 :       strscnndx = elf_ndxscn (strscn);
     148                 :            : 
     149                 :         10 :       dwelf_strtab_finalize (ctx->symbol_strtab, strtabdata);
     150                 :            : 
     151                 :         10 :       shdr->sh_type = SHT_STRTAB;
     152         [ -  + ]:         10 :       assert (shdr->sh_entsize == 0);
     153                 :            : 
     154                 :         10 :       (void) gelf_update_shdr (strscn, shdr);
     155                 :            : 
     156                 :            :       /* Create the symbol table section.  */
     157                 :         10 :       Elf_Scn *symscn = elf_newscn (ctx->out.elf);
     158                 :         10 :       data = elf_newdata (symscn);
     159                 :         10 :       shdr = gelf_getshdr (symscn, &shdr_mem);
     160         [ -  + ]:         10 :       if (data == NULL || shdr == NULL)
     161                 :            :         {
     162                 :          0 :           __libasm_seterrno (ASM_E_LIBELF);
     163                 :          0 :           return -1;
     164                 :            :         }
     165                 :         10 :       symscnndx = elf_ndxscn (symscn);
     166                 :            : 
     167                 :            :       /* We know how many symbols there will be in the symbol table.  */
     168                 :         20 :       data->d_size = gelf_fsize (ctx->out.elf, ELF_T_SYM,
     169                 :         10 :                                  ctx->nsymbol_tab + 1, EV_CURRENT);
     170                 :         10 :       symtab = malloc (data->d_size);
     171         [ +  - ]:         10 :       if (symtab == NULL)
     172                 :            :         return -1;
     173                 :         10 :       data->d_buf = symtab;
     174                 :         10 :       data->d_type = ELF_T_SYM;
     175                 :         10 :       data->d_off = 0;
     176                 :            : 
     177                 :            :       /* Clear the first entry.  */
     178                 :         10 :       GElf_Sym syment;
     179                 :         10 :       memset (&syment, '\0', sizeof (syment));
     180                 :         10 :       (void) gelf_update_sym (data, 0, &syment);
     181                 :            : 
     182                 :            :       /* Iterate over the symbol table.  */
     183                 :         10 :       void *runp = NULL;
     184                 :         10 :       int ptr_local = 1;        /* Start with index 1; zero remains unused.  */
     185                 :         10 :       int ptr_nonlocal = ctx->nsymbol_tab;
     186                 :         10 :       uint32_t *xshndx = NULL;
     187                 :         10 :       AsmSym_t *sym;
     188         [ +  + ]:     176030 :       while ((sym = asm_symbol_tab_iterate (&ctx->symbol_tab, &runp)) != NULL)
     189         [ +  - ]:     176010 :         if (asm_emit_symbol_p (dwelf_strent_str (sym->strent)))
     190                 :            :           {
     191         [ -  + ]:     176010 :             assert (ptr_local <= ptr_nonlocal);
     192                 :            : 
     193                 :     176010 :             syment.st_name = dwelf_strent_off (sym->strent);
     194                 :     176010 :             syment.st_info = GELF_ST_INFO (sym->binding, sym->type);
     195                 :     176010 :             syment.st_other = 0;
     196                 :     176010 :             syment.st_value = sym->scn->offset + sym->offset;
     197                 :     176010 :             syment.st_size = sym->size;
     198                 :            : 
     199                 :            :             /* Add local symbols at the beginning, the other from
     200                 :            :                the end.  */
     201         [ +  + ]:     176010 :             int ptr = sym->binding == STB_LOCAL ? ptr_local++ : ptr_nonlocal--;
     202                 :            : 
     203                 :            :             /* Determine the section index.  We have to handle the
     204                 :            :                overflow correctly.  */
     205                 :     352020 :             Elf_Scn *scn = (sym->scn->subsection_id == 0
     206                 :            :                             ? sym->scn->data.main.scn
     207         [ +  + ]:     176010 :                             : sym->scn->data.up->data.main.scn);
     208                 :            : 
     209                 :     176010 :             Elf32_Word ndx;
     210         [ +  + ]:     176010 :             if (unlikely (scn == ASM_ABS_SCN))
     211                 :            :               ndx = SHN_ABS;
     212         [ +  + ]:     176008 :             else if (unlikely (scn == ASM_COM_SCN))
     213                 :            :               ndx = SHN_COMMON;
     214         [ +  + ]:     176006 :             else if (unlikely ((ndx = elf_ndxscn (scn)) >= SHN_LORESERVE))
     215                 :            :               {
     216         [ +  + ]:       1922 :                 if (unlikely (xshndx == NULL))
     217                 :            :                   {
     218                 :            :                     /* The extended section index section does not yet
     219                 :            :                        exist.  */
     220                 :          4 :                     Elf_Scn *xndxscn;
     221                 :            : 
     222                 :          4 :                     xndxscn = elf_newscn (ctx->out.elf);
     223                 :          4 :                     xndxdata = elf_newdata (xndxscn);
     224                 :          4 :                     shdr = gelf_getshdr (xndxscn, &shdr_mem);
     225         [ -  + ]:          4 :                     if (xndxdata == NULL || shdr == NULL)
     226                 :            :                       {
     227                 :          0 :                         __libasm_seterrno (ASM_E_LIBELF);
     228                 :          0 :                         return -1;
     229                 :            :                       }
     230                 :          4 :                     xndxscnndx = elf_ndxscn (xndxscn);
     231                 :            : 
     232                 :          4 :                     shdr->sh_type = SHT_SYMTAB_SHNDX;
     233                 :          4 :                     shdr->sh_entsize = sizeof (Elf32_Word);
     234                 :          4 :                     shdr->sh_addralign = sizeof (Elf32_Word);
     235                 :          4 :                     shdr->sh_link = symscnndx;
     236                 :            : 
     237                 :          4 :                     (void) gelf_update_shdr (xndxscn, shdr);
     238                 :            : 
     239                 :          4 :                     xndxscn_strent = dwelf_strtab_add_len (ctx->section_strtab,
     240                 :            :                                                            ".symtab_shndx",
     241                 :            :                                                            14);
     242                 :            : 
     243                 :            :                     /* Note that using 'elf32_fsize' instead of
     244                 :            :                        'gelf_fsize' here is correct.  */
     245                 :          4 :                     xndxdata->d_size = elf32_fsize (ELF_T_WORD,
     246                 :          4 :                                                     ctx->nsymbol_tab + 1,
     247                 :            :                                                     EV_CURRENT);
     248                 :          4 :                     xshndx = xndxdata->d_buf = calloc (1, xndxdata->d_size);
     249         [ +  - ]:          4 :                     if (xshndx == NULL)
     250                 :            :                       return -1;
     251                 :            :                     /* Using ELF_T_WORD here relies on the fact that the
     252                 :            :                        32- and 64-bit types are the same size.  */
     253                 :          4 :                     xndxdata->d_type = ELF_T_WORD;
     254                 :          4 :                     xndxdata->d_off = 0;
     255                 :            :                   }
     256                 :            : 
     257                 :            :                 /* Store the real section index in the extended section
     258                 :            :                    index table.  */
     259         [ -  + ]:       1922 :                 assert ((size_t) ptr < ctx->nsymbol_tab + 1);
     260                 :       1922 :                 xshndx[ptr] = ndx;
     261                 :            : 
     262                 :            :                 /* And signal that this happened.  */
     263                 :       1922 :                 ndx = SHN_XINDEX;
     264                 :            :               }
     265                 :     176010 :             syment.st_shndx = ndx;
     266                 :            : 
     267                 :            :             /* Remember where we put the symbol.  */
     268                 :     176010 :             sym->symidx = ptr;
     269                 :            : 
     270                 :     176010 :             (void) gelf_update_sym (data, ptr, &syment);
     271                 :            :           }
     272                 :            : 
     273         [ -  + ]:         10 :       assert (ptr_local == ptr_nonlocal + 1);
     274                 :            : 
     275                 :         10 :       shdr->sh_type = SHT_SYMTAB;
     276                 :         10 :       shdr->sh_link = strscnndx;
     277                 :         10 :       shdr->sh_info = ptr_local;
     278                 :         10 :       shdr->sh_entsize = gelf_fsize (ctx->out.elf, ELF_T_SYM, 1, EV_CURRENT);
     279                 :         10 :       shdr->sh_addralign = gelf_fsize (ctx->out.elf, ELF_T_ADDR, 1,
     280                 :            :                                        EV_CURRENT);
     281                 :            : 
     282                 :         10 :       (void) gelf_update_shdr (symscn, shdr);
     283                 :            :     }
     284                 :            : 
     285                 :            : 
     286                 :            :   /* Create the section header string table section and fill in the
     287                 :            :      references in the section headers.  */
     288                 :         18 :   shstrscn = elf_newscn (ctx->out.elf);
     289                 :         18 :   shstrtabdata = elf_newdata (shstrscn);
     290                 :         18 :   shdr = gelf_getshdr (shstrscn, &shdr_mem);
     291   [ +  -  -  + ]:         18 :   if (shstrscn == NULL || shstrtabdata == NULL || shdr == NULL)
     292                 :            :     {
     293                 :          0 :       __libasm_seterrno (ASM_E_LIBELF);
     294                 :          0 :       return -1;
     295                 :            :     }
     296                 :            : 
     297                 :            : 
     298                 :            :   /* Add the name of the section header string table.  */
     299                 :         18 :   shstrscn_strent = dwelf_strtab_add_len (ctx->section_strtab,
     300                 :            :                                           ".shstrtab", 10);
     301                 :            : 
     302                 :         18 :   dwelf_strtab_finalize (ctx->section_strtab, shstrtabdata);
     303                 :            : 
     304                 :         18 :   shdr->sh_type = SHT_STRTAB;
     305         [ -  + ]:         18 :   assert (shdr->sh_entsize == 0);
     306                 :         18 :   shdr->sh_name = dwelf_strent_off (shstrscn_strent);
     307                 :            : 
     308                 :         18 :   (void) gelf_update_shdr (shstrscn, shdr);
     309                 :            : 
     310                 :            : 
     311                 :            :   /* Create the section groups.  */
     312         [ +  + ]:         18 :   if (ctx->groups != NULL)
     313                 :            :     {
     314                 :          2 :       AsmScnGrp_t *runp = ctx->groups->next;
     315                 :            : 
     316                 :      44000 :       do
     317                 :            :         {
     318                 :      44000 :           Elf_Scn *scn;
     319                 :      44000 :           Elf32_Word *grpdata;
     320                 :            : 
     321                 :      44000 :           scn = runp->scn;
     322         [ -  + ]:      44000 :           assert (scn != NULL);
     323                 :      44000 :           shdr = gelf_getshdr (scn, &shdr_mem);
     324         [ -  + ]:      44000 :           assert (shdr != NULL);
     325                 :            : 
     326                 :      44000 :           data = elf_newdata (scn);
     327         [ -  + ]:      44000 :           if (data == NULL)
     328                 :            :             {
     329                 :          0 :               __libasm_seterrno (ASM_E_LIBELF);
     330                 :          0 :               return -1;
     331                 :            :             }
     332                 :            : 
     333                 :            :           /* It is correct to use 'elf32_fsize' instead of 'gelf_fsize'
     334                 :            :              here.  */
     335                 :      44000 :           data->d_size = elf32_fsize (ELF_T_WORD, runp->nmembers + 1,
     336                 :            :                                       EV_CURRENT);
     337                 :      44000 :           grpdata = data->d_buf = malloc (data->d_size);
     338         [ -  + ]:      44000 :           if (grpdata == NULL)
     339                 :            :             return -1;
     340                 :      44000 :           data->d_type = ELF_T_WORD;
     341                 :      44000 :           data->d_off = 0;
     342                 :      44000 :           data->d_align = elf32_fsize (ELF_T_WORD, 1, EV_CURRENT);
     343                 :            : 
     344                 :            :           /* The first word of the section is filled with the flag word.  */
     345                 :      44000 :           *grpdata++ = runp->flags;
     346                 :            : 
     347         [ +  - ]:      44000 :           if (runp->members != NULL)
     348                 :            :             {
     349                 :      44000 :               AsmScn_t *member = runp->members->data.main.next_in_group;
     350                 :            : 
     351                 :      88000 :               do
     352                 :            :                 {
     353                 :            :                   /* Only sections, not subsections, can be registered
     354                 :            :                      as member of a group.  The subsections get
     355                 :            :                      automatically included.  */
     356         [ -  + ]:      88000 :                   assert (member->subsection_id == 0);
     357                 :            : 
     358                 :      88000 :                   *grpdata++ = elf_ndxscn (member->data.main.scn);
     359                 :            :                 }
     360                 :      88000 :               while ((member = member->data.main.next_in_group)
     361         [ +  + ]:      88000 :                      != runp->members->data.main.next_in_group);
     362                 :            :             }
     363                 :            : 
     364                 :            :           /* Construct the section header.  */
     365                 :      44000 :           shdr->sh_name = dwelf_strent_off (runp->strent);
     366                 :      44000 :           shdr->sh_type = SHT_GROUP;
     367                 :      44000 :           shdr->sh_flags = 0;
     368                 :      44000 :           shdr->sh_link = symscnndx;
     369                 :            :           /* If the user did not specify a signature we use the initial
     370                 :            :              empty symbol in the symbol table as the signature.  */
     371         [ +  - ]:      44000 :           shdr->sh_info = (runp->signature != NULL
     372                 :      44000 :                            ? runp->signature->symidx : 0);
     373                 :            : 
     374                 :      44000 :           (void) gelf_update_shdr (scn, shdr);
     375                 :            :         }
     376         [ +  + ]:      44000 :       while ((runp = runp->next) != ctx->groups->next);
     377                 :            :     }
     378                 :            : 
     379                 :            : 
     380                 :            :   /* Add the name to the symbol section.  */
     381         [ +  + ]:         18 :   if (likely (symscnndx != 0))
     382                 :            :     {
     383                 :         10 :       Elf_Scn *scn = elf_getscn (ctx->out.elf, symscnndx);
     384                 :            : 
     385                 :         10 :       shdr = gelf_getshdr (scn, &shdr_mem);
     386                 :            : 
     387                 :         10 :       shdr->sh_name = dwelf_strent_off (symscn_strent);
     388                 :            : 
     389                 :         10 :       (void) gelf_update_shdr (scn, shdr);
     390                 :            : 
     391                 :            : 
     392                 :            :       /* Add the name to the string section.  */
     393         [ -  + ]:         10 :       assert (strscnndx != 0);
     394                 :         10 :       scn = elf_getscn (ctx->out.elf, strscnndx);
     395                 :            : 
     396                 :         10 :       shdr = gelf_getshdr (scn, &shdr_mem);
     397                 :            : 
     398                 :         10 :       shdr->sh_name = dwelf_strent_off (strscn_strent);
     399                 :            : 
     400                 :         10 :       (void) gelf_update_shdr (scn, shdr);
     401                 :            : 
     402                 :            : 
     403                 :            :       /* Add the name to the extended symbol index section.  */
     404         [ +  + ]:         10 :       if (xndxscnndx != 0)
     405                 :            :         {
     406                 :          4 :           scn = elf_getscn (ctx->out.elf, xndxscnndx);
     407                 :            : 
     408                 :          4 :           shdr = gelf_getshdr (scn, &shdr_mem);
     409                 :            : 
     410                 :          4 :           shdr->sh_name = dwelf_strent_off (xndxscn_strent);
     411                 :            : 
     412                 :          4 :           (void) gelf_update_shdr (scn, shdr);
     413                 :            :         }
     414                 :            :     }
     415                 :            : 
     416                 :            : 
     417                 :            :   /* Iterate over the created sections and fill in the names.  */
     418         [ +  + ]:     352028 :   for (asmscn = ctx->section_list; asmscn != NULL; asmscn = asmscn->allnext)
     419                 :            :     {
     420                 :     352010 :       shdr = gelf_getshdr (asmscn->data.main.scn, &shdr_mem);
     421                 :            :       /* This better should not fail.  */
     422         [ -  + ]:     352010 :       assert (shdr != NULL);
     423                 :            : 
     424                 :     352010 :       shdr->sh_name = dwelf_strent_off (asmscn->data.main.strent);
     425                 :            : 
     426                 :            :       /* We now know the maximum alignment.  */
     427                 :     352010 :       shdr->sh_addralign = asmscn->max_align;
     428                 :            : 
     429                 :     352010 :       (void) gelf_update_shdr (asmscn->data.main.scn, shdr);
     430                 :            :     }
     431                 :            : 
     432                 :            :   /* Put the reference to the section header string table in the ELF
     433                 :            :      header.  */
     434                 :         18 :   ehdr = gelf_getehdr (ctx->out.elf, &ehdr_mem);
     435         [ -  + ]:         18 :   assert (ehdr != NULL);
     436                 :            : 
     437                 :         18 :   shstrscnndx = elf_ndxscn (shstrscn);
     438         [ +  + ]:         18 :   if (unlikely (shstrscnndx > SHN_HIRESERVE)
     439         [ -  + ]:         12 :       || unlikely (shstrscnndx == SHN_XINDEX))
     440                 :          6 :     {
     441                 :            :       /* The index of the section header string sectio is too large.  */
     442                 :          6 :       Elf_Scn *scn = elf_getscn (ctx->out.elf, 0);
     443                 :            : 
     444                 :            :       /* Get the header for the zeroth section.  */
     445                 :          6 :       shdr = gelf_getshdr (scn, &shdr_mem);
     446                 :            :       /* This better does not fail.  */
     447         [ -  + ]:          6 :       assert (shdr != NULL);
     448                 :            : 
     449                 :            :       /* The sh_link field of the zeroth section header contains the value.  */
     450                 :          6 :       shdr->sh_link = shstrscnndx;
     451                 :            : 
     452                 :          6 :       (void) gelf_update_shdr (scn, shdr);
     453                 :            : 
     454                 :            :       /* This is the sign for the overflow.  */
     455                 :          6 :       ehdr->e_shstrndx = SHN_XINDEX;
     456                 :            :     }
     457                 :            :   else
     458                 :         12 :     ehdr->e_shstrndx = elf_ndxscn (shstrscn);
     459                 :            : 
     460         [ -  + ]:         18 :   if (unlikely (gelf_update_ehdr (ctx->out.elf, ehdr) == 0))
     461                 :            :     {
     462                 :          0 :       __libasm_seterrno (ASM_E_LIBELF);
     463                 :          0 :       result = -1;
     464                 :            :     }
     465                 :            : 
     466                 :            :   /* Write out the ELF file.  */
     467         [ -  + ]:         18 :   if (unlikely (elf_update (ctx->out.elf, ELF_C_WRITE_MMAP) < 0))
     468                 :            :     {
     469                 :          0 :       __libasm_seterrno (ASM_E_LIBELF);
     470                 :          0 :       result = -1;
     471                 :            :     }
     472                 :            : 
     473                 :            :   /* We do not need the section header and symbol string tables anymore.  */
     474                 :         18 :   free (shstrtabdata->d_buf);
     475         [ +  + ]:         18 :   if (strtabdata != NULL)
     476                 :         10 :     free (strtabdata->d_buf);
     477                 :            :   /* We might have allocated the extended symbol table index.  */
     478         [ +  + ]:         18 :   if (xndxdata != NULL)
     479                 :          4 :     free (xndxdata->d_buf);
     480                 :            : 
     481                 :            :   /* Free section groups memory.  */
     482                 :         18 :   AsmScnGrp_t *scngrp = ctx->groups;
     483         [ +  + ]:         18 :   if (scngrp != NULL)
     484                 :      44000 :     do
     485                 :      44000 :       free (elf_getdata (scngrp->scn, NULL)->d_buf);
     486         [ +  + ]:      44000 :     while ((scngrp = scngrp->next) != ctx->groups);
     487                 :            : 
     488                 :            :   /* Finalize the ELF handling.  */
     489         [ -  + ]:         18 :   if (unlikely (elf_end (ctx->out.elf)) != 0)
     490                 :            :     {
     491                 :          0 :       __libasm_seterrno (ASM_E_LIBELF);
     492                 :          0 :       result = -1;
     493                 :            :     }
     494                 :            : 
     495                 :            :   /* Free the temporary resources.  */
     496                 :         18 :   free (symtab);
     497                 :            : 
     498                 :         18 :   return result;
     499                 :            : }
     500                 :            : 
     501                 :            : 
     502                 :            : int
     503                 :         18 : asm_end (AsmCtx_t *ctx)
     504                 :            : {
     505                 :         18 :   int result;
     506                 :            : 
     507         [ -  + ]:         18 :   if (ctx == NULL)
     508                 :            :     /* Something went wrong earlier.  */
     509                 :            :     return -1;
     510                 :            : 
     511         [ -  + ]:         18 :   result = unlikely (ctx->textp) ? text_end (ctx) : binary_end (ctx);
     512         [ +  - ]:         18 :   if (result != 0)
     513                 :            :     return result;
     514                 :            : 
     515                 :            :   /* Make the new file globally readable and user/group-writable.  */
     516         [ -  + ]:         18 :   if (fchmod (ctx->fd, S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP | S_IROTH) != 0)
     517                 :            :     {
     518                 :          0 :       __libasm_seterrno (ASM_E_CANNOT_CHMOD);
     519                 :          0 :       return -1;
     520                 :            :     }
     521                 :            : 
     522                 :            :   /* Rename output file.  */
     523         [ -  + ]:         18 :   if (rename (ctx->tmp_fname, ctx->fname) != 0)
     524                 :            :     {
     525                 :          0 :       __libasm_seterrno (ASM_E_CANNOT_RENAME);
     526                 :          0 :       return -1;
     527                 :            :     }
     528                 :            : 
     529                 :            :   /* Free the resources.  */
     530                 :         18 :   __libasm_finictx (ctx);
     531                 :            : 
     532                 :         18 :   return 0;
     533                 :            : }
     534                 :            : 
     535                 :            : 
     536                 :            : static void
     537                 :     352014 : free_section (AsmScn_t *scnp)
     538                 :            : {
     539                 :     352014 :   void *oldp;
     540                 :            : 
     541         [ +  + ]:     352014 :   if (scnp->subnext != NULL)
     542                 :          4 :     free_section (scnp->subnext);
     543                 :            : 
     544                 :            :   /* This is a circular single linked list.  */
     545                 :     352014 :   struct AsmData *data = scnp->content;
     546         [ +  + ]:     352014 :   if (data != NULL)
     547                 :            :     {
     548                 :     352010 :       while (data != scnp->content)
     549                 :            :         {
     550                 :            :           oldp = data;
     551                 :            :           data = data->next;
     552                 :            :           free (oldp);
     553                 :            :         }
     554                 :     352010 :       free (scnp->content);
     555                 :            :     }
     556                 :     352014 :   free (scnp);
     557                 :     352014 : }
     558                 :            : 
     559                 :            : 
     560                 :            : void
     561                 :            : internal_function
     562                 :         18 : __libasm_finictx (AsmCtx_t *ctx)
     563                 :            : {
     564                 :            :   /* Iterate through section table and free individual entries.  */
     565                 :         18 :   AsmScn_t *scn = ctx->section_list;
     566         [ +  + ]:     352028 :   while (scn != NULL)
     567                 :            :     {
     568                 :     352010 :       AsmScn_t *oldp = scn;
     569                 :     352010 :       scn = scn->allnext;
     570                 :     352010 :       free_section (oldp);
     571                 :            :     }
     572                 :            : 
     573                 :            :   /* Free the resources of the symbol table.  */
     574                 :         18 :   void *runp = NULL;
     575                 :         18 :   AsmSym_t *sym;
     576         [ +  + ]:     176028 :   while ((sym = asm_symbol_tab_iterate (&ctx->symbol_tab, &runp)) != NULL)
     577                 :     176010 :     free (sym);
     578                 :         18 :   asm_symbol_tab_free (&ctx->symbol_tab);
     579                 :            : 
     580                 :            : 
     581                 :            :   /* Free section groups.  */
     582                 :         18 :   AsmScnGrp_t *scngrp = ctx->groups;
     583         [ +  + ]:         18 :   if (scngrp != NULL)
     584                 :      44000 :     do
     585                 :            :       {
     586                 :      44000 :         AsmScnGrp_t *oldp = scngrp;
     587                 :            : 
     588                 :      44000 :         scngrp = scngrp->next;
     589                 :      44000 :         free (oldp);
     590                 :            :       }
     591         [ +  + ]:      44000 :     while (scngrp != ctx->groups);
     592                 :            : 
     593                 :            : 
     594         [ -  + ]:         18 :   if (unlikely (ctx->textp))
     595                 :            :     {
     596                 :            :       /* Close the stream.  */
     597                 :          0 :       fclose (ctx->out.file);
     598                 :            :     }
     599                 :            :   else
     600                 :            :     {
     601                 :            :       /* Close the output file.  */
     602                 :            :       /* XXX We should test for errors here but what would we do if we'd
     603                 :            :          find any.  */
     604                 :         18 :       (void) close (ctx->fd);
     605                 :            : 
     606                 :            :       /* And the string tables.  */
     607                 :         18 :       dwelf_strtab_free (ctx->section_strtab);
     608                 :         18 :       dwelf_strtab_free (ctx->symbol_strtab);
     609                 :            :     }
     610                 :            : 
     611                 :            :   /* Initialize the lock.  */
     612                 :         18 :   rwlock_fini (ctx->lock);
     613                 :            : 
     614                 :            :   /* Finally free the data structure.   */
     615                 :         18 :   free (ctx);
     616                 :         18 : }

Generated by: LCOV version 1.16