started on the package submit script

This commit is contained in:
eric 2004-07-12 22:12:42 +00:00
parent 7b9956f225
commit cbe2050420
5 changed files with 81 additions and 8 deletions

View file

@ -5,12 +5,33 @@ set_lang(); # this sets up the visitor's language
check_sid(); # see if they're still logged in
html_header(); # print out the HTML header
# Any text you print out to the visitor, use the __() function
# for i18n support. See 'testpo.php' for more details.
# this is the directory that new packages will be uploaded to
#
print __("Under construction...")."<br />\n";
$UPLOAD_DIR = "/tmp/aur/temp";
if ($_REQUEST["upload"]) {
# try and process the upload
#
} else {
# give the visitor the default upload page
#
print "<center>\n";
if (ini_get("file_uploads")) {
print "<form action='/pkgsubmit.php' method='post'";
print " enctype='multipart/form-data'>\n";
print "<input type='hidden' name='MAX_FILE_SIZE' value='";
print initeger(ini_get("upload_max_filesize"))."' />\n";
print "Upload package: ";
print "<input type='file' name='pfile' size='30' />\n";
print "&nbsp;&nbsp;&nbsp;&nbsp;";
print "<input class='button' type='submit' value='Upload' />\n";
print "</form>\n";
} else {
print "Sorry, uploads are not permitted by this server.\n<br />\n";
}
print "</center>\n";
}
html_footer("\$Id$");
?>

View file

@ -444,5 +444,28 @@ function dbug($msg) {
return;
}
# convert an ini_get number to a real integer - stupid PHP!
#
function initeger($inival="0", $isbytes=1) {
$last_char = strtolower(substr($inival, -1));
if ($isbytes) {
switch ($last_char) {
case 't': $multiplier = 1024 * 1024 * 1024; break;
case 'm': $multiplier = 1024 * 1024; break;
case 'k': $multiplier = 1024; break;
default: $multiplier = 1; break;
}
} else {
switch ($last_char) {
case 't': $multiplier = 1000 * 1000 * 1000; break;
case 'm': $multiplier = 1000 * 1000; break;
case 'k': $multiplier = 1000; break;
default: $multiplier = 1; break;
}
}
return intval($inival) * $multiplier;
}
# vim: ts=2 sw=2 noet ft=php
?>