Subversion Repositories or1k

/* chesslib.c - test expectlib */

#include <stdio.h>

#include "expect.h"

timedout()

{

        fprintf(stderr,"timed out\n");

        exit(-1);

}

char move[100];

read_first_move(fd)

int fd;

{

        if (EXP_TIMEOUT == exp_expectl(fd,

                        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(fd)

int fd;

{

        switch (exp_expectl(fd,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(fd)

int fd;

{

        switch (exp_expectl(fd,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(fd)

int fd;

{

        write(fd,move,strlen(move));

}

main(){

        int fd1, fd2;

        exp_loguser = 1;

        exp_timeout = 3600;

        fd1 = exp_spawnl("chess","chess",(char *)0);

        if (-1 == exp_expectl(fd1,exp_glob,"Chess\r\n",0,exp_end)) exit;

        if (-1 == write(fd1,"first\r",6)) exit;

        read_first_move(fd1);

        fd2 = exp_spawnl("chess","chess",(char *)0);

        if (-1 == exp_expectl(fd2,exp_glob,"Chess\r\n",0,exp_end)) exit;

        for (;;) {

                send_move(fd2);

                read_counter_move(fd2);

                send_move(fd1);

                read_move(fd1);

        }

}