2 * Copyright (C) 2008 Karel Zak <kzak@redhat.com>
4 * This file is part of util-linux-ng.
6 * This file is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
11 * This file is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * The original namei(1) was writtent by:
17 * Roger S. Southwick (May 2, 1990)
18 * Steve Tell (March 28, 1991)
19 * Arkadiusz Mikiewicz (1999-02-22)
20 * Li Zefan (2007-09-10).
29 #include <sys/types.h>
31 #include <sys/param.h>
41 #define MAXSYMLINKS 256
44 #ifndef LOGIN_NAME_MAX
45 #define LOGIN_NAME_MAX 256
48 #define NAMEI_NOLINKS (1 << 1)
49 #define NAMEI_MODES (1 << 2)
50 #define NAMEI_MNTS (1 << 3)
51 #define NAMEI_OWNERS (1 << 4)
52 #define NAMEI_VERTICAL (1 << 5)
56 struct stat st
; /* item lstat() */
57 char *name
; /* item name */
58 char *abslink
; /* absolute symlink path */
59 int relstart
; /* offset of relative path in 'abslink' */
60 struct namei
*next
; /* next item */
62 int mountpoint
; /* is mount point */
72 static int uwidth
; /* maximal width of username */
73 static int gwidth
; /* maximal width of groupname */
74 static struct idcache
*gcache
; /* groupnames */
75 static struct idcache
*ucache
; /* usernames */
77 static struct idcache
*
78 get_id(struct idcache
*ic
, unsigned long int id
)
89 free_idcache(struct idcache
*ic
)
92 struct idcache
*next
= ic
->next
;
100 add_id(struct idcache
**ic
, char *name
, unsigned long int id
, int *width
)
102 struct idcache
*nc
, *x
;
105 nc
= calloc(1, sizeof(*nc
));
112 wchar_t wc
[LOGIN_NAME_MAX
+ 1];
114 if (mbstowcs(wc
, name
, LOGIN_NAME_MAX
) > 0) {
115 wc
[LOGIN_NAME_MAX
] = '\0';
116 w
= wcswidth(wc
, LOGIN_NAME_MAX
);
122 /* note, we ignore names with non-printable widechars */
124 nc
->name
= strdup(name
);
125 else if (asprintf(&nc
->name
, "%lu", id
) == -1)
130 for (x
= *ic
; x
&& x
->next
; x
= x
->next
);
132 /* add 'nc' at end of the 'ic' list */
138 w
= strlen(nc
->name
);
139 *width
= *width
< w
? w
: *width
;
143 err(EXIT_FAILURE
, _("out of memory?"));
147 add_uid(unsigned long int id
)
149 struct idcache
*ic
= get_id(ucache
, id
);
152 struct passwd
*pw
= getpwuid((uid_t
) id
);
153 add_id(&ucache
, pw
? pw
->pw_name
: NULL
, id
, &uwidth
);
158 add_gid(unsigned long int id
)
160 struct idcache
*ic
= get_id(gcache
, id
);
163 struct group
*gr
= getgrgid((gid_t
) id
);
164 add_id(&gcache
, gr
? gr
->gr_name
: NULL
, id
, &gwidth
);
169 free_namei(struct namei
*nm
)
172 struct namei
*next
= nm
->next
;
181 readlink_to_namei(struct namei
*nm
, const char *path
)
186 sz
= readlink(path
, sym
, sizeof(sym
));
188 err(EXIT_FAILURE
, _("failed to read symlink: %s"), path
);
190 char *p
= strrchr(path
, '/');
192 nm
->relstart
= p
? p
- path
: 0;
194 sz
+= nm
->relstart
+ 1;
196 nm
->abslink
= malloc(sz
+ 1);
198 err(EXIT_FAILURE
, _("out of memory?"));
200 if (*sym
!= '/' && nm
->relstart
) {
201 /* create the absolute path from the relative symlink */
202 memcpy(nm
->abslink
, path
, nm
->relstart
);
203 *(nm
->abslink
+ nm
->relstart
) = '/';
205 memcpy(nm
->abslink
+ nm
->relstart
, sym
, sz
- nm
->relstart
);
207 memcpy(nm
->abslink
, sym
, sz
);
208 nm
->abslink
[sz
] = '\0';
212 dotdot_stat(const char *dirname
, struct stat
*st
)
217 #define DOTDOTDIR "/.."
222 len
= strlen(dirname
);
223 path
= malloc(len
+ sizeof(DOTDOTDIR
));
225 err(EXIT_FAILURE
, _("out of memory?"));
227 memcpy(path
, dirname
, len
);
228 memcpy(path
+ len
, DOTDOTDIR
, sizeof(DOTDOTDIR
));
231 err(EXIT_FAILURE
, _("could not stat '%s'"), path
);
236 static struct namei
*
237 new_namei(struct namei
*parent
, const char *path
, const char *fname
, int lev
)
243 nm
= calloc(1, sizeof(*nm
));
245 err(EXIT_FAILURE
, _("out of memory?"));
250 nm
->name
= strdup(fname
);
252 err(EXIT_FAILURE
, _("out of memory?"));
253 if (lstat(path
, &nm
->st
) == -1)
254 err(EXIT_FAILURE
, _("could not stat '%s'"), path
);
256 if (S_ISLNK(nm
->st
.st_mode
))
257 readlink_to_namei(nm
, path
);
258 if (flags
& NAMEI_OWNERS
) {
259 add_uid(nm
->st
.st_uid
);
260 add_gid(nm
->st
.st_gid
);
263 if ((flags
& NAMEI_MNTS
) && S_ISDIR(nm
->st
.st_mode
)) {
264 struct stat stbuf
, *sb
= NULL
;
266 if (parent
&& S_ISDIR(parent
->st
.st_mode
))
268 else if (!parent
|| S_ISLNK(parent
->st
.st_mode
))
269 sb
= dotdot_stat(path
, &stbuf
);
271 if (sb
&& (sb
->st_dev
!= nm
->st
.st_dev
|| /* different device */
272 sb
->st_ino
== nm
->st
.st_ino
)) /* root directory */
279 static struct namei
*
280 add_namei(struct namei
*parent
, const char *orgpath
, int start
, struct namei
**last
)
282 struct namei
*nm
= NULL
, *first
= NULL
;
283 char *fname
, *end
, *path
;
290 level
= parent
->level
+ 1;
292 path
= strdup(orgpath
);
294 err(EXIT_FAILURE
, _("out of memory?"));
295 fname
= path
+ start
;
299 while (*fname
== '/')
300 fname
++; /* eat extra '/' */
301 first
= nm
= new_namei(nm
, "/", "/", level
);
304 for (end
= fname
; fname
&& end
; ) {
305 /* set end of filename */
307 end
= strchr(fname
, '/');
311 /* create a new entry */
312 nm
= new_namei(nm
, path
, fname
, level
);
317 /* set begin of the next filename */
321 end
++; /* eat extra '/' */
336 follow_symlinks(struct namei
*nm
)
340 for (; nm
; nm
= nm
->next
) {
341 struct namei
*next
, *last
;
343 if (!S_ISLNK(nm
->st
.st_mode
))
345 if (++symcount
> MAXSYMLINKS
) {
346 /* drop the rest of the list */
347 free_namei(nm
->next
);
352 nm
->next
= add_namei(nm
, nm
->abslink
, nm
->relstart
, &last
);
362 strmode(mode_t mode
, char *str
)
366 else if (S_ISLNK(mode
))
368 else if (S_ISCHR(mode
))
370 else if (S_ISBLK(mode
))
372 else if (S_ISSOCK(mode
))
374 else if (S_ISFIFO(mode
))
376 else if (S_ISREG(mode
))
379 str
[1] = mode
& S_IRUSR
? 'r' : '-';
380 str
[2] = mode
& S_IWUSR
? 'w' : '-';
381 str
[3] = (mode
& S_ISUID
382 ? (mode
& S_IXUSR
? 's' : 'S')
383 : (mode
& S_IXUSR
? 'x' : '-'));
384 str
[4] = mode
& S_IRGRP
? 'r' : '-';
385 str
[5] = mode
& S_IWGRP
? 'w' : '-';
386 str
[6] = (mode
& S_ISGID
387 ? (mode
& S_IXGRP
? 's' : 'S')
388 : (mode
& S_IXGRP
? 'x' : '-'));
389 str
[7] = mode
& S_IROTH
? 'r' : '-';
390 str
[8] = mode
& S_IWOTH
? 'w' : '-';
391 str
[9] = (mode
& S_ISVTX
392 ? (mode
& S_IXOTH
? 't' : 'T')
393 : (mode
& S_IXOTH
? 'x' : '-'));
398 print_namei(struct namei
*nm
, char *path
)
400 struct namei
*prev
= NULL
;
404 printf("f: %s\n", path
);
406 for (; nm
; prev
= nm
, nm
= nm
->next
) {
409 strmode(nm
->st
.st_mode
, md
);
414 if (!(flags
& NAMEI_VERTICAL
)) {
415 for (i
= 0; i
< nm
->level
; i
++)
420 if (flags
& NAMEI_MODES
)
425 if (flags
& NAMEI_OWNERS
) {
426 printf(" %-*s", uwidth
,
427 get_id(ucache
, nm
->st
.st_uid
)->name
);
428 printf(" %-*s", gwidth
,
429 get_id(gcache
, nm
->st
.st_gid
)->name
);
432 if (flags
& NAMEI_VERTICAL
)
433 for (i
= 0; i
< nm
->level
; i
++)
436 if (S_ISLNK(nm
->st
.st_mode
))
437 printf(" %s -> %s\n", nm
->name
,
438 nm
->abslink
+ nm
->relstart
);
440 printf(" %s\n", nm
->name
);
447 const char *p
= program_invocation_short_name
;
452 printf(_("\nUsage: %s [options] pathname [pathname ...]\n"), p
);
453 printf(_("\nOptions:\n"));
456 " -h, --help displays this help text\n"
457 " -x, --mountpoints show mount point directories with a 'D'\n"
458 " -m, --modes show the mode bits of each file\n"
459 " -o, --owners show owner and group name of each file\n"
460 " -l, --long use a long listing format (-m -o -v) \n"
461 " -n, --nosymlinks don't follow symlinks\n"
462 " -v, --vertical vertical align of modes and owners\n"));
464 printf(_("\nFor more information see namei(1).\n"));
468 struct option longopts
[] =
470 { "help", 0, 0, 'h' },
471 { "mountpoints",0, 0, 'x' },
472 { "modes", 0, 0, 'm' },
473 { "owners", 0, 0, 'o' },
474 { "long", 0, 0, 'l' },
475 { "nolinks", 0, 0, 'n' },
476 { "vertical", 0, 0, 'v' },
481 main(int argc
, char **argv
)
486 setlocale(LC_ALL
, "");
487 bindtextdomain(PACKAGE
, LOCALEDIR
);
493 while ((c
= getopt_long(argc
, argv
, "+h?lmnovx", longopts
, NULL
)) != -1) {
500 flags
|= (NAMEI_OWNERS
| NAMEI_MODES
| NAMEI_VERTICAL
);
503 flags
|= NAMEI_MODES
;
506 flags
|= NAMEI_NOLINKS
;
509 flags
|= NAMEI_OWNERS
;
515 flags
|= NAMEI_VERTICAL
;
519 for(; optind
< argc
; optind
++) {
520 char *path
= argv
[optind
];
521 struct namei
*nm
= NULL
;
524 if (stat(path
, &st
) != 0)
525 err(EXIT_FAILURE
, _("failed to stat: %s"), path
);
527 nm
= add_namei(NULL
, path
, 0, NULL
);
530 if (!(flags
& NAMEI_NOLINKS
))
531 sml
= follow_symlinks(nm
);
532 print_namei(nm
, path
);
536 _("%s: exceeded limit of symlinks"),
541 free_idcache(ucache
);
542 free_idcache(gcache
);