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         local files
  10
  11         printf %s "$HOME" && (
  12                 printf '#\n# Recent files\n'
  13                 [ -f "$CACHE/iomenu/files" ] && tac "$CACHE/iomenu/files"
  14
  15                 printf '#\n# All files\n'
  16                 cd "$HOME"
  17                 find . ! -path '*/.cache/*' ! -path '*/.git/*' | sed "s/./~/"
  18         ) | iomenu -l 256 -s '#' | tee -a "$CACHE/iomenu/files" | cut -c 2-
  19 }
  20
  21 update_history()
  22 {
  23         sort "$CACHE/iomenu/files" | uniq -d | while IFS='' read -r f
  24         do
  25                 printf '%s\n' "$(grep -Fxv "$f" "$CACHE/iomenu/files")" "$f" \
  26                         > "$CACHE/iomenu/files"
  27         done
  28
  29         files="$(tail "$CACHE/iomenu/files")"
  30         printf '%s\n' "$files" > "$CACHE/iomenu/files"
  31 }
  32
  33
  34 main()
  35 {
  36         mkdir -p "$CACHE/iomenu"
  37
  38         local file="$(get_path)"
  39
  40         update_history
  41
  42         [ -f "$file" ] && exec $PAGER "$file"
  43 }
  44
  45
  46 main $@