16.19 stree: Simple Directory Tree

Here's a simple script that prints a directory tree. It works on any terminal, can be printed or sent in a mail message, and so on. If you don't give stree a directory name, it starts at the current directory. If you give it a -a (all) option, the stree script lists all files, directories, symbolic links, etc. Otherwise, it just lists directories. For example:

% 

stree lib

 Tree for directory lib:  lib  "      at_cron  "       "      RCS  "       "      test  "      csh  "      ksh  "      RCS.Z  "      tmac  "       "      mm  "       "       "      RCS  "       "      ms  "       "       "      RCS

The top-level directory is listed along the left-hand edge. The first level of subdirectories is indented by one tabstop. A ditto mark ( " ) below a name means "same parent directory as above." So, for example, the last directory in that listing is lib/tmac/ms/RCS .

Here's the script:

${1-.} "newline @	#! /bin/sh case "$1" in -a) shift dir=${1-.} # DEFAULT TO CURRENT DIRECTORY echo Tree for directory $dir and its files: ;; *) findtype="-type d" # IF NO -a FLAG, MAKE find USE "-type d" dir=${1-.} echo Tree for directory $dir: ;; esac echo " $dir" find $dir $findtype -print | tr / \\001 | sort -f | tr \\001 / | sed -e s@\^$dir@@ -e /\^$/d -e 's@[^/]*/@ " [TAB] @g'

The script uses tr ( 35.11 ) to change slash ( / ) characters into CTRL-a ( octal 001 ( 51.3 ) ) during the sort. That makes the slashes sort before letters and other characters so the directory names will always come out before their contents.