initial import from bash_3.1dfsg.orig.tar.gz

1 files changed, 119 insertions, 0 deletions

diff --git a/examples/loadables/realpath.c b/examples/loadables/realpath.c
new file mode 100644
index 0000000..16478b7
--- /dev/null
+++ b/examples/loadables/realpath.c
@@ -0,0 +1,119 @@
+/*
+ * realpath -- canonicalize pathnames, resolving symlinks
+ *
+ * usage: realpath [-csv] pathname [pathname...]
+ *
+ * options:	-c	check whether or not each resolved path exists
+ *		-s	no output, exit status determines whether path is valid
+ *		-v	produce verbose output
+ *
+ *
+ * exit status:	0	if all pathnames resolved
+ *		1	if any of the pathname arguments could not be resolved
+ *
+ *
+ * Bash loadable builtin version
+ *
+ * Chet Ramey
+ * chet@po.cwru.edu
+ */
+
+#include "config.h"
+
+#include <sys/types.h>
+#include <sys/stat.h>
+
+#include <stdio.h>
+#ifdef HAVE_UNISTD_H
+#  include <unistd.h>
+#endif
+#include "bashansi.h"
+#include <maxpath.h>
+#include <errno.h>
+
+#include "builtins.h"
+#include "shell.h"
+#include "bashgetopt.h"
+
+#ifndef errno
+extern int	errno;
+#endif
+
+extern char	*sh_realpath();
+
+realpath_builtin(list)
+WORD_LIST	*list;
+{
+	int	opt, cflag, vflag, sflag, es;
+	char	*r, realbuf[PATH_MAX], *p;
+	struct stat sb;
+
+	if (list == 0) {
+		builtin_usage();
+		return (EX_USAGE);
+	}
+
+	vflag = cflag = sflag = 0;
+	reset_internal_getopt();
+	while ((opt = internal_getopt (list, "csv")) != -1) {
+		switch (opt) {
+		case 'c':
+			cflag = 1;
+			break;
+		case 's':
+			sflag = 1;
+			break;
+		case 'v':
+			vflag = 1;
+			break;
+		default:
+			usage();
+		}
+	}
+
+	list = loptend;
+
+	if (list == 0)
+		usage();
+
+	for (es = EXECUTION_SUCCESS; list; list = list->next) {
+		p = list->word->word;
+		r = sh_realpath(p, realbuf);
+		if (r == 0) {
+			es = EXECUTION_FAILURE;
+			if (sflag == 0)
+				builtin_error("%s: cannot resolve: %s", p, strerror(errno));
+			continue;
+		}
+		if (cflag && (stat(realbuf, &sb) < 0)) {
+			es = EXECUTION_FAILURE;
+			if (sflag == 0)
+				builtin_error("%s: %s", p, strerror(errno));
+			continue;
+		}
+		if (sflag == 0) {
+			if (vflag)
+				printf ("%s -> ", p);
+			printf("%s\n", realbuf);
+		}
+	}
+	return es;
+}
+
+char *realpath_doc[] = {
+	"Display the canonicalized version of each PATHNAME argument, resolving",
+	"symbolic links.  The -c option checks whether or not each resolved name",
+	"exists.  The -s option produces no output; the exit status determines the",
+	"valididty of each PATHNAME.  The -v option produces verbose output.  The",
+	"exit status is 0 if each PATHNAME was resolved; non-zero otherwise.",
+	(char *)NULL
+};
+
+struct builtin realpath_struct = {
+	"realpath",		/* builtin name */
+	realpath_builtin,	/* function implementing the builtin */
+	BUILTIN_ENABLED,	/* initial flags for builtin */
+	realpath_doc,		/* array of long documentation strings */
+	"realpath [-csv] pathname [pathname...]",	/* usage synopsis */
+	0			/* reserved for internal use */
+};