Project

General

Profile

1 8291 aaronmk
#!/bin/bash -e
2 8716 aaronmk
realpath () { readlink -f -- "$1"; }
3 8703 aaronmk
4 8716 aaronmk
include_guard_var () { realpath "$1"|sed 's/[^a-zA-Z0-9_]/_/g'; }
5
6 8703 aaronmk
self_not_included () # usage: if self_not_included; then ... fi
7
{
8
	test "$#" -ge 1 || set -- "${BASH_SOURCE[1]}"
9
	local include_guard="$(include_guard_var "$1")"
10 8793 aaronmk
	alias self_being_included=false
11
	test -z "${!include_guard+t}" && \
12
	{ eval "$include_guard"=1; alias self_being_included=true; }
13 8703 aaronmk
}
14
15 8793 aaronmk
# to load newly-defined aliases for use in functions in the same file:
16
## fi # load new aliases
17
## if self_being_included; then
18
# this is needed because aliases defined inside an if statement are not
19
# available inside that if statement
20
21 8704 aaronmk
if self_not_included "${BASH_SOURCE[0]}"; then
22
23 8709 aaronmk
shopt -s expand_aliases
24
25 8854 aaronmk
#### arrays
26 8694 aaronmk
27 8833 aaronmk
join () { local IFS="$delim"; echo "$*"; } # usage: delim=... join elems...
28 8816 aaronmk
29 8691 aaronmk
reverse () # usage: array=($(reverse args...))
30
{
31
	local i
32
	for (( i=$#; i >= 1; i-- )); do printf '%q ' "${!i}"; done
33
}
34
35 8855 aaronmk
#### strings
36
37
sed_ere_flag="$(test "$(uname)" = Darwin && echo E || echo r)"
38
39
sed () { echo_run env sed -"$sed_ere_flag" "$@";}
40
41 8854 aaronmk
#### verbose output
42
43 8713 aaronmk
: "${verbosity:=$verbose}" "${verbosity:=0}"
44 8710 aaronmk
45 8278 aaronmk
echo_cmd () { echo "$PS4$*" >&2; }
46 8272 aaronmk
47 8278 aaronmk
echo_run () { echo_cmd "$@"; "$@"; }
48
49 8646 aaronmk
canon_rel_path ()
50
{
51
	local path="$1"
52 8716 aaronmk
	path="$(realpath "$path")" # canonicalize
53 8773 aaronmk
	path="${path#$(pwd -P)/}" # remove any shared prefix with the current dir
54 8646 aaronmk
	echo "$path"
55
}
56
57 8463 aaronmk
# usage: echo_func "$@"
58
echo_func ()
59
{
60 8647 aaronmk
	local script="$(canon_rel_path "${BASH_SOURCE[1]}")"
61
	echo_cmd "$script:${BASH_LINENO[0]}" "${FUNCNAME[1]}" "$@"
62 8463 aaronmk
}
63 8279 aaronmk
64 8702 aaronmk
echo_stdin () # usage: input|echo_stdin|cmd
65
{
66
	echo ----- >&2
67
	tee -a /dev/stderr;
68
	echo ----- >&2
69
}
70 8275 aaronmk
71 8856 aaronmk
echo_vars () # usage: echo_vars var...
72
{ { echo -n "$PS4"; declare -p "${@%%=*}";} >&2; }
73 8641 aaronmk
74
echo_export ()
75
{
76 8700 aaronmk
	builtin export "$@"
77 8641 aaronmk
	echo_vars "$@"
78
}
79
80 8713 aaronmk
if test "$verbosity" -ge 2; then
81 8711 aaronmk
	alias export="echo_export" # automatically echo env vars when they are set
82
fi
83 8642 aaronmk
84 8272 aaronmk
usage () { echo "Usage: $1" >&2; (exit 2); }
85
86 8854 aaronmk
#### vars
87
88
set_var () { eval "$1"'="$2"'; }
89
90 8857 aaronmk
set_inv () { set_var no_"$1" "$(test -n "${!1}" || echo 1)"; }
91
92 8859 aaronmk
# usage: local var=...; local_inv
93
alias local_inv='local "no_$var=$(test -n "${!var}" || echo 1)"'
94
95 8854 aaronmk
#### commands
96
97 8272 aaronmk
top_dir="$(dirname "$0")" # outermost script
98
99 8465 aaronmk
run_args_cmd () # runs the command line args command
100 8272 aaronmk
{
101 8292 aaronmk
	test "$?" -eq 0 || return
102 8693 aaronmk
	eval set -- "$(reverse "${BASH_ARGV[@]}")"
103 8290 aaronmk
	test "$#" -ge 1 || set -- all
104 8648 aaronmk
	echo_cmd "$(canon_rel_path "$0")" "$@"; "$@"
105 8272 aaronmk
}
106
107 8284 aaronmk
fwd () # usage: subdirs=(...); fwd "$FUNCNAME" "$@"
108 8272 aaronmk
{
109 8463 aaronmk
	echo_func "$@"
110 8284 aaronmk
	: "${subdirs?}"
111
112 8272 aaronmk
	for subdir in "${subdirs[@]}"; do
113 8280 aaronmk
		"$(dirname "${BASH_SOURCE[1]}")"/"$subdir"/run "$@"
114 8272 aaronmk
	done
115
}
116
117 8854 aaronmk
#### make
118
119 8280 aaronmk
make ()
120
{
121 8463 aaronmk
	echo_func "$@"
122 8280 aaronmk
	echo_run env make --directory="$top_dir" "$@"
123
}
124 8272 aaronmk
125 8276 aaronmk
if false; then ## usage:
126 8652 aaronmk
inline_make 3<<'EOF'
127 8276 aaronmk
target:
128
	$(self_dir)/cmd >$@
129
EOF
130
# target will be run automatically because it's first in the makefile
131
fi ##
132
inline_make ()
133
{
134 8653 aaronmk
	echo_func "$@"
135 8640 aaronmk
	local self="$(readlink -f "${BASH_SOURCE[1]}")"
136
	local self_dir="$(dirname "$self")"
137 8645 aaronmk
	export self self_dir
138 8640 aaronmk
139 8651 aaronmk
	make --makefile=<((
140 8652 aaronmk
		cat /dev/fd/3
141 8651 aaronmk
		echo -n "
142 8276 aaronmk
.SUFFIXES: # turn off built-in suffix rules
143
.SECONDARY: # don't automatically delete intermediate files
144
.DELETE_ON_ERROR: # delete target if recipe fails
145 8651 aaronmk
"
146
	)|echo_stdin) "$@"
147 8276 aaronmk
}
148 8658 aaronmk
149 8854 aaronmk
#### compression
150
151
### zip
152
153 8658 aaronmk
alias zip="echo_run zip"
154
alias unzip="echo_run unzip"
155 8858 aaronmk
set_inv force
156
alias zip_newer="zip${no_force:+ -u}"
157
alias unzip_newer="unzip${no_force:+ -u} -o"
158
	# -o is safe because -u only extracts newer files
159 8704 aaronmk
160 8775 aaronmk
#### databases
161
162
quote='"'
163
164
esc_name () { echo "$quote${1//$quote/$quote$quote}$quote"; }
165
166
mk_esc_name () { set_var "$1"_esc "$(esc_name "${!1}")"; }
167
168 8796 aaronmk
alias mk_schema_esc="local schema_esc; mk_esc_name schema"
169
alias mk_table_esc="local table_esc; mk_esc_name table"
170
171
fi # load new aliases
172
if self_being_included; then
173
174
log_sql () { test "$verbosity" -ge 2; }
175
176
### MySQL
177
178 8860 aaronmk
mysql_cmd () # usage: mysql* () { ...; mysql_cmd "$FUNCNAME" "$@"; }
179
{
180
	echo_func "$@"
181
	local cmd="$1"; shift
182
	local var=ssh_dest; local_inv
183
	echo_run ${no_ssh_dest:+env }${ssh_dest:+ssh "$ssh_dest" }"$cmd" ${server:+\
184
--host="$server" }${user+--user="$user" }--password${password+="$password"} "$@"
185
}
186
187 8775 aaronmk
mysql ()
188
{
189
	echo_func "$@"
190 8861 aaronmk
	mysql_cmd "$FUNCNAME" --verbose "$@"
191 8775 aaronmk
}
192
193
mysql_ANSI ()
194
{
195
	echo_func "$@"
196
	(echo "SET sql_mode = 'ANSI';"; cat)|mysql "$@"
197
}
198
199 8796 aaronmk
### PostgreSQL
200
201
pg_copy_to ()
202
{
203
	echo_func "$@"
204 8805 aaronmk
	if test -z "$source"; then
205
		: "${table:?}"; mk_table_esc
206 8834 aaronmk
		if test -z "$limit"; then local source="$table_esc"
207
		else local source="(SELECT * FROM $table_esc LIMIT $limit)"
208 8805 aaronmk
		fi
209
	fi
210 8834 aaronmk
	local pg_copy_format="${pg_copy_format-CSV HEADER}"
211 8805 aaronmk
212 8807 aaronmk
	psql "$@" <<<"COPY $source TO STDOUT $pg_copy_format;"
213 8796 aaronmk
}
214
215
pg_header ()
216
{
217
	echo_func "$@"
218 8806 aaronmk
	local pg_copy_format="CSV HEADER" limit=0
219 8807 aaronmk
	pg_copy_to "$@"|echo_stdin
220 8796 aaronmk
}
221
222
pg_export_table_no_header ()
223
{
224
	echo_func "$@"
225
	local pg_copy_format="CSV"
226 8807 aaronmk
	pg_copy_to "$@"
227 8796 aaronmk
}
228
229
pg_export_table_to_dir_no_header ()
230
{
231
	echo_func "$@"
232
	local table="$1"; shift; mk_table_esc
233 8807 aaronmk
	local cols="$(pg_header)"
234 8796 aaronmk
	pg_export_table_no_header "$@" >"$exports_dir/$table.no_header.cols=$cols.csv"
235
}
236
237 8704 aaronmk
fi