/* test 16 */

#include <sys/types.h>

#include <sys/stat.h>

#include <errno.h>

#include <fcntl.h>

#include <stdlib.h>

#include <unistd.h>

#include <utime.h>

#include <stdio.h>

#define MAX_ERROR 4

int subtest, passes;

#include "common.c"

_PROTOTYPE(int main, (int argc, char *argv []));

_PROTOTYPE(void test16a, (void));

_PROTOTYPE(void get_times, (char *name, time_t *a, time_t *c, time_t *m));

int main(argc, argv)

int argc;

char *argv[];

{

int i, m;

start(16);

m = (argc == 2 ? atoi(argv[1]) : 0xFFFF);

for (i = 0; i < 4; i++) {

if (m & 0001) test16a();

passes++;

}

quit();

return(-1); /* impossible */

}

void test16a()

{

/* Test atime, ctime, and mtime. */

int fd, fd1, fd2, fd3, fd4;

time_t a, c, m, pa, pc, pm, xa, xc, xm, ya, yc, ym, za, zc, zm, ta, tc, tm;

time_t wa, wc, wm;

char buf[1024];

struct stat s;

subtest = 1;

if (passes > 0) return; /* takes too long to repeat this test */

if ( (fd = creat("T16.a", 0666)) < 0) e(1);

if (write(fd, buf, 1024) != 1024) e(2);

if (close(fd) < 0) e(3);

sleep(1); /* wait 1 sec before continuing */

if ( (fd = open("T16.a", O_RDONLY)) < 0) e(4);

if (read(fd, buf, 3) != 3) e(5);

if (close(fd) != 0) e(6);

if (stat("T16.a", &s) != 0) e(7);

a = s.st_atime;

c = s.st_ctime;

m = s.st_mtime;

if (a == 0) {

/* Almost certainly means we are running a V1 file system. */

printf(" (atime = 0. Probably V1 file system. V2 tests skipped.) ");

return;

}

/* Many system calls affect atime, ctime, and mtime. Test them. They

* fall into several groups. The members of each group can be tested

* together. Start with creat(), mkdir(), and mkfifo, all of which

* set all 3 times on the created object, and ctime and mtime of the dir.

*/

if ( (fd = creat("T16.b", 0666)) < 0) e(8);

if (close(fd) != 0) e(9);

get_times("T16.b", &a, &c, &m);

get_times(".", &pa, &pc, &pm);

if (a != c) e(10);

if (a != m) e(11);

if (a != pc) e(12);

if (a != pm) e(13);

if (unlink("T16.b") < 0) e(14);

/* Test the times for mkfifo. */

if ( (fd = mkfifo("T16.c", 0666)) != 0) e(15);

if (access("T16.c", R_OK | W_OK) != 0) e(16);

get_times("T16.c", &a, &c, &m);

get_times(".", &pa, &pc, &pm);

if (a != c) e(17);

if (a != m) e(18);

if (a != pc) e(19);

if (a != pm) e(20);

if (unlink("T16.c") < 0) e(21);

/* Test the times for mkdir. */

if (mkdir("T16.d", 0666) < 0) e(22);

get_times("T16.d", &a, &c, &m);

get_times(".", &pa, &pc, &pm);

if (a != c) e(23);

if (a != m) e(24);

if (a != pc) e(25);

if (a != pm) e(26);

sleep(1);

if (rmdir("T16.d") < 0) e(27);

get_times(".", &xa, &xc, &xm);

if (c == xc) e(28);

if (m == xm) e(29);

if (xc != xm) e(30);

/* Test open(file, O_TRUNC). */

if ( (fd = open("T16.e", O_WRONLY|O_CREAT, 0666)) < 0) e(31);

if (write(fd, buf, 1024) != 1024) e(32);

if (close(fd) != 0) e(33);

get_times("T16.e", &a, &c, &m);

get_times(".", &pa, &pc, &pm);

sleep(1);

if ( (fd = open("T16.e", O_WRONLY|O_TRUNC)) < 0) e(34);

get_times("T16.e", &xa, &xc, &xm);

get_times(".", &ya, &yc, &ym);

if (c != m) e(35);

if (pc != pm) e(36);

if (c == xc) e(37);

if (m == xm) e(38);

if (yc != pc) e(39);

if (ym != pm) e(40);

if (close(fd) != 0) e(41);

/* Test the times for link/unlink. */

get_times("T16.e", &a, &c, &m);

get_times(".", &ya, &yc, &ym);

sleep(1);

if (link("T16.e", "T16.f") != 0) e(42); /* second link */

get_times("T16.e", &xa, &xc, &xm);

get_times(".", &pa, &pc, &pm);

if (a != xa) e(43);

if (m != xm) e(44);

#ifndef V1_FILESYSTEM

if (c == xc) e(45);

#endif

if (ya != pa) e(46);

if (yc == pc) e(47);

if (ym == pm) e(48);

if (yc != ym) e(49);

if (pc != pm) e(50);

sleep(1);

if (unlink("T16.f") != 0) e(46);

get_times("T16.e", &a, &c, &m);

get_times(".", &ya, &yc, &ym);

if (a != xa) e(51);

if (m != xm) e(52);

#ifndef V1_FILESYSTEM

if (c == xc) e(53);

#endif

if (pa != ya) e(54);

if (pc == yc) e(55);

if (pm == ym) e(56);

if (yc != ym) e(57);

if (unlink("T16.e") != 0) e(58);

/* Test rename, read, write, chmod, utime. */

get_times(".", &pa, &pc, &pm);

if ( (fd = open("T16.g", O_RDWR|O_CREAT)) < 0) e(59);

if ( (fd1 = open("T16.h", O_WRONLY|O_CREAT, 0666)) < 0) e(60);

if ( (fd2 = open("T16.i", O_WRONLY|O_CREAT, 0666)) < 0) e(61);

if ( (fd3 = open("T16.j", O_WRONLY|O_CREAT, 0666)) < 0) e(62);

if ( (fd4 = open("T16.k", O_RDWR|O_CREAT, 0666)) < 0) e(63);

if (write(fd, buf, 1024) != 1024) e(64);

get_times("T16.g", &a, &c, &m);

get_times("T16.h", &pa, &pc, &pm);

get_times("T16.i", &xa, &xc, &xm);

get_times("T16.j", &ya, &yc, &ym);

get_times("T16.k", &za, &zc, &zm);

get_times(".", &wa, &wc, &wm);

sleep(1);

lseek(fd, 0L, SEEK_SET);

if (read(fd, buf, 35) != 35) e(65);

get_times("T16.g", &ta, &tc, &tm);

if (a == ta || c != tc || m != tm) e(66);

if (write(fd1, buf, 35) != 35) e(67);

get_times("T16.h", &ta, &tc, &tm);

if (pa != ta || pc == tc || pm == tm) e(69);

if (rename("T16.i", "T16.i1") != 0) e(70);

get_times("T16.i1", &ta, &tc, &tm);

if (xa != ta || xc != tc || xm != tm) e(71);

get_times(".", &a, &c, &m);

if (a != wa || c == wc || m == wm || wc != wm) e(72);

if (chmod("T16.j", 0777) != 0) e(73);

get_times("T16.j", &ta, &tc, &tm);

if (ya != ta || yc == tc || ym != tm) e(74);

if (utime("T16.k", (void *) 0) != 0) e(75);

get_times("T16.k", &ta, &tc, &tm);

if (za == ta || zc == tc) e(76);

if (close(fd) != 0) e(77);

if (close(fd1) != 0) e(78);

if (close(fd2) != 0) e(79);

if (close(fd3) != 0) e(80);

if (close(fd4) != 0) e(81);

if (unlink("T16.g") != 0) e(82);

if (unlink("T16.h") != 0) e(83);

if (unlink("T16.i1") != 0) e(84);

if (unlink("T16.j") != 0) e(85);

if (unlink("T16.k") != 0) e(86);

/* Test the times for truncate. */

if (system("echo 1 > T16.l") != 0) e(87);

stat("T16.l", &s);

get_times("T16.l", &a, &c, &m);

sleep(1);

truncate("T16.l", s.st_size);

get_times("T16.l", &ta, &tc, &tm);

if (a != ta || c != tc || m != tm) e(88);

}

void get_times(name, a, c, m)

char *name;

time_t *a, *c, *m;

{

struct stat s;

if (stat(name, &s) != 0) e(500);

*a = s.st_atime;

*c = s.st_ctime;

*m = s.st_mtime;

}