Subversion Repositories qbpwcf-lib(archive)

#!/usr/bin/php
<?php 

/*
        QBPWCF, Quick Build PHP website Component base on Fedora Linux.
    Copyright (C) 2015~2024 Min-Jhin,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/>.
    
*/

#宣告命名空間
namespace qbpwcf;

#取得 lib path
exec("php -f ".escapeshellarg(pathinfo(__FILE__)["dirname"]."/libexec/folderOfUsrLib.php"),$output,$status);

#如果執行失敗
if($status!==0){

        #debug
        var_dump(__LINE__,$output);

        #結束執行,回傳shell 1.
        exit(1);

        }#if end

#儲存lib path
$folderOfUsrLib=$output[0];

#以該檔案的實際位置的 lib path 為 include path 首位
$output=array();
exec("cd ".escapeshellarg(pathinfo(__FILE__)["dirname"]."/../".$folderOfUsrLib."/qbpwcf").";pwd;",$output,$status);

#如果執行失敗
if($status!==0){

        #debug
        var_dump(__LINE__,$output);

        #結束執行,回傳shell 1.
        exit(1);

        }#if end

#設置 include path 
set_include_path($output[0].PATH_SEPARATOR.get_include_path());

#匯入外部套件
include("allInOne.php");

#檢查參數
if($_SERVER["argc"]!==2){
        
        #印出用法&結束執行
        echo "usage:".PHP_EOL;
        echo __FILE__ ."socket addr".PHP_EOL;
        exit;
        
        }#if end

#取得sock位置
$sock=$_SERVER["argv"][1];

#函式說明:
#重複連線到 unixDomainSockServer 提供的 unix domain socket, 避免其 listen timeout, 並清除餘時的連線.
#回傳結果:
#$result["status"],"true"代表執行正常;"false"代表執行不正常.
#$result["error"],錯誤訊息陣列.
#$result["function"],當前執行的函式名稱.
#必填參數:
#$conf["sock"],字串,要連線的unix domain socket.
$conf["sock"]=$sock;
$keepAliveUnixDomainSockConnection=sock::keepAliveUnixDomainSockConnection($conf);
unset($conf);

#如果執行失敗
if($keepAliveUnixDomainSockConnection["status"]==="false"){
        
        #印出結果
        var_dump($keepAliveUnixDomainSockConnection);
        
        #結束執行
        exit;
        
        }#if end

?>