Esempi in PHP per pearweb_Channel_REST_Generator::deletePackageREST

Esempio n. 1

File: package-delete.php Progetto: stof/pearweb

                WHERE p.id = r.package AND r.package = ?';
    $row = $dbh->getAll($query, array($id));
    foreach ($row as $value) {
        $file = sprintf("%s/%s-%s.tgz", PEAR_TARBALL_DIR, $value[0], $value[1]);
        if (@unlink($file)) {
            echo "Deleting release archive \"" . $file . "\"\n";
            $file_rm++;
        } else {
            echo "<font color=\"#ff0000\">Unable to delete file " . $file . "</font>\n";
        }
    }
    echo "\n" . $file_rm . " file(s) deleted\n\n";
    $catid = package::info($id, 'categoryid');
    $packagename = package::info($id, 'name');
    $dbh->query("UPDATE categories SET npackages = npackages - 1 WHERE id = {$catid}");
    foreach ($tables as $table => $field) {
        $query = sprintf("DELETE FROM %s WHERE %s = '%s'", $table, $field, $id);
        echo "Removing package information from table \"" . $table . "\": ";
        $dbh->query($query);
        echo "<b>" . $dbh->affectedRows() . "</b> rows affected.\n";
    }
    include_once 'pear-rest.php';
    $pear_rest = new pearweb_Channel_REST_Generator(PEAR_REST_PATH, $dbh);
    $pear_rest->deletePackageREST($packagename);
    echo "</pre>\nPackage " . $id . " has been deleted.\n";
} else {
    $pkg = package::info($id);
    print_package_navigation($id, $pkg['name'], '/package-delete.php?id=' . $id);
    echo "The package has not been deleted.\n<br /><br />\n";
}
response_footer();