Initial revision

CVS patchset: 961
CVS date: 1996/08/19 17:08:21

diff --git a/misc/Makefile.in b/misc/Makefile.in
new file mode 100644 (file)
index 0000000..813561e
--- /dev/null
+++ b/misc/Makefile.in
@@ -0,0 +1,41 @@
+CC = @CC@
+CPP = @CPP@
+
+srcdir = @srcdir@
+VPATH = $(srcdir)
+
+LIBOBJECTS = @REALPATH@ @FTW@ @GETOPT@ @GETOPT1@
+LIBMISC = libmisc.a
+AR = ar r
+RANLIB = ranlib
+
+# -----------------------------------------------------------------------
+
+ifeq (.depend,$(wildcard .depend))
+TARGET=everything
+else
+TARGET=depend everything
+endif
+
+all: $(TARGET)
+
+everything: $(LIBMISC)
+
+$(LIBMISC): $(LIBOBJECTS) 
+       $(AR) $@ $(LIBOBJECTS)
+       $(RANLIB) $@
+
+$(PROGS): $(LIBOBJECTS)
+
+clean:
+       rm -f *.a *.o *~ $(PROGS)
+
+realclean: clean
+       rm -f .depend Makefile
+
+depend:
+       $(CPP) $(CFLAGS) -M $(srcdir)/*.c > .depend
+
+ifeq (.depend,$(wildcard .depend))
+include .depend
+endif

diff --git a/misc/realpath.c b/misc/realpath.c
new file mode 100644 (file)
index 0000000..51136ed
--- /dev/null
+++ b/misc/realpath.c
@@ -0,0 +1,167 @@
+/*
+ * realpath.c -- canonicalize pathname by removing symlinks
+ * Copyright (C) 1993 Rick Sladkey <jrs@world.std.com>
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU Library Public License as published by
+ * the Free Software Foundation; either version 2, or (at your option)
+ * any later version.
+ *
+ * This program 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 Public License for more details.
+ */
+
+#ifdef HAVE_CONFIG_H
+#include <config.h>
+#endif
+
+#include <sys/types.h>
+#if defined(HAVE_UNISTD_H) || defined(STDC_HEADERS)
+#include <unistd.h>
+#endif
+#include <stdio.h>
+#ifdef HAVE_STRING_H
+#include <string.h>
+#else
+#include <strings.h>
+#endif
+#ifdef _POSIX_VERSION
+#include <limits.h>                    /* for PATH_MAX */
+#else
+#include <sys/param.h>                 /* for MAXPATHLEN */
+#endif
+#include <errno.h>
+#ifndef STDC_HEADERS
+extern int errno;
+#endif
+
+#include <sys/stat.h>                  /* for S_IFLNK */
+
+#ifndef PATH_MAX
+#ifdef _POSIX_VERSION
+#define PATH_MAX _POSIX_PATH_MAX
+#else
+#ifdef MAXPATHLEN
+#define PATH_MAX MAXPATHLEN
+#else
+#define PATH_MAX 1024
+#endif
+#endif
+#endif
+
+#define MAX_READLINKS 32
+
+#ifdef __STDC__
+char *realpath(const char *path, char resolved_path [])
+#else
+char *realpath(path, resolved_path)
+const char *path;
+char resolved_path [];
+#endif
+{
+       char copy_path[PATH_MAX];
+       char link_path[PATH_MAX];
+       char *new_path = resolved_path;
+       char *max_path;
+       int readlinks = 0;
+       int n;
+
+       /* Make a copy of the source path since we may need to modify it. */
+       strcpy(copy_path, path);
+       path = copy_path;
+       max_path = copy_path + PATH_MAX - 2;
+       /* If it's a relative pathname use getwd for starters. */
+       if (*path != '/') {
+#ifdef HAVE_GETCWD
+               getcwd(new_path, PATH_MAX - 1);
+#else
+               getwd(new_path);
+#endif
+               new_path += strlen(new_path);
+               if (new_path[-1] != '/')
+                       *new_path++ = '/';
+       }
+       else {
+               *new_path++ = '/';
+               path++;
+       }
+       /* Expand each slash-separated pathname component. */
+       while (*path != '\0') {
+               /* Ignore stray "/". */
+               if (*path == '/') {
+                       path++;
+                       continue;
+               }
+               if (*path == '.') {
+                       /* Ignore ".". */
+                       if (path[1] == '\0' || path[1] == '/') {
+                               path++;
+                               continue;
+                       }
+                       if (path[1] == '.') {
+                               if (path[2] == '\0' || path[2] == '/') {
+                                       path += 2;
+                                       /* Ignore ".." at root. */
+                                       if (new_path == resolved_path + 1)
+                                               continue;
+                                       /* Handle ".." by backing up. */
+                                       while ((--new_path)[-1] != '/')
+                                               ;
+                                       continue;
+                               }
+                       }
+               }
+               /* Safely copy the next pathname component. */
+               while (*path != '\0' && *path != '/') {
+                       if (path > max_path) {
+                               errno = ENAMETOOLONG;
+                               return NULL;
+                       }
+                       *new_path++ = *path++;
+               }
+#ifdef S_IFLNK
+               /* Protect against infinite loops. */
+               if (readlinks++ > MAX_READLINKS) {
+                       errno = ELOOP;
+                       return NULL;
+               }
+               /* See if latest pathname component is a symlink. */
+               *new_path = '\0';
+               n = readlink(resolved_path, link_path, PATH_MAX - 1);
+               if (n < 0) {
+                       /* EINVAL means the file exists but isn't a symlink. */
+                       if (errno != EINVAL)
+                               return NULL;
+               }
+               else {
+                       /* Note: readlink doesn't add the null byte. */
+                       link_path[n] = '\0';
+                       if (*link_path == '/')
+                               /* Start over for an absolute symlink. */
+                               new_path = resolved_path;
+                       else
+                               /* Otherwise back up over this component. */
+                               while (*(--new_path) != '/')
+                                       ;
+                       /* Safe sex check. */
+                       if (strlen(path) + n >= PATH_MAX) {
+                               errno = ENAMETOOLONG;
+                               return NULL;
+                       }
+                       /* Insert symlink contents into path. */
+                       strcat(link_path, path);
+                       strcpy(copy_path, link_path);
+                       path = copy_path;
+               }
+#endif /* S_IFLNK */
+               *new_path++ = '/';
+       }
+       /* Delete trailing slash but don't whomp a lone slash. */
+       if (new_path != resolved_path + 1 && new_path[-1] == '/')
+               new_path--;
+       /* Make sure it's null terminated. */
+       *new_path = '\0';
+       return resolved_path;
+}