1 /* filemode.c -- make a string describing file modes
  2    Copyright (C) 1985, 1990, 1993, 2001, 2002, 2003, 2004,
  3                  2005, 2006, 2007, 2008, 2009, 2010  Free Software Foundation, Inc.
  4 
  5    This program is free software; you can redistribute it and/or modify
  6    it under the terms of the GNU General Public License as published by
  7    the Free Software Foundation; either version 3, or (at your option)
  8    any later version.
  9 
 10    This program is distributed in the hope that it will be useful,
 11    but WITHOUT ANY WARRANTY; without even the implied warranty of
 12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 13    GNU General Public License for more details.
 14 
 15    You should have received a copy of the GNU General Public License
 16    along with this program; if not, write to the Free Software
 17    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
 18    USA.  */
 19 
 20 #ifdef HAVE_CONFIG_H
 21 #include <config.h>
 22 #endif
 23 
 24 #include <sys/types.h>
 25 #include <sys/stat.h>
 26 
 27 #if !S_IRUSR
 28 # if S_IREAD
 29 #  define S_IRUSR S_IREAD
 30 # else
 31 #  define S_IRUSR 00400
 32 # endif
 33 #endif
 34 
 35 #if !S_IWUSR
 36 # if S_IWRITE
 37 #  define S_IWUSR S_IWRITE
 38 # else
 39 #  define S_IWUSR 00200
 40 # endif
 41 #endif
 42 
 43 #if !S_IXUSR
 44 # if S_IEXEC
 45 #  define S_IXUSR S_IEXEC
 46 # else
 47 #  define S_IXUSR 00100
 48 # endif
 49 #endif
 50 
 51 #ifdef STAT_MACROS_BROKEN
 52 #undef S_ISBLK
 53 #undef S_ISCHR
 54 #undef S_ISDIR
 55 #undef S_ISFIFO
 56 #undef S_ISLNK
 57 #undef S_ISMPB
 58 #undef S_ISMPC
 59 #undef S_ISNWK
 60 #undef S_ISREG
 61 #undef S_ISSOCK
 62 #endif /* STAT_MACROS_BROKEN.  */
 63 
 64 #if !defined(S_ISBLK) && defined(S_IFBLK)
 65 #define S_ISBLK(m) (((m) & S_IFMT) == S_IFBLK)
 66 #endif
 67 #if !defined(S_ISCHR) && defined(S_IFCHR)
 68 #define S_ISCHR(m) (((m) & S_IFMT) == S_IFCHR)
 69 #endif
 70 #if !defined(S_ISDIR) && defined(S_IFDIR)
 71 #define S_ISDIR(m) (((m) & S_IFMT) == S_IFDIR)
 72 #endif
 73 #if !defined(S_ISREG) && defined(S_IFREG)
 74 #define S_ISREG(m) (((m) & S_IFMT) == S_IFREG)
 75 #endif
 76 #if !defined(S_ISFIFO) && defined(S_IFIFO)
 77 #define S_ISFIFO(m) (((m) & S_IFMT) == S_IFIFO)
 78 #endif
 79 #if !defined(S_ISLNK) && defined(S_IFLNK)
 80 #define S_ISLNK(m) (((m) & S_IFMT) == S_IFLNK)
 81 #endif
 82 #if !defined(S_ISSOCK) && defined(S_IFSOCK)
 83 #define S_ISSOCK(m) (((m) & S_IFMT) == S_IFSOCK)
 84 #endif
 85 #if !defined(S_ISMPB) && defined(S_IFMPB) /* V7 */
 86 #define S_ISMPB(m) (((m) & S_IFMT) == S_IFMPB)
 87 #define S_ISMPC(m) (((m) & S_IFMT) == S_IFMPC)
 88 #endif
 89 #if !defined(S_ISNWK) && defined(S_IFNWK) /* HP/UX */
 90 #define S_ISNWK(m) (((m) & S_IFMT) == S_IFNWK)
 91 #endif
 92 
 93 void mode_string ();
 94 static char ftypelet ();
 95 static void rwx ();
 96 static void setst ();
 97 
 98 /* filemodestring - fill in string STR with an ls-style ASCII
 99    representation of the st_mode field of file stats block STATP.
100    10 characters are stored in STR; no terminating null is added.
101    The characters stored in STR are:
102 
103    0    File type.  'd' for directory, 'c' for character
104         special, 'b' for block special, 'm' for multiplex,
105         'l' for symbolic link, 's' for socket, 'p' for fifo,
106         '-' for regular, '?' for any other file type
107 
108    1    'r' if the owner may read, '-' otherwise.
109 
110    2    'w' if the owner may write, '-' otherwise.
111 
112    3    'x' if the owner may execute, 's' if the file is
113         set-user-id, '-' otherwise.
114         'S' if the file is set-user-id, but the execute
115         bit isn't set.
116 
117    4    'r' if group members may read, '-' otherwise.
118 
119    5    'w' if group members may write, '-' otherwise.
120 
121    6    'x' if group members may execute, 's' if the file is
122         set-group-id, '-' otherwise.
123         'S' if it is set-group-id but not executable.
124 
125    7    'r' if any user may read, '-' otherwise.
126 
127    8    'w' if any user may write, '-' otherwise.
128 
129    9    'x' if any user may execute, 't' if the file is "sticky"
130         (will be retained in swap space after execution), '-'
131         otherwise.
132         'T' if the file is sticky but not executable.  */
133 
134 void
135 filemodestring (statp, str)
136      struct stat *statp;
137      char *str;
138 {
139   mode_string (statp->st_mode, str);
140 }
141 
142 /* Like filemodestring, but only the relevant part of the `struct stat'
143    is given as an argument.  */
144 
145 void
146 mode_string (mode, str)
147      unsigned short mode;
148      char *str;
149 {
150   str[0] = ftypelet ((long) mode);
151   rwx ((mode & 0700) << 0, &str[1]);
152   rwx ((mode & 0070) << 3, &str[4]);
153   rwx ((mode & 0007) << 6, &str[7]);
154   setst (mode, str);
155 }
156 
157 /* Return a character indicating the type of file described by
158    file mode BITS:
159    'd' for directories
160    'b' for block special files
161    'c' for character special files
162    'm' for multiplexor files
163    'l' for symbolic links
164    's' for sockets
165    'p' for fifos
166    '-' for regular files
167    '?' for any other file type.  */
168 
169 static char
170 ftypelet (bits)
171      long bits;
172 {
173 #ifdef S_ISBLK
174   if (S_ISBLK (bits))
175     return 'b';
176 #endif
177   if (S_ISCHR (bits))
178     return 'c';
179   if (S_ISDIR (bits))
180     return 'd';
181   if (S_ISREG (bits))
182     return '-';
183 #ifdef S_ISFIFO
184   if (S_ISFIFO (bits))
185     return 'p';
186 #endif
187 #ifdef S_ISLNK
188   if (S_ISLNK (bits))
189     return 'l';
190 #endif
191 #ifdef S_ISSOCK
192   if (S_ISSOCK (bits))
193     return 's';
194 #endif
195 #ifdef S_ISMPC
196   if (S_ISMPC (bits))
197     return 'm';
198 #endif
199 #ifdef S_ISNWK
200   if (S_ISNWK (bits))
201     return 'n';
202 #endif
203   return '?';
204 }
205 
206 /* Look at read, write, and execute bits in BITS and set
207    flags in CHARS accordingly.  */
208 
209 static void
210 rwx (bits, chars)
211      unsigned short bits;
212      char *chars;
213 {
214   chars[0] = (bits & S_IRUSR) ? 'r' : '-';
215   chars[1] = (bits & S_IWUSR) ? 'w' : '-';
216   chars[2] = (bits & S_IXUSR) ? 'x' : '-';
217 }
218 
219 /* Set the 's' and 't' flags in file attributes string CHARS,
220    according to the file mode BITS.  */
221 
222 static void
223 setst (bits, chars)
224      unsigned short bits;
225      char *chars;
226 {
227 #ifdef S_ISUID
228   if (bits & S_ISUID)
229     {
230       if (chars[3] != 'x')
231         /* Set-uid, but not executable by owner.  */
232         chars[3] = 'S';
233       else
234         chars[3] = 's';
235     }
236 #endif
237 #ifdef S_ISGID
238   if (bits & S_ISGID)
239     {
240       if (chars[6] != 'x')
241         /* Set-gid, but not executable by group.  */
242         chars[6] = 'S';
243       else
244         chars[6] = 's';
245     }
246 #endif
247 #ifdef S_ISVTX
248   if (bits & S_ISVTX)
249     {
250       if (chars[9] != 'x')
251         /* Sticky, but not executable by others.  */
252         chars[9] = 'T';
253       else
254         chars[9] = 't';
255     }
256 #endif
257 }
258 
259 /* arch-tag: 4340830c-15a5-47d2-b45f-1d43c45a91bb
260    (do not change this comment) */