From d78d4769fee0bc2ed3a242f864b5c224a12ac27c Mon Sep 17 00:00:00 2001
From: "D. Marshall Lemcoe Jr." <david@lemcoe.com>
Date: Wed, 18 Jul 2012 20:50:10 -0300
Subject: [PATCH] Uses 5-character filename instead of the long default. Makes
 for a shorter URL.

---
 recv.php | 28 ++++++++++++++--------------
 1 file changed, 14 insertions(+), 14 deletions(-)

diff --git a/recv.php b/recv.php
index fb776af..c8e3ede 100644
--- a/recv.php
+++ b/recv.php
@@ -1,4 +1,4 @@
-<?
+<?php
 # Example receiver of Scrup files
 #
 # Install by putting this file on your web server and give the web server 
@@ -6,44 +6,44 @@
 #
 $MAXLENGTH = 4096000; # 4 MB
 function rsperr($msg='', $st='400 Bad Request') {
-	header('HTTP/1.1 '.$st);
-	exit($msg);	
+        header('HTTP/1.1 '.$st);
+        exit($msg);     
 }
 function pathfromid($id, $suffix='') {
-	return substr($id,0,2).'/'.substr($id,2).$suffix;
+        return substr(md5(rand() . $id), 0, 5) .$suffix;
 }
 # Build path and url
 if (!isset($_GET['name']) || !trim($_GET['name']))
-	$_GET['name'] = strval(time());
+        $_GET['name'] = strval(time());
 $id = substr(base_convert(md5($_GET['name'].' '.$_SERVER['REMOTE_ADDR']), 16, 36),0,15);
 $suffix = strrchr($_GET['name'], '.');
 $path = pathfromid($id, $suffix);
 $abspath = dirname(realpath(__FILE__)).'/'.$path;
 $url = (isset($_SERVER['HTTPS']) ? 'https://' : 'http://')
-	. $_SERVER['SERVER_NAME'] . dirname($_SERVER['SCRIPT_NAME']) . '/' . $path;
+        . $_SERVER['SERVER_NAME'] . dirname($_SERVER['SCRIPT_NAME']). $path;
 
 # make dir if needed
 $dirpath = dirname($abspath);
 if (!file_exists($dirpath) && @mkdir($dirpath, 0775) === false)
-	rsperr('failed to mkdir '.$dirpath, '500 Internal Server Error');
+        rsperr('failed to mkdir '.$dirpath, '500 Internal Server Error');
 
 # Save input to file
 $dstf = @fopen($abspath, 'w');
 if (!$dstf)
-	rsperr('unable to write to '.$dirpath, '500 Internal Server Error');
+        rsperr('unable to write to '.$dirpath, '500 Internal Server Error');
 $srcf = fopen('php://input', 'r');
 $size = stream_copy_to_stream($srcf, $dstf, $MAXLENGTH);
 fclose($dstf);
 
 # No input?
 if ($size === 0) {
-	@unlink($path);
-	rsperr('empty input');
+        @unlink($path);
+        rsperr('empty input');
 }
 elseif ($size >= $MAXLENGTH) {
-	@unlink($path); # because it's probably broken
-	rsperr('Request entity larger than or equal to '.$MAXLENGTH.' B',
-		'413 Request Entity Too Large');
+        @unlink($path); # because it's probably broken
+        rsperr('Request entity larger than or equal to '.$MAXLENGTH.' B',
+                '413 Request Entity Too Large');
 }
 
 # Respond with the url
@@ -51,4 +51,4 @@ function pathfromid($id, $suffix='') {
 header('Content-Type: text/plain; charset=utf-8');
 header('Content-Length: '.strlen($url));
 echo $url;
-?>
+?>
\ No newline at end of file