OpenCores
URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [insight/] [expect/] [example/] [chesslib++.c] - Rev 1774

Go to most recent revision | Compare with Previous | Blame | View Log

/* testlib.c for c++ - test expectlib */
 
#include <stdio.h>
#include "expect.h"
 
extern "C" {
	extern int write(...);
	extern int strlen(...);
}
 
void
timedout()
{
	fprintf(stderr,"timed out\n");
	exit(-1);
}
 
char move[100];
 
void
read_first_move(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... */
 
void
read_counter_move(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);
}
 
void
read_move(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);
}
 
void
send_move(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);
	}
}
 

Go to most recent revision | Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.