minix/test/select/test14.c
2005-08-22 15:08:27 +00:00

144 lines
3.5 KiB
C

/*
* Test name: test14.c
*
* Objetive: The purpose of this test is to make sure that select works
* with ptys.
*
* Adapted from test11.c (pipe test).
*
* Ben Gras
*/
#include <time.h>
#include <sys/types.h>
#include <sys/wait.h>
#include <sys/asynchio.h>
#include <fcntl.h>
#include <unistd.h>
#include <sys/select.h>
#include <stdio.h>
#include <stdlib.h>
#include <limits.h>
#include <string.h>
#include <signal.h>
#include <libutil.h>
char name[100];
void pipehandler(int sig)
{
}
#define CHILDFD 1
#define PARENTFD 0
void do_child(int pty_fds[])
{
/* reads from pipe and prints out the data */
char data[2048];
int retval;
fd_set fds_read;
fd_set fds_exception;
struct timeval timeout;
signal(SIGPIPE, pipehandler);
signal(SIGUSR1, pipehandler);
/* first, close the write part, since it is not needed */
close(pty_fds[PARENTFD]);
while(1) {
FD_ZERO(&fds_read);
FD_ZERO(&fds_exception);
FD_SET(pty_fds[CHILDFD], &fds_read);
FD_SET(pty_fds[CHILDFD], &fds_exception);
timeout.tv_sec = 5;
timeout.tv_usec = 0;
retval = select(pty_fds[CHILDFD]+2, &fds_read, NULL, &fds_exception, &timeout);
if (retval == -1) {
perror("select");
fprintf(stderr, "child: Error in select\n");
continue;
} else printf("child select: %d\n", retval);
if (FD_ISSET(pty_fds[CHILDFD], &fds_exception)) {
printf("child: exception fd set. quitting.\n");
break;
}
if (FD_ISSET(pty_fds[CHILDFD], &fds_read)) {
printf("child: read fd set. reading.\n");
if ((retval = read(pty_fds[CHILDFD], data, sizeof(data))) < 0) {
perror("read");
fprintf(stderr, "child: couldn't read from pty\n");
exit(-1);
}
if(retval == 0) {
fprintf(stderr, "child: eof on pty\n");
break;
}
data[retval] = '\0';
printf("pid %d pty reads (%d): %s\n", getpid(), retval, data);
} else printf("child: no fd set\n");
}
exit(0);
}
void do_parent(int pty_fds[])
{
char data[1024];
int retval;
fd_set fds_write;
signal(SIGPIPE, pipehandler);
signal(SIGUSR1, pipehandler);
/* first, close the read part of pty, since it is not needed */
close(pty_fds[CHILDFD]);
/* now enter a loop of read user input, and writing it to the pty */
while (1) {
FD_ZERO(&fds_write);
FD_SET(pty_fds[PARENTFD], &fds_write);
printf("pid %d Waiting for pty ready to write on %s...\n",
getpid(), name);
retval = select(pty_fds[PARENTFD]+2, NULL, &fds_write, NULL, NULL);
if (retval == -1) {
perror("select");
fprintf(stderr, "Parent: Error in select\n");
exit(-1);
}
printf("Input data: ");
if(!gets(data)) {
printf("parent: eof; exiting\n");
break;
}
if (!strcmp(data, "exit"))
break;
if (!FD_ISSET(pty_fds[PARENTFD], &fds_write)) {
fprintf(stderr, "parent: write fd not set?! retrying\n");
continue;
}
retval = write(pty_fds[PARENTFD], data, 1024);
if (retval == -1) {
perror("write");
fprintf(stderr, "Error writing on pty\n");
exit(-1);
} else printf("wrote %d\n", retval);
}
/* got exit from user */
close(pty_fds[PARENTFD]); /* close pty, let child know we're done */
wait(&retval);
printf("Child exited with status: %d\n", retval);
exit(0);
}
int main(int argc, char *argv[])
{
int ptys[2];
int retval;
int pid;
if(openpty(&ptys[0], &ptys[1], name, NULL, NULL) < 0) {
perror("openpty");
return 1;
}
printf("Using %s\n", name);
pid = fork();
if (pid == -1) {
fprintf(stderr, "Error forking\n");
exit(-1);
}
if (pid == 0) /* child proc */
do_child(ptys);
else
do_parent(ptys);
/* not reached */
return 0;
}