diff --git a/scripts/ZoneMinder/lib/ZoneMinder/Event.pm b/scripts/ZoneMinder/lib/ZoneMinder/Event.pm index bb0923c99..d1394dd29 100644 --- a/scripts/ZoneMinder/lib/ZoneMinder/Event.pm +++ b/scripts/ZoneMinder/lib/ZoneMinder/Event.pm @@ -86,6 +86,7 @@ $serial = $primary_key = 'Id'; StateId Orientation DiskSpace + SaveJPEGs ); %defaults = ( Cause => q`'Unknown'`, diff --git a/scripts/ZoneMinder/lib/ZoneMinder/Frame.pm b/scripts/ZoneMinder/lib/ZoneMinder/Frame.pm new file mode 100644 index 000000000..6ce8f9ca0 --- /dev/null +++ b/scripts/ZoneMinder/lib/ZoneMinder/Frame.pm @@ -0,0 +1,78 @@ +# ========================================================================== +# +# ZoneMinder Monitor Module, $Date$, $Revision$ +# Copyright (C) 2001-2008 Philip Coombes +# +# This program is free software; you can redistribute it and/or +# modify it under the terms of the GNU General Public License +# as published by the Free Software Foundation; either version 2 +# of the License, or (at your option) any later version. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with this program; if not, write to the Free Software +# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. +# +# ========================================================================== +# +# This module contains the common definitions and functions used by the rest +# of the ZoneMinder scripts +# +package ZoneMinder::Frame; + +use 5.006; +use strict; +use warnings; + +require ZoneMinder::Base; +require ZoneMinder::Object; + +use parent qw(ZoneMinder::Object); + +use vars qw/ $table $primary_key %fields /; +$table = 'Frames'; +$primary_key = 'Id'; + +%fields = ( + Id => 'Id', + EventId => 'EventId', + FrameId => 'FrameId', + Type => 'Type', + TimeStamp => 'TimeStamp', + Delta => 'Delta', + Score => 'Score', +); + +sub Event { + return new ZoneMinder::Event( $_[0]{EventId} ); +} # end sub Event + +1; +__END__ + +=head1 NAME + +ZoneMinder::Frame - Perl Class for Frames + +=head1 SYNOPSIS + +use ZoneMinder::Frame; + +=head1 AUTHOR + +Isaac Connor, Eisaac@zoneminder.comE + +=head1 COPYRIGHT AND LICENSE + +Copyright (C) 2001-2017 ZoneMinder LLC + +This library is free software; you can redistribute it and/or modify +it under the same terms as Perl itself, either Perl version 5.8.3 or, +at your option, any later version of Perl 5 you may have available. + + +=cut diff --git a/scripts/zmrecover.pl.in b/scripts/zmrecover.pl.in index 5d1942ce2..6b8f3831f 100644 --- a/scripts/zmrecover.pl.in +++ b/scripts/zmrecover.pl.in @@ -46,7 +46,7 @@ logInit(); GetOptions( force =>\$force, - interactive =>\$interactive, + 'interactive=i' =>\$interactive, 'monitor_id=i' =>\$monitor_id, report =>\$report, 'server_id=i' =>\$server_id, @@ -233,7 +233,7 @@ Debug("@Monitors"); $Event->recover_timestamps(); $Event->save({}, 1); - Debug("Event resurrected as " . $Event->to_string() ); + Info("Event resurrected as " . $Event->to_string() ); next; } # end if resurrection } # event path exists @@ -340,7 +340,7 @@ Debug("@Monitors"); $Event = new ZoneMinder::Event(); $$Event{Id} = $event_id; $$Event{Path} = join('/', $Storage->Path(), $event_dir ); - Debug("Have event $$Event{Id} at $$Event{Path}"); + Info("Have event $$Event{Id} at $$Event{Path}"); if ( confirm() ) { $$Event{Scheme} = 'Medium'; $$Event{RelativePath} = $event_dir; @@ -352,7 +352,7 @@ Debug("@Monitors"); $Event->StorageId( $Storage->Id() ); $Event->recover_timestamps(); $Event->save({}, 1); - Debug("Event resurrected as " . $Event->to_string() ); + Info("Event resurrected as " . $Event->to_string() ); } } # end foreach event } # end search for Medium @@ -375,9 +375,10 @@ Debug("@Monitors"); Debug("Found an event in db for $event"); next; } + $Event = new ZoneMinder::Event(); $$Event{Id} = $event; $$Event{Path} = join('/', $Storage->Path(), $event ); - Debug("Have event $$Event{Id} at $$Event{Path}"); + Info("Have event $$Event{Id} at $$Event{Path}"); if ( confirm() ) { $$Event{Scheme} = 'Shallow'; $$Event{Name} = "Event $event recovered";