assemble_spice_ticket: do not use base32 encoding

diff --git a/PVE/AccessControl.pm b/PVE/AccessControl.pm
index 44299ce07c634d3f407e8f74cbde2e2bd1d87228..b5dffadda4432ed783459ec50ca714de74dba2b2 100644 (file)
--- a/PVE/AccessControl.pm
+++ b/PVE/AccessControl.pm
@@ -5,7 +5,6 @@ use Encode;
 use Crypt::OpenSSL::Random;
 use Crypt::OpenSSL::RSA;
 use MIME::Base64;
 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);
 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), '');
     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 {
 }
 
 sub check_user_exist {

diff --git a/control.in b/control.in
index 1062ffa8a8ede921fced34f046fc97e5a2918869..a441ee026ce67e76f48cae0a36bdca2f9e8f1c2f 100644 (file)
--- a/control.in
+++ b/control.in
@@ -3,7 +3,7 @@ Version: @@VERSION@@-@@PKGRELEASE@@
 Section: perl
 Priority: optional
 Architecture: @@ARCH@@
 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
 Maintainer: Proxmox Support Team <support@proxmox.com>
 Description: Proxmox VE access control library
  This package contains the role based user management and access