assemble_spice_ticket: do not use base32 encoding
authorDietmar Maurer <dietmar@proxmox.com>
Tue, 25 Jun 2013 10:03:48 +0000 (12:03 +0200)
committerDietmar Maurer <dietmar@proxmox.com>
Tue, 25 Jun 2013 10:03:48 +0000 (12:03 +0200)
PVE/AccessControl.pm
control.in

index 44299ce..b5dffad 100644 (file)
@@ -5,7 +5,6 @@ use Encode;
 use Crypt::OpenSSL::Random;
 use Crypt::OpenSSL::RSA;
 use MIME::Base64;
-use MIME::Base32 qw( RFC );
 use Digest::SHA;
 use PVE::Tools qw(run_command lock_file file_get_contents split_list safe_print);
 use PVE::Cluster qw(cfs_register_file cfs_read_file cfs_write_file cfs_lock_file);
@@ -228,7 +227,8 @@ sub assemble_spice_ticket {
     my $full = "$plain:$path";
 
     my $ticket = $plain . "::" . encode_base64($rsa_priv->sign($full), '');
-    return MIME::Base32::encode($ticket."::".$full);
+
+    return $ticket;
 }
 
 sub check_user_exist {
index 1062ffa..a441ee0 100644 (file)
@@ -3,7 +3,7 @@ Version: @@VERSION@@-@@PKGRELEASE@@
 Section: perl
 Priority: optional
 Architecture: @@ARCH@@
-Depends: libc6 (>= 2.3), perl (>= 5.6.0-16), libcrypt-openssl-rsa-perl, libcrypt-openssl-random-perl, libjson-xs-perl, libjson-perl, libterm-readline-gnu-perl,libnet-ldap-perl, libpve-common-perl, pve-cluster, libauthen-pam-perl , libmime-base32-perl
+Depends: libc6 (>= 2.3), perl (>= 5.6.0-16), libcrypt-openssl-rsa-perl, libcrypt-openssl-random-perl, libjson-xs-perl, libjson-perl, libterm-readline-gnu-perl,libnet-ldap-perl, libpve-common-perl, pve-cluster, libauthen-pam-perl
 Maintainer: Proxmox Support Team <support@proxmox.com>
 Description: Proxmox VE access control library
  This package contains the role based user management and access