Subversion Repositories qbpwcf-lib(archive)

Rev

Rev 835 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
787 liveuser 1
<?php
2
 
3
/*
4
 
5
        QBPWCF, Quick Build PHP website Component base on Fedora Linux.
6
    Copyright (C) 2015~2024 Min-Jhin,Chen
7
 
8
    This file is part of QBPWCF.
9
 
10
    QBPWCF is free software: you can redistribute it and/or modify
11
    it under the terms of the GNU General Public License as published by
12
    the Free Software Foundation, either version 3 of the License, or
13
    (at your option) any later version.
14
 
15
    QBPWCF is distributed in the hope that it will be useful,
16
    but WITHOUT ANY WARRANTY; without even the implied warranty of
17
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18
    GNU General Public License for more details.
19
 
20
    You should have received a copy of the GNU General Public License
21
    along with QBPWCF.  If not, see <http://www.gnu.org/licenses/>.
22
 
23
*/
24
 
25
#使用命名空間qbpwcf
26
namespace qbpwcf;
27
 
28
#匯入套件
29
require_once("qbpwcf/allInOne.php");
30
 
31
#建議的log位置
32
$logFile=$_SERVER["DOCUMENT_ROOT"].$_SERVER["PHP_SELF"].".log";
33
 
34
#要使用的範例name
35
$nameOfSample="window.qbpwcf.clientFile";
36
$nameOfSample="window.qbpwcf.clientFile user candeled";
37
$nameOfSample="window.qbpwcf.openWindow";
835 liveuser 38
$nameOfSample="window.qbpwcf.ws";
836 liveuser 39
$nameOfSample="window.qbpwcf.ws-20250104";
787 liveuser 40
 
835 liveuser 41
#函式說明:
42
#抓取命令列的參數.
43
#回傳結果:
44
#$result["status"],執行是否正常,"true"代表正常,"false"代表不正常.
45
#$reuslt["error"],執行不正常結束的錯訊息陣列.
46
#$result["function"],當前執行的函式名稱.
47
#$result["argu"],使用的參數陣列.
48
#$result["content"],要回傳的參數陣列.
49
#$result["count"],參數的數量.
50
#$result["_GET"],收到的 HTTP GET 參數陣列.
51
#$result["_POST"],收到的 HTTP POST 參數陣列.
52
#必填參數:
53
#無
54
#可省略參數:
55
#$conf["echo"],字串,"true"代表要將抓到的參數一個個印出來,"false"代表用回傳的方式,預設為"false".
56
#$conf["echo"]="false";
57
#$conf["httpGetToArgu"],字串,"true"代表要將 http get 參數變成參數來取得,像是 $_GET["p1"] 會變成 $result["content"]["p1"] 回傳,預設為"false"代表不使用.
58
$conf["httpGetToArgu"]="true";
59
#$conf["httpPostToArgu"],字串,"true"代表要將 http post 參數變成參數來取得,像是 $_POST["p1"] 會變成 $result["content"]["p1"] 回傳,預設為"false"代表不使用.
60
$conf["httpPostToArgu"]="true";
61
#參考資料:
62
#無.
63
#備註:
64
#無.
65
$getArgu=cmd::getArgu($conf);
66
unset($conf);
67
 
68
#如果執行失敗
69
if($getArgu["status"]==="false"){
70
 
71
	#函式說明:
72
	#撰寫log
73
	#回傳結果:
74
	#$result["status"],狀態,"true"或"false".
75
	#$result["error"],錯誤訊息陣列.
76
	#$result["function"],當前函式的名稱.
77
	#$result["argu"],使用的參數.
78
	#必填參數:
79
	#$conf["path"],字串,log檔案的路徑與名稱.
80
	$conf["path"]=$logFile;
81
	#$conf["content"],any,要寫的內容,若內容不為字串則會用var_dump的格式寫入.
82
	$conf["content"]=$getArgu;
83
	#$conf["fileArgu"],字串,php變數__FILE__的內容,亦即該檔案在檔案系統的絕對路徑
84
	$conf["fileArgu"]=__FILE__;
85
	#可省略參數:
86
	#$conf["rewrite"],預設為"false",接續寫入;反之"true"代表重新寫入.
87
	#$conf["rewrite"]="false";
88
	#參考資料:
89
	#無.
90
	#備註:
91
	#無.
92
	$record=logs::record($conf);
93
	unset($conf);
94
 
95
	#如果寫log失敗
96
	if($record["status"]==="false"){
97
 
98
		#印出結果
99
		var_dump($record);
100
 
101
		}#if end
102
 
103
	#結束執行,回傳錯誤代碼1
104
	exit(1);
105
 
106
	}#if end
107
 
108
#如果有指定參數
836 liveuser 109
if($getArgu["count"]>0){
835 liveuser 110
 
111
	#預設第2個參數為 $nameOfSample 的指定數值
836 liveuser 112
	$nameOfSample=$getArgu["content"][0];
835 liveuser 113
 
114
	}#if end
115
 
787 liveuser 116
#存放範例的資料夾
117
$sampleFolder="javaScript::qbpwcfJavaScript";
118
 
119
#設置測試案例的檔案名稱與路徑
120
$fileNameOfSample=$sampleFolder."/".$nameOfSample.".php";
121
 
122
#初始化儲存範例代碼
123
$samples=array();
124
 
125
#增加 javaScript::qbpwcfJavaScript 的範例資訊
126
$samples[]=array("name"=>"window.qbpwcf.clientFile","comnent"=>"test window.qbpwcf.clientFile");
127
$samples[]=array("name"=>"window.qbpwcf.clientFile user candeled","comment"=>"test user canceled");
128
$samples[]=array("name"=>"window.qbpwcf.openWindow","comment"=>"test write content feature of window.qbpwcf.openWindow");
835 liveuser 129
$samples[]=array("name"=>"window.qbpwcf.ws","comment"=>"test window.qbpwcf.ws");
836 liveuser 130
$samples[]=array("name"=>"window.qbpwcf.ws-20250104","comment"=>"test window.qbpwcf.ws");
787 liveuser 131
 
132
#針對每個範例資訊
133
foreach($samples as $sample){
134
 
135
	#如果找到對應的範例
136
	if($sample["name"]===$nameOfSample){
137
 
138
		#如果存放範例的資料夾不存在
139
		if(!file_exists($sampleFolder)){
140
 
141
			#提示訊息
142
			echo "存放範例的資料夾(".$sampleFolder.")不存在".PHP_EOL;
143
 
144
			#結束執行,並回傳1給shell
145
			exit(1);
146
 
147
			}#if end
148
 
149
		#如果對應的範例檔案不存在
150
		if(!file_exists($fileNameOfSample)){
151
 
152
			#提示訊息
153
			echo "範例檔案(".$fileNameOfSample.")不存在".PHP_EOL;
154
 
155
			#結束執行,並回傳1給shell
156
			exit(1);
157
 
158
			}#if end
159
 
160
		#匯入範例
161
		require_once($fileNameOfSample);
162
 
163
		#結束執行
164
		exit;
165
 
166
		}#if end
167
 
168
	}#foreach end
169
 
170
#執行到這邊代表沒有對應的範例
171
 
172
#提示範例不存在
173
echo "範例(".$nameOfSample.")不存在".PHP_EOL;
174
 
175
#結束執行,並回傳1給shell
176
exit(1);
177
 
178
?>