glibc/elf/sln.c

222 lines
4.6 KiB
C
Raw Normal View History

/* `sln' program to create symbolic links between files.
Copyright (C) 1998, 1999, 2001, 2009 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 Lesser General Public
License as published by the Free Software Foundation; either
version 2.1 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
Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public
License along with the GNU C Library; if not, write to the Free
Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
02111-1307 USA. */
#ifdef HAVE_CONFIG_H
# include "config.h"
#endif
#include <error.h>
#include <errno.h>
#include <libintl.h>
#include <locale.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <unistd.h>
#include <errno.h>
#include <ctype.h>
#include <stdio.h>
#include <string.h>
#include <limits.h>
#include "../version.h"
#define PACKAGE _libc_intl_domainname
#if !defined S_ISDIR && defined S_IFDIR
#define S_ISDIR(m) (((m) & S_IFMT) == S_IFDIR)
#endif
static int makesymlink (const char *src, const char *dest);
static int makesymlinks (const char *file);
static void usage (void);
int
Update. 1998-08-20 16:01 Ulrich Drepper <drepper@cygnus.com> * elf/ldd.sh.in: Redirect warnings and error messages to stderr. * elf/ldd.bash.in: Likewise. * elf/sln.c: Avoid warning for no main prototype. * sysdeps/unix/sysv/linux/alpha/bits/fcntl.h: Remove O_READ and O_WRITE. * sysdeps/unix/sysv/linux/mips/bits/fcntl.h: Likewise. * sysdeps/unix/sysv/linux/sparc/bits/fcntl.h: Likewise. * sysdeps/unix/sysv/linux/alpha/bits/fcntl.h: Add F_SETSIG and F_GETSIG. * sysdeps/unix/sysv/linux/bits/fcntl.h: Likewise. * sysdeps/unix/sysv/linux/mips/bits/fcntl.h: Likewise. * sysdeps/unix/sysv/linux/sparc/bits/fcntl.h: Likewise. 1998-08-20 Philip Blundell <pb@nexus.co.uk> * sysdeps/arm/fpu/ieee754.h: Move to... * sysdeps/arm/ieee754.h: ... here. * sysdeps/arm/__longjmp.S: Put return value in correct register. Don't set the condition flags unnecessarily. * sysdeps/arm/fpu/__longjmp.S: Likewise. Restore floating point registers correctly. * sysdeps/arm/dl-machine.h: Fix problems with profiling code (patch from Scott Bambrough). * sysdeps/arm/sysdep.h (CALL_MCOUNT): Add missing semicolons. * csu/initfini.c (_init): Don't check whether __gmon_start__ is NULL, just call it unconditionally. (__gmon_start__): Provide stub version as a weak symbol. 1998-07-30 Philip Blundell <philb@gnu.org> * sysdeps/unix/sysv/linux/arm/init-first.h: New file (from patch by Scott Bambrough) * sysdeps/unix/sysv/linux/arm/errlist.c: New file; ARM tools don't like `@' in .type directives. * sysdeps/arm/bsd-setjmp.S: Use PLT for procedure call. * sysdeps/arm/bsd-_setjmp.S: Likewise. * sysdeps/arm/dl-machine.h: Set __libc_stack_end. 1998-08-20 Andreas Jaeger <aj@arthur.rhein-neckar.de> * sysdeps/unix/sysv/linux/mips/bits/fcntl.h (F_SETOWN): Correct value. (F_GETOWN): Likewise. * sysdeps/unix/sysv/linux/bits/siginfo.h (SI_SIGIO): Add it (from Linux 2.1.117). 1998-08-20 Ulrich Drepper <drepper@cygnus.com> * sysdeps/generic/glob.c [_LIBC]: Define __stat only if not already defined. 1998-08-14 Thorsten Kukuk <kukuk@vt.uni-paderborn.de> * nis/nss_compat/compat-grp.c: Set errno to ENOENT if we have no more entries. * nis/nss_compat/compat-initgroups.c: Likewise. * nis/nss_compat/compat-pwd.c: Likewise. * nis/nss_compat/compat-spwd.c: Likewise. * nis/nss_nis/nis-alias.c: Likewise. * nis/nss_nis/nis-ethers.c: Likewise. * nis/nss_nis/nis-grp.c: Likewise. * nis/nss_nis/nis-hosts.c: Likewise. * nis/nss_nis/nis-initgroups.c: Likewise. * nis/nss_nis/nis-network.c: Likewise. * nis/nss_nis/nis-proto.c: Likewise. * nis/nss_nis/nis-pwd.c: Likewise. * nis/nss_nis/nis-rpc.c: Likewise. * nis/nss_nis/nis-service.c: Likewise. * nis/nss_nis/nis-spwd.c: Likewise. * nis/rpcsvc/yp.h: Generate new without 1024 byte limits. * nis/ypclnt.c: Try binding dir only first time, could be to old. * nis/yp_xdr.c: Remove 1024 byte limit. * nis/ypupdate_xdr.c: Likewise. * nis/nss_nis/nis-publickey.c: Make sure, nobody could send wrong data.
1998-08-20 19:40:36 +02:00
main (int argc, char **argv)
{
/* Set locale via LC_ALL. */
setlocale (LC_ALL, "");
/* Set the text message domain. */
textdomain (PACKAGE);
switch (argc)
{
case 2:
if (strcmp (argv[1], "--version") == 0) {
printf ("sln (GNU libc) %s\n", VERSION);
return 0;
} else if (strcmp (argv[1], "--help") == 0) {
usage ();
return 0;
}
return makesymlinks (argv [1]);
break;
case 3:
return makesymlink (argv [1], argv [2]);
break;
default:
usage ();
return 1;
break;
}
}
static void
usage (void)
{
printf (_("Usage: sln src dest|file\n\n"));
printf (_("For bug reporting instructions, please see:\n\
<http://www.gnu.org/software/libc/bugs.html>.\n"));
}
static int
makesymlinks (file)
const char *file;
{
#ifndef PATH_MAX
#define PATH_MAX 4095
#endif
char *buffer = NULL;
size_t bufferlen = 0;
int ret;
int lineno;
FILE *fp;
if (strcmp (file, "-") == 0)
fp = stdin;
else
{
fp = fopen (file, "r");
if (fp == NULL)
{
fprintf (stderr, _("%s: file open error: %m\n"), file);
return 1;
}
}
ret = 0;
lineno = 0;
while (!feof_unlocked (fp))
{
ssize_t n = getline (&buffer, &bufferlen, fp);
char *src;
char *dest;
char *cp = buffer;
if (n < 0)
break;
if (buffer[n - 1] == '\n')
buffer[n - 1] = '\0';
++lineno;
while (isspace (*cp))
++cp;
if (*cp == '\0')
/* Ignore empty lines. */
continue;
src = cp;
do
++cp;
while (*cp != '\0' && ! isspace (*cp));
if (*cp != '\0')
*cp++ = '\0';
while (isspace (*cp))
++cp;
if (*cp == '\0')
{
fprintf (stderr, _("No target in line %d\n"), lineno);
ret = 1;
continue;
}
dest = cp;
do
++cp;
while (*cp != '\0' && ! isspace (*cp));
if (*cp != '\0')
*cp++ = '\0';
ret |= makesymlink (src, dest);
}
fclose (fp);
return ret;
}
static int
makesymlink (src, dest)
const char *src;
const char *dest;
{
struct stat stats;
const char *error;
/* Destination must not be a directory. */
if (lstat (dest, &stats) == 0)
{
if (S_ISDIR (stats.st_mode))
{
fprintf (stderr, _("%s: destination must not be a directory\n"),
dest);
return 1;
}
else if (unlink (dest) && errno != ENOENT)
{
fprintf (stderr, _("%s: failed to remove the old destination\n"),
dest);
return 1;
}
}
else if (errno != ENOENT)
{
error = strerror (errno);
fprintf (stderr, _("%s: invalid destination: %s\n"), dest, error);
return -1;
}
Update. 1998-08-20 16:01 Ulrich Drepper <drepper@cygnus.com> * elf/ldd.sh.in: Redirect warnings and error messages to stderr. * elf/ldd.bash.in: Likewise. * elf/sln.c: Avoid warning for no main prototype. * sysdeps/unix/sysv/linux/alpha/bits/fcntl.h: Remove O_READ and O_WRITE. * sysdeps/unix/sysv/linux/mips/bits/fcntl.h: Likewise. * sysdeps/unix/sysv/linux/sparc/bits/fcntl.h: Likewise. * sysdeps/unix/sysv/linux/alpha/bits/fcntl.h: Add F_SETSIG and F_GETSIG. * sysdeps/unix/sysv/linux/bits/fcntl.h: Likewise. * sysdeps/unix/sysv/linux/mips/bits/fcntl.h: Likewise. * sysdeps/unix/sysv/linux/sparc/bits/fcntl.h: Likewise. 1998-08-20 Philip Blundell <pb@nexus.co.uk> * sysdeps/arm/fpu/ieee754.h: Move to... * sysdeps/arm/ieee754.h: ... here. * sysdeps/arm/__longjmp.S: Put return value in correct register. Don't set the condition flags unnecessarily. * sysdeps/arm/fpu/__longjmp.S: Likewise. Restore floating point registers correctly. * sysdeps/arm/dl-machine.h: Fix problems with profiling code (patch from Scott Bambrough). * sysdeps/arm/sysdep.h (CALL_MCOUNT): Add missing semicolons. * csu/initfini.c (_init): Don't check whether __gmon_start__ is NULL, just call it unconditionally. (__gmon_start__): Provide stub version as a weak symbol. 1998-07-30 Philip Blundell <philb@gnu.org> * sysdeps/unix/sysv/linux/arm/init-first.h: New file (from patch by Scott Bambrough) * sysdeps/unix/sysv/linux/arm/errlist.c: New file; ARM tools don't like `@' in .type directives. * sysdeps/arm/bsd-setjmp.S: Use PLT for procedure call. * sysdeps/arm/bsd-_setjmp.S: Likewise. * sysdeps/arm/dl-machine.h: Set __libc_stack_end. 1998-08-20 Andreas Jaeger <aj@arthur.rhein-neckar.de> * sysdeps/unix/sysv/linux/mips/bits/fcntl.h (F_SETOWN): Correct value. (F_GETOWN): Likewise. * sysdeps/unix/sysv/linux/bits/siginfo.h (SI_SIGIO): Add it (from Linux 2.1.117). 1998-08-20 Ulrich Drepper <drepper@cygnus.com> * sysdeps/generic/glob.c [_LIBC]: Define __stat only if not already defined. 1998-08-14 Thorsten Kukuk <kukuk@vt.uni-paderborn.de> * nis/nss_compat/compat-grp.c: Set errno to ENOENT if we have no more entries. * nis/nss_compat/compat-initgroups.c: Likewise. * nis/nss_compat/compat-pwd.c: Likewise. * nis/nss_compat/compat-spwd.c: Likewise. * nis/nss_nis/nis-alias.c: Likewise. * nis/nss_nis/nis-ethers.c: Likewise. * nis/nss_nis/nis-grp.c: Likewise. * nis/nss_nis/nis-hosts.c: Likewise. * nis/nss_nis/nis-initgroups.c: Likewise. * nis/nss_nis/nis-network.c: Likewise. * nis/nss_nis/nis-proto.c: Likewise. * nis/nss_nis/nis-pwd.c: Likewise. * nis/nss_nis/nis-rpc.c: Likewise. * nis/nss_nis/nis-service.c: Likewise. * nis/nss_nis/nis-spwd.c: Likewise. * nis/rpcsvc/yp.h: Generate new without 1024 byte limits. * nis/ypclnt.c: Try binding dir only first time, could be to old. * nis/yp_xdr.c: Remove 1024 byte limit. * nis/ypupdate_xdr.c: Likewise. * nis/nss_nis/nis-publickey.c: Make sure, nobody could send wrong data.
1998-08-20 19:40:36 +02:00
#ifdef S_ISLNK
if (symlink (src, dest) == 0)
#else
if (link (src, dest) == 0)
#endif
{
/* Destination must exist by now. */
if (access (dest, F_OK))
{
error = strerror (errno);
unlink (dest);
fprintf (stderr, _("Invalid link from \"%s\" to \"%s\": %s\n"),
src, dest, error);
return 1;
}
return 0;
}
else
{
error = strerror (errno);
fprintf (stderr, _("Invalid link from \"%s\" to \"%s\": %s\n"),
src, dest, error);
return 1;
}
}