Changeset 343
- Timestamp:
- 05/07/07 14:52:34 (2 years ago)
- Files:
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
honeyclient/branches/exp/kindlund-filesystem/lib/HoneyClient/Agent.pm
r342 r343 849 849 } 850 850 851 # Acquire lock on stored driver state.852 $data = _lock();853 854 851 # TODO: Perform Integrity Check 855 852 if (defined($integrity)) { … … 861 858 scalar(@{$changes->{filesystem}})) { 862 859 print "Integrity Check: FAILED\n"; 860 861 # Acquire lock on stored driver state. 862 $data = _lock(); 863 863 864 $data->{$driverName}->{'status'}->{'is_compromised'} = 1; 865 866 # Release lock on stored driver state. 867 _unlock($data); 868 864 869 } else { 865 870 print "Integrity Check: PASSED\n"; … … 870 875 # DESTROY this reference, but don't kill any temporary files created. 871 876 $integrity = undef; 872 873 # Release lock on stored driver state.874 _unlock($data);875 877 876 878 # XXX: Debugging, remove eventually. … … 914 916 # XXX: Fix this? 915 917 #threads->detach(); # XXX: Test this. 918 # XXX: Debugging, remove eventually. 919 print "About to return out of child thread.\n"; 916 920 return; 917 921 };
