Subversion Repositories or1k

/* testlib.c - test expectlib */
 
#include <stdio.h>
#include "expect.h"
 
timedout()
{
	fprintf(stderr,"timed out\n");
	exit(-1);
}
 
char move[100];
 
read_first_move(fp)
FILE *fp;
{
	if (EXP_TIMEOUT == exp_fexpectl(fp,
				exp_glob,"first\r\n1.*\r\n",0,
				exp_end)) {
		timedout();
	}
	sscanf(exp_match,"%*s 1. %s",move);
}
 
/* moves and counter-moves are printed out in different formats, sigh... */
 
read_counter_move(fp)
FILE *fp;
{
	switch (exp_fexpectl(fp,exp_glob,"*...*\r\n",0, exp_end)) {
	case EXP_TIMEOUT: timedout();
	case EXP_EOF: exit(-1);
	}
 
	sscanf(exp_match,"%*s %*s %*s %*s ... %s",move);
}
 
read_move(fp)
FILE *fp;
{
	switch (exp_fexpectl(fp,exp_glob,"*...*\r\n*.*\r\n",0,exp_end)) {
	case EXP_TIMEOUT: timedout();
	case EXP_EOF: exit(-1);
	}
 
	sscanf(exp_match,"%*s %*s ... %*s %*s %s",move);
}
 
send_move(fp)
FILE *fp;
{
	fprintf(fp,move);
}
 
main(){
	FILE *fp1, *fp2;
	int ec;
 
/*	exp_is_debugging = 1;*/
	exp_loguser = 1;
	exp_timeout = 3600;
 
	if (0 == (fp1 = exp_popen("chess"))) {
		printf("exp_popen failed\n");
		exit(-1);
	}
 
	if (0 > exp_fexpectl(fp1,exp_glob,"Chess\r\n",0,exp_end)) exit(-1);
	fprintf(fp1,"first\r");
 
	read_first_move(fp1);
 
	fp2 = exp_popen("chess");
 
	exp_fexpectl(fp2,exp_glob,"Chess\r\n",0,exp_end);
 
	for (;;) {
		send_move(fp2);
		read_counter_move(fp2);
 
		send_move(fp1);
		read_move(fp1);
	}
}