1*0Sstevel@tonic-gate /* 2*0Sstevel@tonic-gate * CDDL HEADER START 3*0Sstevel@tonic-gate * 4*0Sstevel@tonic-gate * The contents of this file are subject to the terms of the 5*0Sstevel@tonic-gate * Common Development and Distribution License, Version 1.0 only 6*0Sstevel@tonic-gate * (the "License"). You may not use this file except in compliance 7*0Sstevel@tonic-gate * with the License. 8*0Sstevel@tonic-gate * 9*0Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 10*0Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing. 11*0Sstevel@tonic-gate * See the License for the specific language governing permissions 12*0Sstevel@tonic-gate * and limitations under the License. 13*0Sstevel@tonic-gate * 14*0Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each 15*0Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 16*0Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the 17*0Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying 18*0Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner] 19*0Sstevel@tonic-gate * 20*0Sstevel@tonic-gate * CDDL HEADER END 21*0Sstevel@tonic-gate */ 22*0Sstevel@tonic-gate /* Copyright (c) 1988 AT&T */ 23*0Sstevel@tonic-gate /* All Rights Reserved */ 24*0Sstevel@tonic-gate 25*0Sstevel@tonic-gate 26*0Sstevel@tonic-gate /* 27*0Sstevel@tonic-gate * Copyright (c) 1998 by Sun Microsystems, Inc. 28*0Sstevel@tonic-gate * All rights reserved. 29*0Sstevel@tonic-gate */ 30*0Sstevel@tonic-gate 31*0Sstevel@tonic-gate 32*0Sstevel@tonic-gate #pragma ident "%Z%%M% %I% %E% SMI" /* SVr4.0 1.11 */ 33*0Sstevel@tonic-gate 34*0Sstevel@tonic-gate #pragma weak elf_end = _elf_end 35*0Sstevel@tonic-gate 36*0Sstevel@tonic-gate 37*0Sstevel@tonic-gate #include "syn.h" 38*0Sstevel@tonic-gate #include <ar.h> 39*0Sstevel@tonic-gate #include <stdlib.h> 40*0Sstevel@tonic-gate #include "libelf.h" 41*0Sstevel@tonic-gate #include "decl.h" 42*0Sstevel@tonic-gate #include "member.h" 43*0Sstevel@tonic-gate 44*0Sstevel@tonic-gate 45*0Sstevel@tonic-gate int 46*0Sstevel@tonic-gate elf_end(Elf * elf) 47*0Sstevel@tonic-gate { 48*0Sstevel@tonic-gate Elf_Scn * s; 49*0Sstevel@tonic-gate Dnode * d; 50*0Sstevel@tonic-gate Elf_Void * trail = 0; 51*0Sstevel@tonic-gate int rc; 52*0Sstevel@tonic-gate 53*0Sstevel@tonic-gate if (elf == 0) 54*0Sstevel@tonic-gate return (0); 55*0Sstevel@tonic-gate 56*0Sstevel@tonic-gate ELFWLOCK(elf) 57*0Sstevel@tonic-gate if (--elf->ed_activ != 0) { 58*0Sstevel@tonic-gate rc = elf->ed_activ; 59*0Sstevel@tonic-gate ELFUNLOCK(elf) 60*0Sstevel@tonic-gate return (rc); 61*0Sstevel@tonic-gate } 62*0Sstevel@tonic-gate 63*0Sstevel@tonic-gate #ifndef __lock_lint 64*0Sstevel@tonic-gate while (elf->ed_activ == 0) { 65*0Sstevel@tonic-gate for (s = elf->ed_hdscn; s != 0; s = s->s_next) { 66*0Sstevel@tonic-gate if (s->s_myflags & SF_ALLOC) { 67*0Sstevel@tonic-gate if (trail != 0) 68*0Sstevel@tonic-gate free(trail); 69*0Sstevel@tonic-gate trail = (Elf_Void *)s; 70*0Sstevel@tonic-gate } 71*0Sstevel@tonic-gate 72*0Sstevel@tonic-gate if ((s->s_myflags & SF_READY) == 0) 73*0Sstevel@tonic-gate continue; 74*0Sstevel@tonic-gate for (d = s->s_hdnode; d != 0; ) { 75*0Sstevel@tonic-gate register Dnode *t; 76*0Sstevel@tonic-gate 77*0Sstevel@tonic-gate if (d->db_buf != 0) 78*0Sstevel@tonic-gate free(d->db_buf); 79*0Sstevel@tonic-gate if ((t = d->db_raw) != 0) { 80*0Sstevel@tonic-gate if (t->db_buf != 0) 81*0Sstevel@tonic-gate free(t->db_buf); 82*0Sstevel@tonic-gate if (t->db_myflags & DBF_ALLOC) 83*0Sstevel@tonic-gate free(t); 84*0Sstevel@tonic-gate } 85*0Sstevel@tonic-gate t = d->db_next; 86*0Sstevel@tonic-gate if (d->db_myflags & DBF_ALLOC) 87*0Sstevel@tonic-gate free(d); 88*0Sstevel@tonic-gate d = t; 89*0Sstevel@tonic-gate } 90*0Sstevel@tonic-gate } 91*0Sstevel@tonic-gate if (trail != 0) { 92*0Sstevel@tonic-gate free(trail); 93*0Sstevel@tonic-gate trail = 0; 94*0Sstevel@tonic-gate } 95*0Sstevel@tonic-gate 96*0Sstevel@tonic-gate { 97*0Sstevel@tonic-gate register Memlist *l; 98*0Sstevel@tonic-gate register Memident *i; 99*0Sstevel@tonic-gate 100*0Sstevel@tonic-gate for (l = elf->ed_memlist; l; l = (Memlist *)trail) { 101*0Sstevel@tonic-gate trail = (Elf_Void *)l->m_next; 102*0Sstevel@tonic-gate for (i = (Memident *)(l + 1); i < l->m_free; 103*0Sstevel@tonic-gate i++) 104*0Sstevel@tonic-gate free(i->m_member); 105*0Sstevel@tonic-gate free(l); 106*0Sstevel@tonic-gate } 107*0Sstevel@tonic-gate } 108*0Sstevel@tonic-gate if (elf->ed_myflags & EDF_EHALLOC) 109*0Sstevel@tonic-gate free(elf->ed_ehdr); 110*0Sstevel@tonic-gate if (elf->ed_myflags & EDF_PHALLOC) 111*0Sstevel@tonic-gate free(elf->ed_phdr); 112*0Sstevel@tonic-gate if (elf->ed_myflags & EDF_SHALLOC) 113*0Sstevel@tonic-gate free(elf->ed_shdr); 114*0Sstevel@tonic-gate if (elf->ed_myflags & EDF_RAWALLOC) 115*0Sstevel@tonic-gate free(elf->ed_raw); 116*0Sstevel@tonic-gate if (elf->ed_myflags & EDF_ASALLOC) 117*0Sstevel@tonic-gate free(elf->ed_arsym); 118*0Sstevel@tonic-gate if (elf->ed_myflags & EDF_ASTRALLOC) 119*0Sstevel@tonic-gate free(elf->ed_arstr); 120*0Sstevel@tonic-gate 121*0Sstevel@tonic-gate /* 122*0Sstevel@tonic-gate * Don't release the image until the last reference dies. 123*0Sstevel@tonic-gate * If the image was introduced via elf_memory() then 124*0Sstevel@tonic-gate * we don't release it at all, it's not ours to release. 125*0Sstevel@tonic-gate */ 126*0Sstevel@tonic-gate 127*0Sstevel@tonic-gate if (elf->ed_parent == 0) { 128*0Sstevel@tonic-gate if (elf->ed_vm != 0) 129*0Sstevel@tonic-gate free(elf->ed_vm); 130*0Sstevel@tonic-gate else if ((elf->ed_myflags & EDF_MEMORY) == 0) 131*0Sstevel@tonic-gate _elf_unmap(elf->ed_image, elf->ed_imagesz); 132*0Sstevel@tonic-gate } 133*0Sstevel@tonic-gate trail = (Elf_Void *)elf; 134*0Sstevel@tonic-gate elf = elf->ed_parent; 135*0Sstevel@tonic-gate ELFUNLOCK(trail) 136*0Sstevel@tonic-gate free(trail); 137*0Sstevel@tonic-gate if (elf == 0) 138*0Sstevel@tonic-gate break; 139*0Sstevel@tonic-gate /* 140*0Sstevel@tonic-gate * If parent is inactive we close 141*0Sstevel@tonic-gate * it too, so we need to lock it too. 142*0Sstevel@tonic-gate */ 143*0Sstevel@tonic-gate ELFWLOCK(elf) 144*0Sstevel@tonic-gate --elf->ed_activ; 145*0Sstevel@tonic-gate } 146*0Sstevel@tonic-gate 147*0Sstevel@tonic-gate if (elf) { 148*0Sstevel@tonic-gate ELFUNLOCK(elf) 149*0Sstevel@tonic-gate } 150*0Sstevel@tonic-gate #else 151*0Sstevel@tonic-gate /* 152*0Sstevel@tonic-gate * This sill stuff is here to make warlock happy 153*0Sstevel@tonic-gate * durring it's lock checking. The problem is that it 154*0Sstevel@tonic-gate * just can't track the multiple dynamic paths through 155*0Sstevel@tonic-gate * the above loop so we just give it a simple one it can 156*0Sstevel@tonic-gate * look at. 157*0Sstevel@tonic-gate */ 158*0Sstevel@tonic-gate _elf_unmap(elf->ed_image, elf->ed_imagesz); 159*0Sstevel@tonic-gate ELFUNLOCK(elf) 160*0Sstevel@tonic-gate #endif 161*0Sstevel@tonic-gate 162*0Sstevel@tonic-gate return (0); 163*0Sstevel@tonic-gate } 164