Switch branches/tags
version-3_4_4-tentative version-3_4_2-to-fsf v0.1 v0.0 textutils-1_12_1 static-0 ss-950614-22h58-1_11_5a ss-950520-08h12-sync-tu ss-940725-22h45 raeburn-tag-4-for-export pre-version pre-jumbo-LFS pre-getopt post-jumbo-LFS merge-with-1_9_4k lexbind-before-merge-20030404 kfs_20030524_pre getopt-macros emacs-unicode-base cvs-readonly ctype-fix TEXTUTILS-2_0_21 TEXTUTILS-2_0_20 TEXTUTILS-2_0_19 TEXTUTILS-2_0_18 TEXTUTILS-2_0_17 TEXTUTILS-2_0_16 TEXTUTILS-2_0_15 TEXTUTILS-2_0_12 TEXTUTILS-2_0_10 TEXTUTILS-2_0_9 TEXTUTILS-2_0_8 TEXTUTILS-2_0 TEXTUTILS-2_0g TEXTUTILS-2_0f TEXTUTILS-2_0e TEXTUTILS-2_0c TEXTUTILS-2_0a TEXTUTILS-1_22q TEXTUTILS-1_22p TEXTUTILS-1_22o TEXTUTILS-1_22n TEXTUTILS-1_22m TEXTUTILS-1_22l TEXTUTILS-1_22k TEXTUTILS-1_22j TEXTUTILS-1_22i TEXTUTILS-1_22h TEXTUTILS-1_22g TEXTUTILS-1_22f TEXTUTILS-1_22d TEXTUTILS-1_22c TEXTUTILS-1_22a TEXTUTILS-1_21a TEXTUTILS-1_20b TEXTUTILS-1_20a TEXTUTILS-1_19r TEXTUTILS-1_19q TEXTUTILS-1_19o TEXTUTILS-1_19n TEXTUTILS-1_19m TEXTUTILS-1_19g TEXTUTILS-1_19d TEXTUTILS-1_18 TEXTUTILS-1_18e TEXTUTILS-1_14 TEXTUTILS-1_14d TEXTUTILS-1_14c TEXTUTILS-1_14b TEXTUTILS-1_14a TEXTUTILS-1_13 TEXTUTILS-1_13j TEXTUTILS-1_13i TEXTUTILS-1_13g TEXTUTILS-1_12 TEXTUTILS-1_12a TEXTUTILS-1_11_5 TEXTUTILS-1_11_5b TEXTUTILS-1_11_4 TEXTUTILS-1_11_4b TEXTUTILS-1_11_1b TEXTUTILS-1_11_1a TEXTUTILS-1_11 TEXTUTILS-1_11_g TEXTUTILS-1_11_f TEXTUTILS-1_11_e TEXTUTILS-1_11_d TEXTUTILS-1_10 TEXTUTILS-1_9_1 TEXTUTILS-1_9_1k TEXTUTILS-1_9_1i1 TEXTUTILS-1_9_1h TEXTUTILS-1_9_1g TEXTUTILS-1_9_1f TEXTUTILS-1_9_1e TEXTUTILS-1_9_1d TEXTUTILS-1_8_1b TEXTUTILS-1_8 TEXTUTILS-1_8i TEXTUTILS-1_8c
Nothing to show
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
181 lines (147 sloc) 5.03 KB
/* filemode.c -- make a string describing file modes
Copyright (C) 1985, 1990, 1993, 1998-2000, 2004, 2006, 2009-2018 Free
Software Foundation, Inc.
This program is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 3 of the License, 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
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program. If not, see <>. */
#include <config.h>
#include "filemode.h"
/* The following is for Cray DMF (Data Migration Facility), which is a
HSM file system. A migrated file has a 'st_dm_mode' that is
different from the normal 'st_mode', so any tests for migrated
files should use the former. */
# define IS_MIGRATED_FILE(statp) \
(S_ISOFD (statp->st_dm_mode) || S_ISOFL (statp->st_dm_mode))
# define IS_MIGRATED_FILE(statp) 0
/* Return a character indicating the type of file described by
file mode BITS:
'-' regular file
'b' block special file
'c' character special file
'C' high performance ("contiguous data") file
'd' directory
'D' door
'l' symbolic link
'm' multiplexed file (7th edition Unix; obsolete)
'n' network special file (HP-UX)
'p' fifo (named pipe)
'P' port
's' socket
'w' whiteout (4.4BSD)
'?' some other file type */
static char
ftypelet (mode_t bits)
/* These are the most common, so test for them first. */
if (S_ISREG (bits))
return '-';
if (S_ISDIR (bits))
return 'd';
/* Other letters standardized by POSIX 1003.1-2004. */
if (S_ISBLK (bits))
return 'b';
if (S_ISCHR (bits))
return 'c';
if (S_ISLNK (bits))
return 'l';
if (S_ISFIFO (bits))
return 'p';
/* Other file types (though not letters) standardized by POSIX. */
if (S_ISSOCK (bits))
return 's';
/* Nonstandard file types. */
if (S_ISCTG (bits))
return 'C';
if (S_ISDOOR (bits))
return 'D';
if (S_ISMPB (bits) || S_ISMPC (bits) || S_ISMPX (bits))
return 'm';
if (S_ISNWK (bits))
return 'n';
if (S_ISPORT (bits))
return 'P';
if (S_ISWHT (bits))
return 'w';
return '?';
/* Like filemodestring, but rely only on MODE. */
strmode (mode_t mode, char *str)
str[0] = ftypelet (mode);
str[1] = mode & S_IRUSR ? 'r' : '-';
str[2] = mode & S_IWUSR ? 'w' : '-';
str[3] = (mode & S_ISUID
? (mode & S_IXUSR ? 's' : 'S')
: (mode & S_IXUSR ? 'x' : '-'));
str[4] = mode & S_IRGRP ? 'r' : '-';
str[5] = mode & S_IWGRP ? 'w' : '-';
str[6] = (mode & S_ISGID
? (mode & S_IXGRP ? 's' : 'S')
: (mode & S_IXGRP ? 'x' : '-'));
str[7] = mode & S_IROTH ? 'r' : '-';
str[8] = mode & S_IWOTH ? 'w' : '-';
str[9] = (mode & S_ISVTX
? (mode & S_IXOTH ? 't' : 'T')
: (mode & S_IXOTH ? 'x' : '-'));
str[10] = ' ';
str[11] = '\0';
#endif /* ! HAVE_DECL_STRMODE */
/* filemodestring - fill in string STR with an ls-style ASCII
representation of the st_mode field of file stats block STATP.
12 characters are stored in STR.
The characters stored in STR are:
0 File type, as in ftypelet above, except that other letters are used
for files whose type cannot be determined solely from st_mode:
'F' semaphore
'M' migrated file (Cray DMF)
'Q' message queue
'S' shared memory object
'T' typed memory object
1 'r' if the owner may read, '-' otherwise.
2 'w' if the owner may write, '-' otherwise.
3 'x' if the owner may execute, 's' if the file is
set-user-id, '-' otherwise.
'S' if the file is set-user-id, but the execute
bit isn't set.
4 'r' if group members may read, '-' otherwise.
5 'w' if group members may write, '-' otherwise.
6 'x' if group members may execute, 's' if the file is
set-group-id, '-' otherwise.
'S' if it is set-group-id but not executable.
7 'r' if any user may read, '-' otherwise.
8 'w' if any user may write, '-' otherwise.
9 'x' if any user may execute, 't' if the file is "sticky"
(will be retained in swap space after execution), '-'
'T' if the file is sticky but not executable.
10 ' ' for compatibility with 4.4BSD strmode,
since this interface does not support ACLs.
11 '\0'. */
filemodestring (struct stat const *statp, char *str)
strmode (statp->st_mode, str);
if (S_TYPEISSEM (statp))
str[0] = 'F';
else if (IS_MIGRATED_FILE (statp))
str[0] = 'M';
else if (S_TYPEISMQ (statp))
str[0] = 'Q';
else if (S_TYPEISSHM (statp))
str[0] = 'S';
else if (S_TYPEISTMO (statp))
str[0] = 'T';