Bug 15839: Koha::Reviews - Add Koha::Review[s] classes
[koha.git] / debian / scripts / koha-reset-passwd
1 #!/bin/sh
2 #
3 # koha-reset-passwd -- reset password for a user in a Koha instance
4 # Copyright 2010  Catalyst IT, Ltd
5
6 # This program is free software: you can redistribute it and/or modify
7 # it under the terms of the GNU General Public License as published by
8 # the Free Software Foundation, either version 3 of the License, or
9 # (at your option) any later version.
10
11 # This program is distributed in the hope that it will be useful,
12 # but WITHOUT ANY WARRANTY; without even the implied warranty of
13 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14 # GNU General Public License for more details.
15
16 # You should have received a copy of the GNU General Public License
17 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
18
19
20 set -e
21
22 # include helper functions
23 if [ -f "/usr/share/koha/bin/koha-functions.sh" ]; then
24     . "/usr/share/koha/bin/koha-functions.sh"
25 else
26     echo "Error: /usr/share/koha/bin/koha-functions.sh not present." 1>&2
27     exit 1
28 fi
29
30 pwdigest() {
31     echo -n "$1" |
32     perl -e 'use Digest::MD5 qw(md5_base64);
33              while (<>) { print md5_base64($_), "\n"; }'
34 }
35
36
37 [ $# -lt 2 ] && die "Usage: $0 instancename username..."
38 instance="$1"
39 shift
40
41 temp="$(mktemp)"
42
43 cat <<eof > "$temp"
44 use koha_$instance;
45 eof
46
47 for userid in "$@"
48 do
49     password="$(pwgen 12 1)"
50     digest="$(pwdigest $password)"
51     echo "$userid $password"
52     echo "UPDATE borrowers SET password = '$digest' WHERE userid = '$userid';" \
53         >> "$temp"
54 done
55
56 mysql --defaults-extra-file=/etc/mysql/koha-common.cnf < "$temp"
57
58 rm "$temp"