256 lines
		
	
	
		
			6.5 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			256 lines
		
	
	
		
			6.5 KiB
		
	
	
	
		
			C
		
	
	
	
	
	
/* 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 errct, subtest, passes;
 | 
						|
 | 
						|
_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));
 | 
						|
_PROTOTYPE(void e, (int n));
 | 
						|
_PROTOTYPE(void quit, (void));
 | 
						|
 | 
						|
int main(argc, argv)
 | 
						|
int argc;
 | 
						|
char *argv[];
 | 
						|
{
 | 
						|
  int i, m;
 | 
						|
 | 
						|
  m = (argc == 2 ? atoi(argv[1]) : 0xFFFF);
 | 
						|
 | 
						|
  system("rm -rf DIR_16; mkdir DIR_16");
 | 
						|
  chdir("DIR_16");
 | 
						|
 | 
						|
  printf("Test 16 ");
 | 
						|
  fflush(stdout);
 | 
						|
  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); 
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
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;
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
 | 
						|
void e(n)
 | 
						|
int n;
 | 
						|
{
 | 
						|
  int err_num = errno;		/* save errno in case printf clobbers it */
 | 
						|
 | 
						|
  printf("Subtest %d,  error %d  errno=%d  ", subtest, n, errno);
 | 
						|
  errno = err_num;		/* restore errno, just in case */
 | 
						|
  perror("");
 | 
						|
  if (errct++ > MAX_ERROR) {
 | 
						|
	printf("Too many errors; test aborted\n");
 | 
						|
	chdir("..");
 | 
						|
	system("rm -rf DIR*");
 | 
						|
	exit(1);
 | 
						|
  }
 | 
						|
}
 | 
						|
 | 
						|
void quit()
 | 
						|
{
 | 
						|
 | 
						|
  chdir("..");
 | 
						|
  system("rm -rf DIR*");
 | 
						|
 | 
						|
  if (errct == 0) {
 | 
						|
	printf("ok\n");
 | 
						|
	exit(0);
 | 
						|
  } else {
 | 
						|
	printf("%d errors\n", errct);
 | 
						|
	exit(1);
 | 
						|
  }
 | 
						|
}
 | 
						|
 |