]> Sergey Matveev's repositories - zsh-autoenv.git/blobdiff - autoenv.zsh
Make env_shasum local in _autoenv_hash_pair
[zsh-autoenv.git] / autoenv.zsh
index 81a8742eb905da41ffc14230132a1922a8424760..034b7fef1fae69ad1f30026449877b079ecd736c 100644 (file)
@@ -17,6 +17,8 @@ export AUTOENV_ENV_FILENAME=$HOME/.env_auth
 # event was handled?
 : ${AUTOENV_HANDLE_LEAVE:=1}
 
+# Enable debugging. Multiple levels are supported (max 2).
+: ${AUTOENV_DEBUG:=0}
 
 # Public helper functions, which can be used from your .env files:
 #
@@ -27,13 +29,17 @@ autoenv_source_parent() {
 
   if [[ -n $parent_env_file ]] \
     && _autoenv_check_authorized_env_file $parent_env_file; then
+    _autoenv_debug "Calling autoenv_source_parent: parent_env_file:$parent_env_file"
 
     local parent_env_dir=${parent_env_file:A:h}
+
+    _autoenv_stack_entered_add $parent_env_file
+
     _autoenv_source $parent_env_file enter $parent_env_dir
   fi
 }
 
-
+# Internal functions. {{{
 # Internal: stack of entered (and handled) directories. {{{
 _autoenv_stack_entered=()
 typeset -A _autoenv_stack_entered_mtime
@@ -43,8 +49,10 @@ _autoenv_stack_entered_mtime=()
 _autoenv_stack_entered_add() {
   local env_file=$1
 
+  _autoenv_debug "[stack] adding: $env_file" 2
+
   # Remove any existing entry.
-  _autoenv_stack_entered[$_autoenv_stack_entered[(i)$1]]=()
+  _autoenv_stack_entered_remove $env_file
 
   # Append it to the stack, and remember its mtime.
   _autoenv_stack_entered+=($env_file)
@@ -62,7 +70,8 @@ _autoenv_get_file_mtime() {
 # Remove an entry from the stack.
 _autoenv_stack_entered_remove() {
   local env_file=$1
-  _autoenv_stack_entered=(${_autoenv_stack_entered#$env_file})
+  _autoenv_debug "[stack] removing: $env_file" 2
+  _autoenv_stack_entered[$_autoenv_stack_entered[(i)$env_file]]=()
   _autoenv_stack_entered_mtime[$env_file]=
 }
 
@@ -80,13 +89,43 @@ _autoenv_stack_entered_contains() {
 }
 # }}}
 
+# Internal function for debug output. {{{
+_autoenv_debug() {
+  local msg=$1
+  local level=${2:-1}
+  if [[ $AUTOENV_DEBUG -lt $level ]]; then
+    return
+  fi
+  # Load zsh color support.
+  if [[ -z $colors ]]; then
+    autoload colors
+    colors
+  fi
+  # Build $indent prefix.
+  local indent=
+  if [[ $_autoenv_debug_indent -gt 0 ]]; then
+    for i in {1..${_autoenv_debug_indent}}; do
+      indent="  $indent"
+    done
+  fi
+
+  # Split $msg by \n (not newline).
+  lines=(${(ps:\\n:)msg})
+  for line in $lines; do
+    echo -n "${fg_bold[blue]}[autoenv]${fg_no_bold[default]} " >&2
+    echo ${indent}${line} >&2
+  done
+}
+# }}}
+
 # Load zstat module, but only its builtin `zstat`.
 zmodload -F zsh/stat b:zstat
 
 
 _autoenv_hash_pair() {
   local env_file=${1:A}
-  if (( $+2 )); then
+  local env_shasum
+  if [[ -n $2 ]]; then
     env_shasum=$2
   else
     env_shasum=$(shasum $env_file | cut -d' ' -f1)
@@ -149,19 +188,19 @@ _autoenv_check_authorized_env_file() {
 }
 
 # Get directory of this file (absolute, with resolved symlinks).
-_autoenv_this_dir=${0:A:h}
+_autoenv_source_dir=${0:A:h}
 
 _autoenv_source() {
   local env_file=$1
   _autoenv_event=$2
-  local _autoenv_envfile_dir=$3
+  local _autoenv_envfile_dir=${3:-${1:A:h}}
 
   _autoenv_from_dir=$_autoenv_chpwd_prev_dir
   _autoenv_to_dir=$PWD
 
   # Source varstash library once.
   if [[ -z "$functions[(I)autostash]" ]]; then
-    source $_autoenv_this_dir/lib/varstash
+    source $_autoenv_source_dir/lib/varstash
     # NOTE: Varstash uses $PWD as default for varstash_dir, we might set it to
     # ${env_file:h}.
   fi
@@ -169,7 +208,11 @@ _autoenv_source() {
   # Change to directory of env file, source it and cd back.
   local new_dir=$PWD
   builtin cd -q $_autoenv_envfile_dir
+  _autoenv_debug "== SOURCE: ${bold_color}$env_file${reset_color}\n      PWD: $PWD"
+  (( _autoenv_debug_indent++ ))
   source $env_file
+  (( _autoenv_debug_indent-- ))
+  _autoenv_debug "== END SOURCE =="
   builtin cd -q $new_dir
 
   # Unset vars set for enter/leave scripts.
@@ -181,15 +224,26 @@ _autoenv_source() {
 _autoenv_get_file_upwards() {
   local look_from=${1:-$PWD}
   local look_for=${2:-$AUTOENV_FILE_ENTER}
-  # Look for files in parent dirs, using an extended Zsh glob.
-  setopt localoptions extendedglob
-  local m
-  # Y1: short-circuit: first match.
-  # :A: absolute path, resolving symlinks.
-  m=($look_from/(../)##${look_for}(NY1:A))
-  if (( $#m )); then
-    echo $m[1]
-  fi
+
+  # Manually look in parent dirs. An extended Zsh glob should use Y1 for
+  # performance reasons, which is only available in zsh-5.0.5-146-g9381bb6.
+  local last
+  local parent_dir="$look_from/.."
+  while true; do
+    parent_dir=${parent_dir:A}
+    if [[ $parent_dir == $last ]]; then
+      break
+    fi
+    parent_file="${parent_dir}/${look_for}"
+
+    if [[ -f $parent_file ]]; then
+      echo $parent_file
+      break
+    fi
+
+    last=$parent_dir
+    parent_dir="${parent_dir}/.."
+  done
 }
 
 
@@ -197,6 +251,8 @@ _autoenv_chpwd_prev_dir=$PWD
 _autoenv_chpwd_handler() {
   local env_file="$PWD/$AUTOENV_FILE_ENTER"
 
+  _autoenv_debug "Calling chpwd handler: PWD=$PWD"
+
   # Handle leave event for previously sourced env files.
   if [[ $AUTOENV_HANDLE_LEAVE == 1 ]] && (( $#_autoenv_stack_entered )); then
     local prev_file prev_dir
@@ -207,7 +263,7 @@ _autoenv_chpwd_handler() {
         if _autoenv_check_authorized_env_file $env_file_leave; then
           _autoenv_source $env_file_leave leave $prev_dir
         fi
-        _autoenv_stack_entered_remove $prev_dir
+        _autoenv_stack_entered_remove $prev_file
       fi
     done
   fi
@@ -223,6 +279,7 @@ _autoenv_chpwd_handler() {
   # Load the env file only once: check if $env_file is in the stack of entered
   # directories.
   if _autoenv_stack_entered_contains $env_file; then
+    _autoenv_debug "Already in stack: $env_file"
     _autoenv_chpwd_prev_dir=$PWD
     return
   fi
@@ -235,10 +292,14 @@ _autoenv_chpwd_handler() {
   _autoenv_stack_entered_add $env_file
 
   # Source the enter env file.
-  _autoenv_source $env_file enter $PWD
+  _autoenv_debug "Sourcing from chpwd handler: $env_file"
+  _autoenv_source $env_file enter
 
   _autoenv_chpwd_prev_dir=$PWD
+
+  (( _autoenv_debug_indent++ ))
 }
+# }}}
 
 autoload -U add-zsh-hook
 add-zsh-hook chpwd _autoenv_chpwd_handler