source: temp/trunk/html/admin/contents/csv_sql.php @ 4408

Revision 4408, 11.4 KB checked in by kakinaka, 20 years ago (diff)

blank
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
Line 
1<?php
2
3require_once("../../require.php");
4require_once(ROOT_DIR."data/include/csv_output.inc");
5
6class LC_Page {
7    var $arrForm;
8    var $arrHidden;
9
10    function LC_Page() {
11        $this->tpl_mainpage = 'contents/csv_sql.tpl';
12        $this->tpl_subnavi = 'contents/subnavi.tpl';
13        $this->tpl_subno = 'csv';
14        $this->tpl_subno_csv = 'csv_sql';
15        $this->tpl_mainno = "contents";
16        $this->tpl_subtitle = 'CSV½ÐÎÏÀßÄê';
17    }
18}
19
20$objPage = new LC_Page();
21$objView = new SC_AdminView();
22
23$objPage->arrSubnavi = $arrSubnavi;
24$objPage->arrSubnaviName = $arrSubnaviName;
25
26// ǧ¾Ú²ÄÈݤÎȽÄê
27$objSess = new SC_Session();
28sfIsSuccess($objSess);
29
30// SQL_ID¤Î¼èÆÀ
31if ($_POST['sql_id'] != "") {
32    $sql_id = $_POST['sql_id'];
33}elseif($_GET['sql_id'] != ""){
34    $sql_id = $_GET['sql_id'];
35}else{
36    $sql_id = "";
37}
38
39$mode = $_POST['mode'];
40
41switch($_POST['mode']) {
42    // ¥Ç¡¼¥¿¤ÎÅÐÏ¿
43    case "confirm":
44        // ¥¨¥é¡¼¥Á¥§¥Ã¥¯
45        $objPage->arrErr = lfCheckError($_POST);
46       
47        if (count($objPage->arrErr) <= 0){
48            // ¥Ç¡¼¥¿¤Î¹¹¿·
49            $sql_id = lfUpdData($sql_id, $_POST);
50            // ´°Î»¥á¥Ã¥»¡¼¥¸É½¼¨
51            $objPage->tpl_onload = "alert('ÅÐÏ¿¤¬´°Î»¤·¤Þ¤·¤¿¡£');";
52        }
53        break;
54   
55    // ³Îǧ²èÌÌ
56    case "preview":
57        // SQLʸɽ¼¨
58        $sql = "SELECT \n" . $_POST['sql'];
59        $objPage->sql = $sql;
60       
61        // ¥¨¥é¡¼É½¼¨
62        $objErrMsg = lfCheckSQL($_POST);
63        if ($objErrMsg != "") {
64            $errMsg = $objErrMsg->message . "\n" . $objErrMsg->userinfo;
65        }
66       
67        $objPage->sqlerr = $errMsg;
68
69        $objPage->objView = $objView;
70       
71        // ²èÌ̤Îɽ¼¨
72        $objView->assignobj($objPage);
73        $objView->display('contents/csv_sql_view.tpl');
74        exit;
75        break;
76
77    // ¿·µ¬ºîÀ®
78    case "new_page":
79        header("location: ./csv_sql.php");
80        break;
81       
82    // ¥Ç¡¼¥¿ºï½ü
83    case "delete":
84        lfDelData($sql_id);
85        header("location: ./csv_sql.php");
86        break;
87       
88    case "csv_output":
89        // CSV½ÐÎϥǡ¼¥¿¼èÆÀ
90        $arrCsvData = lfGetSqlList(" WHERE sql_id = ?", array($_POST['csv_output_id']));
91       
92        $objQuery = new SC_Query();
93        $arrCsvOutputData = $objQuery->getall("SELECT " . $arrCsvData[0]['sql']);
94       
95        if (count($arrCsvOutputData) > 0) {
96           
97            $arrKey = array_keys(sfSwapArray($arrCsvOutputData));
98            foreach($arrKey as $data) {
99                if ($i != 0) $header .= ", ";
100                $header .= $data;
101                $i ++;
102            }
103            $header .= "\n";
104
105            $data = lfGetCSVData($arrCsvOutputData, $arrKey);
106            // CSV½ÐÎÏ
107            sfCSVDownload($header.$data);
108            exit;
109        break;
110        }else{
111            $objPage->tpl_onload = "alert('½ÐÎϥǡ¼¥¿¤¬¤¢¤ê¤Þ¤»¤ó¡£');";
112            $sql_id = "";
113            $_POST="";
114        }
115        break;
116}
117
118// mode ¤¬ confirm °Ê³°¤Î¤È¤­¤Ï´°Î»¥á¥Ã¥»¡¼¥¸¤Ï½ÐÎϤ·¤Ê¤¤
119if ($mode != "confirm" and $mode != "csv_output") {
120    $objPage->tpl_onload = "";
121}
122
123// ÅÐÏ¿ºÑ¤ßSQL°ìÍ÷¼èÆÀ
124$arrSqlList = lfGetSqlList();
125
126// ÊÔ½¸ÍÑSQL¥Ç¡¼¥¿¤Î¼èÆÀ
127if ($sql_id != "") {
128    $arrSqlData = lfGetSqlList(" WHERE sql_id = ?", array($sql_id));
129}
130
131// ¥Æ¡¼¥Ö¥ë°ìÍ÷¤ò¼èÆÀ¤¹¤ë
132$arrTableList = lfGetTableList();
133$arrTableList = sfSwapArray($arrTableList);
134
135// ¸½ºßÁªÂò¤µ¤ì¤Æ¤¤¤ë¥Æ¡¼¥Ö¥ë¤ò¼èÆÀ¤¹¤ë
136if ($_POST['selectTable'] == ""){
137    $selectTable = $arrTableList['relname'][0];
138}else{
139    $selectTable = $_POST['selectTable'];
140}
141
142// ¥«¥é¥à°ìÍ÷¤ò¼èÆÀ¤¹¤ë
143$arrColList = lfGetColumnList($selectTable);
144$arrColList =  sfSwapArray($arrColList);
145
146// ¥Æ¥ó¥×¥ì¡¼¥È¤Ë½ÐÎϤ¹¤ë¥Ç¡¼¥¿¤ò¥»¥Ã¥È
147$objPage->arrSqlList = $arrSqlList;                                                             // SQL°ìÍ÷
148$objPage->arrTableList = sfarrCombine($arrTableList['relname'], $arrTableList['description']);  // ¥Æ¡¼¥Ö¥ë°ìÍ÷
149$objPage->arrColList = sfarrCombine($arrColList['attname'],$arrColList['description']);         // ¥«¥é¥à°ìÍ÷
150$objPage->selectTable = $selectTable;                                                           // ÁªÂò¤µ¤ì¤Æ¤¤¤ë¥Æ¡¼¥Ö¥ë
151$objPage->sql_id = $sql_id;                                                                     // ÁªÂò¤µ¤ì¤Æ¤¤¤ëSQL
152
153// POST¤µ¤ì¤¿¥Ç¡¼¥¿¤ò¥»¥Ã¥È¤¹¤ë
154if (count($_POST) > 0) {
155    $arrSqlData[0]['name'] = $_POST['name'];
156    $arrSqlData[0]['sql'] = $_POST['sql'];
157}
158$objPage->arrSqlData = $arrSqlData[0];                                                          // ÁªÂò¤µ¤ì¤Æ¤¤¤ëSQL¥Ç¡¼¥¿
159
160// ²èÌ̤Îɽ¼¨
161$objView->assignobj($objPage);
162$objView->display(MAIN_FRAME);
163
164//---------------------------------------------------------------------------------------------------------------------------------------------------------
165/**************************************************************************************************************
166 * ´Ø¿ô̾   ¡§lfGetTableList
167 * ½èÍýÆâÍÆ ¡§¥Æ¡¼¥Ö¥ë°ìÍ÷¤ò¼èÆÀ¤¹¤ë
168 * °ú¿ô     ¡§¤Ê¤·
169 * Ìá¤êÃÍ ¡¡¡§¼èÆÀ·ë²Ì
170 **************************************************************************************************************/
171function lfGetTableList(){
172    $objQuery = new SC_Query();
173    $arrRet = array();      // ·ë²Ì¼èÆÀÍÑ
174   
175    $sql = "";
176    $sql .= " SELECT";
177    $sql .= "     c.relname ,";
178    $sql .= "     c.relname || ':' ||obj_description(c.oid) as description";
179    $sql .= " FROM";
180    $sql .= "     pg_class c,";
181    $sql .= "     pg_user u";
182    $sql .= " WHERE";
183    $sql .= "     c.relowner = u.usesysid AND";
184    $sql .= "     relname IN (SELECT";
185    $sql .= "                     tablename";
186    $sql .= "                 FROM";
187    $sql .= "                     pg_tables";
188    $sql .= "                 WHERE";
189    $sql .= "                     tableowner=? ";
190    $sql .= "                 )";
191    $sql .= " ORDER BY c.relname ";
192    $arrRet = $objQuery->getAll($sql, array(DB_USER));
193   
194    return $arrRet;
195}
196
197
198/**************************************************************************************************************
199 * ´Ø¿ô̾   ¡§lfGetColunmList
200 * ½èÍýÆâÍÆ ¡§¥Æ¡¼¥Ö¥ë¤Î¥«¥é¥à°ìÍ÷¤ò¼èÆÀ¤¹¤ë
201 * °ú¿ô     ¡§$selectTable¡§¥Æ¡¼¥Ö¥ë̾¾Î
202 * Ìá¤êÃÍ ¡¡¡§¼èÆÀ·ë²Ì
203 **************************************************************************************************************/
204function lfGetColumnList($selectTable){
205    $objQuery = new SC_Query();
206    $arrRet = array();      // ·ë²Ì¼èÆÀÍÑ
207   
208    $sql = "";
209    $sql .= " SELECT";
210    $sql .= "     a.attname,";
211    $sql .= "     a.attnum as fldnum, ";
212    $sql .= "     (select case count(description) when 0 then a.attname else (select a.attname || ':' || description from pg_description where a.attrelid=objoid and a.attnum=objsubid ) end from pg_description where a.attrelid=objoid and a.attnum=objsubid ) as description ";
213    $sql .= " FROM";
214    $sql .= "     pg_class c,";
215    $sql .= "         pg_attribute a left join pg_description e on (a.attrelid=e.objoid and a.attnum=e.objsubid) ";
216    $sql .= " ";
217    $sql .= " WHERE";
218    $sql .= "     (c.relname=?) AND";
219    $sql .= "     (c.oid=a.attrelid) AND";
220    $sql .= "     a.attnum > 0";
221    $sql .= " ORDER BY";
222    $sql .= "     fldnum";
223    $sql .= " ";
224    $arrRet = $objQuery->getAll($sql, array($selectTable));
225
226    return $arrRet;
227   
228}
229
230/**************************************************************************************************************
231 * ´Ø¿ô̾   ¡§lfGetSqlList
232 * ½èÍýÆâÍÆ ¡§ÅÐÏ¿ºÑ¤ßSQL°ìÍ÷¤ò¼èÆÀ¤¹¤ë
233 * °ú¿ô1    ¡§$where¡§Where¶ç
234 * °ú¿ô2    ¡§$arrData¡§¹Ê¤ê¹þ¤ß¥Ç¡¼¥¿
235 * Ìá¤êÃÍ ¡¡¡§¼èÆÀ·ë²Ì
236 **************************************************************************************************************/
237function lfGetSqlList($where = "" , $arrData = array()){
238    $objQuery = new SC_Query();
239    $arrRet = array();      // ·ë²Ì¼èÆÀÍÑ
240   
241    $sql = "";
242    $sql .= " SELECT";
243    $sql .= "     sql_id,";
244    $sql .= "     name,";
245    $sql .= "     sql,";
246    $sql .= "     update_date,";
247    $sql .= "     create_date";
248    $sql .= " FROM";
249    $sql .= "     dtb_csv_sql";
250   
251    // Where¶ç¤Î»ØÄ꤬¤¢¤ì¤Ð·ë¹ç¤¹¤ë
252    if ($where != "") {
253        $sql .= " $where ";
254    }else{
255        $sql .= " ORDER BY sql_id ";
256    }
257    $sql .= " ";
258
259    // ¥Ç¡¼¥¿¤ò°ú¿ô¤ÇÅϤµ¤ì¤Æ¤¤¤ë¾ì¹ç¤Ë¤Ï¥»¥Ã¥È¤¹¤ë
260    if (count($arrData) > 0) {
261        $arrRet = $objQuery->getall($sql, $arrData);
262    }else{
263        $arrRet = $objQuery->getall($sql);
264    }
265
266    return $arrRet;
267   
268}
269
270/**************************************************************************************************************
271 * ´Ø¿ô̾   ¡§lfUpdCsvOutput
272 * ½èÍýÆâÍÆ ¡§ÆþÎϹàÌܤΥ¨¥é¡¼¥Á¥§¥Ã¥¯¤ò¹Ô¤¦
273 * °ú¿ô     ¡§POST¥Ç¡¼¥¿
274 * ÌáÃÍ     ¡§¥¨¥é¡¼ÆâÍÆ
275 **************************************************************************************************************/
276function lfCheckError($data){
277    $objErr = new SC_CheckError();
278    $objErr->doFunc( array("̾¾Î", "name"), array("EXIST_CHECK") );
279    $objErr->doFunc( array("SQLʸ", "sql"), array("EXIST_CHECK") );
280   
281    // SQL¤ÎÂÅÅöÀ­¥Á¥§¥Ã¥¯
282    if ($objErr->arrErr['sql'] == "") {
283        $objsqlErr = lfCheckSQL($data);
284        if ($objsqlErr != "") {
285            $objErr->arrErr["sql"] = "SQLʸ¤¬ÉÔÀµ¤Ç¤¹¡£SQLʸ¤ò¸«Ä¾¤·¤Æ¤¯¤À¤µ¤¤";
286        }
287    }
288   
289    return $objErr->arrErr;
290
291}
292
293/**************************************************************************************************************
294 * ´Ø¿ô̾   ¡§lfCheckSQL
295 * ½èÍýÆâÍÆ ¡§ÆþÎϤµ¤ì¤¿SQLʸ¤¬Àµ¤·¤¤¤«¥Á¥§¥Ã¥¯¤ò¹Ô¤¦
296 * °ú¿ô     ¡§POST¥Ç¡¼¥¿
297 * ÌáÃÍ     ¡§¥¨¥é¡¼ÆâÍÆ
298 **************************************************************************************************************/
299function lfCheckSQL($data){
300    $err = "";
301    $objDbConn = new SC_DbConn();
302    $sql = "SELECT " . $data['sql'] . " ";
303    $ret = $objDbConn->conn->query($sql);
304    if ($objDbConn->conn->isError($ret)){
305        $err = $ret;
306    }
307   
308    return $err;
309}
310
311function lfprintr($data){
312    print_r($data);
313}
314
315/**************************************************************************************************************
316 * ´Ø¿ô̾   ¡§lfUpdData
317 * ½èÍýÆâÍÆ ¡§DB¤Ë¥Ç¡¼¥¿¤òÊݸ¤¹¤ë
318 * °ú¿ô1    ¡§$sql_idŽ¥Ž¥Ž¥¹¹¿·¤¹¤ë¥Ç¡¼¥¿¤ÎSQL_ID
319 * °ú¿ô2    ¡§$arrDataŽ¥Ž¥Ž¥¹¹¿·¥Ç¡¼¥¿
320 * Ìá¤êÃÍ   ¡§$sql_id:SQL_ID¤òÊÖ¤¹
321 **************************************************************************************************************/
322function lfUpdData($sql_id = "", $arrData = array()){
323    $objQuery = new SC_Query();     // DBÁàºî¥ª¥Ö¥¸¥§¥¯¥È
324    $sql = "";                      // ¥Ç¡¼¥¿¼èÆÀSQLÀ¸À®ÍÑ
325    $arrRet = array();              // ¥Ç¡¼¥¿¼èÆÀÍÑ(¹¹¿·È½Äê)
326    $arrVal = array();              // ¥Ç¡¼¥¿¹¹¿·
327
328    // sql_id ¤¬»ØÄꤵ¤ì¤Æ¤¤¤ë¾ì¹ç¤Ë¤ÏUPDATE
329    if ($sql_id != "") {
330        // ¸ºß¥Á¥§¥Ã¥¯
331        $arrSqlData = lfGetSqlList(" WHERE sql_id = ?", array($sql_id));
332        if (count($arrSqlData) > 0) {
333            // ¥Ç¡¼¥¿¹¹¿·
334            $sql = "UPDATE dtb_csv_sql SET name = ?, sql = ?, update_date = now() WHERE sql_id = ? ";
335            $arrVal= array($arrData['name'], $arrData['sql'], $sql_id);
336        }else{
337            // ¥Ç¡¼¥¿¤Î¿·µ¬ºîÀ®
338            $sql_id = "";
339            $sql = "INSERT INTO dtb_csv_sql (name, sql) values (?, ?) ";
340            $arrVal= array($arrData['name'], $arrData['sql']);
341           
342        }
343    }else{
344        // ¥Ç¡¼¥¿¤Î¿·µ¬ºîÀ®
345        $sql = "INSERT INTO dtb_csv_sql (name, sql) values (?, ?) ";
346        $arrVal= array($arrData['name'], $arrData['sql']);
347    }
348    // SQL¼Â¹Ô 
349    $arrRet = $objQuery->query($sql,$arrVal);
350   
351    // ¿·µ¬ºîÀ®»þ¤Ï$sql_id¤ò¼èÆÀ
352    if ($sql_id == "") {
353        $arrNewData = lfGetSqlList(" ORDER BY create_date DESC");
354        $sql_id = $arrNewData[0]['sql_id'];
355    }
356   
357    return $sql_id;
358}
359
360
361/**************************************************************************************************************
362 * ´Ø¿ô̾   ¡§lfDelData
363 * ½èÍýÆâÍÆ ¡§¥Ç¡¼¥¿¤òºï½ü¤¹¤ë
364 * °ú¿ô1    ¡§$sql_idŽ¥Ž¥Ž¥ºï½ü¤¹¤ë¥Ç¡¼¥¿¤ÎSQL_ID
365 * Ìá¤êÃÍ   ¡§¼Â¹Ô·ë²Ì¡¡TRUE¡§À®¸ù FALSE¡§¼ºÇÔ
366 **************************************************************************************************************/
367function lfDelData($sql_id = ""){
368    $objQuery = new SC_Query();     // DBÁàºî¥ª¥Ö¥¸¥§¥¯¥È
369    $sql = "";                      // ¥Ç¡¼¥¿¼èÆÀSQLÀ¸À®ÍÑ
370    $Ret = false;                   // ¼Â¹Ô·ë²Ì
371
372    // sql_id ¤¬»ØÄꤵ¤ì¤Æ¤¤¤ë¾ì¹ç¤Î¤ß¼Â¹Ô
373    if ($sql_id != "") {
374        // ¥Ç¡¼¥¿¤Îºï½ü
375        $sql = "DELETE FROM dtb_csv_sql WHERE sql_id = ? ";
376        // SQL¼Â¹Ô 
377        $ret = $objQuery->query($sql,array($sql_id));
378    }else{
379        $ret = false;
380    }
381
382    // ·ë²Ì¤òÊÖ¤¹
383    return $ret;
384}
385
386
387//---- CSV½ÐÎÏÍѥǡ¼¥¿¼èÆÀ
388function lfGetCSVData( $array, $arrayIndex){   
389    for ($i=0; $i<count($array); $i++){
390        for ($j=0; $j<count($array[$i]); $j++ ){
391            if ( $j > 0 ) $return .= ",";
392            $return .= "\"";           
393            if ( $arrayIndex ){
394                $return .= mb_ereg_replace("<","¡ã",mb_ereg_replace( "\"","\"\"",$array[$i][$arrayIndex[$j]] )) ."\""; 
395            } else {
396                $return .= mb_ereg_replace("<","¡ã",mb_ereg_replace( "\"","\"\"",$array[$i][$j] )) ."\"";
397            }
398        }
399        $return .= "\n";           
400    }
401   
402    return $return;
403}
404
Note: See TracBrowser for help on using the repository browser.