summaryrefslogtreecommitdiff
path: root/upalyzer
diff options
context:
space:
mode:
authorAndrei Karas <akaras@inbox.ru>2011-02-02 02:59:55 +0200
committerAndrei Karas <akaras@inbox.ru>2011-02-02 02:59:55 +0200
commit30ede65e73a18ed774ebd5671c4244fc763481d1 (patch)
tree51c841d17c3db16c7cda8f9f2e28c8520caa70cd /upalyzer
parentf36332ff10ab2eedac1138c7b2739b709f94173c (diff)
downloadevol-tools-30ede65e73a18ed774ebd5671c4244fc763481d1.tar.gz
evol-tools-30ede65e73a18ed774ebd5671c4244fc763481d1.tar.bz2
evol-tools-30ede65e73a18ed774ebd5671c4244fc763481d1.tar.xz
evol-tools-30ede65e73a18ed774ebd5671c4244fc763481d1.zip
Add moved tools from manaplus. http://www.gitorious.org/manaplus/
Diffstat (limited to 'upalyzer')
-rw-r--r--upalyzer/analyze.php191
1 files changed, 191 insertions, 0 deletions
diff --git a/upalyzer/analyze.php b/upalyzer/analyze.php
new file mode 100644
index 0000000..bdb56d4
--- /dev/null
+++ b/upalyzer/analyze.php
@@ -0,0 +1,191 @@
+<?php
+/* analyze.php
+ * Copyright 2007 Bjørn Lindeijer
+ *
+ * This file is part of upalyzer.
+ *
+ * upalyzer is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * any later version.
+ *
+ * upalyzer is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with upalyzer. If not, see <http://www.gnu.org/licenses/>.
+ */
+header("Content-type: text/html");
+header("Cache-Control: no-store, no-cache, must-revalidate");
+header("Cache-Control: post-check=0, pre-check=0", false);
+header("Pragma: no-cache");
+
+?>
+<html>
+<head><title>Update analysis</title></head>
+<body>
+<pre>
+List of current updates:
+
+<?php
+$download_url_base = 'http://updates.themanaworld.org/tmwdata/';
+$checkout_path = '/home/eathena/public_html/updates/tmwdata/';
+$update_file = array_filter(array_reverse(file('resources2.txt')));
+$updates = array();
+$update_file_maxlen = 0;
+$data_size = 0;
+$data_uncompressed_size = 0;
+$data_used_size = 0;
+$data_overhead_size = 0;
+$update_entries = array();
+$update_entry_maxlen = 0;
+
+foreach ($update_file as $update_line)
+{
+ list($file, $hash) = explode(' ', trim($update_line), 2);
+ $update = array(
+ 'file' => $file,
+ 'adler32' => $hash,
+ 'filesize' => filesize($file),
+ 'size' => 0,
+ 'used_entry_count' => 0,
+ 'used_size' => 0,
+ 'uncompressed_size' => 0);
+ $update_file_maxlen = max($update_file_maxlen, strlen($file));
+
+ $entries = array();
+ $zip = zip_open(realpath($file));
+
+ if ($zip && !is_int($zip)) {
+ while ($zip_entry = zip_read($zip)) {
+ $update['uncompressed_size'] += zip_entry_filesize($zip_entry);
+ $entry_name = zip_entry_name($zip_entry);
+ $entry_size = zip_entry_compressedsize($zip_entry);
+ $entry_exists = file_exists($checkout_path . $entry_name);
+ $entry_used = !array_key_exists($entry_name, $update_entries);
+ $entries[$entry_name] = array(
+ 'name' => $entry_name,
+ 'size' => $entry_size,
+ 'used' => $entry_used,
+ 'obsolete' => !$entry_exists);
+ $update['size'] += $entry_size;
+
+ if ($entry_used) {
+ if ($entry_exists) {
+ $update['used_entry_count']++;
+ $update['used_size'] += $entry_size;
+ }
+ $update_entries[$entry_name] = $update;
+ }
+
+ $update_entry_maxlen = max($update_entry_maxlen, strlen($entry_name));
+ }
+ zip_close($zip);
+ }
+ else {
+ $update['zip_error'] = $zip or true;
+ }
+
+ ksort($entries);
+ $update['entries'] = $entries;
+ $update['used_percentage'] = $update['used_size'] / $update['size'];
+ $updates[] = $update;
+
+ $data_used_size += $update['used_size'];
+ $data_size += $update['size'];
+ $data_uncompressed_size += $update['uncompressed_size'];
+ $data_overhead_size += $update['filesize'] - $update['size'];
+}
+
+function print_update_name($update, $pad = true)
+{
+ global $update_file_maxlen;
+ printf("<a href=\"#%s\">%s</a>", $update['file'], $update['file']);
+ if ($pad)
+ echo str_repeat(' ', $update_file_maxlen - strlen($update['file']));
+}
+
+// Print overall statistics
+
+foreach (array_reverse($updates) as $update)
+{
+ print_update_name($update);
+ printf(" %8s", $update['adler32']);
+ printf(" %4d kb", $update['filesize'] / 1024);
+ if (!$update['zip_error']) {
+ printf(" %4d kb", $update['uncompressed_size'] / 1024);
+ printf(" %3d%% used (%d/%d files)", $update['used_percentage'] * 100,
+ $update['used_entry_count'],
+ count($update['entries']));
+ } else {
+ printf(" Error! ");
+ if (is_int($update['zip_error']))
+ echo $update['zip_error'];
+ }
+ echo "\n";
+}
+
+printf("\n");
+printf("Amount of data: %4d kb (+%d kb zip file overhead)\n",
+ $data_size / 1024,
+ $data_overhead_size / 1024);
+printf("Uncompressed: %4d kb\n", $data_uncompressed_size / 1024);
+printf("Obsoleted data: %4d kb (%d%%)\n",
+ ($data_size - $data_used_size) / 1024,
+ 100 - ($data_used_size / $data_size) * 100);
+
+printf("\n");
+
+
+// Print list of update entries and the update they are loaded from
+
+ksort($update_entries);
+
+foreach ($update_entries as $entry => $update)
+{
+ $exists = file_exists($checkout_path . $entry);
+ printf("<span style=\"color: %s;\">%-{$update_entry_maxlen}s</span> ",
+ $exists ? "black" : "rgb(100,100,100)",
+ $entry);
+ print_update_name($update, true);
+
+ if ($exists && substr($entry, strlen($entry) - 1) != '/')
+ printf(' <a href="%s%s">download</a>', $download_url_base, $entry);
+ echo "\n";
+}
+
+
+// For each update, print its list of files and indicate whether they are used
+
+foreach (array_reverse($updates) as $update)
+{
+ print "\n<a name=\"".$update['file']."\"/><b>".$update['file']."</b>\n";
+
+ foreach ($update['entries'] as $entry_name => $entry) {
+ printf("%s%-{$update_entry_maxlen}s%s",
+ $entry['obsolete'] ? "<span style=\"color: rgb(100,100,100);\">" : "",
+ $entry_name,
+ $entry['obsolete'] ? "</span>" : "");
+ if ($entry['used'] && !$entry['obsolete']) {
+ echo ' *';
+ } elseif (!$entry['obsolete']) {
+ echo ' ';
+ print_update_name($update_entries[$entry_name], false);
+ }
+ echo "\n";
+ }
+}
+
+/*
+if ($dh = opendir('.')) {
+ while (($file = readdir($dh)) !== false) {
+ }
+ closedir($dh);
+}
+*/
+?>
+</pre>
+</body>
+</html>