/[BackupPC]/trunk/bin/BackupPC_burnArchiveCLI
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/bin/BackupPC_burnArchiveCLI

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 371 by iklaric, Mon May 7 08:48:47 2007 UTC revision 372 by iklaric, Mon May 7 11:00:52 2007 UTC
# Line 481  foreach my $copy_nr ( 1 .. $copies ) { Line 481  foreach my $copy_nr ( 1 .. $copies ) {
481                                                  my $host = $p->{host};                                                  my $host = $p->{host};
482                                                  my $share = $p->{share};                                                  my $share = $p->{share};
483                                                  my $dump = $p->{num};                                                  my $dump = $p->{num};
484                                                                                                    my $otherUser = "backuppc-agi";
485                                                  my $cmd = $tarIncCreate. " -h $host -s $share -n $dump";  
486                                                    my $cmd = "sudo -u $otherUser ".$tarIncCreate. " -h $host -s $share -n $dump";
487                                                  print "$cmd ";                                                  print "$cmd ";
488                                                  if (system($cmd) != 0) {                                                  if (system($cmd) != 0) {
489                                                          print " FAILED.\n";                                                          print " FAILED.\n";
# Line 531  foreach my $copy_nr ( 1 .. $copies ) { Line 532  foreach my $copy_nr ( 1 .. $copies ) {
532    
533                          } else {                          } else {
534                                  $iso_size = (stat($iso_file))[7];                                  $iso_size = (stat($iso_file))[7];
535                                  print "ISO $iso_file allready exists [$iso_size bytes]\n";                                  print "ISO $iso_file already exists [$iso_size bytes]\n";
536                          }                          }
537    
538                          print "\nREADY TO BURN MEDIA $disk_name copy $copy_nr\n\nPlease insert blank media and press ENTER\n\n";                          print "\nREADY TO BURN MEDIA $disk_name copy $copy_nr\n\nPlease insert blank media and press ENTER\n\n";
539    
                         die("debugging only!");  
   
540                          system($bin->{'eject'}.' '.$eject_opts) == 0 or skip "can't run eject: $?";                          system($bin->{'eject'}.' '.$eject_opts) == 0 or skip "can't run eject: $?";
541    
542                          my $wait = <STDIN>;                          my $wait = <STDIN>;
Legend:
Removed from v.371  
changed lines
  Added in v.372
  ViewVC Help
Powered by ViewVC 1.1.26