upgraded to gcc 4.6.1 and glibc 2.14.1 (XCC)
[akaros.git] / tools / compilers / gcc-glibc / glibc-2.14.1-riscv.patch
1 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/scripts/config.sub glibc-2.14.1/scripts/config.sub
2 --- ../glibc-2.14.1-orig/scripts/config.sub     2011-10-25 02:50:25.000000000 -0700
3 +++ glibc-2.14.1/scripts/config.sub     2011-10-25 02:46:03.000000000 -0700
4 @@ -290,6 +290,7 @@
5         | pdp10 | pdp11 | pj | pjl \
6         | powerpc | powerpc64 | powerpc64le | powerpcle | ppcbe \
7         | pyramid \
8 +       | riscv \
9         | rx \
10         | score \
11         | sh | sh[1234] | sh[24]a | sh[24]aeb | sh[23]e | sh[34]eb | sheb | shbe | shle | sh[1234]le | sh3ele \
12 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/abort-instr.h glibc-2.14.1/sysdeps/riscv/abort-instr.h
13 --- ../glibc-2.14.1-orig/sysdeps/riscv/abort-instr.h    1969-12-31 16:00:00.000000000 -0800
14 +++ glibc-2.14.1/sysdeps/riscv/abort-instr.h    2011-10-25 02:48:44.000000000 -0700
15 @@ -0,0 +1,2 @@
16 +/* An instruction which should crash any program is a breakpoint.  */
17 +#define ABORT_INSTRUCTION asm ("unimp")
18 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/bits/atomic.h glibc-2.14.1/sysdeps/riscv/bits/atomic.h
19 --- ../glibc-2.14.1-orig/sysdeps/riscv/bits/atomic.h    1969-12-31 16:00:00.000000000 -0800
20 +++ glibc-2.14.1/sysdeps/riscv/bits/atomic.h    2011-10-25 02:48:44.000000000 -0700
21 @@ -0,0 +1,178 @@
22 +/* Low-level functions for atomic operations. Mips version.
23 +   Copyright (C) 2005 Free Software Foundation, Inc.
24 +   This file is part of the GNU C Library.
25 +
26 +   The GNU C Library is free software; you can redistribute it and/or
27 +   modify it under the terms of the GNU Lesser General Public
28 +   License as published by the Free Software Foundation; either
29 +   version 2.1 of the License, or (at your option) any later version.
30 +
31 +   The GNU C Library is distributed in the hope that it will be useful,
32 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
33 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
34 +   Lesser General Public License for more details.
35 +
36 +   You should have received a copy of the GNU Lesser General Public
37 +   License along with the GNU C Library; if not, write to the Free
38 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
39 +   02111-1307 USA.  */
40 +
41 +#ifndef _MIPS_BITS_ATOMIC_H
42 +#define _MIPS_BITS_ATOMIC_H 1
43 +
44 +#include <inttypes.h>
45 +#include <sgidefs.h>
46 +
47 +typedef int32_t atomic32_t;
48 +typedef uint32_t uatomic32_t;
49 +typedef int_fast32_t atomic_fast32_t;
50 +typedef uint_fast32_t uatomic_fast32_t;
51 +
52 +typedef int64_t atomic64_t;
53 +typedef uint64_t uatomic64_t;
54 +typedef int_fast64_t atomic_fast64_t;
55 +typedef uint_fast64_t uatomic_fast64_t;
56 +
57 +typedef intptr_t atomicptr_t;
58 +typedef uintptr_t uatomicptr_t;
59 +typedef intmax_t atomic_max_t;
60 +typedef uintmax_t uatomic_max_t;
61 +
62 +/* We have no compare and swap, so we acquire a global lock to emulate it.
63 +   We assume no variable will be accessed using atomic.h macros from two
64 +   different libraries.  */
65 +
66 +__make_section_unallocated
67 +  (".gnu.linkonce.b.__riscv_atomic_lock, \"aw\", %nobits");
68 +
69 +volatile int __riscv_atomic_lock
70 +  __attribute__ ((nocommon, section (".gnu.linkonce.b.__riscv_atomic_lock"
71 +                                    __sec_comment),
72 +                 visibility ("hidden")));
73 +
74 +#define __riscv_atomic_do_lock(addr) ({ \
75 +  extern volatile int __riscv_atomic_lock;                                   \
76 +  __riscv_atomic_do_lock24(&__riscv_atomic_lock);                    \
77 +  __sync_synchronize(); })
78 +
79 +#define __riscv_atomic_do_unlock(addr) ({ \
80 +  extern volatile int __riscv_atomic_lock;                                   \
81 +  __sync_synchronize();                                                      \
82 +  __riscv_atomic_lock = 0; })
83 +
84 +#define __riscv_atomic_do_lock24(addr) ({ \
85 +  int __locked_val;                                                     \
86 +  int __mask = 0xFF000000;                                              \
87 +  while ((__locked_val = __sync_fetch_and_or(addr, __mask)) & __mask)   \
88 +    while (*(volatile int*)(addr) & __mask)                            \
89 +      ;                                                                \
90 +  __locked_val; })
91 +
92 +/* The only basic operation needed is compare and exchange.  */
93 +#define atomic_compare_and_exchange_val_acq(mem, newval, oldval) \
94 +  ({ __typeof (mem) __acev_memp = (mem);                             \
95 +     __typeof (*mem) __acev_ret;                                     \
96 +     __typeof (*mem) __acev_newval = (newval);                       \
97 +                                                                     \
98 +     __riscv_atomic_do_lock (__acev_memp);                           \
99 +     __acev_ret = *__acev_memp;                                              \
100 +     if (__acev_ret == (oldval))                                     \
101 +       *__acev_memp = __acev_newval;                                 \
102 +     __riscv_atomic_do_unlock (__acev_memp);                         \
103 +     __acev_ret; })
104 +
105 +#define atomic_compare_and_exchange_bool_acq(mem, newval, oldval) \
106 +  (atomic_compare_and_exchange_val_acq(mem, newval, oldval) != (oldval))
107 +
108 +/* Special versions, which guarantee that top 8 bits of all values
109 +   are cleared and use those bits as the lock.  */
110 +#define atomic_compare_and_exchange_val_24_acq(mem, newval, oldval) \
111 +  ({ __typeof (mem) __acev_memp = (mem);                             \
112 +     __typeof (*mem) __acev_ret;                                     \
113 +     __typeof (*mem) __acev_newval = (newval);                       \
114 +                                                                     \
115 +     __acev_ret = __riscv_atomic_do_lock24 (__acev_memp);            \
116 +     if (__acev_ret == (oldval))                                     \
117 +       *__acev_memp = __acev_newval & 0x00FFFFFF;                    \
118 +     else                                                            \
119 +       *__acev_memp = __acev_ret;                                    \
120 +     __sync_synchronize();                                           \
121 +     __acev_ret; })
122 +
123 +#define atomic_exchange_24_rel(mem, newval) \
124 +  ({ __typeof (mem) __acev_memp = (mem);                             \
125 +     __typeof (*mem) __acev_ret;                                     \
126 +     __typeof (*mem) __acev_newval = (newval);                       \
127 +                                                                     \
128 +     __sync_synchronize();                                           \
129 +     __acev_ret = __riscv_atomic_do_lock24 (__acev_memp);            \
130 +     *__acev_memp = __acev_newval & 0x00FFFFFF;                       \
131 +     __acev_ret; })
132 +
133 +/* Atomic exchange (without compare).  */
134 +
135 +#define atomic_exchange_acq(mem, value)         \
136 +  ({ __sync_synchronize();                      \
137 +     __sync_lock_test_and_set(mem, value); })
138 +
139 +#define atomic_exchange_rel(mem, value)         \
140 +  ({ typeof(*mem) __prev;                       \
141 +     __prev = __sync_lock_test_and_set(mem, value);  \
142 +     __sync_synchronize();                      \
143 +     __prev; })
144 +
145 +
146 +/* Atomically add value and return the previous (unincremented) value.  */
147 +
148 +/* ??? Barrier semantics for atomic_exchange_and_add appear to be 
149 +   undefined.  Use full barrier for now, as that's safe.  */
150 +#define atomic_exchange_and_add(mem, value)             \
151 +  ({ typeof(*mem) __prev;                               \
152 +     __sync_synchronize();                              \
153 +     __prev = __sync_fetch_and_add(mem, value);         \
154 +     __sync_synchronize();                              \
155 +     __prev; })
156 +
157 +#define catomic_exchange_and_add(mem, value)           \
158 +  atomic_exchange_and_add(mem, value)
159 +
160 +#define atomic_bit_test_set(mem, bit)                   \
161 +  ({ typeof(*mem) __prev;                               \
162 +     typeof(*mem) __mask = (typeof(*mem))1 << (bit);    \
163 +     __sync_synchronize();                              \
164 +     __prev = __sync_fetch_and_or(mem, __mask);         \
165 +     __sync_synchronize();                              \
166 +     __prev & __mask; })
167 +
168 +#define asm_maxmin(which, size, res, mem, value) \
169 +  asm ("amo" which "." size "\t%0, %1, 0(%2)" : "=r"(res) : "r"(value), "r"(mem) : "memory")
170 +
171 +#define atomic_max(mem, value)                         \
172 +  ({  typeof(*mem) __prev;                             \
173 +      __sync_synchronize();                                    \
174 +      if (sizeof(*mem) == 4)                           \
175 +       asm_maxmin("maxu", "s", __prev, mem, value);    \
176 +      else if(sizeof(*mem) == 8)                       \
177 +       asm_maxmin("maxu", "d", __prev, mem, value);    \
178 +      else                                             \
179 +       abort();                                        \
180 +     __sync_synchronize();                              \
181 +     __prev; })
182 +
183 +#define catomic_max(mem, value) atomic_max(mem, value)
184 +
185 +#define atomic_min(mem, value)                         \
186 +  ({  typeof(*mem) __prev;                             \
187 +      __sync_synchronize();                                    \
188 +      if (sizeof(*mem) == 4)                           \
189 +       asm_maxmin("minu", "s", __prev, mem, value);    \
190 +      else if(sizeof(*mem) == 8)                       \
191 +       asm_maxmin("minu", "d", __prev, mem, value);    \
192 +      else                                             \
193 +       abort();                                        \
194 +     __sync_synchronize();                              \
195 +     __prev; })
196 +
197 +#define atomic_full_barrier() __sync_synchronize()
198 +
199 +#endif /* bits/atomic.h */
200 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/bits/dlfcn.h glibc-2.14.1/sysdeps/riscv/bits/dlfcn.h
201 --- ../glibc-2.14.1-orig/sysdeps/riscv/bits/dlfcn.h     1969-12-31 16:00:00.000000000 -0800
202 +++ glibc-2.14.1/sysdeps/riscv/bits/dlfcn.h     2011-10-25 02:48:44.000000000 -0700
203 @@ -0,0 +1,66 @@
204 +/* System dependent definitions for run-time dynamic loading.
205 +   Copyright (C) 1996, 1997, 1999, 2000, 2001, 2004
206 +       Free Software Foundation, Inc.
207 +   This file is part of the GNU C Library.
208 +
209 +   The GNU C Library is free software; you can redistribute it and/or
210 +   modify it under the terms of the GNU Lesser General Public
211 +   License as published by the Free Software Foundation; either
212 +   version 2.1 of the License, or (at your option) any later version.
213 +
214 +   The GNU C Library is distributed in the hope that it will be useful,
215 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
216 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
217 +   Lesser General Public License for more details.
218 +
219 +   You should have received a copy of the GNU Lesser General Public
220 +   License along with the GNU C Library; if not, write to the Free
221 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
222 +   02111-1307 USA.  */
223 +
224 +#ifndef _DLFCN_H
225 +# error "Never use <bits/dlfcn.h> directly; include <dlfcn.h> instead."
226 +#endif
227 +
228 +/* The MODE argument to `dlopen' contains one of the following: */
229 +#define RTLD_LAZY      0x0001  /* Lazy function call binding.  */
230 +#define RTLD_NOW       0x0002  /* Immediate function call binding.  */
231 +#define RTLD_BINDING_MASK  0x3 /* Mask of binding time value.  */
232 +#define RTLD_NOLOAD    0x00008 /* Do not load the object.  */
233 +#define RTLD_DEEPBIND  0x00010 /* Use deep binding.  */
234 +
235 +/* If the following bit is set in the MODE argument to `dlopen',
236 +   the symbols of the loaded object and its dependencies are made
237 +   visible as if the object were linked directly into the program.  */
238 +#define RTLD_GLOBAL    0x0004
239 +
240 +/* Unix98 demands the following flag which is the inverse to RTLD_GLOBAL.
241 +   The implementation does this by default and so we can define the
242 +   value to zero.  */
243 +#define RTLD_LOCAL      0
244 +
245 +/* Do not delete object when closed.  */
246 +#define RTLD_NODELETE  0x01000
247 +
248 +#ifdef __USE_GNU
249 +/* To support profiling of shared objects it is a good idea to call
250 +   the function found using `dlsym' using the following macro since
251 +   these calls do not use the PLT.  But this would mean the dynamic
252 +   loader has no chance to find out when the function is called.  The
253 +   macro applies the necessary magic so that profiling is possible.
254 +   Rewrite
255 +       foo = (*fctp) (arg1, arg2);
256 +   into
257 +        foo = DL_CALL_FCT (fctp, (arg1, arg2));
258 +*/
259 +# define DL_CALL_FCT(fctp, args) \
260 +  (_dl_mcount_wrapper_check ((void *) (fctp)), (*(fctp)) args)
261 +
262 +__BEGIN_DECLS
263 +
264 +/* This function calls the profiling functions.  */
265 +extern void _dl_mcount_wrapper_check (void *__selfpc) __THROW;
266 +
267 +__END_DECLS
268 +
269 +#endif
270 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/bits/endian.h glibc-2.14.1/sysdeps/riscv/bits/endian.h
271 --- ../glibc-2.14.1-orig/sysdeps/riscv/bits/endian.h    1969-12-31 16:00:00.000000000 -0800
272 +++ glibc-2.14.1/sysdeps/riscv/bits/endian.h    2011-10-25 02:48:44.000000000 -0700
273 @@ -0,0 +1,13 @@
274 +/* The MIPS architecture has selectable endianness.
275 +   This file is for a machine using big-endian mode.  */
276 +
277 +#ifndef _ENDIAN_H
278 +# error "Never use <bits/endian.h> directly; include <endian.h> instead."
279 +#endif
280 +
281 +#if __MIPSEB
282 +# define __BYTE_ORDER __BIG_ENDIAN
283 +#endif
284 +#if __MIPSEL
285 +# define __BYTE_ORDER __LITTLE_ENDIAN
286 +#endif
287 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/bits/fenv.h glibc-2.14.1/sysdeps/riscv/bits/fenv.h
288 --- ../glibc-2.14.1-orig/sysdeps/riscv/bits/fenv.h      1969-12-31 16:00:00.000000000 -0800
289 +++ glibc-2.14.1/sysdeps/riscv/bits/fenv.h      2011-10-25 02:48:44.000000000 -0700
290 @@ -0,0 +1,77 @@
291 +/* Copyright (C) 1998, 1999, 2000 Free Software Foundation, Inc.
292 +   This file is part of the GNU C Library.
293 +
294 +   The GNU C Library is free software; you can redistribute it and/or
295 +   modify it under the terms of the GNU Lesser General Public
296 +   License as published by the Free Software Foundation; either
297 +   version 2.1 of the License, or (at your option) any later version.
298 +
299 +   The GNU C Library is distributed in the hope that it will be useful,
300 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
301 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
302 +   Lesser General Public License for more details.
303 +
304 +   You should have received a copy of the GNU Lesser General Public
305 +   License along with the GNU C Library; if not, write to the Free
306 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
307 +   02111-1307 USA.  */
308 +
309 +#ifndef _FENV_H
310 +# error "Never use <bits/fenv.h> directly; include <fenv.h> instead."
311 +#endif
312 +
313 +
314 +/* Define bits representing the exception.  We use the bit positions
315 +   of the appropriate bits in the FPU control word.  */
316 +enum
317 +  {
318 +    FE_INEXACT = 0x04,
319 +#define FE_INEXACT     FE_INEXACT
320 +    FE_UNDERFLOW = 0x08,
321 +#define FE_UNDERFLOW   FE_UNDERFLOW
322 +    FE_OVERFLOW = 0x10,
323 +#define FE_OVERFLOW    FE_OVERFLOW
324 +    FE_DIVBYZERO = 0x20,
325 +#define FE_DIVBYZERO   FE_DIVBYZERO
326 +    FE_INVALID = 0x40,
327 +#define FE_INVALID     FE_INVALID
328 +  };
329 +
330 +#define FE_ALL_EXCEPT \
331 +       (FE_INEXACT | FE_DIVBYZERO | FE_UNDERFLOW | FE_OVERFLOW | FE_INVALID)
332 +
333 +/* The MIPS FPU supports all of the four defined rounding modes.  We
334 +   use again the bit positions in the FPU control word as the values
335 +   for the appropriate macros.  */
336 +enum
337 +  {
338 +    FE_TONEAREST = 0x0,
339 +#define FE_TONEAREST   FE_TONEAREST
340 +    FE_TOWARDZERO = 0x1,
341 +#define FE_TOWARDZERO  FE_TOWARDZERO
342 +    FE_UPWARD = 0x2,
343 +#define FE_UPWARD      FE_UPWARD
344 +    FE_DOWNWARD = 0x3
345 +#define FE_DOWNWARD    FE_DOWNWARD
346 +  };
347 +
348 +
349 +/* Type representing exception flags.  */
350 +typedef unsigned short int fexcept_t;
351 +
352 +
353 +/* Type representing floating-point environment.  This function corresponds
354 +   to the layout of the block written by the `fstenv'.  */
355 +typedef struct
356 +  {
357 +    unsigned int __fp_control_register;
358 +  }
359 +fenv_t;
360 +
361 +/* If the default argument is used we use this value.  */
362 +#define FE_DFL_ENV     ((__const fenv_t *) -1)
363 +
364 +#ifdef __USE_GNU
365 +/* Floating-point environment where none of the exception is masked.  */
366 +# define FE_NOMASK_ENV  ((__const fenv_t *) -2)
367 +#endif
368 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/bits/ipctypes.h glibc-2.14.1/sysdeps/riscv/bits/ipctypes.h
369 --- ../glibc-2.14.1-orig/sysdeps/riscv/bits/ipctypes.h  1969-12-31 16:00:00.000000000 -0800
370 +++ glibc-2.14.1/sysdeps/riscv/bits/ipctypes.h  2011-10-25 02:48:44.000000000 -0700
371 @@ -0,0 +1,32 @@
372 +/* bits/ipctypes.h -- Define some types used by SysV IPC/MSG/SHM.  MIPS version
373 +   Copyright (C) 2002 Free Software Foundation, Inc.
374 +   This file is part of the GNU C Library.
375 +
376 +   The GNU C Library is free software; you can redistribute it and/or
377 +   modify it under the terms of the GNU Lesser General Public
378 +   License as published by the Free Software Foundation; either
379 +   version 2.1 of the License, or (at your option) any later version.
380 +
381 +   The GNU C Library is distributed in the hope that it will be useful,
382 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
383 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
384 +   Lesser General Public License for more details.
385 +
386 +   You should have received a copy of the GNU Lesser General Public
387 +   License along with the GNU C Library; if not, write to the Free
388 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
389 +   02111-1307 USA.  */
390 +
391 +/*
392 + * Never include <bits/ipctypes.h> directly.
393 + */
394 +
395 +#ifndef _BITS_IPCTYPES_H
396 +#define _BITS_IPCTYPES_H       1
397 +
398 +#include <bits/types.h>
399 +
400 +typedef __SLONG32_TYPE __ipc_pid_t;
401 +
402 +
403 +#endif /* bits/ipctypes.h */
404 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/bits/link.h glibc-2.14.1/sysdeps/riscv/bits/link.h
405 --- ../glibc-2.14.1-orig/sysdeps/riscv/bits/link.h      1969-12-31 16:00:00.000000000 -0800
406 +++ glibc-2.14.1/sysdeps/riscv/bits/link.h      2011-10-25 02:48:44.000000000 -0700
407 @@ -0,0 +1,118 @@
408 +/* Copyright (C) 2005, 2009 Free Software Foundation, Inc.
409 +   This file is part of the GNU C Library.
410 +
411 +   The GNU C Library is free software; you can redistribute it and/or
412 +   modify it under the terms of the GNU Lesser General Public
413 +   License as published by the Free Software Foundation; either
414 +   version 2.1 of the License, or (at your option) any later version.
415 +
416 +   The GNU C Library is distributed in the hope that it will be useful,
417 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
418 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
419 +   Lesser General Public License for more details.
420 +
421 +   You should have received a copy of the GNU Lesser General Public
422 +   License along with the GNU C Library; if not, write to the Free
423 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
424 +   02111-1307 USA.  */
425 +
426 +#ifndef        _LINK_H
427 +# error "Never include <bits/link.h> directly; use <link.h> instead."
428 +#endif
429 +
430 +#include <sgidefs.h>
431 +
432 +#if _RISCV_SIM == _ABIO32
433 +
434 +/* Registers for entry into PLT on MIPS.  */
435 +typedef struct La_mips_32_regs
436 +{
437 +  uint32_t lr_reg[4]; /* $a0 through $a3 */
438 +  double lr_fpreg[2]; /* $f12 and $f14 */
439 +  uint32_t lr_ra;
440 +  uint32_t lr_sp;
441 +} La_mips_32_regs;
442 +
443 +/* Return values for calls from PLT on MIPS.  */
444 +typedef struct La_mips_32_retval
445 +{
446 +  uint32_t lrv_v0;
447 +  uint32_t lrv_v1;
448 +  double lrv_f0;
449 +  double lrv_f2;
450 +} La_mips_32_retval;
451 +
452 +#else
453 +
454 +typedef struct La_mips_64_regs
455 +{
456 +  uint64_t lr_reg[8]; /* $a0 through $a7 */
457 +  double lr_fpreg[8]; /* $f12 throgh $f19 */
458 +  uint64_t lr_ra;
459 +  uint64_t lr_sp;
460 +} La_mips_64_regs;
461 +
462 +/* Return values for calls from PLT on MIPS.  */
463 +typedef struct La_mips_64_retval
464 +{
465 +  uint64_t lrv_v0;
466 +  uint64_t lrv_v1;
467 +  double lrv_f0;
468 +  double lrv_f2;
469 +} La_mips_64_retval;
470 +
471 +#endif
472 +
473 +__BEGIN_DECLS
474 +
475 +#if _RISCV_SIM == _ABIO32
476 +
477 +extern Elf32_Addr la_mips_o32_gnu_pltenter (Elf32_Sym *__sym, unsigned int __ndx,
478 +                                           uintptr_t *__refcook,
479 +                                           uintptr_t *__defcook,
480 +                                           La_mips_32_regs *__regs,
481 +                                           unsigned int *__flags,
482 +                                           const char *__symname,
483 +                                           long int *__framesizep);
484 +extern unsigned int la_mips_o32_gnu_pltexit (Elf32_Sym *__sym, unsigned int __ndx,
485 +                                            uintptr_t *__refcook,
486 +                                            uintptr_t *__defcook,
487 +                                            const La_mips_32_regs *__inregs,
488 +                                            La_mips_32_retval *__outregs,
489 +                                            const char *__symname);
490 +
491 +#elif _RISCV_SIM == _ABIN32
492 +
493 +extern Elf32_Addr la_mips_n32_gnu_pltenter (Elf32_Sym *__sym, unsigned int __ndx,
494 +                                           uintptr_t *__refcook,
495 +                                           uintptr_t *__defcook,
496 +                                           La_mips_64_regs *__regs,
497 +                                           unsigned int *__flags,
498 +                                           const char *__symname,
499 +                                           long int *__framesizep);
500 +extern unsigned int la_mips_n32_gnu_pltexit (Elf32_Sym *__sym, unsigned int __ndx,
501 +                                            uintptr_t *__refcook,
502 +                                            uintptr_t *__defcook,
503 +                                            const La_mips_64_regs *__inregs,
504 +                                            La_mips_64_retval *__outregs,
505 +                                            const char *__symname);
506 +
507 +#else
508 +
509 +extern Elf64_Addr la_mips_n64_gnu_pltenter (Elf64_Sym *__sym, unsigned int __ndx,
510 +                                           uintptr_t *__refcook,
511 +                                           uintptr_t *__defcook,
512 +                                           La_mips_64_regs *__regs,
513 +                                           unsigned int *__flags,
514 +                                           const char *__symname,
515 +                                           long int *__framesizep);
516 +extern unsigned int la_mips_n64_gnu_pltexit (Elf64_Sym *__sym, unsigned int __ndx,
517 +                                            uintptr_t *__refcook,
518 +                                            uintptr_t *__defcook,
519 +                                            const La_mips_64_regs *__inregs,
520 +                                            La_mips_64_retval *__outregs,
521 +                                            const char *__symname);
522 +
523 +#endif
524 +
525 +__END_DECLS
526 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/bits/linkmap.h glibc-2.14.1/sysdeps/riscv/bits/linkmap.h
527 --- ../glibc-2.14.1-orig/sysdeps/riscv/bits/linkmap.h   1969-12-31 16:00:00.000000000 -0800
528 +++ glibc-2.14.1/sysdeps/riscv/bits/linkmap.h   2011-10-25 02:48:44.000000000 -0700
529 @@ -0,0 +1,4 @@
530 +struct link_map_machine
531 +  {
532 +    ElfW(Addr) plt; /* Address of .plt */
533 +  };
534 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/bits/mathdef.h glibc-2.14.1/sysdeps/riscv/bits/mathdef.h
535 --- ../glibc-2.14.1-orig/sysdeps/riscv/bits/mathdef.h   1969-12-31 16:00:00.000000000 -0800
536 +++ glibc-2.14.1/sysdeps/riscv/bits/mathdef.h   2011-10-25 02:48:44.000000000 -0700
537 @@ -0,0 +1,45 @@
538 +/* Copyright (C) 1997, 1998, 1999, 2000, 2002, 2003, 2004, 2007
539 +       Free Software Foundation, Inc.
540 +   This file is part of the GNU C Library.
541 +
542 +   The GNU C Library is free software; you can redistribute it and/or
543 +   modify it under the terms of the GNU Lesser General Public
544 +   License as published by the Free Software Foundation; either
545 +   version 2.1 of the License, or (at your option) any later version.
546 +
547 +   The GNU C Library is distributed in the hope that it will be useful,
548 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
549 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
550 +   Lesser General Public License for more details.
551 +
552 +   You should have received a copy of the GNU Lesser General Public
553 +   License along with the GNU C Library; if not, write to the Free
554 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
555 +   02111-1307 USA.  */
556 +
557 +#if !defined _MATH_H && !defined _COMPLEX_H
558 +# error "Never use <bits/mathdef.h> directly; include <math.h> instead"
559 +#endif
560 +
561 +#include <sgidefs.h>
562 +
563 +#if defined  __USE_ISOC99 && defined _MATH_H && !defined _MATH_H_MATHDEF
564 +# define _MATH_H_MATHDEF       1
565 +
566 +/* MIPS has `float' and `double' operations.  */
567 +typedef float float_t;         /* `float' expressions are evaluated as
568 +                                  `float'.  */
569 +typedef double double_t;       /* `double' expressions are evaluated as
570 +                                  `double'.  */
571 +
572 +/* The values returned by `ilogb' for 0 and NaN respectively.  */
573 +# define FP_ILOGB0     (-2147483647)
574 +# define FP_ILOGBNAN   2147483647
575 +
576 +#endif /* ISO C99 */
577 +
578 +#if ! defined __NO_LONG_DOUBLE_MATH && _RISCV_SIM == _ABIO32
579 +/* Signal that we do not really have a `long double'.  This disables the
580 +   declaration of all the `long double' function variants.  */
581 +# define __NO_LONG_DOUBLE_MATH 1
582 +#endif
583 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/bits/nan.h glibc-2.14.1/sysdeps/riscv/bits/nan.h
584 --- ../glibc-2.14.1-orig/sysdeps/riscv/bits/nan.h       1969-12-31 16:00:00.000000000 -0800
585 +++ glibc-2.14.1/sysdeps/riscv/bits/nan.h       2011-10-25 02:48:44.000000000 -0700
586 @@ -0,0 +1,56 @@
587 +/* `NAN' constant for IEEE 754 machines.
588 +   Copyright (C) 1992, 1996, 1997, 1999, 2002, 2004
589 +   Free Software Foundation, Inc.
590 +   This file is part of the GNU C Library.
591 +
592 +   The GNU C Library is free software; you can redistribute it and/or
593 +   modify it under the terms of the GNU Lesser General Public
594 +   License as published by the Free Software Foundation; either
595 +   version 2.1 of the License, or (at your option) any later version.
596 +
597 +   The GNU C Library is distributed in the hope that it will be useful,
598 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
599 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
600 +   Lesser General Public License for more details.
601 +
602 +   You should have received a copy of the GNU Lesser General Public
603 +   License along with the GNU C Library; if not, write to the Free
604 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
605 +   02111-1307 USA.  */
606 +
607 +#ifndef _MATH_H
608 +# error "Never use <bits/nan.h> directly; include <math.h> instead."
609 +#endif
610 +
611 +
612 +/* IEEE Not A Number (QNaN). Note that MIPS has the QNaN and SNaN patterns
613 +   reversed compared to most other architectures. The IEEE spec left
614 +   the definition of this open to implementations, and for MIPS the top
615 +   bit of the mantissa must be SET to indicate a SNaN.  */
616 +
617 +#if __GNUC_PREREQ(3,3)
618 +
619 +# define NAN   (__builtin_nanf(""))
620 +
621 +#elif defined __GNUC__
622 +
623 +# define NAN \
624 +  (__extension__                                                            \
625 +   ((union { unsigned __l __attribute__((__mode__(__SI__))); float __d; })  \
626 +    { __l: 0x7fbfffffUL }).__d)
627 +
628 +#else
629 +
630 +# include <endian.h>
631 +
632 +# if __BYTE_ORDER == __BIG_ENDIAN
633 +#  define __nan_bytes          { 0x7f, 0xbf, 0xff, 0xff }
634 +# endif
635 +# if __BYTE_ORDER == __LITTLE_ENDIAN
636 +#  define __nan_bytes          { 0xff, 0xff, 0xbf, 0x7f }
637 +# endif
638 +
639 +static union { unsigned char __c[4]; float __d; } __nan_union = { __nan_bytes };
640 +# define NAN   (__nan_union.__d)
641 +
642 +#endif /* GCC.  */
643 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/bits/setjmp.h glibc-2.14.1/sysdeps/riscv/bits/setjmp.h
644 --- ../glibc-2.14.1-orig/sysdeps/riscv/bits/setjmp.h    1969-12-31 16:00:00.000000000 -0800
645 +++ glibc-2.14.1/sysdeps/riscv/bits/setjmp.h    2011-10-25 02:48:44.000000000 -0700
646 @@ -0,0 +1,47 @@
647 +/* Define the machine-dependent type `jmp_buf'.  RISC-V version.
648 +   Copyright (C) 1992,1993,1995,1997,2000,2002,2003,2004,2005,2006
649 +       Free Software Foundation, Inc.
650 +   This file is part of the GNU C Library.
651 +
652 +   The GNU C Library is free software; you can redistribute it and/or
653 +   modify it under the terms of the GNU Lesser General Public
654 +   License as published by the Free Software Foundation; either
655 +   version 2.1 of the License, or (at your option) any later version.
656 +
657 +   The GNU C Library is distributed in the hope that it will be useful,
658 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
659 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
660 +   Lesser General Public License for more details.
661 +
662 +   You should have received a copy of the GNU Lesser General Public
663 +   License along with the GNU C Library; if not, write to the Free
664 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
665 +   02111-1307 USA.  */
666 +
667 +#ifndef _RISCV_BITS_SETJMP_H
668 +#define _RISCV_BITS_SETJMP_H
669 +
670 +typedef struct __jmp_buf_internal_tag
671 +  {
672 +    /* Program counter.  */
673 +    long __pc;
674 +
675 +    /* Stack pointer.  */
676 +    long __sp;
677 +
678 +    /* Thread pointer. */
679 +    long __tp;
680 +
681 +    /* Callee-saved registers s0 through s9.  */
682 +    long __regs[10];
683 +
684 +    /* Floating point status register.  */
685 +    long __fsr;
686 +
687 +    /* Callee-saved floating point registers.
688 +       Note that there are an even number of preceding words in this struct,
689 +       so no padding will be inserted before __fpregs, even for RV32. */
690 +    double __fpregs[8];
691 +  } __jmp_buf[1];
692 +
693 +#endif /* _RISCV_BITS_SETJMP_H */
694 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/bits/wordsize.h glibc-2.14.1/sysdeps/riscv/bits/wordsize.h
695 --- ../glibc-2.14.1-orig/sysdeps/riscv/bits/wordsize.h  1969-12-31 16:00:00.000000000 -0800
696 +++ glibc-2.14.1/sysdeps/riscv/bits/wordsize.h  2011-10-25 02:48:44.000000000 -0700
697 @@ -0,0 +1,22 @@
698 +/* Copyright (C) 2002, 2003 Free Software Foundation, Inc.
699 +   This file is part of the GNU C Library.
700 +
701 +   The GNU C Library is free software; you can redistribute it and/or
702 +   modify it under the terms of the GNU Lesser General Public
703 +   License as published by the Free Software Foundation; either
704 +   version 2.1 of the License, or (at your option) any later version.
705 +
706 +   The GNU C Library is distributed in the hope that it will be useful,
707 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
708 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
709 +   Lesser General Public License for more details.
710 +
711 +   You should have received a copy of the GNU Lesser General Public
712 +   License along with the GNU C Library; if not, write to the Free
713 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
714 +   02111-1307 USA.  */
715 +
716 +#define __WORDSIZE     _RISCV_SZPTR
717 +#if _RISCV_SIM == _ABI64
718 +# define __WORDSIZE_COMPAT32   1
719 +#endif
720 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/bsd-_setjmp.c glibc-2.14.1/sysdeps/riscv/bsd-_setjmp.c
721 --- ../glibc-2.14.1-orig/sysdeps/riscv/bsd-_setjmp.c    1969-12-31 16:00:00.000000000 -0800
722 +++ glibc-2.14.1/sysdeps/riscv/bsd-_setjmp.c    2011-10-25 02:48:44.000000000 -0700
723 @@ -0,0 +1 @@
724 +/* _setjmp is implemented in setjmp.S */
725 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/bsd-setjmp.c glibc-2.14.1/sysdeps/riscv/bsd-setjmp.c
726 --- ../glibc-2.14.1-orig/sysdeps/riscv/bsd-setjmp.c     1969-12-31 16:00:00.000000000 -0800
727 +++ glibc-2.14.1/sysdeps/riscv/bsd-setjmp.c     2011-10-25 02:48:44.000000000 -0700
728 @@ -0,0 +1 @@
729 +/* setjmp is implemented in setjmp.S */
730 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/dl-dtprocnum.h glibc-2.14.1/sysdeps/riscv/dl-dtprocnum.h
731 --- ../glibc-2.14.1-orig/sysdeps/riscv/dl-dtprocnum.h   1969-12-31 16:00:00.000000000 -0800
732 +++ glibc-2.14.1/sysdeps/riscv/dl-dtprocnum.h   2011-10-25 02:48:44.000000000 -0700
733 @@ -0,0 +1,22 @@
734 +/* Configuration of lookup functions.  MIPS version.
735 +   Copyright (C) 2000 Free Software Foundation, Inc.
736 +   This file is part of the GNU C Library.
737 +
738 +   The GNU C Library is free software; you can redistribute it and/or
739 +   modify it under the terms of the GNU Lesser General Public
740 +   License as published by the Free Software Foundation; either
741 +   version 2.1 of the License, or (at your option) any later version.
742 +
743 +   The GNU C Library is distributed in the hope that it will be useful,
744 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
745 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
746 +   Lesser General Public License for more details.
747 +
748 +   You should have received a copy of the GNU Lesser General Public
749 +   License along with the GNU C Library; if not, write to the Free
750 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
751 +   02111-1307 USA.  */
752 +
753 +/* Number of extra dynamic section entries for this architecture.  By
754 +   default there are none.  */
755 +#define DT_THISPROCNUM DT_MIPS_NUM
756 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/dl-lookup.c glibc-2.14.1/sysdeps/riscv/dl-lookup.c
757 --- ../glibc-2.14.1-orig/sysdeps/riscv/dl-lookup.c      1969-12-31 16:00:00.000000000 -0800
758 +++ glibc-2.14.1/sysdeps/riscv/dl-lookup.c      2011-10-25 02:48:44.000000000 -0700
759 @@ -0,0 +1,1033 @@
760 +/* Look up a symbol in the loaded objects.
761 +   MIPS/Linux version - special handling of non-PIC undefined symbol rules.
762 +   Copyright (C) 1995-2005, 2006, 2007, 2009, 2010
763 +   Free Software Foundation, Inc.
764 +   This file is part of the GNU C Library.
765 +
766 +   The GNU C Library is free software; you can redistribute it and/or
767 +   modify it under the terms of the GNU Lesser General Public
768 +   License as published by the Free Software Foundation; either
769 +   version 2.1 of the License, or (at your option) any later version.
770 +
771 +   The GNU C Library is distributed in the hope that it will be useful,
772 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
773 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
774 +   Lesser General Public License for more details.
775 +
776 +   You should have received a copy of the GNU Lesser General Public
777 +   License along with the GNU C Library; if not, write to the Free
778 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
779 +   02111-1307 USA.  */
780 +
781 +#include <alloca.h>
782 +#include <libintl.h>
783 +#include <stdlib.h>
784 +#include <string.h>
785 +#include <unistd.h>
786 +#include <ldsodefs.h>
787 +#include <dl-hash.h>
788 +#include <dl-machine.h>
789 +#include <sysdep-cancel.h>
790 +#include <bits/libc-lock.h>
791 +#include <tls.h>
792 +
793 +#include <assert.h>
794 +
795 +#define VERSTAG(tag)   (DT_NUM + DT_THISPROCNUM + DT_VERSIONTAGIDX (tag))
796 +
797 +/* We need this string more than once.  */
798 +static const char undefined_msg[] = "undefined symbol: ";
799 +
800 +
801 +struct sym_val
802 +  {
803 +    const ElfW(Sym) *s;
804 +    struct link_map *m;
805 +  };
806 +
807 +
808 +#define make_string(string, rest...) \
809 +  ({                                                                         \
810 +    const char *all[] = { string, ## rest };                                 \
811 +    size_t len, cnt;                                                         \
812 +    char *result, *cp;                                                       \
813 +                                                                             \
814 +    len = 1;                                                                 \
815 +    for (cnt = 0; cnt < sizeof (all) / sizeof (all[0]); ++cnt)               \
816 +      len += strlen (all[cnt]);                                                      \
817 +                                                                             \
818 +    cp = result = alloca (len);                                                      \
819 +    for (cnt = 0; cnt < sizeof (all) / sizeof (all[0]); ++cnt)               \
820 +      cp = __stpcpy (cp, all[cnt]);                                          \
821 +                                                                             \
822 +    result;                                                                  \
823 +  })
824 +
825 +/* Statistics function.  */
826 +#ifdef SHARED
827 +# define bump_num_relocations() ++GL(dl_num_relocations)
828 +#else
829 +# define bump_num_relocations() ((void) 0)
830 +#endif
831 +
832 +
833 +/* Inner part of the lookup functions.  We return a value > 0 if we
834 +   found the symbol, the value 0 if nothing is found and < 0 if
835 +   something bad happened.  */
836 +static int
837 +__attribute_noinline__
838 +do_lookup_x (const char *undef_name, uint_fast32_t new_hash,
839 +            unsigned long int *old_hash, const ElfW(Sym) *ref,
840 +            struct sym_val *result, struct r_scope_elem *scope, size_t i,
841 +            const struct r_found_version *const version, int flags,
842 +            struct link_map *skip, int type_class, struct link_map *undef_map)
843 +{
844 +  size_t n = scope->r_nlist;
845 +  /* Make sure we read the value before proceeding.  Otherwise we
846 +     might use r_list pointing to the initial scope and r_nlist being
847 +     the value after a resize.  That is the only path in dl-open.c not
848 +     protected by GSCOPE.  A read barrier here might be to expensive.  */
849 +  __asm volatile ("" : "+r" (n), "+m" (scope->r_list));
850 +  struct link_map **list = scope->r_list;
851 +
852 +  do
853 +    {
854 +      /* These variables are used in the nested function.  */
855 +      Elf_Symndx symidx;
856 +      int num_versions = 0;
857 +      const ElfW(Sym) *versioned_sym = NULL;
858 +
859 +      const struct link_map *map = list[i]->l_real;
860 +
861 +      /* Here come the extra test needed for `_dl_lookup_symbol_skip'.  */
862 +      if (map == skip)
863 +       continue;
864 +
865 +      /* Don't search the executable when resolving a copy reloc.  */
866 +      if ((type_class & ELF_RTYPE_CLASS_COPY) && map->l_type == lt_executable)
867 +       continue;
868 +
869 +      /* Do not look into objects which are going to be removed.  */
870 +      if (map->l_removed)
871 +       continue;
872 +
873 +      /* Print some debugging info if wanted.  */
874 +      if (__builtin_expect (GLRO(dl_debug_mask) & DL_DEBUG_SYMBOLS, 0))
875 +       _dl_debug_printf ("symbol=%s;  lookup in file=%s [%lu]\n",
876 +                         undef_name,
877 +                         map->l_name[0] ? map->l_name : rtld_progname,
878 +                         map->l_ns);
879 +
880 +      /* If the hash table is empty there is nothing to do here.  */
881 +      if (map->l_nbuckets == 0)
882 +       continue;
883 +
884 +      /* The tables for this map.  */
885 +      const ElfW(Sym) *symtab = (const void *) D_PTR (map, l_info[DT_SYMTAB]);
886 +      const char *strtab = (const void *) D_PTR (map, l_info[DT_STRTAB]);
887 +
888 +
889 +      /* Nested routine to check whether the symbol matches.  */
890 +      const ElfW(Sym) *
891 +      __attribute_noinline__
892 +      check_match (const ElfW(Sym) *sym)
893 +      {
894 +       unsigned int stt = ELFW(ST_TYPE) (sym->st_info);
895 +       assert (ELF_RTYPE_CLASS_PLT == 1);
896 +       /* The semantics of zero/non-zero values of undefined symbols
897 +          differs depending on whether the non-PIC ABI is in use.
898 +          Under the non-PIC ABI, a non-zero value indicates that
899 +          there is an address reference to the symbol and thus it
900 +          must always be resolved (except when resolving a jump slot
901 +          relocation) to the PLT entry whose address is provided as
902 +          the symbol's value; a zero value indicates that this
903 +          canonical-address behaviour is not required.  Yet under the
904 +          classic MIPS psABI, a zero value indicates that there is an
905 +          address reference to the function and the dynamic linker
906 +          must resolve the symbol immediately upon loading.  To avoid
907 +          conflict, symbols for which the dynamic linker must assume
908 +          the non-PIC ABI semantics are marked with the STO_MIPS_PLT
909 +          flag.  */
910 +       if (__builtin_expect ((sym->st_value == 0 /* No value.  */
911 +                              && stt != STT_TLS)
912 +                             || (sym->st_shndx == SHN_UNDEF
913 +                                 && !(sym->st_other & STO_MIPS_PLT))
914 +                             || (type_class & (sym->st_shndx == SHN_UNDEF)),
915 +                             0))
916 +         return NULL;
917 +
918 +       /* Ignore all but STT_NOTYPE, STT_OBJECT, STT_FUNC,
919 +          STT_COMMON, STT_TLS, and STT_GNU_IFUNC since these are no
920 +          code/data definitions.  */
921 +#define ALLOWED_STT \
922 +       ((1 << STT_NOTYPE) | (1 << STT_OBJECT) | (1 << STT_FUNC) \
923 +        | (1 << STT_COMMON) | (1 << STT_TLS) | (1 << STT_GNU_IFUNC))
924 +       if (__builtin_expect (((1 << stt) & ALLOWED_STT) == 0, 0))
925 +         return NULL;
926 +
927 +       if (sym != ref && strcmp (strtab + sym->st_name, undef_name))
928 +         /* Not the symbol we are looking for.  */
929 +         return NULL;
930 +
931 +       const ElfW(Half) *verstab = map->l_versyms;
932 +       if (version != NULL)
933 +         {
934 +           if (__builtin_expect (verstab == NULL, 0))
935 +             {
936 +               /* We need a versioned symbol but haven't found any.  If
937 +                  this is the object which is referenced in the verneed
938 +                  entry it is a bug in the library since a symbol must
939 +                  not simply disappear.
940 +
941 +                  It would also be a bug in the object since it means that
942 +                  the list of required versions is incomplete and so the
943 +                  tests in dl-version.c haven't found a problem.*/
944 +               assert (version->filename == NULL
945 +                       || ! _dl_name_match_p (version->filename, map));
946 +
947 +               /* Otherwise we accept the symbol.  */
948 +             }
949 +           else
950 +             {
951 +               /* We can match the version information or use the
952 +                  default one if it is not hidden.  */
953 +               ElfW(Half) ndx = verstab[symidx] & 0x7fff;
954 +               if ((map->l_versions[ndx].hash != version->hash
955 +                    || strcmp (map->l_versions[ndx].name, version->name))
956 +                   && (version->hidden || map->l_versions[ndx].hash
957 +                       || (verstab[symidx] & 0x8000)))
958 +                 /* It's not the version we want.  */
959 +                 return NULL;
960 +             }
961 +         }
962 +       else
963 +         {
964 +           /* No specific version is selected.  There are two ways we
965 +              can got here:
966 +
967 +              - a binary which does not include versioning information
968 +              is loaded
969 +
970 +              - dlsym() instead of dlvsym() is used to get a symbol which
971 +              might exist in more than one form
972 +
973 +              If the library does not provide symbol version information
974 +              there is no problem at at: we simply use the symbol if it
975 +              is defined.
976 +
977 +              These two lookups need to be handled differently if the
978 +              library defines versions.  In the case of the old
979 +              unversioned application the oldest (default) version
980 +              should be used.  In case of a dlsym() call the latest and
981 +              public interface should be returned.  */
982 +           if (verstab != NULL)
983 +             {
984 +               if ((verstab[symidx] & 0x7fff)
985 +                   >= ((flags & DL_LOOKUP_RETURN_NEWEST) ? 2 : 3))
986 +                 {
987 +                   /* Don't accept hidden symbols.  */
988 +                   if ((verstab[symidx] & 0x8000) == 0
989 +                       && num_versions++ == 0)
990 +                     /* No version so far.  */
991 +                     versioned_sym = sym;
992 +
993 +                   return NULL;
994 +                 }
995 +             }
996 +         }
997 +
998 +       /* There cannot be another entry for this symbol so stop here.  */
999 +       return sym;
1000 +      }
1001 +
1002 +      const ElfW(Sym) *sym;
1003 +      const ElfW(Addr) *bitmask = map->l_gnu_bitmask;
1004 +      if (__builtin_expect (bitmask != NULL, 1))
1005 +       {
1006 +         ElfW(Addr) bitmask_word
1007 +           = bitmask[(new_hash / __ELF_NATIVE_CLASS)
1008 +                     & map->l_gnu_bitmask_idxbits];
1009 +
1010 +         unsigned int hashbit1 = new_hash & (__ELF_NATIVE_CLASS - 1);
1011 +         unsigned int hashbit2 = ((new_hash >> map->l_gnu_shift)
1012 +                                  & (__ELF_NATIVE_CLASS - 1));
1013 +
1014 +         if (__builtin_expect ((bitmask_word >> hashbit1)
1015 +                               & (bitmask_word >> hashbit2) & 1, 0))
1016 +           {
1017 +             Elf32_Word bucket = map->l_gnu_buckets[new_hash
1018 +                                                    % map->l_nbuckets];
1019 +             if (bucket != 0)
1020 +               {
1021 +                 const Elf32_Word *hasharr = &map->l_gnu_chain_zero[bucket];
1022 +
1023 +                 do
1024 +                   if (((*hasharr ^ new_hash) >> 1) == 0)
1025 +                     {
1026 +                       symidx = hasharr - map->l_gnu_chain_zero;
1027 +                       sym = check_match (&symtab[symidx]);
1028 +                       if (sym != NULL)
1029 +                         goto found_it;
1030 +                     }
1031 +                 while ((*hasharr++ & 1u) == 0);
1032 +               }
1033 +           }
1034 +         /* No symbol found.  */
1035 +         symidx = SHN_UNDEF;
1036 +       }
1037 +      else
1038 +       {
1039 +         if (*old_hash == 0xffffffff)
1040 +           *old_hash = _dl_elf_hash (undef_name);
1041 +
1042 +         /* Use the old SysV-style hash table.  Search the appropriate
1043 +            hash bucket in this object's symbol table for a definition
1044 +            for the same symbol name.  */
1045 +         for (symidx = map->l_buckets[*old_hash % map->l_nbuckets];
1046 +              symidx != STN_UNDEF;
1047 +              symidx = map->l_chain[symidx])
1048 +           {
1049 +             sym = check_match (&symtab[symidx]);
1050 +             if (sym != NULL)
1051 +               goto found_it;
1052 +           }
1053 +       }
1054 +
1055 +      /* If we have seen exactly one versioned symbol while we are
1056 +        looking for an unversioned symbol and the version is not the
1057 +        default version we still accept this symbol since there are
1058 +        no possible ambiguities.  */
1059 +      sym = num_versions == 1 ? versioned_sym : NULL;
1060 +
1061 +      if (sym != NULL)
1062 +       {
1063 +       found_it:
1064 +         switch (__builtin_expect (ELFW(ST_BIND) (sym->st_info), STB_GLOBAL))
1065 +           {
1066 +           case STB_WEAK:
1067 +             /* Weak definition.  Use this value if we don't find another.  */
1068 +             if (__builtin_expect (GLRO(dl_dynamic_weak), 0))
1069 +               {
1070 +                 if (! result->s)
1071 +                   {
1072 +                     result->s = sym;
1073 +                     result->m = (struct link_map *) map;
1074 +                   }
1075 +                 break;
1076 +               }
1077 +             /* FALLTHROUGH */
1078 +           case STB_GLOBAL:
1079 +           success:
1080 +             /* Global definition.  Just what we need.  */
1081 +             result->s = sym;
1082 +             result->m = (struct link_map *) map;
1083 +             return 1;
1084 +
1085 +           case STB_GNU_UNIQUE:;
1086 +             /* We have to determine whether we already found a
1087 +                symbol with this name before.  If not then we have to
1088 +                add it to the search table.  If we already found a
1089 +                definition we have to use it.  */
1090 +             void enter (struct unique_sym *table, size_t size,
1091 +                         unsigned int hash, const char *name,
1092 +                         const ElfW(Sym) *sym, struct link_map *map)
1093 +             {
1094 +               size_t idx = hash % size;
1095 +               size_t hash2 = 1 + hash % (size - 2);
1096 +               while (1)
1097 +                 {
1098 +                   if (table[idx].name == NULL)
1099 +                     {
1100 +                       table[idx].hashval = hash;
1101 +                       table[idx].name = name;
1102 +                       if ((type_class & ELF_RTYPE_CLASS_COPY) != 0)
1103 +                         {
1104 +                           table[idx].sym = ref;
1105 +                           table[idx].map = undef_map;
1106 +                         }
1107 +                       else
1108 +                         {
1109 +                           table[idx].sym = sym;
1110 +                           table[idx].map = map;
1111 +
1112 +                           if (map->l_type == lt_loaded)
1113 +                             /* Make sure we don't unload this object by
1114 +                                setting the appropriate flag.  */
1115 +                             map->l_flags_1 |= DF_1_NODELETE;
1116 +                         }
1117 +
1118 +                       return;
1119 +                     }
1120 +
1121 +                   idx += hash2;
1122 +                   if (idx >= size)
1123 +                     idx -= size;
1124 +                 }
1125 +             }
1126 +
1127 +             struct unique_sym_table *tab
1128 +               = &GL(dl_ns)[map->l_ns]._ns_unique_sym_table;
1129 +
1130 +             __rtld_lock_lock_recursive (tab->lock);
1131 +
1132 +             struct unique_sym *entries = tab->entries;
1133 +             size_t size = tab->size;
1134 +             if (entries != NULL)
1135 +               {
1136 +                 size_t idx = new_hash % size;
1137 +                 size_t hash2 = 1 + new_hash % (size - 2);
1138 +                 while (1)
1139 +                   {
1140 +                     if (entries[idx].hashval == new_hash
1141 +                         && strcmp (entries[idx].name, undef_name) == 0)
1142 +                       {
1143 +                         result->s = entries[idx].sym;
1144 +                         result->m = (struct link_map *) entries[idx].map;
1145 +                         __rtld_lock_unlock_recursive (tab->lock);
1146 +                         return 1;
1147 +                       }
1148 +
1149 +                     if (entries[idx].name == NULL)
1150 +                       break;
1151 +
1152 +                     idx += hash2;
1153 +                     if (idx >= size)
1154 +                       idx -= size;
1155 +                   }
1156 +
1157 +                 if (size * 3 <= tab->n_elements * 4)
1158 +                   {
1159 +                     /* Expand the table.  */
1160 +#ifdef RTLD_CHECK_FOREIGN_CALL
1161 +                     /* This must not happen during runtime relocations.  */
1162 +                     assert (!RTLD_CHECK_FOREIGN_CALL);
1163 +#endif
1164 +                     size_t newsize = _dl_higher_prime_number (size + 1);
1165 +                     struct unique_sym *newentries
1166 +                       = calloc (sizeof (struct unique_sym), newsize);
1167 +                     if (newentries == NULL)
1168 +                       {
1169 +                       nomem:
1170 +                         __rtld_lock_unlock_recursive (tab->lock);
1171 +                         _dl_fatal_printf ("out of memory\n");
1172 +                       }
1173 +
1174 +                     for (idx = 0; idx < size; ++idx)
1175 +                       if (entries[idx].name != NULL)
1176 +                         enter (newentries, newsize, entries[idx].hashval,
1177 +                                entries[idx].name, entries[idx].sym,
1178 +                                entries[idx].map);
1179 +
1180 +                     tab->free (entries);
1181 +                     tab->size = newsize;
1182 +                     size = newsize;
1183 +                     entries = tab->entries = newentries;
1184 +                     tab->free = free;
1185 +                   }
1186 +               }
1187 +             else
1188 +               {
1189 +#ifdef RTLD_CHECK_FOREIGN_CALL
1190 +                 /* This must not happen during runtime relocations.  */
1191 +                 assert (!RTLD_CHECK_FOREIGN_CALL);
1192 +#endif
1193 +
1194 +#ifdef SHARED
1195 +                 /* If tab->entries is NULL, but tab->size is not, it means
1196 +                    this is the second, conflict finding, lookup for
1197 +                    LD_TRACE_PRELINKING in _dl_debug_bindings.  Don't
1198 +                    allocate anything and don't enter anything into the
1199 +                    hash table.  */
1200 +                 if (__builtin_expect (tab->size, 0))
1201 +                   {
1202 +                     assert (GLRO(dl_debug_mask) & DL_DEBUG_PRELINK);
1203 +                     __rtld_lock_unlock_recursive (tab->lock);
1204 +                     goto success;
1205 +                   }
1206 +#endif
1207 +
1208 +#define INITIAL_NUNIQUE_SYM_TABLE 31
1209 +                 size = INITIAL_NUNIQUE_SYM_TABLE;
1210 +                 entries = calloc (sizeof (struct unique_sym), size);
1211 +                 if (entries == NULL)
1212 +                   goto nomem;
1213 +
1214 +                 tab->entries = entries;
1215 +                 tab->size = size;
1216 +                 tab->free = free;
1217 +               }
1218 +
1219 +             enter (entries, size, new_hash, strtab + sym->st_name, sym,
1220 +                    (struct link_map *) map);
1221 +             ++tab->n_elements;
1222 +
1223 +             __rtld_lock_unlock_recursive (tab->lock);
1224 +
1225 +             goto success;
1226 +
1227 +           default:
1228 +             /* Local symbols are ignored.  */
1229 +             break;
1230 +           }
1231 +       }
1232 +
1233 +      /* If this current map is the one mentioned in the verneed entry
1234 +        and we have not found a weak entry, it is a bug.  */
1235 +      if (symidx == STN_UNDEF && version != NULL && version->filename != NULL
1236 +         && __builtin_expect (_dl_name_match_p (version->filename, map), 0))
1237 +       return -1;
1238 +    }
1239 +  while (++i < n);
1240 +
1241 +  /* We have not found anything until now.  */
1242 +  return 0;
1243 +}
1244 +
1245 +
1246 +static uint_fast32_t
1247 +dl_new_hash (const char *s)
1248 +{
1249 +  uint_fast32_t h = 5381;
1250 +  for (unsigned char c = *s; c != '\0'; c = *++s)
1251 +    h = h * 33 + c;
1252 +  return h & 0xffffffff;
1253 +}
1254 +
1255 +
1256 +/* Add extra dependency on MAP to UNDEF_MAP.  */
1257 +static int
1258 +internal_function
1259 +add_dependency (struct link_map *undef_map, struct link_map *map, int flags)
1260 +{
1261 +  struct link_map *runp;
1262 +  unsigned int i;
1263 +  int result = 0;
1264 +
1265 +  /* Avoid self-references and references to objects which cannot be
1266 +     unloaded anyway.  */
1267 +  if (undef_map == map)
1268 +    return 0;
1269 +
1270 +  /* Avoid references to objects which cannot be unloaded anyway.  */
1271 +  assert (map->l_type == lt_loaded);
1272 +  if ((map->l_flags_1 & DF_1_NODELETE) != 0)
1273 +    return 0;
1274 +
1275 +  struct link_map_reldeps *l_reldeps
1276 +    = atomic_forced_read (undef_map->l_reldeps);
1277 +
1278 +  /* Make sure l_reldeps is read before l_initfini.  */
1279 +  atomic_read_barrier ();
1280 +
1281 +  /* Determine whether UNDEF_MAP already has a reference to MAP.  First
1282 +     look in the normal dependencies.  */
1283 +  struct link_map **l_initfini = atomic_forced_read (undef_map->l_initfini);
1284 +  if (l_initfini != NULL)
1285 +    {
1286 +      for (i = 0; l_initfini[i] != NULL; ++i)
1287 +       if (l_initfini[i] == map)
1288 +         return 0;
1289 +    }
1290 +
1291 +  /* No normal dependency.  See whether we already had to add it
1292 +     to the special list of dynamic dependencies.  */
1293 +  unsigned int l_reldepsact = 0;
1294 +  if (l_reldeps != NULL)
1295 +    {
1296 +      struct link_map **list = &l_reldeps->list[0];
1297 +      l_reldepsact = l_reldeps->act;
1298 +      for (i = 0; i < l_reldepsact; ++i)
1299 +       if (list[i] == map)
1300 +         return 0;
1301 +    }
1302 +
1303 +  /* Save serial number of the target MAP.  */
1304 +  unsigned long long serial = map->l_serial;
1305 +
1306 +  /* Make sure nobody can unload the object while we are at it.  */
1307 +  if (__builtin_expect (flags & DL_LOOKUP_GSCOPE_LOCK, 0))
1308 +    {
1309 +      /* We can't just call __rtld_lock_lock_recursive (GL(dl_load_lock))
1310 +        here, that can result in ABBA deadlock.  */
1311 +      THREAD_GSCOPE_RESET_FLAG ();
1312 +      __rtld_lock_lock_recursive (GL(dl_load_lock));
1313 +      /* While MAP value won't change, after THREAD_GSCOPE_RESET_FLAG ()
1314 +        it can e.g. point to unallocated memory.  So avoid the optimizer
1315 +        treating the above read from MAP->l_serial as ensurance it
1316 +        can safely dereference it.  */
1317 +      map = atomic_forced_read (map);
1318 +
1319 +      /* From this point on it is unsafe to dereference MAP, until it
1320 +        has been found in one of the lists.  */
1321 +
1322 +      /* Redo the l_initfini check in case undef_map's l_initfini
1323 +        changed in the mean time.  */
1324 +      if (undef_map->l_initfini != l_initfini
1325 +         && undef_map->l_initfini != NULL)
1326 +       {
1327 +         l_initfini = undef_map->l_initfini;
1328 +         for (i = 0; l_initfini[i] != NULL; ++i)
1329 +           if (l_initfini[i] == map)
1330 +             goto out_check;
1331 +       }
1332 +
1333 +      /* Redo the l_reldeps check if undef_map's l_reldeps changed in
1334 +        the mean time.  */
1335 +      if (undef_map->l_reldeps != NULL)
1336 +       {
1337 +         if (undef_map->l_reldeps != l_reldeps)
1338 +           {
1339 +             struct link_map **list = &undef_map->l_reldeps->list[0];
1340 +             l_reldepsact = undef_map->l_reldeps->act;
1341 +             for (i = 0; i < l_reldepsact; ++i)
1342 +               if (list[i] == map)
1343 +                 goto out_check;
1344 +           }
1345 +         else if (undef_map->l_reldeps->act > l_reldepsact)
1346 +           {
1347 +             struct link_map **list
1348 +               = &undef_map->l_reldeps->list[0];
1349 +             i = l_reldepsact;
1350 +             l_reldepsact = undef_map->l_reldeps->act;
1351 +             for (; i < l_reldepsact; ++i)
1352 +               if (list[i] == map)
1353 +                 goto out_check;
1354 +           }
1355 +       }
1356 +    }
1357 +  else
1358 +    __rtld_lock_lock_recursive (GL(dl_load_lock));
1359 +
1360 +  /* The object is not yet in the dependency list.  Before we add
1361 +     it make sure just one more time the object we are about to
1362 +     reference is still available.  There is a brief period in
1363 +     which the object could have been removed since we found the
1364 +     definition.  */
1365 +  runp = GL(dl_ns)[undef_map->l_ns]._ns_loaded;
1366 +  while (runp != NULL && runp != map)
1367 +    runp = runp->l_next;
1368 +
1369 +  if (runp != NULL)
1370 +    {
1371 +      /* The object is still available.  */
1372 +
1373 +      /* MAP could have been dlclosed, freed and then some other dlopened
1374 +        library could have the same link_map pointer.  */
1375 +      if (map->l_serial != serial)
1376 +       goto out_check;
1377 +
1378 +      /* Redo the NODELETE check, as when dl_load_lock wasn't held
1379 +        yet this could have changed.  */
1380 +      if ((map->l_flags_1 & DF_1_NODELETE) != 0)
1381 +       goto out;
1382 +
1383 +      /* If the object with the undefined reference cannot be removed ever
1384 +        just make sure the same is true for the object which contains the
1385 +        definition.  */
1386 +      if (undef_map->l_type != lt_loaded
1387 +         || (undef_map->l_flags_1 & DF_1_NODELETE) != 0)
1388 +       {
1389 +         map->l_flags_1 |= DF_1_NODELETE;
1390 +         goto out;
1391 +       }
1392 +
1393 +      /* Add the reference now.  */
1394 +      if (__builtin_expect (l_reldepsact >= undef_map->l_reldepsmax, 0))
1395 +       {
1396 +         /* Allocate more memory for the dependency list.  Since this
1397 +            can never happen during the startup phase we can use
1398 +            `realloc'.  */
1399 +         struct link_map_reldeps *newp;
1400 +         unsigned int max
1401 +           = undef_map->l_reldepsmax ? undef_map->l_reldepsmax * 2 : 10;
1402 +
1403 +#ifdef RTLD_PREPARE_FOREIGN_CALL
1404 +         RTLD_PREPARE_FOREIGN_CALL;
1405 +#endif
1406 +
1407 +         newp = malloc (sizeof (*newp) + max * sizeof (struct link_map *));
1408 +         if (newp == NULL)
1409 +           {
1410 +             /* If we didn't manage to allocate memory for the list this is
1411 +                no fatal problem.  We simply make sure the referenced object
1412 +                cannot be unloaded.  This is semantically the correct
1413 +                behavior.  */
1414 +             map->l_flags_1 |= DF_1_NODELETE;
1415 +             goto out;
1416 +           }
1417 +         else
1418 +           {
1419 +             if (l_reldepsact)
1420 +               memcpy (&newp->list[0], &undef_map->l_reldeps->list[0],
1421 +                       l_reldepsact * sizeof (struct link_map *));
1422 +             newp->list[l_reldepsact] = map;
1423 +             newp->act = l_reldepsact + 1;
1424 +             atomic_write_barrier ();
1425 +             void *old = undef_map->l_reldeps;
1426 +             undef_map->l_reldeps = newp;
1427 +             undef_map->l_reldepsmax = max;
1428 +             if (old)
1429 +               _dl_scope_free (old);
1430 +           }
1431 +       }
1432 +      else
1433 +       {
1434 +         undef_map->l_reldeps->list[l_reldepsact] = map;
1435 +         atomic_write_barrier ();
1436 +         undef_map->l_reldeps->act = l_reldepsact + 1;
1437 +       }
1438 +
1439 +      /* Display information if we are debugging.  */
1440 +      if (__builtin_expect (GLRO(dl_debug_mask) & DL_DEBUG_FILES, 0))
1441 +       _dl_debug_printf ("\
1442 +\nfile=%s [%lu];  needed by %s [%lu] (relocation dependency)\n\n",
1443 +                         map->l_name[0] ? map->l_name : rtld_progname,
1444 +                         map->l_ns,
1445 +                         undef_map->l_name[0]
1446 +                         ? undef_map->l_name : rtld_progname,
1447 +                         undef_map->l_ns);
1448 +    }
1449 +  else
1450 +    /* Whoa, that was bad luck.  We have to search again.  */
1451 +    result = -1;
1452 +
1453 + out:
1454 +  /* Release the lock.  */
1455 +  __rtld_lock_unlock_recursive (GL(dl_load_lock));
1456 +
1457 +  if (__builtin_expect (flags & DL_LOOKUP_GSCOPE_LOCK, 0))
1458 +    THREAD_GSCOPE_SET_FLAG ();
1459 +
1460 +  return result;
1461 +
1462 + out_check:
1463 +  if (map->l_serial != serial)
1464 +    result = -1;
1465 +  goto out;
1466 +}
1467 +
1468 +static void
1469 +internal_function
1470 +_dl_debug_bindings (const char *undef_name, struct link_map *undef_map,
1471 +                   const ElfW(Sym) **ref, struct sym_val *value,
1472 +                   const struct r_found_version *version, int type_class,
1473 +                   int protected);
1474 +
1475 +
1476 +/* Search loaded objects' symbol tables for a definition of the symbol
1477 +   UNDEF_NAME, perhaps with a requested version for the symbol.
1478 +
1479 +   We must never have calls to the audit functions inside this function
1480 +   or in any function which gets called.  If this would happen the audit
1481 +   code might create a thread which can throw off all the scope locking.  */
1482 +lookup_t
1483 +internal_function
1484 +_dl_lookup_symbol_x (const char *undef_name, struct link_map *undef_map,
1485 +                    const ElfW(Sym) **ref,
1486 +                    struct r_scope_elem *symbol_scope[],
1487 +                    const struct r_found_version *version,
1488 +                    int type_class, int flags, struct link_map *skip_map)
1489 +{
1490 +  const uint_fast32_t new_hash = dl_new_hash (undef_name);
1491 +  unsigned long int old_hash = 0xffffffff;
1492 +  struct sym_val current_value = { NULL, NULL };
1493 +  struct r_scope_elem **scope = symbol_scope;
1494 +
1495 +  bump_num_relocations ();
1496 +
1497 +  /* No other flag than DL_LOOKUP_ADD_DEPENDENCY or DL_LOOKUP_GSCOPE_LOCK
1498 +     is allowed if we look up a versioned symbol.  */
1499 +  assert (version == NULL
1500 +         || (flags & ~(DL_LOOKUP_ADD_DEPENDENCY | DL_LOOKUP_GSCOPE_LOCK))
1501 +            == 0);
1502 +
1503 +  size_t i = 0;
1504 +  if (__builtin_expect (skip_map != NULL, 0))
1505 +    /* Search the relevant loaded objects for a definition.  */
1506 +    while ((*scope)->r_list[i] != skip_map)
1507 +      ++i;
1508 +
1509 +  /* Search the relevant loaded objects for a definition.  */
1510 +  for (size_t start = i; *scope != NULL; start = 0, ++scope)
1511 +    {
1512 +      int res = do_lookup_x (undef_name, new_hash, &old_hash, *ref,
1513 +                            &current_value, *scope, start, version, flags,
1514 +                            skip_map, type_class, undef_map);
1515 +      if (res > 0)
1516 +       break;
1517 +
1518 +      if (__builtin_expect (res, 0) < 0 && skip_map == NULL)
1519 +       {
1520 +         /* Oh, oh.  The file named in the relocation entry does not
1521 +            contain the needed symbol.  This code is never reached
1522 +            for unversioned lookups.  */
1523 +         assert (version != NULL);
1524 +         const char *reference_name = undef_map ? undef_map->l_name : NULL;
1525 +
1526 +         /* XXX We cannot translate the message.  */
1527 +         _dl_signal_cerror (0, (reference_name[0]
1528 +                                ? reference_name
1529 +                                : (rtld_progname ?: "<main program>")),
1530 +                            N_("relocation error"),
1531 +                            make_string ("symbol ", undef_name, ", version ",
1532 +                                         version->name,
1533 +                                         " not defined in file ",
1534 +                                         version->filename,
1535 +                                         " with link time reference",
1536 +                                         res == -2
1537 +                                         ? " (no version symbols)" : ""));
1538 +         *ref = NULL;
1539 +         return 0;
1540 +       }
1541 +    }
1542 +
1543 +  if (__builtin_expect (current_value.s == NULL, 0))
1544 +    {
1545 +      if ((*ref == NULL || ELFW(ST_BIND) ((*ref)->st_info) != STB_WEAK)
1546 +         && skip_map == NULL)
1547 +       {
1548 +         /* We could find no value for a strong reference.  */
1549 +         const char *reference_name = undef_map ? undef_map->l_name : "";
1550 +         const char *versionstr = version ? ", version " : "";
1551 +         const char *versionname = (version && version->name
1552 +                                    ? version->name : "");
1553 +
1554 +         /* XXX We cannot translate the message.  */
1555 +         _dl_signal_cerror (0, (reference_name[0]
1556 +                                ? reference_name
1557 +                                : (rtld_progname ?: "<main program>")),
1558 +                            N_("symbol lookup error"),
1559 +                            make_string (undefined_msg, undef_name,
1560 +                                         versionstr, versionname));
1561 +       }
1562 +      *ref = NULL;
1563 +      return 0;
1564 +    }
1565 +
1566 +  int protected = (*ref
1567 +                  && ELFW(ST_VISIBILITY) ((*ref)->st_other) == STV_PROTECTED);
1568 +  if (__builtin_expect (protected != 0, 0))
1569 +    {
1570 +      /* It is very tricky.  We need to figure out what value to
1571 +        return for the protected symbol.  */
1572 +      if (type_class == ELF_RTYPE_CLASS_PLT)
1573 +       {
1574 +         if (current_value.s != NULL && current_value.m != undef_map)
1575 +           {
1576 +             current_value.s = *ref;
1577 +             current_value.m = undef_map;
1578 +           }
1579 +       }
1580 +      else
1581 +       {
1582 +         struct sym_val protected_value = { NULL, NULL };
1583 +
1584 +         for (scope = symbol_scope; *scope != NULL; i = 0, ++scope)
1585 +           if (do_lookup_x (undef_name, new_hash, &old_hash, *ref,
1586 +                            &protected_value, *scope, i, version, flags,
1587 +                            skip_map, ELF_RTYPE_CLASS_PLT, NULL) != 0)
1588 +             break;
1589 +
1590 +         if (protected_value.s != NULL && protected_value.m != undef_map)
1591 +           {
1592 +             current_value.s = *ref;
1593 +             current_value.m = undef_map;
1594 +           }
1595 +       }
1596 +    }
1597 +
1598 +  /* We have to check whether this would bind UNDEF_MAP to an object
1599 +     in the global scope which was dynamically loaded.  In this case
1600 +     we have to prevent the latter from being unloaded unless the
1601 +     UNDEF_MAP object is also unloaded.  */
1602 +  if (__builtin_expect (current_value.m->l_type == lt_loaded, 0)
1603 +      /* Don't do this for explicit lookups as opposed to implicit
1604 +        runtime lookups.  */
1605 +      && (flags & DL_LOOKUP_ADD_DEPENDENCY) != 0
1606 +      /* Add UNDEF_MAP to the dependencies.  */
1607 +      && add_dependency (undef_map, current_value.m, flags) < 0)
1608 +      /* Something went wrong.  Perhaps the object we tried to reference
1609 +        was just removed.  Try finding another definition.  */
1610 +      return _dl_lookup_symbol_x (undef_name, undef_map, ref,
1611 +                                 (flags & DL_LOOKUP_GSCOPE_LOCK)
1612 +                                 ? undef_map->l_scope : symbol_scope,
1613 +                                 version, type_class, flags, skip_map);
1614 +
1615 +  /* The object is used.  */
1616 +  if (__builtin_expect (current_value.m->l_used == 0, 0))
1617 +    current_value.m->l_used = 1;
1618 +
1619 +  if (__builtin_expect (GLRO(dl_debug_mask)
1620 +                       & (DL_DEBUG_BINDINGS|DL_DEBUG_PRELINK), 0))
1621 +    _dl_debug_bindings (undef_name, undef_map, ref,
1622 +                       &current_value, version, type_class, protected);
1623 +
1624 +  *ref = current_value.s;
1625 +  return LOOKUP_VALUE (current_value.m);
1626 +}
1627 +
1628 +
1629 +/* Cache the location of MAP's hash table.  */
1630 +
1631 +void
1632 +internal_function
1633 +_dl_setup_hash (struct link_map *map)
1634 +{
1635 +  Elf_Symndx *hash;
1636 +  Elf_Symndx nchain;
1637 +
1638 +  if (__builtin_expect (map->l_info[DT_ADDRTAGIDX (DT_GNU_HASH) + DT_NUM
1639 +                                   + DT_THISPROCNUM + DT_VERSIONTAGNUM
1640 +                                   + DT_EXTRANUM + DT_VALNUM] != NULL, 1))
1641 +    {
1642 +      Elf32_Word *hash32
1643 +       = (void *) D_PTR (map, l_info[DT_ADDRTAGIDX (DT_GNU_HASH) + DT_NUM
1644 +                                     + DT_THISPROCNUM + DT_VERSIONTAGNUM
1645 +                                     + DT_EXTRANUM + DT_VALNUM]);
1646 +      map->l_nbuckets = *hash32++;
1647 +      Elf32_Word symbias = *hash32++;
1648 +      Elf32_Word bitmask_nwords = *hash32++;
1649 +      /* Must be a power of two.  */
1650 +      assert ((bitmask_nwords & (bitmask_nwords - 1)) == 0);
1651 +      map->l_gnu_bitmask_idxbits = bitmask_nwords - 1;
1652 +      map->l_gnu_shift = *hash32++;
1653 +
1654 +      map->l_gnu_bitmask = (ElfW(Addr) *) hash32;
1655 +      hash32 += __ELF_NATIVE_CLASS / 32 * bitmask_nwords;
1656 +
1657 +      map->l_gnu_buckets = hash32;
1658 +      hash32 += map->l_nbuckets;
1659 +      map->l_gnu_chain_zero = hash32 - symbias;
1660 +      return;
1661 +    }
1662 +
1663 +  if (!map->l_info[DT_HASH])
1664 +    return;
1665 +  hash = (void *) D_PTR (map, l_info[DT_HASH]);
1666 +
1667 +  map->l_nbuckets = *hash++;
1668 +  nchain = *hash++;
1669 +  map->l_buckets = hash;
1670 +  hash += map->l_nbuckets;
1671 +  map->l_chain = hash;
1672 +}
1673 +
1674 +
1675 +static void
1676 +internal_function
1677 +_dl_debug_bindings (const char *undef_name, struct link_map *undef_map,
1678 +                   const ElfW(Sym) **ref, struct sym_val *value,
1679 +                   const struct r_found_version *version, int type_class,
1680 +                   int protected)
1681 +{
1682 +  const char *reference_name = undef_map->l_name;
1683 +
1684 +  if (GLRO(dl_debug_mask) & DL_DEBUG_BINDINGS)
1685 +    {
1686 +      _dl_debug_printf ("binding file %s [%lu] to %s [%lu]: %s symbol `%s'",
1687 +                       (reference_name[0]
1688 +                        ? reference_name
1689 +                        : (rtld_progname ?: "<main program>")),
1690 +                       undef_map->l_ns,
1691 +                       value->m->l_name[0] ? value->m->l_name : rtld_progname,
1692 +                       value->m->l_ns,
1693 +                       protected ? "protected" : "normal", undef_name);
1694 +      if (version)
1695 +       _dl_debug_printf_c (" [%s]\n", version->name);
1696 +      else
1697 +       _dl_debug_printf_c ("\n");
1698 +    }
1699 +#ifdef SHARED
1700 +  if (GLRO(dl_debug_mask) & DL_DEBUG_PRELINK)
1701 +    {
1702 +      int conflict = 0;
1703 +      struct sym_val val = { NULL, NULL };
1704 +
1705 +      if ((GLRO(dl_trace_prelink_map) == NULL
1706 +          || GLRO(dl_trace_prelink_map) == GL(dl_ns)[LM_ID_BASE]._ns_loaded)
1707 +         && undef_map != GL(dl_ns)[LM_ID_BASE]._ns_loaded)
1708 +       {
1709 +         const uint_fast32_t new_hash = dl_new_hash (undef_name);
1710 +         unsigned long int old_hash = 0xffffffff;
1711 +         struct unique_sym *saved_entries
1712 +           = GL(dl_ns)[LM_ID_BASE]._ns_unique_sym_table.entries;
1713 +
1714 +         GL(dl_ns)[LM_ID_BASE]._ns_unique_sym_table.entries = NULL;
1715 +         do_lookup_x (undef_name, new_hash, &old_hash, *ref, &val,
1716 +                      undef_map->l_local_scope[0], 0, version, 0, NULL,
1717 +                      type_class, undef_map);
1718 +         if (val.s != value->s || val.m != value->m)
1719 +           conflict = 1;
1720 +         else if (__builtin_expect (undef_map->l_symbolic_in_local_scope, 0)
1721 +                  && val.s
1722 +                  && __builtin_expect (ELFW(ST_BIND) (val.s->st_info),
1723 +                                       STB_GLOBAL) == STB_GNU_UNIQUE)
1724 +           {
1725 +             /* If it is STB_GNU_UNIQUE and undef_map's l_local_scope
1726 +                contains any DT_SYMBOLIC libraries, unfortunately there
1727 +                can be conflicts even if the above is equal.  As symbol
1728 +                resolution goes from the last library to the first and
1729 +                if a STB_GNU_UNIQUE symbol is found in some late DT_SYMBOLIC
1730 +                library, it would be the one that is looked up.  */
1731 +             struct sym_val val2 = { NULL, NULL };
1732 +             size_t n;
1733 +             struct r_scope_elem *scope = undef_map->l_local_scope[0];
1734 +
1735 +             for (n = 0; n < scope->r_nlist; n++)
1736 +               if (scope->r_list[n] == val.m)
1737 +                 break;
1738 +
1739 +             for (n++; n < scope->r_nlist; n++)
1740 +               if (scope->r_list[n]->l_info[DT_SYMBOLIC] != NULL
1741 +                   && do_lookup_x (undef_name, new_hash, &old_hash, *ref,
1742 +                                   &val2,
1743 +                                   &scope->r_list[n]->l_symbolic_searchlist,
1744 +                                   0, version, 0, NULL, type_class,
1745 +                                   undef_map) > 0)
1746 +                 {
1747 +                   conflict = 1;
1748 +                   val = val2;
1749 +                   break;
1750 +                 }
1751 +           }
1752 +         GL(dl_ns)[LM_ID_BASE]._ns_unique_sym_table.entries = saved_entries;
1753 +       }
1754 +
1755 +      if (value->s)
1756 +       {
1757 +         if (__builtin_expect (ELFW(ST_TYPE) (value->s->st_info)
1758 +                               == STT_TLS, 0))
1759 +           type_class = 4;
1760 +         else if (__builtin_expect (ELFW(ST_TYPE) (value->s->st_info)
1761 +                                    == STT_GNU_IFUNC, 0))
1762 +           type_class |= 8;
1763 +       }
1764 +
1765 +      if (conflict
1766 +         || GLRO(dl_trace_prelink_map) == undef_map
1767 +         || GLRO(dl_trace_prelink_map) == NULL
1768 +         || type_class >= 4)
1769 +       {
1770 +         _dl_printf ("%s 0x%0*Zx 0x%0*Zx -> 0x%0*Zx 0x%0*Zx ",
1771 +                     conflict ? "conflict" : "lookup",
1772 +                     (int) sizeof (ElfW(Addr)) * 2,
1773 +                     (size_t) undef_map->l_map_start,
1774 +                     (int) sizeof (ElfW(Addr)) * 2,
1775 +                     (size_t) (((ElfW(Addr)) *ref) - undef_map->l_map_start),
1776 +                     (int) sizeof (ElfW(Addr)) * 2,
1777 +                     (size_t) (value->s ? value->m->l_map_start : 0),
1778 +                     (int) sizeof (ElfW(Addr)) * 2,
1779 +                     (size_t) (value->s ? value->s->st_value : 0));
1780 +
1781 +         if (conflict)
1782 +           _dl_printf ("x 0x%0*Zx 0x%0*Zx ",
1783 +                       (int) sizeof (ElfW(Addr)) * 2,
1784 +                       (size_t) (val.s ? val.m->l_map_start : 0),
1785 +                       (int) sizeof (ElfW(Addr)) * 2,
1786 +                       (size_t) (val.s ? val.s->st_value : 0));
1787 +
1788 +         _dl_printf ("/%x %s\n", type_class, undef_name);
1789 +       }
1790 +    }
1791 +#endif
1792 +}
1793 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/dl-machine.h glibc-2.14.1/sysdeps/riscv/dl-machine.h
1794 --- ../glibc-2.14.1-orig/sysdeps/riscv/dl-machine.h     1969-12-31 16:00:00.000000000 -0800
1795 +++ glibc-2.14.1/sysdeps/riscv/dl-machine.h     2011-10-25 02:48:44.000000000 -0700
1796 @@ -0,0 +1,746 @@
1797 +/* Machine-dependent ELF dynamic relocation inline functions.  MIPS version.
1798 +   Copyright (C) 1996-2001, 2002, 2003, 2004, 2005, 2006, 2007
1799 +   Free Software Foundation, Inc.
1800 +   This file is part of the GNU C Library.
1801 +   Contributed by Kazumoto Kojima <kkojima@info.kanagawa-u.ac.jp>.
1802 +
1803 +   The GNU C Library is free software; you can redistribute it and/or
1804 +   modify it under the terms of the GNU Lesser General Public
1805 +   License as published by the Free Software Foundation; either
1806 +   version 2.1 of the License, or (at your option) any later version.
1807 +
1808 +   The GNU C Library is distributed in the hope that it will be useful,
1809 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
1810 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
1811 +   Lesser General Public License for more details.
1812 +
1813 +   You should have received a copy of the GNU Lesser General Public
1814 +   License along with the GNU C Library; if not, write to the Free
1815 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
1816 +   02111-1307 USA.  */
1817 +
1818 +/*  FIXME: Profiling of shared libraries is not implemented yet.  */
1819 +#ifndef dl_machine_h
1820 +#define dl_machine_h
1821 +
1822 +#define ELF_MACHINE_NAME "RISC-V"
1823 +
1824 +#include <entry.h>
1825 +
1826 +#ifndef ENTRY_POINT
1827 +#error ENTRY_POINT needs to be defined for MIPS.
1828 +#endif
1829 +
1830 +#include <sgidefs.h>
1831 +#include <sys/asm.h>
1832 +#include <dl-tls.h>
1833 +
1834 +/* The offset of gp from GOT might be system-dependent.  It's set by
1835 +   ld.  The same value is also */
1836 +#define OFFSET_GP_GOT 0x7f0
1837 +
1838 +#ifndef _RTLD_PROLOGUE
1839 +# define _RTLD_PROLOGUE(entry)                                         \
1840 +       ".globl\t" __STRING(entry) "\n\t"                               \
1841 +       ".ent\t" __STRING(entry) "\n\t"                                 \
1842 +       ".type\t" __STRING(entry) ", @function\n"                       \
1843 +       __STRING(entry) ":\n\t"
1844 +#endif
1845 +
1846 +#ifndef _RTLD_EPILOGUE
1847 +# define _RTLD_EPILOGUE(entry)                                         \
1848 +       ".end\t" __STRING(entry) "\n\t"                                 \
1849 +       ".size\t" __STRING(entry) ", . - " __STRING(entry) "\n\t"
1850 +#endif
1851 +
1852 +/* A reloc type used for ld.so cmdline arg lookups to reject PLT entries.
1853 +   This only makes sense on MIPS when using PLTs, so choose the
1854 +   PLT relocation (not encountered when not using PLTs).  */
1855 +#define ELF_MACHINE_JMP_SLOT                   R_MIPS_JUMP_SLOT
1856 +#define elf_machine_type_class(type) \
1857 +  ((((type) == ELF_MACHINE_JMP_SLOT) * ELF_RTYPE_CLASS_PLT)    \
1858 +   | (((type) == R_MIPS_COPY) * ELF_RTYPE_CLASS_COPY))
1859 +
1860 +#define ELF_MACHINE_PLT_REL 1
1861 +
1862 +/* Translate a processor specific dynamic tag to the index
1863 +   in l_info array.  */
1864 +#define DT_MIPS(x) (DT_MIPS_##x - DT_LOPROC + DT_NUM)
1865 +
1866 +/* If there is a DT_MIPS_RLD_MAP entry in the dynamic section, fill it in
1867 +   with the run-time address of the r_debug structure  */
1868 +#define ELF_MACHINE_DEBUG_SETUP(l,r) \
1869 +do { if ((l)->l_info[DT_MIPS (RLD_MAP)]) \
1870 +       *(ElfW(Addr) *)((l)->l_info[DT_MIPS (RLD_MAP)]->d_un.d_ptr) = \
1871 +       (ElfW(Addr)) (r); \
1872 +   } while (0)
1873 +
1874 +/* Return nonzero iff ELF header is compatible with the running host.  */
1875 +static inline int __attribute_used__
1876 +elf_machine_matches_host (const ElfW(Ehdr) *ehdr)
1877 +{
1878 +  return 1;
1879 +}
1880 +
1881 +static inline ElfW(Addr) *
1882 +elf_mips_got_from_gpreg (ElfW(Addr) gpreg)
1883 +{
1884 +  return (ElfW(Addr) *) (gpreg - OFFSET_GP_GOT);
1885 +}
1886 +
1887 +/* Return the link-time address of _DYNAMIC.  Conveniently, this is the
1888 +   first element of the GOT.  This must be inlined in a function which
1889 +   uses global data.  */
1890 +static inline ElfW(Addr)
1891 +elf_machine_dynamic (void)
1892 +{
1893 +  ElfW(Addr) tmp, gp;
1894 +  asm ("   rdnpc %0\n"
1895 +       "1: lui   %1, %%hi(%%neg(%%gp_rel(1b)))\n"
1896 +       "   add   %1, %1, %0\n"
1897 +       "   addi  %1, %1, %%lo(%%neg(%%gp_rel(1b)))\n"
1898 +       : "=r"(tmp), "=r"(gp));
1899 +
1900 +  return *elf_mips_got_from_gpreg (gp);
1901 +}
1902 +
1903 +#define STRINGXP(X) __STRING(X)
1904 +#define STRINGXV(X) STRINGV_(X)
1905 +#define STRINGV_(...) # __VA_ARGS__
1906 +
1907 +/* Return the run-time load address of the shared object.  */
1908 +static inline ElfW(Addr)
1909 +elf_machine_load_address (void)
1910 +{
1911 +  ElfW(Addr) load, link, tmp;
1912 +  asm ("   rdnpc %0\n"
1913 +       "1: lui   %1, %%hi(%%neg(%%gp_rel(1b)))\n"
1914 +       "   add   %1, %1, %0\n"
1915 +       "   addi  %1, %1, %%lo(%%neg(%%gp_rel(1b)))\n"
1916 +       "   lui   %2, %%got_hi(1b)\n"
1917 +       "   add   %2, %2, %1\n"
1918 +       STRINGXP(REG_L) " %1, %%got_lo(1b)(%2)"
1919 +       : "=r"(load), "=r"(link), "=r"(tmp));
1920 +
1921 +  return load - link;
1922 +}
1923 +
1924 +/* The MSB of got[1] of a gnu object is set to identify gnu objects.  */
1925 +#ifdef __riscv64
1926 +# define ELF_MIPS_GNU_GOT1_MASK        0x8000000000000000L
1927 +#else
1928 +# define ELF_MIPS_GNU_GOT1_MASK        0x80000000L
1929 +#endif
1930 +
1931 +/* We can't rely on elf_machine_got_rel because _dl_object_relocation_scope
1932 +   fiddles with global data.  */
1933 +#define ELF_MACHINE_BEFORE_RTLD_RELOC(dynamic_info)                    \
1934 +do {                                                                   \
1935 +  struct link_map *map = &bootstrap_map;                               \
1936 +  ElfW(Sym) *sym;                                                      \
1937 +  ElfW(Addr) *got;                                                     \
1938 +  int i, n;                                                            \
1939 +                                                                       \
1940 +  got = (ElfW(Addr) *) D_PTR (map, l_info[DT_PLTGOT]);                 \
1941 +                                                                       \
1942 +  if (__builtin_expect (map->l_addr == 0, 1))                          \
1943 +    break;                                                             \
1944 +                                                                       \
1945 +  /* got[0] is reserved. got[1] is also reserved for the dynamic object        \
1946 +     generated by gnu ld. Skip these reserved entries from             \
1947 +     relocation.  */                                                   \
1948 +  i = (got[1] & ELF_MIPS_GNU_GOT1_MASK)? 2 : 1;                                \
1949 +  n = map->l_info[DT_MIPS (LOCAL_GOTNO)]->d_un.d_val;                  \
1950 +                                                                       \
1951 +  /* Add the run-time displacement to all local got entries. */                \
1952 +  while (i < n)                                                                \
1953 +    got[i++] += map->l_addr;                                           \
1954 +                                                                       \
1955 +  /* Handle global got entries. */                                     \
1956 +  got += n;                                                            \
1957 +  sym = (ElfW(Sym) *) D_PTR(map, l_info[DT_SYMTAB])                    \
1958 +       + map->l_info[DT_MIPS (GOTSYM)]->d_un.d_val;                    \
1959 +  i = (map->l_info[DT_MIPS (SYMTABNO)]->d_un.d_val                     \
1960 +       - map->l_info[DT_MIPS (GOTSYM)]->d_un.d_val);                   \
1961 +                                                                       \
1962 +  while (i--)                                                          \
1963 +    {                                                                  \
1964 +      if (sym->st_shndx == SHN_UNDEF || sym->st_shndx == SHN_COMMON)   \
1965 +       *got = map->l_addr + sym->st_value;                             \
1966 +      else if (ELFW(ST_TYPE) (sym->st_info) == STT_FUNC                        \
1967 +              && *got != sym->st_value)                                \
1968 +       *got += map->l_addr;                                            \
1969 +      else if (ELFW(ST_TYPE) (sym->st_info) == STT_SECTION)            \
1970 +       {                                                               \
1971 +         if (sym->st_other == 0)                                       \
1972 +           *got += map->l_addr;                                        \
1973 +       }                                                               \
1974 +      else                                                             \
1975 +       *got = map->l_addr + sym->st_value;                             \
1976 +                                                                       \
1977 +      got++;                                                           \
1978 +      sym++;                                                           \
1979 +    }                                                                  \
1980 +} while(0)
1981 +
1982 +
1983 +/* Mask identifying addresses reserved for the user program,
1984 +   where the dynamic linker should not map anything.  */
1985 +#define ELF_MACHINE_USER_ADDRESS_MASK  0x80000000UL
1986 +
1987 +
1988 +/* Initial entry point code for the dynamic linker.
1989 +   The C function `_dl_start' is the real entry point;
1990 +   its return value is the user program's entry point. */
1991 +
1992 +#define RTLD_START asm (\
1993 +       ".text\n\
1994 +       " _RTLD_PROLOGUE(ENTRY_POINT) "\
1995 +       " STRINGXV(SETUP_GPX64(gp, t7)) "\n\
1996 +       # i386 ABI book says that the first entry of GOT holds\n\
1997 +       # the address of the dynamic structure. Though MIPS ABI\n\
1998 +       # doesn't say nothing about this, I emulate this here.\n\
1999 +       " STRINGXV(PIC_LA(a0, gp, _DYNAMIC)) "\n\
2000 +       # Subtract OFFSET_GP_GOT\n\
2001 +       " STRINGXP(REG_S) " a0, -" STRINGXP(OFFSET_GP_GOT) "(gp)\n\
2002 +       move a0, sp\n\
2003 +       addi sp, sp, -16\n\
2004 +       \n\
2005 +       rdnpc t0\n\
2006 +.Lcoff: \n\
2007 +       " STRINGXV(PIC_LA(a4, gp, .Lcoff)) "\n\
2008 +       sub a4, t0, a4\n\
2009 +       \n\
2010 +       " STRINGXV(PIC_LA(t7, gp, _dl_start)) "\n\
2011 +       add t7, t7, t0\n\
2012 +       jalr t7\n\
2013 +       \n\
2014 +       addi sp, sp, 16\n\
2015 +       j _dl_start_user\n\
2016 +       " _RTLD_EPILOGUE(ENTRY_POINT) "\
2017 +       \n\
2018 +       \n\
2019 +       " _RTLD_PROLOGUE(_dl_start_user) "\
2020 +       " STRINGXV(SETUP_GPX64(gp, t7)) "\n\
2021 +       # Save the user entry point address in a saved register.\n\
2022 +       move s0, v0\n\
2023 +       # See if we were run as a command with the executable file\n\
2024 +       # name as an extra leading argument.\n\
2025 +       " STRINGXV(PIC_LA(v0, gp, _dl_skip_args)) "\n\
2026 +       lw v0, 0(v0)\n\
2027 +       beqz v0, 1f\n\
2028 +       # Load the original argument count.\n\
2029 +       " STRINGXP(REG_L) " a0, 0(sp)\n\
2030 +       # Subtract _dl_skip_args from it.\n\
2031 +       sub a0, a0, v0\n\
2032 +       # Adjust the stack pointer to skip _dl_skip_args words.\n\
2033 +       sll v0, v0, " STRINGXP (PTRLOG) "\n\
2034 +       add sp, sp, v0\n\
2035 +       # Save back the modified argument count.\n\
2036 +       " STRINGXP(REG_S) " a0, 0(sp)\n\
2037 +1:     # Call _dl_init (struct link_map *main_map, int argc, char **argv, char **env) \n\
2038 +       " STRINGXV(PIC_LA(a0, gp, _rtld_local)) "\n\
2039 +       " STRINGXP(REG_L) " a0, 0(a0)\n\
2040 +       " STRINGXP(REG_L) " a1, 0(sp)\n\
2041 +       add a2, sp, " STRINGXP (PTRSIZE) "\n\
2042 +       sll a3, a1, " STRINGXP (PTRLOG) "\n\
2043 +       add a3, a3, a2\n\
2044 +       add a3, a3, " STRINGXP (PTRSIZE) "\n\
2045 +       # Make sure the stack pointer is aligned for _dl_init_internal.\n\
2046 +       and v0, sp, -2 * " STRINGXP(SZREG) "\n\
2047 +       move s3, sp\n\
2048 +       add sp, v0, -32\n\
2049 +       # Call the function to run the initializers.\n\
2050 +       " STRINGXV(PIC_LA(t7, gp, _dl_init_internal)) "\n\
2051 +       jalr t7\n\
2052 +       # Restore the stack pointer for _start.\n\
2053 +       move sp, s3\n\
2054 +       # Pass our finalizer function to the user in v0 as per ELF ABI.\n\
2055 +       " STRINGXV(PIC_LA(v0, gp, _dl_fini)) "\n\
2056 +       # Jump to the user entry point.\n\
2057 +       move t7, s0\n\
2058 +       jr t7\n\t"\
2059 +       _RTLD_EPILOGUE(_dl_start_user)\
2060 +       ".previous"\
2061 +);
2062 +
2063 +/* Names of the architecture-specific auditing callback functions.  */
2064 +# ifdef __riscv64
2065 +#  define ARCH_LA_PLTENTER mips_n64_gnu_pltenter
2066 +#  define ARCH_LA_PLTEXIT mips_n64_gnu_pltexit
2067 +# else
2068 +#  define ARCH_LA_PLTENTER mips_n32_gnu_pltenter
2069 +#  define ARCH_LA_PLTEXIT mips_n32_gnu_pltexit
2070 +# endif
2071 +
2072 +/* For a non-writable PLT, rewrite the .got.plt entry at RELOC_ADDR to
2073 +   point at the symbol with address VALUE.  For a writable PLT, rewrite
2074 +   the corresponding PLT entry instead.  */
2075 +static inline ElfW(Addr)
2076 +elf_machine_fixup_plt (struct link_map *map, lookup_t t,
2077 +                      const ElfW(Rel) *reloc,
2078 +                      ElfW(Addr) *reloc_addr, ElfW(Addr) value)
2079 +{
2080 +  return *reloc_addr = value;
2081 +}
2082 +
2083 +static inline ElfW(Addr)
2084 +elf_machine_plt_value (struct link_map *map, const ElfW(Rel) *reloc,
2085 +                      ElfW(Addr) value)
2086 +{
2087 +  return value;
2088 +}
2089 +
2090 +#endif /* !dl_machine_h */
2091 +
2092 +#ifdef RESOLVE_MAP
2093 +
2094 +/* Perform a relocation described by R_INFO at the location pointed to
2095 +   by RELOC_ADDR.  SYM is the relocation symbol specified by R_INFO and
2096 +   MAP is the object containing the reloc.  */
2097 +
2098 +auto inline void
2099 +__attribute__ ((always_inline))
2100 +elf_machine_reloc (struct link_map *map, ElfW(Addr) r_info,
2101 +                  const ElfW(Sym) *sym, const struct r_found_version *version,
2102 +                  void *reloc_addr, ElfW(Addr) r_addend, int inplace_p)
2103 +{
2104 +  const unsigned long int r_type = ELFW(R_TYPE) (r_info);
2105 +  ElfW(Addr) *addr_field = (ElfW(Addr) *) reloc_addr;
2106 +
2107 +#if !defined RTLD_BOOTSTRAP && !defined SHARED
2108 +  /* This is defined in rtld.c, but nowhere in the static libc.a;
2109 +     make the reference weak so static programs can still link.  This
2110 +     declaration cannot be done when compiling rtld.c (i.e.  #ifdef
2111 +     RTLD_BOOTSTRAP) because rtld.c contains the common defn for
2112 +     _dl_rtld_map, which is incompatible with a weak decl in the same
2113 +     file.  */
2114 +  weak_extern (GL(dl_rtld_map));
2115 +#endif
2116 +
2117 +  switch (r_type)
2118 +    {
2119 +#if defined (USE_TLS) && !defined (RTLD_BOOTSTRAP)
2120 +# if _RISCV_SIM == _ABI64
2121 +    case R_MIPS_TLS_DTPMOD64:
2122 +    case R_MIPS_TLS_DTPREL64:
2123 +    case R_MIPS_TLS_TPREL64:
2124 +# else
2125 +    case R_MIPS_TLS_DTPMOD32:
2126 +    case R_MIPS_TLS_DTPREL32:
2127 +    case R_MIPS_TLS_TPREL32:
2128 +# endif
2129 +      {
2130 +       struct link_map *sym_map = RESOLVE_MAP (&sym, version, r_type);
2131 +
2132 +       switch (r_type)
2133 +         {
2134 +         case R_MIPS_TLS_DTPMOD64:
2135 +         case R_MIPS_TLS_DTPMOD32:
2136 +           if (sym_map)
2137 +             *addr_field = sym_map->l_tls_modid;
2138 +           break;
2139 +
2140 +         case R_MIPS_TLS_DTPREL64:
2141 +         case R_MIPS_TLS_DTPREL32:
2142 +           if (sym)
2143 +             {
2144 +               if (inplace_p)
2145 +                 r_addend = *addr_field;
2146 +               *addr_field = r_addend + TLS_DTPREL_VALUE (sym);
2147 +             }
2148 +           break;
2149 +
2150 +         case R_MIPS_TLS_TPREL32:
2151 +         case R_MIPS_TLS_TPREL64:
2152 +           if (sym)
2153 +             {
2154 +               CHECK_STATIC_TLS (map, sym_map);
2155 +               if (inplace_p)
2156 +                 r_addend = *addr_field;
2157 +               *addr_field = r_addend + TLS_TPREL_VALUE (sym_map, sym);
2158 +             }
2159 +           break;
2160 +         }
2161 +
2162 +       break;
2163 +      }
2164 +#endif
2165 +
2166 +#if _RISCV_SIM == _ABI64
2167 +    case (R_MIPS_64 << 8) | R_MIPS_REL32:
2168 +#else
2169 +    case R_MIPS_REL32:
2170 +#endif
2171 +      {
2172 +       int symidx = ELFW(R_SYM) (r_info);
2173 +       ElfW(Addr) reloc_value;
2174 +
2175 +       if (inplace_p)
2176 +         /* Support relocations on mis-aligned offsets.  */
2177 +         __builtin_memcpy (&reloc_value, reloc_addr, sizeof (reloc_value));
2178 +       else
2179 +         reloc_value = r_addend;
2180 +
2181 +       if (symidx)
2182 +         {
2183 +           const ElfW(Word) gotsym
2184 +             = (const ElfW(Word)) map->l_info[DT_MIPS (GOTSYM)]->d_un.d_val;
2185 +
2186 +           if ((ElfW(Word))symidx < gotsym)
2187 +             {
2188 +               /* This wouldn't work for a symbol imported from other
2189 +                  libraries for which there's no GOT entry, but MIPS
2190 +                  requires every symbol referenced in a dynamic
2191 +                  relocation to have a GOT entry in the primary GOT,
2192 +                  so we only get here for locally-defined symbols.
2193 +                  For section symbols, we should *NOT* be adding
2194 +                  sym->st_value (per the definition of the meaning of
2195 +                  S in reloc expressions in the ELF64 MIPS ABI),
2196 +                  since it should have already been added to
2197 +                  reloc_value by the linker, but older versions of
2198 +                  GNU ld didn't add it, and newer versions don't emit
2199 +                  useless relocations to section symbols any more, so
2200 +                  it is safe to keep on adding sym->st_value, even
2201 +                  though it's not ABI compliant.  Some day we should
2202 +                  bite the bullet and stop doing this.  */
2203 +#ifndef RTLD_BOOTSTRAP
2204 +               if (map != &GL(dl_rtld_map))
2205 +#endif
2206 +                 reloc_value += sym->st_value + map->l_addr;
2207 +             }
2208 +           else
2209 +             {
2210 +#ifndef RTLD_BOOTSTRAP
2211 +               const ElfW(Addr) *got
2212 +                 = (const ElfW(Addr) *) D_PTR (map, l_info[DT_PLTGOT]);
2213 +               const ElfW(Word) local_gotno
2214 +                 = (const ElfW(Word))
2215 +                   map->l_info[DT_MIPS (LOCAL_GOTNO)]->d_un.d_val;
2216 +
2217 +               reloc_value += got[symidx + local_gotno - gotsym];
2218 +#endif
2219 +             }
2220 +         }
2221 +       else
2222 +#ifndef RTLD_BOOTSTRAP
2223 +         if (map != &GL(dl_rtld_map))
2224 +#endif
2225 +           reloc_value += map->l_addr;
2226 +
2227 +       __builtin_memcpy (reloc_addr, &reloc_value, sizeof (reloc_value));
2228 +      }
2229 +      break;
2230 +#ifndef RTLD_BOOTSTRAP
2231 +#if _RISCV_SIM == _ABI64
2232 +    case (R_MIPS_64 << 8) | R_MIPS_GLOB_DAT:
2233 +#else
2234 +    case R_MIPS_GLOB_DAT:
2235 +#endif
2236 +      {
2237 +       int symidx = ELFW(R_SYM) (r_info);
2238 +       const ElfW(Word) gotsym
2239 +         = (const ElfW(Word)) map->l_info[DT_MIPS (GOTSYM)]->d_un.d_val;
2240 +
2241 +       if (__builtin_expect ((ElfW(Word)) symidx >= gotsym, 1))
2242 +         {
2243 +           const ElfW(Addr) *got
2244 +             = (const ElfW(Addr) *) D_PTR (map, l_info[DT_PLTGOT]);
2245 +           const ElfW(Word) local_gotno
2246 +             = ((const ElfW(Word))
2247 +                map->l_info[DT_MIPS (LOCAL_GOTNO)]->d_un.d_val);
2248 +
2249 +           ElfW(Addr) reloc_value = got[symidx + local_gotno - gotsym];
2250 +           __builtin_memcpy (reloc_addr, &reloc_value, sizeof (reloc_value));
2251 +         }
2252 +      }
2253 +      break;
2254 +#endif
2255 +    case R_MIPS_NONE:          /* Alright, Wilbur.  */
2256 +      break;
2257 +
2258 +    case R_MIPS_JUMP_SLOT:
2259 +      {
2260 +       struct link_map *sym_map;
2261 +       ElfW(Addr) value;
2262 +
2263 +       /* The addend for a jump slot relocation must always be zero:
2264 +          calls via the PLT always branch to the symbol's address and
2265 +          not to the address plus a non-zero offset.  */
2266 +       if (r_addend != 0)
2267 +         _dl_signal_error (0, map->l_name, NULL,
2268 +                           "found jump slot relocation with non-zero addend");
2269 +
2270 +       sym_map = RESOLVE_MAP (&sym, version, r_type);
2271 +       value = sym_map == NULL ? 0 : sym_map->l_addr + sym->st_value;
2272 +       *addr_field = value;
2273 +
2274 +       break;
2275 +      }
2276 +
2277 +    case R_MIPS_COPY:
2278 +      {
2279 +       const ElfW(Sym) *const refsym = sym;
2280 +       struct link_map *sym_map;
2281 +       ElfW(Addr) value;
2282 +
2283 +       /* Calculate the address of the symbol.  */
2284 +       sym_map = RESOLVE_MAP (&sym, version, r_type);
2285 +       value = sym_map == NULL ? 0 : sym_map->l_addr + sym->st_value;
2286 +
2287 +       if (__builtin_expect (sym == NULL, 0))
2288 +         /* This can happen in trace mode if an object could not be
2289 +            found.  */
2290 +         break;
2291 +       if (__builtin_expect (sym->st_size > refsym->st_size, 0)
2292 +           || (__builtin_expect (sym->st_size < refsym->st_size, 0)
2293 +               && GLRO(dl_verbose)))
2294 +         {
2295 +           const char *strtab;
2296 +
2297 +           strtab = (const void *) D_PTR (map, l_info[DT_STRTAB]);
2298 +           _dl_error_printf ("\
2299 +  %s: Symbol `%s' has different size in shared object, consider re-linking\n",
2300 +                             rtld_progname ?: "<program name unknown>",
2301 +                             strtab + refsym->st_name);
2302 +         }
2303 +       memcpy (reloc_addr, (void *) value,
2304 +               MIN (sym->st_size, refsym->st_size));
2305 +       break;
2306 +      }
2307 +
2308 +#if _RISCV_SIM == _ABI64
2309 +    case R_MIPS_64:
2310 +      /* For full compliance with the ELF64 ABI, one must precede the
2311 +        _REL32/_64 pair of relocations with a _64 relocation, such
2312 +        that the in-place addend is read as a 64-bit value.  IRIX
2313 +        didn't pick up on this requirement, so we treat the
2314 +        _REL32/_64 relocation as a 64-bit relocation even if it's by
2315 +        itself.  For ABI compliance, we ignore such _64 dummy
2316 +        relocations.  For RELA, this may be simply removed, since
2317 +        it's totally unnecessary.  */
2318 +      if (ELFW(R_SYM) (r_info) == 0)
2319 +       break;
2320 +      /* Fall through.  */
2321 +#endif
2322 +    default:
2323 +      _dl_reloc_bad_type (map, r_type, 0);
2324 +      break;
2325 +    }
2326 +}
2327 +
2328 +/* Perform the relocation specified by RELOC and SYM (which is fully resolved).
2329 +   MAP is the object containing the reloc.  */
2330 +
2331 +auto inline void
2332 +__attribute__ ((always_inline))
2333 +elf_machine_rel (struct link_map *map, const ElfW(Rel) *reloc,
2334 +                const ElfW(Sym) *sym, const struct r_found_version *version,
2335 +                void *const reloc_addr)
2336 +{
2337 +  elf_machine_reloc (map, reloc->r_info, sym, version, reloc_addr, 0, 1);
2338 +}
2339 +
2340 +auto inline void
2341 +__attribute__((always_inline))
2342 +elf_machine_rel_relative (ElfW(Addr) l_addr, const ElfW(Rel) *reloc,
2343 +                         void *const reloc_addr)
2344 +{
2345 +  /* XXX Nothing to do.  There is no relative relocation, right?  */
2346 +}
2347 +
2348 +auto inline void
2349 +__attribute__((always_inline))
2350 +elf_machine_lazy_rel (struct link_map *map,
2351 +                     ElfW(Addr) l_addr, const ElfW(Rel) *reloc)
2352 +{
2353 +  ElfW(Addr) *const reloc_addr = (void *) (l_addr + reloc->r_offset);
2354 +  const unsigned int r_type = ELFW(R_TYPE) (reloc->r_info);
2355 +  /* Check for unexpected PLT reloc type.  */
2356 +  if (__builtin_expect (r_type == R_MIPS_JUMP_SLOT, 1))
2357 +    {
2358 +      if (__builtin_expect (map->l_mach.plt, 0) == 0)
2359 +       {
2360 +         /* Nothing is required here since we only support lazy
2361 +            relocation in executables.  */
2362 +       }
2363 +      else
2364 +       *reloc_addr = map->l_mach.plt;
2365 +    }
2366 +  else
2367 +    _dl_reloc_bad_type (map, r_type, 1);
2368 +}
2369 +
2370 +auto inline void
2371 +__attribute__ ((always_inline))
2372 +elf_machine_rela (struct link_map *map, const ElfW(Rela) *reloc,
2373 +                 const ElfW(Sym) *sym, const struct r_found_version *version,
2374 +                void *const reloc_addr)
2375 +{
2376 +  elf_machine_reloc (map, reloc->r_info, sym, version, reloc_addr,
2377 +                    reloc->r_addend, 0);
2378 +}
2379 +
2380 +auto inline void
2381 +__attribute__((always_inline))
2382 +elf_machine_rela_relative (ElfW(Addr) l_addr, const ElfW(Rela) *reloc,
2383 +                          void *const reloc_addr)
2384 +{
2385 +}
2386 +
2387 +#ifndef RTLD_BOOTSTRAP
2388 +/* Relocate GOT. */
2389 +auto inline void
2390 +__attribute__((always_inline))
2391 +elf_machine_got_rel (struct link_map *map, int lazy)
2392 +{
2393 +  ElfW(Addr) *got;
2394 +  ElfW(Sym) *sym;
2395 +  const ElfW(Half) *vernum;
2396 +  int i, n, symidx;
2397 +
2398 +#define RESOLVE_GOTSYM(sym,vernum,sym_index,reloc)                       \
2399 +    ({                                                                   \
2400 +      const ElfW(Sym) *ref = sym;                                        \
2401 +      const struct r_found_version *version                              \
2402 +        = vernum ? &map->l_versions[vernum[sym_index] & 0x7fff] : NULL;          \
2403 +      struct link_map *sym_map;                                                  \
2404 +      sym_map = RESOLVE_MAP (&ref, version, reloc);                      \
2405 +      ref ? sym_map->l_addr + ref->st_value : 0;                         \
2406 +    })
2407 +
2408 +  if (map->l_info[VERSYMIDX (DT_VERSYM)] != NULL)
2409 +    vernum = (const void *) D_PTR (map, l_info[VERSYMIDX (DT_VERSYM)]);
2410 +  else
2411 +    vernum = NULL;
2412 +
2413 +  got = (ElfW(Addr) *) D_PTR (map, l_info[DT_PLTGOT]);
2414 +
2415 +  n = map->l_info[DT_MIPS (LOCAL_GOTNO)]->d_un.d_val;
2416 +  /* The dynamic linker's local got entries have already been relocated.  */
2417 +  if (map != &GL(dl_rtld_map))
2418 +    {
2419 +      /* got[0] is reserved. got[1] is also reserved for the dynamic object
2420 +        generated by gnu ld. Skip these reserved entries from relocation.  */
2421 +      i = (got[1] & ELF_MIPS_GNU_GOT1_MASK)? 2 : 1;
2422 +
2423 +      /* Add the run-time displacement to all local got entries if
2424 +         needed.  */
2425 +      if (__builtin_expect (map->l_addr != 0, 0))
2426 +       {
2427 +         while (i < n)
2428 +           got[i++] += map->l_addr;
2429 +       }
2430 +    }
2431 +
2432 +  /* Handle global got entries. */
2433 +  got += n;
2434 +  /* Keep track of the symbol index.  */
2435 +  symidx = map->l_info[DT_MIPS (GOTSYM)]->d_un.d_val;
2436 +  sym = (ElfW(Sym) *) D_PTR (map, l_info[DT_SYMTAB]) + symidx;
2437 +  i = (map->l_info[DT_MIPS (SYMTABNO)]->d_un.d_val
2438 +       - map->l_info[DT_MIPS (GOTSYM)]->d_un.d_val);
2439 +
2440 +  /* This loop doesn't handle Quickstart.  */
2441 +  while (i--)
2442 +    {
2443 +      if (sym->st_shndx == SHN_UNDEF)
2444 +       {
2445 +         if (ELFW(ST_TYPE) (sym->st_info) == STT_FUNC && sym->st_value
2446 +             && !(sym->st_other & STO_MIPS_PLT))
2447 +           {
2448 +             if (lazy)
2449 +               *got = sym->st_value + map->l_addr;
2450 +             else
2451 +               /* This is a lazy-binding stub, so we don't need the
2452 +                  canonical address.  */
2453 +               *got = RESOLVE_GOTSYM (sym, vernum, symidx, R_MIPS_JUMP_SLOT);
2454 +           }
2455 +         else
2456 +           *got = RESOLVE_GOTSYM (sym, vernum, symidx, R_MIPS_32);
2457 +       }
2458 +      else if (sym->st_shndx == SHN_COMMON)
2459 +       *got = RESOLVE_GOTSYM (sym, vernum, symidx, R_MIPS_32);
2460 +      else if (ELFW(ST_TYPE) (sym->st_info) == STT_FUNC
2461 +              && *got != sym->st_value)
2462 +       {
2463 +         if (lazy)
2464 +           *got += map->l_addr;
2465 +         else
2466 +           /* This is a lazy-binding stub, so we don't need the
2467 +              canonical address.  */
2468 +           *got = RESOLVE_GOTSYM (sym, vernum, symidx, R_MIPS_JUMP_SLOT);
2469 +       }
2470 +      else if (ELFW(ST_TYPE) (sym->st_info) == STT_SECTION)
2471 +       {
2472 +         if (sym->st_other == 0)
2473 +           *got += map->l_addr;
2474 +       }
2475 +      else
2476 +       *got = RESOLVE_GOTSYM (sym, vernum, symidx, R_MIPS_32);
2477 +
2478 +      ++got;
2479 +      ++sym;
2480 +      ++symidx;
2481 +    }
2482 +
2483 +#undef RESOLVE_GOTSYM
2484 +}
2485 +#endif
2486 +
2487 +/* Set up the loaded object described by L so its stub function
2488 +   will jump to the on-demand fixup code __dl_runtime_resolve.  */
2489 +
2490 +auto inline int
2491 +__attribute__((always_inline))
2492 +elf_machine_runtime_setup (struct link_map *l, int lazy, int profile)
2493 +{
2494 +# ifndef RTLD_BOOTSTRAP
2495 +  ElfW(Addr) *got;
2496 +  extern void _dl_runtime_resolve (ElfW(Word));
2497 +  extern void _dl_runtime_pltresolve (void);
2498 +  extern int _dl_mips_gnu_objects;
2499 +
2500 +  if (lazy)
2501 +    {
2502 +      /* The GOT entries for functions have not yet been filled in.
2503 +        Their initial contents will arrange when called to put an
2504 +        offset into the .dynsym section in t8, the return address
2505 +        in t7 and then jump to _GLOBAL_OFFSET_TABLE[0].  */
2506 +      got = (ElfW(Addr) *) D_PTR (l, l_info[DT_PLTGOT]);
2507 +
2508 +      /* This function will get called to fix up the GOT entry indicated by
2509 +        the register t8, and then jump to the resolved address.  */
2510 +      got[0] = (ElfW(Addr)) &_dl_runtime_resolve;
2511 +
2512 +      /* Store l to _GLOBAL_OFFSET_TABLE[1] for gnu object. The MSB
2513 +        of got[1] of a gnu object is set to identify gnu objects.
2514 +        Where we can store l for non gnu objects? XXX  */
2515 +      if ((got[1] & ELF_MIPS_GNU_GOT1_MASK) != 0)
2516 +       got[1] = ((ElfW(Addr)) l | ELF_MIPS_GNU_GOT1_MASK);
2517 +      else
2518 +       _dl_mips_gnu_objects = 0;
2519 +    }
2520 +
2521 +  /* Relocate global offset table.  */
2522 +  elf_machine_got_rel (l, lazy);
2523 +
2524 +  /* If using PLTs, fill in the first two entries of .got.plt.  */
2525 +  if (l->l_info[DT_JMPREL] && lazy)
2526 +    {
2527 +      ElfW(Addr) *gotplt;
2528 +      gotplt = (ElfW(Addr) *) D_PTR (l, l_info[DT_MIPS (PLTGOT)]);
2529 +      /* If a library is prelinked but we have to relocate anyway,
2530 +        we have to be able to undo the prelinking of .got.plt.
2531 +        The prelinker saved the address of .plt for us here.  */
2532 +      if (gotplt[1])
2533 +       l->l_mach.plt = gotplt[1] + l->l_addr;
2534 +      gotplt[0] = (ElfW(Addr)) &_dl_runtime_pltresolve;
2535 +      gotplt[1] = (ElfW(Addr)) l;
2536 +    }
2537 +
2538 +# endif
2539 +  return lazy;
2540 +}
2541 +
2542 +#endif /* RESOLVE_MAP */
2543 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/dl-tls.h glibc-2.14.1/sysdeps/riscv/dl-tls.h
2544 --- ../glibc-2.14.1-orig/sysdeps/riscv/dl-tls.h 1969-12-31 16:00:00.000000000 -0800
2545 +++ glibc-2.14.1/sysdeps/riscv/dl-tls.h 2011-10-25 02:48:44.000000000 -0700
2546 @@ -0,0 +1,49 @@
2547 +/* Thread-local storage handling in the ELF dynamic linker.  MIPS version.
2548 +   Copyright (C) 2005 Free Software Foundation, Inc.
2549 +   This file is part of the GNU C Library.
2550 +
2551 +   The GNU C Library is free software; you can redistribute it and/or
2552 +   modify it under the terms of the GNU Lesser General Public
2553 +   License as published by the Free Software Foundation; either
2554 +   version 2.1 of the License, or (at your option) any later version.
2555 +
2556 +   The GNU C Library is distributed in the hope that it will be useful,
2557 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
2558 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
2559 +   Lesser General Public License for more details.
2560 +
2561 +   You should have received a copy of the GNU Lesser General Public
2562 +   License along with the GNU C Library; if not, write to the Free
2563 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
2564 +   02111-1307 USA.  */
2565 +
2566 +
2567 +/* Type used for the representation of TLS information in the GOT.  */
2568 +typedef struct
2569 +{
2570 +  unsigned long int ti_module;
2571 +  unsigned long int ti_offset;
2572 +} tls_index;
2573 +
2574 +/* The thread pointer points 0x7000 past the first static TLS block.  */
2575 +#define TLS_TP_OFFSET          0x7000
2576 +
2577 +/* Dynamic thread vector pointers point 0x8000 past the start of each
2578 +   TLS block.  */
2579 +#define TLS_DTV_OFFSET         0x8000
2580 +
2581 +/* Compute the value for a GOTTPREL reloc.  */
2582 +#define TLS_TPREL_VALUE(sym_map, sym) \
2583 +  ((sym_map)->l_tls_offset + (sym)->st_value - TLS_TP_OFFSET)
2584 +
2585 +/* Compute the value for a DTPREL reloc.  */
2586 +#define TLS_DTPREL_VALUE(sym) \
2587 +  ((sym)->st_value - TLS_DTV_OFFSET)
2588 +
2589 +extern void *__tls_get_addr (tls_index *ti);
2590 +
2591 +# define GET_ADDR_OFFSET       (ti->ti_offset + TLS_DTV_OFFSET)
2592 +# define __TLS_GET_ADDR(__ti)  (__tls_get_addr (__ti) - TLS_DTV_OFFSET)
2593 +
2594 +/* Value used for dtv entries for which the allocation is delayed.  */
2595 +#define TLS_DTV_UNALLOCATED    ((void *) -1l)
2596 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/dl-trampoline.c glibc-2.14.1/sysdeps/riscv/dl-trampoline.c
2597 --- ../glibc-2.14.1-orig/sysdeps/riscv/dl-trampoline.c  1969-12-31 16:00:00.000000000 -0800
2598 +++ glibc-2.14.1/sysdeps/riscv/dl-trampoline.c  2011-10-25 02:48:44.000000000 -0700
2599 @@ -0,0 +1,295 @@
2600 +/* PLT trampoline.  MIPS version.
2601 +   Copyright (C) 1996-2001, 2002, 2003, 2004, 2005
2602 +   Free Software Foundation, Inc.
2603 +   This file is part of the GNU C Library.
2604 +   Contributed by Kazumoto Kojima <kkojima@info.kanagawa-u.ac.jp>.
2605 +
2606 +   The GNU C Library is free software; you can redistribute it and/or
2607 +   modify it under the terms of the GNU Lesser General Public
2608 +   License as published by the Free Software Foundation; either
2609 +   version 2.1 of the License, or (at your option) any later version.
2610 +
2611 +   The GNU C Library is distributed in the hope that it will be useful,
2612 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
2613 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
2614 +   Lesser General Public License for more details.
2615 +
2616 +   You should have received a copy of the GNU Lesser General Public
2617 +   License along with the GNU C Library; if not, write to the Free
2618 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
2619 +   02111-1307 USA.  */
2620 +
2621 +/*  FIXME: Profiling of shared libraries is not implemented yet.  */
2622 +
2623 +#include <sysdep.h>
2624 +#include <link.h>
2625 +#include <elf.h>
2626 +#include <ldsodefs.h>
2627 +#include <dl-machine.h>
2628 +
2629 +/* Get link map for callers object containing STUB_PC.  */
2630 +static inline struct link_map *
2631 +elf_machine_runtime_link_map (ElfW(Addr) gpreg, ElfW(Addr) stub_pc)
2632 +{
2633 +  extern int _dl_mips_gnu_objects;
2634 +
2635 +  /* got[1] is reserved to keep its link map address for the shared
2636 +     object generated by the gnu linker.  If all are such objects, we
2637 +     can find the link map from current GPREG simply.  If not so, get
2638 +     the link map for caller's object containing STUB_PC.  */
2639 +
2640 +  if (_dl_mips_gnu_objects)
2641 +    {
2642 +      ElfW(Addr) *got = elf_mips_got_from_gpreg (gpreg);
2643 +      ElfW(Word) g1;
2644 +
2645 +      g1 = ((ElfW(Word) *) got)[1];
2646 +
2647 +      if ((g1 & ELF_MIPS_GNU_GOT1_MASK) != 0)
2648 +       {
2649 +         struct link_map *l =
2650 +           (struct link_map *) (g1 & ~ELF_MIPS_GNU_GOT1_MASK);
2651 +         ElfW(Addr) base, limit;
2652 +         const ElfW(Phdr) *p = l->l_phdr;
2653 +         ElfW(Half) this, nent = l->l_phnum;
2654 +
2655 +         /* For the common case of a stub being called from the containing
2656 +            object, STUB_PC will point to somewhere within the object that
2657 +            is described by the link map fetched via got[1].  Otherwise we
2658 +            have to scan all maps.  */
2659 +         for (this = 0; this < nent; this++)
2660 +           {
2661 +             if (p[this].p_type == PT_LOAD)
2662 +               {
2663 +                 base = p[this].p_vaddr + l->l_addr;
2664 +                 limit = base + p[this].p_memsz;
2665 +                 if (stub_pc >= base && stub_pc < limit)
2666 +                   return l;
2667 +               }
2668 +           }
2669 +       }
2670 +    }
2671 +
2672 +    struct link_map *l;
2673 +    Lmid_t nsid;
2674 +
2675 +    for (nsid = 0; nsid < DL_NNS; ++nsid)
2676 +      for (l = GL(dl_ns)[nsid]._ns_loaded; l != NULL; l = l->l_next)
2677 +       {
2678 +         ElfW(Addr) base, limit;
2679 +         const ElfW(Phdr) *p = l->l_phdr;
2680 +         ElfW(Half) this, nent = l->l_phnum;
2681 +
2682 +         for (this = 0; this < nent; ++this)
2683 +           {
2684 +             if (p[this].p_type == PT_LOAD)
2685 +               {
2686 +                 base = p[this].p_vaddr + l->l_addr;
2687 +                 limit = base + p[this].p_memsz;
2688 +                 if (stub_pc >= base && stub_pc < limit)
2689 +                   return l;
2690 +               }
2691 +           }
2692 +       }
2693 +
2694 +  _dl_signal_error (0, NULL, NULL, "cannot find runtime link map");
2695 +  return NULL;
2696 +}
2697 +
2698 +/* Define mips specific runtime resolver. The function __dl_runtime_resolve
2699 +   is called from assembler function _dl_runtime_resolve which converts
2700 +   special argument registers t5 (x17) and t6 (x18):
2701 +     t5  address to return to the caller of the function
2702 +     t6  index for this function symbol in .dynsym
2703 +   to usual c arguments.
2704 +
2705 +   Other architectures call fixup from dl-runtime.c in
2706 +   _dl_runtime_resolve.  MIPS instead calls __dl_runtime_resolve.  We
2707 +   have to use our own version because of the way the got section is
2708 +   treated on MIPS (we've also got ELF_MACHINE_PLT defined).  */
2709 +
2710 +/* The flag _dl_mips_gnu_objects is set if all dynamic objects are
2711 +   generated by the gnu linker. */
2712 +int _dl_mips_gnu_objects = 1;
2713 +
2714 +#define VERSYMIDX(sym)  (DT_NUM + DT_THISPROCNUM + DT_VERSIONTAGIDX (sym))
2715 +
2716 +/* This is called from assembly stubs below which the compiler can't see.  */
2717 +static ElfW(Addr)
2718 +__dl_runtime_resolve (ElfW(Word), ElfW(Word), ElfW(Addr), ElfW(Addr))
2719 +                 __attribute_used__;
2720 +
2721 +static ElfW(Addr)
2722 +__dl_runtime_resolve (ElfW(Word) sym_index,
2723 +                     ElfW(Word) return_address,
2724 +                     ElfW(Addr) old_gpreg,
2725 +                     ElfW(Addr) stub_pc)
2726 +{
2727 +  struct link_map *l = elf_machine_runtime_link_map (old_gpreg, stub_pc);
2728 +  const ElfW(Sym) *const symtab
2729 +    = (const ElfW(Sym) *) D_PTR (l, l_info[DT_SYMTAB]);
2730 +  const char *strtab = (const void *) D_PTR (l, l_info[DT_STRTAB]);
2731 +  ElfW(Addr) *got
2732 +    = (ElfW(Addr) *) D_PTR (l, l_info[DT_PLTGOT]);
2733 +  const ElfW(Word) local_gotno
2734 +    = (const ElfW(Word)) l->l_info[DT_MIPS (LOCAL_GOTNO)]->d_un.d_val;
2735 +  const ElfW(Word) gotsym
2736 +    = (const ElfW(Word)) l->l_info[DT_MIPS (GOTSYM)]->d_un.d_val;
2737 +  const ElfW(Sym) *sym = &symtab[sym_index];
2738 +  struct link_map *sym_map;
2739 +  ElfW(Addr) value;
2740 +
2741 +  /* FIXME: The symbol versioning stuff is not tested yet.  */
2742 +  if (__builtin_expect (ELFW(ST_VISIBILITY) (sym->st_other), 0) == 0)
2743 +    {
2744 +      switch (l->l_info[VERSYMIDX (DT_VERSYM)] != NULL)
2745 +       {
2746 +       default:
2747 +         {
2748 +           const ElfW(Half) *vernum =
2749 +             (const void *) D_PTR (l, l_info[VERSYMIDX (DT_VERSYM)]);
2750 +           ElfW(Half) ndx = vernum[sym_index] & 0x7fff;
2751 +           const struct r_found_version *version = &l->l_versions[ndx];
2752 +
2753 +           if (version->hash != 0)
2754 +             {
2755 +               sym_map = _dl_lookup_symbol_x (strtab + sym->st_name, l,
2756 +                                              &sym, l->l_scope, version,
2757 +                                              ELF_RTYPE_CLASS_PLT, 0, 0);
2758 +               break;
2759 +             }
2760 +           /* Fall through.  */
2761 +         }
2762 +       case 0:
2763 +         sym_map = _dl_lookup_symbol_x (strtab + sym->st_name, l, &sym,
2764 +                                        l->l_scope, 0, ELF_RTYPE_CLASS_PLT,
2765 +                                        DL_LOOKUP_ADD_DEPENDENCY, 0);
2766 +       }
2767 +
2768 +      /* Currently value contains the base load address of the object
2769 +        that defines sym.  Now add in the symbol offset.  */
2770 +      value = (sym ? sym_map->l_addr + sym->st_value : 0);
2771 +    }
2772 +  else
2773 +    /* We already found the symbol.  The module (and therefore its load
2774 +       address) is also known.  */
2775 +    value = l->l_addr + sym->st_value;
2776 +
2777 +  /* Apply the relocation with that value.  */
2778 +  *(got + local_gotno + sym_index - gotsym) = value;
2779 +
2780 +  return value;
2781 +}
2782 +
2783 +#define ELF_DL_FRAME_SIZE (10*SZREG)
2784 +
2785 +#define ELF_DL_SAVE_ARG_REGS "\
2786 +       " STRINGXP(REG_S) " t5, 9*" STRINGXP(SZREG) "(sp)\n                                                   \
2787 +       " STRINGXP(REG_S) " a0, 1*" STRINGXP(SZREG) "(sp)\n                                                   \
2788 +       " STRINGXP(REG_S) " a1, 2*" STRINGXP(SZREG) "(sp)\n                                                   \
2789 +       " STRINGXP(REG_S) " a2, 3*" STRINGXP(SZREG) "(sp)\n                                                   \
2790 +       " STRINGXP(REG_S) " a3, 4*" STRINGXP(SZREG) "(sp)\n                                                   \
2791 +       " STRINGXP(REG_S) " a4, 5*" STRINGXP(SZREG) "(sp)\n                                                   \
2792 +       " STRINGXP(REG_S) " a5, 6*" STRINGXP(SZREG) "(sp)\n                                                   \
2793 +       " STRINGXP(REG_S) " a6, 7*" STRINGXP(SZREG) "(sp)\n                                                   \
2794 +       " STRINGXP(REG_S) " a7, 8*" STRINGXP(SZREG) "(sp)\n                                                   \
2795 +"
2796 +
2797 +#define ELF_DL_RESTORE_ARG_REGS "\
2798 +       " STRINGXP(REG_L) " ra, 9*" STRINGXP(SZREG) "(sp)\n                                                   \
2799 +       " STRINGXP(REG_L) " a0, 1*" STRINGXP(SZREG) "(sp)\n                                                   \
2800 +       " STRINGXP(REG_L) " a1, 2*" STRINGXP(SZREG) "(sp)\n                                                   \
2801 +       " STRINGXP(REG_L) " a2, 3*" STRINGXP(SZREG) "(sp)\n                                                   \
2802 +       " STRINGXP(REG_L) " a3, 4*" STRINGXP(SZREG) "(sp)\n                                                   \
2803 +       " STRINGXP(REG_L) " a4, 5*" STRINGXP(SZREG) "(sp)\n                                                   \
2804 +       " STRINGXP(REG_L) " a5, 6*" STRINGXP(SZREG) "(sp)\n                                                   \
2805 +       " STRINGXP(REG_L) " a6, 7*" STRINGXP(SZREG) "(sp)\n                                                   \
2806 +       " STRINGXP(REG_L) " a7, 8*" STRINGXP(SZREG) "(sp)\n                                                   \
2807 +"
2808 +
2809 +/* The PLT resolver should also save and restore $2 and $3, which are used
2810 +   as arguments to MIPS16 stub functions.  */
2811 +#define ELF_DL_PLT_FRAME_SIZE (12*SZREG)
2812 +
2813 +#define ELF_DL_PLT_SAVE_ARG_REGS \
2814 +       ELF_DL_SAVE_ARG_REGS "\
2815 +       " STRINGXP(REG_S) " v0, 10*" STRINGXP(SZREG) "(sp)\n                                                  \
2816 +       " STRINGXP(REG_S) " v1, 11*" STRINGXP(SZREG) "(sp)\n                                                  \
2817 +"
2818 +
2819 +#define ELF_DL_PLT_RESTORE_ARG_REGS \
2820 +       ELF_DL_RESTORE_ARG_REGS "\
2821 +       " STRINGXP(REG_L) " v0, 10*" STRINGXP(SZREG) "(sp)\n                                                  \
2822 +       " STRINGXP(REG_L) " v1, 11*" STRINGXP(SZREG) "(sp)\n                                                  \
2823 +"
2824 +
2825 +asm ("\n\
2826 +       .text\n\
2827 +       .align  2\n\
2828 +       .globl  _dl_runtime_resolve\n\
2829 +       .type   _dl_runtime_resolve,@function\n\
2830 +       .ent    _dl_runtime_resolve\n\
2831 +_dl_runtime_resolve:\n\
2832 +       .frame  sp, " STRINGXP(ELF_DL_FRAME_SIZE) ", ra\n\
2833 +       " STRINGXV(SETUP_GP64(t4, _dl_runtime_resolve)) "\n\
2834 +       # Save arguments and sp value in stack.\n\
2835 +       addi  sp, sp, " STRINGXP(ELF_DL_FRAME_SIZE) "\n\
2836 +       # Save slot call pc.\n\
2837 +       move    v0, ra\n\
2838 +       " ELF_DL_SAVE_ARG_REGS "\
2839 +       move    a0, t6\n\
2840 +       move    a1, t5\n\
2841 +       move    a2, v1\n\
2842 +       move    a3, v0\n\
2843 +       " STRINGXV(PIC_JAL(t4, __dl_runtime_resolve)) "\n\
2844 +       " ELF_DL_RESTORE_ARG_REGS "\
2845 +       move    t7, v0\n\
2846 +       addi    sp, sp, " STRINGXP(ELF_DL_FRAME_SIZE) "\n\
2847 +       jr      t7\n\
2848 +       .end    _dl_runtime_resolve\n\
2849 +       .previous\n\
2850 +");
2851 +
2852 +/* Assembler veneer called from the PLT header code when using PLTs.
2853 +
2854 +   Code in each PLT entry and the PLT header fills in the arguments to
2855 +   this function:
2856 +
2857 +   - x17 (t5) - caller's return address
2858 +   - x18 (t6) - PLT entry index
2859 +   - x19 (t7) - address of _dl_runtime_pltresolve
2860 +   - o32 $28 (gp), n32/n64 $14 (t2) - address of .got.plt
2861 +
2862 +   Different registers are used for .got.plt because the ABI was
2863 +   originally designed for o32, where gp was available (call
2864 +   clobbered).  On n32/n64 gp is call saved.
2865 +
2866 +   _dl_fixup needs:
2867 +
2868 +   - $4 (a0) - link map address
2869 +   - $5 (a1) - .rel.plt offset (== PLT entry index * 8)  */
2870 +
2871 +asm ("\n\
2872 +       .text\n\
2873 +       .align  2\n\
2874 +       .globl  _dl_runtime_pltresolve\n\
2875 +       .type   _dl_runtime_pltresolve,@function\n\
2876 +       .ent    _dl_runtime_pltresolve\n\
2877 +_dl_runtime_pltresolve:\n\
2878 +       .frame  sp, " STRINGXP(ELF_DL_PLT_FRAME_SIZE) ", ra\n\
2879 +       " STRINGXV(SETUP_GP64(t4, _dl_runtime_pltresolve)) "\n\
2880 +       # Save arguments and sp value in stack.\n\
2881 +1:     addi    sp, sp, " STRINGXP(-ELF_DL_PLT_FRAME_SIZE) "\n\
2882 +       " STRINGXP(REG_L) "     t1, " STRINGXP(PTRSIZE) "(t2)" "\n\
2883 +       " ELF_DL_PLT_SAVE_ARG_REGS "\
2884 +       move    a0, t1\n\
2885 +       sll     a1, t6, " STRINGXP(PTRLOG) " + 1\n\
2886 +       " STRINGXV(PIC_JAL(t4, _dl_fixup)) "\n\
2887 +       move    t7, v0\n\
2888 +       " ELF_DL_PLT_RESTORE_ARG_REGS "\
2889 +       addi    sp, sp, " STRINGXP(ELF_DL_PLT_FRAME_SIZE) "\n\
2890 +       jr      t7\n\
2891 +       .end    _dl_runtime_pltresolve\n\
2892 +       .previous\n\
2893 +");
2894 +
2895 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/elf/configure glibc-2.14.1/sysdeps/riscv/elf/configure
2896 --- ../glibc-2.14.1-orig/sysdeps/riscv/elf/configure    1969-12-31 16:00:00.000000000 -0800
2897 +++ glibc-2.14.1/sysdeps/riscv/elf/configure    2011-10-25 02:48:44.000000000 -0700
2898 @@ -0,0 +1,46 @@
2899 +# This file is generated from configure.in by Autoconf.  DO NOT EDIT!
2900 + # Local configure fragment for sysdeps/mips/elf.
2901 +
2902 +if test "$usetls" != no; then
2903 +# Check for support of thread-local storage handling in assembler and
2904 +# linker.
2905 +echo "$as_me:$LINENO: checking for MIPS TLS support" >&5
2906 +echo $ECHO_N "checking for MIPS TLS support... $ECHO_C" >&6
2907 +if test "${libc_cv_mips_tls+set}" = set; then
2908 +  echo $ECHO_N "(cached) $ECHO_C" >&6
2909 +else
2910 +  cat > conftest.s <<\EOF
2911 +       .section ".tdata", "awT", %progbits
2912 +       .globl foo
2913 +foo:   .long   1
2914 +       .section ".tbss", "awT", %nobits
2915 +       .globl bar
2916 +bar:   .skip   4
2917 +       .text
2918 +
2919 +       lw      t7, %call16(__tls_get_addr)(gp)
2920 +       add     a0, gp, %tlsgd(x) 
2921 +       jalr    t7
2922 +EOF
2923 +if { ac_try='${CC-cc} -c $CFLAGS conftest.s 1>&5'
2924 +  { (eval echo "$as_me:$LINENO: \"$ac_try\"") >&5
2925 +  (eval $ac_try) 2>&5
2926 +  ac_status=$?
2927 +  echo "$as_me:$LINENO: \$? = $ac_status" >&5
2928 +  (exit $ac_status); }; }; then
2929 +  libc_cv_mips_tls=yes
2930 +else
2931 +  libc_cv_mips_tls=no
2932 +fi
2933 +rm -f conftest*
2934 +fi
2935 +echo "$as_me:$LINENO: result: $libc_cv_mips_tls" >&5
2936 +echo "${ECHO_T}$libc_cv_mips_tls" >&6
2937 +if test $libc_cv_mips_tls = yes; then
2938 +  cat >>confdefs.h <<\_ACEOF
2939 +#define HAVE_TLS_SUPPORT 1
2940 +_ACEOF
2941 +
2942 +fi
2943 +fi
2944 +
2945 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/elf/configure.in glibc-2.14.1/sysdeps/riscv/elf/configure.in
2946 --- ../glibc-2.14.1-orig/sysdeps/riscv/elf/configure.in 1969-12-31 16:00:00.000000000 -0800
2947 +++ glibc-2.14.1/sysdeps/riscv/elf/configure.in 2011-10-25 02:48:44.000000000 -0700
2948 @@ -0,0 +1,35 @@
2949 +GLIBC_PROVIDES dnl See aclocal.m4 in the top level source directory.
2950 +# Local configure fragment for sysdeps/mips/elf.
2951 +
2952 +if test "$usetls" != no; then
2953 +# Check for support of thread-local storage handling in assembler and
2954 +# linker.
2955 +AC_CACHE_CHECK(for MIPS TLS support, libc_cv_mips_tls, [dnl
2956 +cat > conftest.s <<\EOF
2957 +       .section ".tdata", "awT", %progbits
2958 +       .globl foo
2959 +foo:   .long   1
2960 +       .section ".tbss", "awT", %nobits
2961 +       .globl bar
2962 +bar:   .skip   4
2963 +       .text
2964 +
2965 +       lw      t7, %call16(__tls_get_addr)(gp)
2966 +       add     a0, gp, %tlsgd(x) 
2967 +       jalr    t7
2968 +EOF
2969 +dnl
2970 +if AC_TRY_COMMAND(${CC-cc} -c $CFLAGS conftest.s 1>&AS_MESSAGE_LOG_FD); then
2971 +  libc_cv_mips_tls=yes
2972 +else
2973 +  libc_cv_mips_tls=no
2974 +fi
2975 +rm -f conftest*])
2976 +if test $libc_cv_mips_tls = yes; then
2977 +  AC_DEFINE(HAVE_TLS_SUPPORT)
2978 +fi
2979 +fi
2980 +
2981 +dnl No MIPS GCC supports accessing static and hidden symbols in an
2982 +dnl position independent way.
2983 +dnl AC_DEFINE(PI_STATIC_AND_HIDDEN)
2984 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/elf/start.S glibc-2.14.1/sysdeps/riscv/elf/start.S
2985 --- ../glibc-2.14.1-orig/sysdeps/riscv/elf/start.S      1969-12-31 16:00:00.000000000 -0800
2986 +++ glibc-2.14.1/sysdeps/riscv/elf/start.S      2011-10-25 02:48:44.000000000 -0700
2987 @@ -0,0 +1,105 @@
2988 +/* Startup code compliant to the ELF Mips ABI.
2989 +   Copyright (C) 1995, 1997, 2000, 2001, 2002, 2003, 2004
2990 +       Free Software Foundation, Inc.
2991 +   This file is part of the GNU C Library.
2992 +
2993 +   The GNU C Library is free software; you can redistribute it and/or
2994 +   modify it under the terms of the GNU Lesser General Public
2995 +   License as published by the Free Software Foundation; either
2996 +   version 2.1 of the License, or (at your option) any later version.
2997 +
2998 +   In addition to the permissions in the GNU Lesser General Public
2999 +   License, the Free Software Foundation gives you unlimited
3000 +   permission to link the compiled version of this file with other
3001 +   programs, and to distribute those programs without any restriction
3002 +   coming from the use of this file. (The GNU Lesser General Public
3003 +   License restrictions do apply in other respects; for example, they
3004 +   cover modification of the file, and distribution when not linked
3005 +   into another program.)
3006 +
3007 +   Note that people who make modified versions of this file are not
3008 +   obligated to grant this special exception for their modified
3009 +   versions; it is their choice whether to do so. The GNU Lesser
3010 +   General Public License gives permission to release a modified
3011 +   version without this exception; this exception also makes it
3012 +   possible to release a modified version which carries forward this
3013 +   exception.
3014 +
3015 +   The GNU C Library is distributed in the hope that it will be useful,
3016 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
3017 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
3018 +   Lesser General Public License for more details.
3019 +
3020 +   You should have received a copy of the GNU Lesser General Public
3021 +   License along with the GNU C Library; if not, write to the Free
3022 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
3023 +   02111-1307 USA.  */
3024 +
3025 +#define __ASSEMBLY__ 1
3026 +#include <entry.h>
3027 +#include <sgidefs.h>
3028 +#include <sys/asm.h>
3029 +
3030 +#ifndef ENTRY_POINT
3031 +#error ENTRY_POINT needs to be defined for start.S on MIPS/ELF.
3032 +#endif
3033 +
3034 +/* This is the canonical entry point, usually the first thing in the text
3035 +   segment.  The SVR4/Mips ABI (pages 3-31, 3-32) says that when the entry
3036 +   point runs, most registers' values are unspecified, except for:
3037 +
3038 +   v0 ($2)     Contains a function pointer to be registered with `atexit'.
3039 +               This is how the dynamic linker arranges to have DT_FINI
3040 +               functions called for shared libraries that have been loaded
3041 +               before this code runs.
3042 +
3043 +   sp ($29)    The stack contains the arguments and environment:
3044 +               0(%esp)                 argc
3045 +               4(%esp)                 argv[0]
3046 +               ...
3047 +               (4*argc)(%esp)          NULL
3048 +               (4*(argc+1))(%esp)      envp[0]
3049 +               ...
3050 +                                       NULL
3051 +   ra ($31)    The return address register is set to zero so that programs
3052 +               that search backword through stack frames recognize the last
3053 +               stack frame.
3054 +*/
3055 +
3056 +
3057 +/* We need to call:
3058 +   __libc_start_main (int (*main) (int, char **, char **), int argc,
3059 +                     char **argv, void (*init) (void), void (*fini) (void),
3060 +                     void (*rtld_fini) (void), void *stack_end)
3061 +*/
3062 +       
3063 +       .text
3064 +       .globl ENTRY_POINT
3065 +       .type ENTRY_POINT,@function
3066 +ENTRY_POINT:
3067 +       SETUP_GPX64(t6, t7)
3068 +
3069 +       PIC_LA  (a0, t6, main)  /* &main */
3070 +       REG_L   a1, 0(sp)      /* argc */
3071 +       addi    a2, sp, SZREG  /* argv */
3072 +
3073 +       /* Align stack. */
3074 +       andi    sp, sp, ALMASK
3075 +
3076 +       PIC_LA  (a3, t6, __libc_csu_init)
3077 +       PIC_LA  (a4, t6, __libc_csu_fini)
3078 +
3079 +       move    a5, v0  /* rtld_fini */
3080 +       move    a6, sp  /* stack_end */
3081 +
3082 +       PIC_JAL (t6, __libc_start_main)
3083 +
3084 +       unimp
3085 +
3086 +/* Define a symbol for the first piece of initialized data.  */
3087 +       .data
3088 +       .globl __data_start
3089 +__data_start:
3090 +       .long 0
3091 +       .weak data_start
3092 +       data_start = __data_start
3093 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/fpregdef.h glibc-2.14.1/sysdeps/riscv/fpregdef.h
3094 --- ../glibc-2.14.1-orig/sysdeps/riscv/fpregdef.h       1969-12-31 16:00:00.000000000 -0800
3095 +++ glibc-2.14.1/sysdeps/riscv/fpregdef.h       2011-10-25 02:48:44.000000000 -0700
3096 @@ -0,0 +1,24 @@
3097 +/* Copyright (C) 1991, 92, 94, 95, 96 Free Software Foundation, Inc.
3098 +   This file is part of the GNU C Library.
3099 +
3100 +   The GNU C Library is free software; you can redistribute it and/or
3101 +   modify it under the terms of the GNU Lesser General Public
3102 +   License as published by the Free Software Foundation; either
3103 +   version 2.1 of the License, or (at your option) any later version.
3104 +
3105 +   The GNU C Library is distributed in the hope that it will be useful,
3106 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
3107 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
3108 +   Lesser General Public License for more details.
3109 +
3110 +   You should have received a copy of the GNU Lesser General Public
3111 +   License along with the GNU C Library; if not, write to the Free
3112 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
3113 +   02111-1307 USA.  */
3114 +
3115 +#ifndef _FPREGDEF_H
3116 +#define _FPREGDEF_H
3117 +
3118 +#include <sys/fpregdef.h>
3119 +
3120 +#endif /* _FPREGDEF_H */
3121 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/fpu/bits/mathinline.h glibc-2.14.1/sysdeps/riscv/fpu/bits/mathinline.h
3122 --- ../glibc-2.14.1-orig/sysdeps/riscv/fpu/bits/mathinline.h    1969-12-31 16:00:00.000000000 -0800
3123 +++ glibc-2.14.1/sysdeps/riscv/fpu/bits/mathinline.h    2011-10-25 02:48:44.000000000 -0700
3124 @@ -0,0 +1,52 @@
3125 +/* Inline math functions for RISC-V.
3126 +   Copyright (C) 2011
3127 +   Free Software Foundation, Inc.
3128 +   This file is part of the GNU C Library.
3129 +   Contributed by Jakub Jelinek <jakub@redhat.com>.
3130 +
3131 +   The GNU C Library is free software; you can redistribute it and/or
3132 +   modify it under the terms of the GNU Lesser General Public
3133 +   License as published by the Free Software Foundation; either
3134 +   version 2.1 of the License, or (at your option) any later version.
3135 +
3136 +   The GNU C Library is distributed in the hope that it will be useful,
3137 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
3138 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
3139 +   Lesser General Public License for more details.
3140 +
3141 +   You should have received a copy of the GNU Lesser General Public
3142 +   License along with the GNU C Library; if not, write to the Free
3143 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
3144 +   02111-1307 USA.  */
3145 +
3146 +#ifndef _MATH_H
3147 +# error "Never use <bits/mathinline.h> directly; include <math.h> instead."
3148 +#endif
3149 +
3150 +#include <bits/wordsize.h>
3151 +
3152 +#ifdef __GNUC__
3153 +
3154 +#if defined __USE_ISOC99
3155 +# undef isgreater
3156 +# undef isgreaterequal
3157 +# undef isless
3158 +# undef islessequal
3159 +# undef islessgreater
3160 +# undef isunordered
3161 +
3162 +# define isgreater(x, y) ((x) > (y))
3163 +# define isgreaterequal(x, y) ((x) >= (y))
3164 +# define isless(x, y) ((x) < (y))
3165 +# define islessequal(x, y) ((x) <= (y))
3166 +# define islessgreater(x, y) (!!(isless(x, y) + isgreater(x, y)))
3167 +# define isunordered(x, y) (((x) == (x)) + ((y) == (y)) < 2)
3168 +
3169 +#endif /* __USE_ISOC99 */
3170 +
3171 +#if (!defined __NO_MATH_INLINES || defined __LIBC_INTERNAL_MATH_INLINES) && defined __OPTIMIZE__
3172 +
3173 +/* Nothing yet. */
3174 +
3175 +#endif /* !__NO_MATH_INLINES && __OPTIMIZE__ */
3176 +#endif /* __GNUC__ */
3177 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/fpu/e_sqrt.c glibc-2.14.1/sysdeps/riscv/fpu/e_sqrt.c
3178 --- ../glibc-2.14.1-orig/sysdeps/riscv/fpu/e_sqrt.c     1969-12-31 16:00:00.000000000 -0800
3179 +++ glibc-2.14.1/sysdeps/riscv/fpu/e_sqrt.c     2011-10-25 02:48:44.000000000 -0700
3180 @@ -0,0 +1,38 @@
3181 +/* Copyright (C) 2002 Free Software Foundation, Inc.
3182 +   This file is part of the GNU C Library.
3183 +   Contributed by Hartvig Ekner <hartvige@mips.com>, 2002.
3184 +
3185 +   The GNU C Library is free software; you can redistribute it and/or
3186 +   modify it under the terms of the GNU Lesser General Public
3187 +   License as published by the Free Software Foundation; either
3188 +   version 2.1 of the License, or (at your option) any later version.
3189 +
3190 +   The GNU C Library is distributed in the hope that it will be useful,
3191 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
3192 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
3193 +   Lesser General Public License for more details.
3194 +
3195 +   You should have received a copy of the GNU Lesser General Public
3196 +   License along with the GNU C Library; if not, write to the Free
3197 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
3198 +   02111-1307 USA.  */
3199 +
3200 +
3201 +#include <sgidefs.h>
3202 +
3203 +
3204 +#if (_MIPS_ISA >= _MIPS_ISA_MIPS2)
3205 +
3206 +double
3207 +__ieee754_sqrt (double x)
3208 +{
3209 +  double z;
3210 +  __asm__ ("sqrt.d %0,%1" : "=f" (z) : "f" (x));
3211 +  return z;
3212 +}
3213 +
3214 +#else
3215 +
3216 +#include <sysdeps/ieee754/dbl-64/e_sqrt.c>
3217 +
3218 +#endif
3219 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/fpu/e_sqrtf.c glibc-2.14.1/sysdeps/riscv/fpu/e_sqrtf.c
3220 --- ../glibc-2.14.1-orig/sysdeps/riscv/fpu/e_sqrtf.c    1969-12-31 16:00:00.000000000 -0800
3221 +++ glibc-2.14.1/sysdeps/riscv/fpu/e_sqrtf.c    2011-10-25 02:48:44.000000000 -0700
3222 @@ -0,0 +1,39 @@
3223 +/* Copyright (C) 2002 Free Software Foundation, Inc.
3224 +   This file is part of the GNU C Library.
3225 +   Contributed by Hartvig Ekner <hartvige@mips.com>, 2002.
3226 +
3227 +   The GNU C Library is free software; you can redistribute it and/or
3228 +   modify it under the terms of the GNU Lesser General Public
3229 +   License as published by the Free Software Foundation; either
3230 +   version 2.1 of the License, or (at your option) any later version.
3231 +
3232 +   The GNU C Library is distributed in the hope that it will be useful,
3233 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
3234 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
3235 +   Lesser General Public License for more details.
3236 +
3237 +   You should have received a copy of the GNU Lesser General Public
3238 +   License along with the GNU C Library; if not, write to the Free
3239 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
3240 +   02111-1307 USA.  */
3241 +
3242 +
3243 +#include <sgidefs.h>
3244 +
3245 +
3246 +#if (_MIPS_ISA >= _MIPS_ISA_MIPS2)
3247 +
3248 +float
3249 +__ieee754_sqrtf (float x)
3250 +{
3251 +  float z;
3252 +  __asm__ ("sqrt.s %0,%1" : "=f" (z) : "f" (x));
3253 +  return z;
3254 +}
3255 +
3256 +#else
3257 +
3258 +#include <sysdeps/ieee754/flt-32/e_sqrtf.c>
3259 +
3260 +#endif
3261 +
3262 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/fpu/fclrexcpt.c glibc-2.14.1/sysdeps/riscv/fpu/fclrexcpt.c
3263 --- ../glibc-2.14.1-orig/sysdeps/riscv/fpu/fclrexcpt.c  1969-12-31 16:00:00.000000000 -0800
3264 +++ glibc-2.14.1/sysdeps/riscv/fpu/fclrexcpt.c  2011-10-25 02:48:44.000000000 -0700
3265 @@ -0,0 +1,47 @@
3266 +/* Clear given exceptions in current floating-point environment.
3267 +   Copyright (C) 1998, 1999, 2000, 2002 Free Software Foundation, Inc.
3268 +   This file is part of the GNU C Library.
3269 +   Contributed by Andreas Jaeger <aj@suse.de>, 1998.
3270 +
3271 +   The GNU C Library is free software; you can redistribute it and/or
3272 +   modify it under the terms of the GNU Lesser General Public
3273 +   License as published by the Free Software Foundation; either
3274 +   version 2.1 of the License, or (at your option) any later version.
3275 +
3276 +   The GNU C Library is distributed in the hope that it will be useful,
3277 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
3278 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
3279 +   Lesser General Public License for more details.
3280 +
3281 +   You should have received a copy of the GNU Lesser General Public
3282 +   License along with the GNU C Library; if not, write to the Free
3283 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
3284 +   02111-1307 USA.  */
3285 +
3286 +#include <fenv.h>
3287 +#include <fenv_libc.h>
3288 +#include <fpu_control.h>
3289 +
3290 +int
3291 +feclearexcept (int excepts)
3292 +{
3293 +  int cw;
3294 +
3295 +  /* Mask out unsupported bits/exceptions.  */
3296 +  excepts &= FE_ALL_EXCEPT;
3297 +
3298 +  /* Read the complete control word.  */
3299 +  _FPU_GETCW (cw);
3300 +
3301 +  /* Clear exception flag bits and cause bits. If the cause bit is not
3302 +     cleared, the next CTC instruction (just below) will re-generate the
3303 +     exception.  */
3304 +
3305 +  cw &= ~(excepts | (excepts << CAUSE_SHIFT));
3306 +
3307 +  /* Put the new data in effect.  */
3308 +  _FPU_SETCW (cw);
3309 +
3310 +  /* Success.  */
3311 +  return 0;
3312 +}
3313 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/fpu/fedisblxcpt.c glibc-2.14.1/sysdeps/riscv/fpu/fedisblxcpt.c
3314 --- ../glibc-2.14.1-orig/sysdeps/riscv/fpu/fedisblxcpt.c        1969-12-31 16:00:00.000000000 -0800
3315 +++ glibc-2.14.1/sysdeps/riscv/fpu/fedisblxcpt.c        2011-10-25 02:48:44.000000000 -0700
3316 @@ -0,0 +1,42 @@
3317 +/* Disable floating-point exceptions.
3318 +   Copyright (C) 2000 Free Software Foundation, Inc.
3319 +   This file is part of the GNU C Library.
3320 +   Contributed by Andreas Jaeger <aj@suse.de>, 2000.
3321 +
3322 +   The GNU C Library is free software; you can redistribute it and/or
3323 +   modify it under the terms of the GNU Lesser General Public
3324 +   License as published by the Free Software Foundation; either
3325 +   version 2.1 of the License, or (at your option) any later version.
3326 +
3327 +   The GNU C Library is distributed in the hope that it will be useful,
3328 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
3329 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
3330 +   Lesser General Public License for more details.
3331 +
3332 +   You should have received a copy of the GNU Lesser General Public
3333 +   License along with the GNU C Library; if not, write to the Free
3334 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
3335 +   02111-1307 USA.  */
3336 +
3337 +#include <fenv.h>
3338 +#include <fenv_libc.h>
3339 +#include <fpu_control.h>
3340 +
3341 +int
3342 +fedisableexcept (int excepts)
3343 +{
3344 +  unsigned int new_exc, old_exc;
3345 +
3346 +  /* Get the current control word.  */
3347 +  _FPU_GETCW (new_exc);
3348 +
3349 +  old_exc = (new_exc & ENABLE_MASK) >> ENABLE_SHIFT;
3350 +
3351 +  excepts &= FE_ALL_EXCEPT;
3352 +
3353 +  new_exc &= ~(excepts << ENABLE_SHIFT);
3354 +  new_exc &= ~_FPU_RESERVED;
3355 +  _FPU_SETCW (new_exc);
3356 +
3357 +  return old_exc;
3358 +}
3359 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/fpu/feenablxcpt.c glibc-2.14.1/sysdeps/riscv/fpu/feenablxcpt.c
3360 --- ../glibc-2.14.1-orig/sysdeps/riscv/fpu/feenablxcpt.c        1969-12-31 16:00:00.000000000 -0800
3361 +++ glibc-2.14.1/sysdeps/riscv/fpu/feenablxcpt.c        2011-10-25 02:48:44.000000000 -0700
3362 @@ -0,0 +1,42 @@
3363 +/* Enable floating-point exceptions.
3364 +   Copyright (C) 2000 Free Software Foundation, Inc.
3365 +   This file is part of the GNU C Library.
3366 +   Contributed by Andreas Jaeger <aj@suse.de>, 2000.
3367 +
3368 +   The GNU C Library is free software; you can redistribute it and/or
3369 +   modify it under the terms of the GNU Lesser General Public
3370 +   License as published by the Free Software Foundation; either
3371 +   version 2.1 of the License, or (at your option) any later version.
3372 +
3373 +   The GNU C Library is distributed in the hope that it will be useful,
3374 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
3375 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
3376 +   Lesser General Public License for more details.
3377 +
3378 +   You should have received a copy of the GNU Lesser General Public
3379 +   License along with the GNU C Library; if not, write to the Free
3380 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
3381 +   02111-1307 USA.  */
3382 +
3383 +#include <fenv.h>
3384 +#include <fenv_libc.h>
3385 +#include <fpu_control.h>
3386 +
3387 +int
3388 +feenableexcept (int excepts)
3389 +{
3390 +  unsigned int new_exc, old_exc;
3391 +
3392 +  /* Get the current control word.  */
3393 +  _FPU_GETCW (new_exc);
3394 +
3395 +  old_exc = (new_exc & ENABLE_MASK) >> ENABLE_SHIFT;
3396 +
3397 +  excepts &= FE_ALL_EXCEPT;
3398 +
3399 +  new_exc |= excepts << ENABLE_SHIFT;
3400 +  new_exc &= ~_FPU_RESERVED;
3401 +  _FPU_SETCW (new_exc);
3402 +
3403 +  return old_exc;
3404 +}
3405 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/fpu/fegetenv.c glibc-2.14.1/sysdeps/riscv/fpu/fegetenv.c
3406 --- ../glibc-2.14.1-orig/sysdeps/riscv/fpu/fegetenv.c   1969-12-31 16:00:00.000000000 -0800
3407 +++ glibc-2.14.1/sysdeps/riscv/fpu/fegetenv.c   2011-10-25 02:48:44.000000000 -0700
3408 @@ -0,0 +1,32 @@
3409 +/* Store current floating-point environment.
3410 +   Copyright (C) 1998, 1999, 2000, 2002, 2010 Free Software Foundation, Inc.
3411 +   This file is part of the GNU C Library.
3412 +   Contributed by Andreas Jaeger <aj@suse.de>, 1998.
3413 +
3414 +   The GNU C Library is free software; you can redistribute it and/or
3415 +   modify it under the terms of the GNU Lesser General Public
3416 +   License as published by the Free Software Foundation; either
3417 +   version 2.1 of the License, or (at your option) any later version.
3418 +
3419 +   The GNU C Library is distributed in the hope that it will be useful,
3420 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
3421 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
3422 +   Lesser General Public License for more details.
3423 +
3424 +   You should have received a copy of the GNU Lesser General Public
3425 +   License along with the GNU C Library; if not, write to the Free
3426 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
3427 +   02111-1307 USA.  */
3428 +
3429 +#include <fenv.h>
3430 +#include <fpu_control.h>
3431 +
3432 +int
3433 +fegetenv (fenv_t *envp)
3434 +{
3435 +  _FPU_GETCW (*envp);
3436 +
3437 +  /* Success.  */
3438 +  return 0;
3439 +}
3440 +libm_hidden_def (fegetenv)
3441 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/fpu/fegetexcept.c glibc-2.14.1/sysdeps/riscv/fpu/fegetexcept.c
3442 --- ../glibc-2.14.1-orig/sysdeps/riscv/fpu/fegetexcept.c        1969-12-31 16:00:00.000000000 -0800
3443 +++ glibc-2.14.1/sysdeps/riscv/fpu/fegetexcept.c        2011-10-25 02:48:44.000000000 -0700
3444 @@ -0,0 +1,34 @@
3445 +/* Get enabled floating-point exceptions.
3446 +   Copyright (C) 2000 Free Software Foundation, Inc.
3447 +   This file is part of the GNU C Library.
3448 +   Contributed by Andreas Jaeger <aj@suse.de>, 2000.
3449 +
3450 +   The GNU C Library is free software; you can redistribute it and/or
3451 +   modify it under the terms of the GNU Lesser General Public
3452 +   License as published by the Free Software Foundation; either
3453 +   version 2.1 of the License, or (at your option) any later version.
3454 +
3455 +   The GNU C Library is distributed in the hope that it will be useful,
3456 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
3457 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
3458 +   Lesser General Public License for more details.
3459 +
3460 +   You should have received a copy of the GNU Lesser General Public
3461 +   License along with the GNU C Library; if not, write to the Free
3462 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
3463 +   02111-1307 USA.  */
3464 +
3465 +#include <fenv.h>
3466 +#include <fenv_libc.h>
3467 +#include <fpu_control.h>
3468 +
3469 +int
3470 +fegetexcept (void)
3471 +{
3472 +  unsigned int exc;
3473 +
3474 +  /* Get the current control word.  */
3475 +  _FPU_GETCW (exc);
3476 +
3477 +  return (exc & ENABLE_MASK) >> ENABLE_SHIFT;
3478 +}
3479 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/fpu/fegetround.c glibc-2.14.1/sysdeps/riscv/fpu/fegetround.c
3480 --- ../glibc-2.14.1-orig/sysdeps/riscv/fpu/fegetround.c 1969-12-31 16:00:00.000000000 -0800
3481 +++ glibc-2.14.1/sysdeps/riscv/fpu/fegetround.c 2011-10-25 02:48:44.000000000 -0700
3482 @@ -0,0 +1,33 @@
3483 +/* Return current rounding direction.
3484 +   Copyright (C) 1998 Free Software Foundation, Inc.
3485 +   This file is part of the GNU C Library.
3486 +   Contributed by Andreas Jaeger <aj@arthur.rhein-neckar.de>, 1998.
3487 +
3488 +   The GNU C Library is free software; you can redistribute it and/or
3489 +   modify it under the terms of the GNU Lesser General Public
3490 +   License as published by the Free Software Foundation; either
3491 +   version 2.1 of the License, or (at your option) any later version.
3492 +
3493 +   The GNU C Library is distributed in the hope that it will be useful,
3494 +   but WITHOUT ANY WARRANTY; without even the implied warranty of
3495 +   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
3496 +   Lesser General Public License for more details.
3497 +
3498 +   You should have received a copy of the GNU Lesser General Public
3499 +   License along with the GNU C Library; if not, write to the Free
3500 +   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
3501 +   02111-1307 USA.  */
3502 +
3503 +#include <fenv.h>
3504 +#include <fpu_control.h>
3505 +
3506 +int
3507 +fegetround (void)
3508 +{
3509 +  int cw;
3510 +
3511 +  /* Get control word.  */
3512 +  _FPU_GETCW (cw);
3513 +
3514 +  return cw & 0x3;
3515 +}
3516 diff -x manual -x po -x autom4te.cache -ruN ../glibc-2.14.1-orig/sysdeps/riscv/fpu/feholdexcpt.c glibc-2.14.1/sysdeps/riscv/fpu/feholdexcpt.c
3517 --- ../glibc-2.14.1-orig/sysdeps/riscv/fpu/feholdexcpt.c        1969-12-31 16:00:00.000000000 -0800
3518 +++ glibc-2.14.1/sysdeps/riscv/fpu/feholdexcpt.c        2011-10-25 02:48:44.000000000 -0700
3519 @@ -0,0 +1,40 @@
3520 +/* Store current floating-point environment and clear exceptions.
3521