Update.

1998-03-09 08:21  Ulrich Drepper  <drepper@cygnus.com>

	* sysdeps/unix/sysv/linux/chown.c: Moved to ...
	* sysdeps/unix/sysv/linux/i386/chown.c: ...here.

	* sysdeps/unix/sysv/linux/i386/chown.c: Correct versioning information.
	* libc.map: Add chown to GLIBC_2.1.
	* sysdeps/unix/sysv/linux/i386/syscalls.list: Add s_chown here.
	* sysdeps/unix/sysv/linux/syscalls.list: Remove s_chown here.

1998-03-06  Andreas Schwab  <schwab@issan.informatik.uni-dortmund.de>

	* sysdeps/generic/ffs.S: Rename function to __ffs and make ffs a
	weak alias.
	* sysdeps/alpha/ffs.c: Likewise.
	* sysdeps/am29k/ffs.c: Likewise.
	* sysdeps/i386/ffs.c: Likewise.
	* sysdeps/i960/ffs.c: Likewise.
	* sysdeps/m68k/ffs.c: Likewise.
	* sysdeps/m88k/ffs.c: Likewise.
	* sysdeps/powerpc/ffs.c: Likewise.
	* sysdeps/rs6000/ffs.c: Likewise.
	* sysdeps/vax/ffs.s: Likewise.
	* string/string.h: Declare __ffs.
	* libc.map: Export it.
	* elf/dl-profile.c (_dl_start_profile): Use __ffs instead of
	__builtin_ffs, which is not guaranteed to be namespace clean.

1998-03-06  Andreas Schwab  <schwab@issan.informatik.uni-dortmund.de>

	* elf/sprof.c: Rewrite symbol handling to use the normal symbol
	table, which is much more likely to exist than debugging symbols.
	(printsym): Remove const.
	(load_shobj): Don't use _dl_pagesize.  Fix mapping of section
	header table.

	* libc.map: Export __profile_frequency, used by elf/sprof, to
	avoid infinite recursion during startup.

1998-03-09 12:16  Andreas Schwab  <schwab@issan.informatik.uni-dortmund.de>

ChangeLog

@@ -1,4 +1,43 @@
-Mon Mar  9 12:16:42 1998  Andreas Schwab  <schwab@issan.informatik.uni-dortmund.de>
+1998-03-09 08:21  Ulrich Drepper  <drepper@cygnus.com>
+
+	* sysdeps/unix/sysv/linux/chown.c: Moved to ...
+	* sysdeps/unix/sysv/linux/i386/chown.c: ...here.
+
+	* sysdeps/unix/sysv/linux/i386/chown.c: Correct versioning information.
+	* libc.map: Add chown to GLIBC_2.1.
+	* sysdeps/unix/sysv/linux/i386/syscalls.list: Add s_chown here.
+	* sysdeps/unix/sysv/linux/syscalls.list: Remove s_chown here.
+
+1998-03-06  Andreas Schwab  <schwab@issan.informatik.uni-dortmund.de>
+
+	* sysdeps/generic/ffs.S: Rename function to __ffs and make ffs a
+	weak alias.
+	* sysdeps/alpha/ffs.c: Likewise.
+	* sysdeps/am29k/ffs.c: Likewise.
+	* sysdeps/i386/ffs.c: Likewise.
+	* sysdeps/i960/ffs.c: Likewise.
+	* sysdeps/m68k/ffs.c: Likewise.
+	* sysdeps/m88k/ffs.c: Likewise.
+	* sysdeps/powerpc/ffs.c: Likewise.
+	* sysdeps/rs6000/ffs.c: Likewise.
+	* sysdeps/vax/ffs.s: Likewise.
+	* string/string.h: Declare __ffs.
+	* libc.map: Export it.
+	* elf/dl-profile.c (_dl_start_profile): Use __ffs instead of
+	__builtin_ffs, which is not guaranteed to be namespace clean.
+
+1998-03-06  Andreas Schwab  <schwab@issan.informatik.uni-dortmund.de>
+
+	* elf/sprof.c: Rewrite symbol handling to use the normal symbol
+	table, which is much more likely to exist than debugging symbols.
+	(printsym): Remove const.
+	(load_shobj): Don't use _dl_pagesize.  Fix mapping of section
+	header table.
+
+	* libc.map: Export __profile_frequency, used by elf/sprof, to
+	avoid infinite recursion during startup.
+
+1998-03-09 12:16  Andreas Schwab  <schwab@issan.informatik.uni-dortmund.de>
 
 	* sysdeps/unix/sysv/linux/m68k/sysdep.h (SYSCALL_ERROR_HANDLER):
 	Readd lost negate.

elf/dl-profile.c

@@ -223,7 +223,7 @@ _dl_start_profile (struct link_map *map, const char *output_dir)
   if ((HASHFRACTION & (HASHFRACTION - 1)) == 0)
     /* If HASHFRACTION is a power of two, mcount can use shifting
        instead of integer division.  Precompute shift amount.  */
-    log_hashfraction = __builtin_ffs (hashfraction * sizeof (*froms)) - 1;
+    log_hashfraction = __ffs (hashfraction * sizeof (*froms)) - 1;
   else
     log_hashfraction = -1;
   tossize = textsize / HASHFRACTION;

elf/sprof.c

@@ -21,7 +21,6 @@
 #include <argp.h>
 #include <dlfcn.h>
 #include <elf.h>
-#include <endian.h>
 #include <error.h>
 #include <fcntl.h>
 #include <inttypes.h>
@@ -30,7 +29,6 @@
 #include <locale.h>
 #include <obstack.h>
 #include <search.h>
-#include <stab.h>
 #include <stdio.h>
 #include <stdlib.h>
 #include <string.h>
@@ -129,15 +127,6 @@ struct here_cg_arc_record
     uint32_t count;
   } __attribute__ ((packed));
 
-/* Information about the stab debugging info.  This should be in a
-   head but it is not.  */
-#define STRDXOFF (0)
-#define TYPEOFF (4)
-#define OTHEROFF (5)
-#define DESCOFF (6)
-#define VALOFF (8)
-#define STABSIZE (12)
-
 
 struct known_symbol
 {
@@ -154,7 +143,7 @@ struct shobj
   const char *name;		/* User-provided name.  */
 
   struct link_map *map;
-  const char *strtab;		/* String table of shared object.  */
+  const char *dynstrtab;	/* Dynamic string table of shared object.  */
   const char *soname;		/* Soname of shared object.  */
 
   uintptr_t lowpc;
@@ -167,12 +156,11 @@ struct shobj
   unsigned int hashfraction;
   int s_scale;
 
-  void *stab_map;
+  void *symbol_map;
-  size_t stab_mapsize;
+  size_t symbol_mapsize;
-  const char *stab;
+  const ElfW(Sym) *symtab;
-  size_t stab_size;
+  size_t symtab_size;
-  const char *stabstr;
+  const char *strtab;
-  size_t stabstr_size;
 
   struct obstack ob_str;
   struct obstack ob_sym;
@@ -360,8 +348,7 @@ load_shobj (const char *name)
   size_t pagesize = getpagesize ();
   const char *shstrtab;
   int idx;
-  ElfW(Shdr) *stab_entry;
+  ElfW(Shdr) *symtab_entry;
-  ElfW(Shdr) *stabstr_entry;
 
   /* Since we use dlopen() we must be prepared to work around the sometimes
      strange lookup rules for the shared objects.  If we have a file foo.so
@@ -402,9 +389,9 @@ load_shobj (const char *name)
   for (ph = map->l_phdr; ph < &map->l_phdr[map->l_phnum]; ++ph)
     if (ph->p_type == PT_LOAD && (ph->p_flags & PF_X))
       {
-	ElfW(Addr) start = (ph->p_vaddr & ~(_dl_pagesize - 1));
+	ElfW(Addr) start = (ph->p_vaddr & ~(pagesize - 1));
-	ElfW(Addr) end = ((ph->p_vaddr + ph->p_memsz + _dl_pagesize - 1)
+	ElfW(Addr) end = ((ph->p_vaddr + ph->p_memsz + pagesize - 1)
-			  & ~(_dl_pagesize - 1));
+			  & ~(pagesize - 1));
 
 	if (start < mapstart)
 	  mapstart = start;
@@ -480,25 +467,24 @@ load_shobj (const char *name)
   if (do_test)
     printf ("s_scale: %d\n", result->s_scale);
 
-  /* Determine the string table.  */
+  /* Determine the dynamic string table.  */
   if (map->l_info[DT_STRTAB] == NULL)
-    result->strtab = NULL;
+    result->dynstrtab = NULL;
   else
-    result->strtab = (const char *) (map->l_addr
+    result->dynstrtab = (const char *) (map->l_addr
-				     + map->l_info[DT_STRTAB]->d_un.d_ptr);
+					+ map->l_info[DT_STRTAB]->d_un.d_ptr);
   if (do_test)
-    printf ("string table: %p\n", result->strtab);
+    printf ("string table: %p\n", result->dynstrtab);
 
   /* Determine the soname.  */
   if (map->l_info[DT_SONAME] == NULL)
     result->soname = NULL;
   else
-    result->soname = result->strtab + map->l_info[DT_SONAME]->d_un.d_val;
+    result->soname = result->dynstrtab + map->l_info[DT_SONAME]->d_un.d_val;
   if (do_test)
     printf ("soname: %s\n", result->soname);
 
-  /* Now the hard part, we have to load the debugging data.  For now
+  /* Now we have to load the symbol table.
-     we support stabs only.
 
      First load the section header table.  */
   ehdr = (ElfW(Ehdr) *) map->l_addr;
@@ -514,7 +500,7 @@ load_shobj (const char *name)
     error (EXIT_FAILURE, errno, _("Reopening shared object `%s' failed"));
 
   /* Now map the section header.  */
-  ptr = mmap (NULL, (ehdr->e_phnum * sizeof (ElfW(Shdr))
+  ptr = mmap (NULL, (ehdr->e_shnum * sizeof (ElfW(Shdr))
 		     + (ehdr->e_shoff & (pagesize - 1))), PROT_READ,
 	      MAP_SHARED|MAP_FILE, fd, ehdr->e_shoff & ~(pagesize - 1));
   if (ptr == MAP_FAILED)
@@ -532,58 +518,64 @@ load_shobj (const char *name)
   shstrtab = ((const char *) ptr
 	      + (shdr[ehdr->e_shstrndx].sh_offset & (pagesize - 1)));
 
-  /* Search for the ".stab" and ".stabstr" section (and ".rel.stab" ?).  */
+  /* Search for the ".symtab" section.  */
-  stab_entry = NULL;
+  symtab_entry = NULL;
-  stabstr_entry = NULL;
   for (idx = 0; idx < ehdr->e_shnum; ++idx)
-    /* We only have to look for sections which are not loaded.  */
+    if (shdr[idx].sh_type == SHT_SYMTAB
-    if (shdr[idx].sh_addr == 0)
+	&& strcmp (shstrtab + shdr[idx].sh_name, ".symtab") == 0)
       {
-	if (strcmp (shstrtab + shdr[idx].sh_name, ".stab") == 0)
+	symtab_entry = &shdr[idx];
-	  stab_entry = &shdr[idx];
+	break;
-	else if (strcmp (shstrtab + shdr[idx].sh_name, ".stabstr") == 0)
-	  stabstr_entry = &shdr[idx];
       }
 
-  /* We don't need the sectin header string table anymore.  */
+  /* We don't need the section header string table anymore.  */
   munmap (ptr, (shdr[ehdr->e_shstrndx].sh_size
 		+ (shdr[ehdr->e_shstrndx].sh_offset & (pagesize - 1))));
 
-  if (stab_entry == NULL || stabstr_entry == NULL)
+  if (symtab_entry == NULL)
     {
       fprintf (stderr, _("\
 *** The file `%s' is stripped: no detailed analysis possible\n"),
 	      name);
-      result->stab = NULL;
+      result->symtab = NULL;
-      result->stabstr = NULL;
+      result->strtab = NULL;
     }
   else
     {
-      if (stab_entry->sh_offset + stab_entry->sh_size
+      ElfW(Off) min_offset, max_offset;
-	  != stabstr_entry->sh_offset)
+      ElfW(Shdr) *strtab_entry;
-	abort ();
-      if (stab_entry->sh_size % STABSIZE != 0)
-	abort ();
 
-      result->stab_map = mmap (NULL, (stab_entry->sh_size
+      strtab_entry = &shdr[symtab_entry->sh_link];
-				      + stabstr_entry->sh_size
-				      + (stab_entry->sh_offset
-					 & (pagesize - 1))),
-			       PROT_READ, MAP_SHARED|MAP_FILE, fd,
-			       stab_entry->sh_offset & ~(pagesize - 1));
-      if (result->stab_map == NULL)
-	error (EXIT_FAILURE, errno, _("failed to load stab data:"));
 
-      result->stab = ((const char *) result->stab_map
+      /* Find the minimum and maximum offsets that include both the symbol
-		      + (stab_entry->sh_offset & (pagesize - 1)));
+	 table and the string table.  */
-      result->stab_size = stab_entry->sh_size;
+      if (symtab_entry->sh_offset < strtab_entry->sh_offset)
-      result->stabstr = result->stab + stab_entry->sh_size;
+	{
-      result->stabstr_size = stabstr_entry->sh_size;
+	  min_offset = symtab_entry->sh_offset & ~(pagesize - 1);
-      result->stab_mapsize = (stab_entry->sh_size + stabstr_entry->sh_size
+	  max_offset = strtab_entry->sh_offset + strtab_entry->sh_size;
-			      + (stab_entry->sh_offset & (pagesize - 1)));
+	}
+      else
+	{
+	  min_offset = strtab_entry->sh_offset & ~(pagesize - 1);
+	  max_offset = symtab_entry->sh_offset + symtab_entry->sh_size;
+	}
+
+      result->symbol_map = mmap (NULL, max_offset - min_offset,
+				 PROT_READ, MAP_SHARED|MAP_FILE, fd,
+				 min_offset);
+      if (result->symbol_map == NULL)
+	error (EXIT_FAILURE, errno, _("failed to load symbol data"));
+
+      result->symtab
+	= (const ElfW(Sym) *) ((const char *) result->symbol_map
+			       + (symtab_entry->sh_offset - min_offset));
+      result->symtab_size = symtab_entry->sh_size;
+      result->strtab = ((const char *) result->symbol_map
+			+ (strtab_entry->sh_offset - min_offset));
+      result->symbol_mapsize = max_offset - min_offset;
     }
 
-  /* Now we also don't need the sectio header table anymore.  */
+  /* Now we also don't need the section header table anymore.  */
   munmap ((char *) shdr - (ehdr->e_shoff & (pagesize - 1)),
 	  (ehdr->e_phnum * sizeof (ElfW(Shdr))
 	   + (ehdr->e_shoff & (pagesize - 1))));
@@ -598,7 +590,7 @@ load_shobj (const char *name)
 static void
 unload_shobj (struct shobj *shobj)
 {
-  munmap (shobj->stab_map, shobj->stab_mapsize);
+  munmap (shobj->symbol_map, shobj->symbol_mapsize);
   dlclose (shobj->map);
 }
 
@@ -824,7 +816,7 @@ static void
 printsym (const void *node, VISIT value, int level)
 {
   if (value == leaf || value == postorder)
-    sortsym[symidx++] = *(const struct known_symbol **) node;
+    sortsym[symidx++] = *(struct known_symbol **) node;
 }
 
 
@@ -833,9 +825,6 @@ read_symbols (struct shobj *shobj)
 {
   void *load_addr = (void *) shobj->map->l_addr;
   int n = 0;
-  int idx;
-  const char *last_name = NULL;
-  uintptr_t last_addr = 0;
 
   /* Initialize the obstacks.  */
 #define obstack_chunk_alloc malloc
@@ -843,55 +832,33 @@ read_symbols (struct shobj *shobj)
   obstack_init (&shobj->ob_str);
   obstack_init (&shobj->ob_sym);
 
-  /* Process the stabs.  */
+  /* Process the symbols.  */
-  for (idx = 0; idx < shobj->stab_size; idx += 12)
+  if (shobj->symtab)
-    if (*(shobj->stab + idx + TYPEOFF) == N_FUN)
+    {
-      {
+      const ElfW(Sym) *sym = shobj->symtab;
-	const char *str = (shobj->stabstr
+      const ElfW(Sym) *sym_end
-			   + *((uint32_t *) (shobj->stab + idx + STRDXOFF)));
+	= (const ElfW(Sym) *) ((const char *) sym + shobj->symtab_size);
-
+      for (; sym < sym_end; sym++)
-	if (*str != '\0')
+	if ((ELFW(ST_TYPE) (sym->st_info) == STT_FUNC
+	     || ELFW(ST_TYPE) (sym->st_info) == STT_NOTYPE)
+	    && sym->st_size != 0)
 	  {
-	    last_name = str;
+	    struct known_symbol *newsym
-	    last_addr = *((uint32_t *) (shobj->stab + idx + VALOFF));
+	      = (struct known_symbol *) obstack_alloc (&shobj->ob_sym,
-	  }
-	else
-	  {
-	    const char *endp;
-	    char *name0;
-	    struct known_symbol *newsym;
-
-	    if (last_name == NULL)
-	      abort ();
-
-	    endp = strchr (last_name, ':');
-
-	    name0 = (char *) obstack_copy0 (&shobj->ob_str, last_name,
-					    endp - last_name);
-	    if (name0 != NULL)
-	      newsym =
-		(struct known_symbol *) obstack_alloc (&shobj->ob_sym,
 						       sizeof (*newsym));
-	    else
+	    if (newsym == NULL)
-	      /* Keep the stupid compiler happy.  */
-	      newsym = NULL;
-	    if (name0 == NULL || newsym == NULL)
 	      error (EXIT_FAILURE, errno, _("cannot allocate symbol data"));
 
-	    newsym->name = name0;
+	    newsym->name = &shobj->strtab[sym->st_name];
-	    newsym->addr = last_addr;
+	    newsym->addr = sym->st_value;
-	    newsym->size = *((uint32_t *) (shobj->stab + idx + VALOFF));
+	    newsym->size = sym->st_size;
 	    newsym->ticks = 0;
 
 	    tsearch (newsym, &symroot, symorder);
 	    ++n;
-
-	    last_name = NULL;
-	    last_addr = 0;
 	  }
-      }
+    }
-
+  else
-  if (shobj->stab == NULL)
     {
       /* Blarg, the binary is stripped.  We have to rely on the
 	 information contained in the dynamic section of the object.  */

libc.map

@@ -99,13 +99,14 @@ GLIBC_2.0 {
     _rpc_dtablesize; _null_auth; _seterr_reply;
     __res_randomid;  __getpid;
     __strcasecmp; __write; _strerror_internal; _dl_sysdep_output;
+    __ffs;
 
     # Exception handling support functions from libgcc
     __register_frame; __register_frame_table; __deregister_frame;
     __register_frame_info; __deregister_frame_info;
 
     # Profiling support
-    __monstartup; _mcleanup;
+    __monstartup; _mcleanup; __profile_frequency;
 
     # variables in normal name space
     argp_err_exit_status; argp_program_bug_address; argp_program_version;
@@ -455,6 +456,9 @@ GLIBC_2.1 {
     # Changed getline function in libio.
     _IO_getline_info;
 
+    # chown interface change.
+    chown;
+
     # functions in normal name space
     # Please keep them sorted by name!
 

string/string.h

@@ -232,6 +232,7 @@ extern char *rindex __P ((__const char *__s, int __c));
 
 /* Return the position of the first bit set in I, or 0 if none are set.
    The least-significant bit is position 1, the most-significant 32.  */
+extern int __ffs __P ((int __i));
 extern int ffs __P ((int __i));
 
 /* Compare S1 and S2, ignoring case.  */

sysdeps/alpha/ffs.S

@@ -25,7 +25,7 @@
 	.set noreorder
 	.set noat
 
-ENTRY(ffs)
+ENTRY(__ffs)
 #ifdef PROF
 	ldgp	gp, 0(pv)
 	lda	AT, _mcount
@@ -69,4 +69,5 @@ ENTRY(ffs)
 
 $done:	ret
 
-	END(ffs)
+	END(__ffs)
+weak_alias (__ffs, ffs)

sysdeps/am29k/ffs.c

@@ -26,7 +26,7 @@
 #ifdef	__GNUC__
 
 int
-ffs (x)
+__ffs (x)
      int x;
 {
   int cnt;
@@ -35,6 +35,7 @@ ffs (x)
 
   return 32 - cnt;
 }
+weak_alias (__ffs, ffs)
 
 #else
 #include <sysdeps/generic/ffs.c>

sysdeps/generic/ffs.c

@@ -24,7 +24,7 @@
 
 /* Find the first bit set in I.  */
 int
-ffs (i)
+__ffs (i)
      int i;
 {
   static const unsigned char table[] =
@@ -45,3 +45,4 @@ ffs (i)
 
   return table[x >> a] + a;
 }
+weak_alias (__ffs, ffs)

sysdeps/i386/ffs.c

@@ -26,7 +26,7 @@
 #ifdef	__GNUC__
 
 int
-ffs (x)
+__ffs (x)
      int x;
 {
   int cnt;
@@ -40,6 +40,7 @@ ffs (x)
 
   return cnt;
 }
+weak_alias (__ffs, ffs)
 
 #else
 #include <sysdeps/generic/ffs.c>

sysdeps/i960/ffs.c

@@ -27,7 +27,7 @@
 #if	defined (__GNUC__) && defined (__i960__)
 
 int
-ffs (x)
+__ffs (x)
      int x;
 {
   int cnt;
@@ -36,6 +36,7 @@ ffs (x)
 
   return cnt;
 }
+weak_alias (__ffs, ffs)
 
 #else
 

sysdeps/m68k/ffs.c

@@ -26,7 +26,7 @@
 #if	defined (__GNUC__) && defined (__mc68020__)
 
 int
-ffs (x)
+__ffs (x)
      int x;
 {
   int cnt;
@@ -35,6 +35,7 @@ ffs (x)
 
   return 32 - cnt;
 }
+weak_alias (__ffs, ffs)
 
 #else
 

sysdeps/m88k/ffs.c

@@ -26,7 +26,7 @@
 #ifdef	__GNUC__
 
 int
-ffs (x)
+__ffs (x)
      int x;
 {
   int cnt;
@@ -37,6 +37,7 @@ ffs (x)
   asm ("ff1 %0,%1" : "=r" (cnt) : "r" (x & -x));
   return cnt + 1;
 }
+weak_alias (__ffs, ffs)
 
 #else
 #include <sysdeps/generic/ffs.c>

sysdeps/powerpc/ffs.c

@@ -21,10 +21,11 @@
 #include <string.h>
 
 int
-ffs (int x)
+__ffs (int x)
 {
   int cnt;
 
   asm ("cntlzw %0,%1" : "=r" (cnt) : "r" (x & -x));
   return 32 - cnt;
 }
+weak_alias (__ffs, ffs)

sysdeps/rs6000/ffs.c

@@ -26,7 +26,7 @@
 #ifdef	__GNUC__
 
 int
-ffs (x)
+__ffs (x)
      int x;
 {
   int cnt;
@@ -34,6 +34,7 @@ ffs (x)
   asm ("cntlz %0,%1" : "=r" (cnt) : "r" (x & -x));
   return 32 - cnt;
 }
+weak_alias (__ffs, ffs)
 
 #else
 #include <sysdeps/generic/ffs.c>

sysdeps/unix/sysv/linux/i386/chown.c

@@ -0,0 +1,95 @@
+/* Copyright (C) 1998 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 <errno.h>
+#include <unistd.h>
+#include <sys/syscall.h>
+
+/*
+  In Linux 2.1.x the chown functions have been changed.  A new function lchown
+  was introduced.  The new chown now follows symlinks - the old chown and the
+  new lchown do not follow symlinks.
+  The new lchown function has the same number as the old chown had and the
+  new chown has a new number.  When compiling with headers from Linux > 2.1.8x
+  it's impossible to run this libc with older kernels.  In these cases libc
+  has therefore to route calls to chown to the old chown function.
+*/
+
+extern int __syscall_chown (const char *__file,
+			    uid_t __owner, gid_t __group);
+#ifdef __NR_lchown
+/* running under Linux 2.0 or < 2.1.8x */
+static int __libc_old_chown;
+
+
+int
+__real_chown (const char *file, uid_t owner, gid_t group)
+{
+  int result;
+
+  if (!__libc_old_chown)
+    {
+      int saved_errno = errno;
+      result = __syscall_chown (file, owner, group);
+
+      if (result >= 0 || errno != ENOSYS)
+	return result;
+
+      __set_errno (saved_errno);
+      __libc_old_chown = 1;
+    }
+
+  return __lchown (file, owner, group);
+}
+#endif
+
+
+#if !defined __NR_lchown || \
+    (defined HAVE_ELF && defined PIC && defined DO_VERSIONING)
+/* compiling under older kernels or for compatibiity */
+int
+__chown_is_lchown (const char *file, uid_t owner, gid_t group)
+{
+  return __lchown (file, owner, group);
+}
+#endif
+
+#if defined HAVE_ELF && defined PIC && defined DO_VERSIONING
+strong_alias (__chown_is_lchown, _chown_is_lchown)
+symbol_version (__chown_is_lchown, __chown, GLIBC_2.0);
+symbol_version (_chown_is_lchown, chown, GLIBC_2.0);
+
+# ifdef __NR_lchown
+strong_alias (__real_chown, _real_chown)
+default_symbol_version (__real_chown, __chown, GLIBC_2.1);
+default_symbol_version (_real_chown, chown, GLIBC_2.1);
+# else
+strong_alias (__chown_is_lchown, __chown_is_lchown21)
+strong_alias (__chown_is_lchown, _chown_is_lchown21)
+default_symbol_version (__chown_is_lchown21, __chown, GLIBC_2.1);
+default_symbol_version (_chown_is_lchown21, chown, GLIBC_2.1);
+# endif
+#else
+# ifdef __NR_lchown
+strong_alias (__real_chown, __chown)
+weak_alias (__real_chown, chown)
+# else
+strong_alias (__chown_is_lchown, __chown)
+weak_alias (__chown_is_lchown, chown)
+# endif
+#endif

sysdeps/unix/sysv/linux/i386/syscalls.list

@@ -1,5 +1,6 @@
 # File name	Caller	Syscall name	# args	Strong name	Weak names
 
+s_chown		chown	chown		3	__syscall_chown
 s_getgroups	getgroups getgroups	2	__syscall_getgroups
 s_llseek	llseek	_llseek		5	__sys_llseek
 s_setgroups	setgroups setgroups	2	__syscall_setgroups

sysdeps/unix/sysv/linux/syscalls.list

@@ -40,7 +40,6 @@ rt_sigprocmask	-	rt_sigprocmask	4	__syscall_rt_sigprocmask
 rt_sigqueueinfo	-	rt_sigqueueinfo	3	__syscall_rt_sigqueueinfo
 rt_sigsuspend	-	rt_sigsuspend	2	__syscall_rt_sigsuspend
 rt_sigtimedwait	-	rt_sigtimedwait	4	__syscall_rt_sigtimedwait
-s_chown		chown	chown		3	__syscall_chown
 s_getdents	EXTRA	getdents	3	__getdents
 s_getpriority	getpriority getpriority	2	__syscall_getpriority
 s_getresgid	getresgid getresgid	3	__syscall_getresgid

sysdeps/vax/ffs.s

@@ -39,10 +39,11 @@
 
 #include "DEFS.h"
 
-ENTRY(ffs, 0)
+ENTRY(__ffs, 0)
 	ffs	$0,$32,4(ap),r0
 	bneq	1f
 	mnegl	$1,r0
 1:
 	incl	r0
 	ret
+weak_alias (__ffs, ffs)