#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);
}
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_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);
}
}