#!/bin/bash
# -*- ENCODING: UTF-8 -*-

# rrwhirlpool
#
# Create Whirlpool 'checksums' (check codes using a hash function).
#
# Copyright (c) 2013-2026: Alexis Puente Montiel   < pica (a) picalibre.org >
#
# Licensed according to GNU AGPL version 3.0.
#
# It is libre/free software; you can use, redistribute and/or modify it according to the terms of GNU AGPL as published by GNU, version 3.0, 19 November 2007.
#
# It is distributed in the hope that it will be useful, but without any warranty. Read GNU AGPL version 3.0 for additional details.
#
# A copy of GNU AGPL version 3.0 is available at /usr/share/doc/<software-package-name>/agpl-3.0.txt (additionally on Internet as text at https://www.gnu.org/licenses/agpl-3.0.txt and as HTML at https://www.gnu.org/licenses/agpl-3.0-standalone.html ).
#
# Note: Additionally to the official e-mails, picalibre.org is strictly the only official site for this software project, please consider using it to download, report bugs and contribute.
#
# Depends: bash, coreutils, grep, rhash


### SCRIPT VARIABLES ########################################

CNAME="rrwhirlpool"
VERSION="1.3.1"
TITLE="'rrwhirlpool'"

# Translations
if [ "$LANG" = "" ] ; then export $(cat /etc/default/locale | grep -a 'LANG=') ; fi
TEXTDOMAIN=picasum
TEXTDOMAINDIR=/usr/share/locale/

# Write errors to log
ERRORLOG="$HOME/.${CNAME}.log"
if [ -e "$ERRORLOG" ] ; then
	mv -f $ERRORLOG ${ERRORLOG}.ant
fi
if [ -e "$ERRORLOG" ] ; then rm -rf "$ERRORLOG" ; fi

for i in /etc/pica-global.dist /etc/pica-global.orig /etc/pica-global /etc/pica-global.local ~/.pica-global ~/pica-global ; do
	if [ -f "$i" ] ; then
	cat "$i"
	source "$i"
	source <(cat $i | sed -e "s/=\(YES\|Yes\|yes\|y\|SÍ\|SI\|Sí\|Si\|sí\|si\|S\|s\)/=Y/g" -e "s/=\(No\|no\|n\)/=N/g" -e "s/=\"\(YES\|Yes\|yes\|y\|SÍ\|SI\|Sí\|Si\|sí\|si\|S\|s\)\"/=Y/g" -e "s/=\"\(No\|no\|n\)\"/=N/g")
	fi
done
if [ "$DEBUG" = "Y" ] ; then
	set -xv
	DEBUG="Y"
else
	ERRORLOG="/tmp/.${CNAME}_$(id -nu).log"
	if [ -e "$ERRORLOG" ] ; then mv -f $ERRORLOG ${ERRORLOG}.ant ; fi
	if [ -e "$ERRORLOG" ] ; then rm -rf "$ERRORLOG" ; fi
fi
if [ "$DEBUG" = "" ] ; then DEBUG="N" ; fi
if [ "$DEBUG" != "N" ] ; then
exec > >(tee -a "$ERRORLOG") 2>&1
echo "$0" "$*" >> "$ERRORLOG"
#else
#exec 2>>"$ERRORLOG"
fi

# Description:
BDESCRIP=$"Create Whirlpool 'checksums' (check codes using a hash function)."
LDESCRIP=$"$TITLE is a tool to create Whirlpool 'checksums' (check codes using a hash function) of the content within a folder/directory."

# Documentation:
docu_info () {
echo "$CNAME ($VERSION) - $BDESCRIP"
echo 
echo $"Usage:" $CNAME [$"OPTIONS"] [$"PATH"]
echo 
echo $"Options:"
echo -e "$ODESCRIP"
echo 
echo $"'man $CNAME' for more information."
echo 
}
ODESCRIP=" -x""\t"$"Show help documentation."

while getopts x OPTION ; do
	case $OPTION in
		x )   docu_info ; exit 0 ;;
	esac
done


### SCRIPT ########################################

HASH=whirlpool
if [ -e "${HASH}.txt" ] ; then rm -fv "${HASH}.txt" ; fi
#if [ "$*" != "" ] ; then
#	find "$@" -type f ! -name ${HASH}sum.txt -print0 | sort -z | xargs -r0 ${HASH}sum | tee -a "${HASH}sum.txt"
##	find "$@" -type f ! -name ${HASH}sum.txt | sort | while read i ; do ${HASH}sum "$i" | tee -a "${HASH}sum.txt" ; done
#else
#	find {,.[!.],..?}* -type f ! -name ${HASH}sum.txt -print0 2>>"$ERRORLOG" | sort -z | xargs -r0 ${HASH}sum | tee -a "${HASH}sum.txt"
##	find {,.[!.],..?}* -type f ! -name ${HASH}sum.txt 2>>"$ERRORLOG" | sort | while read i ; do ${HASH}sum "$i" | tee -a "${HASH}sum.txt" ; done
#fi
if [ "$*" != "" ] ; then
	rhash --percents --${HASH} -r "$@" | tee -a ${HASH}.txt
else
	rhash --percents --${HASH} -r . | tee -a ${HASH}.txt
fi

exit "$?"
