<?php set_include_path(get_include_path() . PATH_SEPARATOR . '../lib' . PATH_SEPARATOR . '../lang'); require('Archive/Tar.php'); require('File/Find.php'); include("config.inc"); include("aur.inc"); # access AUR common functions include("submit_po.inc"); # use some form of this for i18n support include("pkgfuncs.inc"); # package functions set_lang(); # this sets up the visitor's language check_sid(); # see if they're still logged in if ($_COOKIE["AURSID"]): # Track upload errors $error = ""; if ($_REQUEST["pkgsubmit"]) { # Before processing, make sure we even have a file if ($_FILES['pfile']['size'] == 0){ $error = __("Error - No file uploaded"); } # Temporary dir to put the tarball contents $tempdir = UPLOAD_DIR . uid_from_sid($_COOKIE['AURSID']) . time(); if (!$error) { if (!@mkdir($tempdir)) { $error = __("Could not create incoming directory: %s.", array($tempdir)); } else { if (!@chdir($tempdir)) { $error = __("Could not change directory to %s.", array($tempdir)); } else { if ($_FILES['pfile']['name'] == "PKGBUILD") { move_uploaded_file($_FILES['pfile']['tmp_name'], $tempdir . "/PKGBUILD"); } else { $tar = new Archive_Tar($_FILES['pfile']['tmp_name']); $extract = $tar->extract(); if (!$extract) { $error = __("Unknown file format for uploaded file."); } } } } } # Find the PKGBUILD if (!$error) { $pkgbuild = File_Find::search('PKGBUILD', $tempdir); if (count($pkgbuild)) { $pkgbuild = $pkgbuild[0]; $pkg_dir = dirname($pkgbuild); } else { $error = __("Error trying to unpack upload - PKGBUILD does not exist."); } } # if no error, get list of directory contents and process PKGBUILD # TODO: This needs to be completely rewritten to support stuff like arrays # and variable substitution among other things. if (!$error) { # process PKGBIULD - remove line concatenation # $pkgbuild = array(); $fp = fopen($pkg_dir."/PKGBUILD", "r"); $line_no = 0; $lines = array(); $continuation_line = 0; $current_line = ""; while (!feof($fp)) { $line = trim(fgets($fp)); $char_counts = count_chars($line, 0); if (substr($line, strlen($line)-1) == "\\") { # continue appending onto existing line_no # $current_line .= substr($line, 0, strlen($line)-1); $continuation_line = 1; } elseif ($char_counts[ord('(')] > $char_counts[ord(')')]) { # assumed continuation # continue appending onto existing line_no # $current_line .= $line . " "; $continuation_line = 1; } else { # maybe the last line in a continuation, or a standalone line? # if ($continuation_line) { # append onto existing line_no # $current_line .= $line; $lines[$line_no] = $current_line; $current_line = ""; } else { # it's own line_no # $lines[$line_no] = $line; } $continuation_line = 0; $line_no++; } } fclose($fp); # Now process the lines and put any var=val lines into the # 'pkgbuild' array. Also check to make sure it has the build() # function. # $seen_build_function = 0; while (list($k, $line) = each($lines)) { $lparts = explode("=", $line, 2); if (count($lparts) == 2) { # this is a variable/value pair, strip out # array parens and any quoting, except in pkgdesc # for pkgdesc, only remove start/end pairs of " or ' if ($lparts[0]=="pkgdesc") { if ($lparts[1]{0} == '"' && $lparts[1]{strlen($lparts[1])-1} == '"') { $pkgbuild[$lparts[0]] = substr($lparts[1], 1, -1); } elseif ($lparts[1]{0} == "'" && $lparts[1]{strlen($lparts[1])-1} == "'") { $pkgbuild[$lparts[0]] = substr($lparts[1], 1, -1); } else { $pkgbuild[$lparts[0]] = $lparts[1]; } } else { $pkgbuild[$lparts[0]] = str_replace(array("(",")","\"","'"), "", $lparts[1]); } } else { # either a comment, blank line, continued line, or build function # if (substr($lparts[0], 0, 5) == "build") { $seen_build_function = 1; } } } # some error checking on PKGBUILD contents - just make sure each # variable has a value. This does not do any validity checking # on the values, or attempts to fix line continuation/wrapping. # if (!$seen_build_function) { $error = __("Missing build function in PKGBUILD."); } $req_vars = array("md5sums", "source", "url", "pkgdesc", "license", "pkgrel", "pkgver", "arch", "pkgname"); foreach ($req_vars as $var) { if (!array_key_exists($var, $pkgbuild)) { $error = __("Missing " . $var . " variable in PKGBUILD."); } } } # TODO This is where other additional error checking can be # performed. Examples: #md5sums == #sources?, md5sums of any # included files match?, install scriptlet file exists? # # Check for http:// or other protocol in url # if (!$error) { $parsed_url = parse_url($pkgbuild['url']); if (!$parsed_url['scheme']) { $error = __("Package URL is missing a protocol (ie. http:// ,ftp://)"); } } # Now, run through the pkgbuild array and do any $pkgname/$pkgver # substituions. # # TODO: run through and do ALL substitutions, to cover custom vars if (!$error) { $pkgname_var = $pkgbuild["pkgname"]; $pkgver_var = $pkgbuild["pkgver"]; $new_pkgbuild = array(); while (list($k, $v) = each($pkgbuild)) { $v = str_replace('$pkgname', $pkgname_var, $v); $v = str_replace('${pkgname}', $pkgname_var, $v); $v = str_replace('$pkgver', $pkgver_var, $v); $v = str_replace('${pkgver}', $pkgver_var, $v); $new_pkgbuild[$k] = $v; } } # Now we've parsed the pkgbuild, let's move it to where it belongs if (!$error) { $pkg_name = str_replace("'", "", $pkgbuild['pkgname']); $pkg_name = escapeshellarg($pkg_name); $pkg_name = str_replace("'", "", $pkg_name); $presult = preg_match("/^[a-z0-9][a-z0-9\.+_-]*$/", $pkg_name); if (!$presult) { $error = __("Invalid name: only lowercase letters are allowed."); } } if (!$error) { # First, see if this package already exists, and if it can be overwritten $pkg_exists = package_exists($pkg_name); if (can_submit_pkg($pkg_name, $_COOKIE["AURSID"])) { if (file_exists(INCOMING_DIR . $pkg_name)) { # Blow away the existing file/dir and contents rm_rf(INCOMING_DIR . $pkg_name); } if (!@mkdir(INCOMING_DIR . $pkg_name)) { $error = __( "Could not create directory %s.", INCOMING_DIR . $pkg_name); } rename($pkg_dir, INCOMING_DIR . $pkg_name . "/" . $pkg_name); } else { $error = __( "You are not allowed to overwrite the %h%s%h package.", "<b>", $pkg_name, "</b>"); } } # Re-tar the package for consistency's sake if (!$error) { if (!@chdir(INCOMING_DIR . $pkg_name)) { $error = __("Could not change directory to %s.", array(INCOMING_DIR . $pkg_name)); } } if (!$error) { $tar = new Archive_Tar($pkg_name . '.tar.gz'); $create = $tar->create(array($pkg_name)); if (!$create) { $error = __("Could not re-tar"); } } # Whether it failed or not we can clean this out if (file_exists($tempdir)) { rm_rf($tempdir); } # Update the backend database if (!$error) { $dbh = db_connect(); # This is an overwrite of an existing package, the database ID # needs to be preserved so that any votes are retained. However, # PackageDepends and PackageSources can be purged. $q = "SELECT * FROM Packages WHERE Name = '" . mysql_real_escape_string($new_pkgbuild['pkgname']) . "'"; $result = db_query($q, $dbh); $pdata = mysql_fetch_assoc($result); if ($pdata) { # Flush out old data that will be replaced with new data $q = "DELETE FROM PackageDepends WHERE PackageID = " . $pdata["ID"]; db_query($q, $dbh); $q = "DELETE FROM PackageSources WHERE PackageID = " . $pdata["ID"]; db_query($q, $dbh); # If the package was a dummy, undummy it if ($pdata['DummyPkg']) { $q = sprintf( "UPDATE Packages SET DummyPkg = 0, SubmitterUID = %d, MaintainerUID = %d, SubmittedTS = UNIX_TIMESTAMP() WHERE ID = %d", uid_from_sid($_COOKIE["AURSID"]), uid_from_sid($_COOKIE["AURSID"]), $pdata["ID"]); db_query($q, $dbh); } # If a new category was chosen, change it to that if ($_POST['category'] > 1) { $q = sprintf( "UPDATE Packages SET CategoryID = %d WHERE ID = %d", mysql_real_escape_string($_REQUEST['category']), $pdata["ID"]); db_query($q, $dbh); } # Update package data $q = sprintf("UPDATE Packages SET ModifiedTS = UNIX_TIMESTAMP(), Name = '%s', Version = '%s-%s', License = '%s', Description = '%s', URL = '%s', LocationID = 2, FSPath = '%s', URLPath = '%s', OutOfDate = 0 WHERE ID = %d", mysql_real_escape_string($new_pkgbuild['pkgname']), mysql_real_escape_string($new_pkgbuild['pkgver']), mysql_real_escape_string($new_pkgbuild['pkgrel']), mysql_real_escape_string($new_pkgbuild['license']), mysql_real_escape_string($new_pkgbuild['pkgdesc']), mysql_real_escape_string($new_pkgbuild['url']), mysql_real_escape_string(INCOMING_DIR . $pkg_name . "/" . $pkg_name . ".tar.gz"), mysql_real_escape_string(URL_DIR . $pkg_name . "/" . $pkg_name . ".tar.gz"), $pdata["ID"]); db_query($q, $dbh); # Update package depends $depends = explode(" ", $new_pkgbuild['depends']); foreach ($depends as $dep) { $q = "INSERT INTO PackageDepends (PackageID, DepPkgID, DepCondition) VALUES ("; $deppkgname = preg_replace("/[<>]?=.*/", "", $dep); $depcondition = str_replace($deppkgname, "", $dep); if ($deppkgname == "#") { break; } $deppkgid = create_dummy($deppkgname, $_COOKIE['AURSID']); $q .= $pdata["ID"] . ", " . $deppkgid . ", '" . mysql_real_escape_string($depcondition) . "')"; db_query($q, $dbh); } # Insert sources $sources = explode(" ", $new_pkgbuild['source']); foreach ($sources as $src) { $q = "INSERT INTO PackageSources (PackageID, Source) VALUES ("; $q .= $pdata["ID"] . ", '" . mysql_real_escape_string($src) . "')"; db_query($q, $dbh); } header('Location: packages.php?ID=' . $pdata['ID']); } else { # This is a brand new package $q = sprintf("INSERT INTO Packages (Name, License, Version, CategoryID, Description, URL, LocationID, SubmittedTS, SubmitterUID, MaintainerUID, FSPath, URLPath) VALUES ('%s', '%s', '%s-%s', %d, '%s', '%s', 2, UNIX_TIMESTAMP(), %d, %d, '%s', '%s')", mysql_real_escape_string($new_pkgbuild['pkgname']), mysql_real_escape_string($new_pkgbuild['license']), mysql_real_escape_string($new_pkgbuild['pkgver']), mysql_real_escape_string($new_pkgbuild['pkgrel']), mysql_real_escape_string($_REQUEST['category']), mysql_real_escape_string($new_pkgbuild['pkgdesc']), mysql_real_escape_string($new_pkgbuild['url']), uid_from_sid($_COOKIE["AURSID"]), uid_from_sid($_COOKIE["AURSID"]), mysql_real_escape_string(INCOMING_DIR . $pkg_name . "/" . $pkg_name . ".tar.gz"), mysql_real_escape_string(URL_DIR . $pkg_name . "/" . $pkg_name . ".tar.gz")); $result = db_query($q, $dbh); $packageID = mysql_insert_id($dbh); # Update package depends $depends = explode(" ", $new_pkgbuild['depends']); foreach ($depends as $dep) { $q = "INSERT INTO PackageDepends (PackageID, DepPkgID, DepCondition) VALUES ("; $deppkgname = preg_replace("/[<>]?=.*/", "", $dep); $depcondition = str_replace($deppkgname, "", $dep); if ($deppkgname == "#") { break; } $deppkgid = create_dummy($deppkgname, $_COOKIE['AURSID']); $q .= $packageID . ", " . $deppkgid . ", '" . mysql_real_escape_string($depcondition) . "')"; db_query($q, $dbh); } # Insert sources $sources = explode(" ", $new_pkgbuild['source']); foreach ($sources as $src) { $q = "INSERT INTO PackageSources (PackageID, Source) VALUES ("; $q .= $packageID . ", '" . mysql_real_escape_string($src) . "')"; db_query($q, $dbh); } header('Location: packages.php?ID=' . $packageID); } } chdir($_SERVER['DOCUMENT_ROOT']); } # Logic over, let's do some output html_header("Submit"); ?> <div class="pgbox"> <div class="pgboxtitle"> <span class="f3"><?php print __("Submit"); ?></span> </div> <div class="pgboxbody"> <?php if (!$_REQUEST["pkgsubmit"] || $error): # User is not uploading, or there were errors uploading - then # give the visitor the default upload form if (ini_get("file_uploads")): if ($error): ?> <span class='error'><?php print $error; ?></span><br /> <br /> <?php endif; $pkg_categories = pkgCategories(); $pkg_locations = pkgLocations(); ?> <form action='/pkgsubmit.php' method='post' enctype='multipart/form-data'> <input type='hidden' name='pkgsubmit' value='1' /> <table border='0' cellspacing='5'> <tr> <td span='f4' align='right'><?php print __("Package Category"); ?>:</td> <td span='f4' align='left'> <select name='category'> <option value='1'><?php print __("Select Category"); ?></option> <?php foreach ($pkg_categories as $num => $cat): print "<option value='" . $num . "'"; if (isset($_POST['category']) && $_POST['category'] == $cat): print " selected='selected'"; endif; print ">" . $cat . "</option>"; endforeach; ?> </select> </td> </tr> <tr> <td span='f4' align='right'><?php print __("Upload package file"); ?>:</td> <td span='f4' align='left'> <input type='file' name='pfile' size='30' /> </td> </tr> <tr> <td align='left'> <input class='button' type='submit' value='<?php print __("Upload"); ?>' /> </td> </tr> </table> </form> <?php else: print __("Sorry, uploads are not permitted by this server."); ?> <br /> <?php endif; endif; else: # Visitor is not logged in print __("You must create an account before you can upload packages."); ?> <br /> <?php endif; ?> </div> </div> <?php html_footer(AUR_VERSION);