io-files

   1 # Prompt a file to open in PAGER, with an history.  In less(1), 'v' to edit.
   2
   3
   4 CACHE="${XDG_CACHE_HOME:-$HOME/.cache}"
   5
   6
   7 get_path()
   8 (
   9         {
  10                 printf '#\n# Recent files\n'
  11                 [ -f "$CACHE/iomenu/files" ] && tac "$CACHE/iomenu/files"
  12
  13                 printf '#\n# Current directory\n'
  14                 find "$PWD" -maxdepth 1 -type f
  15
  16                 printf '#\n# All files\n'
  17                 find "$HOME" -type f ! -path '*/.cache/*' ! -path '*/.git/*'
  18
  19         } | sed "s|$HOME|~|" | iomenu -l 256 -s '#' | sed "s|~|$HOME|" |
  20                 tee -a "$CACHE/iomenu/files"
  21 )
  22
  23
  24 update_history()
  25 (
  26         sort "$CACHE/iomenu/files" | uniq -d | while IFS='' read -r f
  27         do
  28                 printf '%s\n' "$(grep -Fxv "$f" "$CACHE/iomenu/files")" "$f" \
  29                         > "$CACHE/iomenu/files"
  30         done
  31
  32         printf '%s\n' "$(tail "$CACHE/iomenu/files")" > "$CACHE/iomenu/files"
  33 )
  34
  35
  36 main()
  37 (
  38         mkdir -p "$CACHE/iomenu"
  39
  40         file="${1:-$(get_path)"}"
  41
  42         update_history
  43
  44         [ "$file" ] && [ -d "${file%/*}" ] && exec $EDITOR "$file"
  45 )
  46
  47
  48 main "$@"