/*-----------------------------------------------------------------------*/
/**  E N C O D E E M . C                   ( E N C O D E - E M A I L )  **/
/**  Create an Encoded E-Mail Link  (with Optional Subject and Prompt)  **/
/**  By Mark Theobald  www.SearchVenturaCounty.com      (805) 427-1128  **/
/**  The Appended .HTM Output Filename Extension Fascilitates Testing!  **/
/*-----------------------------------------------------------------------*/
#include "stdio.h"
/*-----------------------------------------------------------------------*/
main()  {
char  s[10], filename[20], address[80], subject[100], prompt[200], *ptr;
FILE  *dest_file;

printf("\n*******************************************************************************");
printf("\n*                                                                             *");  
printf("\n* This program creates an Encoded EMail Link for publishing in your web site, *");
printf("\n* to help prevent your EMail address from being Spidered and attracting SPAM! *");
printf("\n*                                                                             *");  
printf("\n* Written by Mark Theobald, a Real Estate agent in Ventura County, California *");
printf("\n* Find me at MarkTheobald.com, SearchVenturaCounty.com, and KayakDiving.com!  *");
printf("\n*                                                                             *");  
printf("\n*******************************************************************************");

printf("\n\n\n Enter Output File Name, Up to 8 Letters (.HTM will be appended): ");
gets  ( filename );

if ( ! strlen( filename ) )  {
   strcpy( filename, "E-MAIL" );
   printf("\n    E-MAIL will be used! (Output File: E-MAIL.HTM)\n");  }

strcat( filename, ".HTM" );
if ( ! access( filename, 0 ) )  {
   printf("\n Output File Already Exists.  OVERWRITE? (Y for YES): ");
   if ( toupper( getch() ) != 'Y' )  exit( -1 );
   printf( "\n" );  }

if ( ! ( dest_file = fopen( filename, "wt" ) ) )  {
   printf("\n    Could Not Open File : %s.  Press any key to exit... ", filename );
   getch();
   exit( -1 );  }

while ( 1 )  {
   printf("\n Enter the E-Mail Address: ");
   gets( address );
   if ( strlen( address ) )  break;
   printf("\n    Can't Continue Without An E-Mail Address!!!\n");  }

printf("\n Enter the Subject (optional): ");
gets  ( subject );
printf("\n Enter the Prompt  (optional): ");
gets  ( prompt );

//mailto:
fputs( "<A HRef=\"&#109;&#97;&#105;&#108;&#116;&#111;:", dest_file );
ptr = address;

while ( *ptr )  {
   sprintf( s, "&#%d;", *ptr++ );
   fputs(   s,  dest_file );  }

if ( strlen( ptr = subject ) )  {               //?Subject=
   fputs( "\n&#63;&#83;&#117;&#98;&#106;&#101;&#99;&#116;&#61;", dest_file );
   while ( *ptr )  {
      sprintf( s, "&#%d;", *ptr++ );
      fputs(   s,  dest_file );  }  }

fputs( "\">", dest_file );
if ( strlen( ptr = prompt ) )  {
   fputs( "\n<B><I> ", dest_file );
   while ( *ptr )  {
      sprintf( s, "&#%d;", *ptr++ );
      fputs(   s,  dest_file );  }
      
   fputs( " </I></B>", dest_file );  }

else  {
   fputs( "\n<!-- Place Link Text Or Button Image Code Here. For Example: -->", dest_file );
   fputs( "\n<!-- <B><I> E-Mail Here </I></B>  -OR-  -->", dest_file );
   fputs( "\n<Img Src=\"EMail-Button.gif\" Border=1 Width=80 Height=35> \n", dest_file );  }
   
fputs( "</A>", dest_file );
fclose( dest_file );
exit( 0 );  }

/*---------------------------------------------------------------------------*/