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
  23 die() {
  24     echo "$@" 1>&2
  25     exit 1
  26 }
  27
  28
  29 pwdigest() {
  30     echo -n "$1" |
  31     perl -e 'use Digest::MD5 qw(md5_base64);
  32              while (<>) { print md5_base64($_), "\n"; }'
  33 }
  34
  35
  36 [ $# -lt 2 ] && die "Usage: $0 instancename username..."
  37 instance="$1"
  38 shift
  39
  40 temp="$(mktemp)"
  41
  42 cat <<eof > "$temp"
  43 use koha_$instance;
  44 eof
  45
  46 for userid in "$@"
  47 do
  48     password="$(pwgen -1)"
  49     digest="$(pwdigest $password)"
  50     echo "$userid $password"
  51     echo "UPDATE borrowers SET password = '$digest' WHERE userid = '$userid';" \
  52         >> "$temp"
  53 done
  54
  55 mysql --defaults-extra-file=/etc/mysql/koha-common.cnf < "$temp"
  56
  57 rm "$temp"