1 /*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License (the "License").
6 * You may not use this file except in compliance with the License.
7 *
8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9 * or http://www.opensolaris.org/os/licensing.
10 * See the License for the specific language governing permissions
11 * and limitations under the License.
12 *
13 * When distributing Covered Code, include this CDDL HEADER in each
14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15 * If applicable, add the following below this CDDL HEADER, with the
16 * fields enclosed by brackets "[]" replaced with your own identifying
17 * information: Portions Copyright [yyyy] [name of copyright owner]
18 *
19 * CDDL HEADER END
20 */
21 /*
22 * Copyright 2006 Sun Microsystems, Inc. All rights reserved.
23 * Use is subject to license terms.
24 */
25
26 #include <dlfcn.h>
27 #include <link.h>
28 #include <pthread.h>
29 #include <assert.h>
30
31 #include <fm/topo_mod.h>
32
33 #include <topo_error.h>
34 #include <topo_alloc.h>
35 #include <topo_subr.h>
36
37 typedef struct topo_rtld {
38 void *rtld_dlp; /* libdl handle for shared library */
39 int (*rtld_init)(topo_mod_t *, topo_version_t); /* .so _topo_init() */
40 void (*rtld_fini)(topo_mod_t *); /* .so _topo_fini() */
41 } topo_rtld_t;
42
43 static int
rtld_fini(topo_mod_t * mod)44 rtld_fini(topo_mod_t *mod)
45 {
46 topo_rtld_t *rp = mod->tm_data;
47
48 assert(mod != NULL);
49
50 if (mod->tm_flags & TOPO_MOD_REG) {
51 rp->rtld_fini(mod);
52 if (mod->tm_flags & TOPO_MOD_REG) {
53 topo_mod_unregister(mod);
54 }
55 }
56
57 if (getenv("TOPONODLCLOSE") == NULL)
58 (void) dlclose(rp->rtld_dlp);
59 topo_mod_free(mod, rp, sizeof (topo_rtld_t));
60
61 return (0);
62 }
63
64 static int
rtld_init(topo_mod_t * mod,topo_version_t version)65 rtld_init(topo_mod_t *mod, topo_version_t version)
66 {
67 int err;
68 topo_rtld_t *rp;
69 void *dlp;
70
71 if ((dlp = dlopen(mod->tm_path, RTLD_LOCAL | RTLD_NOW)) == NULL) {
72 topo_dprintf(mod->tm_hdl, TOPO_DBG_ERR,
73 "dlopen() failed: %s\n", dlerror());
74 return (topo_mod_seterrno(mod, ETOPO_RTLD_OPEN));
75 }
76
77 if ((rp = mod->tm_data = topo_mod_alloc(mod, sizeof (topo_rtld_t)))
78 == NULL)
79 return (topo_mod_seterrno(mod, ETOPO_RTLD_OPEN));
80
81 rp->rtld_dlp = dlp;
82 rp->rtld_init = (int (*)())dlsym(dlp, "_topo_init");
83 rp->rtld_fini = (void (*)())dlsym(dlp, "_topo_fini");
84
85 if (rp->rtld_init == NULL) {
86 (void) dlclose(dlp);
87 topo_free(rp, sizeof (topo_rtld_t));
88 return (topo_mod_seterrno(mod, ETOPO_RTLD_INIT));
89 }
90
91 /*
92 * Call _topo_init() in the module.
93 */
94 err = rp->rtld_init(mod, version);
95
96 if (err < 0 || !(mod->tm_flags & TOPO_MOD_REG)) {
97 (void) rtld_fini(mod);
98 return (topo_mod_seterrno(mod, ETOPO_MOD_NOREG));
99 }
100
101 return (0);
102 }
103
104 const topo_imodops_t topo_rtld_ops = {
105 rtld_init,
106 rtld_fini,
107 };
108