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

Private Attributes
	$bin
	$cntProcessActions
	$currentPort
	$wbBtnCancel
	$wbBtnFinish
	$wbInputPort
	$wbLabelCurrent
	$wbLabelPort
	$wbProgressBar
	$wbWindow

Detailed Description

Class ActionChangePort Handles the process of changing the port for various services in the Bearsampp application.

Definition at line 14 of file class.action.changePort.php.

Constructor & Destructor Documentation

◆ __construct()

__construct ( $args )

ActionChangePort constructor. Initializes the port change process for the specified service.

Parameters

array $args The arguments passed to the constructor, where the first element specifies the service name.

Definition at line 47 of file class.action.changePort.php.

    {
        global $bearsamppLang, $bearsamppBins, $bearsamppWinbinder;
 
        if (isset($args[0]) && !empty($args[0])) {
            $bin = $bearsamppBins->getBinByName($args[0]);
            if ($bin !== null) {
                $this->bin = $bin;
                // Mailpit exposes an SMTP port separately; all other services use getPort()
                $this->currentPort = ($args[0] == $bearsamppBins->getMailpit()->getName())
                    ? $bin->getSmtpPort()
                    : $bin->getPort();
            } else {
                $this->bin = $bearsamppBins->getApache();
                $this->currentPort = $bearsamppBins->getApache()->getPort();
            }
            $this->cntProcessActions = 3;
 
            $bearsamppWinbinder->reset();
            $this->wbWindow = $bearsamppWinbinder->createAppWindow(
                sprintf($bearsamppLang->getValue(Lang::CHANGE_PORT_TITLE), $args[0]),
                380,
                170,
                WBC_NOTIFY,
                WBC_KEYDOWN | WBC_KEYUP
            );
 
            $this->wbLabelCurrent = $bearsamppWinbinder->createLabel(
                $this->wbWindow,
                sprintf($bearsamppLang->getValue(Lang::CHANGE_PORT_CURRENT_LABEL), $args[0], $this->currentPort),
                15,
                15,
                350
            );
 
            $this->wbLabelPort = $bearsamppWinbinder->createLabel($this->wbWindow, $bearsamppLang->getValue(Lang::CHANGE_PORT_NEW_LABEL) . ' :', 15, 45, 85, null, WBC_RIGHT);
            $this->wbInputPort = $bearsamppWinbinder->createInputText($this->wbWindow, $this->currentPort, 105, 43, 50, null, 5, WBC_NUMBER);
 
            $this->wbProgressBar = $bearsamppWinbinder->createProgressBar($this->wbWindow, $this->cntProcessActions + 1, 15, 107, 170);
            $this->wbBtnFinish   = $bearsamppWinbinder->createButton($this->wbWindow, $bearsamppLang->getValue(Lang::BUTTON_FINISH), 190, 102);
            $this->wbBtnCancel   = $bearsamppWinbinder->createButton($this->wbWindow, $bearsamppLang->getValue(Lang::BUTTON_CANCEL), 277, 102);
 
            $bearsamppWinbinder->setHandler($this->wbWindow, $this, 'processWindow');
            $bearsamppWinbinder->setFocus($this->wbInputPort[WinBinder::CTRL_OBJ]);
            $bearsamppWinbinder->mainLoop();
            $bearsamppWinbinder->reset();
        }
    }

References $bearsamppBins, $bearsamppLang, $bin, Lang\BUTTON_CANCEL, Lang\BUTTON_FINISH, Lang\CHANGE_PORT_CURRENT_LABEL, Lang\CHANGE_PORT_NEW_LABEL, Lang\CHANGE_PORT_TITLE, and WinBinder\CTRL_OBJ.

Member Function Documentation

◆ processWindow()

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

Processes window events and handles user interactions.

Parameters

mixed	$window	The window object.
int	$id	The control ID.
mixed	$ctrl	The control object.
mixed	$param1	Additional parameter 1.
mixed	$param2	Additional parameter 2.

Definition at line 105 of file class.action.changePort.php.

    {
        global $bearsamppLang, $bearsamppWinbinder;
        $boxTitle = sprintf($bearsamppLang->getValue(Lang::CHANGE_PORT_TITLE), $this->bin);
        $port     = $bearsamppWinbinder->getText($this->wbInputPort[WinBinder::CTRL_OBJ]);
 
        switch ($id) {
            case $this->wbInputPort[WinBinder::CTRL_ID]:
                $bearsamppWinbinder->setEnabled($this->wbBtnFinish[WinBinder::CTRL_OBJ], empty($port) ? false : true);
                break;
            case $this->wbBtnFinish[WinBinder::CTRL_ID]:
                $bearsamppWinbinder->incrProgressBar($this->wbProgressBar);
                if ($port == $this->currentPort) {
                    $bearsamppWinbinder->messageBoxWarning($bearsamppLang->getValue(Lang::CHANGE_PORT_SAME_ERROR), $boxTitle);
                    $bearsamppWinbinder->resetProgressBar($this->wbProgressBar);
                    break;
                }
                $changePort = $this->bin->changePort($port, true, $this->wbProgressBar);
                if ($changePort === true) {
                    Util::updateLoadingText('Restarting ' . $this->bin->getName() . '...');
                    $this->bin->getService()->restart();
 
                    // Rebuild tray/menu links (including localhost URL) with the new port values.
                    $menuContent = TplApp::process();
                    if ($menuContent !== false) {
                        file_put_contents(Path::getIniFilePath(), Util::utf8ToCp1252($menuContent));
                    }
 
                    $bearsamppWinbinder->messageBoxInfo(
                        sprintf($bearsamppLang->getValue(Lang::PORT_CHANGED), $this->bin, $port),
                        $boxTitle
                    );
                    $bearsamppWinbinder->destroyWindow($window);
                } else {
                    $bearsamppWinbinder->messageBoxError(
                        sprintf($bearsamppLang->getValue(Lang::PORT_NOT_USED_BY), $port, $changePort),
                        $boxTitle
                    );
                    $bearsamppWinbinder->resetProgressBar($this->wbProgressBar);
                }
                break;
            case IDCLOSE:
            case $this->wbBtnCancel[WinBinder::CTRL_ID]:
                $bearsamppWinbinder->destroyWindow($window);
                break;
        }
    }