/usr/share/perl5/Apache/Ocsinventory/Server/Constants.pm is in ocsinventory-server 2.0.5-1.1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 | ###############################################################################
## OCSINVENTORY-NG
## Copyleft Pascal DANEK 2005
## Web : http://www.ocsinventory-ng.org
##
## This code is open source and may be copied and modified as long as the source
## code is always made freely available.
## Please refer to the General Public Licence http://www.gnu.org/ or Licence.txt
################################################################################
package Apache::Ocsinventory::Server::Constants;
use strict;
use Apache::Ocsinventory::Map;
require Exporter;
our @ISA = qw /Exporter/;
our @EXPORT = qw/
PROLOG_RESP_BREAK
PROLOG_RESP_STOP
PROLOG_RESP_SEND
OPTION_TYPE_SYNC
OPTION_TYPE_ASYNC
LOGPATH
CHECKSUM_MAX_VALUE
DUP_HOSTNAME_FL
DUP_SERIAL_FL
DUP_MACADDR_FL
DUP_SMODEL_FL
DUP_UUID_FL
DUP_ASSETTAG_FL
PROLOG_STOP
PROLOG_CONTINUE
INVENTORY_STOP
INVENTORY_CONTINUE
BAD_USERAGENT
/;
use constant PROLOG_RESP_BREAK => 0;
use constant PROLOG_RESP_STOP => 1;
use constant PROLOG_RESP_SEND => 2;
use constant OPTION_TYPE_SYNC => 0;
use constant OPTION_TYPE_ASYNC => 1;
my $checksum_max_value = &get_checksum();
use constant CHECKSUM_MAX_VALUE => $checksum_max_value;
# To enable user to set how auto-duplicates works
use constant DUP_HOSTNAME_FL => 1 ;
use constant DUP_SERIAL_FL => 2 ;
use constant DUP_MACADDR_FL => 4 ;
use constant DUP_SMODEL_FL => 8 ;
use constant DUP_UUID_FL => 16 ;
use constant DUP_ASSETTAG_FL => 32 ;
use constant PROLOG_STOP => 1;
use constant BAD_USERAGENT => 2;
use constant PROLOG_CONTINUE => 0;
use constant INVENTORY_STOP => 1;
use constant INVENTORY_CONTINUE => 0;
sub get_checksum {
my $checksum;
for my $section (keys %DATA_MAP){
$checksum|=$DATA_MAP{$section}->{mask};
}
return $checksum;
}
1;
|