calendars+=("https://btc.calendar.catallaxy.com");
calendars+=("https://alice.btc.calendar.opentimestamps.org");
calendars+=("https://bob.btc.calendar.opentimestamps.org");
+age_threshold="60"; # min age to add file; seconds;
# Declare functions
yell() { echo "$0: $*" >&2; } # print script path and all args to stderr
vbm "DEBUG:showVersion function called."
cat <<'EOF'
-bkots 0.0.3
+bkots 0.0.9
Copyright (C) 2022 Steven Baltakatei Sandoval
License GPLv3: GNU GPL version 3
This is free software; you are free to change and redistribute it.
themselves are also ignored by default
(e.g. '/home/user/.gitconfig').
+ Files modified less than 1 minute ago are ignored.
+
EXAMPLES:
bkots -v foo.txt
bkots foo.txt bar.pdf /home/username/Pictures/
# - for each file in each dir specified in arrayPosArgs array
# Output file created alongside each file or in output directory specified by pathDirIn1
# Usage: main "$@";
- # Input: arrayPosArgs array with positional arguments
- # pathDirOut1 path for output `.ots` files (if pathDirOut1 is specified and is a path)
+ # Input: arrayPosArgs array with positional arguments
+ # pathDirOut1 path for output `.ots` files (if pathDirOut1 is specified and is a path)
+ # age_threshold var: mininum age in seconds to timestamp file
+
# Output: file(s) creates `.ots` file alongside specified files
# Depends: find (GNU findutils) 4.8.0, GNU Coreutils 8.32 (sort)
# Ref/Attrib: [1] How to create an array of unique elements from a string/array in bash https://unix.stackexchange.com/a/167194
# [2] How to find files containing newlines in their names https://stackoverflow.com/a/21727028
+ # [3] Get mtime of specific file using Bash? https://stackoverflow.com/a/4774377
local -a file_list file_list_pruned;
local -a files_to_verify files_to_upgrade files_to_stamp
local -a files_to_verify_pruned files_to_upgrade_pruned files_to_stamp_pruned
die "FATAL:Missing dependencies.";
fi;
- # Check arguments
- ## Mark if output dir option specified
- if [[ -v pathDirOut1 ]]; then
- vbm "DEBUG:output directory specified:pathDirOut1:$pathDirOut1";
- if [[ -d $pathDirOut1 ]]; then
- vbm "DEBUG:pathDirOut1:$pathDirOut1";
- config_output_dir="true";
- else
- die "ERROR:Not a dir:$pathDirOut1";
+ # Check arguments
+ for arg in "${arrayPosArgs[@]}"; do
+ arg="$(readlink -f "$arg")";
+ if ! { [[ -d $arg ]] || [[ -f $arg ]]; }; then
+ die "FATAL:Not a file or dir:arg:$arg";
fi;
- fi;
+ done;
# Display ots details
vbm "$(type ots)"; # show how 'ots' is defined
done < <(find "$item" -maxdepth 1 -type f);
fi;
else
- die "ERROR:Not a file or dir:item:$item";
+ die "FATAL:Not a file or dir:item:$item";
fi;
done;
if [[ $opVerbose == "true" ]]; then
# Prune file_list
for item in "${file_list[@]}"; do
+ ## Ignore files that end in '.ots.bak'.
+ if [[ $item =~ '.ots.bak'$ ]]; then
+ yell "INFO :Skipping file ending in '.ots.bak':item:$item";
+ continue; # skip to next item
+ fi;
+
+ ## Ignore dotfiles
if ! [[ $option_include_dotfiles == "true" ]]; then
- ## Ignore files located beneath a dotfile directory (e.g. '/home/my_repo/.git/config')
+ ### Ignore files located beneath a dotfile directory (e.g. '/home/my_repo/.git/config')
unset flag_contains_dotfile_parent;
while read -r line; do
- ### Check line from output of get_parent_dirnames
+ #### Check line from output of get_parent_dirnames
pattern="^\.";
if [[ $line =~ $pattern ]]; then
- #### line starts with '.'
+ ##### line starts with '.'
vbm "DEBUG:Dotfile parent detected. Not including in file_list_pruned:$item";
vbm "DEBUG:Dotfile in path:item:$item";
vbm "DEBUG:Dotfile parent:line:$line";
continue; # skip to next item (i.e. don't add to file_list_pruned)
fi;
- ## Ignore dotfiles themselves
+ ### Ignore dotfiles themselves
item_basename="$(basename "$item")";
pattern="^\.";
if [[ $item_basename =~ $pattern ]]; then
continue; # skip to next item
fi;
fi;
-
+
## Ignore files with newlines present in filename. See [2].
if [[ $item =~ $'\n' ]]; then
yell "INFO :Skipping file name with newline:$item";
yell "INFO :Skipping file ending in tilde:$item";
continue; # skip to next item
fi;
+
+ ## Ignore files modified less than age_threshold. See [3].
+ time_now="$(date +%s)"; # epoch seconds
+ item_age="$(stat -c %Y "$item")"; # age in seconds
+ if [[ $(( time_now - item_age )) -lt "$age_threshold" ]]; then
+ yell "INFO :Skipping file modified less than $age_threshold seconds ago:item:$item";
+ continue; # skip to next item
+ fi;
## Add item to file_list_pruned
file_list_pruned+=("$item");
fi;
vbm "DEBUG:Attempting to upgrade proof file:path_prf:$path_prf";
if [[ ! $option_dry_run == "true" ]]; then
- #ots upgrade "$path_prf";
- for url in "${calendars[@]}"; do
- ots -l "$url" --no-default-whitelist upgrade "$path_prf";
- done;
+ ### Try upgrade with known calendars in random order
+ while read -r url; do
+ vbm "DEBUG:Upgrading with calendar:url:$url";
+ ots -l "$url" --no-default-whitelist upgrade "$path_prf" && break;
+ done < <(printf "%s\n" "${calendars[@]}" | shuf);
else
yell "DEBUG:DRY RUN:Not running:\"ots upgrade $path_prf\"";
fi;
- sleep "$ots_delay";
+ #sleep "$ots_delay";
done;
## Verify files
vbm "DEBUG:Attempting to verify source file:path_src:$path_src";
vbm "DEBUG: against proof file: path_prf:$path_prf";
if [[ ! $option_dry_run == "true" ]]; then
- #ots verify -f "$path_src" "$path_prf";
- for url in "${calendars[@]}"; do
- ots -l "$url" --no-default-whitelist verify -f "$path_src" "$path_prf";
- done;
+ ### Try verify with known calendars in random order
+ while read -r url; do
+ vbm "DEBUG:Verifying with calendar:url:$url";
+ ots -l "$url" --no-default-whitelist verify -f "$path_src" "$path_prf" && break;
+ done < <(printf "%s\n" "${calendars[@]}" | shuf);
else
yell "DEBUG:DRY RUN:Not running:\"ots verify -f $path_src $path_prf\"";
fi;
- sleep "$ots_delay";
+ #sleep "$ots_delay";
done;
## Stamp files
fi;
vbm "DEBUG:Attempting to stamp source file:path_src:$path_src";
if [[ ! $option_dry_run == "true" ]]; then
- #ots stamp "$item";
- for url in "${calendars[@]}"; do
- ots -l "$url" --no-default-whitelist verify stamp "$item";
- done;
+ ots stamp "$path_src";
else
- yell "DEBUG:DRY RUN:Not running:\"ots stamp $item\"";
+ yell "DEBUG:DRY RUN:Not running:\"ots stamp $path_src\"";
fi;
sleep "$ots_delay";
done;