libsysio/tests/test_list.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 #define _BSD_SOURCE
  45
  46 #include <stdio.h>
  47 #include <stdlib.h>
  48 #include <string.h>
  49 #include <unistd.h>
  50 #include <errno.h>
  51 #include <sys/types.h>
  52 #include <sys/stat.h>
  53 #include <fcntl.h>
  54 #include <dirent.h>
  55 #include <sys/uio.h>
  56 #include <sys/queue.h>
  57
  58 #if defined(SYSIO_LABEL_NAMES)
  59 #include "sysio.h"
  60 #endif
  61 #include "xtio.h"
  62 #include "test.h"
  63
  64 /*
  65  * Stat files.
  66  *
  67  * Usage: test_list [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 listit(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 )listit(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                                 listit(buf);
 134                         doflush = c == '\n' ? 0 : 1;
 135                 }
 136         }
 137
 138         /*
 139          * Clean up.
 140          */
 141         _test_sysio_shutdown();
 142
 143         return 0;
 144 }
 145
 146 static int
 147 listit(const char *path)
 148 {
 149         int     fd;
 150         size_t  n;
 151         struct dirent *buf, *dp;
 152         off_t   base;
 153         ssize_t cc;
 154
 155         fd = SYSIO_INTERFACE_NAME(open)(path, O_RDONLY);
 156         if (fd < 0) {
 157                 perror(path);
 158                 return -1;
 159         }
 160
 161         n = 16 * 1024;
 162         buf = malloc(n);
 163         if (!buf) {
 164                 perror(path);
 165                 cc = -1;
 166                 goto out;
 167         }
 168
 169         while ((cc = SYSIO_INTERFACE_NAME(getdirentries)(fd,
 170                                                          (char *)buf,
 171                                                          n,
 172                                                          &base)) > 0) {
 173                 dp = buf;
 174                 while (cc > 0) {
 175                         (void )printf("\t%s: ino %llu type %u\n",
 176                                       dp->d_name,
 177                                       (unsigned long long )dp->d_ino,
 178                                       (int )dp->d_type);
 179                         cc -= dp->d_reclen;
 180                         dp = (struct dirent *)((char *)dp + dp->d_reclen);
 181                 }
 182         }
 183
 184 out:
 185         if (cc < 0)
 186                 perror(path);
 187
 188         free(buf);
 189         {
 190                 int     oerrno = errno;
 191
 192                 if (SYSIO_INTERFACE_NAME(close)(fd) != 0) {
 193                         perror(path);
 194                         if (cc < 0)
 195                                 errno = oerrno;
 196                         else
 197                                 cc = -1;
 198                 }
 199         }
 200
 201         return (int )cc;
 202 }
 203
 204 static void
 205 usage()
 206 {
 207
 208         (void )fprintf(stderr,
 209                        "Usage: list_path"
 210                        " [<path> ...\n]");
 211
 212         exit(1);
 213 }