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_select 來取得兩個程序的輸出....

#給 stream select 的 read msg monitor

$stream_r=array("serverStdOut"=>$serverStdOut,"serverErrOut"=>$serverErrOut,"clientStdOut"=>$clientStdOut,"clientErrOut"=>$clientErrOut);

#debug

#var_dump(__LINE__,$stream_r);exit;

#複製一份，避免被 stream_select 異動到原始的 stream

$stream_r_select=$stream_r;

#給 stream select 的 write msg monitor

$stream_w=null;

#給 steam select 的 unexpect msg monitor

$stream_e=null;

#無窮迴圈

while(true){

	#取得有異動的 stream

	$EventCount=stream_select($stream_r_select,$stream_w,$stream_e,5);

	#如果沒有異動的 stream

	if($EventCount===0){

		#用 "." 代表 idle,沒有異動.

		echo ".";

		}#if end

	#如果有異動的 stream

	if(in_array($stream_r_select,$stream_r)){

		#針對每個 stream

		foreach($stream_r_select as $key => $stream){

			#debug

			var_dump(__LINE__,$stream);

			#如果有內容尚未讀取

			while(!eof($stream)){

				#取得訊息字串

				$string=fread($stream,2048);

				#$serverLogHead

				#$clientLogHead

				#判斷來源

				switch($key){

					#如果是伺服端的標準輸出

					case "serverStdOut":

					#如果是伺服端的錯誤輸出

					case "serverErrOut":

						#印出訊息

						echo $serverLogHead.":".$string.PHP_EOL;

						break;

					#如果是用戶的標準士輸出

					case "clientStdOut":

					#如果是用戶的錯誤輸出

					case "clientErrOut":

						#印出訊息

						echo $clientLogHead.":".$string.PHP_EOL;

						break;

					#其他不支援的 key

					default:

						#debug

						echo "unsupported key:".$key.PHP_EOL;

						#結束執行,回傳shell 1.

						exit(1);

					}#switch end

				}#while end

			}#foreach end

		}#if end

	}#while end

/*

#若程序運行中,就不斷執行

while($proc["content"][0]["statusCode"]==="?"){

	#更新程序狀況

	#函式說明:

	#更新透過proc執行的多程序資訊.

	#回傳結果:

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

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

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

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

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

	#必填參數:

	#$conf["procs"],陣列,運行self::proc後回傳的content.

	$conf["procs"]=$proc["content"];

	#可省略參數:

	#無.

	#參考資料:

	#無.

	#備註:

	#無.

	$proc_update=threads::proc_update($conf);

	unset($conf);

	#如果執行異常

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

		#debug

		var_dump($proc_update);

		#結束執行,回傳shell 1.

		exit(1);

		}#if end

	#更新程序狀態

	$proc["content"]=$proc_update["content"];

	}#if end

#如果client最終運行異常

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

	#debug

	var_dump($proc);

	#結束執行,回傳shell 1.

	exit(1);

	}#if end

#debug

var_dump($proc);

*/

?>