blob: ee053a16e628c1668d0919c695e0731f2e6b019f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
|
#!/bin/bash
# Distributed under the terms of the GNU General Public License v2
# $Header: $
ATOM=
CAT=
PN=
ACTION=
PRETEND=
CMD="emerge -Cav"
WEBAPP_DIR="/usr/share/webapps"
WEBAPP_CONFIG=
[[ -z ${RC_GOT_FUNCTIONS} ]] && source /lib/gentoo/functions.sh
function help() {
echo "Remove obsolete and unused versions of web applications"
echo
echo "Usage:"
echo " $0 [options] [action] app_name"
echo
echo "Options:"
echo " -p, --pretend"
echo " Instead of cleaning, simply show the commands to be executed"
echo
echo "Actions:"
echo " -P, --prune"
echo " Removes all but the latest version of a package. Similar to"
echo " emerge --prune"
echo
echo " -C, --clean-unused"
echo " Removes all versions of a web application that have not been"
echo " installed into a virtual host"
echo
echo " -h, --help"
echo " Displays this help message"
echo
echo "If multiple actions are given, only the action specified last will"
echo "be executed"
}
function sanity_checks() {
WEBAPP_CONFIG=$(which webapp-config)
if [ "${WEBAPP_CONFIG}x" == "x" ]; then
eerror "webapp-config not found"
exit 1
fi
if [[ -z "${ACTION}" ]]; then
eerror "Please specify a valid action"
exit 1
fi
if [[ -z ${PN} && ${ACTION} != "help" ]]; then
eerror "Please specify a web application to be cleaned"
exit 1
fi
if [[ "${CAT}x" == "x" || "${PN}x" == "x" ]]; then
eerror "Package name must be in the form CATEGORY/PN"
exit 1
fi
if [[ ! -d "${WEBAPP_DIR}/${CAT}/${PN}" && ! -d "${WEBAPP_DIR}/${PN}" ]]; then
eerror "${PN} not found"
exit 1
fi
}
function prune() {
if [[ $(ls -1 "${WEBAPP_DIR}/${PN}" | wc -l) == "1" ]]; then
einfo "Nothing to clean"
return
else
local BEST_VERSION=$(ls ${WEBAPP_DIR}/${PN} | sort -nr | head -n 1)
for x in $(ls ${WEBAPP_DIR}/${PN}); do
if [[ ${BEST_VERSION} != ${x} ]]; then
CMD="${CMD} =${PN}-${x}"
fi
done
einfo "Multiple versions of ${PN} detected."
if [[ -z ${PRETEND} ]]; then
einfo "Running ${CMD}"
${CMD}
else
einfo "To prune, run the following command:"
einfo "${CMD}"
fi
fi
}
function clean_unused() {
local output=$(${WEBAPP_CONFIG} -lui ${PN})
if [[ -z ${output} ]] ; then
einfo "Nothing to clean"
return
else
CMD="${CMD} =${output}"
einfo "Unused versions of ${PN} detected."
if [[ -z ${PRETEND} ]]; then
einfo "Running ${CMD}"
${CMD}
else
einfo "To clean, run the following command:"
einfo "${CMD}"
fi
fi
}
function process_opts() {
if [[ -z $1 ]]; then
help
exit 0
fi
while [ "$1+" != "+" ]; do
case "$1" in
-p|--pretend)
PRETEND="yes"
;;
-P|--prune)
ACTION="prune"
;;
-C|--clean-unused)
ACTION="clean_unused"
;;
-h|--help)
ACTION="help"
;;
*)
ATOM="${1}"
parse_atom
;;
esac
shift
done
}
parse_atom() {
local pos=$(expr index "${ATOM}" "/")
CAT=${ATOM:0:$pos - 1}
PN=${ATOM:$pos}
}
process_opts $@
sanity_checks
${ACTION}
|