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;

#初始化輸出

$output=array();

#取得 lib path

exec("php -f ".escapeshellarg(pathinfo(__FILE__)["dirname"]."/../../../../../usr/bin/libexec/folderOfUsrLib.php"),$output,$status);

#如果執行失敗

if($status!==0){

	#debug

	var_dump(__LINE__,$output);

	#結束執行,回傳shell 1.

	exit(1);

	}#if end

#儲存lib path

$folderOfUsrLib=$output[0];

#初始化輸出

$output=array();

#以該檔案的實際位置的 lib path 為 include path 首位

exec("cd ".\escapeshellarg(pathinfo(__FILE__)["dirname"]."/../../../../../usr/".$folderOfUsrLib."/qbpwcf").";pwd;",$output,$status);

set_include_path($output[0].PATH_SEPARATOR.get_include_path());

#匯入套件

require_once("allInOne.php");

#建議的log位置

$logFile=$_SERVER["DOCUMENT_ROOT"].$_SERVER["PHP_SELF"].".log";

#函式說明:

#建立快取服務.實質上為unix domain socket server.

#回傳結果:

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

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

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

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

#必填參數:

#無.

#可省略參數:

#$conf["sock"],字串,unix domain socket的路徑與名稱,預設為相對於當前套件的 var/qbpwcf/resource.sock

$conf["sock"]="resource.sock";

#$conf["debug"],字串,"true"代表要啟用debug模式;反之預設為"false"不啟用.

$conf["debug"]="true";

#$conf["addOnProcessFunc"],陣列,收到訊息後,要依順執行的函式,預設為array("\qbpwcf\resource::addOnProcessFunc").

#$conf["addOnProcessFunc"]=array();

#$conf["funcToRunWhenIdle"],陣列,閒置時要依序執行的函式,預設為array("/qbpwcf/resource::funcToRunWhenIdle");

#$conf["funcToRunWhenIdle"]=array();

#$conf["deafaultLifeTime"],字串,資源沒被使用時,預設的存留時間秒數,預設為"300".

#$conf["deafaultLifeTime"]="300";

#參考資料:

#無.

#備註:

#僅能在命令列環境下運行.

$server=resource::server($conf);

unset($conf);

#如果執行失敗

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

	#函式說明:

	#撰寫log

	#回傳結果:

	#$result["status"],狀態,"true"或"false".

	#$result["error"],錯誤訊息陣列.

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

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

	#必填參數:

	#$conf["path"],字串,log檔案的路徑與名稱.

	$conf["path"]=$logFile;

	#$conf["content"],any,要寫的內容,若內容不為字串則會用var_dump的格式寫入.

	$conf["content"]=$server;

	#$conf["fileArgu"],字串,php變數__FILE__的內容,亦即該檔案在檔案系統的絕對路徑

	$conf["fileArgu"]=__FILE__;

	#可省略參數:

	#$conf["rewrite"],預設為"false",接續寫入;反之"true"代表重新寫入.

	#$conf["rewrite"]="false";

	#參考資料:

	#無.

	#備註:

	#無.

	$record=logs::record($conf);

	unset($conf);

	#如果寫log失敗

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

		#印出結果

		var_dump($record);

		}#if end

	#結束執行,回傳錯誤代碼1

	exit(1);

	}#if end

?>