+- ispCP - Board - Support (http://www.isp-control.net/forum)
+-- Forum: ispCP Omega Development Area (/forum-1.html)
+--- Forum: General discussion (/forum-11.html)
+--- Thread: perl troubles with vhcs (/thread-593.html)
perl troubles with vhcs - KeNt - 05-17-2007 10:23 PM
code] ./vhcs2-vrl-traff
If specified by -literal_key, then the key length must be equal to the chosen cipher's key length of 56 bytes at /var/www/vhcs2/engine/traffic/../vhcs2_common_code.pl line 1443
Compilation failed in require at ./vhcs2-vrl-traff line 53.[/code]
Code:
cat vhcs2_common_code.pl | head -n1460 | tail -n20
}
my $cipher = Crypt::CBC -> new(
{
'key' => $main::db_pass_key,
'cipher' => 'Blowfish',
'iv' => $main::db_pass_iv,
'regenerate_key' => 0,
'padding' => 'space',
'prepend_iv' => 0
}
);
my $decoded = decode_base64("$pass\n");
my $plaintext = $cipher -> decrypt($decoded);
push_el(\@main::el, 'decrypt_db_password()', 'Ending...');debian sarge + backports + vhcs2.4.7.1
failed up after updates
how to fix that?
RE: perl troubles with vhcs - grungy - 05-17-2007 10:29 PM
This is not the place to search support for VHCS.
RE: perl troubles with vhcs - grungy - 05-17-2007 10:40 PM
Try ispCP:
http://downloads.sourceforge.net/ispcp/ispcp-omega-1.0.0-rc2c.tar.bz2
RE: perl troubles with vhcs - KeNt - 05-18-2007 12:09 AM
sorry
simple i mean this forum so smartly for answers
the server is up and that is a problem
no time for reinstall
just help with perl and move topic to right place
p.s. sorry for bad english
RE: perl troubles with vhcs - KeNt - 05-18-2007 12:11 AM
when upgrade script to migrate from vhcs to ispcp is done i'm will migrate to ispcp
RE: perl troubles with vhcs - joximu - 05-18-2007 12:28 AM
The subroutine in ispcp is this one:
Code:
sub encrypt_db_password {
my ($pass) = @_;
push_el(\@main::el, 'encrypt_db_password()', 'Starting...');
if (!defined($pass) || $pass eq '') {
push_el(\@main::el, 'encrypt_db_password()', 'ERROR: Undefined input data ($pass)...');
return (1, '');
}
my $cipher = Crypt::CBC -> new(
{
'key' => $main::db_pass_key,
'keysize' => 32,
'cipher' => 'Blowfish',
'iv' => $main::db_pass_iv,
'regenerate_key' => 0,
'padding' => 'space',
'prepend_iv' => 0
}
);
my $ciphertext = $cipher->encrypt($pass);
my $encoded = encode_base64($ciphertext); chop($encoded);
push_el(\@main::el, 'encrypt_db_password()', 'Ending...');
return (0, $encoded);
}so, if you try the line "keysize" in your vhcs, maybe it helps...
RE: perl troubles with vhcs - Zothos - 05-18-2007 01:27 AM
keysize should help. Had the same error on my old vhcs server.
