libsysio/tests/test_path.c

   1 /*
   2  *    This Cplant(TM) source code is the property of Sandia National
   3  *    Laboratories.
   4  *
   5  *    This Cplant(TM) source code is copyrighted by Sandia National
   6  *    Laboratories.
   7  *
   8  *    The redistribution of this Cplant(TM) source code is subject to the
   9  *    terms of the GNU Lesser General Public License
  10  *    (see cit/LGPL or http://www.gnu.org/licenses/lgpl.html)
  11  *
  12  *    Cplant(TM) Copyright 1998-2003 Sandia Corporation.
  13  *    Under the terms of Contract DE-AC04-94AL85000, there is a non-exclusive
  14  *    license for use of this work by or on behalf of the US Government.
  15  *    Export of this program may require a license from the United States
  16  *    Government.
  17  */
  18
  19 /*
  20  * This library is free software; you can redistribute it and/or
  21  * modify it under the terms of the GNU Lesser General Public
  22  * License as published by the Free Software Foundation; either
  23  * version 2.1 of the License, or (at your option) any later version.
  24  *
  25  * This library is distributed in the hope that it will be useful,
  26  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  27  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  28  * Lesser General Public License for more details.
  29  *
  30  * You should have received a copy of the GNU Lesser General Public
  31  * License along with this library; if not, write to the Free Software
  32  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  33  *
  34  * Questions or comments about this library should be sent to:
  35  *
  36  * Lee Ward
  37  * Sandia National Laboratories, New Mexico
  38  * P.O. Box 5800
  39  * Albuquerque, NM 87185-1110
  40  *
  41  * lee@sandia.gov
  42  */
  43
  44 #include <stdio.h>
  45 #include <stdlib.h>
  46 #include <string.h>
  47 #ifndef REDSTORM
  48 #include <getopt.h>
  49 #else
  50 #include <unistd.h>
  51 #endif
  52 #include <errno.h>
  53
  54 #include <assert.h>
  55 #include <sys/queue.h>
  56 #include <sys/types.h>
  57 #include <sys/stat.h>
  58
  59 #include "sysio.h"
  60 #include "mount.h"
  61
  62 #include "test.h"
  63
  64 /*
  65  * Stat files.
  66  *
  67  * Usage: test_path [path...]
  68  *
  69  * Without any path arguments, the program reads from standard-in, dealing with
  70  * each line as an absolute or relative path until EOF.
  71  */
  72
  73 static int statit(const char *path);
  74 static void usage(void);
  75
  76 int
  77 main(int argc, char *const argv[])
  78 {
  79         int     i;
  80         int     err;
  81         int     n;
  82         extern int _test_sysio_startup(void);
  83
  84         /*
  85          * Parse command line arguments.
  86          */
  87         while ((i = getopt(argc, argv, "")) != -1)
  88                 switch (i) {
  89
  90                 default:
  91                         usage();
  92                 }
  93
  94         /*
  95          * Init sysio lib.
  96          */
  97         err = _test_sysio_startup();
  98         if (err) {
  99                 errno = -err;
 100                 perror("sysio startup");
 101                 exit(1);
 102         }
 103
 104         n = argc - optind;
 105
 106         /*
 107          * Try path(s) listed on command-line.
 108          */
 109         while (optind < argc) {
 110                 const char *path;
 111
 112                 path = argv[optind++];
 113                 (void )statit(path);
 114         }
 115
 116         /*
 117          * If no command-line arguments, read from stdin until EOF.
 118          */
 119         if (!n) {
 120                 int     doflush;
 121                 static char buf[4096];
 122                 size_t  len;
 123                 char    *cp;
 124                 char    c;
 125
 126                 doflush = 0;
 127                 while (fgets(buf, sizeof(buf), stdin) != NULL) {
 128                         len = strlen(buf);
 129                         cp = buf + len - 1;
 130                         c = *cp;
 131                         *cp = '\0';
 132                         if (!doflush)
 133                                 statit(buf);
 134                         doflush = c == '\n' ? 0 : 1;
 135                 }
 136         }
 137
 138         /*
 139          * Clean up.
 140          */
 141         _sysio_shutdown();
 142
 143         return 0;
 144 }
 145
 146 static int
 147 statit(const char *path)
 148 {
 149         int     err;
 150         struct stat stbuf;
 151         char    t;
 152         static char buf[4096];
 153         ssize_t cc;
 154
 155         /*
 156          * Get file attrs.
 157          */
 158         err = lstat(path, &stbuf);
 159         if (err) {
 160                 perror(path);
 161                 return -1;
 162         }
 163
 164         /*
 165          * Get readable representation of file type.
 166          */
 167         if (S_ISDIR(stbuf.st_mode))
 168                 t = 'd';
 169         else if (S_ISCHR(stbuf.st_mode))
 170                 t = 'c';
 171         else if (S_ISBLK(stbuf.st_mode))
 172                 t = 'b';
 173         else if (S_ISREG(stbuf.st_mode))
 174                 t = 'f';
 175 #ifdef S_ISFIFO
 176         else if (S_ISFIFO(stbuf.st_mode))
 177                 t = 'p';
 178 #endif
 179 #ifdef S_ISLNK
 180         else if (S_ISLNK(stbuf.st_mode))
 181                 t = 'S';
 182 #endif
 183 #ifdef S_ISSOCK
 184         else if (S_ISSOCK(stbuf.st_mode))
 185                 t = 's';
 186 #endif
 187 #ifdef S_TYPEISMQ
 188         else if (S_TYPEISMQ(&stbuf))
 189                 t = 'q';
 190 #endif
 191 #ifdef S_TYPEISSEM
 192         else if (S_TYPEISSEM(&stbuf))
 193                 t = 'M';
 194 #endif
 195 #ifdef S_TYPEISSHM
 196         else if (S_TYPEISSHM(&stbuf))
 197                 t = 'm';
 198 #endif
 199         else
 200                 t = '?';
 201
 202         /*
 203          * Print path and type.
 204          */
 205         if (S_ISLNK(stbuf.st_mode)) {
 206                 cc = readlink(path, buf, sizeof(buf));
 207                 if (cc < 0) {
 208                         perror(path);
 209                         return -1;
 210                 }
 211         }
 212         (void )printf("%s: %c", path, t);
 213         if (S_ISLNK(stbuf.st_mode) && (size_t )cc < sizeof(buf))
 214                 (void )printf(" %.*s", cc, buf);
 215         (void )putchar('\n');
 216
 217         return 0;
 218 }
 219
 220 static void
 221 usage()
 222 {
 223
 224         (void )fprintf(stderr,
 225                        "Usage: test_path"
 226                        " [<path> ...\n]");
 227
 228         exit(1);
 229 }