<?
# An email script in PHP 
# Andy Deck, 1999
#
# An example of this script can be found 
# at http://artcontext.org/email/


function form($to,$from,$subject,$realname,$message){
  print("<html><head><title>Email form</title></head>
  <body bgcolor=black text=white>
  <center>
   This will send mail to Andy.
  <form action=email.php method=post>
  <table><tr>
  <td>Subject:</td>   <td><input name=subject value=\"$subject\"></td>
  </tr><tr>
  <td>Your email address:</td><td><input name=from value=\"$to\"></td>
  </tr><tr>
  <td>Your name:</td><td><input name=realname value=\"$realname\"></td>
  </tr><tr>
  <td colspan=2><textarea name=message cols=40 rows=10>$message</textarea></td>
  </tr><tr>
  <td><input type=reset></td><td><input type=submit value=Send></td>
  </tr></table>
  </form><p><b>");
}


$to = "deck@artcontext.moc";

if(empty($from) || empty($subject) || empty($message) || empty($realname)){
   if(empty($from) && empty($message) && empty($realname) && empty($subject))
   { 
        form("","","","","");
   }
   else
   {
        if(empty($from))      $from     = "(Anonymous)";        
        if(empty($message))   $message  = "(No message)";       
        if(empty($realname))  $realname = "(No name given)";    
        if(empty($subject))   $subject  = "(No subject given)"; 
        form($to,$from,$subject,$realname,$message);
        print("Is this right?");
   }
}
else
{
   if(mail($to, $subject, $message, "From: $from ($realname)\nReply-To: $from"))
        header("Location: http://artcontext.com/dialog/email/sent.html");
   else 
        print("Failed!");
}

?>