annotate dynodump/sparc/_relocate.c @ 323:4dbe6856a8dc r21-0-59

Import from CVS: tag r21-0-59
author cvs
date Mon, 13 Aug 2007 10:47:09 +0200
parents c5d627a313b1
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
153
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
1 /*
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
2 * Copyright (c) 1995 by Sun Microsystems, Inc.
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
3 * All rights reserved.
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
4 *
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
5 * This source code is a product of Sun Microsystems, Inc. and is provided
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
6 * for unrestricted use provided that this legend is included on all tape
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
7 * media and as a part of the software program in whole or part. Users
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
8 * may copy or modify this source code without charge, but are not authorized
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
9 * to license or distribute it to anyone else except as part of a product or
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
10 * program developed by the user.
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
11 *
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
12 * THIS PROGRAM CONTAINS SOURCE CODE COPYRIGHTED BY SUN MICROSYSTEMS, INC.
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
13 * SUN MICROSYSTEMS, INC., MAKES NO REPRESENTATIONS ABOUT THE SUITABLITY
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
14 * OF SUCH SOURCE CODE FOR ANY PURPOSE. IT IS PROVIDED "AS IS" WITHOUT
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
15 * EXPRESS OR IMPLIED WARRANTY OF ANY KIND. SUN MICROSYSTEMS, INC. DISCLAIMS
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
16 * ALL WARRANTIES WITH REGARD TO SUCH SOURCE CODE, INCLUDING ALL IMPLIED
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
17 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
18 * NO EVENT SHALL SUN MICROSYSTEMS, INC. BE LIABLE FOR ANY SPECIAL, INDIRECT,
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
19 * INCIDENTAL, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
20 * FROM USE OF SUCH SOURCE CODE, REGARDLESS OF THE THEORY OF LIABILITY.
272
c5d627a313b1 Import from CVS: tag r21-0b34
cvs
parents: 153
diff changeset
21 *
153
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
22 * This source code is provided with no support and without any obligation on
272
c5d627a313b1 Import from CVS: tag r21-0b34
cvs
parents: 153
diff changeset
23 * the part of Sun Microsystems, Inc. to assist in its use, correction,
153
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
24 * modification or enhancement.
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
25 *
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
26 * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
27 * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY THIS
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
28 * SOURCE CODE OR ANY PART THEREOF.
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
29 *
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
30 * Sun Microsystems, Inc.
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
31 * 2550 Garcia Avenue
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
32 * Mountain View, California 94043
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
33 */
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
34
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
35 /*
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
36 * Update the value of the `_edata' and `_end' symbols.
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
37 */
272
c5d627a313b1 Import from CVS: tag r21-0b34
cvs
parents: 153
diff changeset
38 #pragma ident "@(#) $Id: _relocate.c,v 1.4 1998/03/31 20:10:55 steve Exp $ - SMI"
153
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
39
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
40 #include <libelf.h>
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
41 #include <string.h>
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
42 #include "machdep.h"
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
43 #include "_dynodump.h"
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
44
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
45
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
46 #define GETbyte(P) ((long)((unsigned long)(P)[0]))
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
47 #define GEThalf(P) ((long)(((unsigned long)(P)[0] << 8) | \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
48 ((unsigned long)(P)[1])))
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
49 #define GETword(P) ((long)(((unsigned long)(P)[0] << 24) | \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
50 ((unsigned long)(P)[1] << 16) | \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
51 ((unsigned long)(P)[2] << 8) | \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
52 (unsigned long)(P)[3]))
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
53 #define GETdisp30(P) (GETword(P) & 0x3fffffff)
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
54 #define GETdisp22(P) (GETword(P) & 0x3fffff)
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
55 #define GETdisp16(P) (((GETword(P) & 0x300000) >> 6) | \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
56 (GETword(P) & 0x3fff))
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
57 #define GETdisp19(P) (GETword(P) & 0x7ffff)
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
58 #define GETimm22(P) (GETword(P) & 0x3fffff)
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
59 #define GETimm5(P) (GEThalf((P)+2) & 0x1f)
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
60 #define GETimm6(P) (GEThalf((P)+2) & 0x2f)
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
61 #define GETimm7(P) (GEThalf((P)+2) & 0x3f)
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
62 #define GETsimm13(P) (GEThalf((P)+2) & 0x1fff)
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
63 #define GETsimm10(P) (GEThalf((P)+2) & 0x3ff)
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
64 #define GETsimm11(P) (GEThalf((P)+2) & 0x7ff)
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
65 #define GETplt22(P) (GETword((P)+8) & 0x3fffff)
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
66
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
67 #define PUTbyte(V, P) (P)[0] = (V)
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
68 #define PUThalf(V, P) (P)[0] = ((V) >> 8); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
69 (P)[1] = ((V))
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
70 #define PUTword(V, P) (P)[0] = (unsigned char)((V) >> 24); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
71 (P)[1] = (unsigned char)((V) >> 16); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
72 (P)[2] = (unsigned char)((V) >> 8); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
73 (P)[3] = (unsigned char)(V)
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
74 #define PUTdisp30(V, P) { \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
75 unsigned long int temp; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
76 temp = GETword(P) & ~0x3fffffff; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
77 temp |= ((V) & 0x3fffffff); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
78 PUTword(temp, P); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
79 }
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
80 #define PUTdisp22(V, P) { \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
81 unsigned long int temp; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
82 temp = GETword(P) & ~0x3fffff; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
83 temp |= ((V) & 0x3fffff); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
84 PUTword(temp, P); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
85 }
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
86 #define PUTimm22(V, P) { \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
87 unsigned long int temp; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
88 temp = GETword(P) & ~0x3fffff; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
89 temp |= ((V) & 0x3fffff); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
90 PUTword(temp, P); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
91 }
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
92 #define PUTimm5(V, P) { \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
93 unsigned long int temp; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
94 temp = GEThalf(P+2) & ~0x1f; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
95 temp |= ((V) & 0x1f); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
96 PUThalf(temp, (P+2)); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
97 }
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
98 #define PUTimm6(V, P) { \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
99 unsigned long int temp; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
100 temp = GEThalf(P+2) & ~0x2f; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
101 temp |= ((V) & 0x2f); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
102 PUThalf(temp, (P+2)); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
103 }
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
104 #define PUTimm7(V, P) { \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
105 unsigned long int temp; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
106 temp = GEThalf(P+2) & ~0x3f; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
107 temp |= ((V) & 0x3f); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
108 PUThalf(temp, (P+2)); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
109 }
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
110 #define PUTsimm13(V, P) { \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
111 unsigned long int temp; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
112 temp = GEThalf(P+2) & ~0x1fff; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
113 temp |= ((V) & 0x1fff); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
114 PUThalf(temp, (P+2)); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
115 }
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
116 #define PUTplt22(V, P) { \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
117 unsigned long int temp; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
118 temp = GETword((P)+8) & ~0x3fffff; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
119 temp |= ((V) & 0x3fffff); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
120 PUTword(temp, ((P)+8)); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
121 }
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
122 #define PUTsimm10(V, P) { \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
123 unsigned long int temp; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
124 temp = GEThalf(P+2) & ~0x3ff; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
125 temp |= ((V) & 0x3ff); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
126 PUThalf(temp, (P+2)); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
127 }
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
128 #define PUTsimm11(V, P) { \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
129 unsigned long int temp; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
130 temp = GEThalf(P+2) & ~0x7ff; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
131 temp |= ((V) & 0x7ff); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
132 PUThalf(temp, (P+2)); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
133 }
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
134 #define PUTdisp16(V, P) { \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
135 unsigned long int temp; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
136 temp = GETword(P) & ~0x303fff; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
137 temp |= ((V) & 0xc000) << 6; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
138 temp |= ((V) & 0x3fff); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
139 PUTword(temp, P); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
140 }
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
141 #define PUTdisp19(V, P) { \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
142 unsigned long int temp; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
143 temp = GETword(P) & ~0x7ffff; \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
144 temp |= ((V) & 0x7ffff); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
145 PUTword(temp, P); \
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
146 }
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
147
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
148 static void
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
149 move_reloc(unsigned char * iaddr, unsigned char * oaddr, unsigned char type)
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
150 {
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
151 switch (type) {
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
152 case R_SPARC_8:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
153 case R_SPARC_DISP8:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
154 PUTbyte(GETbyte(iaddr), oaddr);
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
155 break;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
156
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
157 case R_SPARC_16:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
158 case R_SPARC_DISP16:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
159 PUThalf(GEThalf(iaddr), oaddr);
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
160 break;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
161
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
162 case R_SPARC_32:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
163 case R_SPARC_DISP32:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
164 case R_SPARC_GLOB_DAT:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
165 case R_SPARC_RELATIVE:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
166 case R_SPARC_UA32:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
167 PUTword(GETword(iaddr), oaddr);
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
168 break;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
169
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
170 case R_SPARC_WDISP30:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
171 case R_SPARC_WPLT30:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
172 PUTdisp30(GETdisp30(iaddr), oaddr);
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
173 break;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
174
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
175 case R_SPARC_WDISP22:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
176 case R_SPARC_PC22:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
177 PUTdisp22(GETdisp22(iaddr), oaddr);
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
178 break;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
179
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
180 case R_SPARC_HI22:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
181 case R_SPARC_GOT22:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
182 case R_SPARC_22:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
183 PUTimm22(GETimm22(iaddr), oaddr);
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
184 break;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
185
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
186 case R_SPARC_13:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
187 case R_SPARC_GOT13:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
188 PUTsimm13(GETsimm13(iaddr), oaddr);
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
189 break;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
190
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
191 case R_SPARC_LO10:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
192 case R_SPARC_GOT10:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
193 case R_SPARC_PC10:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
194 #ifdef R_SPARC_10
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
195 case R_SPARC_10:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
196 #endif
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
197 PUTsimm10(GETsimm10(iaddr), oaddr);
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
198 break;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
199
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
200 #ifdef R_SPARC_11
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
201 case R_SPARC_11:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
202 PUTsimm11(GETsimm11(iaddr), oaddr);
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
203 break;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
204 #endif
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
205
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
206 #ifdef R_SPARC_WDISP16
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
207 case R_SPARC_WDISP16:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
208 PUTdisp16(GETdisp16(iaddr), oaddr);
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
209 break;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
210 #endif
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
211
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
212 #ifdef R_SPARC_WDISP19
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
213 case R_SPARC_WDISP19:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
214 PUTdisp19(GETdisp19(iaddr), oaddr);
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
215 break;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
216 #endif
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
217
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
218 #ifdef R_SPARC_5
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
219 case R_SPARC_5:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
220 PUTimm5(GETimm5(iaddr), oaddr);
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
221 break;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
222 #endif
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
223
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
224 #ifdef R_SPARC_6
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
225 case R_SPARC_6:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
226 PUTimm6(GETimm6(iaddr), oaddr);
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
227 break;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
228 #endif
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
229
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
230 #ifdef R_SPARC_7
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
231 case R_SPARC_7:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
232 PUTimm7(GETimm7(iaddr), oaddr);
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
233 break;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
234 #endif
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
235
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
236 default:
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
237 break;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
238 }
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
239 }
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
240
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
241 void
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
242 update_reloc(Cache *ocache, Cache *_ocache,
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
243 Cache *icache, Cache *_icache,
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
244 Half shnum)
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
245 {
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
246 Shdr *shdr;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
247 Rel *rels;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
248 int reln, cnt;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
249 Cache *orcache, *ircache;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
250
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
251 /*
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
252 * Set up to read the output relocation table.
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
253 */
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
254 shdr = _ocache->c_shdr;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
255 rels = (Rel *)_ocache->c_data->d_buf;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
256 reln = shdr->sh_size / shdr->sh_entsize;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
257
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
258 /*
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
259 * Determine the section that is being relocated.
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
260 */
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
261 orcache = &ocache[shdr->sh_info];
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
262 shdr = _icache->c_shdr;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
263 ircache = &icache[shdr->sh_info];
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
264
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
265 /*
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
266 * Loop through the relocation table.
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
267 */
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
268 for (cnt = 0; cnt < reln; cnt++, rels++) {
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
269 unsigned char *iaddr, *oaddr;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
270 Addr off;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
271 unsigned char type = ELF_R_TYPE(rels->r_info);
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
272
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
273 /*
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
274 * Ignore some relocations as these can safely be carried out
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
275 * twice (they simply override any existing data). In fact,
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
276 * some relocations like __iob's copy relocation must be carried
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
277 * out each time the process restarts otherwise stdio blows up.
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
278 */
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
279 if ((type == R_SPARC_COPY) || (type == R_SPARC_JMP_SLOT) ||
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
280 (type == R_SPARC_NONE))
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
281 continue;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
282
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
283 /*
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
284 * If we are required to restore the relocation location
272
c5d627a313b1 Import from CVS: tag r21-0b34
cvs
parents: 153
diff changeset
285 * to its value prior to relocation, then read the
153
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
286 * locations original contents from the input image and
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
287 * copy it to the output image.
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
288 */
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
289 off = rels->r_offset - ircache->c_shdr->sh_addr;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
290 iaddr = (unsigned char *)ircache->c_data->d_buf + off;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
291 oaddr = (unsigned char *)orcache->c_data->d_buf + off;
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
292 move_reloc(iaddr, oaddr, type);
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
293 }
25f70ba0133c Import from CVS: tag r20-3b3
cvs
parents:
diff changeset
294 }