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/*
23 * Copyright (c) 1996, 2010, Oracle and/or its affiliates. All rights reserved.
24 */
25#include <stdio.h>
26#include <stdlib.h>
27#include <link.h>
28
29#include "env.h"
30
31static Elist	*bindto_list = NULL;
32static Elist	*bindfrom_list = NULL;
33static FILE	*output = stdout;
34
35
36uint_t
37la_version(uint_t version)
38{
39	if (version < LAV_CURRENT) {
40		(void) fprintf(stderr,
41		    "symbindrep.so: unexpected version: %d\n", version);
42		return (0);
43	}
44
45	build_env_list(&bindto_list, (const char *)"SYMBINDREP_BINDTO");
46	build_env_list(&bindfrom_list, (const char *)"SYMBINDREP_BINDFROM");
47
48#ifdef _LP64
49	(void) fprintf(output,
50	    "                            Symbol Bindings\n\n"
51	    "Referencing                  Defining\n"
52	    "Object                       Object                       Symbol\n"
53	    "---------------------------------------------------------------"
54	    "-------------------\n");
55#else
56	(void) fprintf(output,
57	    "                    Symbol Bindings\n\n"
58	    "Referencing          Defining\n"
59	    "Object               Object               Symbol\n"
60	    "---------------------------------------------------------------"
61	    "---\n");
62#endif
63	return (LAV_CURRENT);
64}
65
66/* ARGSUSED1 */
67uint_t
68la_objopen(Link_map *lmp, Lmid_t lmid, uintptr_t *cookie)
69{
70	uint_t		flags;
71
72	if ((bindto_list == NULL) ||
73	    (check_list(bindto_list, lmp->l_name)))
74		flags = LA_FLG_BINDTO;
75	else
76		flags = 0;
77
78	if ((bindfrom_list == NULL) ||
79	    (check_list(bindfrom_list, lmp->l_name)))
80		flags |= LA_FLG_BINDFROM;
81
82	*cookie = (uintptr_t)lmp->l_name;
83	return (flags);
84}
85
86
87/* ARGSUSED1 */
88#if	defined(_LP64)
89uintptr_t
90la_symbind64(Elf64_Sym *symp, uint_t symndx, uintptr_t *refcook,
91	uintptr_t *defcook, uint_t *sb_flags, const char *sym_name)
92#else
93uintptr_t
94la_symbind32(Elf32_Sym *symp, uint_t symndx, uintptr_t *refcook,
95	uintptr_t *defcook, uint_t *sb_flags)
96#endif
97{
98#if	!defined(_LP64)
99	const char	*sym_name = (const char *)symp->st_name;
100#endif
101
102	(void) fprintf(output, "%-28s %-28s %s\n", (char *)(*refcook),
103		(char *)(*defcook), sym_name);
104
105	return (symp->st_value);
106}
107
108/*
109 * Since we only want to report on the symbol bindings for this
110 * process and we *do not* want the actual program to run we exit
111 * at this point.
112 */
113/* ARGSUSED0 */
114void
115la_preinit(uintptr_t *cookie)
116{
117	(void) fflush(output);
118	exit(0);
119}
120