io/test-lfs.c

   1 /* Some basic tests for LFS.
   2    Copyright (C) 2000-2014 Free Software Foundation, Inc.
   3    This file is part of the GNU C Library.
   4    Contributed by Andreas Jaeger <aj@suse.de>, 2000.
   5
   6    The GNU C Library is free software; you can redistribute it and/or
   7    modify it under the terms of the GNU Lesser General Public
   8    License as published by the Free Software Foundation; either
   9    version 2.1 of the License, or (at your option) any later version.
  10
  11    The GNU C Library is distributed in the hope that it will be useful,
  12    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14    Lesser General Public License for more details.
  15
  16    You should have received a copy of the GNU Lesser General Public
  17    License along with the GNU C Library; if not, see
  18    <http://www.gnu.org/licenses/>.  */
  19
  20 #include <unistd.h>
  21 #include <stdlib.h>
  22 #include <sys/types.h>
  23 #include <sys/stat.h>
  24 #include <fcntl.h>
  25 #include <error.h>
  26 #include <errno.h>
  27 #include <sys/resource.h>
  28
  29 /* Prototype for our test function.  */
  30 extern void do_prepare (int argc, char *argv[]);
  31 extern int do_test (int argc, char *argv[]);
  32
  33 /* We have a preparation function.  */
  34 #define PREPARE do_prepare
  35
  36 /* We might need a bit longer timeout.  */
  37 #define TIMEOUT 20 /* sec */
  38
  39 /* This defines the `main' function and some more.  */
  40 #include <test-skeleton.c>
  41
  42 /* These are for the temporary file we generate.  */
  43 char *name;
  44 int fd;
  45
  46 /* 2^31 = 2GB.  */
  47 #define TWO_GB 2147483648LL
  48
  49 void
  50 do_prepare (int argc, char *argv[])
  51 {
  52   size_t name_len;
  53   struct rlimit64 rlim;
  54
  55   name_len = strlen (test_dir);
  56   name = malloc (name_len + sizeof ("/lfsXXXXXX"));
  57   mempcpy (mempcpy (name, test_dir, name_len),
  58            "/lfsXXXXXX", sizeof ("/lfsXXXXXX"));
  59   add_temp_file (name);
  60
  61   /* Open our test file.   */
  62   fd = mkstemp64 (name);
  63   if (fd == -1)
  64     {
  65       if (errno == ENOSYS)
  66         {
  67           /* Fail silently.  */
  68           error (0, 0, "open64 is not supported");
  69           exit (EXIT_SUCCESS);
  70         }
  71       else
  72         error (EXIT_FAILURE, errno, "cannot create temporary file");
  73     }
  74
  75   if (getrlimit64 (RLIMIT_FSIZE, &rlim) != 0)
  76     {
  77       error (0, errno, "cannot get resource limit");
  78       exit (0);
  79     }
  80   if (rlim.rlim_cur < TWO_GB + 200)
  81     {
  82       rlim.rlim_cur = TWO_GB + 200;
  83       if (setrlimit64 (RLIMIT_FSIZE, &rlim) != 0)
  84         {
  85           error (0, errno, "cannot reset file size limits");
  86           exit (0);
  87         }
  88     }
  89 }
  90
  91 static void
  92 test_ftello (void)
  93 {
  94   FILE *f;
  95   int ret;
  96   off64_t pos;
  97
  98   f = fopen64 (name, "w");
  99
 100   ret = fseeko64 (f, TWO_GB+100, SEEK_SET);
 101   if (ret == -1 && errno == ENOSYS)
 102     {
 103       error (0, 0, "fseeko64 is not supported.");
 104       exit (EXIT_SUCCESS);
 105     }
 106   if (ret == -1 && errno == EINVAL)
 107     {
 108       error (0, 0, "LFS seems not to be supported");
 109       exit (EXIT_SUCCESS);
 110     }
 111   if (ret == -1)
 112     {
 113       error (0, errno, "fseeko64 failed with error");
 114       exit (EXIT_FAILURE);
 115     }
 116
 117   ret = fwrite ("Hello", 1, 5, f);
 118   if (ret == -1 && errno == EFBIG)
 119     {
 120       error (0, errno, "LFS seems not to be supported");
 121       exit (EXIT_SUCCESS);
 122     }
 123
 124   if (ret == -1 && errno == ENOSPC)
 125     {
 126       error (0, 0, "Not enough space to write file.");
 127       exit (EXIT_SUCCESS);
 128     }
 129
 130   if (ret != 5)
 131     error (EXIT_FAILURE, errno, "Cannot write test string to large file");
 132
 133   pos = ftello64 (f);
 134
 135   if (pos != TWO_GB+105)
 136     {
 137       error (0, 0, "ftello64 gives wrong result.");
 138       exit (EXIT_FAILURE);
 139     }
 140
 141   fclose (f);
 142 }
 143
 144 int
 145 do_test (int argc, char *argv[])
 146 {
 147   int ret;
 148   struct stat64 statbuf;
 149
 150   ret = lseek64 (fd, TWO_GB+100, SEEK_SET);
 151   if (ret == -1 && errno == ENOSYS)
 152     {
 153       error (0, 0, "lseek64 is not supported.");
 154       exit (EXIT_SUCCESS);
 155     }
 156   if (ret == -1 && errno == EINVAL)
 157     {
 158       error (0, 0, "LFS seems not to be supported.");
 159       exit (EXIT_SUCCESS);
 160     }
 161   if (ret == -1)
 162     {
 163       error (0, errno, "lseek64 failed with error");
 164       exit (EXIT_FAILURE);
 165     }
 166
 167   ret = write (fd, "Hello", 5);
 168   if (ret == -1 && errno == EFBIG)
 169     {
 170       error (0, 0, "LFS seems not to be supported.");
 171       exit (EXIT_SUCCESS);
 172     }
 173
 174   if (ret == -1 && errno == ENOSPC)
 175     {
 176       error (0, 0, "Not enough space to write file.");
 177       exit (EXIT_SUCCESS);
 178     }
 179
 180   if (ret != 5)
 181     error (EXIT_FAILURE, errno, "cannot write test string to large file");
 182
 183   ret = close (fd);
 184
 185   if (ret == -1)
 186     error (EXIT_FAILURE, errno, "error closing file");
 187
 188   ret = stat64 (name, &statbuf);
 189
 190   if (ret == -1 && (errno == ENOSYS || errno == EOVERFLOW))
 191     error (0, 0, "stat64 is not supported.");
 192   else if (ret == -1)
 193     error (EXIT_FAILURE, errno, "cannot stat file `%s'", name);
 194   else if (statbuf.st_size != (TWO_GB + 100 + 5))
 195     error (EXIT_FAILURE, 0, "stat reported size %lld instead of %lld.",
 196            (long long int) statbuf.st_size, (TWO_GB + 100 + 5));
 197
 198   test_ftello ();
 199
 200   return 0;
 201 }