io/test-lfs.c

   1 /* Some basic tests for LFS.
   2    Copyright (C) 2000, 2001 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, write to the Free
  18    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  19    02111-1307 USA.  */
  20
  21 #include <unistd.h>
  22 #include <stdlib.h>
  23 #include <sys/types.h>
  24 #include <sys/stat.h>
  25 #include <fcntl.h>
  26 #include <error.h>
  27 #include <errno.h>
  28 #include <sys/resource.h>
  29
  30 /* Prototype for our test function.  */
  31 extern void do_prepare (int argc, char *argv[]);
  32 extern int do_test (int argc, char *argv[]);
  33
  34 /* We have a preparation function.  */
  35 #define PREPARE do_prepare
  36
  37 /* We might need a bit longer timeout.  */
  38 #define TIMEOUT 20 /* sec */
  39
  40 /* This defines the `main' function and some more.  */
  41 #include <test-skeleton.c>
  42
  43 /* These are for the temporary file we generate.  */
  44 char *name;
  45 int fd;
  46
  47 /* 2^31 = 2GB.  */
  48 #define TWO_GB 2147483648LL
  49
  50 void
  51 do_prepare (int argc, char *argv[])
  52 {
  53   size_t name_len;
  54   struct rlimit64 rlim;
  55
  56   name_len = strlen (test_dir);
  57   name = malloc (name_len + sizeof ("/lfsXXXXXX"));
  58   mempcpy (mempcpy (name, test_dir, name_len),
  59            "/lfsXXXXXX", sizeof ("/lfsXXXXXX"));
  60   add_temp_file (name);
  61
  62   /* Open our test file.   */
  63   fd = mkstemp64 (name);
  64   if (fd == -1)
  65     {
  66       if (errno == ENOSYS)
  67         {
  68           /* Fail silently.  */
  69           error (0, 0, "open64 is not supported");
  70           exit (EXIT_SUCCESS);
  71         }
  72       else
  73         error (EXIT_FAILURE, errno, "cannot create temporary file");
  74     }
  75
  76   if (getrlimit64 (RLIMIT_FSIZE, &rlim) != 0)
  77     {
  78       error (0, errno, "cannot get resource limit");
  79       exit (0);
  80     }
  81   if (rlim.rlim_cur < TWO_GB + 200)
  82     {
  83       rlim.rlim_cur = TWO_GB + 200;
  84       if (setrlimit64 (RLIMIT_FSIZE, &rlim) != 0)
  85         {
  86           error (0, errno, "cannot reset file size limits");
  87           exit (0);
  88         }
  89     }
  90 }
  91
  92 static void
  93 test_ftello (void)
  94 {
  95   FILE *f;
  96   int ret;
  97   off64_t pos;
  98
  99   f = fopen64 (name, "w");
 100
 101   ret = fseeko64 (f, TWO_GB+100, SEEK_SET);
 102   if (ret == -1 && errno == ENOSYS)
 103     {
 104       error (0, 0, "fseeko64 is not supported.");
 105       exit (EXIT_SUCCESS);
 106     }
 107   if (ret == -1 && errno == EINVAL)
 108     {
 109       error (0, 0, "LFS seems not to be supported");
 110       exit (EXIT_SUCCESS);
 111     }
 112   if (ret == -1)
 113     {
 114       error (0, errno, "fseeko64 failed with error");
 115       exit (EXIT_FAILURE);
 116     }
 117
 118   ret = fwrite ("Hello", 1, 5, f);
 119   if (ret == -1 && errno == EFBIG)
 120     {
 121       error (0, errno, "LFS seems not to be supported");
 122       exit (EXIT_SUCCESS);
 123     }
 124
 125   if (ret == -1 && errno == ENOSPC)
 126     {
 127       error (0, 0, "Not enough space to write file.");
 128       exit (EXIT_SUCCESS);
 129     }
 130
 131   if (ret != 5)
 132     error (EXIT_FAILURE, errno, "Cannot write test string to large file");
 133
 134   pos = ftello64 (f);
 135
 136   if (pos != TWO_GB+105)
 137     {
 138       error (0, 0, "ftello64 gives wrong result.");
 139       exit (EXIT_FAILURE);
 140     }
 141
 142   fclose (f);
 143 }
 144
 145 int
 146 do_test (int argc, char *argv[])
 147 {
 148   int ret;
 149   struct stat64 statbuf;
 150
 151   ret = lseek64 (fd, TWO_GB+100, SEEK_SET);
 152   if (ret == -1 && errno == ENOSYS)
 153     {
 154       error (0, 0, "lseek64 is not supported.");
 155       exit (EXIT_SUCCESS);
 156     }
 157   if (ret == -1 && errno == EINVAL)
 158     {
 159       error (0, 0, "LFS seems not to be supported.");
 160       exit (EXIT_SUCCESS);
 161     }
 162   if (ret == -1)
 163     {
 164       error (0, errno, "lseek64 failed with error");
 165       exit (EXIT_FAILURE);
 166     }
 167
 168   ret = write (fd, "Hello", 5);
 169   if (ret == -1 && errno == EFBIG)
 170     {
 171       error (0, 0, "LFS seems not to be supported.");
 172       exit (EXIT_SUCCESS);
 173     }
 174
 175   if (ret == -1 && errno == ENOSPC)
 176     {
 177       error (0, 0, "Not enough space to write file.");
 178       exit (EXIT_SUCCESS);
 179     }
 180
 181   if (ret != 5)
 182     error (EXIT_FAILURE, errno, "cannot write test string to large file");
 183
 184   ret = close (fd);
 185
 186   if (ret == -1)
 187     error (EXIT_FAILURE, errno, "error closing file");
 188
 189   ret = stat64 (name, &statbuf);
 190
 191   if (ret == -1 && (errno == ENOSYS || errno == EOVERFLOW))
 192     error (0, 0, "stat64 is not supported.");
 193   else if (ret == -1)
 194     error (EXIT_FAILURE, errno, "cannot stat file `%s'", name);
 195   else if (statbuf.st_size != (TWO_GB + 100 + 5))
 196     error (EXIT_FAILURE, 0, "stat reported size %lld instead of %lld.",
 197            (long long int) statbuf.st_size, (TWO_GB + 100 + 5));
 198
 199   test_ftello ();
 200
 201   return 0;
 202 }