initial commit

2 files changed, 208 insertions, 0 deletions

@@ -0,0 +1,109 @@
+#!/bin/sh
+
+QUIET=false
+NORUN=false
+FNEW=false
+_ARGS=true
+
+OKFILE=./ok
+FRFILE=.fr
+
+usage(){
+        exec >&2
+        cat<<EOH
+Usage: ok [OPTIONS] [TARGET...]
+Options:
+ -h             Show this help and exit
+ -q             Run quietly
+ -x             Run with 'set -x'
+ -B             Run all targets as if they were "new"
+ -f FILE        Use FILE as \$OKFILE (default: 'ok')
+ -C DIRECTORY   Change to DIRECTORY before doing anything
+Targets defined in $OKFILE:
+$(sed -n \
+      -e 's/^alias *\(.*\)/*\1/p' \
+      -e 's/^\([a-z][a-z]*\)().*##* *\(.*\)/ \1         # \2/p' \
+      -e 's/^\([a-z][a-z]*\)().*/ \1/p' \
+      "$OKFILE")
+EOH
+}
+
+procargs(){
+        $_ARGS || return 1
+        while getopts hqnxBf:C: OPT
+        do
+                case "$OPT" in
+                        (h) usage; exit ;;
+                        (q) QUIET=true ;;
+                        (x) set -x ;;
+                        (n) NORUN=true ;;
+                        (B) FNEW=true ;;
+                        (f) test -f "$OPTARG" && OKFILE="$OPTARG" || exit 2 ;;
+                        (C) cd "$OPTARG" || exit 2 ;;
+                        (*) usage; exit 1 ;;
+                esac
+        done
+}
+
+go(){
+        procargs "$@" && shift $((OPTIND - 1))
+        DEFAULT="$(sed -n 's/^\([a-z][a-z]*\)().*/\1/p' "$OKFILE"|sed q)"
+        . "$OKFILE" || exit 3
+        test -z "$1" && "$DEFAULT"
+        for target
+        do
+                if grep -q "$target" "$FRFILE"
+                then if buildp "$target" \
+                               "$(grep "$target" "$FRFILE" | cut -f3-)"
+                     then eval "$(grep "$target" "$FRFILE" | cut -f2-)"
+                     fi
+                else "$target"
+                fi
+        done
+}
+
+dep(){
+        _ARGS=false go "$@"
+}
+
+buildp(){                       # buildp TARGET DEPENDENCIES...
+        $FNEW && return 0
+        target="$1"; shift
+        test -e "$target" || return 0
+        for f
+        do
+                test x-- = "x$f" && continue
+                test "$f" -nt "$target" && return 0
+        done
+        return 1
+}
+
+ok(){                           # ok COMMAND ARGS..
+        $QUIET || printf >&2 '* %s\n' "$*"
+        $NORUN || "$@" || exit $((100 + $?))
+}
+
+quietly(){ "$@" >/dev/null 2>&1; }
+
+allfiles(){
+        cut -f2- <"$FRFILE" |
+                while read -r line
+                do eval "$line"
+                done
+}
+
+fr(){                           # fr < TARGET JOB DEPS...
+        # recommended: use a heredoc
+        :>"$FRFILE"
+        while read -r target job deps
+        do
+                eval set -- "$deps"
+                printf '%s\tok %s\t%s\n' \
+                       "$target" \
+                       "$job" \
+                       "$(printf '%s\n' "$deps"|sed 's/--.*//')" \
+                       >>"$FRFILE"
+        done
+}
+
+go "$@"
@@ -0,0 +1,99 @@
+#!/bin/sh
+## ok: a minimal command runner and build tool
+# by Case Duckworth <acdw@acdw.net> -- released to the public domain
+
+QUIET=false
+NORUN=false
+FBUILD=false
+OKFILE=./ok
+FRFILE=.fr
+
+_usage() {
+        exec >&2
+        cat<<EOF
+Usage: ok [OPTIONS] [TARGET...]
+Options:
+ -h             Show this help and exit
+ -q             Don't output diagnostic messages
+ -x             Run with set -x
+ -B             Treat all targets as 'new' (force running)
+ -n             Don't run commands
+ -f FILE        Use FILE as \$OKFILE (default: 'ok')
+ -C DIRECTORY   Change to DIRECTORY before doing anything
+Targets defined in $OKFILE:
+$(sed -n \
+      -e 's/^alias *\(.*\)/*\1/p' \
+      -e 's/^\([a-z][a-z]*\)().*##* *\(.*\)/ \1         # \2/p' \
+      -e 's/^\([a-z][a-z]*\)().*/ \1/p' \
+      "$OKFILE")
+EOF
+        exit $1
+}
+
+buildp() { # buildp target dependency...
+        $FBUILD && return
+        target="$1"; shift
+        test -e "$target" || return
+        for f
+        do
+                test x-- = "x$f" && continue
+                test "$f" -nt "$target" && return
+        done
+        return 1
+}
+
+ok() { # ok command...
+        $QUIET || printf >&2 '* %s\n' "$*"
+        $NORUN || "$@" || exit $((100 + $?))
+}
+
+quietly() { "$@" >/dev/null 2>&1; }
+
+frun() {
+        cut -f2- <"$FRFILE" |
+                while read -r line
+                do eval "$line"
+                done
+}
+
+fr() { # fr < GOAL JOB DEPS...
+        # recommended: use a heredoc
+        :>"$FRFILE"
+        while read -r goal job deps
+        do
+                eval set -- "$deps"
+                if buildp "$goal" "$@"
+                then
+                        printf '%s\t%s %s\n' \
+                               "$goal" \
+                               "$job" "$(echo "$deps"|sed 's/--.*//')" \
+                               >>"$FRFILE"
+                fi
+        done
+}
+
+while getopts hqnxBf:C: OPT
+do
+        case "$OPT" in
+                (h) _usage ;;
+                (q) QUIET=true ;;
+                (x) set -x ;;
+                (n) NORUN=true ;;
+                (B) FBUILD=true ;;
+                (f) OKFILE="$OPTARG" ;;
+                (C) cd "$OPTARG" || exit 2 ;;
+                (*) _usage 1 ;;
+        esac
+done
+shift $((OPTIND - 1))
+
+. "$OKFILE" || exit 3
+
+test -z "$1" && default
+for target
+do
+        if grep -q "$target" "$FRFILE"
+        then eval "$(grep "$target" "$FRFILE" | cut -f2-)"
+        else "$target"
+        fi
+done