|
153
|
1 /*
|
|
|
2 * Copyright (c) 1995 by Sun Microsystems, Inc.
|
|
|
3 * All rights reserved.
|
|
|
4 *
|
|
|
5 * This source code is a product of Sun Microsystems, Inc. and is provided
|
|
|
6 * for unrestricted use provided that this legend is included on all tape
|
|
|
7 * media and as a part of the software program in whole or part. Users
|
|
|
8 * may copy or modify this source code without charge, but are not authorized
|
|
|
9 * to license or distribute it to anyone else except as part of a product or
|
|
|
10 * program developed by the user.
|
|
|
11 *
|
|
|
12 * THIS PROGRAM CONTAINS SOURCE CODE COPYRIGHTED BY SUN MICROSYSTEMS, INC.
|
|
|
13 * SUN MICROSYSTEMS, INC., MAKES NO REPRESENTATIONS ABOUT THE SUITABLITY
|
|
|
14 * OF SUCH SOURCE CODE FOR ANY PURPOSE. IT IS PROVIDED "AS IS" WITHOUT
|
|
|
15 * EXPRESS OR IMPLIED WARRANTY OF ANY KIND. SUN MICROSYSTEMS, INC. DISCLAIMS
|
|
|
16 * ALL WARRANTIES WITH REGARD TO SUCH SOURCE CODE, INCLUDING ALL IMPLIED
|
|
|
17 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN
|
|
|
18 * NO EVENT SHALL SUN MICROSYSTEMS, INC. BE LIABLE FOR ANY SPECIAL, INDIRECT,
|
|
|
19 * INCIDENTAL, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING
|
|
|
20 * FROM USE OF SUCH SOURCE CODE, REGARDLESS OF THE THEORY OF LIABILITY.
|
|
|
21 *
|
|
|
22 * This source code is provided with no support and without any obligation on
|
|
|
23 * the part of Sun Microsystems, Inc. to assist in its use, correction,
|
|
|
24 * modification or enhancement.
|
|
|
25 *
|
|
|
26 * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
|
|
|
27 * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY THIS
|
|
|
28 * SOURCE CODE OR ANY PART THEREOF.
|
|
|
29 *
|
|
|
30 * Sun Microsystems, Inc.
|
|
|
31 * 2550 Garcia Avenue
|
|
|
32 * Mountain View, California 94043
|
|
|
33 */
|
|
|
34
|
|
|
35 #pragma ident "@(#) $Id: _relocate.c,v 1.3 1997/05/29 04:23:02 steve Exp $ - SMI"
|
|
|
36
|
|
|
37 /* LINTLIBRARY */
|
|
|
38
|
|
|
39 #include <libelf.h>
|
|
|
40 #include <string.h>
|
|
|
41 #include <machdep.h>
|
|
|
42 #include "_dynodump.h"
|
|
|
43
|
|
|
44 void
|
|
|
45 update_reloc(Cache *ocache, Cache *_ocache,
|
|
|
46 Cache *icache, Cache *_icache,
|
|
|
47 Half shnum)
|
|
|
48 {
|
|
|
49 Shdr *shdr;
|
|
|
50 Rel *rels;
|
|
|
51 int reln, cnt;
|
|
|
52 Cache *orcache, *ircache;
|
|
|
53
|
|
|
54 /*
|
|
|
55 * Set up to readh the output relocation table.
|
|
|
56 */
|
|
|
57 shdr = _ocache->c_shdr;
|
|
|
58 rels = (Rel *) _ocache->c_data->d_buf;
|
|
|
59 reln = shdr->sh_size / shdr->sh_entsize;
|
|
|
60
|
|
|
61 /*
|
|
|
62 * Determine the section that is being relocated.
|
|
|
63 */
|
|
|
64 orcache = &ocache[shdr->sh_info];
|
|
|
65 shdr = _icache->c_shdr;
|
|
|
66 ircache = &icache[shdr->sh_info];
|
|
|
67
|
|
|
68 /*
|
|
|
69 * Determine the section that is being relocated. Note that for this
|
|
|
70 * stupid architecture the .rel.plt actually contains offsets into the
|
|
|
71 * .got.
|
|
|
72 */
|
|
|
73 if (strcmp(_ocache->c_name, ".rel.plt")) {
|
|
|
74 orcache = &ocache[shdr->sh_info];
|
|
|
75 shdr = _icache->c_shdr;
|
|
|
76 ircache = &icache[shdr->sh_info];
|
|
|
77 } else {
|
|
|
78 Half ndx;
|
|
|
79 Cache * __ocache = ocache;
|
|
|
80
|
|
|
81 for (__ocache++, ndx = 1; ndx != shnum; ndx++, __ocache++) {
|
|
|
82 if (strcmp(__ocache->c_name, ".got") == 0) {
|
|
|
83 orcache = __ocache;
|
|
|
84 ircache = &icache[ndx];
|
|
|
85 break;
|
|
|
86 }
|
|
|
87 }
|
|
|
88 }
|
|
|
89
|
|
|
90 /*
|
|
|
91 * Loop through the relocation table.
|
|
|
92 */
|
|
|
93 for (cnt = 0; cnt < reln; cnt++, rels++) {
|
|
|
94 unsigned char *iaddr, *oaddr;
|
|
|
95 Addr off;
|
|
|
96 unsigned char type = ELF_R_TYPE(rels->r_info);
|
|
|
97
|
|
|
98 /*
|
|
|
99 * Ignore some relocations as these can be safely carried out
|
|
|
100 * twice (they simply override any existing data). In fact,
|
|
|
101 * some relocations like __iob's copy relocation must be carried
|
|
|
102 * out each time the process restarts, otherwise stdio blows up.
|
|
|
103 */
|
|
|
104 if ((type == R_386_COPY) || (type == R_386_NONE))
|
|
|
105 continue;
|
|
|
106
|
|
|
107 /*
|
|
|
108 * If we are required to restore the relocation location
|
|
|
109 * to its value prior to relocation, then read the
|
|
|
110 * location's original contents from the input image and
|
|
|
111 * copy it to the output image.
|
|
|
112 */
|
|
|
113 off = rels->r_offset - ircache->c_shdr->sh_addr;
|
|
|
114 iaddr = (unsigned char *) ircache->c_data->d_buf + off;
|
|
|
115 oaddr = (unsigned char *) orcache->c_data->d_buf + off;
|
|
|
116 *(unsigned long *) oaddr = *(unsigned long *) iaddr;
|
|
|
117 }
|
|
|
118 }
|
