streamWrapper::dir_readdir

<?php
class streamWrapper {
    protected $fp;

    public function dir_opendir($path, $options) {
        $url = parse_url($path);

        $path = $url["host"] . $url["path"];

        if (!is_readable($path)) {
            trigger_error("$path no es legible para mí", E_USER_NOTICE);
            return false;
        }
        if (!is_file($path)) {
            trigger_error("$path no es un archivo", E_USER_NOTICE);
            return false;
        }

        $this->fp = fopen($path, "rb");
        return true;
    }

    public function dir_readdir() {
        // Extrae el encabezado para esta entrada
        $header      = fread($this->fp, 512);
        $data = unpack("a100filename/a8mode/a8uid/a8gid/a12size/a12mtime/a8checksum/a1filetype/a100link/a100linkedfile", $header);

        // Recorta el nombre del archivo y el tamaño del archivo
        $filename    = trim($data["filename"]);

        // No hay archivo, estamos al final del archivo
        if (!$filename) {
            return false;
        }

        $octal_bytes = trim($data["size"]);
        // El tamaño del archivo está definido en octetos
        $bytes       = octdec($octal_bytes);

        // tar redondea los tamaños de archivos al múltiplo de 512 siguiente
        $rest        = $bytes % 512;
        if ($rest > 0) {
            $bytes      += 512 - $rest;
        }

        // Lectura del archivo
        fseek($this->fp, $bytes, SEEK_CUR);

        return $filename;
    }

    public function dir_closedir() {
        return fclose($this->fp);
    }

    public function dir_rewinddir() {
        return fseek($this->fp, 0, SEEK_SET);
    }
}

stream_wrapper_register("tar", "streamWrapper");
$handle = opendir("tar://example.tar");
while (false !== ($file = readdir($handle))) {
    var_dump($file);
}

echo "Reinicio...\n";
rewind($handle);
var_dump(readdir($handle));

closedir($handle);
?>