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) 1988 AT&T
24 *	  All Rights Reserved
25 *
26 * Copyright (c) 1989, 2010, Oracle and/or its affiliates. All rights reserved.
27 */
28
29/*
30 * Global variables
31 */
32#include	<sys/elf.h>
33#include	"msg.h"
34#include	"_libld.h"
35
36Ld_heap		*ld_heap;	/* list of allocated blocks for */
37				/* 	link-edit dynamic allocations */
38APlist		*lib_support;	/* list of support libraries specified */
39				/*	(-S option) */
40int		demangle_flag;	/* symbol demangling required */
41
42/*
43 * Paths and directories for library searches.  These are used to set up
44 * linked lists of directories which are maintained in the ofl structure.
45 */
46char		*Plibpath;	/* User specified -YP or defaults to LIBPATH */
47char		*Llibdir;	/* User specified -YL */
48char		*Ulibdir;	/* User specified -YU */
49
50/*
51 * A default library search path is used if one was not supplied on the command
52 * line.  Note: these strings can not use MSG_ORIG() since they are modified as
53 * part of the path processing.
54 */
55char		def64_Plibpath[] = "/lib/64:/usr/lib/64";
56char		def32_Plibpath[] = "/usr/ccs/lib:/lib:/usr/lib";
57
58/*
59 * Rejected file error messages (indexed to match SGS_REJ_ values).
60 */
61const Msg
62reject[SGS_REJ_NUM] = {
63		MSG_STR_EMPTY,
64		MSG_REJ_MACH,		/* MSG_INTL(MSG_REJ_MACH) */
65		MSG_REJ_CLASS,		/* MSG_INTL(MSG_REJ_CLASS) */
66		MSG_REJ_DATA,		/* MSG_INTL(MSG_REJ_DATA) */
67		MSG_REJ_TYPE,		/* MSG_INTL(MSG_REJ_TYPE) */
68		MSG_REJ_BADFLAG,	/* MSG_INTL(MSG_REJ_BADFLAG) */
69		MSG_REJ_MISFLAG,	/* MSG_INTL(MSG_REJ_MISFLAG) */
70		MSG_REJ_VERSION,	/* MSG_INTL(MSG_REJ_VERSION) */
71		MSG_REJ_HAL,		/* MSG_INTL(MSG_REJ_HAL) */
72		MSG_REJ_US3,		/* MSG_INTL(MSG_REJ_US3) */
73		MSG_REJ_STR,		/* MSG_INTL(MSG_REJ_STR) */
74		MSG_REJ_UNKFILE,	/* MSG_INTL(MSG_REJ_UNKFILE) */
75		MSG_REJ_UNKCAP,		/* MSG_INTL(MSG_REJ_UNKCAP) */
76		MSG_REJ_HWCAP_1,	/* MSG_INTL(MSG_REJ_HWCAP_1) */
77		MSG_REJ_SFCAP_1,	/* MSG_INTL(MSG_REJ_SFCAP_1) */
78		MSG_REJ_MACHCAP,	/* MSG_INTL(MSG_REJ_MACHCAP) */
79		MSG_REJ_PLATCAP,	/* MSG_INTL(MSG_REJ_PLATCAP) */
80		MSG_REJ_HWCAP_2,	/* MSG_INTL(MSG_REJ_HWCAP_2) */
81		MSG_REJ_ARCHIVE		/* MSG_INTL(MSG_REJ_ARCHIVE) */
82	};
83#if SGS_REJ_NUM != (SGS_REJ_ARCHIVE + 1)
84#error SGS_REJ_NUM has changed
85#endif
86
87/*
88 * Symbol types that we include in .SUNW_ldynsym sections
89 * (indexed by STT_ values).
90 */
91const int
92ldynsym_symtype[] = {
93		0,			/* STT_NOTYPE (not counting 1st slot) */
94		0,			/* STT_OBJECT */
95		1,			/* STT_FUNC */
96		0,			/* STT_SECTION */
97		1,			/* STT_FILE */
98		0,			/* STT_COMMON */
99		0,			/* STT_TLS */
100		0,			/* 7 */
101		0,			/* 8 */
102		0,			/* 9 */
103		0,			/* 10 */
104		0,			/* 11 */
105		0,			/* 12 */
106		0,			/* STT_SPARC_REGISTER */
107		0,			/* 14 */
108		0,			/* 15 */
109};
110#if STT_NUM != (STT_TLS + 1)
111#error "STT_NUM has grown. Update ldynsym_symtype[]."
112#endif
113
114/*
115 * Symbol types that we include in .SUNW_dynsymsort sections
116 * (indexed by STT_ values).
117 */
118const int
119dynsymsort_symtype[] = {
120		0,			/* STT_NOTYPE */
121		1,			/* STT_OBJECT */
122		1,			/* STT_FUNC */
123		0,			/* STT_SECTION */
124		0,			/* STT_FILE */
125		1,			/* STT_COMMON */
126		0,			/* STT_TLS */
127		0,			/* 7 */
128		0,			/* 8 */
129		0,			/* 9 */
130		0,			/* 10 */
131		0,			/* 11 */
132		0,			/* 12 */
133		0,			/* STT_SPARC_REGISTER */
134		0,			/* 14 */
135		0,			/* 15 */
136};
137#if STT_NUM != (STT_TLS + 1)
138#error "STT_NUM has grown. Update dynsymsort_symtype[]."
139#endif
140