Imported Upstream version 93u+upstream

1 files changed, 120 insertions, 0 deletions

diff --git a/src/lib/libast/string/fmtls.c b/src/lib/libast/string/fmtls.c
new file mode 100644
index 0000000..7b791dd
--- /dev/null
+++ b/src/lib/libast/string/fmtls.c
@@ -0,0 +1,120 @@
+/***********************************************************************
+*                                                                      *
+*               This software is part of the ast package               *
+*          Copyright (c) 1985-2011 AT&T Intellectual Property          *
+*                      and is licensed under the                       *
+*                 Eclipse Public License, Version 1.0                  *
+*                    by AT&T Intellectual Property                     *
+*                                                                      *
+*                A copy of the License is available at                 *
+*          http://www.eclipse.org/org/documents/epl-v10.html           *
+*         (with md5 checksum b35adb5213ca9657e911e9befb180842)         *
+*                                                                      *
+*              Information and Software Systems Research               *
+*                            AT&T Research                             *
+*                           Florham Park NJ                            *
+*                                                                      *
+*                 Glenn Fowler <gsf@research.att.com>                  *
+*                  David Korn <dgk@research.att.com>                   *
+*                   Phong Vo <kpv@research.att.com>                    *
+*                                                                      *
+***********************************************************************/
+#pragma prototyped
+/*
+ * Glenn Fowler
+ * AT&T Bell Laboratories
+ *
+ * ls formatter
+ */
+
+#include <ast.h>
+#include <ls.h>
+#include <tm.h>
+
+#ifndef LS_W_MAX
+#define LS_W_MAX	128
+#endif
+
+/*
+ * ls formatter
+ *
+ *	buf	results placed here
+ *	name	file name
+ *	st	file stat buffer
+ *	info	optional info
+ *	link	link text if != 0
+ *	flags	LS_* flags
+ *
+ *	return	end of formatted buf
+ */
+
+char*
+fmtls(char* buf, const char* name, register struct stat* st, const char* info, const char* link, register int flags)
+{
+	register char*		s;
+	time_t			tm;
+	Sfoff_t			n;
+
+	s = buf;
+	if (flags & LS_INUMBER)
+		s += sfsprintf(s, LS_W_MAX, "%*I*u ", LS_W_INUMBER - 1, sizeof(st->st_ino), st->st_ino);
+	if (flags & LS_BLOCKS)
+	{
+		n = iblocks(st);
+		s += sfsprintf(s, LS_W_MAX, "%*I*u ", LS_W_BLOCKS - 1, sizeof(n), n);
+	}
+	if (flags & LS_LONG)
+	{
+		s += sfsprintf(s, LS_W_MAX, "%s%3u", fmtmode(st->st_mode, flags & LS_EXTERNAL), (unsigned int)st->st_nlink);
+		if (!(flags & LS_NOUSER))
+		{
+			if (flags & LS_NUMBER)
+				s += sfsprintf(s, LS_W_MAX, " %-*I*d", LS_W_NAME - 1, sizeof(st->st_uid), st->st_uid);
+			else
+				s += sfsprintf(s, LS_W_MAX, " %-*s", LS_W_NAME - 1, fmtuid(st->st_uid));
+		}
+		if (!(flags & LS_NOGROUP))
+		{
+			if (flags & LS_NUMBER)
+				s += sfsprintf(s, LS_W_MAX, " %-*I*d", LS_W_NAME - 1, sizeof(st->st_gid), st->st_gid);
+			else
+				s += sfsprintf(s, LS_W_MAX, " %-*s", LS_W_NAME - 1, fmtgid(st->st_gid));
+		}
+		if (S_ISBLK(st->st_mode) || S_ISCHR(st->st_mode))
+			s += sfsprintf(s, LS_W_MAX, "%8s ", fmtdev(st));
+		else
+			s += sfsprintf(s, LS_W_MAX, "%8I*u ", sizeof(st->st_size), st->st_size);
+		tm = (flags & LS_ATIME) ? st->st_atime : (flags & LS_CTIME) ? st->st_ctime : st->st_mtime;
+		s = tmfmt(s, LS_W_LONG / 2, "%?%QL", &tm);
+		*s++ = ' ';
+	}
+	if (info)
+	{
+		while (*s = *info++)
+			s++;
+		*s++ = ' ';
+	}
+	while (*s = *name++)
+		s++;
+	if (flags & LS_MARK)
+	{
+		if (S_ISDIR(st->st_mode))
+			*s++ = '/';
+#ifdef S_ISLNK
+		else if (S_ISLNK(st->st_mode))
+			*s++ = '@';
+#endif
+		else if (st->st_mode & (S_IXUSR|S_IXGRP|S_IXOTH))
+			*s++ = '*';
+	}
+	if (link)
+	{
+		s += sfsprintf(s, LS_W_MAX, " %s %s",
+#ifdef S_ISLNK
+			S_ISLNK(st->st_mode) ? "->" :
+#endif
+				"==", link);
+	}
+	*s = 0;
+	return s;
+}