Changeset 601
- Timestamp:
- 03/06/07 18:14:12 (6 years ago)
- Files:
-
- 2 modified
-
applications/shepherd (modified) (7 diffs)
-
status (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
applications/shepherd
r599 r601 2 2 3 3 my $progname = 'shepherd'; 4 my $version = '0.4.7 5';4 my $version = '0.4.76'; 5 5 6 6 # tv_grab_au … … 89 89 my $pending_messages = { }; 90 90 my $starttime = time; 91 my $any_data; 91 92 my %REGIONS = ( 92 93 126 => "ACT", 73 => "NSW: Sydney", 184 => "NSW: Newcastle", … … 219 220 &grab_data("standard"); 220 221 &grab_data("paytv") if (defined $want_paytv_channels); 221 &reconcile_data; 222 &postprocess_data; 223 &output_data; 224 &finalize_stats; 225 &report_stats; 222 $any_data = &reconcile_data; 223 if ($any_data) 224 { 225 &postprocess_data; 226 &output_data; 227 &finalize_stats; 228 &report_stats; 229 } 230 else 231 { 232 &no_data; 233 } 226 234 &write_config_file; 227 235 &stop_tor; … … 230 238 &log("Done.\n"); 231 239 &close_logfile() unless $opt->{nolog}; 240 241 exit (!$any_data); 232 242 233 243 # --------------------------------------------------------------------------- … … 672 682 &add_pending_message($progname, "SUCCESS", $sysid, $starttime, (time-$starttime), $region, $components_used); 673 683 $last_successful_run = time; 684 } 685 686 # If no grabbers returned data, don't report individual component failures but rather 687 # an overall Shepherd failure. 688 sub no_data 689 { 690 $pending_messages = undef; 691 &add_pending_message($progname, 'FAIL', $sysid, $starttime, (time-$starttime), $region, 'no data'); 674 692 } 675 693 … … 3627 3645 if ($num_grabbers == 0) { 3628 3646 &log("ERROR! Nothing to reconcile! No valid grabber data!\n"); 3629 return ;3647 return 0; 3630 3648 } 3631 3649 … … 3657 3675 XMLTV::catfiles(\%w_args, @input_file_list); 3658 3676 } 3677 return 1; 3659 3678 } 3660 3679 -
status
r600 r601 1 application shepherd 0.4.7 51 application shepherd 0.4.76 2 2 grabber yahoo7widget 1.81 3 3 grabber rex 3.4.5
