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