io/test-utime.c

   1 /* Copyright (C) 1994-2017 Free Software Foundation, Inc.
   2    This file is part of the GNU C Library.
   3
   4    The GNU C Library is free software; you can redistribute it and/or
   5    modify it under the terms of the GNU Lesser General Public
   6    License as published by the Free Software Foundation; either
   7    version 2.1 of the License, or (at your option) any later version.
   8
   9    The GNU C Library is distributed in the hope that it will be useful,
  10    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12    Lesser General Public License for more details.
  13
  14    You should have received a copy of the GNU Lesser General Public
  15    License along with the GNU C Library; if not, see
  16    <http://www.gnu.org/licenses/>.  */
  17
  18 #include <fcntl.h>
  19 #include <stdint.h>
  20 #include <stdio.h>
  21 #include <stdlib.h>
  22 #include <sys/stat.h>
  23 #include <unistd.h>
  24 #include <utime.h>
  25 #include <time.h>
  26
  27 int
  28 main (int argc, char *argv[])
  29 {
  30   char file[L_tmpnam];
  31   struct utimbuf ut;
  32   struct stat st;
  33   struct stat stnow;
  34   time_t now1, now2;
  35   int fd;
  36
  37   if (tmpnam (file) == 0)
  38     {
  39       perror ("tmpnam");
  40       return 1;
  41     }
  42
  43   fd = creat (file, 0666);
  44   if (fd < 0)
  45     {
  46       perror ("creat");
  47       return 1;
  48     }
  49   close (fd);
  50
  51   /* Test utime with arg */
  52   ut.actime = 500000000;
  53   ut.modtime = 500000001;
  54   if (utime (file, &ut))
  55     {
  56       perror ("utime");
  57       remove (file);
  58       return 1;
  59     }
  60
  61   if (stat (file, &st))
  62     {
  63       perror ("stat");
  64       remove (file);
  65       return 1;
  66     }
  67
  68   /* Test utime with NULL.
  69      Since there's a race condition possible here, we check
  70      the time before and after the call to utime.  */
  71   now1 = time (NULL);
  72   if (now1 == (time_t)-1)
  73     {
  74       perror ("time");
  75       remove (file);
  76       return 1;
  77     }
  78
  79   /* The clocks used to set the modification time and that used in the
  80      time() call need not be the same.  They need not have the same
  81      precision.  Therefore we delay the following operation by one
  82      second which makes sure we can compare with second precision.  */
  83   sleep (1);
  84
  85   if (utime (file, NULL))
  86     {
  87       perror ("utime NULL");
  88       remove (file);
  89       return 1;
  90     }
  91
  92   sleep (1);
  93
  94   now2 = time (NULL);
  95   if (now2 == (time_t)-1)
  96     {
  97       perror ("time");
  98       remove (file);
  99       return 1;
 100     }
 101
 102   if (stat (file, &stnow))
 103     {
 104       perror ("stat");
 105       remove (file);
 106       return 1;
 107     }
 108
 109   remove (file);
 110
 111   if (st.st_mtime != ut.modtime)
 112     {
 113       printf ("modtime %jd != %jd\n",
 114               (intmax_t) st.st_mtime, (intmax_t) ut.modtime);
 115       return 1;
 116     }
 117
 118   if (st.st_atime != ut.actime)
 119     {
 120       printf ("actime %jd != %jd\n",
 121               (intmax_t) st.st_atime, (intmax_t) ut.actime);
 122       return 1;
 123     }
 124
 125   if (stnow.st_mtime < now1 || stnow.st_mtime > now2)
 126     {
 127       printf ("modtime %jd <%jd >%jd\n",
 128               (intmax_t) stnow.st_mtime, (intmax_t) now1, (intmax_t) now2);
 129       return 1;
 130     }
 131
 132   if (stnow.st_atime < now1 || stnow.st_atime > now2)
 133     {
 134       printf ("actime %jd <%jd >%jd\n",
 135               (intmax_t) stnow.st_atime, (intmax_t) now1, (intmax_t) now2);
 136       return 1;
 137     }
 138
 139   puts ("Test succeeded.");
 140   return 0;
 141 }