aka:FHSディレクトリのS式表現

なんとなく、書いてみただけ。完全でもない。

記号でやりたかったけど、elとclのどちらでも使いたいかもなので、とりあえず文字列。

;;;;
;;;; fhs 2.3 directories
;;;; revison 4
;;;;

;;;
;;; fhs general
;;;

;; / hierarchy
'(()
  ("bin" "boot" "dev" "etc" "lib" "media" "mnt"
   "opt" "sbin" "srv" "tmp" "usr" "var"))
'(()
  ("home" "root"))
'(("etc")
  ("opt" "X11" "sgml" "xml"))
'(( "media")
  ("floppy" "cdrom" "cdrecorder" "zip"))

;; /usr hierarchy
'(("usr")
  ("bin" "include" "lib" "local" "sbin" "share"))
'(("usr")
  ("X11R6" "games" "src"))
'(("usr" "X11R6")
  ("bin" "X11" "include"))
'(("usr" "X11R6" "include")
  ("X11"))
'(("usr" "bin")
  ("mh"))

;; /usr/local hierarchy
'(("usr" "local")
  ("bin" "etc" "games" "include"
   "lib" "man" "sbin" "share" "src"))
'(("usr" "local" "share")
  ("man"))

;; /usr/share hierarchy
'(("usr" "share")
  ("dict" "doc" "games" "info" "locale"
   "nls" "sgml" "terminfo" "tmac" "xml"
   "zoneinfo" "misc"))
'(("usr" "share" "man")
  ("man1" "man2" "man3" "man4"
   "man5" "man6" "man7" "man8"))
'(("usr" "share" "sgml")
  ("docbook" "tei" "html" "mathml"))
'(("usr" "share" "xml")
  ("docbook" "xhtml"))

;; /var hierarchy
'(("var")
  ("cache" "lib" "local" "lock" "log" "opt" "run"
   "spool" "tmp"))
'(("var")
  ("backups" "cron" "msgs" "preserve"))
'(("var")
  ("account" "crash" "games" "mail" "yp"))
'(("var" "cache")
  ("fonts" "man"))
'(("var" "lib")
  ("misc"))
'(("var" "lib")
  ("<editor>" "<pkgtool>" "<package>" "hwclock" "xdm"))
'(("var" "spool")
  ("lpd" "mqueue" "news" "rwho" "uucp"))

;;;
;;; Linux specific
;;;
'(() ("lib64"))
'(() ("proc"))
'(("usr" "src")
  ("linux"))
'(("usr" "src" "linux")
  ("include"))