summaryrefslogtreecommitdiff
path: root/buildmaster/to-delete.php
blob: 6c5e547a3e44f69d5bda4550642a331000440d77 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
<?php
require_once "../init.php";
require_once BASE . "/lib/mysql.php";

  $result = mysql_run_query(
    "SELECT " .
    "`repositories`.`name` AS `repo`," .
    "`binary_packages`.`pkgname`," .
    "`binary_packages`.`epoch`," .
    "`binary_packages`.`pkgver`," .
    "`binary_packages`.`pkgrel`," .
    "`binary_packages`.`sub_pkgrel`," .
    "`architectures`.`name` AS `arch` " .
    "FROM `binary_packages` " .
    "JOIN `architectures` ON `binary_packages`.`architecture`=`architectures`.`id` " .
    " JOIN `binary_packages_in_repositories` ON `binary_packages`.`id`=`binary_packages_in_repositories`.`package`" .
    " JOIN `repositories` ON `binary_packages_in_repositories`.`repository`=`repositories`.`id`" .
    "WHERE `binary_packages_in_repositories`.`is_to_be_deleted` " .
    "AND `repositories`.`is_on_master_mirror`"
  );

  $available = explode(
    "\n",
    shell_exec("find /var/lib/pacman/ -name '*.db' -exec tar -tzf {} \; | sed -n 's,-[^-]\+-[^-]\+/$,,;T;p'")
  );
  $available = array_combine( $available, $available);
?>
<html>
<head>
<title>List of packages to be deleted</title>
<link rel="stylesheet" type="text/css" href="/static/style.css">
</head>
<body>
<?php

show_warning_on_offline_slave();

if ($result -> num_rows > 0) {

  $count = 0;

  while ($row = $result->fetch_assoc()) {

    if (isset($available[$row["pkgname"]]))
      $color = "#FF0000";
    else
      $color = "#00FF00";

    $rows[$count] =
      "<font color=\"" . $color . "\">" .
      $row["repo"] . "/" .
      $row["pkgname"] . "-";
    if ($row["epoch"] != "0")
      $rows[$count] =
        $rows[$count] .
        $row["epoch"] . ":";
    $rows[$count] =
      $rows[$count] .
      $row["pkgver"] . "-" .
      $row["pkgrel"] . "." .
      $row["sub_pkgrel"] . "-" .
      $row["arch"] . ".pkg.tar.xz</font>";
    $count++;
  }

  sort($rows);

  foreach ($rows as $row) {
    print $row."<br>\n";
  }
} else {
  print "No packages are to be deleted.\n";
}

?>
</body>
</html>