root/gemmes_text.c

/***************************************************************************
 *   This file is part of the 'gemmes' project                             *
 *                                                                         *
 *                                                                         *
 *   Copyright (C) 2007 by                                                 *
 *         GARCH Soufiane                                                  *
 *         GUILLAUME Nicolas <ng@ngsoft-fr.com>                            *
 *                                                                         *
 *                                                                         *
 *   This program is free software; you can redistribute it and/or modify  *
 *   it under the terms of the GNU General Public License as published by  *
 *   the Free Software Foundation; version 2 of the License only.          *
 *   See the COPYING file.                                                 *
 ***************************************************************************/




#define _GNU_SOURCE
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>

#include "assert.h"

#include "gemmes.h"

#define GEOF (size_t)(-1)


#define HELP_MSG  "Moves are on three positions:\n" \
                  " - First char specifies the column to move from\n" \
                  " - Second one specifies the line to move from\n" \
                  " - Third one specifies the direction: Up, Down, Left, Right\n" \
                  "Examples: c4u (from c4, up); d7l (from d7, left)\n\n" \
                  "The goal is to switch gems so that you get 3 or more aligned.\n"




int gemmes_process_command(board_t b, char * line, int read, int * stop);


void gemmes_start_ihm(board_t b)
{
    char * line = NULL;
    size_t len = 0;
    size_t read = 0;

    int stop = 0;
    int entree;

    while( read != GEOF && !stop )
    {
        board_print(b);

        if(!b->silent && b->last_seg_count)
            printf("This move created %d segment(s).\n", b->last_seg_count);

        entree = 0;
        while(!entree && read != GEOF && !stop) /* tant que pas d'entree correct */
        {
            if(!b->silent)
                puts("\nWhat's your move? (or ? for help, h for hint, d for dump, a for autoplay, q to quit)");

            read = getline(&line, &len, stdin); /* une ligne peut contenir plusieurs commandes */

            if(read != GEOF)
            {
                char * cmd = line;
                unsigned int i;
                for(i = 0; i < read; ++i)
                {
                    line[i] = tolower(line[i]);

                    if(line[i] == ' ' || i == read - 1)
                    {
                        entree = gemmes_process_command(b, cmd, line + i - cmd, &stop) || entree;
                        if(stop)
                            break;

                        if(i + 1 < read)
                            cmd = line + i + 1;

                    }
                }
            }

        }
    }

    if (line)
        free(line);

}

int gemmes_process_command(board_t b, char * line, int read, int * stop)
{
    c_assert(stop);

    if(read == 0)
        return 0;
    else if(read == 1) /* c'est peut être une commande */
    {
        switch(line[0])
        {
        case 'd': /* dump */
        {
            gemmes_dump(b);
            return 1;
        }
        case 'h': /* hint */
        {
            coord_t c = board_get_hint(b);

            if(!b->silent && c.x != -1)
                printf("Have a look at %c%d\n", 'a' + c.x, 1 + c.y);

            return 0;
        }
        case 'a': /* autoplay */
            gemmes_autoplay(b);
            *stop = 1;
            return 1;
            break;
        case 't': /* autoplay & create a test*/
            b->silent = 1;
            gemmes_autoplay_createtest(b);
            *stop = 1;
            return 1;
            break;
        case '?': /* help */
            if(!b->silent)
                puts(HELP_MSG);
            return 1;
            break;
        case 'q': /* quit */
            *stop = 1;
            return 1;
        default:
            if(!b->silent)
                fputs("Invalid command\n", stderr);
            return 0;
        }
    }
    else if(read == 3 || read == 4) /* c'est peut être un coup */
    {
        dir_t dir;

        switch(line[2 + read - 3])
        {
        case 'u': dir = up;  break;
        case 'd': dir = down;  break;
        case 'l': dir = left;  break;
        case 'r': dir = right;  break;
        default:
            if(!b->silent)
                fprintf(stderr, "Invalid direction specifier (%c): must be one of 'u' (up), 'd' (down), 'r' (right), 'l' (left)\n\n", line[2]);
            return 0;
        }

        int l = read == 3 ? line[1] - '1' : (line[1] - '0') * 10 + line[2] - '1';

        int ret = !board_move(b, line[0] - 'a', l, dir);

        if(ret && board_get_hint(b).x == -1) /* partie finie */
        {
            if(!b->silent)
                fputs("Game over!\n", stderr);

            *stop = 1;
        }

        return ret;

    }
    else
    {
        if(!b->silent)
            fputs("Invalid command\n", stderr);
        return 0;
    }
}