Subversion Repositories connect-6

#include <stdlib.h>

#include <stdio.h>

#include <string.h>

#include <unistd.h>

#include <fcntl.h>

#include <errno.h>

#include <termios.h>

#include <sys/time.h>

#include "../shared.h"

/* All serial functions work on this board */

static Board *myboard = NULL;

static port=0;

// The AI has as much time as it wants, but moves after 1 second. Default is to wait 2 seconds

#define AI_WAIT_TIME 0.5

// FPGA has 1 second to make its move

#define MOVE_TIME_LIMIT 0.5

static int char_to_int(short x){

                if(x>=48)

                        return x-48;

                else

                        return 0;

}

//void wait(double seconds){

//    timeval tim;

//    gettimeofday(&tim, NULL);

//    double t1=tim.tv_sec+(tim.tv_usec/1000000.0);

//    while (1){

//        gettimeofday(&tim, NULL);

//        double t2=tim.tv_sec+(tim.tv_usec/1000000.0);

//        if (t2-t1 >= seconds)

//            break;

//    }

//}

void setup_port(int fd) {

    struct termios options;

    fcntl(fd, F_SETFL, 0);

    tcgetattr(fd, &options);

    cfsetispeed(&options, B115200);

    cfsetospeed(&options, B115200);

    options.c_cflag |= (CLOCAL | CREAD);

    tcsetattr(fd, TCSANOW, &options);

    // set up non-blocking port, so that we can time out

        int opts;

        opts = fcntl(fd,F_GETFL);

        if (opts < 0) {

                perror("fcntl(F_GETFL)");

                exit(EXIT_FAILURE);

        }

        opts = (opts | O_NONBLOCK);

        if (fcntl(fd,F_SETFL,opts) < 0) {

                perror("fcntl(F_SETFL)");

                exit(EXIT_FAILURE);

        }

        return;

}

void move_to_ascii(int x,int y, char move[4]){

    if (y >= 10){

        move[0] = '1';

        y -= 10;

    } else {

        move[0] = '0';

    }

    if      (y == 0) move[1] = '0';

    else if (y == 1) move[1] = '1';

    else if (y == 2) move[1] = '2';

    else if (y == 3) move[1] = '3';

    else if (y == 4) move[1] = '4';

    else if (y == 5) move[1] = '5';

    else if (y == 6) move[1] = '6';

    else if (y == 7) move[1] = '7';

    else if (y == 8) move[1] = '8';

    else if (y == 9) move[1] = '9';

    // Do same for x.

    if (x >= 10){

        move[2] = '1';

        x -= 10;

    } else {

        move[2] = '0';

    }

    if      (x == 0) move[3] = '0';

    else if (x == 1) move[3] = '1';

    else if (x == 2) move[3] = '2';

    else if (x == 3) move[3] = '3';

    else if (x == 4) move[3] = '4';

    else if (x == 5) move[3] = '5';

    else if (x == 6) move[3] = '6';

    else if (x == 7) move[3] = '7';

    else if (x == 8) move[3] = '8';

    else if (x == 9) move[3] = '9';

}

AIMoves *ai_serial(const Board *b){

int i,j,firstmove=0;

char move[4];

AIMoves *moves = aimoves_new();

AIMove fpgamove;

        for(i=0;i<board_size;i++){

                for(j=0;j<board_size;j++){

                        if (piece_at(b,i,j)!=PIECE_NONE) firstmove++;

        }

        }

        if(firstmove<=1){

                port = open("/dev/ttyS0", O_RDWR | O_NOCTTY | O_NONBLOCK);

                setup_port(port);

                if(b->turn==PIECE_WHITE){

                        write(port, "L",1);

                }else{

                        write(port, "D",1);

                }

                printf("firstmove %d\n",firstmove);

                if(!myboard){

                        myboard=board_new();

                }else{

                        board_free(myboard);

                        myboard=board_new();

                }

        }

        if(b->moves_left >1 || (firstmove<=1)){

        for(i=0;i<board_size;i++){

                for(j=0;j<board_size;j++){

                        if ((piece_at(myboard,i,j)==PIECE_NONE) && (piece_at(b,i,j)!=PIECE_NONE)){

                                printf("%d,%d\n",i+1,j+1);

                                move_to_ascii(i+1,j+1,move);

                                write(port,&move[0],1);

                                write(port,&move[1],1);

                                write(port,&move[2],1);

                                write(port,&move[3],1);

                                printf("AI move %c%c %c%c\n", move[2],move[3],move[0],move[1] );

                        }

                }

        }

        }

        sleep(1);

        //move[0] = 0; move[1] = 0; move[2] = 0; move[3] = 0;

        ////////// Get Opponent's move

        read(port,&move[0],1);

        read(port,&move[1],1);

        read(port,&move[2],1);

        read(port,&move[3],1);

        fpgamove.y=char_to_int(move[0])*10 + char_to_int(move[1])-1;

        fpgamove.x=char_to_int(move[2])*10 + char_to_int(move[3])-1;

        printf("FPGA move %d %d\n", fpgamove.x, fpgamove.y);

        aimoves_append(moves, &fpgamove);

        //move[0] = 0; move[1] = 0; move[2] = 0; move[3] = 0;

        //read(port,&move[0],1);

        //read(port,&move[1],1);

        //read(port,&move[2],1);

        //read(port,&move[3],1);

        //                      printf("FPGA move %c%c %c%c\n", move[2],move[3],move[0],move[1] );

        //fpgamove.x=char_to_int(move[2])*10 + char_to_int(move[3]) - 1;

        //fpgamove.y=char_to_int(move[0])*10 + char_to_int(move[1]) - 1;

        //printf("FPGA move %d %d\n", fpgamove.x, fpgamove.y);

        //aimoves_append(moves, &fpgamove);

        board_copy(b,myboard);

        place_piece_type(myboard,fpgamove.x,fpgamove.y,b->turn);

        return moves;

}