From c0ff099e949254267b1eb6a177bb861b6650f831 Mon Sep 17 00:00:00 2001
From: Leo Coogan <leocoogan@tutanota.com>
Date: Tue, 4 Jan 2022 22:51:51 -0500
Subject: [PATCH] Added whereami reimplementation

---
 bin/whereami | 6 ++++++
 1 file changed, 6 insertions(+)
 create mode 100755 bin/whereami

diff --git a/bin/whereami b/bin/whereami
new file mode 100755
index 0000000..91d6f03
--- /dev/null
+++ b/bin/whereami
@@ -0,0 +1,6 @@
+#!/usr/bin/env tclsh
+set TTY [exec tty]
+set PWD [exec pwd]
+set HOST [exec hostname]
+set IP [exec sh -c {ip -4 addr | grep -oP '(?<=inet\s)\d+(\.\d+){3}' | sed -n '2p'}] ;# local ipv4 from ethernet or first down list
+puts "$TTY $PWD $HOST $IP"