Subversion Repositories php-qbpwcf

<?php

/*

        QBPWCF, Quick Build PHP website Component base on Fedora Linux.

    Copyright (C) 2014~2026 MIN ZHI, CHEN

    This file is part of QBPWCF.

    QBPWCF is free software: you can redistribute it and/or modify

    it under the terms of the GNU General Public License as published by

    the Free Software Foundation, either version 3 of the License, or

    (at your option) any later version.

    QBPWCF is distributed in the hope that it will be useful,

    but WITHOUT ANY WARRANTY; without even the implied warranty of

    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License

    along with QBPWCF.  If not, see <http://www.gnu.org/licenses/>.

*/

#使用命名空間qbpwcf

namespace qbpwcf;

#assets dir

$assetsDir="assets of resource::server_20260604-1";

#server 端的指令

$server_cmd=array("php -f server.php");

#clent 端的指令

$client_cmd=array("php -f client.php");

#working dir

$workingDir=pathinfo(__FILE__)["dirname"]."/../".$assetsDir;

#server端log的開頭識別

$serverLogHead="server:";

#client端log的開頭識別

$clientLogHead="client:";

#先執行 server 端，再執行 client 端.

#運行server端程式

#函式說明:

#透過proc來多執行序運作.

#回傳結果:

#$result["status"],執行是否正常,"true"代表正常,"false"代表不正常.

#$reuslt["error"],執行不正常結束的錯訊息陣列.

#$result["function"],當前執行的函式名稱.

#$result["argu"],使用的參數.

#$result["content"],陣列,每個元素為其指令執行的結果訊息陣列,key為"status"代表執行是否正常的識別;key為"statusCode"代表程式結束後回傳給對應executeBy程式的數值,若為"?"則代表程序尚未結束,若為整數0,則代表順利執行結束,可透過proc_update函式進行資訊的更新與取得;key為"content"代表標準輸出,若為resource,則代表為pipe;key為"error"代表非標準輸出,若為resource,則代表為pipe;key為"input"代表成功輸入的指令;key為"process"代表該程序經proc_open後的process source;key為"proc_get_status"代表程序的資訊.

#必填參數:

#$conf["cmds"],字串陣列,每個元素代表單一程序要執行的指令與參數.

$conf["cmds"]=$server_cmd;

#可省略參數:

#$conf["wait"],字串,是否需要等待所有程序結束,預設為"true"要等待;反之為"false"不要等待.

$conf["wait"]="false";

#$conf["timeout"],字串陣列,每個元素代表單一程序執行的最大等待秒數,超過後將會強迫停止執行,僅當wait參數為"true"時生效.

#$conf["timeout"]=array("10");

#$conf["workingDir"],字串陣列,個別程式執行時的家目錄,預設不指定.

$conf["workingDir"]=array($workingDir);

#$conf["envs"],2維字串陣列,每個元素代表個別程式執行時的指定環境變數,key變數名稱;value為變數內容.預設為array("QBPWCF" => "Quick Build PHP Website Componment base on Fedora Linux");

#$conf["envs"]=array(array("key"=>"value"));

#$conf["executeBy"],字串陣列,每個元素代表個別指令要用什麼程式執行,預設為"bash".

#$conf["executeBy"]=array("bash");

#參考資料:

#https://www.php.net/manual/en/function.proc-open.php

#https://www.php.net/manual/en/function.proc-get-status.php

#https://www.php.net/manual/en/function.proc-terminate.php

#備註:

#當wait參數為"true"時,會自動解析stdout與stderr,因此不用再透過 self::proc_update 來更新.

#當wait參數不為"true"時,若需要取得當下的執行狀況,請使用 self::proc_update 來更新.

$proc_s=threads::proc($conf);

unset($conf);

#如果執行異常

if($proc_s["status"]==="false"){

	#debug

	var_dump($proc_s);

	#結束執行,回傳shell 1.

	exit(1);

	}#if end

#如果程序不是持續運行中

if($proc_s["content"][0]["statusCode"]!=="?"){

	#debug

	var_dump($proc_s);

	#結束執行,回傳shell 1.

	exit(1);

	}#if end

#取得 server.php 的標準輸出

$serverStdOut=&$proc_s["content"][0]["content"];

#取得 server.php 的錯誤輸出

$serverErrOut=&$proc_s["content"][0]["error"];

#提示 server 運行中且提供 pid

echo $serverLogHead."server(pid:".$proc_s["content"][0]["proc_get_status"]["pid"].") is running....".PHP_EOL;

#debug

#var_dump(__LINE__,$serverStdOut,$serverErrOut);exit;

#運行client端程式

#函式說明:

#透過proc來多執行序運作.

#回傳結果:

#$result["status"],執行是否正常,"true"代表正常,"false"代表不正常.

#$reuslt["error"],執行不正常結束的錯訊息陣列.

#$result["function"],當前執行的函式名稱.

#$result["argu"],使用的參數.

#$result["content"],陣列,每個元素為其指令執行的結果訊息陣列,key為"status"代表執行是否正常的識別;key為"statusCode"代表程式結束後回傳給對應executeBy程式的數值,若為"?"則代表程序尚未結束,若為整數0,則代表順利執行結束,可透過proc_update函式進行資訊的更新與取得;key為"content"代表標準輸出,若為resource,則代表為pipe;key為"error"代表非標準輸出,若為resource,則代表為pipe;key為"input"代表成功輸入的指令;key為"process"代表該程序經proc_open後的process source;key為"proc_get_status"代表程序的資訊.

#必填參數:

#$conf["cmds"],字串陣列,每個元素代表單一程序要執行的指令與參數.

$conf["cmds"]=$client_cmd;

#可省略參數:

#$conf["wait"],字串,是否需要等待所有程序結束,預設為"true"要等待;反之為"false"不要等待.

$conf["wait"]="false";

#$conf["timeout"],字串陣列,每個元素代表單一程序執行的最大等待秒數,超過後將會強迫停止執行,僅當wait參數為"true"時生效.

#$conf["timeout"]=array("10");

#$conf["workingDir"],字串陣列,個別程式執行時的家目錄,預設不指定.

$conf["workingDir"]=array($workingDir);

#$conf["envs"],2維字串陣列,每個元素代表個別程式執行時的指定環境變數,key變數名稱;value為變數內容.預設為array("QBPWCF" => "Quick Build PHP Website Componment base on Fedora Linux");

#$conf["envs"]=array(array("key"=>"value"));

#$conf["executeBy"],字串陣列,每個元素代表個別指令要用什麼程式執行,預設為"bash".

#$conf["executeBy"]=array("bash");

#參考資料:

#https://www.php.net/manual/en/function.proc-open.php

#https://www.php.net/manual/en/function.proc-get-status.php

#https://www.php.net/manual/en/function.proc-terminate.php

#備註:

#當wait參數為"true"時,會自動解析stdout與stderr,因此不用再透過 self::proc_update 來更新.

#當wait參數不為"true"時,若需要取得當下的執行狀況,請使用 self::proc_update 來更新.

$proc_c=threads::proc($conf);

unset($conf);

#如果執行異常

if($proc_c["status"]==="false"){

	#debug

	var_dump($proc_c);

	#結束執行,回傳shell 1.

	exit(1);

	}#if end

#取得 client.php 的標準輸出

$clientStdOut=&$proc_c["content"][0]["content"];

#取得 client.php 的錯誤輸出

$clientErrOut=&$proc_c["content"][0]["error"];

#提示 client 運行中且提供 pid

echo $clientLogHead."client(pid:".$proc_c["content"][0]["proc_get_status"]["pid"].") is running....".PHP_EOL;

#設置要監控的 stream 陣列資訊

$stream_r=array();

$stream_r["serverStdOut"]=array();

$stream_r["serverStdOut"]["stream"]=$serverStdOut;

$stream_r["serverStdOut"]["alive"]=true;

$stream_r["serverErrOut"]=array();

$stream_r["serverErrOut"]["stream"]=$serverErrOut;

$stream_r["serverErrOut"]["alive"]=true;

$stream_r["clientStdOut"]=array();

$stream_r["clientStdOut"]["stream"]=$clientStdOut;

$stream_r["clientStdOut"]["alive"]=true;

$stream_r["clientErrOut"]=array();

$stream_r["clientErrOut"]["stream"]=$clientErrOut;

$stream_r["clientErrOut"]["alive"]=true;

#設置預設下個訊息開頭不要換行

$eolAtStart=false;

#無窮迴圈

while(true){

	#針對每個 stream

	foreach($stream_r as $name=>$info){

		#如果通道是開啟的

		if($info["alive"]){

			#確認是否尚未關閉

			if(!feof($info["stream"])){

				#讀取訊息

				$msg=fread($info["stream"],2048);

				#如果有訊息

				if(!empty($msg)){

					#如果開頭要換行

					if($eolAtStart){

						#輸出換行符號

						echo PHP_EOL;

						#設置下個訊息開頭不用換行的識別

						$eolAtStart=false;

						}#if end

					#echo message.

					echo $name.":".$msg.PHP_EOL;

					}#if end

				}#if end

			#反之

			else{

				#設置通道已經關閉的識別

				$stream_r[$name]["alive"]=false;

				#如果開頭要換行

				if($eolAtStart){

					#輸出換行符號

					echo PHP_EOL;

					#設置下個訊息開頭不用換行的識別

					$eolAtStart=false;

					}#if end

				#提示 server 訊息通道已經關閉 

				echo $name.":channel closed".PHP_EOL;

				}#else end

			}#if end

		#反之

		else{

			#移除已經掰掰的通道

			unset($stream_r[$name]);

			}#else end

		}#foreach end

	#如果已經沒有要監控的通道存在

	if(empty($stream_r)){

		#跳出 while

		break;

		}#if end

	#提示沒有訊息

	echo ".";

	#設置下個訊息開頭要換行

	$eolAtStart=true;

	#休息1秒鐘

	sleep(1);

	}#while end

#break point

exit;

?>