class.action.loading.php

Go to the documentation of this file.

<?php
/*
 *
 *  * Copyright (c) 2022-2025 Bearsampp
 *  * License: GNU General Public License version 3 or later; see LICENSE.txt
 *  * Website: https://bearsampp.com
 *  * Github: https://github.com/Bearsampp
 *
 */

class ActionLoading
{
    const WINDOW_WIDTH = 360;

    const WINDOW_HEIGHT = 90;

    const GAUGE = 20;

    private $wbWindow;

    private $wbLabel;

    private $wbProgressBar;

    public function __construct($args)
    {
        global $bearsamppCore, $bearsamppLang, $bearsamppWinbinder;
 
        $currentPid = Win32Ps::getCurrentPid();
        Log::trace('ActionLoading constructor started - PID: ' . $currentPid);
 
        $bearsamppWinbinder->reset();
        Log::trace('WinBinder reset complete');
 
        $bearsamppCore->addLoadingPid($currentPid);
        Log::trace('Loading PID added to tracking file: ' . $currentPid);
 
        // Check for already running loading processes
        $pidFile = $bearsamppCore->getLoadingPid();
        if (file_exists($pidFile)) {
            $pids = file($pidFile);
            foreach ($pids as $pid) {
                $pid = trim($pid);
                if (!empty($pid) && $pid != $currentPid) {
                    Log::trace('ActionLoading: Found another loading process (PID ' . $pid . '), killing it');
                    Win32Ps::kill($pid);
                }
            }
        }
 
        // Screen information
        Log::trace('Getting screen information');
        $screenArea = explode(' ', $bearsamppWinbinder->getSystemInfo(WinBinder::SYSINFO_WORKAREA));
        $screenWidth = intval($screenArea[2]);
        $screenHeight = intval($screenArea[3]);
        $xPos = $screenWidth - self::WINDOW_WIDTH;
        $yPos = $screenHeight - self::WINDOW_HEIGHT - 5;
        Log::trace('Screen dimensions: ' . $screenWidth . 'x' . $screenHeight . ', Window position: (' . $xPos . ',' . $yPos . ')');
 
        // Create the window and progress bar
        Log::trace('Creating loading window...');
        $this->wbWindow = $bearsamppWinbinder->createWindow(null, ToolDialog, null, $xPos, $yPos, self::WINDOW_WIDTH, self::WINDOW_HEIGHT, WBC_TOP, null);
 
        // Check if window was created successfully
        if ($this->wbWindow === false || $this->wbWindow === null) {
            Log::error('CRITICAL: Failed to create loading window - window handle is: ' . var_export($this->wbWindow, true));
            Log::error('WinBinder extension loaded: ' . (extension_loaded('winbinder') ? 'YES' : 'NO'));
            Log::error('wb_create_window function exists: ' . (function_exists('wb_create_window') ? 'YES' : 'NO'));
            return;
        }
 
        Log::trace('Loading window created successfully - handle: ' . $this->wbWindow);
 
        // CRITICAL: wb_set_visible() must be called AFTER window creation in PHP 8.4
        // The WS_VISIBLE flag during creation doesn't work
        Log::trace('Making window visible with wb_set_visible()');
        wb_set_visible($this->wbWindow, true);
        Log::trace('Window set to visible');
 
        Log::trace('Drawing image...');
        $bearsamppWinbinder->drawImage($this->wbWindow, Path::getImagesPath() . '/bearsampp.bmp');
        Log::trace('Image drawn');
 
        Log::trace('Creating progress bar...');
        $this->wbProgressBar = $bearsamppWinbinder->createProgressBar($this->wbWindow, self::GAUGE + 1, 42, 24, self::WINDOW_WIDTH - 62, 15);
        Log::trace('Progress bar created: ' . var_export($this->wbProgressBar, true));
 
        Log::trace('Drawing initial text...');
        $this->wbLabel = $bearsamppWinbinder->drawText($this->wbWindow, '', 42, 0, self::WINDOW_WIDTH - 64, 25);
        Log::trace('Label created: ' . var_export($this->wbLabel, true));
 
        // Set the handler and start the main loop
        Log::trace('Setting window handler...');
        $bearsamppWinbinder->setHandler($this->wbWindow, $this, 'processLoading', 10);
        Log::trace('Handler set, starting main loop...');
        $bearsamppWinbinder->mainLoop();
        Log::trace('Main loop exited');
    }

    public function incrProgressBar($nb = 1)
    {
        global $bearsamppCore, $bearsamppWinbinder;
 
        for ($i = 0; $i < $nb; $i++) {
            $bearsamppWinbinder->incrProgressBar($this->wbProgressBar);
            $bearsamppWinbinder->drawImage($this->wbWindow, Path::getImagesPath() . '/bearsampp.bmp', 4, 2, 32, 32);
        }
 
        $bearsamppWinbinder->wait();
        $bearsamppWinbinder->wait($this->wbWindow);
    }

    public function processLoading($window, $id, $ctrl, $param1, $param2)
    {
        global $bearsamppRoot, $bearsamppWinbinder;
 
        switch ($id) {
            case IDCLOSE:
                Win32Ps::kill(Win32Ps::getCurrentPid());
                break;
        }
 
        // Set a maximum number of iterations to prevent infinite loops
        $maxIterations = 10;
        $iterations = 0;
 
        // Set a timeout for the entire loading process
        $startTime = microtime(true); // Use microtime for more precise timing
        $maxLoadingTime = 15; // 15 seconds maximum
 
        while ($iterations < $maxIterations && (microtime(true) - $startTime) < $maxLoadingTime) {
            $bearsamppRoot->removeErrorHandling();
            $bearsamppWinbinder->resetProgressBar($this->wbProgressBar);
 
            usleep(100000);
 
            for ($i = 0; $i < self::GAUGE && (microtime(true) - $startTime) < $maxLoadingTime; $i++) {
                $this->incrProgressBar();
 
                // Check for status file updates to show current service being processed
                $this->updateLabelFromStatusFile();
 
                usleep(100000);
            }
 
            // Check if all services have started successfully
            $allServicesStarted = $this->checkAllServicesStarted();
            if ($allServicesStarted) {
                Log::trace('All services started successfully');
                break;
            }
 
            $iterations++;
            Log::trace('Loading iteration ' . $iterations . ' completed, checking services again');
        }
 
        if ($iterations >= $maxIterations) {
            Log::trace('Maximum iterations reached (' . $maxIterations . '), some services may not have started properly');
        }
 
        if ((microtime(true) - $startTime) >= $maxLoadingTime) {
            Log::trace('Loading timeout reached (' . $maxLoadingTime . ' seconds), some services may not have started properly');
        }
 
        // Close the loading window
        Log::trace('Closing loading window');
        Win32Ps::kill(Win32Ps::getCurrentPid());
    }

    private function updateLoadingText($text)
    {
        global $bearsamppWinbinder;
 
        if ($this->wbLabel) {
            wb_set_text($this->wbLabel, $text);
            wb_refresh($this->wbWindow);
        }
    }

    private function updateLabelFromStatusFile()
    {
        global $bearsamppCore, $bearsamppWinbinder;
 
        $statusFile = Path::getTmpPath() . '/loading_status.txt';
 
        if (file_exists($statusFile)) {
            $content = @file_get_contents($statusFile);
            if ($content !== false && !empty($content)) {
                $status = @json_decode($content, true);
                if ($status && isset($status['text']) && !empty($status['text'])) {
                    // Clear the text area and redraw with new text
                    $bearsamppWinbinder->drawRect($this->wbWindow, 42, 0, self::WINDOW_WIDTH - 52, 25);
                    $this->wbLabel = $bearsamppWinbinder->drawText($this->wbWindow, $status['text'], 42, 0, self::WINDOW_WIDTH - 64, 25);
                }
            }
        } else {
            // If no status file exists, show a default message
            $currentText = $this->wbLabel;
            if (empty($currentText)) {
                $bearsamppWinbinder->drawRect($this->wbWindow, 42, 0, self::WINDOW_WIDTH - 52, 25);
                $this->wbLabel = $bearsamppWinbinder->drawText($this->wbWindow, 'Processing...', 42, 0, self::WINDOW_WIDTH - 64, 25);
            }
        }
    }

    private function checkAllServicesStarted()
    {
        global $bearsamppBins;
 
        Log::trace('Checking if all services have started successfully');
 
        // getServices() already filters to enabled-only services
        $allStarted = true;
        foreach ($bearsamppBins->getServices() as $sName => $service) {
            $serviceName = $service->getName();
            $this->updateLoadingText('Checking ' . $serviceName . '...');
 
            try {
                $state = Win32Native::getServiceState($serviceName);
                $serviceRunning = ($state === 'Running');
                Log::trace('Service ' . $sName . ' status check: ' . ($serviceRunning ? 'running' : 'not running') . ' (state: ' . var_export($state, true) . ')');
            } catch (\Throwable $e) {
                Log::trace('Exception during service status check for ' . $sName . ': ' . $e->getMessage());
                $serviceRunning = false;
            }
 
            if (!$serviceRunning) {
                Log::trace('Service ' . $sName . ' is not running');
                $allStarted = false;
                break;
            }
        }
 
        Log::trace('All services started check result: ' . ($allStarted ? 'true' : 'false'));
        return $allStarted;
    }
}