[Linuxtrent] Re: dpkg bloccato
- From: Mario Busana <mariobusana@xxxxxxxx>
- To: linuxtrent@xxxxxxxxxxxxx
- Date: Tue, 6 Dec 2005 12:20:11 +0100 (CET)
--- Flavio Stanchina <flavio@xxxxxxxxxxxxx> ha
scritto:
> OK, però è qualcosa nel postinst che fa scattare il
> casino. Nel
> messaggio d'errore che trascrivi c'è "postinst line
> 1190", direi di
> cominciare a guardare lì.
la linea 1190 è questa:
die "Error setting debconf flags in $note: $seen" if
$ret;
il tutto è questo:
sub run_lilo (){
my $ret;
if ($loader =~ /^lilo/io or $loader =~ /vmelilo/io)
{
print "Testing $loader.conf ... \n";
unlink $temp_file_name; # security
$ret = system("$loaderloc -t >$temp_file_name
2>&1");
if ($ret) {
my $seen;
my $note =
"${package_name}/postinst/bootloader-test-error-$version";
($ret,$seen) = fset ("$note", 'seen', 'false');
die "Error setting debconf flags in $note:
$seen" if $ret;
$ret = subst("$note", 'locader', "$loader");
die "Error setting debconf substitutions in
$note: $seen" if $ret;
$ret = subst("$note", 'temp_file_name',
"$temp_file_name");
die "Error setting debconf substitutions in
$note: $seen" if $ret;
($ret,$seen) = input('critical', "$note");
if ($ret && $ret != 30 ) {
die "Error setting debconf note $note: $seen";
}
($ret,$seen) = go ();
if ($ret && $ret != 30 ) {
die "Error asking debconf question $note:
$seen";
}
return $ret;
}
unlink "$temp_file_name";
print "Testing successful.\n";
print "Installing the ";
print "partition " if $loader =~ /^lilo/io;
print "boot sector... \n";
}
if ($loader =~ /^elilo/io) {
$ret = system("$loaderloc 2>&1 | tee
$temp_file_name");
} else {
$ret = system("$loaderloc >$temp_file_name 2>&1");
}
if ($ret) {
my $ret;
my $seen;
my $note =
"${package_name}/postinst/bootloader-error-$version";
($ret,$seen) = fset ("$note", 'seen', 'false');
die "Error setting debconf flags in $note: $seen"
if $ret;
$ret = subst("$note", 'locader', "$loader");
die "Error setting debconf substitutions in $note:
$seen" if $ret;
$ret = subst("$note", 'temp_file_name',
"$temp_file_name");
die "Error setting debconf substitutions in $note:
$seen" if $ret;
($ret,$seen) = input('critical', "$note");
if ($ret && $ret != 30 ) {
die "Error setting debconf note $note: $seen";
}
($ret,$seen) = go ();
if ($ret && $ret != 30 ) {
die "Error asking debconf question $note:
$seen";
}
return $ret;
}
unlink $temp_file_name;
print "Installation successful.\n";
return 0;
}
exit 0;
__END__
>
> Oddio, senza la macchina davanti per far prove non
> so che altro
> suggerirti. Prova a generare un package con una
> versione sana di
> make-kpkg, sostituisci a mano i maintainer script e
> vedi se riesci a
> completare l'installazione/aggiornamento.
>
è quello che avevo provato a fare.. ma l'errore è
rimasto uguale.. ma non c'è proprio modo di
"sbloccare" il dpkg??
Grazie intanto!!
Mario
> --
> Ciao, Flavio
> --
> Per iscriversi (o disiscriversi), basta spedire un
> messaggio con OGGETTO
> "subscribe" (o "unsubscribe") a
> mailto:linuxtrent-request@xxxxxxxxxxxxx
>
>
>
___________________________________
Yahoo! Messenger: chiamate gratuite in tutto il mondo
http://it.messenger.yahoo.com
--
Per iscriversi (o disiscriversi), basta spedire un messaggio con OGGETTO
"subscribe" (o "unsubscribe") a mailto:linuxtrent-request@xxxxxxxxxxxxx
Other related posts: