Standard-Werte fuer einige Variablen festlegen und Verzeichnis ggf. anlegen

[form-email.git] / form-email / mailer.php

diff --git a/form-email/mailer.php b/form-email/mailer.php
index 31339199f170561a78be053508c4e7cd329c2faa..87c301ffc37e9e58004cf1ae209cad24b7414eec 100644 (file)
--- a/form-email/mailer.php
+++ b/form-email/mailer.php
@@ -7,9 +7,9 @@
 # geschrieben wurde.\r
 #\r
 # Autor:            Patrick Canterino <patrick@patshaping.de>\r
-# Letzte Aenderung: 02.01.2012\r
+# Letzte Aenderung: 09.01.2012\r
 #\r
-# Copyright (C) 2002-2011 Patrick Canterino\r
+# Copyright (C) 2002-2012 Patrick Canterino\r
 #\r
 # Diese Datei kann unter den Bedingungen der "Artistic License 2.0"\r
 # weitergegeben und / oder veraendert werden.\r
@@ -241,8 +241,10 @@ $subject = preg_replace("/\015\012|\012|\015/",' ',$subject);
 \r
 # Uhrzeit formatieren\r
 \r
+$timestamp = time();\r
+\r
 date_default_timezone_set($timezone);\r
-$time = strftime($timeformat);\r
+$time = strftime($timeformat,$timestamp);\r
 \r
 # Header der Mail\r
 \r
@@ -348,6 +350,62 @@ for($x=0;$x<count($mailto);$x++) {
     mail($mailto[$x],$encoded_subject,$mailtext,$header) or die($err_send_error);\r
 }\r
 \r
+# Mails auf Festplatte speichern\r
+\r
+if(isset($store_mails) && $store_mails) {\r
+    # Standard-Werte fuer einige Variablen\r
+    \r
+    if(!isset($store_mails_dir))    $store_mails_dir = '.';\r
+    if(!isset($store_mails_prefix)) $store_mails_prefix = '';\r
+    \r
+    # Verzeichnis ggf. anlegen\r
+    \r
+    if(!is_dir($store_mails_dir))   mkdir($store_mails_dir);\r
+\r
+    # Betreff saeubern\r
+\r
+    $clean_subject = str_replace(' ','_',$subject);\r
+    $clean_subject = preg_replace('/[^a-z0-9\-_]/i','',$clean_subject);\r
+\r
+    # Eindeutigen Dateinamen der Mail zusammensetzen\r
+    \r
+    $file_name = $store_mails_dir.'/'.uniqid($store_mails_prefix.$email.'_'.$clean_subject.'_'.strftime('%d%m%Y-%H%M%S',$timestamp));\r
+    \r
+    # Daten in Datei schreiben\r
+    \r
+    file_put_contents($file_name,$mailtext);\r
+    \r
+    # Alte Dateien loeschen\r
+    \r
+    if(isset($store_mails_max) && $store_mails_max > 0) {\r
+        $dp = opendir($store_mails_dir);\r
+        \r
+        while($stored_mail_file = readdir($dp)) {\r
+            if($stored_mail_file != '.' && $stored_mail_file != '..' && substr($stored_mail_file,0,strlen($store_mails_prefix)) == $store_mails_prefix) {\r
+                $stored_mail_files[$store_mails_dir.'/'.$stored_mail_file] = filemtime($store_mails_dir.'/'.$stored_mail_file);\r
+            }\r
+        }\r
+        \r
+        closedir($dp);\r
+        \r
+        arsort($stored_mail_files);\r
+        \r
+        #print sizeof($stored_mail_files);\r
+        \r
+        #print_r($stored_mail_files);\r
+        \r
+        $x = 0;\r
+        \r
+        foreach(array_keys($stored_mail_files) as $stored_mail_filename) {\r
+            $x++;\r
+        \r
+            if($x > $store_mails_max) {\r
+                unlink($stored_mail_filename);\r
+            }\r
+        }\r
+    }\r
+}\r
+\r
 if($captcha_enable) session_destroy();\r
 \r
 # Mail wurde erfolgreich versendet, also wird die Dankesseite angezeigt\r