view bin/moedump @ 719:bcdf320dabf4 default tip

Rewrite the ed2k again in php Getting openssl to hash md4 is a pain.
author nanaya <me@nanaya.net>
date Sun, 10 Dec 2023 00:35:22 +0900
parents 5bafb912837e
children
line wrap: on
line source

#!/bin/sh

safe_mv() { mv -- "$@"; }
safe_ln() { ln -s -- "$1" "$2"; }
safe_basename() { basename -- "$1"; }
get_md5() { ${MD5} -- "$1" | cut -d' ' -f1; }
get_filename() { safe_basename "${1%.*}"; }

eod() { "$@" || errx "$@"; }
errx() { echo "Error executing: $@"; exit 1; }
MD5="md5sum"
[ "$(safe_basename "${PWD}")" = ".all" ] || { echo "Wrong working directory. This script must be run in .all directory. Aborting."; exit 1; }

[ -d "../.trash" ] || eod mkdir ../.trash

echo "Total files: $(find ../* -type f | wc -l) files."

num=0
for i in ../*/*
do
	if [ -h "$i" ]
	then
		[ -f "$i" ] || { eod safe_mv "$i" "../.trash" && echo "Broken file: $(safe_basename "$i"). Moved to trash."; }
	else
		if [ "$(get_md5 "$i")" = "$(get_filename "$i")" ]
		then
			eod safe_mv "$i" . 
			eod safe_ln "../.all/$(safe_basename "$i")" "$i" 
		else 
			eod safe_mv "$i" "../.trash" && echo "Broken file: $(get_filename "$i"). Moved to .trash."
		fi
		printf "%s" "."
		num=$((num+1))
		[ "$((num%100))" -eq 0 ] && printf "${num}"
	fi
done

echo "done"