#!/usr/bin/env bash

rm -f -- rip.d/*

for FILE in ../../disks/mags/fred/fred*; do
echo "$FILE"
	../tools/samdir "$FILE" | \
	grep "^ *[0-9]" | grep -v "Files, .* Free" | \
	sed -e "s/^ *[0-9]* //g" | cut -b 1-10 | sed -e "s/ *$//g" | \
	(while read SUBFILE; do
		echo "$SUBFILE" | grep -Ei '(\.m$)|(\.mod$)|(artelli)' \
		 > /dev/null && \
		 (fgrep -- "${SUBFILE}" notmods > /dev/null || \
		  (NEWFILE=rip.d/"`echo "$SUBFILE" | tr -d ' '`";
		   ../tools/samcat "$FILE" "$SUBFILE" > "$NEWFILE"))
	done)
done

for FILE in rip.d/*; do
	mv -- "$FILE" "`echo $FILE | tr A-Z a-z | sed -e 's/\.m$/\.mod/'`"
done
mv rip.d/artelli8 rip.d/artelli8.mod