diff options
author | Andrei Karas <akaras@inbox.ru> | 2011-01-02 01:48:38 +0200 |
---|---|---|
committer | Andrei Karas <akaras@inbox.ru> | 2011-01-02 02:41:24 +0200 |
commit | 3eeae12c498d1a4dbe969462d2ba841f77ee3ccb (patch) | |
tree | ff8eab35e732bc0749fc11677c8873a7b3a58704 /tools/upalyzer | |
download | plus-3eeae12c498d1a4dbe969462d2ba841f77ee3ccb.tar.gz plus-3eeae12c498d1a4dbe969462d2ba841f77ee3ccb.tar.bz2 plus-3eeae12c498d1a4dbe969462d2ba841f77ee3ccb.tar.xz plus-3eeae12c498d1a4dbe969462d2ba841f77ee3ccb.zip |
Initial commit.
This code based on mana client http://www.gitorious.org/mana/mana
and my private repository.
Diffstat (limited to 'tools/upalyzer')
-rw-r--r-- | tools/upalyzer/analyze.php | 191 |
1 files changed, 191 insertions, 0 deletions
diff --git a/tools/upalyzer/analyze.php b/tools/upalyzer/analyze.php new file mode 100644 index 000000000..bdb56d41d --- /dev/null +++ b/tools/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> |