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
|
package Ocsinventory::Agent::Backend::OS::MacOS::Camera;
use strict;
sub check {
return(undef) unless -r '/usr/sbin/system_profiler'; # check perms
return 1;
}
sub run {
my $params = shift;
my $common = $params->{common};
# create profiler obj, bail if datatype fails
my $data = $common->get_sysprofile_devices_names('SPCameraDataType');
return(undef) unless(ref($data) eq 'ARRAY');
# add sound cards
foreach my $cam (@$data){
$common->addCamera({
'MODEL' => $cam,
'UUID' => $cam,
});
}
}
1;
|
