/**

 * test/demos/life.c

 * Copyright (C) 2008 Markus Broeker

 */

#include <stdio.h>

#include <stdlib.h>

#define MAX 12

int read_file (char **);

int init_life (char **);

void free_life (char **);

void show_life (char **);

int read_file (char **arena)

{

    int i, j;

    char org;

    char file[80];

    FILE *inp = NULL;

    while (inp == NULL) {

        printf ("Please enter the file name>> ");

        if (scanf ("%s", file) < 1)

            return -1;

        inp = fopen (file, "r");

    }

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

        printf ("Reading Line %3d: ", i);

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

            if (feof (inp)) {

                printf ("EOF detected\n");

                return fclose (inp);

            }

            if ((fscanf (inp, "%c ", &org)) < 1)

                return -1;

            arena[i][j] = org;

            printf ("%c ", arena[i][j]);

        }

        printf ("\n");

    }

    return fclose (inp);

}

int init_life (char **arena)

{

    int i, j;

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

        if ((arena[i] = malloc (MAX + 1)) == NULL)

            return -1;

        for (j = 0; j < MAX; j++)

            arena[i][j] = '.';

    }

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

        arena[0][i] = '-';

        arena[MAX - 1][i] = '-';

        arena[i][0] = '|';

        arena[i][MAX - 1] = '|';

        printf ("Initialize: %d\n", i);

    }

    if ((read_file (arena) == EOF)) {

        printf ("\nread_file: ERROR\n");

        return -1;

    }

    return 0;

}

void show_life (char **arena)

{

    int i, j;

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

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

            printf ("%c", arena[i][j]);

        }

        printf ("\n");

    }

}

void free_life (char **arena)

{

    int i;

    if (arena == NULL)

        return;

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

        if (arena[i] != NULL)

            free (arena[i]);

    }

}

int main (int argc, char **argv)

{

    char *arena[MAX];

    if (argc > 2)

        printf ("Usage: %s\n", argv[0]);

    if (init_life (arena) == 0)

        show_life (arena);

    free_life (arena);

    return EXIT_SUCCESS;

}