Sun Jun 9 04:04:26 1996 Roland McGrath <roland@delasyd.gnu.ai.mit.edu>
[kopensolaris-gnu/glibc.git] / elf / dl-open.c
1 /* Load a shared object at runtime, relocate it, and run its initializer.
2 Copyright (C) 1996 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Library General Public License as
7 published by the Free Software Foundation; either version 2 of the
8 License, or (at your option) any later version.
9
10 The GNU C 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 the GNU C Library; see the file COPYING.LIB.  If
17 not, write to the Free Software Foundation, Inc., 675 Mass Ave,
18 Cambridge, MA 02139, USA.  */
19
20 #include <link.h>
21 #include <dlfcn.h>
22
23 struct link_map *
24 _dl_open (struct link_map *parent, const char *file, int mode)
25 {
26   struct link_map *new, *l;
27   ElfW(Addr) init;
28
29   /* Load the named object.  */
30   new = _dl_map_object (parent, file);
31
32   /* Load that object's dependencies.  */
33   _dl_map_object_deps (new);
34
35   /* Relocate the objects loaded.  */
36   for (l = new; l; l = l->l_next)
37     if (! l->l_relocated)
38       _dl_relocate_object (l, (mode & RTLD_BINDING_MASK) == RTLD_LAZY);
39
40   /* Run the initializer functions of new objects.  */
41   while (init = _dl_init_next (new))
42     (*(void (*) (void)) init) ();
43
44   return new;
45 }