1: /* filemode.c -- make a string describing file modes
    2:    Copyright (C) 1985, 1990, 1993, 2001, 2002, 2003, 2004,
    3:                  2005, 2006, 2007  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 2, 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: ^L
   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) */