#include "stdafx.h"
#include "stdio.h"
#include "ctype.h"
#include "string.h"
#include "stdlib.h"
 
 
void encode ( char ch ); //encode function
void enter(); // text entry function
void file(); // read from a file function
void main_menu();
 
char alph[] = "ABCDEFGHIJKLMNOPQRSTUVWXYZ";
/* morsecode is an array of pointers to char. It is initialized
* so that each element points to a string literal with
* the ascii representation of each char of the array alph[]
*/
 
char *morsecode[] =
  { /* an array of pointers to char */
    ".-"   , "-..." , "-.-." , "-.."  , "."    ,    /* a-e */
    "..-." , "--."  , "...." , ".."   , ".---" ,    /* f-j */
    "-.-"  , ".-.." , "--"   , "-."   , "---"  ,    /* k-o */
    ".--." , "--.-" , ".-."  , "..."  , "-"    ,    /* p-t */
    "..-"  , "...-" , ".--"  , "-..-" , "-.--" ,    /* u-y */
    "--.." ,                                        /* z   */
  };
 
 
int _tmain(int argc, _TCHAR* argv[]) {
	main_menu();
}
 
 
void main_menu() {
	//main menu
	int opt;
 
	printf("################################################\n");
	printf("##                                            ##\n");
	printf("##                  Main Menu                 ##\n");
	printf("##                                            ##\n");
	printf("################################################\n");
	printf("## Please Select An Option To Proceed         ##\n");
	printf("## 1. Convert keyboard entry to morse code    ##\n");
	printf("## 2. Convert a file to morse code            ##\n");
	printf("## 3. Exit                                    ##\n");
	printf("################################################\n\n");
 
	printf("Enter an Option: ");
	scanf_s("%d",&opt);
		if ((opt!= 1) && (opt != 2) && (opt != 3)) {	
			printf("\nInvalid Option..... Try Again: "); //checks to see a valid option is entered
			scanf_s("%d",&opt);
		}
		else if (opt == 1) {
			enter();
		}
		else if (opt == 2) { 
			file();
		} 
		else if (opt == 3) {
			exit(0);
		}
}
 
void enter() {
 
  char text[500]; // 250 buffer for text
  fputs ( "Please Enter The Phrase You Would Like To Convert: ", stdout );
  gets(text); // prints the message out and gets the input
  fflush ( stdout ); //clears stdout
  if ( fgets ( text, sizeof text, stdin ) != NULL ) // checks to see test is not null
  {
    char *newline = strchr ( text, '\n' ); /* search for newline character */
    if ( newline != NULL )
    {
      *newline = '\0'; /* overwrite trailing newline */
    }
    printf ( "Trying To Convert = \"%s\" To Morse\n", text );
  }
  putchar ( '\n' );
 
  int j;
  for ( j = 0; j < strlen ( text ); j++ ) // loops through the string
  {
    encode ( toupper ( text[j] ) ); //calls the encode function after changing the case of the char
  }
  getchar();
putchar ( '\n' ); //new line
main_menu(); //calls main menu
}
 
void encode ( char ch ) {
  size_t i;
 
  if((isalpha(ch)) || (isspace(ch))) {
  for ( i = 0; i < 26; ++i ) { //loops through the aplh[]
      if ( ch == alph[i] ) { //check to see the character is present in alph[]
         printf ( "%s ", morsecode[i] ); //gets the morse index of that char
		 break;
	  }
  }
  }
	  else {
		  printf("\nInput %c Not Valid, Error File Generated. Check C\\errors.txt: \n", ch);
		   FILE *fp;
 
      /* open the file */
		   fp = fopen("C:\\errors.txt", "a");
      if (fp == NULL) {
         printf("I couldn't open errors.txt for writing.\n");
         exit(0);
      }
 
         fprintf(fp, "%c\n", ch);
 
      /* close the file */
      fclose(fp);
	  }
}
 
void file() {
FILE *fp; //pointer to file
  char buf[BUFSIZ]; //define buf with bufsize of 512
  int i;
  char text[100];
 
  fputs ( "Enter the path and file name that you want to read from: ", stdout );
  gets(text); //asks for the path to the file
  fflush ( stdout ); //clear stdout
 gets(text);
 
  if ( ( fp = fopen ( text, "r" ) ) == NULL ) //check to see if the file exists
  {
    perror ( text );
  }
 
  i = 0;
 
  while ( fgets ( buf, sizeof ( buf ), fp ) != NULL ) //gets the contents of the file assigns to buf
  {
    int j;
    int foo = strlen ( buf ); // gets length of the string in the file
 
	printf("Contents of the file: \"%s\" \n",buf); //prints the string from the file
    for ( j = 0; j < foo; j++ ) //loops throught the string
    {
      encode ( toupper ( buf[j] ) ); //calls encode for each char
    }
  }
 
  fclose ( fp ); //closes file
  putchar('\n');
  getchar();
  main_menu();
}