diff -r 51e429810aba -r 9544c55a7fd0 common/tools/raptor/RaptorCommon.pm --- a/common/tools/raptor/RaptorCommon.pm Mon Jul 13 11:38:30 2009 +0100 +++ b/common/tools/raptor/RaptorCommon.pm Mon Jul 13 17:52:05 2009 +0100 @@ -15,9 +15,21 @@ package RaptorCommon; our $CATEGORY_GENERAL = 'general'; + our $CATEGORY_RAPTORERROR = 'raptor_error'; +our $CATEGORY_RAPTORERROR_CANNOTPROCESSSCHEMAVERSION = 'cannot_process_schema_version'; +our $CATEGORY_RAPTORERROR_NOBLDINFFOUND = 'no_bld_inf_found'; our $SEVERITY_UNKNOWN = 'unknown'; our $SEVERITY_CRITICAL = 'critical'; +sub dump_fault +{ + my ($category, $subcategory, $severity, $component, $phase, $recipe, $file, $line) = @_; + + open(SUMMARY, ">>$::basedir/summary.csv"); + print SUMMARY "$category,$subcategory,$severity,$component,$phase,$recipe,$file,$line\n"; + close(SUMMARY); +} + 1;