1 files changed, 36 insertions, 0 deletions
diff --git a/apps/mm/scripts/newmail.php b/apps/mm/scripts/newmail.php
new file mode 100644
index 0000000..e4fc740
--- /dev/null
+++ b/apps/mm/scripts/newmail.php
@@ -0,0 +1,36 @@
+<?php
+// What directory are we in on the server? /////////////////////////////////////
+$_dir_scripts = dirname(__FILE__);
+$_dir_app     = dirname($_dir_scripts);
+$_dir_apps    = dirname($_dir_app);
+$_dir_base    = dirname($_dir_apps);
+require_once($_dir_base.'/stub.php');
+
+$cmdline = isset($argv[0]); // called from the command line
+@$method = $_SERVER['REQUEST_METHOD']; // What HTTP method was used
+if ( ($method=='PUT') || $cmdline ) {
+	// We're going to be uploading a new message.
+	
+	// uniqid() isn't 'secure', it doesn't need to be, it's to prevent
+	// random collisions.
+	$tmpfile = "$BASE/tmp/".uniqid(getmypid().'.');
+	$infile = ($cmdline?'php://stdin':'php://input');
+	$out = fopen($tmpfile, "w");
+	$in  = fopen($infile, "r");
+	while ($data = fread($in, 1024))
+		fwrite($out, $data);
+	fclose($out);
+	fclose($in);
+	
+	require_once('Message.class.php');
+	$msg = Message::add($tmpfile);
+	$id = $msg->msgid();
+	
+	if ($cmdline) {
+		echo $id."\n";
+	} else {
+		$m->status('201 Created');
+		header("Location: ".$m->baseUrl().'messages/'.$id);
+	}
+	exit();
+}
+\ No newline at end of file