pts-core: Cache reading of hw_cpu_core_count() since that shouldn't

change while pts-core is running

2 files changed, 38 insertions, 23 deletions

diff --git a/pts-core/functions/pts-functions_system_cpu.php b/pts-core/functions/pts-functions_system_cpu.php
index e099a34..494d781 100644
--- a/pts-core/functions/pts-functions_system_cpu.php
+++ b/pts-core/functions/pts-functions_system_cpu.php
@@ -24,34 +24,43 @@
 function hw_cpu_core_count()
 {
 	// Returns number of cores present on the system
-	$info = null;
+	static $core_count = 0;
 
-	if(IS_LINUX)
+	if($core_count == 0)
 	{
-		$processors = read_cpuinfo("processor");
-		$info = count($processors);
-	}
-	else if(IS_SOLARIS)
-	{
-		$info = trim(shell_exec("psrinfo"));
-		$info = explode("\n", $info);
-		$info = count($info);
-	}
-	else if(IS_BSD)
-	{
-		$info = read_sysctl("hw.ncpu");
-	}
-	else if(IS_MACOSX)
-	{
-		$info = read_osx_system_profiler("SPHardwareDataType", "TotalNumberOfCores");	
-	}
+		$info = 0;
 
-	if(empty($info))
-	{
-		$info = 1;
+		if(IS_LINUX)
+		{
+			$processors = read_cpuinfo("processor");
+			$info = count($processors);
+		}
+		else if(IS_SOLARIS)
+		{
+			$info = trim(shell_exec("psrinfo"));
+			$info = explode("\n", $info);
+			$info = count($info);
+		}
+		else if(IS_BSD)
+		{
+			$info = read_sysctl("hw.ncpu");
+		}
+		else if(IS_MACOSX)
+		{
+			$info = read_osx_system_profiler("SPHardwareDataType", "TotalNumberOfCores");	
+		}
+
+		if(is_int($info) && $info > 0)
+		{
+			$core_count = $info;
+		}
+		else
+		{
+			$core_count = 1;
+		}
 	}
 
-	return $info;
+	return $core_count;
 }
 function hw_cpu_job_count()
 {
diff --git a/pts-core/objects/pts_module.php b/pts-core/objects/pts_module.php
index 084332e..c93aa4d 100644
--- a/pts-core/objects/pts_module.php
+++ b/pts-core/objects/pts_module.php
@@ -123,6 +123,12 @@ class pts_module
 
 		return $file;		
 	}
+	public static function is_file($file)
+	{
+		$file = self::save_dir() . $file;
+
+		return is_file($file);
+	}
 	public static function remove_file($file)
 	{
 		$file = self::save_dir() . $file;