Subversion Repositories DevTools

Rev

Rev 5404 | Rev 6098 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5404 Rev 5405
Line 82... Line 82...
82 
    delCount => 0,                      # Packages marked for deletion
 82 
    delCount => 0,                      # Packages marked for deletion
83 
    staleTags => 0,                     # Stale Tags
 83 
    staleTags => 0,                     # Stale Tags
84 
    linkErrors => 0,                    # Transfer errors
 84 
    linkErrors => 0,                    # Transfer errors
85 
                                        #
85 
                                        #
86 
                                        # Per Cycle Data - Calculated each processing Cycle
 86 
                                        # Per Cycle Data - Calculated each processing Cycle
87 
    remoteTotal => 0,                   # Packages on target machine
 - 
 
88 
    total    => 0,                      # Packages to be synced
 87 
    total    => 0,                      # Packages to be synced
89 
    delete   => 0,                      # Packages to delete
 88 
    delete   => 0,                      # Packages to delete
90 
    excluded => 0,                      # Packages excluded
89 
    excluded => 0,                      # Packages excluded
91 
    filtered => 0,                      # Packages filtered out
 90 
    filtered => 0,                      # Packages filtered out
92 
    missing  => 0,                      # Packages missing
 91 
    missing  => 0,                      # Packages missing
Line 342... Line 341...
342 
    #   Returned data looks like:
 341 
    #   Returned data looks like:
343 
    #   1141792602 GMT(Wed Mar  8 04:36:42 2006) [DL] ishieldmodules/11.5.0.cots
 342 
    #   1141792602 GMT(Wed Mar  8 04:36:42 2006) [DL] ishieldmodules/11.5.0.cots
344 
    #
343 
    #
345 
    #
 344 
    #
346 
    my $remotePkgList;
 345 
    my $remotePkgList;
347 
    my $remotePackageVersionCount = 0;
 - 
 
348 
    my $remoteData;
 346 
    my $remoteData;
349 
    my $ph;
 347 
    my $ph;
350 
    my $tgt_cmd = "$conf->{'bindir'}/get_plist.pl";
 348 
    my $tgt_cmd = "$conf->{'bindir'}/get_plist.pl";
351 
    my $ssh_cmd = sshCmd($tgt_cmd);
 349 
    my $ssh_cmd = sshCmd($tgt_cmd);
352 
 
 350 
 
Line 362... Line 360...
362 
        else
 360 
        else
363 
        {
 361 
        {
364 
            if ( parsePkgList($_, \%{$remotePkgList} ) )
 362 
            if ( parsePkgList($_, \%{$remotePkgList} ) )
365 
            {
 363 
            {
366 
                $logger->verbose2("processReleaseList:Data: $_");
 364 
                $logger->verbose2("processReleaseList:Data: $_");
367 
                $remotePackageVersionCount++;
 - 
 
368 
            }
 365 
            }
369 
            else
 366 
            else
370 
            {
 367 
            {
371 
                $logger->warn("processReleaseList:Bad Data: $_");
 368 
                $logger->warn("processReleaseList:Bad Data: $_");
372 
            }
 369 
            }
Line 649... Line 646...
649 
    #   Update stats
 646 
    #   Update stats
650 
    #   At this point we are looking pretty good
 647 
    #   At this point we are looking pretty good
651 
    #
648 
    #
652 
    $statistics{state} = 'OK';
 649 
    $statistics{state} = 'OK';
653 
    $statistics{total} = $packageVersionCount;
 650 
    $statistics{total} = $packageVersionCount;
654 
    $statistics{remoteTotal} = $remotePackageVersionCount;
 - 
 
655 
    $statistics{transfer} = $needPkgListCount;
 651 
    $statistics{transfer} = $needPkgListCount;
656 
    $statistics{delete} = $excessPkgListCount;
 652 
    $statistics{delete} = $excessPkgListCount;
657 
    $statistics{filtered} = $filteredCount;
 653 
    $statistics{filtered} = $filteredCount;
658 
    $statistics{missing} = $missingCount;
 654 
    $statistics{missing} = $missingCount;
659 
    $statistics{writable} = $writableCount;
 655 
    $statistics{writable} = $writableCount;