Add functions: recent, recent_dirs, recent_files

[khome.git] / lib / login_functions.sh

diff --git a/lib/login_functions.sh b/lib/login_functions.sh
index d0f480b..29bc3e2 100644 (file)
--- a/lib/login_functions.sh
+++ b/lib/login_functions.sh
@@ -1,4 +1,5 @@
 # Top Disk-Using directories
+# TODO: Consider using numfmt instead of awk
 tdu() {
     du "$1" \
     | sort -n -k 1 -r --parallel="$(nproc)" \
@@ -14,6 +15,32 @@ tdu() {
     | cut -c 1-115
 }
 
+# Most-recently modified file system objects
+recent() {
+    # Intentional non-quoting of the parameters, so that some can be ignored if
+    # not passed, rather than be passed to find as empty strings.
+    # NOTE that %T+ is a GNU extention.
+    find $@ -printf '%T@ %T+ %p\0' \
+    | sort -z -k 1 -n -r \
+    | head -n "$(stty size | awk 'NR == 1 {print $1 - 5}')" -z \
+    | gawk -v RS='\0' '
+        {
+            sub("^" $1 " +", "")  # Remove epoch time
+            sub("+", " ")         # Blank-out the default separator
+            sub("\\.[0-9]+", "")  # Remove fractional seconds
+            print
+        }'
+    # gawk is able to split records on \0, while awk cannot.
+}
+
+recent_dirs() {
+    recent "$1" -type d
+}
+
+recent_files() {
+    recent "$1" -type f
+}
+
 pa_def_sink() {
     pactl info | awk '/^Default Sink:/ {print $3}'
 }
@@ -34,7 +61,7 @@ man() {
 }
 
 experiment() {
-    cd "$($HOME/bin/experiment $@)"
+    cd "$(~/bin/experiment $@)" || exit 1
 }
 
 hump() {
@@ -42,7 +69,7 @@ hump() {
 }
 
 howto() {
-    cat $(ls -1 -d  $HOME/Archives/Documents/HOWTOs/* | fzf)
+    cat "$(find  ~/Archives/Documents/HOWTOs -mindepth 1 -maxdepth 1 | sort | fzf)"
 }
 
 gh_fetch_repos() {
@@ -63,3 +90,49 @@ gh_clone_user() {
 gh_clone_org() {
     gh_clone 'orgs' "$1"
 }
+
+work_log_template() {
+cat << EOF
+$(date +%F)
+==========
+
+Morning report
+--------------
+
+### Previous
+
+### Current
+
+### Blockers
+
+Day's notes
+-----------
+EOF
+}
+
+work_log() {
+    mkdir -p "$DIR_WORK_LOG"
+    file_work_log_today="${DIR_WORK_LOG}/$(date +%F).md"
+    if [ ! -f "$file_work_log_today" ]
+    then
+        work_log_template > "$file_work_log_today"
+    fi
+    vim "$file_work_log_today"
+
+}
+
+weather() {
+    curl "http://wttr.in/$WEATHER_LOCATION"
+}
+
+bt_devs_paired() {
+    bluetoothctl -- paired-devices \
+    | awk '{print $2}' \
+    | xargs bluetoothctl -- info
+}
+
+bt_devs() {
+    bluetoothctl -- devices \
+    | awk '{print $2}' \
+    | xargs bluetoothctl -- info
+}