-/* `sln' program to create symboblic links between files.
- Copyright (C) 1998 Free Software Foundation, Inc.
+/* `sln' program to create symbolic links between files.
+ Copyright (C) 1998-2019 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.
+ 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
- Library General Public License for more details.
+ Lesser 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. */
-\f
+ You should have received a copy of the GNU Lesser General Public
+ License along with the GNU C Library; if not, see
+ <http://www.gnu.org/licenses/>. */
+
+#include <error.h>
+#include <errno.h>
+#include <libintl.h>
+#include <locale.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <unistd.h>
#include <string.h>
#include <limits.h>
-#if !defined(S_ISDIR) && defined(S_IFDIR)
-#define S_ISDIR(m) (((m) & S_IFMT) == S_IFDIR)
-#endif
+#include "../version.h"
-static int makesymlink __P ((const char *src, const char *dest));
-static int makesymlinks __P ((const char *file));
+#define PACKAGE _libc_intl_domainname
+
+static int makesymlink (const char *src, const char *dest);
+static int makesymlinks (const char *file);
+static void usage (void);
int
main (int argc, char **argv)
{
+ /* Set locale via LC_ALL. */
+ setlocale (LC_ALL, "");
+
+ /* Set the text message domain. */
+ textdomain (PACKAGE);
+
switch (argc)
{
case 2:
- return makesymlinks (argv [1]) == 0 ? 0 : 1;
+ if (strcmp (argv[1], "--version") == 0) {
+ printf ("sln %s%s\n", PKGVERSION, 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]) == 0 ? 0 : 1;
+ return makesymlink (argv [1], argv [2]);
break;
default:
- printf ("Usage: %s src dest|file\n", argv [0]);
+ usage ();
return 1;
break;
}
}
+static void
+usage (void)
+{
+ printf (_("Usage: sln src dest|file\n\n"));
+ printf (_("For bug reporting instructions, please see:\n\
+%s.\n"), REPORT_BUGS_TO);
+}
+
static int
-makesymlinks (file)
- const char *file;
+makesymlinks (const char *file)
{
-#ifndef PATH_MAX
-#define PATH_MAX 4095
-#endif
- char buffer [PATH_MAX * 4];
- int i, ret, len;
+ char *buffer = NULL;
+ size_t bufferlen = 0;
+ int ret;
int lineno;
- const char *src;
- const char *dest;
- const char *error;
FILE *fp;
- fp = fopen (file, "r");
- if (fp == NULL)
+ if (strcmp (file, "-") == 0)
+ fp = stdin;
+ else
{
- error = strerror (errno);
- fprintf (stderr, "%s: file open error: %s\n", file, error);
- return -1;
+ fp = fopen (file, "r");
+ if (fp == NULL)
+ {
+ fprintf (stderr, _("%s: file open error: %m\n"), file);
+ return 1;
+ }
}
ret = 0;
lineno = 0;
- while (fgets (buffer, sizeof (buffer) - 1, fp))
+ while (!feof_unlocked (fp))
{
- lineno++;
- src = dest = NULL;
- buffer [sizeof (buffer) - 1] = '\0';
- len = strlen (buffer);
- for (i = 0; i < len && isspace (buffer [i]); i++);
- if (i >= len)
- {
- fprintf (stderr, "Fail to parse line %d: \"%s\"\n", lineno,
- buffer);
- ret--;
- continue;
- }
-
- src = &buffer [i];
- for (; i < len && !isspace (buffer [i]); i++);
- if (i < len)
+ 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')
{
- buffer [i++] = '\0';
- for (; i < len && isspace (buffer [i]); i++);
- if (i >= len)
- {
- fprintf (stderr, "No target in line %d: \"%s\"\n", lineno,
- buffer);
- ret--;
- continue;
- }
- dest = &buffer [i];
- for (; i < len && !isspace (buffer [i]); i++);
- buffer [i] = '\0';
- }
- else
- {
- fprintf (stderr, "No target in line %d: \"%s\"\n", lineno,
- buffer);
- ret--;
+ fprintf (stderr, _("No target in line %d\n"), lineno);
+ ret = 1;
continue;
}
+ dest = cp;
- if (makesymlink (src, dest))
- {
- fprintf (stderr, "Failed to make link from \"%s\" to \"%s\" in line %d\n",
- src, dest, lineno);
- ret--;
- }
+ do
+ ++cp;
+ while (*cp != '\0' && ! isspace (*cp));
+ if (*cp != '\0')
+ *cp++ = '\0';
+
+ ret |= makesymlink (src, dest);
}
fclose (fp);
}
static int
-makesymlink (src, dest)
- const char *src;
- const char *dest;
+makesymlink (const char *src, const char *dest)
{
- struct stat stats;
+ struct stat64 stats;
const char *error;
/* Destination must not be a directory. */
- if (lstat (dest, &stats) == 0)
+ if (lstat64 (dest, &stats) == 0)
{
if (S_ISDIR (stats.st_mode))
{
- fprintf (stderr, "%s: destination must not be a directory\n",
- dest);
- return -1;
+ 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;
+ 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);
+ fprintf (stderr, _("%s: invalid destination: %s\n"), dest, error);
return -1;
}
-#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;
+ 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;
+ fprintf (stderr, _("Invalid link from \"%s\" to \"%s\": %s\n"),
+ src, dest, error);
+ return 1;
}
}