From a8e104d2d4cfade36a72fad7baa79332a9cf39e1 Mon Sep 17 00:00:00 2001
From: kevinnls <57634663+kevinnls@users.noreply.github.com>
Date: Sat, 2 Jan 2021 02:02:56 +0530
Subject: [PATCH] beta completed

- added UNIX-style
    - cp lightness `-0 | -1`
    - version `-v`
    - recurse `-r`
- copying function created and stablised
- add more prompt functions
- improve dest handling - moved to start
- add debugging option
---
 bak-old.sh | 161 ++++++++++++++++++++++++++++++++++++++++++-----------
 1 file changed, 129 insertions(+), 32 deletions(-)

diff --git a/bak-old.sh b/bak-old.sh
index 582bb82..7a796a3 100755
--- a/bak-old.sh
+++ b/bak-old.sh
@@ -5,6 +5,7 @@
 #   - another Linux user tired of #
 #     type cp file file.bak       #
 ###################################
+version='0.1.0-beta'
 
 ### IFS precautions
 OLDIFS="$IFS"
@@ -17,90 +18,173 @@ unset IFS
 # ` ` follow symlinks
 # ` ` lightweight copies
 
+debug(){
+    set -xev
+}
+
 print_usage(){
-cat << HERE
+    cat << HERE
 $(tput bold; tput setaf 3)${0##*/}$(tput sgr0)
     Create copies of files with .bak or .old suffixes
 $(tput bold)USAGE$(tput sgr0)
-    $(tput bold)${0##*/}$(tput sgr0) [-b|o] FILES [ -d DESTINATION ]
+    $(tput bold)${0##*/}$(tput sgr0) [-b|o] [-0|1] [-r] FILES [ -d DESTINATION ]
 
 $(tput bold)OPTIONS$(tput sgr0)
   Suffix for FILES -- only one can be used
     -b	$(tput bold).bak$(tput sgr0) [default]
     -o	$(tput bold).old$(tput sgr0)
+
   Destination for clones
-    -d	\`cp FILES DESTINATION/FILES.suffix\`
+    -d	save the clones in DESTINATION
+	[default] is the current directory
+
+  Lightweight copies
+    -0  create if possible [default]
+    -1  force regular copies
+
+  Recursive clone
+    -r  clone a directory and its contents
+HERE
+}
+print_version(){
+    cat << HERE
+$(tput bold)${0##*/}: v${version}$(tput sgr0)
+    by https://github.com/kevinnls
 HERE
 }
-
 set_dest(){
-    dest=$1
+    if [[ -n "$1" ]]  && ! realpath -e "$1" >/dev/null 2>&1 ;then
+	echo $1 does not exist
+	echo creating now...
+	mkdir -p $(realpath "$1")
+	[[ $? -ne 0 ]] && exit 1
+    fi
+    dest=$(realpath "$1")
 }
 set_mode(){
     if [[ -z $mode ]]; then
 	mode=$1
     else
-	inexclusive_flags
+	print_error 'bo'
+    fi
+}
+set_weight(){
+    if [[ -z "$weight" ]]; then
+	weight="$1"
+    else
+	print_error '01'
     fi
 }
 add_file(){
     files=("${files[@]}" "$1")
 }
 
+in_combi(){
+    [[ "$combi" =~ [:alnum:]*($1){1}[:alnum:]* ]]
+}
+un_combi(){
+    combi=${combi/$1/}
+}
 parse_combined(){
 
-    combi=${1/-/}
-
-    in_combi(){
-	[[ "$combi" =~ [:alnum:]*($1){1}[:alnum:]* ]]
-    }
-    un_combi(){
-	combi=${combi/$1/}
-    }
+    combi="${1/-/}"
 
     if in_combi 'b';then
-       set_mode bak
-       un_combi 'b'
+	set_mode bak
+	un_combi 'b'
     fi
     if in_combi 'o'; then
-       set_mode old
-       un_combi 'o'
+	set_mode old
+	un_combi 'o'
+    fi
+    if in_combi '0'; then
+	set_weight 'auto'
+	un_combi '0'
+    fi
+    if in_combi '1'; then
+	set_weight 'never'
+	un_combi '1'
     fi
 
     [[ "$combi" =~ [:alnum:]*(d){1} ]] && set_dest $2 && ret=2
 
     if [[ -z "$combi" ]]; then
-	return ${ret:-1} #return number of positions to shift
+	return ${ret:-1}
     else
-	tput setaf 1
-	echo "ERROR: unrecognised flags"
-	tput sgr0
-	print_usage
+	print_error 'x'
 	exit 1
     fi
 }
 
-inexclusive_flags(){
-    echo "modes backup and old cannot co-exist"
-    exit
+print_error(){
+    tput setaf 1
+    case $1 in
+	bo)
+	    echo "ERROR: modes backup and old cannot co-exist"
+	    ;;
+	01)
+	    echo "ERROR: lightweight copy modes cannot co-exist"
+	    ;;
+	x)
+	    echo "ERROR: unrecognised flags"
+	    tput sgr0
+	    print_usage
+	    ;;
+	*)
+	    echo "UNKNOWN ERROR"
+    esac
+    tput sgr0
+    exit 1
+}
+copy_succ(){
+    echo " ✅ $(tput setaf 2; tput bold)$file.${mode:-bak}$(tput sgr0)"
+}
+copy_fail(){
+    echo " ❌ $(tput setaf 1; tput bold)$file$(tput sgr0)"
+}
+copy_nofile(){
+    echo " ❌ $(tput setaf 1; tput bold)$file$(tput sgr0) : file does not exist"
 }
 
+### enable debugging ###
+${DEBUG+debug}       ###
+### if $DEBUG is set ###
+
+###############################################################################
+# SANITISING PARAMS AND OPTIONS
+################################
 while [[ $# -gt 0 ]]; do
     case $1 in
 	'-h' )
 	    print_usage
 	    exit 0
 	    ;;
+	'-v' )
+	    print_version
+	    exit 0
+	    ;;
+	'-r' )
+	    recurse='-r' #set_recurse
+	    shift 1
+	    ;;
 	'-d' )
 	    set_dest "$2"
 	    shift 2
 	    ;;
 	'-b' )
-	    set_mode bak
+	    set_mode 'bak'
 	    shift 1
 	    ;;
 	'-o' )
-	    set_mode old
+	    set_mode 'old'
+	    shift 1
+	    ;;
+	'-0' )
+	    set_weight 'auto'
+	    shift 1
+	    ;;
+	'-1')
+	    set_weight 'never'
 	    shift 1
 	    ;;
 	-* )
@@ -114,10 +198,23 @@ while [[ $# -gt 0 ]]; do
     esac
 done
 
-echo params sanitised
-echo files: ${files[@]}
-echo mode: $mode
-echo dest: $dest
+
+################################################################################
+# THE ACTUAL COPYING CODE
+##########################
+for file in "${files[@]}"; do
+    if realpath -e "$file" >/dev/null 2>&1 ;then
+	src_filepath="$(realpath "$file")"
+	dst_filepath="${dest:-${src_filepath%/*}}"
+	dst_filename="${src_filepath##*/}.${mode:-bak}"
+	cp_weight="--reflink=${weight:-auto}"
+	cp ${recurse} ${cp_weight} "$src_filepath" "$dst_filepath/$dst_filename"
+	[[ $? -eq 0 ]] && copy_succ || copy_fail
+    else
+	copy_nofile
+    fi
+done
 
 ### reset IFS
 IFS="$OLDIFS"
+