X-Git-Url: https://git.sev.monster/~sev/dotfiles.git/blobdiff_plain/1a578fd007c8ba4196e424f993ce55837649d78b..024170a4eaed28d31833f95602369e9ccdf70a13:/etc/zsh/.zshenv

diff --git a/etc/zsh/.zshenv b/etc/zsh/.zshenv
index 6a513e2..7a923e9 100644
--- a/etc/zsh/.zshenv
+++ b/etc/zsh/.zshenv
@@ -54,7 +54,7 @@ function _sev_setpath {
     # add as many generic paths as possible to keep the order we want
     # NOTE: tied arrays path and fpath already exist, but are not unique (-U);
     #       we utilize the fact that unique arrays keep the first occurrence
-    #       and remove any further occurences to check for elements from the
+    #       and remove any further occurrences to check for elements from the
     #       old PATH that we did not anticipate and shift them to the front,
     #       since they are probably important to the system
     typeset -gU path fpath
@@ -65,6 +65,13 @@ function _sev_setpath {
     #       with something like Environment Modules. this code does not account
     #       for this type of usage and will add all valid paths. any undesired
     #       paths can be removed using .zshenv.local.
+    # NOTE: fun non-conformant systems like Android may have fun dirs that
+    #       contain binaries intended solely for the base system, and their use
+    #       by other users/subsystems may cause problems. for example,
+    #       /system/bin/bc on Android may be a different version of or
+    #       completely different codebase compared to the Termux-installed bc.
+    #       modern Termux does not add these such systems to PATH by default,
+    #       but older versions/configurations might.
     # XXX: PREFIX not validated, non-POSIX but Termux uses it, maybe others
     # XXX: XDG specifies ~/.local/bin as the only user-writable dir for
     #      executables, but we specify more; technically this is against spec
@@ -73,8 +80,8 @@ function _sev_setpath {
           # emulate Arch Linux flatpak-bindir.sh for use on other systems
           {${XDG_DATA_HOME:-~/.local/share},{$PREFIX,}/var/lib}/flatpak/exports/bin)
     local -i i len=$#path
-    path=("$path[@]" "$syspath[@]")
-    # remove bad paths
+    path+=("$syspath[@]")
+    # remove bad paths... after having combined the arrays to remove duplicates
     for (( i = 1; i <= $#path; i++ )) {
         if [[ ! -d $path[$i] ]] {
             path[$i]=()
@@ -161,12 +168,12 @@ if [[ ! -v _sev_tmp ]] {
     # create personal TMPDIR under system tmp
     # NOTE: under proot with uid remapping and shared /tmp, we can reuse old
     #       dir, without worrying about permission issues; intended for termux.
-    t=${TMPDIR:-${TEMPDIR:-${TEMP:-${TMP:-${${TMPPREFIX%/zsh}:-/tmp}}}}}/.home-${_sev_proot_real_user:-$LOGNAME}
-    [[ -e $t ]] || mkdir -m700 $t 2>/dev/null
-    if [[ ! -d $t ]] {
+    _t=${TMPDIR:-${TEMPDIR:-${TEMP:-${TMP:-${${TMPPREFIX%/zsh}:-/tmp}}}}}/.home-${_sev_proot_real_user:-$LOGNAME}
+    [[ -e $_t ]] || mkdir -m700 $_t 2>/dev/null
+    if [[ ! -d $_t ]] {
         # fallback TMPDIR to bare local directory or existing softlink
         [[ -o interactive ]] &&
-          print -P "%F{orange}*** Can't create tmp dir $t, using $_sev_tmp%f"
+          print -P "%F{orange}*** Can't create tmp dir $_t, using $_sev_tmp%f"
         [[ -h $_sev_tmp && ! -d _sev_tmp ]] && unlink $_sev_tmp 2>/dev/null
         [[ ! -e $_sev_tmp ]] && mkdir -m700 $_sev_tmp 2>/dev/null
         if [[ ! -d $_sev_tmp ]] {
@@ -177,10 +184,10 @@ if [[ ! -v _sev_tmp ]] {
     } elif [[ -e $_sev_tmp && ! -h $_sev_tmp ]] {
         # non-softlink node is on our local dir
         [[ -o interactive ]] &&
-          print -P "%F{orange}*** $_sev_tmp exists, can't link to tmp dir $t, ignoring it%f"
-        _sev_tmp=$t
+          print -P "%F{orange}*** $_sev_tmp exists, can't link to tmp dir $_t, ignoring it%f"
+        _sev_tmp=$_t
     } else {
-        if [[ ! -v $_sev_tmp_keep_link && -h $_sev_tmp && $_sev_tmp:P != $t:P ]] {
+        if [[ ! -v $_sev_tmp_keep_link && -h $_sev_tmp && $_sev_tmp:P != $_t:P ]] {
             [[ -o interactive ]] &&
               print -P "%F{orange}*** $_sev_tmp links to ${_sev_tmp:P} and not ${t:P}, unlinking it%f"
             # NOTE: ln -f doesn't seem to work reliably with softlink
@@ -191,20 +198,20 @@ if [[ ! -v _sev_tmp ]] {
         }
         if [[ ! -e $_sev_tmp ]] {
             # link local dir to tmp dir
-            ln -s $t $_sev_tmp 2>/dev/null
+            ln -s $_t $_sev_tmp 2>/dev/null
         }
     }
     # ensure dir is clean
     _sev_zcleanup tmp
     # finally create our subdir for this session
-    t=$_sev_tmp/.session.$$
-    if ! mkdir -m700 $t 2>/dev/null; then
+    _t=$_sev_tmp/.session.$$
+    if ! mkdir -m700 $_t 2>/dev/null; then
         [[ -o interactive ]] &&
-          print -P "%F{red}!!! Can't create session tmp subdir $t, using $_sev_tmp%f"
-        t=$_sev_tmp
+          print -P "%F{red}!!! Can't create session tmp subdir $_t, using $_sev_tmp%f"
+        _t=$_sev_tmp
     fi
-    export _sev_tmp TMPDIR=$t TEMPDIR=$t TEMP=$t TMP=$t TMPPREFIX=$t/zsh
-    unset t
+    export _sev_tmp TMPDIR=$_t TEMPDIR=$_t TEMP=$_t TMP=$_t TMPPREFIX=$_t/zsh
+    unset _t
 }
 
 ## xdg
@@ -287,11 +294,22 @@ if [[ ! -v GNUPGHOME ]] {
 }
 
 ## perl local lib
-[[ ! -v PERL_LOCAL_LIB_ROOT && -v commands[perl] &&
-   -d $XDG_DATA_HOME/perl5/lib/perl5 ]] &&
-  eval $(perl -I$XDG_DATA_HOME/perl5/lib/perl5 \
-              -Mlocal::lib=$XDG_DATA_HOME/perl5 2>/dev/null)
-
+if [[ ! -v PERL_LOCAL_LIB_ROOT && -v commands[perl] ]] {
+    _p5=${XDG_DATA_HOME:-~/.local/share}/perl5
+    [[ -d $_p5 ]] || mkdir -p $_p5
+    if [[ -f $_p5/lib/perl5/local/lib.pm ]] {
+        eval $(perl -I$_p5/lib/perl5 -Mlocal::lib=$_p5 2>/dev/null)
+    } else {
+        # emulate local::lib if not installed
+        path=($_p5/bin "${path[@]}")
+        export \
+          PERL_MB_OPT="--install_base '$_p5'" \
+          PERL_MM_OPT=INSTALL_BASE=$_p5 \
+          PERL5LIB=$_p5/lib/perl5 \
+          PERL_LOCAL_LIB_ROOT=$_p5${PERL_LOCAL_LIB_ROOT:+:$PERL_LOCAL_LIB_ROOT}
+    }
+    unset _p5
+}
 ## go
 if [[ -v commands[go] ]] {
     [[ ! -v GOPATH ]] && export GOPATH=${XDG_DATA_HOME:-~/.local/share}/go:~/go
@@ -305,9 +323,9 @@ load-site-dotfile zshenv
 ### source .zprofile early for non-login shells that should be
 if [[ ! -v _sev_first_display && ( -v DISPLAY || -v WAYLAND_DISPLAY ) ]] {
     # most graphical login/session managers will spawn the user's shell as a
-    # parent of all child processes for that session. however, if the parent shell
-    # isn't a login shell for some reason, our .zprofile won't be run, and the
-    # environment won't be configured for child processes.
+    # parent of all child processes for that session. however, if the parent
+    # shell isn't a login shell for some reason, our .zprofile won't be run,
+    # and the environment won't be configured for child processes.
     #
     # XXX: .zprofile will be sourced by every new child shell if zsh is not
     #      used to start the graphical session and the _sev_first_display var