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 #include <stdio.h>
  45 #include <stdlib.h>
  46 #include <string.h>
  47 #include <unistd.h>
  48 #include <errno.h>
  49 #include <sys/types.h>
  50 #include <sys/stat.h>
  51 #include <fcntl.h>
  52 #include <dirent.h>
  53 #include <sys/uio.h>
  54 #include <sys/queue.h>
  55 #include <getopt.h>
  56
  57 #if defined(SYSIO_LABEL_NAMES)
  58 #include "sysio.h"
  59 #endif
  60 #include "xtio.h"
  61 #include "test.h"
  62
  63 /*
  64  * Stat files.
  65  *
  66  * Usage: test_list [path...]
  67  *
  68  * Without any path arguments, the program reads from standard-in, dealing with
  69  * each line as an absolute or relative path until EOF.
  70  */
  71
  72 static int listit(const char *path);
  73 static void usage(void);
  74
  75 int
  76 main(int argc, char *const argv[])
  77 {
  78         int     i;
  79         int     err;
  80         int     n;
  81         extern int _test_sysio_startup(void);
  82
  83         /*
  84          * Parse command line arguments.
  85          */
  86         while ((i = getopt(argc, argv, "")) != -1)
  87                 switch (i) {
  88
  89                 default:
  90                         usage();
  91                 }
  92
  93         /*
  94          * Init sysio lib.
  95          */
  96         err = _test_sysio_startup();
  97         if (err) {
  98                 errno = -err;
  99                 perror("sysio startup");
 100                 exit(1);
 101         }
 102
 103         n = argc - optind;
 104
 105         /*
 106          * Try path(s) listed on command-line.
 107          */
 108         while (optind < argc) {
 109                 const char *path;
 110
 111                 path = argv[optind++];
 112                 (void )listit(path);
 113         }
 114
 115         /*
 116          * If no command-line arguments, read from stdin until EOF.
 117          */
 118         if (!n) {
 119                 int     doflush;
 120                 static char buf[4096];
 121                 size_t  len;
 122                 char    *cp;
 123                 char    c;
 124
 125                 doflush = 0;
 126                 while (fgets(buf, sizeof(buf), stdin) != NULL) {
 127                         len = strlen(buf);
 128                         cp = buf + len - 1;
 129                         c = *cp;
 130                         *cp = '\0';
 131                         if (!doflush)
 132                                 listit(buf);
 133                         doflush = c == '\n' ? 0 : 1;
 134                 }
 135         }
 136
 137         /*
 138          * Clean up.
 139          */
 140         _test_sysio_shutdown();
 141
 142         return 0;
 143 }
 144
 145 static int
 146 listit(const char *path)
 147 {
 148         int     fd;
 149         size_t  n;
 150         struct dirent *buf, *dp;
 151         off_t   base;
 152         ssize_t cc;
 153
 154         fd = SYSIO_INTERFACE_NAME(open)(path, O_RDONLY);
 155         if (fd < 0) {
 156                 perror(path);
 157                 return -1;
 158         }
 159
 160         n = 16 * 1024;
 161         buf = malloc(n);
 162         if (!buf) {
 163                 perror(path);
 164                 cc = -1;
 165                 goto out;
 166         }
 167
 168         while ((cc = SYSIO_INTERFACE_NAME(getdirentries)(fd,
 169                                                          (char *)buf,
 170                                                          n,
 171                                                          &base)) > 0) {
 172                 dp = buf;
 173                 while (cc > 0) {
 174                         (void )printf("\t%s: ino %llu type %u\n",
 175                                       dp->d_name,
 176                                       (unsigned long long )dp->d_ino,
 177                                       (int )dp->d_type);
 178                         cc -= dp->d_reclen;
 179                         dp = (struct dirent *)((char *)dp + dp->d_reclen);
 180                 }
 181         }
 182
 183 out:
 184         if (cc < 0)
 185                 perror(path);
 186
 187         free(buf);
 188         {
 189                 int     oerrno = errno;
 190
 191                 if (SYSIO_INTERFACE_NAME(close)(fd) != 0) {
 192                         perror(path);
 193                         if (cc < 0)
 194                                 errno = oerrno;
 195                         else
 196                                 cc = -1;
 197                 }
 198         }
 199
 200         return (int )cc;
 201 }
 202
 203 static void
 204 usage()
 205 {
 206
 207         (void )fprintf(stderr,
 208                        "Usage: list_path"
 209                        " [<path> ...\n]");
 210
 211         exit(1);
 212 }