[Bug 1360259] Re: atool fails to convert a 7z archive to zip, terminates with an error

2014-08-22 Thread Filip Sohajek
Thank you for taking the time to report this bug and helping to make
Ubuntu better. Please execute the following command, as it will
automatically gather debugging information, in a terminal:

  apport-collect BUGNUMBER

When reporting bugs in the future please use apport by using 'ubuntu-
bug' and the name of the package affected. You can learn more about this
functionality at https://wiki.ubuntu.com/ReportingBugs.

** Changed in: atool (Ubuntu)
   Status: New = Incomplete

-- 
You received this bug notification because you are a member of Ubuntu
Bugs, which is subscribed to Ubuntu.
https://bugs.launchpad.net/bugs/1360259

Title:
  atool fails to convert a 7z archive to zip, terminates with an error

To manage notifications about this bug go to:
https://bugs.launchpad.net/ubuntu/+source/atool/+bug/1360259/+subscriptions

-- 
ubuntu-bugs mailing list
ubuntu-bugs@lists.ubuntu.com
https://lists.ubuntu.com/mailman/listinfo/ubuntu-bugs


[Bug 1360259] Re: atool fails to convert a 7z archive to zip, terminates with an error

2014-08-22 Thread Scott Pitcher
I'm not a perl programmer I work with C and TCL, but I had a look at
/usr/bin/atool.

The problem is in the unlink_directory subroutine ...


sub unlink_directory($) {
  my ($dir) = @_;
  die $::basename: internal error 1 - please report this bug\n
if ($dir eq '/' || $dir eq $ENV{HOME});
# chmod 0700, $dir || die $::basename: cannot chmod `.quote($dir).': $!\n;
  chdir $dir || die $::basename: .quote($dir).: cannot change to - $!\n;
  opendir(DIR, $::cur) || die $::basename: .quote($dir).: cannot list - 
$!\n;
  my @files = readdir(DIR);
  closedir(DIR);
  foreach my $file (@files) {
next if $file eq $::cur || $file eq $::up;
if (-d $file  !-l $file) {
  unlink_directory($file);
} else {
  unlink $file || die $::basename: .quote($file).: cannot remove - $!\n;
}
  }
  chdir $::up || die $::basename: $::up: cannot change to - $!\n;
  rmdir $dir || die $::basename: .quote($dir).: cannot remove - $!\n;
}


Line 1677 reads: unlink $file || die $::basename: .quote($file).:
cannot remove - $!\n;

if I change the unlink $file to unlink ./$file then the error goes
away. The file which is generating the error is named 0 (without
quotes), so perl must has some issue with the statement unlink 0.

I can't do anymore but this is a workaround for me.

-- 
You received this bug notification because you are a member of Ubuntu
Bugs, which is subscribed to Ubuntu.
https://bugs.launchpad.net/bugs/1360259

Title:
  atool fails to convert a 7z archive to zip, terminates with an error

To manage notifications about this bug go to:
https://bugs.launchpad.net/ubuntu/+source/atool/+bug/1360259/+subscriptions

-- 
ubuntu-bugs mailing list
ubuntu-bugs@lists.ubuntu.com
https://lists.ubuntu.com/mailman/listinfo/ubuntu-bugs


[Bug 1360259] Re: atool fails to convert a 7z archive to zip, terminates with an error

2014-08-22 Thread François Marier
** Changed in: atool (Ubuntu)
   Status: Incomplete = New

-- 
You received this bug notification because you are a member of Ubuntu
Bugs, which is subscribed to Ubuntu.
https://bugs.launchpad.net/bugs/1360259

Title:
  atool fails to convert a 7z archive to zip, terminates with an error

To manage notifications about this bug go to:
https://bugs.launchpad.net/ubuntu/+source/atool/+bug/1360259/+subscriptions

-- 
ubuntu-bugs mailing list
ubuntu-bugs@lists.ubuntu.com
https://lists.ubuntu.com/mailman/listinfo/ubuntu-bugs