File Explorer

1#!/usr/bin/sh -efu2 3fatal() {4	echo "$*" >&25	exit 16}7 8pkg="$1"9[ -n "$pkg" ] && [ -e "$pkg" ] ||10	fatal "No package supplied"11 12_dd() {13	local o="$1"; shift14	dd if="$pkg" skip="$o" iflag=skip_bytes status=none $*15}16 17calcsize() {18 19	case "$(_dd $1 bs=4 count=1 | tr -d '\0')" in20		"$(printf '\216\255\350')"*) ;; # '\x8e\xad\xe8'21		*) fatal "File doesn't look like rpm: $pkg" ;;22	esac23 24	offset=$(($1 + 8))25 26	local i b b0 b1 b2 b3 b4 b5 b6 b727 28	i=029	while [ $i -lt 8 ]; do30		# add . to not loose \n31		# strip \0 as it gets dropped with warning otherwise32		b="$(_dd $(($offset + $i)) bs=1 count=1 | tr -d '\0' ; echo .)"33		b=${b%.}    # strip . again34 35		[ -z "$b" ] &&36			b="0" ||37			b="$(exec printf '%u\n' "'$b")"38		eval "b$i=\$b"39		i=$(($i + 1))40	done41 42	rsize=$((8 + ((($b0 << 24) + ($b1 << 16) + ($b2 << 8) + $b3) << 4) + ($b4 << 24) + ($b5 << 16) + ($b6 << 8) + $b7))43	offset=$(($offset + $rsize))44}45 46case "$(_dd 0 bs=4 count=1 | tr -d '\0')" in47	"$(printf '\355\253\356\333')"*) ;; # '\xed\xab\xee\xdb'48	*) fatal "File doesn't look like rpm: $pkg" ;;49esac50 51calcsize 9652sigsize=$rsize53 54calcsize $(($offset + (8 - ($sigsize % 8)) % 8))55hdrsize=$rsize56 57case "$(_dd $offset bs=2 count=1 | tr -d '\0')" in58	"$(printf '\102\132')") _dd $offset | bunzip2 ;; # '\x42\x5a'59	"$(printf '\037\213')") _dd $offset | gunzip  ;; # '\x1f\x8b'60	"$(printf '\375\067')") _dd $offset | xzcat   ;; # '\xfd\x37'61	"$(printf '\135')") _dd $offset | unlzma      ;; # '\x5d\x00'62	"$(printf '\050\265')") _dd $offset | unzstd  ;; # '\x28\xb5'63	*) fatal "Unrecognized payload compression format in rpm file: $pkg" ;;64esac65