<?
// Addonliste oder readme zu Addons ausgeben

require_once("../cms/lib/database.inc.php");
require_once("config.inc.php");

$list = isset ($_GET['list']) ? 1 : "";
$groups = isset ($_GET['groups']) ? 1 : "";
$readme = isset ($_GET['readme']) ? preg_replace("/\.{2,}/", "", $_GET['readme']) : "";
$version = isset ($_GET['version']) ? preg_replace("/\.{2,}/", "", $_GET['version']) : "0.6.0";
$class = isset ($_GET['class']) ? $_GET['class'] : "";
$section = isset ($_GET['section']) ? $_GET['section'] : "";
$arch = isset ($_GET['arch']) ? $_GET['arch'] : "";
$user = isset ($_GET['user']) ? preg_replace("/\.{2,}/", "", strtolower($_GET['user'])) : ($class && !in_array($class, array('stable', 'testing', 'unstable', 'devel', 'all')) ? $class : "");
$userpath = isset ($_GET['user']) ? preg_replace("/\.{2,}/", "", "devel/" . $_GET['user'] . "/") : "";
$path = isset ($_GET['path']) ? $_GET['path'] : "";
$file = isset ($_GET['file']) ? $_GET['file'] : "";

header("Content-Type: text/plain");

if ($list) {
	// Beschreibungen
	if (($fp = @fopen("{$config['data']}description.txt", "r"))) {
		$descriptions = unserialize(fread($fp, filesize("{$config['data']}description.txt") + 1));
		if (is_array($descriptions)) {
			foreach ($descriptions as $row) {
				if (isset($row['name'])) {
					echo "{$row['name']}\t{$row['descript']}\n";
				}
			}
		}
		fclose($fp);
	}
	exit;
} else if ($groups) {
	// Gruppen
	@readfile("{$config['download']}{$version}/groups.txt");
	exit;
} else if ($readme) {
	// Readme zurückgebe
	@readfile("{$config['download']}{$version}/docs/$readme/readme");
	exit;
} else if ($user) {
	if ($fp = fopen("{$config['data']}users.txt", "r+")) {
		$users = unserialize(fread($fp, filesize("{$config['data']}users.txt") + 1));
		if (isset ($_GET['setip'])) {
			$users[$user]['ip'] = $_GET['setip'] ? $_GET['setip'] : $_SERVER['REMOTE_ADDR'];
			$users[$user]['port'] = $_GET['port'] ? $_GET['port'] : "";
			echo "Store IP {$users[$user]['ip']} for user $user\n";
			rewind($fp);
			fwrite($fp, serialize($users));
		}
		if (isset ($_GET['delip'])) {
			unset ($users[$user]);
			echo "Del IP for user $user\n";
			rewind($fp);
			fwrite($fp, serialize($users));
		}
		fclose($fp);
	} else {
		touch("{$config['data']}users.txt");
	}
	if (isset ($users[$user]) && !isset ($_GET['setip'])) {
		if ($version < "4.0.0") {
			header("Location: http://{$users[$user]['ip']}" . ($users[$user]['port'] ? ":{$users[$user]['port']}" : "") . ($file ? "/file/{$file}" : "?{$_SERVER['QUERY_STRING']}"));
		} else if ($version < "5") {
			header("Location: http://{$users[$user]['ip']}" . ($users[$user]['port'] ? ":{$users[$user]['port']}" : "") . "/{$version}/{$path}/{$file}");
		} else {
			header("Location: http://{$users[$user]['ip']}" . ($users[$user]['port'] ? ":{$users[$user]['port']}" : "") . "/{$path}/{$user}/{$file}");
		}
		exit;
	}
}

if (is_dir("{$config['download']}{$version}/{$userpath}")) {
	// addonliste zurückgebe
	if ($version < "4.0.0") {
		listaddons("{$config['download']}{$version}/{$userpath}", $config['download']);
	} else if ($version < "5") {
		$path = realpath($config['download'].$version."/".$path);
		if (strpos($path, $config['download']) === 0) { 
			if ($file == "Packages") {
				if (is_dir("{$path}/controls/")) {
					system("cat {$path}/controls/*");
				}
			} else if ($file == "Packages.gz") {
				if (is_dir("{$path}/controls/")) {
					system("cat {$path}/controls/* | gzip");
				} else {
					system("echo | gzip");
				}
			}
		}
	} else if ($class != "devel") {
		$path = realpath($config['download'].$version);
		if (strpos($path, $config['download']) === 0) { 
			if (preg_match("/^Packages/", $file)) {
				$cache = $config['data']."files/{$version}_{$class}_{$section}_{$arch}.txt";
				if (@filemtime("$path/$class/$arch") > @filemtime($cache) && $section == "main" || isset($_GET['debug'])) {
					if (is_dir("{$path}")) {
						$cache_extra = $config['data']."files/{$version}_{$class}_extra_{$arch}.txt";
						system("
							(
								date
								touch $cache
								kill \$(ps ax | grep -v grep | grep 'dpkg-scanpackages -a $arch $class' | cut -b-5) 2>/dev/null
								cd $path
								echo 'cd $path; dpkg-scanpackages -a $arch $class'
								(
									dpkg-scanpackages -a $arch $class
									test $? != 0 -a $? != 143 && dpkg-scanpackages -a $arch $class 2>&1 >/dev/null | mail -s 'Control file error for $arch $class' devel@clausmuus.de
								) > $cache.$$.$$
								sed '/Package: \(" . implode("\|", $GLOBALS['config']['extra_addons']) . "\)$/,/^$/d' $cache.$$.$$ > $cache.$$
								touch -r $cache $cache.$$
								mv -f $cache.$$ $cache
								sed -n '/Package: \(" . implode("\|", $GLOBALS['config']['extra_addons']) . "\)$/,/^$/p' $cache.$$.$$ > $cache_extra.$$
								touch -r $cache $cache_extra.$$
								mv -f $cache_extra.$$ $cache_extra
								rm -f $cache.$$.$$
								echo
							) >>{$config['data']}/addons.log 2>&1 &");
						//system("cd {$path}/{$class}; dpkg-scanpackages {$arch} /dev/null {$class}/ 2>/dev/null > $cache");
					}
				}
				if (!is_file($cache)) {
					$cache = "/dev/null";
				}
				if (preg_match("/.bz2$/", $file)) {
					system("bzcat -z $cache 2>/dev/null");
				} else {
					system("cat $cache 2>/dev/null");
				}
			}
			if ($file == "InRelease") {
				$sections = array("main", "extra");
				$archs = array();
				if ($d = @dir("$path/$class/")) {
					if ($d = @dir("$path/$class/")) {
						while ($arch = $d->read()) {
							if (is_dir($d->path . $arch) && $arch != "." && $arch != "..") {
								$archs[] = $arch;
							}
						}
					}
				} else {
					$archs[] = "none";
				}
				date_default_timezone_set('UTC');
				$release = "Origin: MLD\nLabel: MiniDVBLinux Distribution\nSuite: $class\nVersion: $version\nDate: ".date("r")."\nArchitectures: ".implode(' ', $archs)."\nComponents: ".implode(' ', $sections)."\nDescription: MiniDVBLinux Distribution\nSHA256:\n";
				foreach ($sections as $section) {
					foreach ($archs as $arch) {
						$cache = $config['data']."files/{$version}_{$class}_{$section}_{$arch}.txt";
						if (!is_file("$cache")) {
							$cache = "/dev/null";
						}
						$release .= " ".hash_file("sha256", "$cache")." ".filesize("$cache")." $section/binary-$arch/Packages\n";
					}
				}
				system("echo '$release' | gpg2 --homedir /var/www/.gnupg --clearsign --digest-algo SHA256 --local-user 'minidvblinux' 2>/dev/null");
			}
			if ($file == "archive.key") {
				system("gpg2 --homedir /var/www/.gnupg --armor --export 'minidvblinux' 2>/dev/null");
			}
		}
	}
}

function listaddons($path, $dir)
{
	$db = new Database ("data", $GLOBALS['config']['db']);
	$groupstates = array();
	if ($d = @dir($path)) {
		while ($f = $d->read()) {
			if (is_dir($d->path . $f) && $f != "." && $f != "..") {
				listaddons($d->path . $f . "/", $dir);
			} else if (is_file($d->path . $f) && preg_match("/\d{2}_?MLD.*\.tgz$|MLD.*\.sfs$|MLD.*\.gz$/", $f, $erg) &&
				(isset ($_GET['extra']) && $_GET['extra'] == "all" || !preg_match("/_" . implode("-|_", $GLOBALS['config']['extra_addons']) . "-/", $f, $erg))
			) {
				$state = 0;
				if ($db->query("SELECT state from state WHERE filename='$f'")) {
					$state = $db['state'];
				}
				if ($state == 0 && preg_match("/.+-.+_(.+)-(.+)_(.+)-.+_.+\.sfs/", $f, $erg)) {
					if (!isset ($groupstates[$erg[1]])) {
						if ($db->query("SELECT state FROM state WHERE name='$erg[1]' AND state>0 AND version LIKE '$erg[2]_%'")) {
							$groupstates[$erg[1]] = $db['state'];
						} else {
							$groupstates[$erg[1]] = 0;
						}
					}
					if ($groupstates[$erg[1]] > 0 && $db->query("SELECT state, version FROM state WHERE name='$erg[3]' AND state>0 ORDER BY version DESC LIMIT 1")) {
						$state = $groupstates[$erg[1]];
					}
				}
				if (empty($class) || $class == "all" || $class == "devel" && $state >= 0 || $class == "stable" && $state > 0) {
					echo $_SERVER['ORIGIN'] . "/download.php?file=" . substr($d->path . $f . "\n", strlen($dir));
				}
			}
		}
		$d->close();
	}
}

?>