Heray-Was-Here
Server : Apache
System : Linux vps103298.mylogin.co 4.18.0-513.11.1.el8_9.x86_64 #1 SMP Wed Jan 17 02:00:40 EST 2024 x86_64
User : calvet ( 273824)
PHP Version : 7.4.33
Disable Function : NONE
Directory :  /proc/thread-self/root/usr/share/perl5/vendor_perl/Ocsinventory/Agent/Backend/OS/MacOS/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Current File : //proc/thread-self/root/usr/share/perl5/vendor_perl/Ocsinventory/Agent/Backend/OS/MacOS/CPU.pm
package Ocsinventory::Agent::Backend::OS::MacOS::CPU;
use strict;

sub check {
    my $params = shift;
    my $common = $params->{common};
    return(undef) unless -r '/usr/sbin/system_profiler';
    return(undef) unless $common->can_load("Mac::SysProfile");
    return 1;
}

sub run {
    my $params = shift;
    my $common = $params->{common};
    my $processors;
    my $arch;
    my $datawidth;


    # 32 or 64 bits arch?
    my $sysctl_arch = `sysctl -n hw.cpu64bit_capable`;
    if ($sysctl_arch == 1){
       $arch = "x86_64";
       $datawidth = 64;
    } else {
       $arch = "x86";
       $datawidth = 32;
    }

    my $arm64 = `sysctl -n hw.optional.arm64`;
    if ($arm64 == 1){
       $arch = "arm64";
       $datawidth = 64;
    }


    # How much processor socket ?
    my $ncpu=`sysctl -n hw.packages`;

    # For each processor socket 
    foreach my $cpu (1..$ncpu) {
        $processors->{$cpu}->{MANUFACTURER} =  `sysctl -n machdep.cpu.vendor`;
        if ($processors->{$cpu}->{MANUFACTURER} =~ /(Authentic|Genuine|)(.+)/i) {
            $processors->{$cpu}->{MANUFACTURER} = $2;
        }
        chomp($processors->{$cpu}->{MANUFACTURER} );
        $processors->{$cpu}->{TYPE} = `sysctl -n machdep.cpu.brand_string`;
        chomp($processors->{$cpu}->{TYPE} );
        $processors->{$cpu}->{SPEED} = `sysctl -n hw.cpufrequency` / 1000 / 1000;
        $processors->{$cpu}->{L2CACHESIZE} = `sysctl -n hw.l2cachesize` / 1024;
        $processors->{$cpu}->{CORES} = `sysctl -n machdep.cpu.core_count`;
        chomp($processors->{$cpu}->{CORES});
        $processors->{$cpu}->{THREADS} = `sysctl -n machdep.cpu.thread_count`;
        chomp($processors->{$cpu}->{THREADS});
        $processors->{$cpu}->{LOGICAL_CPUS} = `sysctl -n machdep.cpu.logical_per_package`;
        chomp($processors->{$cpu}->{LOGICAL_CPUS});
        $processors->{$cpu}->{CPUARCH} = $arch;
        $processors->{$cpu}->{DATA_WIDTH} = $datawidth;
        $processors->{$cpu}->{NBSOCKET} = $cpu;
        chomp($processors->{$cpu}->{NBSOCKET});
        $processors->{$cpu}->{SERIALNUMBER} = "N/A";
    }
    
    # Add new cpu infos to inventory
    foreach (keys %{$processors}){
	    $common->addCPU($processors->{$_});
    }
}
1;

Hry