Diese Konfig-Variablen wurden nie dokumentiert...

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

diff --git a/form-email/mailer.php b/form-email/mailer.php
index 5ad84077ae98897ae6d833e3f1eb943a44ffc11e..ba4d410da22989457c6d39b8355fb42c793f3b1b 100644 (file)
--- a/form-email/mailer.php
+++ b/form-email/mailer.php
@@ -7,7 +7,7 @@
 # geschrieben wurde.\r
 #\r
 # Autor:            Patrick Canterino <patrick@patshaping.de>\r
 # 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-2012 Patrick Canterino\r
 #\r
 #\r
 # Copyright (C) 2002-2012 Patrick Canterino\r
 #\r


@@ -241,8 +241,10 @@ $subject = preg_replace("/\015\012|\012|\015/",' ',$subject);
 \r
 # Uhrzeit formatieren\r
 \r
 \r
 # Uhrzeit formatieren\r
 \r

+$timestamp = time();\r
+\r

 date_default_timezone_set($timezone);\r
 date_default_timezone_set($timezone);\r

-$time = strftime($timeformat);\r
+$time = strftime($timeformat,$timestamp);\r

 \r
 # Header der Mail\r
 \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
     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 = 'stored_mails';\r
+    if(!isset($store_mails_prefix)) $store_mails_prefix = 'feml_';\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
 if($captcha_enable) session_destroy();\r
 \r
 # Mail wurde erfolgreich versendet, also wird die Dankesseite angezeigt\r