Update. cvs/libc-ud-970307 cvs/libc-970316 cvs/libc-970315 cvs/libc-970314 cvs/libc-970313 cvs/libc-970312 cvs/libc-970311 cvs/libc-970310 cvs/libc-970309 cvs/libc-970308

1997-03-08 05:30  Ulrich Drepper  <drepper@cygnus.com>

	* argp/Makefile (routines): Add argp-eexst.
	* argp/argp-ba.c (argp_program_bug_address): Make `const'.
	* argp/argp-eexst.c: New file.  Define exit status variable.
	* argp/argp-help.c (__argp_state_help): Use argp_err_exit_status
	variable instead of always exiting with value 1.
	* argp/argp-pv.c (argp_program_version): Make `const'.
	* argp/argp.h: Declare argp_err_exit_status.
	Patches by Miles Bader <miles@gnu.ai.mit.edu>.

	* locale/programs/localedef.c: Use argp_err_exit_status to
	terminate with correct value.

	* inet/rcmd.c (iruserok): Use euidaccess instead of half-hearted
	switching of UID before opening .rhosts.

	* libio/vsnprintf.c: Change implementation to follow ISO C 9X
	proposal.  The return value now is always the number of characters
	which would be written if enough space is available.
	* manual/stdio.texi: Update description for new behaviour.

	* locale/locale.h (__locale_t): Don't use __locale_t for struct
	name and pointer to struct since old gccs cannot keep the namespaces
	apart.  Rename struct to __locale_struct.
	* locale/duplocale.h: Likewise.
	* locale/newlocale.h: Likewise.

	* math/Makefile (headers): Add complex.h and cmathcalls.h.
	(routines): Remove w_cabs.  Add conj, cimag, creal, and cabs.
	* math/math.h: Undefine __MATHDECL_1, __MATHDECL, and __MATHCALL
	after use.
	(signgam): Move declaration to here from mathcalls.h.
	* math/mathcalls.h (cabs, __cabs_complex, signgam): Remove definition.
	Correct comment for fmin and fmax.
	Start implementing complex math function from ISO C 9X.
	* math/complex.h: New file.
	* math/cmathcalls.h: New file.
	* math/cabs.c: New file.
	* math/cabsf.c: New file.
	* math/cabsl.c: New file.
	* math/cimag.c: New file.
	* math/cimagf.c: New file.
	* math/cimagl.c: New file.
	* math/conj.c: New file.
	* math/conjf.c: New file.
	* math/conjl.c: New file.
	* math/creal.c: New file.
	* math/crealf.c: New file.
	* math/creall.c: New file.
	* sysdeps/libm-ieee754/w_cabs.c: Removed.
	* sysdeps/libm-ieee754/w_cabsf.c: Removed.
	* sysdeps/libm-ieee754/w_cabsl.c: Removed.

	* posix/regex.c: Merge with regex sources from Arnold Robbins'
	version in GNU awk.
	* posix/regex.h: Likewise.

	Add regex test suite by Tom Lord.
	* posix/Makefile (distribute): Add TESTS, TESTS2C.sed, and testcases.h.
	(tests): Add runtests.
	(before-compile): Add testcases.h.
	(testcases.h): New rule to generate header with tests.
	* posix/TESTS: New file.
	* posix/TESTS2C.sed.: New file.
	* posix/runtests.c: New file.
	* posix/testcases.h: New file.

	* sysdeps/unix/sysv/linux/poll.c: Test whether poll syscall is
	available and use fall-back implementation if not.

	* sysdeps/unix/sysv/linux/syscalls.list: Sort entries.

	* time/ialloc.c: Update from tzcode1997c.
	* time/private.h: Likewise.
	* time/scheck.c: Likewise.
	* time/tzselect.ksh: Likewise.
	* time/zdump.c: Likewise.
	* time/zic.c: Likewise.

	* time/tzfile.c: Pretty print.

1997-03-06 07:37  Geoff Keating  <geoffk@ozemail.com.au>

	Port to powerpc-*-linux-gnu.  Slightly tested, under MkLinux,
	on a 601.

	* sysdeps/powerpc/Implies: Added.
	* sysdeps/powerpc/__longjmp.S: Added.
	* sysdeps/powerpc/__math.h: Added.
	* sysdeps/powerpc/bsd-_setjmp.S: Added.
	* sysdeps/powerpc/bsd-setjmp.S: Added.
	* sysdeps/powerpc/dl-machine.h: Added.
	* sysdeps/powerpc/ffs.c: Added.
	* sysdeps/powerpc/fpu_control.h: Added.
	* sysdeps/powerpc/jmp_buf.h: Added.
	* sysdeps/powerpc/setjmp.S: Added.
	* sysdeps/powerpc/strlen.s: Added.
	* sysdeps/powerpc/elf/start.c: Added.
	* sysdeps/powerpc/fpu_control.h: Added.
	* sysdeps/powerpc/jmp_buf.h: Added.

	* sysdeps/unix/sysv/linux/powerpc/Dist: Added.
	* sysdeps/unix/sysv/linux/powerpc/_exit.S: Added.
	* sysdeps/unix/sysv/linux/powerpc/brk.c: Added.
	* sysdeps/unix/sysv/linux/powerpc/clone.S: Added.
	* sysdeps/unix/sysv/linux/powerpc/init-first.h: Added.
	* sysdeps/unix/sysv/linux/powerpc/ioctl-types.h: Added.
	* sysdeps/unix/sysv/linux/powerpc/profil.c: Added.
	* sysdeps/unix/sysv/linux/powerpc/sigreturn.S: Added.
	* sysdeps/unix/sysv/linux/powerpc/socket.S: Added.
	* sysdeps/unix/sysv/linux/powerpc/syscall.S: Added.
	* sysdeps/unix/sysv/linux/powerpc/syscalls.list: Added.
	* sysdeps/unix/sysv/linux/powerpc/sysdep.c: Added.
	* sysdeps/unix/sysv/linux/powerpc/sysdep.h: Added.
	* sysdeps/unix/sysv/linux/powerpc/termbits.h: Added.
	* sysdeps/unix/sysv/linux/powerpc/sys/syscall.h: Added.

1997-03-05 05:24  Geoff Keating  <geoffk@ozemail.com.au>

	* elf/dl-runtime.c (fixup): Add ELF_FIXUP_RETURNS_ADDRESS switch,
	because knowing the first instruction of a PowerPC PLT trampoline
	is not very helpful.

1997-03-04 08:04  Geoff Keating  <geoffk@ozemail.com.au>

	* elf/dl-load.c (ELF_PREFERRED_ADDRESS, ELF_PREFERRED_ADDRESS_DATA,
	ELF_FIXED_ADDRESS): Added. These are for dl-machine.h to indicate
	a preference as to where executables should be loaded.

1997-02-28 08:50  Geoff Keating  <geoffk@ozemail.com.au>

	* elf/elf.h: Add in all those PowerPC reloc types.

1997-02-24 07:12  Geoff Keating  <geoffk@ozemail.com.au>

	* stdio-common/vfscanf.c: Use __va_copy if available.

1997-03-06 13:50  Andreas Schwab  <schwab@issan.informatik.uni-dortmund.de>

	* malloc/malloc.c (mprotect) [_LIBC]: Define as __mprotect to
	clean up namespace.

1997-03-07 14:27  Ulrich Drepper  <drepper@cygnus.com>

	* sysdeps/libm-ieee754/s_fpclassify.c (__fpclassify): Don't use
	non-existing GET_WORDS macro, use EXTRACT_WORDS.
	Reported by Andres Schwab <schwab@issan.informatik.uni-dortmund.de>.

1997-03-07 05:27  Ulrich Drepper  <drepper@cygnus.com>

	* sysdeps/unix/sysv/linux/i386/sigaction.c: The user- and
	kernel-level sigaction structure is different.  handle this
	correctly.
	Bug report by Andres Jaeger <jaeger@informatik.uni-kl.de>.

1997-03-06 05:55  David Engel  <david@sw.ods.com>

	* sysdeps/generic/dl-cache.c (_dl_load_cache_lookup): Also
	recognize cache entries with flag == 3.

1997-03-06 01:05  Ulrich Drepper  <drepper@cygnus.com>

	* sysdeps/generic/netinet/in.h (INADDR_NONE): Cast to unsigned int.
	(INADDR_LOOPBACK): Likewise.
	* sysdeps/unix/sysv/linux/netinet/in.h: Likewise.

	* manual/socket.texi: Correct types of INADDR_* constants from
	unsigned long to unsigned.

1997-03-05 23:14  Ulrich Drepper  <drepper@cygnus.com>

	* time/antarctica: Update from tzdata1997c.
	* time/asia: Likewise.
	* time/zone.tab: Likewise.

1997-03-05 00:43  Andreas Schwab  <schwab@issan.informatik.uni-dortmund.de>

	* configure.in (libc_cv_asm_symver_directive,
	libc_cv_ld_version_script_option): Remove unknown instruction from
	assembler test file.

1997-03-04 19:14  Andreas Schwab  <schwab@issan.informatik.uni-dortmund.de>

	* sysdeps/m68k/fpu/__math.h: Update feature tests to use
	__USE_ISOC9X.
	[__USE_ISOC9X]: Define __log2 and __exp2 inlines.
	(fabs): Remove defininition, it is a gcc builtin.
	(sqrt, __sqrt): Remove definition, they have wrappers in libm.

1997-03-04 10:11  H.J. Lu  <hjl@lucon.org>

	* sunrpc/Makefile ($(objpfx)rpc-proto.c): Create subdir before
	generating file.

1997-03-05 03:59  Ulrich Drepper  <drepper@cygnus.com>

	* inet/rcmd.c (__ivaliduser): Don't use getline, but __getline
	instead to avoid namespace problems.
	Reported by David Mosberger-Tang <davidm@AZStarNet.COM>.

1997-03-03 19:01  Andreas Schwab  <schwab@issan.informatik.uni-dortmund.de>

	* login/utmp_file.c: Fix previous change.  Make portable by
	checking the _HAVE_UT_* feature macros.

	* libio/fileops.c (_IO_file_finish): Likewise.

11 files changed, 1078 insertions, 0 deletions

diff --git a/sysdeps/powerpc/Implies b/sysdeps/powerpc/Implies
new file mode 100644
index 0000000000..d6acf04a82
--- /dev/null
+++ b/sysdeps/powerpc/Implies
@@ -0,0 +1,2 @@
+wordsize-32
+ieee754
diff --git a/sysdeps/powerpc/__longjmp.S b/sysdeps/powerpc/__longjmp.S
new file mode 100644
index 0000000000..928b5c540a
--- /dev/null
+++ b/sysdeps/powerpc/__longjmp.S
@@ -0,0 +1,66 @@
+/* longjmp for PowerPC.
+   Copyright (C) 1995, 1996, 1997 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
+
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Library General Public License as
+   published by the Free Software Foundation; either version 2 of the
+   License, or (at your option) any later version.
+
+   The GNU C Library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Library General Public License for more details.
+
+   You should have received a copy of the GNU Library General Public
+   License along with the GNU C Library; see the file COPYING.LIB.  If not,
+   write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.  */
+
+#include <sysdep.h>
+#define _ASM
+#include <jmp_buf.h>
+
+ENTRY (__longjmp)
+	lwz 1,(JB_GPR1*4)(3)
+	lwz 2,(JB_GPR2*4)(3)
+	lwz 0,(JB_LR*4)(3)
+	lwz 14,((JB_GPRS+0)*4)(3)
+	lfd 14,((JB_FPRS+0*2)*4)(3)
+	lwz 15,((JB_GPRS+1)*4)(3)
+	lfd 15,((JB_FPRS+1*2)*4)(3)
+	lwz 16,((JB_GPRS+2)*4)(3)
+	lfd 16,((JB_FPRS+2*2)*4)(3)
+	lwz 17,((JB_GPRS+3)*4)(3)
+	lfd 17,((JB_FPRS+3*2)*4)(3)
+	lwz 18,((JB_GPRS+4)*4)(3)
+	lfd 18,((JB_FPRS+4*2)*4)(3)
+	lwz 19,((JB_GPRS+5)*4)(3)
+	lfd 19,((JB_FPRS+5*2)*4)(3)
+	lwz 20,((JB_GPRS+6)*4)(3)
+	lfd 20,((JB_FPRS+6*2)*4)(3)
+	mtlr 0
+	lwz 21,((JB_GPRS+7)*4)(3)
+	lfd 21,((JB_FPRS+7*2)*4)(3)
+	lwz 22,((JB_GPRS+8)*4)(3)
+	lfd 22,((JB_FPRS+8*2)*4)(3)
+	lwz 23,((JB_GPRS+9)*4)(3)
+	lfd 23,((JB_FPRS+9*2)*4)(3)
+	lwz 24,((JB_GPRS+10)*4)(3)
+	lfd 24,((JB_FPRS+10*2)*4)(3)
+	lwz 25,((JB_GPRS+11)*4)(3)
+	lfd 25,((JB_FPRS+11*2)*4)(3)
+	lwz 26,((JB_GPRS+12)*4)(3)
+	lfd 26,((JB_FPRS+12*2)*4)(3)
+	lwz 27,((JB_GPRS+13)*4)(3)
+	lfd 27,((JB_FPRS+13*2)*4)(3)
+	lwz 28,((JB_GPRS+14)*4)(3)
+	lfd 28,((JB_FPRS+14*2)*4)(3)
+	lwz 29,((JB_GPRS+15)*4)(3)
+	lfd 29,((JB_FPRS+15*2)*4)(3)
+	lwz 30,((JB_GPRS+16)*4)(3)
+	lfd 30,((JB_FPRS+16*2)*4)(3)
+	lwz 31,((JB_GPRS+17)*4)(3)
+	lfd 31,((JB_FPRS+17*2)*4)(3)
+	blr
+END (__longjmp)
diff --git a/sysdeps/powerpc/__math.h b/sysdeps/powerpc/__math.h
new file mode 100644
index 0000000000..9dc19a91a5
--- /dev/null
+++ b/sysdeps/powerpc/__math.h
@@ -0,0 +1,89 @@
+/* Inline math functions for powerpc.
+   Copyright (C) 1995, 1996, 1997 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
+
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Library General Public License as
+   published by the Free Software Foundation; either version 2 of the
+   License, or (at your option) any later version.
+
+   The GNU C Library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Library General Public License for more details.
+
+   You should have received a copy of the GNU Library General Public
+   License along with the GNU C Library; see the file COPYING.LIB.  If not,
+   write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.  */
+
+#ifndef __MATH_H
+#define __MATH_H
+
+#ifdef __GNUC__
+#ifndef __NO_MATH_INLINES
+
+#ifdef __cplusplus
+#define        __MATH_INLINE __inline
+#else
+#define        __MATH_INLINE extern __inline
+#endif
+
+__MATH_INLINE double __sgn1 (double __x);
+__MATH_INLINE double
+__sgn1 (double __x)
+{
+  return __x >= 0.0 ? 1.0 : -1.0;
+}
+
+/* We'd want to use this if it was implemented in hardware, but
+   how can we tell? */
+#if 0
+__MATH_INLINE double sqrt (double __x);
+__MATH_INLINE double
+sqrt (double __x)
+{
+  register double __value;
+  __asm
+    ("fsqrt %0,%1"
+     : "=f" (__value) : "f" (__x));
+
+  return __value;
+}
+#endif
+
+__MATH_INLINE double fabs (double __x);
+__MATH_INLINE double
+fabs (double __x)
+{
+  register double __value;
+  __asm
+    ("fabs %0,%1"
+     : "=f" (__value) : "f" (__x));
+
+  return __value;
+}
+
+/* Optimized versions for some non-standardized functions.  */
+#ifdef __USE_MISC
+
+__MATH_INLINE double hypot (double __x, double __y);
+__MATH_INLINE double
+hypot (double __x, double __y)
+{
+  return sqrt (__x * __x + __y * __y);
+}
+
+__MATH_INLINE double __sgn (double __x);
+__MATH_INLINE double
+sgn (double __x)
+{
+  return (__x == 0.0 ? 0.0 : (__x > 0.0 ? 1.0 : -1.0));
+}
+
+#endif /* __USE_MISC  */
+
+#endif /* __NO_MATH_INLINES  */
+#endif /* __GNUC__  */
+
+#endif /* __MATH_H  */
diff --git a/sysdeps/powerpc/bsd-_setjmp.S b/sysdeps/powerpc/bsd-_setjmp.S
new file mode 100644
index 0000000000..90171ea616
--- /dev/null
+++ b/sysdeps/powerpc/bsd-_setjmp.S
@@ -0,0 +1,29 @@
+/* BSD `_setjmp' entry point to `sigsetjmp (..., 0)'.  PowerPC version.
+   Copyright (C) 1994, 1997 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
+
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Library General Public License as
+   published by the Free Software Foundation; either version 2 of the
+   License, or (at your option) any later version.
+
+   The GNU C Library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Library General Public License for more details.
+
+   You should have received a copy of the GNU Library General Public
+   License along with the GNU C Library; see the file COPYING.LIB.  If not,
+   write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.  */
+
+/* This just does a tail-call to `__sigsetjmp (ARG, 0)'.
+   We cannot do it in C because it must be a tail-call, so frame-unwinding
+   in setjmp doesn't clobber the state restored by longjmp.  */
+
+#include <sysdep.h>
+
+ENTRY (_setjmp)
+	li 4,0				/* Set second argument to 0.  */
+	b C_SYMBOL_NAME(__sigsetjmp)
+END (_setjmp)
diff --git a/sysdeps/powerpc/dl-machine.h b/sysdeps/powerpc/dl-machine.h
new file mode 100644
index 0000000000..a60a29723d
--- /dev/null
+++ b/sysdeps/powerpc/dl-machine.h
@@ -0,0 +1,529 @@
+/* Machine-dependent ELF dynamic relocation inline functions.  PowerPC version.
+   Copyright (C) 1995, 1996, 1997 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
+
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Library General Public License as
+   published by the Free Software Foundation; either version 2 of the
+   License, or (at your option) any later version.
+
+   The GNU C Library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Library General Public License for more details.
+
+   You should have received a copy of the GNU Library General Public
+   License along with the GNU C Library; see the file COPYING.LIB.  If not,
+   write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.  */
+
+#define ELF_MACHINE_NAME "powerpc"
+
+#include <assert.h>
+#include <string.h>
+#include <link.h>
+
+/* stuff for the PLT */
+#define PLT_INITIAL_ENTRY_WORDS 18
+#define PLT_LONGBRANCH_ENTRY_WORDS 10
+#define OPCODE_ADDI(rd,ra,simm) \
+  (0x38000000 | (rd) << 21 | (ra) << 16 | (simm) & 0xffff)
+#define OPCODE_ADDIS(rd,ra,simm) \
+  (0x3c000000 | (rd) << 21 | (ra) << 16 | (simm) & 0xffff)
+#define OPCODE_ADD(rd,ra,rb) \
+  (0x7c000214 | (rd) << 21 | (ra) << 16 | (rb) << 11)
+#define OPCODE_B(target) (0x48000000 | (target) & 0x03fffffc)
+#define OPCODE_BA(target) (0x48000002 | (target) & 0x03fffffc)
+#define OPCODE_BCTR() 0x4e800420
+#define OPCODE_LWZ(rd,d,ra) \
+  (0x80000000 | (rd) << 21 | (ra) << 16 | (d) & 0xffff)
+#define OPCODE_MTCTR(rd) (0x7C0903A6 | (rd) << 21)
+#define OPCODE_RLWINM(ra,rs,sh,mb,me) \
+  (0x54000000 | (rs) << 21 | (ra) << 16 | (sh) << 11 | (mb) << 6 | (me) << 1)
+
+#define OPCODE_LI(rd,simm)    OPCODE_ADDI(rd,0,simm)
+#define OPCODE_SLWI(ra,rs,sh) OPCODE_RLWINM(ra,rs,sh,0,31-sh)
+
+
+/* Return nonzero iff E_MACHINE is compatible with the running host.  */
+static inline int
+elf_machine_matches_host (Elf32_Half e_machine)
+{
+  return e_machine == EM_PPC;
+}
+
+
+/* Return the link-time address of _DYNAMIC, the first value in the GOT.  */
+static inline Elf32_Addr
+elf_machine_dynamic (void)
+{
+  Elf32_Addr *got;
+  asm (" bl _GLOBAL_OFFSET_TABLE_-4@local"
+       : "=l"(got));
+  return *got;
+}
+
+/* Return the run-time load address of the shared object.  */
+static inline Elf32_Addr
+elf_machine_load_address (void)
+{
+  unsigned *got;
+  unsigned *branchaddr;
+
+  /* This is much harder than you'd expect.  Possibly I'm missing something.
+     The 'obvious' way:
+
+       Apparently, "bcl 20,31,$+4" is what should be used to load LR
+       with the address of the next instruction.
+       I think this is so that machines that do bl/blr pairing don't
+       get confused.
+
+     asm ("bcl 20,31,0f ;"
+          "0: mflr 0 ;"
+          "lis %0,0b@ha;"
+          "addi %0,%0,0b@l;"
+          "subf %0,%0,0"
+          : "=b" (addr) : : "r0", "lr");
+
+     doesn't work, because the linker doesn't have to (and in fact doesn't)
+     update the @ha and @l references; the loader (which runs after this
+     code) will do that.
+
+     Instead, we use the following trick:
+
+     The linker puts the _link-time_ address of _DYNAMIC at the first
+     word in the GOT. We could branch to that address, if we wanted,
+     by using an @local reloc; the linker works this out, so it's safe
+     to use now. We can't, of course, actually branch there, because
+     we'd cause an illegal instruction exception; so we need to compute
+     the address ourselves. That gives us the following code: */
+
+  /* Get address of the 'b _DYNAMIC@local'...  */
+  asm ("bl 0f ;"
+       "b _DYNAMIC@local;"
+       "0:"
+       : "=l"(branchaddr));
+
+  /* ... and the address of the GOT.  */
+  asm (" bl _GLOBAL_OFFSET_TABLE_-4@local"
+       : "=l"(got));
+
+  /* So now work out the difference between where the branch actually points,
+     and the offset of that location in memory from the start of the file.  */
+  return (Elf32_Addr)branchaddr - *got +
+    (*branchaddr & 0x3fffffc |
+     (int)(*branchaddr << 6 & 0x80000000) >> 6);
+}
+
+#define ELF_MACHINE_BEFORE_RTLD_RELOC(dynamic_info) /* nothing */
+
+/* Perform the relocation specified by RELOC and SYM (which is fully resolved).
+   LOADADDR is the load address of the object; INFO is an array indexed
+   by DT_* of the .dynamic section info.  */
+
+#ifdef RESOLVE
+
+static inline void
+elf_machine_rela (struct link_map *map, const Elf32_Rela *reloc,
+		  const Elf32_Sym *sym, const struct r_found_version *version)
+{
+  Elf32_Addr *const reloc_addr = (Elf32_Addr *)(map->l_addr + reloc->r_offset);
+  Elf32_Word loadbase, finaladdr;
+  const int rinfo = ELF32_R_TYPE (reloc->r_info);
+
+  if (rinfo == R_PPC_NONE)
+    return;
+
+  if (sym && ELF32_ST_TYPE (sym->st_info) == STT_SECTION ||
+      rinfo == R_PPC_RELATIVE)
+    {
+      /* Has already been relocated.  */
+      loadbase = map->l_addr;
+      finaladdr = loadbase + reloc->r_addend;
+    }
+  else
+    {
+      assert (sym != NULL);
+      if (rinfo == R_PPC_JMP_SLOT)
+	loadbase = (Elf32_Word) (char *) RESOLVE (&sym,
+						  version, DL_LOOKUP_NOPLT);
+      else
+	loadbase = (Elf32_Word) (char *) RESOLVE (&sym, version, 0);
+      if (sym == NULL)
+	{
+	  /* Weak symbol that wasn't actually defined anywhere.  */
+	  assert (loadbase == 0);
+	  finaladdr = reloc->r_addend;
+	}
+      else
+	finaladdr = (loadbase + (Elf32_Word)(char *)sym->st_value
+		     + reloc->r_addend);
+    }
+
+  switch (rinfo)
+    {
+    case R_PPC_UADDR16:
+    case R_PPC_ADDR16_LO:
+    case R_PPC_ADDR16:
+      *(Elf32_Half*) reloc_addr = finaladdr;
+      break;
+
+    case R_PPC_ADDR16_HI:
+      *(Elf32_Half*) reloc_addr = finaladdr >> 16;
+      break;
+
+    case R_PPC_ADDR16_HA:
+      *(Elf32_Half*) reloc_addr = finaladdr + 0x8000 >> 16;
+      break;
+
+    case R_PPC_REL24:
+      {
+	Elf32_Sword delta = finaladdr - (Elf32_Word) (char *) reloc_addr;
+	assert (delta << 6 >> 6 == delta);
+	*reloc_addr = *reloc_addr & 0xfc000003 | delta & 0x3fffffc;
+      }
+      break;
+
+    case R_PPC_UADDR32:
+    case R_PPC_GLOB_DAT:
+    case R_PPC_ADDR32:
+    case R_PPC_RELATIVE:
+      *reloc_addr = finaladdr;
+      break;
+
+    case R_PPC_ADDR24:
+      *reloc_addr = *reloc_addr & 0xfc000003 | finaladdr & 0x3fffffc;
+      break;
+
+    case R_PPC_REL14_BRTAKEN:
+    case R_PPC_REL14_BRNTAKEN:
+    case R_PPC_REL14:
+      {
+	Elf32_Sword delta = finaladdr - (Elf32_Word) (char *) reloc_addr;
+	*reloc_addr = *reloc_addr & 0xffdf0003 | delta & 0xfffc;
+	if (rinfo == R_PPC_REL14_BRTAKEN && delta >= 0 ||
+	    rinfo == R_PPC_REL14_BRNTAKEN && delta < 0)
+	  *reloc_addr |= 0x00200000;
+      }
+      break;
+
+    case R_PPC_COPY:
+      {
+	/* Can't use memcpy (because we can't call any functions here).  */
+	int i;
+	for (i = 0; i < sym->st_size; ++i)
+	  ((unsigned char *) reloc_addr)[i] =
+	    ((unsigned char *)finaladdr)[i];
+      }
+      break;
+
+    case R_PPC_REL32:
+      *reloc_addr = finaladdr - (Elf32_Word) (char *) reloc_addr;
+      break;
+
+    case R_PPC_JMP_SLOT:
+      if (finaladdr <= 0x01fffffc || finaladdr >= 0xfe000000)
+	*reloc_addr = OPCODE_BA (finaladdr);
+      else
+	{
+	  Elf32_Sword delta = finaladdr - (Elf32_Word) (char *) reloc_addr;
+	  if (delta <= 0x01fffffc && delta >= 0xfe000000)
+	    *reloc_addr = OPCODE_B (delta);
+	  else
+	    {
+	      Elf32_Word *plt =
+		(Elf32_Word *) ((char *) map->l_addr
+				+ map->l_info[DT_PLTGOT]->d_un.d_val);
+	      Elf32_Word index =((reloc_addr - plt - PLT_INITIAL_ENTRY_WORDS)
+				 / 2);
+	      int num_plt_entries = (map->l_info[DT_PLTRELSZ]->d_un.d_val
+				     / sizeof (Elf32_Rela));
+	      int rel_offset_words = (PLT_INITIAL_ENTRY_WORDS
+				      + num_plt_entries * 2);
+
+	      if (index >= (1 << 13))
+		{
+		  /* Indexes greater than or equal to 2^13 have 4
+		     words available instead of two.  */
+		  plt[index * 2 + PLT_INITIAL_ENTRY_WORDS] =
+		    OPCODE_LI (11, finaladdr);
+		  plt[index * 2 + 1 + PLT_INITIAL_ENTRY_WORDS] =
+		    OPCODE_ADDIS (11, 11, finaladdr + 0x8000 >> 16);
+		  plt[index * 2 + 2 + PLT_INITIAL_ENTRY_WORDS] =
+		    OPCODE_MTCTR (11);
+		  plt[index * 2 + 2 + PLT_INITIAL_ENTRY_WORDS] =
+		    OPCODE_BCTR ();
+		}
+	      else
+		{
+		  plt[index * 2 + PLT_INITIAL_ENTRY_WORDS] =
+		    OPCODE_LI (11, index * 4);
+		  plt[index * 2 + 1 + PLT_INITIAL_ENTRY_WORDS] =
+		    OPCODE_B(-(4 * (index * 2 + 1 + PLT_INITIAL_ENTRY_WORDS
+				    + PLT_LONGBRANCH_ENTRY_WORDS)));
+		  plt[index + rel_offset_words] = finaladdr;
+		}
+	    }
+	}
+      break;
+
+    default:
+      assert (! "unexpected dynamic reloc type");
+    }
+}
+
+#define ELF_MACHINE_NO_REL 1
+
+#endif
+
+/* Nonzero iff TYPE describes relocation of a PLT entry, so
+   PLT entries should not be allowed to define the value.  */
+#define elf_machine_pltrel_p(type) ((type) == R_PPC_JMP_SLOT)
+
+/* Set up the loaded object described by L so its unrelocated PLT
+   entries will jump to the on-demand fixup code in dl-runtime.c.  */
+
+/* This code does not presently work if there are more than 2^13 PLT
+   entries. */
+static inline void
+elf_machine_runtime_setup (struct link_map *map, int lazy)
+{
+  Elf32_Word *plt;
+  int i;
+  Elf32_Word num_plt_entries;
+  Elf32_Word rel_offset_words;
+  extern void _dl_runtime_resolve (void);
+
+  if (map->l_info[DT_JMPREL])
+    {
+      /* Fill in the PLT. Its initial contents are directed to a
+	 function earlier in the PLT which arranges for the dynamic
+	 linker to be called back.  */
+      plt = (Elf32_Word *) ((char *) map->l_addr +
+			    map->l_info[DT_PLTGOT]->d_un.d_val);
+      num_plt_entries = (map->l_info[DT_PLTRELSZ]->d_un.d_val
+			 / sizeof (Elf32_Rela));
+      rel_offset_words = PLT_INITIAL_ENTRY_WORDS + num_plt_entries * 2;
+
+      if (lazy)
+	for (i = 0; i < num_plt_entries; i++)
+	  if (i >= (1 << 13))
+	  {
+	    plt[i * 2 + (i - (1 << 13)) * 2 + PLT_INITIAL_ENTRY_WORDS] =
+	      OPCODE_LI (11, i * 4);
+	    plt[i * 2 + (i - (1 << 13)) * 2 + 1 + PLT_INITIAL_ENTRY_WORDS] =
+	      OPCODE_ADDIS (11, 11, i * 4 + 0x8000 >> 16);
+	    plt[i * 2 + (i - (1 << 13)) * 2 + 2 + PLT_INITIAL_ENTRY_WORDS] =
+	      OPCODE_B (-(4 * ( i * 2 + 1 + PLT_INITIAL_ENTRY_WORDS)));
+	  }
+	  else
+	  {
+	    plt[i * 2 + PLT_INITIAL_ENTRY_WORDS] = OPCODE_LI (11, i * 4);
+	    plt[i * 2 + 1 + PLT_INITIAL_ENTRY_WORDS] =
+	      OPCODE_B (-(4 * (i * 2 + 1 + PLT_INITIAL_ENTRY_WORDS)));
+	  }
+
+      /* Multiply index of entry, by 0xC.  */
+      plt[0] = OPCODE_SLWI (12, 11, 1);
+      plt[1] = OPCODE_ADD (11, 12, 11);
+      if ((Elf32_Word) (char *) _dl_runtime_resolve <= 0x01fffffc ||
+	  (Elf32_Word) (char *) _dl_runtime_resolve >= 0xfe000000)
+	{
+	  plt[2] = OPCODE_LI (12, (Elf32_Word) (char *) map);
+	  plt[3] = OPCODE_ADDIS (12, 12,
+				 (Elf32_Word) (char *) map + 0x8000 >> 16);
+	  plt[4] = OPCODE_BA ((Elf32_Word) (char *) _dl_runtime_resolve);
+	}
+      else
+	{
+	  plt[2] = OPCODE_LI (12, (Elf32_Word) (char *) _dl_runtime_resolve);
+	  plt[3] = OPCODE_ADDIS (12, 12, 0x8000 +
+				 ((Elf32_Word) (char *) _dl_runtime_resolve
+				  >> 16));
+	  plt[4] = OPCODE_MTCTR (12);
+	  plt[5] = OPCODE_LI (12, (Elf32_Word) (char *) map);
+	  plt[6] = OPCODE_ADDIS (12, 12, ((Elf32_Word) (char *) map
+					  + 0x8000 >> 16));
+	  plt[7] = OPCODE_BCTR ();
+	}
+      plt[PLT_LONGBRANCH_ENTRY_WORDS] =
+	OPCODE_ADDIS (11, 11, ((Elf32_Word) (char*) (plt+rel_offset_words)
+			       + 0x8000 >> 16));
+      plt[PLT_LONGBRANCH_ENTRY_WORDS+1] =
+	OPCODE_LWZ (11, (Elf32_Word) (char*) (plt + rel_offset_words), 11);
+      plt[PLT_LONGBRANCH_ENTRY_WORDS+2] = OPCODE_MTCTR (11);
+      plt[PLT_LONGBRANCH_ENTRY_WORDS+3] = OPCODE_BCTR ();
+    }
+}
+
+static inline void
+elf_machine_lazy_rel (struct link_map *map, const Elf32_Rela *reloc)
+{
+  if (ELF32_R_TYPE (reloc->r_info) != R_PPC_JMP_SLOT)
+      assert (! "unexpected PLT reloc type");
+
+  /* elf_machine_runtime_setup handles this. */
+}
+
+/* The PLT uses Elf32_Rela relocs.  */
+#define elf_machine_relplt elf_machine_rela
+
+  /* This code is used in dl-runtime.c to call the `fixup' function
+     and then redirect to the address it returns.  */
+#define ELF_MACHINE_RUNTIME_TRAMPOLINE asm ("\
+	.section \".text\"
+	.globl _dl_runtime_resolve
+_dl_runtime_resolve:
+	stwu 1,-48(1)
+	mflr 0
+	stw 3,16(1)
+	stw 4,20(1)
+	stw 0,52(1)
+	stw 5,24(1)
+	mfcr 0
+	stw 6,28(1)
+	stw 7,32(1)
+	stw 8,36(1)
+	stw 9,40(1)
+	stw 10,44(1)
+	stw 0,12(1)
+	mr 3,12
+	mr 4,11
+	bl fixup
+	mtctr 3
+	lwz 0,52(1)
+	lwz 10,44(1)
+	lwz 9,40(1)
+	mtlr 0
+	lwz 0,12(1)
+	lwz 8,36(1)
+	lwz 7,32(1)
+	lwz 6,28(1)
+	mtcrf 0xFF,0
+	lwz 5,24(1)
+	lwz 4,20(1)
+	lwz 3,16(1)
+	addi 1,1,48
+	bctr
+");
+
+/* Initial entry point code for the dynamic linker.
+   The C function `_dl_start' is the real entry point;
+   its return value is the user program's entry point.  */
+
+/* FIXME! We don't make provision for calling _dl_fini,
+   because Linux/PPC is somewhat broken. */
+#define RTLD_START \
+asm ("\
+	.text
+        .align 2
+	.globl _start
+        .type _start,@function
+_start:
+ # We start with the following on the stack, from top:
+ # argc (4 bytes)
+ # arguments for program (terminated by NULL)
+ # environment variables (terminated by NULL)
+ # arguments for the program loader
+
+ # Call _dl_start with one parameter pointing at argc
+        mr 3,1
+ #  (we have to frob the stack pointer a bit to allow room for
+ #   _dl_start to save the link register)
+        li 4,0
+        addi 1,1,-16
+        stw 4,0(1)
+        bl _dl_start@local
+
+ # Now, we do our main work of calling initialisation procedures.
+ # The ELF ABI doesn't say anything about parameters for these,
+ # so we just pass argc, argv, and the environment.
+ # Changing these is strongly discouraged (not least because argc is
+ # passed by value!).
+
+ #  put our GOT pointer in r31
+        bl _GLOBAL_OFFSET_TABLE_-4@local
+        mflr 31
+ #  the address of _start in r30
+        mr 30,3
+ #  &_dl_argc in 29, &_dl_argv in 27, and _dl_default_scope in 28
+	lwz 28,_dl_default_scope@got(31)
+	lwz 29,_dl_argc@got(31)
+	lwz 27,_dl_argv@got(31)
+0:
+ #  call initfunc = _dl_init_next(_dl_default_scope[2])
+	lwz 3,8(28)
+	bl _dl_init_next@plt
+ # if initfunc is NULL, we exit the loop
+	mr. 0,3
+	beq 1f
+ # call initfunc(_dl_argc, _dl_argv, _dl_argv+_dl_argc+1)
+	mtlr 0
+	lwz 3,0(29)
+	lwz 4,0(27)
+	slwi 5,3,2
+	add 5,4,5
+	addi 5,5,4
+	blrl
+ # and loop.
+	b 0b
+1:
+ # Now, to conform to the ELF ABI, we have to:
+ # pass argv (actually _dl_argv) in r4
+	lwz 4,0(27)
+ # pass argc (actually _dl_argc) in r3
+	lwz 3,0(29)
+ # pass envp (actually _dl_argv+_dl_argc+1) in r5
+	slwi 5,3,2
+	add 5,4,5
+	addi 5,5,4
+ # pass the auxilary vector in r6. This is passed just after _envp.
+	addi 6,5,-4
+2:	lwzu 0,4(6)
+	cmpwi 1,0,0
+	bne 2b
+	addi 6,6,4
+ # pass a termination function pointer (in this case _dl_fini) in r7
+	lwz 7,_dl_fini@got(31)
+ # now, call the start function in r30...
+	mtctr 30
+ # pass the stack pointer in r1 (so far so good), pointing to a NULL value
+ # (this lets our startup code distinguish between a program linked statically,
+ # which linux will call with argc on top of the stack which will hopefully
+ # never be zero, and a dynamically linked program which will always have
+ # a NULL on the top of the stack).
+ # Take the opportunity to clear LR, so anyone who accidentally returns
+ # from _start gets SEGV.
+	li 0,0
+	stw 0,0(1)
+	mtlr 0
+ # and also clear _dl_starting_up
+	lwz 26,_dl_starting_up@got(31)
+	stw 0,0(3)
+ # go do it!
+	bctr
+");
+
+#define ELF_PREFERRED_ADDRESS_DATA static ElfW(Addr) _dl_preferred_address = 0;
+#define ELF_PREFERRED_ADDRESS(loader, maplength, mapstartpref) \
+( {									      \
+   ElfW(Addr) prefd;							      \
+   if (mapstartpref != 0 && _dl_preferred_address == 0)			      \
+     _dl_preferred_address = mapstartpref;				      \
+   if (mapstartpref != 0)						      \
+     prefd = mapstartpref;						      \
+   else if (_dl_preferred_address < maplength + 0x50000)		      \
+     prefd = 0;								      \
+   else									      \
+     prefd = _dl_preferred_address =					      \
+	  (_dl_preferred_address - maplength - 0x10000) &		      \
+           ~(_dl_pagesize - 1);						      \
+   prefd;								      \
+} )
+#define ELF_FIXED_ADDRESS(loader, mapstart) \
+( {									      \
+   if (mapstart != 0 && _dl_preferred_address == 0)			      \
+     _dl_preferred_address = mapstart;					      \
+} )
+
+#define ELF_FIXUP_RETURNS_ADDRESS 1
diff --git a/sysdeps/powerpc/elf/start.c b/sysdeps/powerpc/elf/start.c
new file mode 100644
index 0000000000..9b1cf1c026
--- /dev/null
+++ b/sysdeps/powerpc/elf/start.c
@@ -0,0 +1,111 @@
+/* Startup code compliant to the ELF PowerPC ABI.
+   Copyright (C) 1997 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
+
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Library General Public License as
+   published by the Free Software Foundation; either version 2 of the
+   License, or (at your option) any later version.
+
+   The GNU C Library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Library General Public License for more details.
+
+   You should have received a copy of the GNU Library General Public
+   License along with the GNU C Library; see the file COPYING.LIB.  If not,
+   write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.  */
+
+/* This is SVR4/PPC ABI compliant, and works under Linux when
+   statically linked.  */
+
+#include <unistd.h>
+#include <stdlib.h>
+
+/* Just a little assembler stub before gcc gets its hands on our
+   stack pointer... */
+asm ("\
+	.text
+	.globl _start
+_start:
+ # save the stack pointer, in case we're statically linked under Linux
+        mr 8,1
+ # set up an initial stack frame, and clear the LR
+        addi 1,1,-16
+        clrrwi 1,1,4
+        li 0,0
+        stw 0,0(1)
+        mtlr 0
+ # set r13 to point at the 'small data area'
+        lis 13,_SDA_BASE_@ha
+        addi 13,13,_SDA_BASE_@l
+ # and continue below.
+        b __start1
+");
+
+/* Define a symbol for the first piece of initialized data.  */
+int __data_start = 0;
+weak_alias (__data_start, data_start)
+
+/* these probably should go, at least go somewhere else
+   (sysdeps/mach/something?). */
+void (*_mach_init_routine) (void);
+void (*_thread_init_routine) (void);
+
+void __libc_init_first (int argc, char **argv, char **envp);
+int main (int argc, char **argv, char **envp, void *auxvec);
+#ifdef HAVE_INITFINI
+void _init (void);
+void _fini (void);
+#endif
+
+
+static void __start1(int argc, char **argv, char **envp,
+		     void *auxvec, void (*exitfn) (void), char **arguments)
+     __attribute__ ((unused));
+static void
+__start1(int argc, char **argv, char **envp,
+	 void *auxvec, void (*exitfn) (void),
+	 char **arguments)
+{
+  /* the PPC SVR4 ABI says that the top thing on the stack will
+     be a NULL pointer, so if not we assume that we're being called
+     as a statically-linked program by Linux. */
+  int abi_compliant_startup = *arguments == NULL;
+
+  if (!abi_compliant_startup)
+  {
+    argc = *(int *) arguments;
+    argv = arguments+1;
+    envp = argv+argc+1;
+    auxvec = envp;
+    while (auxvec != NULL)
+      auxvec++;
+    auxvec++;
+    exitfn = NULL;
+  }
+
+  if (exitfn != NULL)
+    atexit (exitfn);
+
+  /* libc init routine, in case we are statically linked
+     (otherwise ld.so will have called it when it loaded libc, but
+     calling it twice doesn't hurt). */
+  __libc_init_first (argc, argv, envp);
+
+#ifdef HAVE_INITFINI
+  /* ELF constructors/destructors */
+  atexit (_fini);
+  _init ();
+#endif
+
+  /* Stuff so we can build Mach/Linux executables (like vmlinux).  */
+  if (_mach_init_routine != 0)
+    _mach_init_routine ();
+  if (_thread_init_routine != 0)
+    _thread_init_routine ();
+
+  /* the rest of the program */
+  exit (main (argc, argv, envp, auxvec));
+}
diff --git a/sysdeps/powerpc/ffs.c b/sysdeps/powerpc/ffs.c
new file mode 100644
index 0000000000..d9d7f267af
--- /dev/null
+++ b/sysdeps/powerpc/ffs.c
@@ -0,0 +1,38 @@
+/* Find first set bit in a word, counted from least significant end.
+   For PowerPC.
+   Copyright (C) 1991, 1992, 1997 Free Software Foundation, Inc.
+   Contributed by Torbjorn Granlund (tege@sics.se).
+
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Library General Public License as
+   published by the Free Software Foundation; either version 2 of the
+   License, or (at your option) any later version.
+
+   The GNU C Library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Library General Public License for more details.
+
+   You should have received a copy of the GNU Library General Public
+   License along with the GNU C Library; see the file COPYING.LIB.  If not,
+   write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.  */
+
+#include <bstring.h>
+
+#undef	ffs
+
+#ifdef	__GNUC__
+
+int
+ffs (int x)
+{
+  int cnt;
+
+  asm ("cntlzw %0,%1" : "=r" (cnt) : "r" (x & -x));
+  return 32 - cnt;
+}
+
+#else
+#include <sysdeps/generic/ffs.c>
+#endif
diff --git a/sysdeps/powerpc/fpu_control.h b/sysdeps/powerpc/fpu_control.h
new file mode 100644
index 0000000000..b31e0eeefd
--- /dev/null
+++ b/sysdeps/powerpc/fpu_control.h
@@ -0,0 +1,77 @@
+/* FPU control word definitions.  PowerPC version.
+   Copyright (C) 1996, 1997 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
+
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Library General Public License as
+   published by the Free Software Foundation; either version 2 of the
+   License, or (at your option) any later version.
+
+   The GNU C Library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Library General Public License for more details.
+
+   You should have received a copy of the GNU Library General Public
+   License along with the GNU C Library; see the file COPYING.LIB.  If not,
+   write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.  */
+
+#ifndef _FPU_CONTROL_H
+#define _FPU_CONTROL_H
+
+/* rounding control */
+#define _FPU_RC_NEAREST 0x00   /* RECOMMENDED */
+#define _FPU_RC_DOWN    0x03
+#define _FPU_RC_UP      0x02
+#define _FPU_RC_ZERO    0x01
+
+#define _FPU_MASK_NI  0x04 /* non-ieee mode */
+
+/* masking of interrupts */
+#define _FPU_MASK_ZM  0x10 /* zero divide */
+#define _FPU_MASK_OM  0x40 /* overflow */
+#define _FPU_MASK_UM  0x20 /* underflow */
+#define _FPU_MASK_XM  0x08 /* inexact */
+#define _FPU_MASK_IM  0x80 /* invalid operation */
+#define _FPU_MASK_VXCVI 0x100 /* invalid operation for integer convert */
+#define _FPU_MASK_VXSQRT 0x200 /* invalid operation for square root */
+#define _FPU_MASK_VXSOFT 0x400 /* invalid operation raised by software */
+
+#define _FPU_RESERVED 0xfffff800 /* These bits are reserved are not changed. */
+
+/* The fdlibm code requires no interrupts for exceptions.  Don't
+   change the rounding mode, it would break long double I/O!  */
+#define _FPU_DEFAULT  0x00000000 /* Default value.  */
+
+/* IEEE:  same as above, but (some) exceptions;
+   we leave the 'inexact' exception off.
+ */
+#define _FPU_IEEE     0x000003f0
+
+/* Type of the control word.  */
+typedef unsigned int fpu_control_t __attribute__ ((__mode__ (__SI__)));
+
+/* Macros for accessing the hardware control word.  */
+#define _FPU_GETCW(cw) ( { \
+  fpu_control_t tmp[2] __attribute__ ((__aligned__(8))); \
+  __asm__ ("mffs 0; stfd 0,%0" : "=m" (*tmp) : : "fr0"); \
+  tmp[1]; } )
+#define _FPU_SETCW(cw) { \
+  fpu_control_t tmp[2] __attribute__ ((__aligned__(8))); \
+  tmp[0] = 0xFFF80000; /* arbitrary, more-or-less */ \
+  tmp[1] = cw; \
+  __asm__ ("lfd 0,%0; mtfsf 255,0" : : "m" (*tmp) : "fr0"); \
+}
+
+/* Default control word set at startup.  */
+extern fpu_control_t __fpu_control;
+
+__BEGIN_DECLS
+
+/* Called at startup.  It can be used to manipulate fpu control register.  */
+extern void __setfpucw __P ((fpu_control_t));
+
+__END_DECLS
+
+#endif /* _FPU_CONTROL_H */
diff --git a/sysdeps/powerpc/jmp_buf.h b/sysdeps/powerpc/jmp_buf.h
new file mode 100644
index 0000000000..df832b157c
--- /dev/null
+++ b/sysdeps/powerpc/jmp_buf.h
@@ -0,0 +1,19 @@
+/* Define the machine-dependent type `jmp_buf'.  PowerPC version.  */
+
+/* The previous jmp_buf.h had __jmp_buf defined as a structure.
+   We use an array of 'long int' instead, to make writing the
+   assembler easier. Naturally, user code should not depend on
+   either representation. */
+
+#if	defined (__USE_MISC) || defined (_ASM)
+#define JB_GPR1  0   /* also known as the stack pointer */
+#define JB_GPR2  1
+#define JB_LR    2
+#define JB_GPRS  3   /* GPRs 14 through 31 are saved, 18 in total */
+#define JB_UNUSED 21 /* it's sometimes faster to store doubles word-aligned */
+#define JB_FPRS  22  /* FPRs 14 through 31 are saved, 18*2 words total */
+#endif
+
+#ifndef	_ASM
+typedef long int __jmp_buf[58];
+#endif
diff --git a/sysdeps/powerpc/setjmp.S b/sysdeps/powerpc/setjmp.S
new file mode 100644
index 0000000000..a2c0b8c53d
--- /dev/null
+++ b/sysdeps/powerpc/setjmp.S
@@ -0,0 +1,66 @@
+/* setjmp for PowerPC.
+   Copyright (C) 1995, 1996, 1997 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
+
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Library General Public License as
+   published by the Free Software Foundation; either version 2 of the
+   License, or (at your option) any later version.
+
+   The GNU C Library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Library General Public License for more details.
+
+   You should have received a copy of the GNU Library General Public
+   License along with the GNU C Library; see the file COPYING.LIB.  If not,
+   write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.  */
+
+#include <sysdep.h>
+#define _ASM
+#include <jmp_buf.h>
+
+ENTRY (__sigsetjmp)
+	stw 1,(JB_GPR1*4)(3)
+	mflr 0
+	stw 2,(JB_GPR2*4)(3)
+	stw 14,((JB_GPRS+0)*4)(3)
+	stfd 14,((JB_FPRS+0*2)*4)(3)
+	stw 0,(JB_LR*4)(3)
+	stw 15,((JB_GPRS+1)*4)(3)
+	stfd 15,((JB_FPRS+1*2)*4)(3)
+	stw 16,((JB_GPRS+2)*4)(3)
+	stfd 16,((JB_FPRS+2*2)*4)(3)
+	stw 17,((JB_GPRS+3)*4)(3)
+	stfd 17,((JB_FPRS+3*2)*4)(3)
+	stw 18,((JB_GPRS+4)*4)(3)
+	stfd 18,((JB_FPRS+4*2)*4)(3)
+	stw 19,((JB_GPRS+5)*4)(3)
+	stfd 19,((JB_FPRS+5*2)*4)(3)
+	stw 20,((JB_GPRS+6)*4)(3)
+	stfd 20,((JB_FPRS+6*2)*4)(3)
+	stw 21,((JB_GPRS+7)*4)(3)
+	stfd 21,((JB_FPRS+7*2)*4)(3)
+	stw 22,((JB_GPRS+8)*4)(3)
+	stfd 22,((JB_FPRS+8*2)*4)(3)
+	stw 23,((JB_GPRS+9)*4)(3)
+	stfd 23,((JB_FPRS+9*2)*4)(3)
+	stw 24,((JB_GPRS+10)*4)(3)
+	stfd 24,((JB_FPRS+10*2)*4)(3)
+	stw 25,((JB_GPRS+11)*4)(3)
+	stfd 25,((JB_FPRS+11*2)*4)(3)
+	stw 26,((JB_GPRS+12)*4)(3)
+	stfd 26,((JB_FPRS+12*2)*4)(3)
+	stw 27,((JB_GPRS+13)*4)(3)
+	stfd 27,((JB_FPRS+13*2)*4)(3)
+	stw 28,((JB_GPRS+14)*4)(3)
+	stfd 28,((JB_FPRS+14*2)*4)(3)
+	stw 29,((JB_GPRS+15)*4)(3)
+	stfd 29,((JB_FPRS+15*2)*4)(3)
+	stw 30,((JB_GPRS+16)*4)(3)
+	stfd 30,((JB_FPRS+16*2)*4)(3)
+	stw 31,((JB_GPRS+17)*4)(3)
+	stfd 31,((JB_FPRS+17*2)*4)(3)
+	b __sigjmp_save
+END (__sigsetjmp)
diff --git a/sysdeps/powerpc/strlen.S b/sysdeps/powerpc/strlen.S
new file mode 100644
index 0000000000..95eaf94de1
--- /dev/null
+++ b/sysdeps/powerpc/strlen.S
@@ -0,0 +1,52 @@
+/* Optimized strlen implementation for PowerPC.
+   Copyright (C) 1997 Free Software Foundation, Inc.
+   This file is part of the GNU C Library.
+
+   The GNU C Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Library General Public License as
+   published by the Free Software Foundation; either version 2 of the
+   License, or (at your option) any later version.
+
+   The GNU C Library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Library General Public License for more details.
+
+   You should have received a copy of the GNU Library General Public
+   License along with the GNU C Library; see the file COPYING.LIB.  If not,
+   write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.  */
+
+	.section	".text"
+	.align 2
+	.globl strlen
+	.type	 strlen,@function
+strlen:
+	rlwinm 7,3,0,0,29
+	lis 8,0x7f7f
+	lwz 11,0(7)
+	ori 8,8,32639
+	rlwinm 4,3,3,27,28
+	li 9,-1
+	or 10,11,8
+	and 0,11,8
+	srw 9,9,4
+	add 0,0,8
+	nor 0,10,0
+	and. 11,0,9
+	bc 4,2,.L2
+.L3:
+	lwzu 11,4(7)
+	or 10,11,8
+	and 0,11,8
+	add 0,0,8
+	nor. 11,10,0
+	bc 12,2,.L3
+.L2:
+	subf 0,3,7
+	cntlzw 3,11
+	srwi 3,3,3
+	add 3,0,3
+	blr
+.Lfe1:
+	.size	 strlen,.Lfe1-strlen