Minix2.0/src/test/test30.c
/* test30: creat() (p) Jan-Mark Wams. email: jms@cs.vu.nl */
/*
** Creat() should be equivalent to:
** open(path, O_WRONLY | O_CREAT | O_TRUNC, mode);
** Since we can not look in the source, we can not assume creat() is
** a mere sysnonym (= a systemcall synonym).
*/
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/wait.h>
#include <stdlib.h>
#include <unistd.h>
#include <string.h>
#include <fcntl.h>
#include <limits.h>
#include <errno.h>
#include <time.h>
#include <stdio.h>
#define MAX_ERROR 4
#define ITERATIONS 10
#define System(cmd) if (system(cmd) != 0) printf("``%s'' failed\n", cmd)
#define Chdir(dir) if (chdir(dir) != 0) printf("Can't goto %s\n", dir)
#define Stat(a,b) if (stat(a,b) != 0) printf("Can't stat %s\n", a)
int errct = 0;
int subtest = 1;
int superuser;
char MaxName[NAME_MAX + 1]; /* Name of maximum length */
char MaxPath[PATH_MAX]; /* Same for path */
char ToLongName[NAME_MAX + 2]; /* Name of maximum +1 length */
char ToLongPath[PATH_MAX + 1]; /* Same for path, both too long */
_PROTOTYPE(void main, (int argc, char *argv[]));
_PROTOTYPE(void test30a, (void));
_PROTOTYPE(void test30b, (void));
_PROTOTYPE(void test30c, (void));
_PROTOTYPE(void makelongnames, (void));
_PROTOTYPE(void e, (int number));
_PROTOTYPE(void quit, (void));
void main(argc, argv)
int argc;
char *argv[];
{
int i, m = 0xFFFF;
sync();
if (argc == 2) m = atoi(argv[1]);
printf("Test 30 ");
fflush(stdout);
System("rm -rf DIR_30; mkdir DIR_30");
Chdir("DIR_30");
makelongnames();
superuser = (geteuid() == 0);
umask(0000);
for (i = 0; i < ITERATIONS; i++) {
if (m & 0001) test30a();
if (m & 0002) test30b();
if (m & 0004) test30c();
}
quit();
}
void test30a()
{ /* Test normal operation. */
#define BUF_SIZE 1024
int fd1, fd2;
char buf[BUF_SIZE];
struct stat st, dirst;
time_t time1, time2;
int stat_loc, cnt;
subtest = 1;
System("rm -rf ../DIR_30/*");
/* Check if processes have independent new fds */
switch (fork()) {
case -1: printf("Can't fork\n"); break;
case 0:
alarm(20);
if ((fd1 = creat("myfile", 0644)) != 3) e(1);
if (close(fd1) != 0) e(2);
exit(0);
default:
if ((fd1 = creat("myfile", 0644)) != 3) e(3);
if (close(fd1) != 0) e(4);
if (wait(&stat_loc) == -1) e(5);
if (stat_loc != 0) e(6);
}
/* Save the dir status. */
Stat(".", &dirst);
time(&time1);
while (time1 == time((time_t *)0))
;
/* Check if the file status information is updated correctly */
cnt = 0;
System("rm -rf myfile");
do {
time(&time1);
if ((fd1 = creat("myfile", 0644)) != 3) e(7);
Stat("myfile", &st);
time(&time2);
} while (time1 != time2 && cnt++ < 100);
if (cnt >= 100) e(8);
if (st.st_uid != geteuid()) e(9); /* Uid should be set. */
#if defined(NGROUPS_MAX) && NGROUPS_MAX == 0
if (st.st_gid != getegid()) e(10);
#endif /* defined(NGROUPS_MAX) && NGROUPS_MAX == 0 */
if (!S_ISREG(st.st_mode)) e(11);
if (st.st_mode & 0777 != 0644) e(12);
if (st.st_nlink != 1) e(13);
if (st.st_ctime != time1) e(14); /* All time fields should be updated */
if (st.st_atime != time1) e(15);
if (st.st_mtime != time1) e(16);
if (st.st_size != 0) e(17); /* File should be trunked. */
/* Check if c and mtime for "." is updated. */
Stat(".", &st);
if (st.st_ctime <= dirst.st_ctime) e(18);
if (st.st_mtime <= dirst.st_mtime) e(19);
/* Let's see if cread fds are write only. */
if (read(fd1, buf, 7) != -1) e(20); /* we can't read */
if (errno != EBADF) e(21); /* a write only fd */
if (write(fd1, "HELLO", 6) != 6) e(22); /* but we can write */
/* No O_APPEND flag should have been used. */
if (lseek(fd1, (off_t) 1, SEEK_SET) != 1) e(23);
if (write(fd1, "ello", 5) != 5) e(24);
Stat("myfile", &st);
if (st.st_size != 6) e(25);
if (st.st_size == 11) e(26); /* O_APPEND should make it 11. */
if (close(fd1) != 0) e(27);
/* A creat should set the file offset to 0. */
if ((fd1 = creat("myfile", 0644)) != 3) e(28);
if (lseek(fd1, (off_t) 0, SEEK_CUR) != 0) e(29);
if (close(fd1) != 0) e(30);
/* Test if file permission bits and the file ownership are unchanged. */
/* So we will see if creat() is just an open() if the file exists. */
if (superuser) {
System("echo > bar; chmod 073 bar"); /* Make bar 073 */
if (chown("bar", 1, 1) != 0) e(1137);
fd1 = creat("bar", 0777); /* knock knock */
if (fd1 == -1) e(31);
Stat("bar", &st);
if (st.st_size != (size_t) 0) e(32); /* empty file. */
if (write(fd1, "foo", 3) != 3) e(33); /* rewrite bar */
if (close(fd1) != 0) e(34);
Stat("bar", &st);
if (st.st_uid != 1) e(35);
if (st.st_gid != 1) e(36);
if ((st.st_mode & 0777) != 073) e(37); /* mode still is 077 */
if (st.st_size != (size_t) 3) e(38);
}
/* Fifo's should be openable with creat(). */
if (mkfifo("fifo", 0644) != 0) e(39);
/* Creat() should have no effect on FIFO files. */
switch (fork()) {
case -1: printf("Can't fork\n"); break;
case 0:
alarm(20); /* Give child 20 seconds to live. */
if ((fd1 = open("fifo", O_WRONLY)) != 3) e(40);
if (write(fd1, "I did see Elvis.\n", 18) != 18) e(41);
if ((fd2 = creat("fifo", 0644)) != 4) e(42);
if (write(fd2, "I DID.\n", 8) != 8) e(43);
if (close(fd2) != 0) e(44);
if (close(fd1) != 0) e(45);
exit(0);
default:
if ((fd1 = open("fifo", O_RDONLY)) != 3) e(46);
if (read(fd1, buf, 18) != 18) e(47);
if (strcmp(buf, "I did see Elvis.\n") != 0) e(48);
if (strcmp(buf, "I DID.\n") == 0) e(49);
if (read(fd1, buf, BUF_SIZE) != 8) e(50);
if (strcmp(buf, "I DID.\n") != 0) e(51);
if (close(fd1) != 0) e(52);
if (wait(&stat_loc) == -1) e(53);
if (stat_loc != 0) e(54); /* The alarm went off? */
}
/* Creat() should have no effect on directroys. */
System("mkdir dir; touch dir/f1 dir/f2 dir/f3");
if ((fd1 = creat("dir", 0644)) != -1) e(55);
if (errno != EISDIR) e(56);
close(fd1);
/* The path should contain only dirs in the prefix. */
if ((fd1 = creat("dir/f1/nono", 0644)) != -1) e(57);
if (errno != ENOTDIR) e(58);
close(fd1);
/* The path should contain only dirs in the prefix. */
if ((fd1 = creat("", 0644)) != -1) e(59);
if (errno != ENOENT) e(60);
close(fd1);
if ((fd1 = creat("dir/noso/nono", 0644)) != -1) e(61);
if (errno != ENOENT) e(62);
close(fd1);
}
void test30b()
{
int fd;
subtest = 2;
System("rm -rf ../DIR_30/*");
/* Test maximal file name length. */
if ((fd = creat(MaxName, 0777)) != 3) e(1);
if (close(fd) != 0) e(2);
MaxPath[strlen(MaxPath) - 2] = '/';
MaxPath[strlen(MaxPath) - 1] = 'a'; /* make ././.../a */
if ((fd = creat(MaxPath, 0777)) != 3) e(3);
if (close(fd) != 0) e(4);
MaxPath[strlen(MaxPath) - 1] = '/'; /* make ././.../a */
}
void test30c()
{
int fd;
subtest = 3;
System("rm -rf ../DIR_30/*");
if (!superuser) {
/* Test if creat is not usable to open files with the wrong mode */
System("> nono; chmod 177 nono");
fd = creat("nono", 0777);
if (fd != -1) e(1);
if (errno != EACCES) e(2);
}
if (mkdir("bar", 0777) != 0) e(3); /* make bar */
/* Check if no access on part of path generates the correct error. */
System("chmod 577 bar"); /* r-xrwxrwx */
if (!superuser) {
/* Normal users can't creat without write permision. */
if (creat("bar/nono", 0666) != -1) e(4);
if (errno != EACCES) e(5);
if (creat("bar/../nono", 0666) != -1) e(6);
if (errno != EACCES) e(7);
}
if (superuser) {
/* Super user can still creat stuff. */
if ((fd = creat("bar/nono", 0666)) != 3) e(8);
if (close(fd) != 0) e(9);
if (unlink("bar/nono") != 0) e(10);
}
/* Clean up bar. */
System("rm -rf bar");
/* Test ToLongName and ToLongPath */
#ifdef _POSIX_NO_TRUNC
# if _POSIX_NO_TRUNC - 0 != -1
if ((fd = creat(ToLongName, 0777)) != -1) e(11);
if (errno != ENAMETOOLONG) e(12);
close(fd); /* Just in case. */
# else
if ((fd = creat(ToLongName, 0777)) != 3) e(13);
if (close(fd) != 0) e(14);
# endif
#else
# include "error, this case requires dynamic checks and is not handled"
#endif
ToLongPath[PATH_MAX - 2] = '/';
ToLongPath[PATH_MAX - 1] = 'a';
if ((fd = creat(ToLongPath, 0777)) != -1) e(15);
if (errno != ENAMETOOLONG) e(16);
if (close(fd) != -1) e(17);
ToLongPath[PATH_MAX - 1] = '/';
}
void makelongnames()
{
register int i;
memset(MaxName, 'a', NAME_MAX);
MaxName[NAME_MAX] = '\0';
for (i = 0; i < PATH_MAX - 1; i++) { /* idem path */
MaxPath[i++] = '.';
MaxPath[i] = '/';
}
MaxPath[PATH_MAX - 1] = '\0';
strcpy(ToLongName, MaxName); /* copy them Max to ToLong */
strcpy(ToLongPath, MaxPath);
ToLongName[NAME_MAX] = 'a';
ToLongName[NAME_MAX + 1] = '\0'; /* extend ToLongName by one too many */
ToLongPath[PATH_MAX - 1] = '/';
ToLongPath[PATH_MAX] = '\0'; /* inc ToLongPath by one */
}
void e(n)
int n;
{
int err_num = errno; /* Save in case printf clobbers it. */
printf("Subtest %d, error %d errno=%d: ", subtest, n, errno);
errno = err_num;
perror("");
if (errct++ > MAX_ERROR) {
printf("Too many errors; test aborted\n");
chdir("..");
system("rm -rf DIR*");
exit(1);
}
errno = 0;
}
void quit()
{
Chdir("..");
System("rm -rf DIR_30");
if (errct == 0) {
printf("ok\n");
exit(0);
} else {
printf("%d errors\n", errct);
exit(1);
}
}