| 1 |
8291
|
aaronmk
|
#!/bin/bash -e
|
| 2 |
8715
|
aaronmk
|
# runscripts: a bash-based replacement for make
|
| 3 |
8272
|
aaronmk
|
# unlike make, supports full bash functionality including multiline commands
|
| 4 |
10834
|
aaronmk
|
# usage: .../run function args
|
| 5 |
10835
|
aaronmk
|
# this usage also applies to all files that include this file
|
| 6 |
8272
|
aaronmk
|
|
| 7 |
12778
|
aaronmk
|
if false; then #### runscript template:
|
| 8 |
8291
|
aaronmk
|
#!/bin/bash -e
|
| 9 |
12695
|
aaronmk
|
auto_fwd=1 # optional
|
| 10 |
11414
|
aaronmk
|
. "$(dirname "${BASH_SOURCE[0]}")"/path/to/util_or_file_including_util.run "$@"
|
| 11 |
9854
|
aaronmk
|
.rel other_includes
|
| 12 |
8272
|
aaronmk
|
|
| 13 |
12778
|
aaronmk
|
target()
|
| 14 |
|
|
{
|
| 15 |
|
|
begin_target
|
| 16 |
|
|
#...
|
| 17 |
|
|
}
|
| 18 |
|
|
|
| 19 |
11418
|
aaronmk
|
all()
|
| 20 |
8272
|
aaronmk
|
{
|
| 21 |
12778
|
aaronmk
|
begin_target
|
| 22 |
|
|
target # defined above
|
| 23 |
8272
|
aaronmk
|
"$(dirname "${BASH_SOURCE[0]}")"/path_relative_to_self
|
| 24 |
|
|
"$(dirname "${BASH_SOURCE[1]}")"/path_relative_to_caller
|
| 25 |
|
|
"$top_dir"/path_relative_to_outermost_script
|
| 26 |
|
|
}
|
| 27 |
11417
|
aaronmk
|
|
| 28 |
|
|
on_exit # needed if should be runnable as shell-include (with leading ".")
|
| 29 |
8272
|
aaronmk
|
fi ####
|
| 30 |
|
|
|
| 31 |
9013
|
aaronmk
|
. "$(dirname "${BASH_SOURCE[0]}")"/../sh/util.sh
|
| 32 |
9854
|
aaronmk
|
.rel ../sh/make.sh
|
| 33 |
8703
|
aaronmk
|
|
| 34 |
8714
|
aaronmk
|
if self_not_included; then
|
| 35 |
8703
|
aaronmk
|
|
| 36 |
10271
|
aaronmk
|
|
| 37 |
|
|
#### setup
|
| 38 |
|
|
|
| 39 |
13311
|
aaronmk
|
# allow caller to override, eg. to force runscript mode when using $wrap_fn
|
| 40 |
|
|
: "${is_runscript=$(ends_with '[/.]run' "$top_script_abs"; exit2bool)}"
|
| 41 |
|
|
|
| 42 |
11427
|
aaronmk
|
if is_dot_script; then
|
| 43 |
|
|
if test "$1" = .; then set --; fi # $@ wrong: no args->contains script name
|
| 44 |
|
|
include_args=("$@") # from `. .../util.run "$@"`
|
| 45 |
|
|
fi
|
| 46 |
11414
|
aaronmk
|
|
| 47 |
12699
|
aaronmk
|
fallback() # overridable handler for targets w/o function
|
| 48 |
|
|
{ echo_func; "$@"; } # by default, generate error that it doesn't exist
|
| 49 |
12692
|
aaronmk
|
|
| 50 |
|
|
gateway() # overridable handler for *all* targets
|
| 51 |
12694
|
aaronmk
|
{ echo_func; if is_callable "$1"; then "$@"; else fallback "$@"; fi; }
|
| 52 |
12692
|
aaronmk
|
|
| 53 |
13313
|
aaronmk
|
if test ! "$is_runscript"; then # non-runscript
|
| 54 |
|
|
gateway() { echo_func; main "$@"; } # pass all args to main()
|
| 55 |
|
|
fi
|
| 56 |
|
|
|
| 57 |
10271
|
aaronmk
|
run_args_cmd() # runs the command line args command
|
| 58 |
|
|
{
|
| 59 |
11427
|
aaronmk
|
if is_dot_script; then set -- "${include_args[@]}"
|
| 60 |
|
|
else eval set -- "$(reverse "${BASH_ARGV[@]}")"
|
| 61 |
|
|
fi
|
| 62 |
12964
|
aaronmk
|
test $# -ge 1 || set -- main
|
| 63 |
12863
|
aaronmk
|
echo_cmd "$top_script" "$@"
|
| 64 |
|
|
indent; time gateway "$@"
|
| 65 |
10271
|
aaronmk
|
}
|
| 66 |
|
|
|
| 67 |
12866
|
aaronmk
|
# users can override run_args_cmd()/gateway()/fallback() to perform other
|
| 68 |
|
|
# commands (or no commands) after the script is read
|
| 69 |
11428
|
aaronmk
|
on_exit() { test $? -eq 0 || return; run_args_cmd; }
|
| 70 |
|
|
if ! is_dot_script; then trap on_exit EXIT; fi
|
| 71 |
8464
|
aaronmk
|
|
| 72 |
9268
|
aaronmk
|
func_override set_paths__util_sh
|
| 73 |
|
|
set_paths()
|
| 74 |
9267
|
aaronmk
|
{
|
| 75 |
9268
|
aaronmk
|
set_paths__util_sh "$@"
|
| 76 |
13203
|
aaronmk
|
log_local; log++
|
| 77 |
9267
|
aaronmk
|
top_file="${top_script%[./]run}"; echo_vars top_file
|
| 78 |
|
|
top_filename="$(basename "$top_file")"; echo_vars top_filename
|
| 79 |
|
|
}
|
| 80 |
9268
|
aaronmk
|
set_paths
|
| 81 |
8988
|
aaronmk
|
|
| 82 |
10271
|
aaronmk
|
|
| 83 |
|
|
#### utils
|
| 84 |
|
|
|
| 85 |
13181
|
aaronmk
|
# usage: sudo $wrap_fn fn ...
|
| 86 |
13310
|
aaronmk
|
wrap_fn="$(esc "$top_script")"
|
| 87 |
|
|
# if sudo to non-root and $top_script not world-executable, produces error
|
| 88 |
13312
|
aaronmk
|
# invoked script must always run as runscript so that wrapped command is run
|
| 89 |
|
|
if test ! "$is_runscript"; then wrap_fn="env is_runscript=1 $wrap_fn"; fi
|
| 90 |
11348
|
aaronmk
|
|
| 91 |
13182
|
aaronmk
|
func_override sudo__util_sh
|
| 92 |
|
|
function sudo() # usage: sudo fn|cmd ... # supports shell functions as well
|
| 93 |
|
|
{
|
| 94 |
|
|
echo_func
|
| 95 |
13268
|
aaronmk
|
if test "$1" = command; then shift # always executable->$wrap_fn not needed
|
| 96 |
|
|
elif is_intern "$1"; then set -- $wrap_fn "$@" # shell function, etc.
|
| 97 |
|
|
fi
|
| 98 |
13182
|
aaronmk
|
sudo__util_sh "$@"
|
| 99 |
|
|
}
|
| 100 |
|
|
|
| 101 |
10766
|
aaronmk
|
# usage: to_top_file cmd...
|
| 102 |
12982
|
aaronmk
|
function to_top_file()
|
| 103 |
|
|
{
|
| 104 |
|
|
echo_func
|
| 105 |
|
|
stdout="$top_file" if_not_exists="$(bool! "$_remake")" to_file "$@"
|
| 106 |
|
|
}
|
| 107 |
11358
|
aaronmk
|
alias to_top_file='"to_top_file" ' # last space alias-expands next word
|
| 108 |
10766
|
aaronmk
|
|
| 109 |
10272
|
aaronmk
|
,() # usage: .../run , cmd1 cmd2 ... (like `make cmd1 cmd2 ...`)
|
| 110 |
|
|
# treats each of the command-line args as commands the way make does
|
| 111 |
|
|
# (instead of as args to the same command, the way runscripts do)
|
| 112 |
12968
|
aaronmk
|
{ begin_target; for cmd in "$@"; do time with_rm echo_run "$cmd"; done; }
|
| 113 |
10272
|
aaronmk
|
|
| 114 |
12713
|
aaronmk
|
: "${auto_ignore=}" #usage: auto_ignore=1 .../__.run target_that_might_not_exist
|
| 115 |
12715
|
aaronmk
|
unexport auto_ignore # don't pass this to invoked scripts except through fwd()
|
| 116 |
12713
|
aaronmk
|
if test "$auto_ignore"; then
|
| 117 |
|
|
fallback() # don't generate error that it doesn't exist
|
| 118 |
|
|
{ echo_func; log_info "ignoring non-existant target: $*"; }
|
| 119 |
|
|
fi
|
| 120 |
|
|
|
| 121 |
12711
|
aaronmk
|
# by default, use all subdirs, including .*
|
| 122 |
|
|
if ! isset subdirs; then subdirs=($(enter_top_dir; wildcard. {.,}*/)); fi
|
| 123 |
13216
|
aaronmk
|
echo_vars subdirs
|
| 124 |
12711
|
aaronmk
|
|
| 125 |
|
|
fwd() # usage: [subdirs=(...);] fwd target args... # or use fwd_self
|
| 126 |
10271
|
aaronmk
|
{
|
| 127 |
|
|
echo_func
|
| 128 |
|
|
: "${subdirs?}"
|
| 129 |
|
|
|
| 130 |
12700
|
aaronmk
|
local_export auto_ignore=1
|
| 131 |
12712
|
aaronmk
|
for subdir in "${subdirs[@]}"; do
|
| 132 |
|
|
local runscript="$top_dir"/"$subdir"/run
|
| 133 |
|
|
if test -f "$runscript"; then "$runscript" "$@"; fi
|
| 134 |
|
|
done
|
| 135 |
10271
|
aaronmk
|
}
|
| 136 |
12697
|
aaronmk
|
alias fwd_self='fwd "$FUNCNAME" "$@"' # usage: target() { ...; fwd_self; }
|
| 137 |
10271
|
aaronmk
|
|
| 138 |
12695
|
aaronmk
|
: "${auto_fwd=}" # usage: auto_fwd=1; . .../file_including_util.run
|
| 139 |
12713
|
aaronmk
|
# must be set *after* auto_ignore's fallback() to overwrite it
|
| 140 |
12695
|
aaronmk
|
if test "$auto_fwd"; then
|
| 141 |
|
|
fallback() { echo_func; fwd "$@"; }
|
| 142 |
8704
|
aaronmk
|
fi
|
| 143 |
12695
|
aaronmk
|
|
| 144 |
12964
|
aaronmk
|
|
| 145 |
|
|
#### `make` compatibility
|
| 146 |
|
|
|
| 147 |
12967
|
aaronmk
|
main() { begin_target; with_rm all; } # support conventional `all` target
|
| 148 |
12964
|
aaronmk
|
|
| 149 |
12695
|
aaronmk
|
fi
|
