1 /***********************************************************************
2 * *
3 * This software is part of the ast package *
4 * Copyright (c) 1985-2011 AT&T Intellectual Property *
5 * and is licensed under the *
6 * Eclipse Public License, Version 1.0 *
7 * by AT&T Intellectual Property *
8 * *
9 * A copy of the License is available at *
10 * http://www.eclipse.org/org/documents/epl-v10.html *
11 * (with md5 checksum b35adb5213ca9657e911e9befb180842) *
12 * *
13 * Information and Software Systems Research *
14 * AT&T Research *
15 * Florham Park NJ *
16 * *
17 * Glenn Fowler <gsf@research.att.com> *
18 * David Korn <dgk@research.att.com> *
19 * Phong Vo <kpv@research.att.com> *
20 * *
21 ***********************************************************************/
22 #pragma prototyped
23 /*
24 * Glenn Fowler
25 * AT&T Bell Laboratories
26 *
27 * ls formatter
28 */
29
30 #include <ast.h>
31 #include <ls.h>
32 #include <tm.h>
33
34 #ifndef LS_W_MAX
35 #define LS_W_MAX 128
36 #endif
37
38 /*
39 * ls formatter
40 *
41 * buf results placed here
42 * name file name
43 * st file stat buffer
44 * info optional info
45 * link link text if != 0
46 * flags LS_* flags
47 *
48 * return end of formatted buf
49 */
50
51 char*
fmtls(char * buf,const char * name,register struct stat * st,const char * info,const char * link,register int flags)52 fmtls(char* buf, const char* name, register struct stat* st, const char* info, const char* link, register int flags)
53 {
54 register char* s;
55 time_t tm;
56 Sfoff_t n;
57
58 s = buf;
59 if (flags & LS_INUMBER)
60 s += sfsprintf(s, LS_W_MAX, "%*I*u ", LS_W_INUMBER - 1, sizeof(st->st_ino), st->st_ino);
61 if (flags & LS_BLOCKS)
62 {
63 n = iblocks(st);
64 s += sfsprintf(s, LS_W_MAX, "%*I*u ", LS_W_BLOCKS - 1, sizeof(n), n);
65 }
66 if (flags & LS_LONG)
67 {
68 s += sfsprintf(s, LS_W_MAX, "%s%3u", fmtmode(st->st_mode, flags & LS_EXTERNAL), (unsigned int)st->st_nlink);
69 if (!(flags & LS_NOUSER))
70 {
71 if (flags & LS_NUMBER)
72 s += sfsprintf(s, LS_W_MAX, " %-*I*d", LS_W_NAME - 1, sizeof(st->st_uid), st->st_uid);
73 else
74 s += sfsprintf(s, LS_W_MAX, " %-*s", LS_W_NAME - 1, fmtuid(st->st_uid));
75 }
76 if (!(flags & LS_NOGROUP))
77 {
78 if (flags & LS_NUMBER)
79 s += sfsprintf(s, LS_W_MAX, " %-*I*d", LS_W_NAME - 1, sizeof(st->st_gid), st->st_gid);
80 else
81 s += sfsprintf(s, LS_W_MAX, " %-*s", LS_W_NAME - 1, fmtgid(st->st_gid));
82 }
83 if (S_ISBLK(st->st_mode) || S_ISCHR(st->st_mode))
84 s += sfsprintf(s, LS_W_MAX, "%8s ", fmtdev(st));
85 else
86 s += sfsprintf(s, LS_W_MAX, "%8I*u ", sizeof(st->st_size), st->st_size);
87 tm = (flags & LS_ATIME) ? st->st_atime : (flags & LS_CTIME) ? st->st_ctime : st->st_mtime;
88 s = tmfmt(s, LS_W_LONG / 2, "%?%QL", &tm);
89 *s++ = ' ';
90 }
91 if (info)
92 {
93 while (*s = *info++)
94 s++;
95 *s++ = ' ';
96 }
97 while (*s = *name++)
98 s++;
99 if (flags & LS_MARK)
100 {
101 if (S_ISDIR(st->st_mode))
102 *s++ = '/';
103 #ifdef S_ISLNK
104 else if (S_ISLNK(st->st_mode))
105 *s++ = '@';
106 #endif
107 else if (st->st_mode & (S_IXUSR|S_IXGRP|S_IXOTH))
108 *s++ = '*';
109 }
110 if (link)
111 {
112 s += sfsprintf(s, LS_W_MAX, " %s %s",
113 #ifdef S_ISLNK
114 S_ISLNK(st->st_mode) ? "->" :
115 #endif
116 "==", link);
117 }
118 *s = 0;
119 return s;
120 }
121