#include <stdio.h>

int readFile(char *, char **);
void palindromeCheck(char *);

int main (void)
{
    char *palindromeList, filename[255] = '};

    /* ask user for the filename */
    printf("\nPlease enter the filename of your Palindrome list.\n"
	   ": ");
    scanf("%s", filename);

    /* read the word list into memory */
    if (readFile(filename, &palindromeList))
       exit(1);
    putc('\n', stdout);

    /* chck each word for palindrome */
    palindromeCheck(palindromeList);
    
    return 0;
}

void palindromeCheck(char *buffer)
{
     int palindrome;
     char *firstChr, *lastChr, *endLine;

     firstChr = endLine = buffer;

     /* loop until end of file */
     while (*firstChr != EOF)
	   {
           palindrome = 1;
	   /* find the last character */
	   while (*endLine != '\n')
	         putc(*(endLine++), stdout);
	   lastChr = endLine - 1;
	   /* palindrome compair */
	   while ( (firstChr != lastChr) && ((firstChr + 1) != lastChr) )
		 if (*(firstChr++) != *(lastChr--))
		    palindrome = 0;
	   firstChr = ++endLine;

	   /* display result */
	   printf(" %s a palindrome\n", (palindrome)? "is":"is not");
	   }
}

int readFile(char *filename, char **buffer)
{
    unsigned int count = 0;
    FILE *fptr;
    
    if ( (fptr = fopen(filename, "r")) == NULL )
       {
       fprintf(stderr, "Error Openning Source Code File %s!\n", filename);
       return 1;
       }
    
       /* get the size of the file for memory allocation.
        * read the file onec and count the character make
        * the code protable.*/
        while (getc(fptr) != EOF)
              count++;
        rewind(fptr);

       /* allocate memory */
       *buffer = malloc(count * sizeof(char));

       /* read in the word list and echo them to stdout */
       puts("\nReading Palindrome List From File:");
       count = 0;
       while ( (*(*buffer + count) = getc(fptr)) != EOF)
              putc(*(*buffer + count++), stdout);
       
       fclose(fptr);
       return 0;
}

anna
pip
+-*-+
world
sky
same
ga1ag