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
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
|
<html>
<head>
<title>More and less critical issues with the database</title>
<link rel="stylesheet" type="text/css" href="/static/style.css">
</head>
<body>
<a href="/">Start page</a><br>
<?php
if (isset($_GET["ignore-haskell"]))
$ignore = " AND `install_targets`.`name` NOT LIKE \"libHS%\"";
else
$ignore = "";
$mysql = new mysqli("localhost", "webserver", "empty", "buildmaster");
if ($mysql->connect_error) {
die("Connection failed: " . $mysql->connect_error);
}
if (! $result = $mysql -> query(
"SELECT CONCAT(" .
"`repositories`.`name`,\"/\"," .
"`binary_packages`.`pkgname`,\"-\"," .
"IF(`binary_packages`.`epoch`=0,\"\",CONCAT(`binary_packages`.`epoch`,\":\"))," .
"`binary_packages`.`pkgver`,\"-\"," .
"`binary_packages`.`pkgrel`,\".\"," .
"`binary_packages`.`sub_pkgrel`,\"-\"," .
"`architectures`.`name`) AS `pkgfile`," .
"`install_targets`.`name` AS `install_target`," .
"IF(`binary_packages`.`is_to_be_deleted`,1,0) AS `is_to_be_deleted`" .
" FROM `binary_packages`" .
" JOIN `repositories` ON `binary_packages`.`repository`=`repositories`.`id`" .
" AND `repositories`.`is_on_master_mirror`" .
" JOIN `dependencies` ON `dependencies`.`dependent`=`binary_packages`.`id`" .
" JOIN `dependency_types` ON `dependencies`.`dependency_type`=`dependency_types`.`id`" .
" AND `dependency_types`.`relevant_for_binary_packages`" .
" JOIN `install_targets` ON `dependencies`.`depending_on`=`install_targets`.`id`" .
" JOIN `architectures` ON `binary_packages`.`architecture`=`architectures`.`id`" .
" WHERE NOT EXISTS (" .
"SELECT * FROM `install_target_providers`" .
" WHERE `install_target_providers`.`install_target` = `dependencies`.`depending_on`" .
")" .
$ignore .
" ORDER BY `is_to_be_deleted`, `binary_packages`.`pkgname`"
))
die($mysql -> error);
if ($result -> num_rows > 0) {
while ($row = $result->fetch_assoc()) {
if ($row["is_to_be_deleted"]==1)
print "<font color=\"#00ff00\">(marked as to-be-deleted) ";
else
print "<font color=\"#ff0000\">";
print $row["pkgfile"] . " depends on " . $row["install_target"] . " which is not provided by any package.<br>\n";
print "</font>";
}
}
if (! $result = $mysql -> query(
"SELECT CONCAT(" .
"`repositories`.`name`,\"/\"," .
"`binary_packages`.`pkgname`,\"-\"," .
"IF(`binary_packages`.`epoch`=0,\"\",CONCAT(`binary_packages`.`epoch`,\":\"))," .
"`binary_packages`.`pkgver`,\"-\"," .
"`binary_packages`.`pkgrel`,\".\"," .
"`binary_packages`.`sub_pkgrel`,\"-\"," .
"`architectures`.`name`) AS `pkgfile`," .
"`install_targets`.`name` AS `install_target`," .
"`repository_stabilities`.`name` AS `stability`," .
"IF(`binary_packages`.`is_to_be_deleted`,1,0) AS `is_to_be_deleted`" .
" FROM `binary_packages`" .
" JOIN `repositories` ON `binary_packages`.`repository`=`repositories`.`id`" .
" AND `repositories`.`is_on_master_mirror`" .
" JOIN `repository_stabilities` ON `repositories`.`stability`=`repository_stabilities`.`id`" .
" JOIN `dependencies` ON `dependencies`.`dependent`=`binary_packages`.`id`" .
" JOIN `dependency_types` ON `dependencies`.`dependency_type`=`dependency_types`.`id`" .
" AND `dependency_types`.`relevant_for_binary_packages`" .
" JOIN `install_targets` ON `dependencies`.`depending_on`=`install_targets`.`id`" .
" JOIN `architectures` ON `binary_packages`.`architecture`=`architectures`.`id`" .
" WHERE EXISTS (" .
"SELECT * FROM `install_target_providers`" .
" WHERE `install_target_providers`.`install_target` = `dependencies`.`depending_on`" .
")" .
" AND NOT EXISTS (" .
"SELECT * FROM `install_target_providers`" .
" JOIN `binary_packages` AS `prov_bp` ON `prov_bp`.`id`=`install_target_providers`.`package`" .
" JOIN `repositories` AS `prov_r` ON `prov_bp`.`repository`=`prov_r`.`id`" .
" JOIN `repository_stability_relations` ON `prov_r`.`stability`=`repository_stability_relations`.`more_stable`" .
" WHERE `install_target_providers`.`install_target` = `dependencies`.`depending_on`" .
" AND `repositories`.`stability`=`repository_stability_relations`.`less_stable`" .
")" .
$ignore .
" ORDER BY `is_to_be_deleted`, `binary_packages`.`pkgname`"
))
die($mysql -> error);
if ($result -> num_rows > 0) {
while ($row = $result->fetch_assoc()) {
if ($row["is_to_be_deleted"]==1)
print "<font color=\"#00ff00\">(marked as to-be-deleted) ";
else
print "<font color=\"#800000\">";
print $row["pkgfile"] . " depends on " . $row["install_target"] . " which is not provided by any package installable from enabled " . $row["stability"] . " repositories.<br>\n";
print "</font>";
}
}
?>
</body>
</html>
|