source: temp/trunk/html/admin/system/bkup.php @ 5532

Revision 5532, 10.0 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
2require_once("../require.php");
3
4//¥Ú¡¼¥¸´ÉÍý¥¯¥é¥¹
5class LC_Page {
6    //¥³¥ó¥¹¥È¥é¥¯¥¿
7    function LC_Page() {
8        //¥á¥¤¥ó¥Æ¥ó¥×¥ì¡¼¥È¤Î»ØÄê
9        $this->tpl_mainpage = 'system/bkup.tpl';
10        $this->tpl_subnavi = 'system/subnavi.tpl';
11        $this->tpl_mainno = 'system';       
12        $this->tpl_subno = 'bkup';
13        $this->tpl_subtitle = '¥Ð¥Ã¥¯¥¢¥Ã¥×´ÉÍý';
14       
15//      $this->bkup_dir = ROOT_DIR . USER_DIR . "bkup/";
16        $this->bkup_dir = ROOT_DIR . "test/bkup/";
17    }
18}
19
20$objPage = new LC_Page();
21$objView = new SC_AdminView();
22$objQuery = new SC_Query();
23
24// ¥»¥Ã¥·¥ç¥ó¥¯¥é¥¹
25$objSess = new SC_Session();
26// ǧ¾Ú²ÄÈݤÎȽÄê
27sfIsSuccess($objSess);
28
29switch($_POST['mode']) {
30// ¥Ð¥Ã¥¯¥¢¥Ã¥×¤òºîÀ®¤¹¤ë
31case 'bkup':
32    // ¥¨¥é¡¼¥Á¥§¥Ã¥¯
33    $arrErr = lfCheckError($_POST);
34
35    // ¥¨¥é¡¼¤¬¤Ê¤±¤ì¤Ð¥Ð¥Ã¥¯¥¢¥Ã¥×½èÍý¤ò¹Ô¤¦   
36    if (count($arrErr) <= 0) {
37        // ¥Ð¥Ã¥¯¥¢¥Ã¥×¥Õ¥¡¥¤¥ëºîÀ®
38        lfCreateBkupData();
39       
40        // DB¤Ë¥Ç¡¼¥¿¹¹¿·
41       
42    }
43   
44
45    break;
46   
47// ¥¤¥ó¥¹¥È¡¼¥ë
48case 'install':
49    // ¹¹¿·¾ðÊó¤òºÇ¿·¤Ë¤¹¤ë
50    lfLoadUpdateList();
51    // ¥â¥¸¥å¡¼¥ë·´¤Î¥¤¥ó¥¹¥È¡¼¥ë
52    lfInstallModule();
53    break;
54// ¥¢¥ó¥¤¥ó¥¹¥È¡¼¥ë
55case 'uninstall':
56    // ¹¹¿·¾ðÊó¤òºÇ¿·¤Ë¤¹¤ë
57    lfLoadUpdateList();
58    // ¥â¥¸¥å¡¼¥ë·´¤Î¥¤¥ó¥¹¥È¡¼¥ë   
59    lfUninstallModule();
60    break;
61default:
62    break;
63}
64
65// ¥Æ¥ó¥×¥ì¡¼¥È¥Õ¥¡¥¤¥ë¤ËÅϤ¹¥Ç¡¼¥¿¤ò¥»¥Ã¥È
66$objPage->arrErr = $arrErr;
67
68$objView->assignobj($objPage);      //ÊÑ¿ô¤ò¥Æ¥ó¥×¥ì¡¼¥È¤Ë¥¢¥µ¥¤¥ó¤¹¤ë
69$objView->display(MAIN_FRAME);      //¥Æ¥ó¥×¥ì¡¼¥È¤Î½ÐÎÏ
70
71//-------------------------------------------------------------------------------------------------------
72
73// ¥¨¥é¡¼¥Á¥§¥Ã¥¯
74function lfCheckError($array){
75    $objErr = new SC_CheckError($array);
76   
77    $objErr->doFunc(array("¥Ð¥Ã¥¯¥¢¥Ã¥×̾", "bkup_name", STEXT_LEN), array("EXIST_CHECK","MAX_LENGTH_CHECK"));
78   
79    return $objErr->arrErr;
80}
81
82// ¥Ð¥Ã¥¯¥¢¥Ã¥×¥Õ¥¡¥¤¥ëºîÀ®
83function lfCreateBkupData(){
84    global $objPage;
85    $objQuery = new SC_Query();
86    $csv_data = "";
87    $bkup_dir = $objPage->bkup_dir;
88   
89    // Á´¥Æ¡¼¥Ö¥ë¼èÆÀ
90    $arrTableList = lfGetTableList();
91   
92    // ³Æ¥Æ¡¼¥Ö¥ë¾ðÊó¤ò¼èÆÀ¤¹¤ë
93    foreach($arrTableList as $key => $val){
94       
95        // ¥Æ¡¼¥Ö¥ë¹½À®¤ò¼èÆÀ
96        $arrColumnList = lfGetColumnList($val);
97       
98        // ¥Æ¡¼¥Ö¥ë¹½À®¤ÎCSV½ÐÎϥǡ¼¥¿À¸À®
99       
100       
101        // Á´¥Ç¡¼¥¿¤ò¼èÆÀ
102        $arrData = $objQuery->getAll("SELECT * FROM $val");
103
104        // CSV¥Ç¡¼¥¿À¸À®
105        if (count($arrData) > 0) {
106           
107            // ¥«¥é¥à¤òCSV·Á¼°¤ËÀ°¤¨¤ë
108            $arrKyes = sfGetCommaList(array_keys($arrData[0]), false);
109           
110            // ¥Ç¡¼¥¿¤òCSV·Á¼°¤ËÀ°¤¨¤ë
111            $data = "";
112            foreach($arrData as $data_key => $data_val){
113                $data .= sfGetCSVList($arrData[$data_key]);
114            }
115           
116            // CSV½ÐÎϥǡ¼¥¿À¸À®
117            $csv_data .= $val . "\n";
118            $csv_data .= $arrKyes . "\n";
119            $csv_data .= $data;
120            $csv_data .= "\n";
121        }   
122    }
123   
124    $bkup_dir = ROOT_DIR . "test/";
125   
126   
127    // CSV½ÐÎÏ
128    // ¥Ç¥£¥ì¥¯¥È¥ê¤¬Â¸ºß¤·¤Æ¤¤¤Ê¤±¤ì¤ÐºîÀ®¤¹¤ë     
129    if (!is_dir(dirname($bkup_dir))) {
130        $ret = mkdir(dirname($bkup_dir));
131       
132        if ($ret) {
133            sfprintr("À®¸ù");
134        }else{
135            sfprintr("¼ºÇÔ");
136        }
137    sfprintr($bkup_dir);
138       
139    }
140    $fp = fopen($bkup_dir . "test" . '.csv',"w");
141    if($fp) {
142        $ret = fwrite($fp, $csv_data);
143       
144        if (!$ret) {
145            sfprintr("½ñ¤­¹þ¤ß¼ºÇÔ");
146        }else{
147            sfprintr("½ñ¤­¹þ¤ßÀ®¸ù");
148        }
149        fclose($fp);
150    }
151   
152   
153    gfPrintLog("test");
154   
155   
156   
157   
158}
159
160// Á´¥Æ¡¼¥Ö¥ë¥ê¥¹¥È¤ò¼èÆÀ¤¹¤ë
161function lfGetTableList(){
162    $objQuery = new SC_Query();
163   
164    if(DB_TYPE == "pgsql"){
165        $sql = "SELECT tablename FROM pg_tables where tableowner = ? ORDER BY tablename ; ";
166        $arrRet = $objQuery->getAll($sql, array(DB_USER));
167        $arrRet = sfSwapArray($arrRet);
168        $arrRet = $arrRet['tablename'];
169    }else if(DB_TYPE == "mysql"){
170       
171    }
172   
173    return $arrRet;
174}
175
176// ¥Æ¡¼¥Ö¥ë¹½À®¤ò¼èÆÀ¤¹¤ë
177function lfGetColumnList($table_name){
178    $objQuery = new SC_Query();
179
180    if(DB_TYPE == "pgsql"){
181        $sql = "SELECT
182                    a.attname, t.typname, a.attnotnull, d.adsrc as defval, a.atttypmod, a.attnum as fldnum, e.description
183                FROM
184                    pg_class c,
185                    pg_type t,
186                    pg_attribute a left join pg_attrdef d on (a.attrelid=d.adrelid and a.attnum=d.adnum)
187                                   left join pg_description e on (a.attrelid=e.objoid and a.attnum=e.objsubid)
188                WHERE (c.relname=?) AND (c.oid=a.attrelid) AND (a.atttypid=t.oid) AND a.attnum > 0
189                ORDER BY fldnum";
190        $arrRet = $objQuery->getAll($sql, array($table_name));
191    }
192   
193    return sfswaparray($arrRet);
194
195}
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210// ¹¹¿·¥Õ¥¡¥¤¥ë¤Î¼èÆÀ
211function lfCopyUpdateFile($val) {
212    global $objPage;
213   
214    $src_path = sfRmDupSlash(UPDATE_HTTP . $val . ".txt");
215    $dst_path = sfRmDupSlash(ROOT_DIR . $val);
216    $flg_ok = true; // ½èÍý¤ÎÀ®¸ùȽÄê
217   
218    $src_fp = @fopen($src_path, "rb");
219   
220    if(!$src_fp) {
221        sfErrorHeader(">> " . $src_path . "¤Î¼èÆÀ¤Ë¼ºÇÔ¤·¤Þ¤·¤¿¡£");
222        $flg_ok = false;
223    } else {
224        // ¥Õ¥¡¥¤¥ë¤ò¤¹¤Ù¤ÆÆɤ߹þ¤à
225        $contents = '';
226        while (!feof($src_fp)) {
227            $contents .= fread($src_fp, 1024);
228        }
229        fclose($src_fp);
230       
231        // ¥Ç¥£¥ì¥¯¥È¥êºîÀ®¤ò»î¤ß¤ë
232        lfMakeDirectory($dst_path);
233        // ¥Õ¥¡¥¤¥ë½ñ¹þ¤ß       
234        $dst_fp = @fopen($dst_path, "wb");
235        if(!$dst_fp) {
236            sfErrorHeader(">> " . $dst_path . "¤ò¥ª¡¼¥×¥ó¤Ç¤­¤Þ¤»¤ó¡£");
237            $flg_ok = false;
238        } else {
239            fwrite($dst_fp, $contents);
240            fclose($dst_fp);
241        }
242    }
243   
244    if($flg_ok) {
245        $objPage->update_mess.= ">> " . $dst_path . "¡§¥³¥Ô¡¼À®¸ù<br>";
246    } else {
247        $objPage->update_mess.= ">> " . $dst_path . "¡§¥³¥Ô¡¼¼ºÇÔ<br>";     
248    }
249   
250    return $flg_ok;
251}
252
253// ¤¹¤Ù¤Æ¤Î¥Ñ¥¹¤Î¥Ç¥£¥ì¥¯¥È¥ê¤òºîÀ®¤¹¤ë
254function lfMakeDirectory($path) {
255    $pos = 0;
256    $cnt = 0;               // ̵¸Â¥ë¡¼¥×Âкö
257    $len = strlen($path);   // ̵¸Â¥ë¡¼¥×Âкö
258   
259    while($cnt <= $len) {
260        $pos = strpos($path, "/", $pos);
261        // ¤³¤³¤Ç¤ÎȽÄê¤Ï¡¢Åù¹æ3¤Ä¤ò»ÈÍÑ
262        if($pos === false) {
263            // ¥¹¥é¥Ã¥·¥å¤¬¸«¤Ä¤«¤é¤Ê¤¤¾ì¹ç¤Ï¥ë¡¼¥×¤«¤éÈ´¤±¤ë
264            break;
265        }
266        $pos++; // ʸ»úȯ¸«°ÌÃÖ¤ò°ìʸ»ú¿Ê¤á¤ë
267        $dir = substr($path, 0, $pos);
268       
269        // ¤¹¤Ç¤Ë¸ºß¤¹¤ë¤«¤É¤¦¤«Ä´¤Ù¤ë
270        if(!file_exists($dir)) {
271            mkdir($dir);
272        }
273        $cnt++; // ̵¸Â¥ë¡¼¥×Âкö
274    }
275}
276
277// ¹¹¿·¾ðÊó¤òºÇ¿·¤Ë¤¹¤ë
278function lfLoadUpdateList() {
279    $objQuery = new SC_Query();
280    $path = UPDATE_HTTP . "update.txt";
281    $fp = @fopen($path, "rb");
282   
283    if(!$fp) {
284        sfErrorHeader(">> " . $path . "¤Î¼èÆÀ¤Ë¼ºÇÔ¤·¤Þ¤·¤¿¡£");
285    } else {
286        while (!feof($fp)) {
287            $arrCSV = fgetcsv($fp, UPDATE_CSV_LINE_MAX);
288            // ¥«¥é¥à¿ô¤¬Àµ¾ï¤Ç¤¢¤Ã¤¿¾ì¹ç¤Î¤ß
289            if(count($arrCSV) == UPDATE_CSV_COL_MAX) {
290                // ¼èÆÀ¤·¤¿¥¢¥Ã¥×¥Ç¡¼¥È¾ðÊó¤òDB¤Ë½ñ¤­¹þ¤à
291                $sqlval['module_id'] = $arrCSV[0];
292                $sqlval['module_name'] = $arrCSV[1];
293                $sqlval['latest_version'] = $arrCSV[3];
294                $sqlval['module_explain'] = $arrCSV[4];
295                $sqlval['main_php'] = $arrCSV[5];
296                $sqlval['extern_php'] = $arrCSV[6];
297                $sqlval['install_sql'] = $arrCSV[7];
298                $sqlval['uninstall_sql'] = $arrCSV[8];             
299                $sqlval['other_files'] = $arrCSV[9];
300                $sqlval['del_flg'] = $arrCSV[10];
301                $sqlval['update_date'] = "now()";
302                $sqlval['release_date'] = $arrCSV[12];
303                // ´û¸¥ì¥³¡¼¥É¤Î¥Á¥§¥Ã¥¯
304                $cnt = $objQuery->count("dtb_update", "module_id = ?", array($sqlval['module_id']));
305                if($cnt > 0) {
306                    // ¤¹¤Ç¤Ë¼èÆÀ¤µ¤ì¤Æ¤¤¤ë¾ì¹ç¤Ï¹¹¿·¤¹¤ë¡£
307                    $objQuery->update("dtb_update", $sqlval, "module_id = ?", array($sqlval['module_id']));
308                } else {
309                    // ¿·µ¬¥ì¥³¡¼¥É¤ÎÄɲÃ
310                    $sqlval['create_date'] = "now()";
311                    $objQuery->insert("dtb_update", $sqlval);
312                }
313            }
314        }
315        fclose($fp);
316    }
317}
318
319// ¥¤¥ó¥¹¥È¡¼¥ë½èÍý
320function lfInstallModule() {
321    global $objPage;
322   
323    $objQuery = new SC_Query();
324    $arrRet = $objQuery->select("module_id, extern_php, other_files, install_sql, latest_version", "dtb_update", "module_id = ?", array($_POST['module_id']));
325    $flg_ok = true; // ½èÍý¤ÎÀ®¸ùȽÄê
326   
327    if(count($arrRet) > 0) {
328        $arrFiles = array();
329        if($arrRet[0]['other_files'] != "") {
330            $arrFiles = split("\|", $arrRet[0]['other_files']);
331        }
332        $arrFiles[] = $arrRet[0]['extern_php'];
333        foreach($arrFiles as $val) {
334            // ¹¹¿·¥Õ¥¡¥¤¥ë¤Î¼èÆÀ
335            $ret=lfCopyUpdateFile($val);
336            if(!$ret) {
337                $flg_ok = false;
338            }
339        }
340    } else {
341        sfErrorHeader(">> Âоݤε¡Ç½¤Ï¡¢ÇÛÉÛ¤ò½ªÎ»¤·¤Æ¤ª¤ê¤Þ¤¹¡£");
342        $flg_ok = false;
343    }
344   
345    // ɬÍפÊSQLʸ¤Î¼Â¹Ô
346    if($arrRet[0]['install_sql'] != "") {
347        // SQLʸ¼Â¹Ô¡¢¥Ñ¥é¡¼¥á¡¼¥¿¤Ê¤·¡¢¥¨¥é¡¼Ìµ»ë
348        $arrInstallSql = split(";",$arrRet[0]['install_sql']);
349        foreach($arrInstallSql as $key => $val){
350            if (trim($val) != ""){
351                $ret = $objQuery->query(trim($val),"",true);
352            }
353        }
354        if(DB::isError($ret)) {
355            // ¥¨¥é¡¼Ê¸¤ò¼èÆÀ¤¹¤ë
356            ereg("\[(.*)\]", $ret->userinfo, $arrKey);
357            $objPage->update_mess.=">> ¥Æ¡¼¥Ö¥ë¹½À®¤ÎÊѹ¹¤Ë¼ºÇÔ¤·¤Þ¤·¤¿¡£<br>";
358            $objPage->update_mess.= $arrKey[0] . "<br>";
359            $flg_ok = false;
360        } else {
361            $objPage->update_mess.=">> ¥Æ¡¼¥Ö¥ë¹½À®¤ÎÊѹ¹¤ò¹Ô¤¤¤Þ¤·¤¿¡£<br>";
362        }
363    }
364   
365    if($flg_ok) {
366        $sqlval['now_version'] = $arrRet[0]['latest_version'];
367        $sqlval['update_date'] = "now()";
368        $objQuery->update("dtb_update", $sqlval, "module_id = ?", array($arrRet[0]['module_id']));
369    }
370}
371
372// ¥¢¥ó¥¤¥ó¥¹¥È¡¼¥ë½èÍý
373function lfUninstallModule() {
374    global $objPage;
375   
376    $objQuery = new SC_Query();
377    $arrRet = $objQuery->select("module_id, extern_php, other_files, install_sql, uninstall_sql, latest_version", "dtb_update", "module_id = ?", array($_POST['module_id']));
378    $flg_ok = true; // ½èÍý¤ÎÀ®¸ùȽÄê
379   
380    if(count($arrRet) > 0) {
381        $arrFiles = array();
382        if($arrRet[0]['other_files'] != "") {
383            $arrFiles = split("\|", $arrRet[0]['other_files']);
384        }
385        $arrFiles[] = $arrRet[0]['extern_php'];
386        foreach($arrFiles as $val) {
387            $path = ROOT_DIR . $val;
388            if(file_exists($path)) {
389                // ¥Õ¥¡¥¤¥ë¤òºï½ü¤¹¤ë
390                if(unlink($path)) {
391                    $objPage->update_mess.= ">> " . $path . "¡§ºï½üÀ®¸ù<br>";
392                } else {
393                    $objPage->update_mess.= ">> " . $path . "¡§ºï½ü¼ºÇÔ<br>";
394                }
395            }
396        }
397       
398        // ɬÍפÊSQLʸ¤Î¼Â¹Ô
399        if($arrRet[0]['uninstall_sql'] != "") {
400            // SQLʸ¼Â¹Ô¡¢¥Ñ¥é¡¼¥á¡¼¥¿¤Ê¤·¡¢¥¨¥é¡¼Ìµ»ë
401            $ret = $objQuery->query($arrRet[0]['uninstall_sql'],"",true);
402            if(DB::isError($ret)) {
403                // ¥¨¥é¡¼Ê¸¤ò¼èÆÀ¤¹¤ë
404                ereg("\[(.*)\]", $ret->userinfo, $arrKey);
405                $objPage->update_mess.=">> ¥Æ¡¼¥Ö¥ë¹½À®¤ÎÊѹ¹¤Ë¼ºÇÔ¤·¤Þ¤·¤¿¡£<br>";
406                $objPage->update_mess.= $arrKey[0] . "<br>";
407                $flg_ok = false;
408            } else {
409                $objPage->update_mess.=">> ¥Æ¡¼¥Ö¥ë¹½À®¤ÎÊѹ¹¤ò¹Ô¤¤¤Þ¤·¤¿¡£<br>";
410            }
411        }       
412    } else {
413        sfErrorHeader(">> Âоݤε¡Ç½¤Ï¡¢ÇÛÉÛ¤ò½ªÎ»¤·¤Æ¤ª¤ê¤Þ¤¹¡£");
414    }
415   
416    if($flg_ok) {
417        // ¥Ð¡¼¥¸¥ç¥ó¾ðÊó¤òºï½ü¤¹¤ë¡£
418        $sqlval['now_version'] = "";
419        $sqlval['update_date'] = "now()";
420        $objQuery->update("dtb_update", $sqlval, "module_id = ?", array($arrRet[0]['module_id']));
421    }
422}
423
424
425?>
Note: See TracBrowser for help on using the repository browser.