2001-02-27 18:59:27 +01:00
|
|
|
/* `sln' program to create symbolic links between files.
|
2016-01-04 17:05:18 +01:00
|
|
|
Copyright (C) 1998-2016 Free Software Foundation, Inc.
|
1998-08-13 21:44:05 +02:00
|
|
|
This file is part of the GNU C Library.
|
|
|
|
|
|
|
|
The GNU C Library is free software; you can redistribute it and/or
|
2001-07-06 06:58:11 +02:00
|
|
|
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.
|
1998-08-13 21:44:05 +02:00
|
|
|
|
|
|
|
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
|
2001-07-06 06:58:11 +02:00
|
|
|
Lesser General Public License for more details.
|
1998-08-13 21:44:05 +02:00
|
|
|
|
2001-07-06 06:58:11 +02:00
|
|
|
You should have received a copy of the GNU Lesser General Public
|
2012-02-10 00:18:22 +01:00
|
|
|
License along with the GNU C Library; if not, see
|
|
|
|
<http://www.gnu.org/licenses/>. */
|
2009-02-06 21:13:07 +01:00
|
|
|
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
|
|
# include "config.h"
|
|
|
|
#endif
|
|
|
|
|
2001-02-27 18:59:27 +01:00
|
|
|
#include <error.h>
|
|
|
|
#include <errno.h>
|
2009-02-06 21:13:07 +01:00
|
|
|
#include <libintl.h>
|
|
|
|
#include <locale.h>
|
1998-08-13 21:44:05 +02:00
|
|
|
#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>
|
|
|
|
|
2009-02-06 21:13:07 +01:00
|
|
|
#include "../version.h"
|
|
|
|
|
|
|
|
#define PACKAGE _libc_intl_domainname
|
|
|
|
|
2001-02-27 18:59:27 +01:00
|
|
|
#if !defined S_ISDIR && defined S_IFDIR
|
1998-08-13 21:44:05 +02:00
|
|
|
#define S_ISDIR(m) (((m) & S_IFMT) == S_IFDIR)
|
|
|
|
#endif
|
|
|
|
|
1999-12-31 19:51:25 +01:00
|
|
|
static int makesymlink (const char *src, const char *dest);
|
|
|
|
static int makesymlinks (const char *file);
|
2009-02-06 21:13:07 +01:00
|
|
|
static void usage (void);
|
1998-08-13 21:44:05 +02:00
|
|
|
|
|
|
|
int
|
1998-08-20 19:40:36 +02:00
|
|
|
main (int argc, char **argv)
|
1998-08-13 21:44:05 +02:00
|
|
|
{
|
2009-02-06 21:13:07 +01:00
|
|
|
/* Set locale via LC_ALL. */
|
|
|
|
setlocale (LC_ALL, "");
|
|
|
|
|
|
|
|
/* Set the text message domain. */
|
|
|
|
textdomain (PACKAGE);
|
|
|
|
|
1998-08-13 21:44:05 +02:00
|
|
|
switch (argc)
|
|
|
|
{
|
|
|
|
case 2:
|
2009-02-06 21:13:07 +01:00
|
|
|
if (strcmp (argv[1], "--version") == 0) {
|
2012-11-09 23:13:45 +01:00
|
|
|
printf ("sln %s%s\n", PKGVERSION, VERSION);
|
2009-02-06 21:13:07 +01:00
|
|
|
return 0;
|
|
|
|
} else if (strcmp (argv[1], "--help") == 0) {
|
|
|
|
usage ();
|
|
|
|
return 0;
|
|
|
|
}
|
2001-02-27 18:59:27 +01:00
|
|
|
return makesymlinks (argv [1]);
|
1998-08-13 21:44:05 +02:00
|
|
|
break;
|
|
|
|
|
|
|
|
case 3:
|
2001-02-27 18:59:27 +01:00
|
|
|
return makesymlink (argv [1], argv [2]);
|
1998-08-13 21:44:05 +02:00
|
|
|
break;
|
|
|
|
|
|
|
|
default:
|
2009-02-06 21:13:07 +01:00
|
|
|
usage ();
|
1998-08-13 21:44:05 +02:00
|
|
|
return 1;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-02-06 21:13:07 +01:00
|
|
|
static void
|
|
|
|
usage (void)
|
|
|
|
{
|
|
|
|
printf (_("Usage: sln src dest|file\n\n"));
|
2012-11-09 23:13:45 +01:00
|
|
|
printf (_("For bug reporting instructions, please see:\n\
|
|
|
|
%s.\n"), REPORT_BUGS_TO);
|
2009-02-06 21:13:07 +01:00
|
|
|
}
|
|
|
|
|
1998-08-13 21:44:05 +02:00
|
|
|
static int
|
2015-10-16 22:21:49 +02:00
|
|
|
makesymlinks (const char *file)
|
1998-08-13 21:44:05 +02:00
|
|
|
{
|
|
|
|
#ifndef PATH_MAX
|
|
|
|
#define PATH_MAX 4095
|
|
|
|
#endif
|
2001-02-27 18:59:27 +01:00
|
|
|
char *buffer = NULL;
|
|
|
|
size_t bufferlen = 0;
|
|
|
|
int ret;
|
1998-08-13 21:44:05 +02:00
|
|
|
int lineno;
|
|
|
|
FILE *fp;
|
|
|
|
|
2001-02-27 18:59:27 +01:00
|
|
|
if (strcmp (file, "-") == 0)
|
|
|
|
fp = stdin;
|
|
|
|
else
|
1998-08-13 21:44:05 +02:00
|
|
|
{
|
2001-02-27 18:59:27 +01:00
|
|
|
fp = fopen (file, "r");
|
|
|
|
if (fp == NULL)
|
|
|
|
{
|
2009-02-06 21:13:07 +01:00
|
|
|
fprintf (stderr, _("%s: file open error: %m\n"), file);
|
2001-02-27 18:59:27 +01:00
|
|
|
return 1;
|
|
|
|
}
|
1998-08-13 21:44:05 +02:00
|
|
|
}
|
|
|
|
|
|
|
|
ret = 0;
|
|
|
|
lineno = 0;
|
2001-02-27 18:59:27 +01:00
|
|
|
while (!feof_unlocked (fp))
|
1998-08-13 21:44:05 +02:00
|
|
|
{
|
2001-02-27 18:59:27 +01:00
|
|
|
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')
|
1998-08-13 21:44:05 +02:00
|
|
|
{
|
2009-02-06 21:13:07 +01:00
|
|
|
fprintf (stderr, _("No target in line %d\n"), lineno);
|
2001-02-27 18:59:27 +01:00
|
|
|
ret = 1;
|
1998-08-13 21:44:05 +02:00
|
|
|
continue;
|
|
|
|
}
|
2001-02-27 18:59:27 +01:00
|
|
|
dest = cp;
|
1998-08-13 21:44:05 +02:00
|
|
|
|
2001-02-27 18:59:27 +01:00
|
|
|
do
|
|
|
|
++cp;
|
|
|
|
while (*cp != '\0' && ! isspace (*cp));
|
|
|
|
if (*cp != '\0')
|
|
|
|
*cp++ = '\0';
|
|
|
|
|
|
|
|
ret |= makesymlink (src, dest);
|
1998-08-13 21:44:05 +02:00
|
|
|
}
|
|
|
|
fclose (fp);
|
|
|
|
|
|
|
|
return ret;
|
|
|
|
}
|
|
|
|
|
|
|
|
static int
|
2015-10-16 22:21:49 +02:00
|
|
|
makesymlink (const char *src, const char *dest)
|
1998-08-13 21:44:05 +02:00
|
|
|
{
|
|
|
|
struct stat stats;
|
|
|
|
const char *error;
|
|
|
|
|
|
|
|
/* Destination must not be a directory. */
|
|
|
|
if (lstat (dest, &stats) == 0)
|
|
|
|
{
|
|
|
|
if (S_ISDIR (stats.st_mode))
|
|
|
|
{
|
2009-02-06 21:13:07 +01:00
|
|
|
fprintf (stderr, _("%s: destination must not be a directory\n"),
|
2013-06-06 19:36:03 +02:00
|
|
|
dest);
|
2001-02-27 18:59:27 +01:00
|
|
|
return 1;
|
1998-08-13 21:44:05 +02:00
|
|
|
}
|
|
|
|
else if (unlink (dest) && errno != ENOENT)
|
|
|
|
{
|
2009-02-06 21:13:07 +01:00
|
|
|
fprintf (stderr, _("%s: failed to remove the old destination\n"),
|
2013-06-06 19:36:03 +02:00
|
|
|
dest);
|
2001-02-27 18:59:27 +01:00
|
|
|
return 1;
|
1998-08-13 21:44:05 +02:00
|
|
|
}
|
|
|
|
}
|
|
|
|
else if (errno != ENOENT)
|
|
|
|
{
|
|
|
|
error = strerror (errno);
|
2009-02-06 21:13:07 +01:00
|
|
|
fprintf (stderr, _("%s: invalid destination: %s\n"), dest, error);
|
1998-08-13 21:44:05 +02:00
|
|
|
return -1;
|
|
|
|
}
|
1998-08-20 19:40:36 +02:00
|
|
|
|
1998-08-13 21:44:05 +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);
|
2009-02-06 21:13:07 +01:00
|
|
|
fprintf (stderr, _("Invalid link from \"%s\" to \"%s\": %s\n"),
|
2013-06-06 19:36:03 +02:00
|
|
|
src, dest, error);
|
2001-02-27 18:59:27 +01:00
|
|
|
return 1;
|
1998-08-13 21:44:05 +02:00
|
|
|
}
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
|
|
|
error = strerror (errno);
|
2009-02-06 21:13:07 +01:00
|
|
|
fprintf (stderr, _("Invalid link from \"%s\" to \"%s\": %s\n"),
|
2013-06-06 19:36:03 +02:00
|
|
|
src, dest, error);
|
2001-02-27 18:59:27 +01:00
|
|
|
return 1;
|
1998-08-13 21:44:05 +02:00
|
|
|
}
|
|
|
|
}
|