diff options
author | Roland McGrath <roland@gnu.org> | 2002-10-18 01:10:44 +0000 |
---|---|---|
committer | Roland McGrath <roland@gnu.org> | 2002-10-18 01:10:44 +0000 |
commit | 1f0c4a1006d76e7115340325388b26fd50cd0cad (patch) | |
tree | 05f3d0af3ebfe3ef0ba27978545ff1e3e06bcdd7 /elf | |
parent | 3a12e572f71862db28527714896b4b8e7ba07e63 (diff) | |
download | glibc-1f0c4a1006d76e7115340325388b26fd50cd0cad.zip glibc-1f0c4a1006d76e7115340325388b26fd50cd0cad.tar.gz glibc-1f0c4a1006d76e7115340325388b26fd50cd0cad.tar.bz2 |
2002-10-17 Roland McGrath <roland@redhat.com>
* elf/dl-close.c (remove_slotinfo): Take new argument. If false,
allow IDX to be one past the current last slotinfo entry.
(_dl_close): Pass IMAP->l_init_called for that parameter.
Diffstat (limited to 'elf')
-rw-r--r-- | elf/dl-close.c | 34 |
1 files changed, 22 insertions, 12 deletions
diff --git a/elf/dl-close.c b/elf/dl-close.c index 7655ef4..3d8122a 100644 --- a/elf/dl-close.c +++ b/elf/dl-close.c @@ -36,19 +36,29 @@ typedef void (*fini_t) (void); #ifdef USE_TLS /* Returns true we an non-empty was found. */ static bool -remove_slotinfo (size_t idx, struct dtv_slotinfo_list *listp, size_t disp) +remove_slotinfo (size_t idx, struct dtv_slotinfo_list *listp, size_t disp, + bool should_be_there) { if (idx - disp >= listp->len) { - /* There must be a next entry. Otherwise would the index be wrong. */ - assert (listp->next != NULL); - - if (remove_slotinfo (idx, listp->next, disp + listp->len)) - return true; + if (listp->next == NULL) + { + /* The index is not actually valid in the slotinfo list, + because this object was closed before it was fully setup + due to some error. */ + assert (idx - disp == listp->len); + assert (! should_be_there); + } + else + { + if (remove_slotinfo (idx, listp->next, disp + listp->len, + should_be_there)) + return true; - /* No non-empty entry. Search from the end of this elements - slotinfo array. */ - idx = disp + listp->len; + /* No non-empty entry. Search from the end of this element's + slotinfo array. */ + idx = disp + listp->len; + } } else { @@ -267,14 +277,14 @@ _dl_close (void *_map) } #ifdef USE_TLS - /* Remove the object from the dtv slotinfo array if it uses - TLS. */ + /* Remove the object from the dtv slotinfo array if it uses TLS. */ if (__builtin_expect (imap->l_tls_blocksize > 0, 0)) { any_tls = true; if (! remove_slotinfo (imap->l_tls_modid, - GL(dl_tls_dtv_slotinfo_list), 0)) + GL(dl_tls_dtv_slotinfo_list), 0, + imap->l_init_called)) /* All dynamically loaded modules with TLS are unloaded. */ GL(dl_tls_max_dtv_idx) = GL(dl_tls_static_nelem); } |