From: Steven Baltakatei Sandoval Date: Tue, 3 May 2022 00:35:04 +0000 (+0000) Subject: feat(user/bkots): Don't timestamp files changed in last 1 min X-Git-Tag: 0.5.0~1 X-Git-Url: https://zdv2.bktei.com/gitweb/BK-2020-03.git/commitdiff_plain/3434f509908b59a232337f9f8905901b810a431d feat(user/bkots): Don't timestamp files changed in last 1 min - Note: The intent of a minimum age limit for files to be timestamped is to avoid timestamping files that are frequently changing. --- diff --git a/user/bkots b/user/bkots index f829ce6..79c6692 100755 --- a/user/bkots +++ b/user/bkots @@ -11,6 +11,7 @@ calendars+=("https://finney.calendar.eternitywall.com"); 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 @@ -199,7 +200,7 @@ showVersion() { vbm "DEBUG:showVersion function called." cat <<'EOF' -bkots 0.0.8 +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. @@ -260,6 +261,8 @@ showUsage() { 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/ @@ -357,12 +360,15 @@ main() { # - 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 @@ -376,17 +382,13 @@ main() { 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 @@ -425,7 +427,7 @@ main() { 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 @@ -435,14 +437,21 @@ main() { # 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"; @@ -455,7 +464,7 @@ main() { 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 @@ -463,7 +472,7 @@ main() { 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"; @@ -476,9 +485,11 @@ main() { continue; # skip to next item fi; - ## Ignore files that end in '.ots.bak'. - if [[ $item =~ '.ots.bak'$ ]]; then - yell "INFO :Skipping file ending in '.ots.bak':item:$item"; + ## 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;