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 8854 aaronmk
#### verbose output
36
37 8713 aaronmk
: "${verbosity:=$verbose}" "${verbosity:=0}"
38 8710 aaronmk
39 8278 aaronmk
echo_cmd () { echo "$PS4$*" >&2; }
40 8272 aaronmk
41 8278 aaronmk
echo_run () { echo_cmd "$@"; "$@"; }
42
43 8872 aaronmk
if test "$verbosity" -ge 1; then
44
	alias env="echo_run env" # automatically echo commands that use env
45
fi
46
47 8646 aaronmk
canon_rel_path ()
48
{
49
	local path="$1"
50 8716 aaronmk
	path="$(realpath "$path")" # canonicalize
51 8773 aaronmk
	path="${path#$(pwd -P)/}" # remove any shared prefix with the current dir
52 8646 aaronmk
	echo "$path"
53
}
54
55 8463 aaronmk
# usage: echo_func "$@"
56
echo_func ()
57
{
58 8647 aaronmk
	local script="$(canon_rel_path "${BASH_SOURCE[1]}")"
59
	echo_cmd "$script:${BASH_LINENO[0]}" "${FUNCNAME[1]}" "$@"
60 8463 aaronmk
}
61 8279 aaronmk
62 8702 aaronmk
echo_stdin () # usage: input|echo_stdin|cmd
63
{
64
	echo ----- >&2
65
	tee -a /dev/stderr;
66
	echo ----- >&2
67
}
68 8275 aaronmk
69 8856 aaronmk
echo_vars () # usage: echo_vars var...
70
{ { echo -n "$PS4"; declare -p "${@%%=*}";} >&2; }
71 8641 aaronmk
72
echo_export ()
73
{
74 8700 aaronmk
	builtin export "$@"
75 8641 aaronmk
	echo_vars "$@"
76
}
77
78 8713 aaronmk
if test "$verbosity" -ge 2; then
79 8711 aaronmk
	alias export="echo_export" # automatically echo env vars when they are set
80
fi
81 8642 aaronmk
82 8272 aaronmk
usage () { echo "Usage: $1" >&2; (exit 2); }
83
84 8873 aaronmk
fi # load new aliases
85
if self_being_included; then
86
87 8871 aaronmk
#### strings
88
89
sed_ere_flag="$(test "$(uname)" = Darwin && echo E || echo r)"
90
91 8873 aaronmk
sed () { env sed -"$sed_ere_flag" "$@";}
92 8871 aaronmk
93 8854 aaronmk
#### vars
94
95
set_var () { eval "$1"'="$2"'; }
96
97 8857 aaronmk
set_inv () { set_var no_"$1" "$(test -n "${!1}" || echo 1)"; }
98
99 8859 aaronmk
# usage: local var=...; local_inv
100
alias local_inv='local "no_$var=$(test -n "${!var}" || echo 1)"'
101
102 8863 aaronmk
# usage: local prefix=..._; import_vars
103
alias import_vars="$(cat <<'EOF'
104
: "${prefix:?}"
105
local src_var dest_var
106
for src_var in $(eval echo '${!'$prefix'*}'); do
107
	dest_var="${src_var#$prefix}"
108
	local "$dest_var=${!src_var}"; echo_vars "$dest_var"
109
done
110
EOF
111
)"
112
113 8854 aaronmk
#### commands
114
115 8272 aaronmk
top_dir="$(dirname "$0")" # outermost script
116
117 8465 aaronmk
run_args_cmd () # runs the command line args command
118 8272 aaronmk
{
119 8292 aaronmk
	test "$?" -eq 0 || return
120 8693 aaronmk
	eval set -- "$(reverse "${BASH_ARGV[@]}")"
121 8290 aaronmk
	test "$#" -ge 1 || set -- all
122 8648 aaronmk
	echo_cmd "$(canon_rel_path "$0")" "$@"; "$@"
123 8272 aaronmk
}
124
125 8284 aaronmk
fwd () # usage: subdirs=(...); fwd "$FUNCNAME" "$@"
126 8272 aaronmk
{
127 8463 aaronmk
	echo_func "$@"
128 8284 aaronmk
	: "${subdirs?}"
129
130 8272 aaronmk
	for subdir in "${subdirs[@]}"; do
131 8280 aaronmk
		"$(dirname "${BASH_SOURCE[1]}")"/"$subdir"/run "$@"
132 8272 aaronmk
	done
133
}
134
135 8854 aaronmk
#### make
136
137 8880 aaronmk
# usage: target_filename/command () { echo_func "$@"; set_make_vars; ...; }
138
alias set_make_vars="$(cat <<'EOF'
139
local command="${FUNCNAME##*/}"; echo_vars command
140
local target_filename="${FUNCNAME%/*}"; echo_vars target_filename
141
local target="$top_dir/$target_filename"; echo_vars target
142
EOF
143
)"
144
145 8280 aaronmk
make ()
146
{
147 8463 aaronmk
	echo_func "$@"
148 8873 aaronmk
	env make --directory="$top_dir" "$@"
149 8280 aaronmk
}
150 8272 aaronmk
151 8276 aaronmk
if false; then ## usage:
152 8652 aaronmk
inline_make 3<<'EOF'
153 8276 aaronmk
target:
154
	$(self_dir)/cmd >$@
155
EOF
156
# target will be run automatically because it's first in the makefile
157
fi ##
158
inline_make ()
159
{
160 8653 aaronmk
	echo_func "$@"
161 8640 aaronmk
	local self="$(readlink -f "${BASH_SOURCE[1]}")"
162
	local self_dir="$(dirname "$self")"
163 8645 aaronmk
	export self self_dir
164 8640 aaronmk
165 8651 aaronmk
	make --makefile=<((
166 8652 aaronmk
		cat /dev/fd/3
167 8651 aaronmk
		echo -n "
168 8276 aaronmk
.SUFFIXES: # turn off built-in suffix rules
169
.SECONDARY: # don't automatically delete intermediate files
170
.DELETE_ON_ERROR: # delete target if recipe fails
171 8651 aaronmk
"
172
	)|echo_stdin) "$@"
173 8276 aaronmk
}
174 8658 aaronmk
175 8854 aaronmk
#### compression
176
177
### zip
178
179 8658 aaronmk
alias zip="echo_run zip"
180
alias unzip="echo_run unzip"
181 8858 aaronmk
set_inv force
182
alias zip_newer="zip${no_force:+ -u}"
183
alias unzip_newer="unzip${no_force:+ -u} -o"
184
	# -o is safe because -u only extracts newer files
185 8704 aaronmk
186 8775 aaronmk
#### databases
187
188 8868 aaronmk
# using prefixed connection vars
189
alias use_local="local prefix=local_; import_vars"
190 8864 aaronmk
alias use_remote="local prefix=remote_; import_vars"
191 8868 aaronmk
alias use_local_remote="use_local; use_remote"
192 8864 aaronmk
193 8775 aaronmk
quote='"'
194
195
esc_name () { echo "$quote${1//$quote/$quote$quote}$quote"; }
196
197
mk_esc_name () { set_var "$1"_esc "$(esc_name "${!1}")"; }
198
199 8796 aaronmk
alias mk_schema_esc="local schema_esc; mk_esc_name schema"
200
alias mk_table_esc="local table_esc; mk_esc_name table"
201
202
fi # load new aliases
203
if self_being_included; then
204
205
log_sql () { test "$verbosity" -ge 2; }
206
207
### MySQL
208
209 8862 aaronmk
# auto-adds connection/login opts when specified
210 8865 aaronmk
mysql_cmd () # usage: mysql* () { ...; mysql_cmd "$@"; }
211 8860 aaronmk
{
212
	echo_func "$@"
213 8870 aaronmk
	if test _"$ssh_server" = _"$(hostname -f)"; then local ssh_server=; fi
214 8869 aaronmk
	if test -n "$ssh_server"; then
215
		local ssh_dest="${ssh_dest-${ssh_user:+$ssh_user@}$ssh_server}"
216
	fi
217 8875 aaronmk
	if test -n "$schema"; then local database="${database-$schema}"; fi
218 8869 aaronmk
219 8860 aaronmk
	local var=ssh_dest; local_inv
220 8865 aaronmk
	echo_run ${no_ssh_dest:+env }${ssh_dest:+ssh "$ssh_dest" }"${FUNCNAME[1]}" \
221 8879 aaronmk
${server:+ --host="$server" }${user:+--user="$user" } --password\
222
${password+="$password"} ${database:+--databases "$database" --tables } "$@"
223 8860 aaronmk
}
224
225 8775 aaronmk
mysql ()
226
{
227
	echo_func "$@"
228 8865 aaronmk
	mysql_cmd --verbose "$@"
229 8775 aaronmk
}
230
231
mysql_ANSI ()
232
{
233
	echo_func "$@"
234
	(echo "SET sql_mode = 'ANSI';"; cat)|mysql "$@"
235
}
236
237 8866 aaronmk
mysqldump () # usage: [schema=1 | data=1] mysqldump db [table...]
238
{
239
	echo_func "$@"
240
	mysql_cmd --quick --lock-tables=false --set-charset \
241
${postgres_compat:+--compatible=postgresql --add-locks=false }\
242
${schema:+--no-data }${data:+--no-create-info }"$@"
243
}
244
245 8867 aaronmk
mysqldump_diffable ()
246
{
247
	echo_func "$@"
248
	mysqldump "$@"|sed 's/^(-- Dump completed).*$/\1/'
249
}
250
251 8796 aaronmk
### PostgreSQL
252
253
pg_copy_to ()
254
{
255
	echo_func "$@"
256 8805 aaronmk
	if test -z "$source"; then
257
		: "${table:?}"; mk_table_esc
258 8834 aaronmk
		if test -z "$limit"; then local source="$table_esc"
259
		else local source="(SELECT * FROM $table_esc LIMIT $limit)"
260 8805 aaronmk
		fi
261
	fi
262 8834 aaronmk
	local pg_copy_format="${pg_copy_format-CSV HEADER}"
263 8805 aaronmk
264 8807 aaronmk
	psql "$@" <<<"COPY $source TO STDOUT $pg_copy_format;"
265 8796 aaronmk
}
266
267
pg_header ()
268
{
269
	echo_func "$@"
270 8806 aaronmk
	local pg_copy_format="CSV HEADER" limit=0
271 8807 aaronmk
	pg_copy_to "$@"|echo_stdin
272 8796 aaronmk
}
273
274
pg_export_table_no_header ()
275
{
276
	echo_func "$@"
277
	local pg_copy_format="CSV"
278 8807 aaronmk
	pg_copy_to "$@"
279 8796 aaronmk
}
280
281
pg_export_table_to_dir_no_header ()
282
{
283
	echo_func "$@"
284
	local table="$1"; shift; mk_table_esc
285 8807 aaronmk
	local cols="$(pg_header)"
286 8796 aaronmk
	pg_export_table_no_header "$@" >"$exports_dir/$table.no_header.cols=$cols.csv"
287
}
288
289 8704 aaronmk
fi