X-Git-Url: https://git.adam-barratt.org.uk/?a=blobdiff_plain;f=update.cgi;h=1a66b753b7932faa7883fadffebb7164c241cccd;hb=7186c5b0dbf23f02d1564637b55c5f45fbb44193;hp=3077e6a70cdbc8f613552086e9efc898aa3adb3a;hpb=40370d4d18e676d84988530673ce69f6193aab4a;p=mirror%2Fuserdir-ldap-cgi.git diff --git a/update.cgi b/update.cgi index 3077e6a..1a66b75 100755 --- a/update.cgi +++ b/update.cgi @@ -129,11 +129,12 @@ if (!($query->param('doupdate'))) { my $e = "$hosts $status not shown - $uuid + (delete)\n"; $sudopassword .= $e; if ($status eq 'unconfirmed') { - my $hmac = hmac_sha1_hex( join(':', 'confirm-new-password', $uuid, $hosts, $crypted), $hmac_key); + my $data = join(':', 'confirm-new-password', $uuid, $hosts, $crypted); + my $hmac = hmac_sha1_hex( $data, $hmac_key); $confirmstring .= "confirm sudopassword $uuid $hosts $hmac\n"; } }; @@ -146,7 +147,7 @@ if (!($query->param('doupdate'))) { my $data = $host_entries->{$dn}; my $host = $data->{'host'}->[0]; my $hostname = $data->{'hostname'}->[0]; - $sudopasswordhosts .= "