+ mail($mailto[$x],$encoded_subject,$mailtext,$header) or show_fatal($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 == '') $store_mails_dir = 'stored_mails';\r
+ if(!isset($store_mails_prefix) || $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) or show_fatal($err_store_error);\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
+ $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