#include <stdio.h>
#include <stdlib.h>
#include <ctype.h>
#include <errno.h>
#include <unistd.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <sys/wait.h>
#include <sys/un.h>
#include <sys/stat.h>
#include <limits.h>
#include <fcntl.h>

#include "zdtmtst.h"

const char *test_doc = "Test semi-closed unix stream connection\n";
const char *test_author = "Pavel Emelyanov <xemul@parallels.com>\n";

#ifdef ZDTM_UNIX_SEQPACKET
#define SOCK_TYPE SOCK_SEQPACKET
#else
#define SOCK_TYPE SOCK_STREAM
#endif

int main(int argc, char *argv[])
{
	int ssk_pair[2], ret;
	char aux, data;

	test_init(argc, argv);

	data = (char)lrand48();

	if (socketpair(AF_UNIX, SOCK_TYPE, 0, ssk_pair) == -1) {
		fail("socketpair");
		exit(1);
	}

	if (write(ssk_pair[1], &data, sizeof(data)) != sizeof(data)) {
		fail("write");
		exit(1);
	}

	close(ssk_pair[1]);

	test_daemon();
	test_waitsig();

	ret = read(ssk_pair[0], &aux, sizeof(aux));
	if (ret != sizeof(data) && aux != data) {
		fail("Data loss (write %d, read %d)", data, aux);
		return 1;
	}

	errno = 0;
	ret = read(ssk_pair[0], &aux, sizeof(aux));
	if (ret != 0 || errno != 0) {
		fail("Opened end in wrong state (ret=%d)", ret);
		return 0;
	}

	errno = 0;
	ret = read(ssk_pair[1], &aux, sizeof(aux));
	if (ret != -1 || errno != EBADF) {
		fail("Closed end in wrong state (ret=%d)", ret);
		return 0;
	}

	pass();
	return 0;
}
