diff options
author | Ashlee Young <ashlee@onosfw.com> | 2015-09-09 22:21:41 -0700 |
---|---|---|
committer | Ashlee Young <ashlee@onosfw.com> | 2015-09-09 22:21:41 -0700 |
commit | 8879b125d26e8db1a5633de5a9c692eb2d1c4f83 (patch) | |
tree | c7259d85a991b83dfa85ab2e339360669fc1f58e /framework/src/suricata/contrib/file_processor/Action/Syslog.pm | |
parent | 13d05bc8458758ee39cb829098241e89616717ee (diff) |
suricata checkin based on commit id a4bce14770beee46a537eda3c3f6e8e8565d5d0a
Change-Id: I9a214fa0ee95e58fc640e50bd604dac7f42db48f
Diffstat (limited to 'framework/src/suricata/contrib/file_processor/Action/Syslog.pm')
-rw-r--r-- | framework/src/suricata/contrib/file_processor/Action/Syslog.pm | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/framework/src/suricata/contrib/file_processor/Action/Syslog.pm b/framework/src/suricata/contrib/file_processor/Action/Syslog.pm new file mode 100644 index 00000000..6b7c31a1 --- /dev/null +++ b/framework/src/suricata/contrib/file_processor/Action/Syslog.pm @@ -0,0 +1,20 @@ +package Action::Syslog; +use Moose; +extends 'Processor'; +use Sys::Syslog qw(:standard :macros); + +our $Program = 'suricata_file'; +our $Facility = LOG_LOCAL0; +has 'data' => (is => 'rw', isa => 'HashRef', required => 1); + +sub name { 'syslog' } +sub description { 'Log to local syslog' } + +sub perform { + my $self = shift; + openlog($Program, undef, $Facility); + syslog(LOG_INFO, $self->json->encode($self->data)); + closelog; +} + +1 |