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 #include <errno.h>
  48 #include <sys/types.h>
  49 #include <sys/stat.h>
  50 #include <unistd.h>
  51 #include <sys/uio.h>
  52 #include <getopt.h>
  53
  54 #if defined(SYSIO_LABEL_NAMES)
  55 #include "sysio.h"
  56 #endif
  57 #include "xtio.h"
  58 #include "test.h"
  59
  60 /*
  61  * Stat files.
  62  *
  63  * Usage: test_path [path...]
  64  *
  65  * Without any path arguments, the program reads from standard-in, dealing with
  66  * each line as an absolute or relative path until EOF.
  67  */
  68
  69 static int statit(const char *path);
  70 static void usage(void);
  71
  72 int
  73 main(int argc, char *const argv[])
  74 {
  75         int     i;
  76         int     err;
  77         int     n;
  78         extern int _test_sysio_startup(void);
  79
  80         /*
  81          * Parse command line arguments.
  82          */
  83         while ((i = getopt(argc, argv, "")) != -1)
  84                 switch (i) {
  85
  86                 default:
  87                         usage();
  88                 }
  89
  90         /*
  91          * Init sysio lib.
  92          */
  93         err = _test_sysio_startup();
  94         if (err) {
  95                 errno = -err;
  96                 perror("sysio startup");
  97                 exit(1);
  98         }
  99
 100         n = argc - optind;
 101
 102         /*
 103          * Try path(s) listed on command-line.
 104          */
 105         while (optind < argc) {
 106                 const char *path;
 107
 108                 path = argv[optind++];
 109                 (void )statit(path);
 110         }
 111
 112         /*
 113          * If no command-line arguments, read from stdin until EOF.
 114          */
 115         if (!n) {
 116                 int     doflush;
 117                 static char buf[4096];
 118                 size_t  len;
 119                 char    *cp;
 120                 char    c;
 121
 122                 doflush = 0;
 123                 while (fgets(buf, sizeof(buf), stdin) != NULL) {
 124                         len = strlen(buf);
 125                         cp = buf + len - 1;
 126                         c = *cp;
 127                         *cp = '\0';
 128                         if (!doflush)
 129                                 statit(buf);
 130                         doflush = c == '\n' ? 0 : 1;
 131                 }
 132         }
 133
 134         /*
 135          * Clean up.
 136          */
 137         _test_sysio_shutdown();
 138
 139         return 0;
 140 }
 141
 142 static int
 143 statit(const char *path)
 144 {
 145         int     err;
 146         struct stat stbuf;
 147         char    t;
 148         static char buf[4096];
 149         ssize_t cc;
 150
 151         /*
 152          * Get file attrs.
 153          */
 154         err = SYSIO_INTERFACE_NAME(lstat)(path, &stbuf);
 155         if (err) {
 156                 perror(path);
 157                 return -1;
 158         }
 159
 160         /*
 161          * Get readable representation of file type.
 162          */
 163         if (S_ISDIR(stbuf.st_mode))
 164                 t = 'd';
 165         else if (S_ISCHR(stbuf.st_mode))
 166                 t = 'c';
 167         else if (S_ISBLK(stbuf.st_mode))
 168                 t = 'b';
 169         else if (S_ISREG(stbuf.st_mode))
 170                 t = 'f';
 171 #ifdef S_ISFIFO
 172         else if (S_ISFIFO(stbuf.st_mode))
 173                 t = 'p';
 174 #endif
 175 #ifdef S_ISLNK
 176         else if (S_ISLNK(stbuf.st_mode))
 177                 t = 'S';
 178 #endif
 179 #ifdef S_ISSOCK
 180         else if (S_ISSOCK(stbuf.st_mode))
 181                 t = 's';
 182 #endif
 183 #ifdef S_TYPEISMQ
 184         else if (S_TYPEISMQ(&stbuf))
 185                 t = 'q';
 186 #endif
 187 #ifdef S_TYPEISSEM
 188         else if (S_TYPEISSEM(&stbuf))
 189                 t = 'M';
 190 #endif
 191 #ifdef S_TYPEISSHM
 192         else if (S_TYPEISSHM(&stbuf))
 193                 t = 'm';
 194 #endif
 195         else
 196                 t = '?';
 197
 198         /*
 199          * Print path and type.
 200          */
 201         if (S_ISLNK(stbuf.st_mode)) {
 202                 cc = SYSIO_INTERFACE_NAME(readlink)(path, buf, sizeof(buf));
 203                 if (cc < 0) {
 204                         perror(path);
 205                         return -1;
 206                 }
 207         }
 208         (void )printf("%s: %c", path, t);
 209         if (S_ISLNK(stbuf.st_mode) && (size_t )cc < sizeof(buf))
 210                 (void )printf(" %.*s", (int )cc, buf);
 211         (void )putchar('\n');
 212
 213         return 0;
 214 }
 215
 216 static void
 217 usage()
 218 {
 219
 220         (void )fprintf(stderr,
 221                        "Usage: test_path"
 222                        " [<path> ...\n]");
 223
 224         exit(1);
 225 }