rar-list.php

<?php
// Чтение списка файлов из RAR
// Версия 0.1
// Автор: Алексей Рембиш a.k.a Ramon
// E-mail: alex@rembish.ru
// Copyright 2009

// Функция чтения списка файлов из $filename без использования
// PECL-расширения rar.
function rar_getFileList($filename) {
	// Функция для получения COUNT байтов из строки (little-endian).
	// Чтобы не засорять глобальное пространство функций - отправляем её 
	// вовнуть материнской.
	if (!function_exists("temp_getBytes")) {
		function temp_getBytes($data, $from, $count) {
			$string = substr($data, $from, $count);
			$string = strrev($string);

			return hexdec(bin2hex($string));
		}
	}

	// Попытка открыть файл
	$id = fopen($filename, "rb");
	if (!$id)
		return false;

	// Проверка - является ли файл RAR-архивом
	$markHead = fread($id, 7);
	if (bin2hex($markHead) != "526172211a0700")
		return false;

	// Пытаемся прочесть MAIN_HEAD блок
	$mainHead = fread($id, 7);
	if (ord($mainHead[2]) != 0x73)
		return false;
	$headSize = temp_getBytes($mainHead, 5, 2);

	// Сдвигаемся на позицию первого "значащего" блока в файле
	fseek($id, $headSize - 7, SEEK_CUR);

	$files = array();
	while(!feof($id)) {
		// Читаем загловок блока
		$block = fread($id, 7);
		$headSize = temp_getBytes($block, 5, 2);
		if ($headSize <= 7)
			break;

		// Дочитываем остаток блока исходя из длины заголовка по 
		// соответствующему смещению
		$block .= fread($id, $headSize - 7);
		// Если это файловый блок, то начинаем его обрабатывать
		if (ord($block[2]) == 0x74) {
			// Смотрим сколько занимает в архиве запакованный файл и
			// смещаемся к следующей позиции.
			$packSize = temp_getBytes($block, 7, 4);
			fseek($id, $packSize, SEEK_CUR);

			// Читаем атрибуты файла: r - read only, h - hidden,
			// s - system, d - directory, a - archived
			$attr = temp_getBytes($block, 28, 4);
			$attributes = "";
			if ($attr & 0x01)
				$attributes .= "r";
			if ($attr & 0x02)
				$attributes .= "h";
			if ($attr & 0x04)
				$attributes .= "s";
			if ($attr & 0x10 || $attr & 0x4000)
				$attributes = "d";
			if ($attr & 0x20)
				$attributes .= "a";

			// Читаем имя файла, размеры до и после запаковки, CRC и аттрибуты
			$files[] = array(
				"filename" => substr($block, 32, temp_getBytes($block, 26, 2)),
				"size_compressed" => $packSize,
				"size_uncompressed" => temp_getBytes($block, 11, 4),
				"crc" => temp_getBytes($block, 16, 4),
				"attributes" => $attributes,
			);
		} else {
			// Если данный блок не файловый, то пропускаем с учётом возможного
			// дополнительного смещения ADD_SIZE
			$flags = temp_getBytes($block, 3, 2);
			if ($flags & 0x8000) {
				$addSize = temp_getBytes($block, 7, 4);
				fseek($id, $addSize, SEEK_CUR);
			}
		}
	}
	fclose($id);

	// Возвращаем список файлов
	return $files;
}
// Получение списка файлов изи архива RAR в виде древовидной структуры.
function rar_getFileTree($filename) {
	// Получаем список файлов и директорий
	$files = rar_getFileList($filename);

	$tree = array();
	// Начинаем обходить список из архива.
	for ($i = 0; $i < count($files); $i++) {
		// Если текущий файл, это не директория, то...
		if (strpos($files[$i]["attributes"], "d") === false) {
			// бъем путь к нему на части.
			$file = explode("\\", $files[$i]["filename"]);

			// Ставим C - как указатель на корень дерева
			$c = &$tree;
			// Обходим все директории до имени файла
			for ($j = 0; $j < count($file) - 1; $j++) {
				// Если нужно создаём директорию в дереве
				if (!isset($c["/".$file[$j]]))
					$c["/".$file[$j]] = array();
				// Смещаем указатель C вовнутрь
				$c = &$c["/".$file[$j]];
			}

			// Записываем файл, подкорректировав имя, по адресу в дереве.
			$f = $files[$i];
			unset($f["filename"]);
			$c[$file[count($file) - 1]] = $f;
		}
	}

	// Сортируем наше дерево, по алфавиту - директории сверху.
	if (!function_exists("temp_ksort")) {
		function temp_ksort($item, $key) {
			if (is_array($item))
				ksort($item);
		}
	} array_walk($tree, "temp_ksort");

	// Возвращаем дерево файлов.
	return $tree;
}
?>