1  /* Copyright (C) 1994-2023 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     <https://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[] = "/tmp/test-utime.XXXXXX";
      31    struct utimbuf ut;
      32    struct stat st;
      33    struct stat stnow;
      34    time_t now1, now2;
      35    int fd;
      36  
      37    fd = mkstemp (file);
      38    if (fd < 0)
      39      {
      40        perror ("mkstemp");
      41        return 1;
      42      }
      43    close (fd);
      44  
      45    /* Test utime with arg */
      46    ut.actime = 500000000;
      47    ut.modtime = 500000001;
      48    if (utime (file, &ut))
      49      {
      50        perror ("utime");
      51        remove (file);
      52        return 1;
      53      }
      54  
      55    if (stat (file, &st))
      56      {
      57        perror ("stat");
      58        remove (file);
      59        return 1;
      60      }
      61  
      62    /* Test utime with NULL.
      63       Since there's a race condition possible here, we check
      64       the time before and after the call to utime.  */
      65    now1 = time (NULL);
      66    if (now1 == (time_t)-1)
      67      {
      68        perror ("time");
      69        remove (file);
      70        return 1;
      71      }
      72  
      73    /* The clocks used to set the modification time and that used in the
      74       time() call need not be the same.  They need not have the same
      75       precision.  Therefore we delay the following operation by one
      76       second which makes sure we can compare with second precision.  */
      77    sleep (1);
      78  
      79    if (utime (file, NULL))
      80      {
      81        perror ("utime NULL");
      82        remove (file);
      83        return 1;
      84      }
      85  
      86    sleep (1);
      87  
      88    now2 = time (NULL);
      89    if (now2 == (time_t)-1)
      90      {
      91        perror ("time");
      92        remove (file);
      93        return 1;
      94      }
      95  
      96    if (stat (file, &stnow))
      97      {
      98        perror ("stat");
      99        remove (file);
     100        return 1;
     101      }
     102  
     103    remove (file);
     104  
     105    if (st.st_mtime != ut.modtime)
     106      {
     107        printf ("modtime %jd != %jd\n",
     108  	      (intmax_t) st.st_mtime, (intmax_t) ut.modtime);
     109        return 1;
     110      }
     111  
     112    if (st.st_atime != ut.actime)
     113      {
     114        printf ("actime %jd != %jd\n",
     115  	      (intmax_t) st.st_atime, (intmax_t) ut.actime);
     116        return 1;
     117      }
     118  
     119    if (stnow.st_mtime < now1 || stnow.st_mtime > now2)
     120      {
     121        printf ("modtime %jd <%jd >%jd\n",
     122  	      (intmax_t) stnow.st_mtime, (intmax_t) now1, (intmax_t) now2);
     123        return 1;
     124      }
     125  
     126    if (stnow.st_atime < now1 || stnow.st_atime > now2)
     127      {
     128        printf ("actime %jd <%jd >%jd\n",
     129  	      (intmax_t) stnow.st_atime, (intmax_t) now1, (intmax_t) now2);
     130        return 1;
     131      }
     132  
     133    puts ("Test succeeded.");
     134    return 0;
     135  }