Public Member Functions
	__construct ($args)
	processWindow ($window, $id, $ctrl, $param1, $param2)

Data Fields
const	GAUGE_OTHERS = 19
const	GAUGE_SERVICES = 5

Private Member Functions
	changePath ()
	checkApacheServiceWithTimeout ($service)
	checkBinsRegKey ()
	checkBrowser ()
	checkLaunchStartup ()
	checkMySQLServiceWithTimeout ($service, $bin)
	checkPath ()
	checkPathRegKey ()
	checkSystemPathRegKey ()
	cleanOldBehaviors ()
	cleanTmpFolders ()
	createSslCrts ()
	installServices ()
	installServicesSequential ($bearsamppBins, $bearsamppLang)
	killOldInstances ()
	prepareService ($sName, $service, $bearsamppBins, $bearsamppLang, $currentIndex=0, $totalCount=0)
	refreshAliases ()
	refreshGitRepos ()
	refreshHostname ()
	refreshVhosts ()
	rotationLogs ()
	savePath ()
	scanFolders ()
	sysInfos ()
	updateConfig ()
	writeLog ($log)

Private Attributes
	$error
	$filesToScan
	$restart
	$rootPath
	$splash
	$startTime

Detailed Description

Class ActionStartup Handles the startup process of the Bearsampp application, including initializing services, cleaning temporary files, refreshing configurations, and more.

Definition at line 16 of file class.action.startup.php.

Constructor & Destructor Documentation

◆ __construct()

__construct ( $args )

ActionStartup constructor. Initializes the startup process, including the splash screen and various configurations.

Parameters

array $args Command line arguments.

Definition at line 35 of file class.action.startup.php.

    {
        global $bearsamppRoot, $bearsamppCore, $bearsamppLang, $bearsamppBins, $bearsamppWinbinder;
        $this->writeLog( 'Starting ' . APP_TITLE );
 
        // Init
        $this->splash    = new Splash();
        $this->restart   = false;
        $this->startTime = Util::getMicrotime();
        $this->error     = '';
 
        $this->rootPath    = $bearsamppRoot->getRootPath();
        $this->filesToScan = array();
 
        $gauge = self::GAUGE_SERVICES * count( $bearsamppBins->getServices() );
        $gauge += self::GAUGE_OTHERS + 1;
 
        // Start splash screen
        $this->splash->init(
            $bearsamppLang->getValue( Lang::STARTUP ),
            $gauge,
            sprintf( $bearsamppLang->getValue( Lang::STARTUP_STARTING_TEXT ), APP_TITLE . ' ' . $bearsamppCore->getAppVersion() )
        );
 
        $bearsamppWinbinder->setHandler( $this->splash->getWbWindow(), $this, 'processWindow', 1000 );
        $bearsamppWinbinder->mainLoop();
        $bearsamppWinbinder->reset();
    }

References $bearsamppBins, $bearsamppCore, $bearsamppLang, $bearsamppRoot, APP_TITLE, Util\getMicrotime(), Lang\STARTUP, Lang\STARTUP_STARTING_TEXT, and writeLog().

Member Function Documentation

◆ changePath()

changePath ( )

private

Changes the application path and logs the number of files and occurrences changed.

Definition at line 706 of file class.action.startup.php.

    {
        global $bearsamppLang;
 
        $this->splash->setTextLoading( sprintf( $bearsamppLang->getValue( Lang::STARTUP_CHANGE_PATH_TEXT ), $this->rootPath ) );
        $this->splash->incrProgressBar();
 
        $result = Util::changePath( $this->filesToScan, $this->rootPath );
        $this->writeLog( 'Nb files changed: ' . $result['countChangedFiles'] );
        $this->writeLog( 'Nb occurences changed: ' . $result['countChangedOcc'] );
    }

References $bearsamppLang, $result, Util\changePath(), Lang\STARTUP_CHANGE_PATH_TEXT, and writeLog().

Referenced by processWindow().

◆ checkApacheServiceWithTimeout()

checkApacheServiceWithTimeout ( $service )

private

Specialized method to check Apache service with timeout protection. Apache service checks can sometimes hang, so this method provides a safer way to check.

Parameters

object $service The Apache service object

Returns: mixed Service info array or false if service not installed or check timed out

Definition at line 1205 of file class.action.startup.php.

    {
        Util::logTrace('Starting specialized Apache service check with timeout protection');
 
        // Set a timeout for the Apache service check
        $serviceCheckStartTime = microtime(true);
        $serviceCheckTimeout = 10; // 10 seconds timeout
 
        try {
            // Use a non-blocking approach to check service
            $serviceInfos = false;
 
            // First try a quick check if the service exists in the list
            $serviceList = Win32Service::getServices();
            if (is_array($serviceList) && isset($serviceList[$service->getName()])) {
                Util::logTrace('Apache service found in service list, getting details');
 
                // Service exists, now try to get its details with timeout protection
                $startTime = microtime(true);
                $serviceInfos = $service->infos();
 
                // Check if we've exceeded our timeout
                if (microtime(true) - $serviceCheckStartTime > $serviceCheckTimeout) {
                    Util::logTrace("Apache service check timeout exceeded, assuming service needs reinstall");
                    return false;
                }
            } else {
                Util::logTrace('Apache service not found in service list');
                return false;
            }
 
            return $serviceInfos;
        } catch (\Exception $e) {
            Util::logTrace("Exception during Apache service check: " . $e->getMessage());
            return false;
        } catch (\Throwable $e) {
            Util::logTrace("Throwable during Apache service check: " . $e->getMessage());
            return false;
        }
    }

References $startTime, and Util\logTrace().

Referenced by prepareService().

◆ checkBinsRegKey()

checkBinsRegKey ( )

private

Checks and updates the application bins registry key. If the current registry key does not match the generated key, it updates the registry key. Logs the current and generated registry keys. Sets an error message if the registry key update fails. Sets a restart flag if the registry key is updated.

Definition at line 765 of file class.action.startup.php.

    {
        global $bearsamppLang, $bearsamppRegistry;
 
        $this->splash->setTextLoading( sprintf( $bearsamppLang->getValue( Lang::STARTUP_REGISTRY_TEXT ), Registry::APP_BINS_REG_ENTRY ) );
        $this->splash->incrProgressBar();
 
        $currentAppBinsRegKey = Util::getAppBinsRegKey();
        $genAppBinsRegKey     = Util::getAppBinsRegKey( false );
        $this->writeLog( 'Current app bins reg key: ' . $currentAppBinsRegKey );
        $this->writeLog( 'Gen app bins reg key: ' . $genAppBinsRegKey );
        if ( $currentAppBinsRegKey != $genAppBinsRegKey ) {
            if ( !Util::setAppBinsRegKey( $genAppBinsRegKey ) ) {
                if ( !empty( $this->error ) ) {
                    $this->error .= PHP_EOL . PHP_EOL;
                }
                $this->error .= sprintf( $bearsamppLang->getValue( Lang::STARTUP_REGISTRY_ERROR_TEXT ), Registry::APP_BINS_REG_ENTRY );
                $this->error .= PHP_EOL . $bearsamppRegistry->getLatestError();
            }
            else {
                $this->writeLog( 'Need restart: checkBinsRegKey' );
                $this->restart = true;
            }
        }
    }

References $bearsamppLang, Registry\APP_BINS_REG_ENTRY, Util\getAppBinsRegKey(), Util\setAppBinsRegKey(), Lang\STARTUP_REGISTRY_ERROR_TEXT, Lang\STARTUP_REGISTRY_TEXT, and writeLog().

Referenced by processWindow().

◆ checkBrowser()

checkBrowser ( )

private

Checks and sets the default browser configuration.

Definition at line 595 of file class.action.startup.php.

    {
        global $bearsamppConfig, $bearsamppLang;
 
        $this->splash->setTextLoading( $bearsamppLang->getValue( Lang::STARTUP_CHECK_BROWSER_TEXT ) );
        $this->splash->incrProgressBar();
        $this->writeLog( 'Check browser' );
 
        $currentBrowser = $bearsamppConfig->getBrowser();
        if ( empty( $currentBrowser ) || !file_exists( $currentBrowser ) ) {
            $bearsamppConfig->replace( Config::CFG_BROWSER, Vbs::getDefaultBrowser() );
        }
    }

References $bearsamppConfig, $bearsamppLang, Config\CFG_BROWSER, Vbs\getDefaultBrowser(), Lang\STARTUP_CHECK_BROWSER_TEXT, and writeLog().

Referenced by processWindow().

◆ checkLaunchStartup()

checkLaunchStartup ( )

private

Checks and sets the launch startup configuration.

Definition at line 578 of file class.action.startup.php.

    {
        global $bearsamppConfig;
 
        $this->writeLog( 'Check launch startup' );
 
        if ( $bearsamppConfig->isLaunchStartup() ) {
            Util::enableLaunchStartup();
        }
        else {
            Util::disableLaunchStartup();
        }
    }

References $bearsamppConfig, Util\disableLaunchStartup(), Util\enableLaunchStartup(), and writeLog().

Referenced by processWindow().

◆ checkMySQLServiceWithTimeout()

checkMySQLServiceWithTimeout	(		$service,
			$bin )

private

Specialized method to check MySQL service with timeout protection. MySQL service checks can sometimes hang, so this method provides a safer way to check.

Parameters

object	$service	The MySQL service object
object	$bin	The MySQL bin object

Returns: mixed Service info array or false if service not installed or check timed out

Definition at line 1254 of file class.action.startup.php.

    {
        Util::logTrace('Starting specialized MySQL service check with timeout protection');
 
        // Set a timeout for the MySQL service check
        $serviceCheckStartTime = microtime(true);
        $serviceCheckTimeout = 8; // 8 seconds timeout
 
        try {
            // Use a non-blocking approach to check service
            $serviceInfos = false;
 
            // First check if the service exists in the list
            $serviceList = Win32Service::getServices();
            if (is_array($serviceList) && isset($serviceList[$service->getName()])) {
                Util::logTrace('MySQL service found in service list, getting details');
 
                // Service exists, now try to get its details with timeout protection
                $serviceInfos = $service->infos();
 
                // Check if we've exceeded our timeout
                if (microtime(true) - $serviceCheckStartTime > $serviceCheckTimeout) {
                    Util::logTrace("MySQL service check timeout exceeded, assuming service needs reinstall");
                    return false;
                }
            } else {
                Util::logTrace('MySQL service not found in service list');
                return false;
            }
 
            return $serviceInfos;
        } catch (\Exception $e) {
            Util::logTrace("Exception during MySQL service check: " . $e->getMessage());
            return false;
        } catch (\Throwable $e) {
            Util::logTrace("Throwable during MySQL service check: " . $e->getMessage());
            return false;
        }
    }

References Util\logTrace().

Referenced by prepareService().

◆ checkPath()

checkPath ( )

private

Checks the application path and logs the last path content.

Definition at line 654 of file class.action.startup.php.

    {
        global $bearsamppCore, $bearsamppLang;
 
        $this->splash->setTextLoading( $bearsamppLang->getValue( Lang::STARTUP_CHECK_PATH_TEXT ) );
        $this->splash->incrProgressBar();
 
        $this->writeLog( 'Last path: ' . $bearsamppCore->getLastPathContent() );
    }

References $bearsamppCore, $bearsamppLang, Lang\STARTUP_CHECK_PATH_TEXT, and writeLog().

Referenced by processWindow().

◆ checkPathRegKey()

checkPathRegKey ( )

private

Checks and updates the application path registry key.

Definition at line 732 of file class.action.startup.php.

    {
        global $bearsamppRoot, $bearsamppLang, $bearsamppRegistry;
 
        $this->splash->setTextLoading( sprintf( $bearsamppLang->getValue( Lang::STARTUP_REGISTRY_TEXT ), Registry::APP_PATH_REG_ENTRY ) );
        $this->splash->incrProgressBar();
 
        $currentAppPathRegKey = Util::getAppPathRegKey();
        $genAppPathRegKey     = Util::formatWindowsPath( $bearsamppRoot->getRootPath() );
        $this->writeLog( 'Current app path reg key: ' . $currentAppPathRegKey );
        $this->writeLog( 'Gen app path reg key: ' . $genAppPathRegKey );
        if ( $currentAppPathRegKey != $genAppPathRegKey ) {
            if ( !Util::setAppPathRegKey( $genAppPathRegKey ) ) {
                if ( !empty( $this->error ) ) {
                    $this->error .= PHP_EOL . PHP_EOL;
                }
                $this->error .= sprintf( $bearsamppLang->getValue( Lang::STARTUP_REGISTRY_ERROR_TEXT ), Registry::APP_PATH_REG_ENTRY );
                $this->error .= PHP_EOL . $bearsamppRegistry->getLatestError();
            }
            else {
                $this->writeLog( 'Need restart: checkPathRegKey' );
                $this->restart = true;
            }
        }
    }

References $bearsamppLang, $bearsamppRoot, Registry\APP_PATH_REG_ENTRY, Util\formatWindowsPath(), Util\getAppPathRegKey(), Util\setAppPathRegKey(), Lang\STARTUP_REGISTRY_ERROR_TEXT, Lang\STARTUP_REGISTRY_TEXT, and writeLog().

Referenced by processWindow().

◆ checkSystemPathRegKey()

checkSystemPathRegKey ( )

private

Checks and updates the system PATH registry key. Ensures the application bins registry entry is at the beginning of the system PATH. Logs the current and new system PATH. Sets an error message if the system PATH update fails. Sets a restart flag if the system PATH is updated.

Definition at line 798 of file class.action.startup.php.

    {
        global $bearsamppLang, $bearsamppRegistry;
 
        $this->splash->setTextLoading( sprintf( $bearsamppLang->getValue( Lang::STARTUP_REGISTRY_TEXT ), Registry::SYSPATH_REG_ENTRY ) );
        $this->splash->incrProgressBar();
 
        $currentSysPathRegKey = Util::getSysPathRegKey();
        $this->writeLog( 'Current system PATH: ' . $currentSysPathRegKey );
 
        $newSysPathRegKey = str_replace( '%' . Registry::APP_BINS_REG_ENTRY . '%;', '', $currentSysPathRegKey );
        $newSysPathRegKey = str_replace( '%' . Registry::APP_BINS_REG_ENTRY . '%', '', $newSysPathRegKey );
        $newSysPathRegKey = '%' . Registry::APP_BINS_REG_ENTRY . '%;' . $newSysPathRegKey;
        $this->writeLog( 'New system PATH: ' . $newSysPathRegKey );
 
        if ( $currentSysPathRegKey != $newSysPathRegKey ) {
            if ( !Util::setSysPathRegKey( $newSysPathRegKey ) ) {
                if ( !empty( $this->error ) ) {
                    $this->error .= PHP_EOL . PHP_EOL;
                }
                $this->error .= sprintf( $bearsamppLang->getValue( Lang::STARTUP_REGISTRY_ERROR_TEXT ), Registry::SYSPATH_REG_ENTRY );
                $this->error .= PHP_EOL . $bearsamppRegistry->getLatestError();
            }
            else {
                $this->writeLog( 'Need restart: checkSystemPathRegKey' );
                $this->restart = true;
            }
        }
        else {
            $this->writeLog( 'Refresh system PATH: ' . $currentSysPathRegKey );
            Util::setSysPathRegKey( str_replace( '%' . Registry::APP_BINS_REG_ENTRY . '%', '', $currentSysPathRegKey ) );
            Util::setSysPathRegKey( $currentSysPathRegKey );
        }
    }

References $bearsamppLang, Registry\APP_BINS_REG_ENTRY, Util\getSysPathRegKey(), Util\setSysPathRegKey(), Lang\STARTUP_REGISTRY_ERROR_TEXT, Lang\STARTUP_REGISTRY_TEXT, Registry\SYSPATH_REG_ENTRY, and writeLog().

Referenced by processWindow().

◆ cleanOldBehaviors()

cleanOldBehaviors ( )

private

Cleans old behaviors by removing outdated registry entries.

Definition at line 509 of file class.action.startup.php.

    {
        global $bearsamppLang, $bearsamppRegistry;
 
        $this->writeLog( 'Clean old behaviors' );
 
        $this->splash->setTextLoading( $bearsamppLang->getValue( Lang::STARTUP_CLEAN_OLD_BEHAVIORS_TEXT ) );
        $this->splash->incrProgressBar();
 
        // App >= 1.0.13
        $bearsamppRegistry->deleteValue(
            Registry::HKEY_LOCAL_MACHINE,
            'SOFTWARE\Microsoft\Windows\CurrentVersion\Run',
            APP_TITLE
        );
    }

References $bearsamppLang, APP_TITLE, Registry\HKEY_LOCAL_MACHINE, Lang\STARTUP_CLEAN_OLD_BEHAVIORS_TEXT, and writeLog().

Referenced by processWindow().

◆ cleanTmpFolders()

cleanTmpFolders ( )

private

Cleans temporary folders by removing unnecessary files.

Definition at line 479 of file class.action.startup.php.

    {
        global $bearsamppRoot, $bearsamppLang, $bearsamppCore;
 
        $this->splash->setTextLoading( $bearsamppLang->getValue( Lang::STARTUP_CLEAN_TMP_TEXT ) );
        $this->splash->incrProgressBar();
 
        $this->writeLog( 'Clear tmp folders' );
        Util::clearFolder( $bearsamppRoot->getTmpPath(), array('cachegrind', 'composer', 'openssl', 'mailpit', 'xlight', 'npm-cache', 'pip', 'opcache', '.gitignore') );
        Util::clearFolder( $bearsamppCore->getTmpPath(), array('.gitignore') );
 
        // Ensure opcache directory exists for persistent file cache
        $opcachePath = $bearsamppRoot->getTmpPath() . DIRECTORY_SEPARATOR . 'opcache';
 
        if (!is_dir($opcachePath)) {
            $this->writeLog('Creating opcache directory: ' . $opcachePath);
            if (!@mkdir($opcachePath, 0755, true) && !is_dir($opcachePath)) {
                $this->writeLog('Failed to create opcache directory: ' . $opcachePath);
                return;
            }
        }
 
        if (!is_writable($opcachePath)) {
            $this->writeLog('Opcache directory is not writable: ' . $opcachePath);
        }
    }

References $bearsamppCore, $bearsamppLang, $bearsamppRoot, Util\clearFolder(), Lang\STARTUP_CLEAN_TMP_TEXT, and writeLog().

Referenced by processWindow().

◆ createSslCrts()

createSslCrts ( )

private

Creates SSL certificates if they do not already exist. Logs the creation process.

Definition at line 854 of file class.action.startup.php.

    {
        global $bearsamppLang, $bearsamppOpenSsl;
 
        $this->splash->incrProgressBar();
        if ( !$bearsamppOpenSsl->existsCrt( 'localhost' ) ) {
            $this->splash->setTextLoading( sprintf( $bearsamppLang->getValue( Lang::STARTUP_GEN_SSL_CRT_TEXT ), 'localhost' ) );
            $bearsamppOpenSsl->createCrt( 'localhost' );
        }
    }

References $bearsamppLang, and Lang\STARTUP_GEN_SSL_CRT_TEXT.

Referenced by processWindow().

◆ installServices()

installServices ( )

private

Installs and starts services for the application. Checks if services are already installed and updates them if necessary. Logs the installation process and any errors encountered.

Uses optimized service checking and starting methods.

Definition at line 873 of file class.action.startup.php.

    {
        global $bearsamppLang, $bearsamppBins, $bearsamppRoot;
 
        Util::logTrace('Starting installServices method');
 
        if (!$this->restart) {
            Util::logTrace('Normal startup mode - processing services');
 
            // Service Installation
            $this->installServicesSequential($bearsamppBins, $bearsamppLang);
        } else {
            Util::logTrace('Restart mode - skipping service installation');
            $this->splash->incrProgressBar(self::GAUGE_SERVICES * count($bearsamppBins->getServices()));
        }
 
        Util::logTrace('Completed installServices method');
    }

References $bearsamppBins, $bearsamppLang, $bearsamppRoot, installServicesSequential(), and Util\logTrace().

Referenced by processWindow().

◆ installServicesSequential()

installServicesSequential	(		$bearsamppBins,
			$bearsamppLang )

private

Service Installation Installs and starts services sequentially with proper progress tracking. Ensures exactly GAUGE_SERVICES (5) progress steps per service.

Parameters

object	$bearsamppBins	The bins object
object	$bearsamppLang	The language object

Definition at line 900 of file class.action.startup.php.

    {
        Util::logTrace('Starting sequential service installation');
        $installStartTime = Util::getMicrotime();
 
        // Step 1: Check and prepare all services
        $servicesToStart = [];
        $serviceErrors = [];
 
        $totalServiceCount = count($bearsamppBins->getServices());
        $currentServiceIndex = 0;
 
        foreach ($bearsamppBins->getServices() as $sName => $service) {
            $currentServiceIndex++;
 
            Util::logTrace('Preparing service: ' . $sName);
 
            // prepareService() increments 1 step
            $serviceInfo = $this->prepareService($sName, $service, $bearsamppBins, $bearsamppLang, $currentServiceIndex, $totalServiceCount);
 
            if ($serviceInfo['restart']) {
                $this->writeLog('Need restart: installService ' . $serviceInfo['bin']->getName());
                Util::logTrace('Restart required for service: ' . $serviceInfo['bin']->getName());
                $this->restart = true;
                // prepareService used 1 step, need 4 more to reach GAUGE_SERVICES (5 total)
                $this->splash->incrProgressBar(self::GAUGE_SERVICES - 1);
                continue;
            }
 
            if (!empty($serviceInfo['error'])) {
                $serviceErrors[$sName] = $serviceInfo;
                // prepareService used 1 step, need 4 more to reach GAUGE_SERVICES (5 total)
                $this->splash->incrProgressBar(self::GAUGE_SERVICES - 1);
                continue;
            }
 
            if ($serviceInfo['needsStart']) {
                $servicesToStart[$sName] = $serviceInfo;
            } else {
                // Service already running or doesn't need to start
                // prepareService used 1 step, need 4 more to reach GAUGE_SERVICES (5 total)
                $this->splash->incrProgressBar(self::GAUGE_SERVICES - 1);
            }
        }
 
        // Step 2: Start all services sequentially with progress updates
        if (!empty($servicesToStart)) {
            Util::logTrace('Starting ' . count($servicesToStart) . ' services sequentially');
 
            $serviceCount = 0;
            $totalServices = count($servicesToStart);
 
            foreach ($servicesToStart as $sName => $serviceInfo) {
                $serviceCount++;
                $name = $serviceInfo['name'];
                $service = $serviceInfo['service'];
 
                // Update splash before starting (1 step - 2nd of 5)
                $this->splash->setTextLoading('Starting ' . $name . ' (' . $serviceCount . '/' . $totalServices . ')');
                $this->splash->incrProgressBar();
 
                Util::logTrace('Starting service: ' . $sName);
                $serviceStartTime = Util::getMicrotime();
 
                // Start the service
                $success = $service->start();
 
                $duration = round(Util::getMicrotime() - $serviceStartTime, 3);
 
                if ($success) {
                    $this->writeLog($name . ' service started in ' . $duration . 's');
                    Util::logTrace('Service ' . $name . ' started successfully in ' . $duration . ' seconds');
 
                    // Update splash after successful start
                    $this->splash->setTextLoading($name . ' started successfully');
                } else {
                    $error = $service->getError();
                    if (empty($error)) {
                        $error = 'Failed to start service';
                    }
 
                    $serviceErrors[$sName] = $serviceInfo;
                    $serviceErrors[$sName]['error'] = $error;
                    Util::logTrace('Service ' . $name . ' failed to start: ' . $error);
 
                    // Run syntax check if available
                    if (!empty($serviceInfo['syntaxCheckCmd'])) {
                        try {
                            $cmdSyntaxCheck = $serviceInfo['bin']->getCmdLineOutput($serviceInfo['syntaxCheckCmd']);
                            if (!$cmdSyntaxCheck['syntaxOk']) {
                                $serviceErrors[$sName]['error'] .= PHP_EOL . 'Syntax error: ' . $cmdSyntaxCheck['content'];
                            }
                        } catch (\Exception $e) {
                            // Ignore syntax check errors
                        }
                    }
                }
 
                // Complete remaining steps: prepareService=1, pre-start=1, now add 3 more = 5 total
                $this->splash->incrProgressBar(self::GAUGE_SERVICES - 2);
            }
        }
 
        // Step 3: Report any errors
        foreach ($serviceErrors as $sName => $serviceInfo) {
            if (!empty($serviceInfo['error'])) {
                Util::logTrace('Service error occurred for ' . $sName . ': ' . $serviceInfo['error']);
                if (!empty($this->error)) {
                    $this->error .= PHP_EOL . PHP_EOL;
                }
                $this->error .= sprintf($bearsamppLang->getValue(Lang::STARTUP_SERVICE_ERROR), $serviceInfo['name']) . PHP_EOL . $serviceInfo['error'];
            }
        }
 
        $installDuration = round(Util::getMicrotime() - $installStartTime, 3);
        $this->writeLog('Service installation completed in ' . $installDuration . 's');
        Util::logTrace('Service installation completed in ' . $installDuration . ' seconds');
    }

References $bearsamppBins, $bearsamppLang, $error, Util\getMicrotime(), Util\logTrace(), prepareService(), Lang\STARTUP_SERVICE_ERROR, and writeLog().

Referenced by installServices().

◆ killOldInstances()

killOldInstances ( )

private

Kills old instances of Bearsampp processes.

Definition at line 529 of file class.action.startup.php.

    {
        global $bearsamppLang;
 
        $this->splash->setTextLoading( $bearsamppLang->getValue( Lang::STARTUP_KILL_OLD_PROCS_TEXT ) );
        $this->splash->incrProgressBar();
 
        // Stop services
        /*foreach ($bearsamppBins->getServices() as $sName => $service) {
            $serviceInfos = $service->infos();
            if ($serviceInfos === false) {
                continue;
            }
            $service->stop();
        }*/
 
        // Stop third party procs
        $procsKilled = Win32Ps::killBins();
        if ( !empty( $procsKilled ) ) {
            $this->writeLog( 'Procs killed:' );
            $procsKilledSort = array();
            foreach ( $procsKilled as $proc ) {
                $unixExePath       = Util::formatUnixPath( $proc[Win32Ps::EXECUTABLE_PATH] );
                $procsKilledSort[] = '-> ' . basename( $unixExePath ) . ' (PID ' . $proc[Win32Ps::PROCESS_ID] . ') in ' . $unixExePath;
            }
            sort( $procsKilledSort );
            foreach ( $procsKilledSort as $proc ) {
                $this->writeLog( $proc );
            }
        }
    }

References $bearsamppLang, $proc, Win32Ps\EXECUTABLE_PATH, Util\formatUnixPath(), Win32Ps\killBins(), Win32Ps\PROCESS_ID, Lang\STARTUP_KILL_OLD_PROCS_TEXT, and writeLog().

Referenced by processWindow().

◆ prepareService()

prepareService	(	$sName,
		$service,
		$bearsamppBins,
		$bearsamppLang,
		$currentIndex = 0,
		$totalCount = 0 )

private

Prepares a service for startup (check, install if needed, but don't start yet)

Parameters

string	$sName	Service name
object	$service	Service object
object	$bearsamppBins	Bins object
object	$bearsamppLang	Language object
int	$currentIndex	Current service index
int	$totalCount	Total service count

Returns: array Service information array

Definition at line 1030 of file class.action.startup.php.

    {
        $serviceInfo = [
            'sName' => $sName,
            'service' => $service,
            'bin' => null,
            'name' => '',
            'port' => 0,
            'syntaxCheckCmd' => null,
            'error' => '',
            'restart' => false,
            'needsStart' => false,
            'startTime' => Util::getMicrotime()
        ];
 
        // Identify service type and get bin
        $syntaxCheckCmd = null;
        $bin = null;
        $port = 0;
 
        if ($sName == BinMailpit::SERVICE_NAME) {
            $bin = $bearsamppBins->getMailpit();
            $port = $bearsamppBins->getMailpit()->getSmtpPort();
        } elseif ($sName == BinMemcached::SERVICE_NAME) {
            $bin = $bearsamppBins->getMemcached();
            $port = $bearsamppBins->getMemcached()->getPort();
        } elseif ($sName == BinApache::SERVICE_NAME) {
            $bin = $bearsamppBins->getApache();
            $port = $bearsamppBins->getApache()->getPort();
            $syntaxCheckCmd = BinApache::CMD_SYNTAX_CHECK;
        } elseif ($sName == BinMysql::SERVICE_NAME) {
            $bin = $bearsamppBins->getMysql();
            $port = $bearsamppBins->getMysql()->getPort();
            $syntaxCheckCmd = BinMysql::CMD_SYNTAX_CHECK;
 
            // Pre-initialize MySQL data if needed
            if (!file_exists($bin->getDataDir()) || count(glob($bin->getDataDir() . '/*')) === 0) {
                Util::logTrace('Pre-initializing MySQL data directory');
                $bin->initData();
            }
        } elseif ($sName == BinMariadb::SERVICE_NAME) {
            $bin = $bearsamppBins->getMariadb();
            $port = $bearsamppBins->getMariadb()->getPort();
            $syntaxCheckCmd = BinMariadb::CMD_SYNTAX_CHECK;
        } elseif ($sName == BinPostgresql::SERVICE_NAME) {
            $bin = $bearsamppBins->getPostgresql();
            $port = $bearsamppBins->getPostgresql()->getPort();
        } elseif ($sName == BinXlight::SERVICE_NAME) {
            $bin = $bearsamppBins->getXlight();
            $port = $bearsamppBins->getXlight()->getPort();
        }
 
        $name = $bin->getName() . ' ' . $bin->getVersion() . ' (' . $service->getName() . ')';
 
        $serviceInfo['bin'] = $bin;
        $serviceInfo['name'] = $name;
        $serviceInfo['port'] = $port;
        $serviceInfo['syntaxCheckCmd'] = $syntaxCheckCmd;
 
        // Update splash with current service being checked (1 step)
        if ($currentIndex > 0 && $totalCount > 0) {
            $this->splash->setTextLoading('Checking ' . $bin->getName() . ' service (' . $currentIndex . '/' . $totalCount . ')');
        }
        $this->splash->incrProgressBar();
 
        // Check if service is already installed
        $serviceAlreadyInstalled = false;
        $serviceToRemove = false;
 
        if ($sName == BinApache::SERVICE_NAME) {
            $serviceInfos = $this->checkApacheServiceWithTimeout($service);
        } else if ($sName == BinMysql::SERVICE_NAME) {
            $serviceInfos = $this->checkMySQLServiceWithTimeout($service, $bin);
            if ($serviceInfos === false && $service->isInstalled()) {
                Util::logTrace('MySQL service appears to be hanging, forcing restart');
                Win32Ps::killBins(['mysqld.exe']);
                $service->delete();
                $serviceToRemove = true;
            }
        } else {
            try {
                $serviceInfos = $service->infos();
            } catch (\Exception $e) {
                Util::logTrace("Exception during service check: " . $e->getMessage());
                $serviceInfos = false;
            } catch (\Throwable $e) {
                Util::logTrace("Throwable during service check: " . $e->getMessage());
                $serviceInfos = false;
            }
        }
 
        if ($serviceInfos !== false) {
            $serviceAlreadyInstalled = true;
            $this->writeLog($name . ' service already installed');
 
            // Check if service needs to be removed and reinstalled
            if ($sName == BinPostgresql::SERVICE_NAME) {
                $serviceGenPathName = trim(str_replace('"', '', $service->getBinPath()));
                $installedPathParts = explode(' ', $serviceInfos[Win32Service::VBS_PATH_NAME], 2);
                $serviceVbsPathName = trim(str_replace('"', '', $installedPathParts[0]));
            } else {
                $serviceGenPathName = trim(str_replace('"', '', $service->getBinPath() . ($service->getParams() ? ' ' . $service->getParams() : '')));
                $serviceVbsPathName = trim(str_replace('"', '', $serviceInfos[Win32Service::VBS_PATH_NAME]));
            }
 
            $normalizedGenPath = preg_replace('/\s+/', ' ', $serviceGenPathName);
            $normalizedVbsPath = preg_replace('/\s+/', ' ', $serviceVbsPathName);
 
            if ($normalizedGenPath !== $normalizedVbsPath && $serviceGenPathName != $serviceVbsPathName) {
                $serviceToRemove = true;
                $this->writeLog($name . ' service has to be removed');
            }
        }
 
        // Remove service if needed (no progress increment - part of check phase)
        if ($serviceToRemove) {
            if (!$service->delete()) {
                $serviceInfo['restart'] = true;
                return $serviceInfo;
            }
        }
 
        // Check port availability (no progress increment - part of check phase)
        $isPortInUse = Util::isPortInUse($port);
        if ($isPortInUse !== false) {
            // Port is in use - check if it's our service that's already running
            if ($service->isRunning()) {
                // Service is already running and owns the port - this is OK
                $this->writeLog($name . ' service already running on port ' . $port);
                Util::logTrace('Service ' . $name . ' already running - no need to start');
                $serviceInfo['needsStart'] = false;
                return $serviceInfo;
            }
 
            // Port is in use by something else - this is an error
            $serviceInfo['error'] = sprintf($bearsamppLang->getValue(Lang::STARTUP_SERVICE_PORT_ERROR), $port, $isPortInUse);
            return $serviceInfo;
        }
 
        // Install service if needed (no progress increment - part of check phase)
        if (!$serviceAlreadyInstalled || $serviceToRemove) {
            if (!$service->create()) {
                $serviceInfo['error'] = sprintf($bearsamppLang->getValue(Lang::STARTUP_SERVICE_CREATE_ERROR), $service->getError());
                return $serviceInfo;
            }
        }
 
        $serviceInfo['needsStart'] = true;
        return $serviceInfo;
    }

References $bearsamppBins, $bearsamppLang, $port, checkApacheServiceWithTimeout(), checkMySQLServiceWithTimeout(), BinApache\CMD_SYNTAX_CHECK, BinMariadb\CMD_SYNTAX_CHECK, BinMysql\CMD_SYNTAX_CHECK, Util\getMicrotime(), Util\isPortInUse(), Win32Ps\killBins(), Util\logTrace(), BinApache\SERVICE_NAME, BinMailpit\SERVICE_NAME, BinMariadb\SERVICE_NAME, BinMemcached\SERVICE_NAME, BinMysql\SERVICE_NAME, BinPostgresql\SERVICE_NAME, BinXlight\SERVICE_NAME, Lang\STARTUP_SERVICE_CREATE_ERROR, Lang\STARTUP_SERVICE_PORT_ERROR, Win32Service\VBS_PATH_NAME, and writeLog().

Referenced by installServicesSequential().

◆ processWindow()

processWindow	(	$window,
		$id,
		$ctrl,
		$param1,
		$param2 )

Processes the main window events during startup.

Parameters

mixed	$window	The window handle.
int	$id	The event ID.
mixed	$ctrl	The control that triggered the event.
mixed	$param1	Additional parameter 1.
mixed	$param2	Additional parameter 2.

Definition at line 73 of file class.action.startup.php.

    {
        global $bearsamppRoot, $bearsamppCore, $bearsamppLang, $bearsamppBins, $bearsamppTools, $bearsamppApps, $bearsamppWinbinder;
 
        Util::logTrace('Starting processWindow method');
 
        // Rotation logs
        Util::logTrace('Performing log rotation');
        $this->rotationLogs();
 
        // Clean
        Util::logTrace('Starting cleanup operations');
        $this->cleanTmpFolders();
        $this->cleanOldBehaviors();
 
        // List procs
        Util::logTrace('Listing running processes');
        if ($bearsamppRoot->getProcs() !== false) {
            $this->writeLog('List procs:');
            $listProcs = array();
            foreach ($bearsamppRoot->getProcs() as $proc) {
                $unixExePath = Util::formatUnixPath($proc[Win32Ps::EXECUTABLE_PATH]);
                $listProcs[] = '-> ' . basename($unixExePath) . ' (PID ' . $proc[Win32Ps::PROCESS_ID] . ') in ' . $unixExePath;
            }
            sort($listProcs);
            foreach ($listProcs as $proc) {
                $this->writeLog($proc);
            }
            Util::logTrace('Found ' . count($listProcs) . ' running processes');
        } else {
            Util::logTrace('No processes found or unable to retrieve process list');
        }
 
        // List modules
        Util::logTrace('Listing bins modules');
        $this->writeLog('List bins modules:');
        foreach ($bearsamppBins->getAll() as $module) {
            if (!$module->isEnable()) {
                $this->writeLog('-> ' . $module->getName() . ': ' . $bearsamppLang->getValue(Lang::DISABLED));
                Util::logTrace('Bin module ' . $module->getName() . ' is disabled');
            } else {
                $this->writeLog('-> ' . $module->getName() . ': ' . $module->getVersion() . ' (' . $module->getRelease() . ')');
                Util::logTrace('Bin module ' . $module->getName() . ': ' . $module->getVersion() . ' (' . $module->getRelease() . ')');
            }
        }
 
        Util::logTrace('Listing tools modules');
        $this->writeLog('List tools modules:');
        foreach ($bearsamppTools->getAll() as $module) {
            if (!$module->isEnable()) {
                $this->writeLog('-> ' . $module->getName() . ': ' . $bearsamppLang->getValue(Lang::DISABLED));
                Util::logTrace('Tool module ' . $module->getName() . ' is disabled');
            } else {
                $this->writeLog('-> ' . $module->getName() . ': ' . $module->getVersion() . ' (' . $module->getRelease() . ')');
                Util::logTrace('Tool module ' . $module->getName() . ': ' . $module->getVersion() . ' (' . $module->getRelease() . ')');
            }
        }
 
        Util::logTrace('Listing apps modules');
        $this->writeLog('List apps modules:');
        foreach ($bearsamppApps->getAll() as $module) {
            if (!$module->isEnable()) {
                $this->writeLog('-> ' . $module->getName() . ': ' . $bearsamppLang->getValue(Lang::DISABLED));
                Util::logTrace('App module ' . $module->getName() . ' is disabled');
            } else {
                $this->writeLog('-> ' . $module->getName() . ': ' . $module->getVersion() . ' (' . $module->getRelease() . ')');
                Util::logTrace('App module ' . $module->getName() . ': ' . $module->getVersion() . ' (' . $module->getRelease() . ')');
            }
        }
 
        // Kill old instances
        Util::logTrace('Killing old instances');
        $this->killOldInstances();
 
        // Prepare app
        Util::logTrace('Preparing application - refreshing hostname');
        $this->refreshHostname();
 
        Util::logTrace('Checking launch startup settings');
        $this->checkLaunchStartup();
 
        Util::logTrace('Checking browser configuration');
        $this->checkBrowser();
 
        Util::logTrace('Gathering system information');
        $this->sysInfos();
 
        Util::logTrace('Refreshing aliases');
        $this->refreshAliases();
 
        Util::logTrace('Refreshing virtual hosts');
        $this->refreshVhosts();
 
        // Check app path
        Util::logTrace('Checking application path');
        $this->checkPath();
 
        Util::logTrace('Scanning folders');
        $this->scanFolders();
 
        Util::logTrace('Changing paths in files');
        $this->changePath();
 
        Util::logTrace('Saving current path');
        $this->savePath();
 
        // Check BEARSAMPP_PATH, BEARSAMPP_BINS and System Path reg keys
        Util::logTrace('Checking PATH registry key');
        $this->checkPathRegKey();
 
        Util::logTrace('Checking BINS registry key');
        $this->checkBinsRegKey();
 
        Util::logTrace('Checking System PATH registry key');
        $this->checkSystemPathRegKey();
 
        // Update config
        Util::logTrace('Updating configuration');
        $this->updateConfig();
 
        // Create SSL certificates
        Util::logTrace('Creating SSL certificates');
        $this->createSslCrts();
 
        // Install
        Util::logTrace('Installing services');
        $this->installServices();
 
        // Actions if everything OK
        if (!$this->restart && empty($this->error)) {
            Util::logTrace('Startup completed successfully - refreshing Git repositories');
            $this->refreshGitRepos();
            $startupTime = round(Util::getMicrotime() - $this->startTime, 3);
            $this->writeLog('Started in ' . $startupTime . 's');
            Util::logTrace('Application started successfully in ' . $startupTime . ' seconds');
        } else {
            Util::logTrace('Startup issues detected - incrementing progress bar');
            $this->splash->incrProgressBar(2);
        }
 
        if ($this->restart) {
            Util::logTrace('Restart required - preparing to restart application');
            $this->writeLog(APP_TITLE . ' has to be restarted');
            $this->splash->setTextLoading(
                sprintf(
                    $bearsamppLang->getValue(Lang::STARTUP_PREPARE_RESTART_TEXT),
                    APP_TITLE . ' ' . $bearsamppCore->getAppVersion()
                )
            );
 
            Util::logTrace('Deleting all services before restart');
            foreach ($bearsamppBins->getServices() as $sName => $service) {
                Util::logTrace('Deleting service: ' . $sName);
                $service->delete();
            }
 
            Util::logTrace('Setting execution action to RESTART');
            $bearsamppCore->setExec(ActionExec::RESTART);
        }
 
        if (!empty($this->error)) {
            Util::logTrace('Errors occurred during startup: ' . $this->error);
            $this->writeLog('Error: ' . $this->error);
            $bearsamppWinbinder->messageBoxError($this->error, $bearsamppLang->getValue(Lang::STARTUP_ERROR_TITLE));
        }
 
        Util::logTrace('Starting loading screen');
        Util::startLoading();
 
        // Give the loading window time to initialize before we terminate this process
        Util::logTrace('Waiting for loading window to initialize');
        usleep(500000); // 500ms delay to allow loading window to start
 
        Util::logTrace('Loading process started');
 
        // Closing cli to finish startup
        Util::logTrace('Finishing startup process');
 
        // Safely reset WinBinder and destroy the splash window
        $bearsamppWinbinder->destroyWindow($window);
        $bearsamppWinbinder->reset();
 
        // Exit this startup process cleanly - the loading window will continue running
        Util::logTrace('Exiting startup process cleanly');
        exit(0);
 
    }

References $bearsamppBins, $bearsamppCore, $bearsamppLang, $bearsamppRoot, $proc, APP_TITLE, changePath(), checkBinsRegKey(), checkBrowser(), checkLaunchStartup(), checkPath(), checkPathRegKey(), checkSystemPathRegKey(), cleanOldBehaviors(), cleanTmpFolders(), createSslCrts(), Lang\DISABLED, Win32Ps\EXECUTABLE_PATH, exit, Util\formatUnixPath(), Util\getMicrotime(), installServices(), killOldInstances(), Util\logTrace(), Win32Ps\PROCESS_ID, refreshAliases(), refreshGitRepos(), refreshHostname(), refreshVhosts(), ActionExec\RESTART, rotationLogs(), savePath(), scanFolders(), Util\startLoading(), Lang\STARTUP_ERROR_TITLE, Lang\STARTUP_PREPARE_RESTART_TEXT, sysInfos(), updateConfig(), and writeLog().

◆ refreshAliases()

refreshAliases ( )

private

Refreshes the aliases in the Apache configuration.

Definition at line 626 of file class.action.startup.php.

    {
        global $bearsamppConfig, $bearsamppLang, $bearsamppBins;
 
        $this->splash->setTextLoading( $bearsamppLang->getValue( Lang::STARTUP_REFRESH_ALIAS_TEXT ) );
        $this->splash->incrProgressBar();
        $this->writeLog( 'Refresh aliases' );
 
        $bearsamppBins->getApache()->refreshAlias( $bearsamppConfig->isOnline() );
    }

References $bearsamppBins, $bearsamppConfig, $bearsamppLang, Lang\STARTUP_REFRESH_ALIAS_TEXT, and writeLog().

Referenced by processWindow().

◆ refreshGitRepos()

refreshGitRepos ( )

private

Refreshes Git repositories if the scan on startup is enabled. Logs the number of repositories found.

Definition at line 1185 of file class.action.startup.php.

    {
        global $bearsamppLang, $bearsamppTools;
 
        $this->splash->incrProgressBar();
        if ( $bearsamppTools->getGit()->isScanStartup() ) {
            $this->splash->setTextLoading( $bearsamppLang->getValue( Lang::STARTUP_REFRESH_GIT_REPOS_TEXT ) );
 
            $repos = $bearsamppTools->getGit()->findRepos( false );
            $this->writeLog( 'Update GIT repos: ' . count( $repos ) . ' found' );
        }
    }

References $bearsamppLang, Lang\STARTUP_REFRESH_GIT_REPOS_TEXT, and writeLog().

Referenced by processWindow().

◆ refreshHostname()

refreshHostname ( )

private

Refreshes the hostname in the configuration.

Definition at line 564 of file class.action.startup.php.

    {
        global $bearsamppConfig, $bearsamppLang;
 
        $this->splash->setTextLoading( $bearsamppLang->getValue( Lang::STARTUP_REFRESH_HOSTNAME_TEXT ) );
        $this->splash->incrProgressBar();
        $this->writeLog( 'Refresh hostname' );
 
        $bearsamppConfig->replace( Config::CFG_HOSTNAME, gethostname() );
    }

References $bearsamppConfig, $bearsamppLang, Config\CFG_HOSTNAME, Lang\STARTUP_REFRESH_HOSTNAME_TEXT, and writeLog().

Referenced by processWindow().

◆ refreshVhosts()

refreshVhosts ( )

private

Refreshes the virtual hosts in the Apache configuration.

Definition at line 640 of file class.action.startup.php.

    {
        global $bearsamppConfig, $bearsamppLang, $bearsamppBins;
 
        $this->splash->setTextLoading( $bearsamppLang->getValue( Lang::STARTUP_REFRESH_VHOSTS_TEXT ) );
        $this->splash->incrProgressBar();
        $this->writeLog( 'Refresh vhosts' );
 
        $bearsamppBins->getApache()->refreshVhosts( $bearsamppConfig->isOnline() );
    }

References $bearsamppBins, $bearsamppConfig, $bearsamppLang, Lang\STARTUP_REFRESH_VHOSTS_TEXT, and writeLog().

Referenced by processWindow().

◆ rotationLogs()

rotationLogs ( )

private

Rotates the logs by archiving old logs and purging old archives. Enhanced with file lock checking to prevent permission denied errors.

Definition at line 265 of file class.action.startup.php.

    {
        global $bearsamppRoot, $bearsamppCore, $bearsamppConfig, $bearsamppLang, $bearsamppBins;
 
        Util::logTrace("Starting log rotation process");
        $this->splash->setTextLoading($bearsamppLang->getValue(Lang::STARTUP_ROTATION_LOGS_TEXT));
        $this->splash->incrProgressBar();
 
        $archivesPath = $bearsamppRoot->getLogsPath() . '/archives';
        if (!is_dir($archivesPath)) {
            Util::logTrace("Creating archives directory: " . $archivesPath);
            mkdir($archivesPath, 0777, true);
            return;
        }
 
        $date = date('Y-m-d-His', time());
        $archiveLogsPath = $archivesPath . '/' . $date;
        $archiveScriptsPath = $archiveLogsPath . '/scripts';
 
        // Create archive folders
        Util::logTrace("Creating archive directories for current rotation");
        if (!is_dir($archiveLogsPath)) {
            Util::logTrace("Creating logs archive directory: " . $archiveLogsPath);
            mkdir($archiveLogsPath, 0777, true);
        } else {
            Util::logTrace("Logs archive directory already exists: " . $archiveLogsPath);
        }
 
        if (!is_dir($archiveScriptsPath)) {
            Util::logTrace("Creating scripts archive directory: " . $archiveScriptsPath);
            mkdir($archiveScriptsPath, 0777, true);
        } else {
            Util::logTrace("Scripts archive directory already exists: " . $archiveScriptsPath);
        }
 
        // Count archives
        Util::logTrace("Counting existing archives");
        $archives = array();
        $handle = @opendir($archivesPath);
        if (!$handle) {
            Util::logTrace("Failed to open archives directory: " . $archivesPath);
            return;
        }
 
        while (false !== ($file = readdir($handle))) {
            if ($file == '.' || $file == '..') {
                continue;
            }
            $archives[] = $archivesPath . '/' . $file;
        }
        closedir($handle);
        sort($archives);
        Util::logTrace("Found " . count($archives) . " existing archives");
 
        // Remove old archives
        if (count($archives) > $bearsamppConfig->getMaxLogsArchives()) {
            $total = count($archives) - $bearsamppConfig->getMaxLogsArchives();
            Util::logTrace("Removing " . $total . " old archives");
            for ($i = 0; $i < $total; $i++) {
                Util::logTrace("Deleting old archive: " . $archives[$i]);
                Util::deleteFolder($archives[$i]);
            }
        }
 
        // Helper function to check if a file is locked
        $isFileLocked = function($filePath) {
            if (!file_exists($filePath)) {
                return false;
            }
 
            $handle = @fopen($filePath, 'r+');
            if ($handle === false) {
                Util::logTrace("File appears to be locked: " . $filePath);
                return true; // File is locked
            }
 
            fclose($handle);
            return false; // File is not locked
        };
 
        // Logs
        Util::logTrace("Archiving log files");
        $srcPath = $bearsamppRoot->getLogsPath();
        $handle = @opendir($srcPath);
        if (!$handle) {
            Util::logTrace("Failed to open logs directory: " . $srcPath);
            return;
        }
 
        $logsCopied = 0;
        $logsSkipped = 0;
 
        while (false !== ($file = readdir($handle))) {
            if ($file == '.' || $file == '..' || is_dir($srcPath . '/' . $file)) {
                continue;
            }
 
            $sourceFile = $srcPath . '/' . $file;
            $destFile = $archiveLogsPath . '/' . $file;
 
            // Check if file is locked before attempting to copy
            if ($isFileLocked($sourceFile)) {
                Util::logTrace("Skipping locked log file: " . $file);
                $logsSkipped++;
                continue;
            }
 
            try {
                if (copy($sourceFile, $destFile)) {
                    $logsCopied++;
                    Util::logTrace("Archived log file: " . $file);
                } else {
                    $logsSkipped++;
                    Util::logTrace("Failed to copy log file: " . $file);
                }
            } catch (Exception $e) {
                $logsSkipped++;
                Util::logTrace("Exception copying log file " . $file . ": " . $e->getMessage());
            }
        }
        closedir($handle);
        Util::logTrace("Logs archived: " . $logsCopied . " copied, " . $logsSkipped . " skipped");
 
        // Scripts
        Util::logTrace("Archiving script files");
        $srcPath = $bearsamppCore->getTmpPath();
        $handle = @opendir($srcPath);
        if (!$handle) {
            Util::logTrace("Failed to open tmp directory: " . $srcPath);
            return;
        }
 
        $scriptsCopied = 0;
        $scriptsSkipped = 0;
 
        while (false !== ($file = readdir($handle))) {
            if ($file == '.' || $file == '..' || is_dir($srcPath . '/' . $file)) {
                continue;
            }
 
            $sourceFile = $srcPath . '/' . $file;
            $destFile = $archiveScriptsPath . '/' . $file;
 
            // Check if file is locked before attempting to copy
            if ($isFileLocked($sourceFile)) {
                Util::logTrace("Skipping locked script file: " . $file);
                $scriptsSkipped++;
                continue;
            }
 
            try {
                if (copy($sourceFile, $destFile)) {
                    $scriptsCopied++;
                    Util::logTrace("Archived script file: " . $file);
                } else {
                    $scriptsSkipped++;
                    Util::logTrace("Failed to copy script file: " . $file);
                }
            } catch (Exception $e) {
                $scriptsSkipped++;
                Util::logTrace("Exception copying script file " . $file . ": " . $e->getMessage());
            }
        }
        closedir($handle);
        Util::logTrace("Scripts archived: " . $scriptsCopied . " copied, " . $scriptsSkipped . " skipped");
 
        // Purge logs - only delete files that aren't locked
        Util::logTrace("Purging log files");
        $logsPath = $bearsamppRoot->getLogsPath();
        $handle = @opendir($logsPath);
        if (!$handle) {
            Util::logTrace("Failed to open logs directory for purging: " . $logsPath);
            return;
        }
 
        $logsDeleted = 0;
        $logsPurgeSkipped = 0;
 
        while (false !== ($file = readdir($handle))) {
            if ($file == '.' || $file == '..' || $file == 'archives' || $file == '.gitignore' || is_dir($logsPath . '/' . $file)) {
                continue;
            }
 
            $filePath = $logsPath . '/' . $file;
 
            // Check if file is locked before attempting to delete
            if ($isFileLocked($filePath)) {
                Util::logTrace("Skipping locked log file during purge: " . $file);
                $logsPurgeSkipped++;
                continue;
            }
 
            try {
                if (file_exists($filePath) && unlink($filePath)) {
                    $logsDeleted++;
                    Util::logTrace("Purged log file: " . $file);
                } else {
                    $logsPurgeSkipped++;
                    Util::logTrace("Failed to purge log file: " . $file);
                }
            } catch (Exception $e) {
                $logsPurgeSkipped++;
                Util::logTrace("Exception purging log file " . $file . ": " . $e->getMessage());
            }
        }
        closedir($handle);
        Util::logTrace("Logs purged: " . $logsDeleted . " deleted, " . $logsPurgeSkipped . " skipped");
 
        Util::logTrace("Log rotation completed");
    }

References $bearsamppBins, $bearsamppConfig, $bearsamppCore, $bearsamppLang, $bearsamppRoot, Util\deleteFolder(), Util\logTrace(), and Lang\STARTUP_ROTATION_LOGS_TEXT.

Referenced by processWindow().

◆ savePath()

savePath ( )

private

Saves the current application path.

Definition at line 721 of file class.action.startup.php.

    {
        global $bearsamppCore;
 
        file_put_contents( $bearsamppCore->getLastPath(), $this->rootPath );
        $this->writeLog( 'Save current path: ' . $this->rootPath );
    }

References $bearsamppCore, and writeLog().

Referenced by processWindow().

◆ scanFolders()

scanFolders ( )

private

Scans folders and logs the number of files to scan. Performance optimization: Skips expensive file scan when path hasn't changed. This saves 3-8 seconds on typical startups (95% of cases).

Definition at line 669 of file class.action.startup.php.

    {
        global $bearsamppCore, $bearsamppLang;
 
        $this->splash->setTextLoading( $bearsamppLang->getValue( Lang::STARTUP_SCAN_FOLDERS_TEXT ) );
        $this->splash->incrProgressBar();
 
        $lastPath = $bearsamppCore->getLastPathContent();
        $currentPath = $this->rootPath;
 
        // Performance optimization: Skip scan if path hasn't changed
        if ($lastPath === $currentPath) {
            Util::logDebug('Path unchanged, skipping file scan (performance optimization)');
            Util::logTrace('Last path: "' . $lastPath . '" matches current path: "' . $currentPath . '"');
            $this->filesToScan = [];
            $this->writeLog('Files to scan: 0 (path unchanged - scan skipped)');
 
            // Log performance benefit
            $this->writeLog('Performance: File scan skipped, saving 3-8 seconds');
            return;
        }
 
        // Path changed, perform full scan
        Util::logDebug('Path changed, performing full file scan');
        Util::logTrace('Last path: "' . $lastPath . '" differs from current path: "' . $currentPath . '"');
        $this->writeLog('Path changed detected - performing full scan');
 
        $scanStartTime = Util::getMicrotime();
        $this->filesToScan = Util::getFilesToScan();
        $scanDuration = round(Util::getMicrotime() - $scanStartTime, 3);
 
        $this->writeLog('Files to scan: ' . count($this->filesToScan) . ' (scanned in ' . $scanDuration . 's)');
    }

References $bearsamppCore, $bearsamppLang, $rootPath, Util\getFilesToScan(), Util\getMicrotime(), Util\logDebug(), Util\logTrace(), Lang\STARTUP_SCAN_FOLDERS_TEXT, and writeLog().

Referenced by processWindow().

◆ sysInfos()

sysInfos ( )

private

Logs system information.

Definition at line 612 of file class.action.startup.php.

    {
        global $bearsamppLang;
 
        $this->splash->setTextLoading( $bearsamppLang->getValue( Lang::STARTUP_SYS_INFOS ) );
        $this->splash->incrProgressBar();
 
        $os = Batch::getOsInfo();
        $this->writeLog( sprintf( 'OS: %s', $os ) );
    }

References $bearsamppLang, Batch\getOsInfo(), Lang\STARTUP_SYS_INFOS, and writeLog().

Referenced by processWindow().

◆ updateConfig()

updateConfig ( )

private

Updates the configuration for bins, tools, and apps. Logs the update process.

Definition at line 837 of file class.action.startup.php.

    {
        global $bearsamppLang, $bearsamppBins, $bearsamppTools, $bearsamppApps;
 
        $this->splash->setTextLoading( $bearsamppLang->getValue( Lang::STARTUP_UPDATE_CONFIG_TEXT ) );
        $this->splash->incrProgressBar();
        $this->writeLog( 'Update config' );
 
        $bearsamppBins->update();
        $bearsamppTools->update();
        $bearsamppApps->update();
    }

References $bearsamppBins, $bearsamppLang, Lang\STARTUP_UPDATE_CONFIG_TEXT, and writeLog().

Referenced by processWindow().

◆ writeLog()

writeLog ( $log )

private

Writes a log message to the startup log file.

Parameters

string $log The log message to write.

Definition at line 1299 of file class.action.startup.php.

    {
        global $bearsamppRoot;
        Util::logDebug( $log, $bearsamppRoot->getStartupLogFilePath() );
    }

References $bearsamppRoot, and Util\logDebug().

Referenced by __construct(), changePath(), checkBinsRegKey(), checkBrowser(), checkLaunchStartup(), checkPath(), checkPathRegKey(), checkSystemPathRegKey(), cleanOldBehaviors(), cleanTmpFolders(), installServicesSequential(), killOldInstances(), prepareService(), processWindow(), refreshAliases(), refreshGitRepos(), refreshHostname(), refreshVhosts(), savePath(), scanFolders(), sysInfos(), and updateConfig().

Field Documentation

◆ $error

$error

private

Definition at line 21 of file class.action.startup.php.

Referenced by installServicesSequential().

◆ $filesToScan

$filesToScan

private

Definition at line 24 of file class.action.startup.php.

◆ $restart

$restart

private

Definition at line 19 of file class.action.startup.php.

◆ $rootPath

$rootPath

private

Definition at line 23 of file class.action.startup.php.

Referenced by scanFolders().

◆ $splash

$splash

private

Definition at line 18 of file class.action.startup.php.

◆ $startTime

$startTime

private

Definition at line 20 of file class.action.startup.php.

Referenced by checkApacheServiceWithTimeout().

◆ GAUGE_OTHERS

const GAUGE_OTHERS = 19

Definition at line 27 of file class.action.startup.php.

◆ GAUGE_SERVICES

const GAUGE_SERVICES = 5

Definition at line 26 of file class.action.startup.php.

The documentation for this class was generated from the following file:

E:/Bearsampp-development/sandbox/core/classes/actions/class.action.startup.php

Public Member Functions

Data Fields

Private Member Functions

Private Attributes

Detailed Description

Constructor & Destructor Documentation

◆ __construct()

Member Function Documentation

◆ changePath()

◆ checkApacheServiceWithTimeout()

◆ checkBinsRegKey()

◆ checkBrowser()

◆ checkLaunchStartup()

◆ checkMySQLServiceWithTimeout()

◆ checkPath()

◆ checkPathRegKey()

◆ checkSystemPathRegKey()

◆ cleanOldBehaviors()

◆ cleanTmpFolders()

◆ createSslCrts()

◆ installServices()

◆ installServicesSequential()

◆ killOldInstances()

◆ prepareService()

◆ processWindow()

◆ refreshAliases()

◆ refreshGitRepos()

◆ refreshHostname()

◆ refreshVhosts()

◆ rotationLogs()

◆ savePath()

◆ scanFolders()

◆ sysInfos()

◆ updateConfig()

◆ writeLog()

Field Documentation

◆ $error

◆ $filesToScan

◆ $restart

◆ $rootPath

◆ $splash

◆ $startTime

◆ GAUGE_OTHERS

◆ GAUGE_SERVICES