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

Revision 5522, 9.9 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/bkup/";
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    fwrite($fp, $csv_data);
142    fclose($fp);
143   
144   
145   
146   
147   
148}
149
150// Á´¥Æ¡¼¥Ö¥ë¥ê¥¹¥È¤ò¼èÆÀ¤¹¤ë
151function lfGetTableList(){
152    $objQuery = new SC_Query();
153   
154    if(DB_TYPE == "pgsql"){
155        $sql = "SELECT tablename FROM pg_tables where tableowner = ? ORDER BY tablename ; ";
156        $arrRet = $objQuery->getAll($sql, array(DB_USER));
157        $arrRet = sfSwapArray($arrRet);
158        $arrRet = $arrRet['tablename'];
159    }else if(DB_TYPE == "mysql"){
160       
161    }
162   
163    return $arrRet;
164}
165
166// ¥Æ¡¼¥Ö¥ë¹½À®¤ò¼èÆÀ¤¹¤ë
167function lfGetColumnList($table_name){
168    $objQuery = new SC_Query();
169
170    if(DB_TYPE == "pgsql"){
171        $sql = "SELECT
172                    a.attname, t.typname, a.attnotnull, d.adsrc as defval, a.atttypmod, a.attnum as fldnum, e.description
173                FROM
174                    pg_class c,
175                    pg_type t,
176                    pg_attribute a left join pg_attrdef d on (a.attrelid=d.adrelid and a.attnum=d.adnum)
177                                   left join pg_description e on (a.attrelid=e.objoid and a.attnum=e.objsubid)
178                WHERE (c.relname=?) AND (c.oid=a.attrelid) AND (a.atttypid=t.oid) AND a.attnum > 0
179                ORDER BY fldnum";
180        $arrRet = $objQuery->getAll($sql, array($table_name));
181    }
182   
183    return sfswaparray($arrRet);
184
185}
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200// ¹¹¿·¥Õ¥¡¥¤¥ë¤Î¼èÆÀ
201function lfCopyUpdateFile($val) {
202    global $objPage;
203   
204    $src_path = sfRmDupSlash(UPDATE_HTTP . $val . ".txt");
205    $dst_path = sfRmDupSlash(ROOT_DIR . $val);
206    $flg_ok = true; // ½èÍý¤ÎÀ®¸ùȽÄê
207   
208    $src_fp = @fopen($src_path, "rb");
209   
210    if(!$src_fp) {
211        sfErrorHeader(">> " . $src_path . "¤Î¼èÆÀ¤Ë¼ºÇÔ¤·¤Þ¤·¤¿¡£");
212        $flg_ok = false;
213    } else {
214        // ¥Õ¥¡¥¤¥ë¤ò¤¹¤Ù¤ÆÆɤ߹þ¤à
215        $contents = '';
216        while (!feof($src_fp)) {
217            $contents .= fread($src_fp, 1024);
218        }
219        fclose($src_fp);
220       
221        // ¥Ç¥£¥ì¥¯¥È¥êºîÀ®¤ò»î¤ß¤ë
222        lfMakeDirectory($dst_path);
223        // ¥Õ¥¡¥¤¥ë½ñ¹þ¤ß       
224        $dst_fp = @fopen($dst_path, "wb");
225        if(!$dst_fp) {
226            sfErrorHeader(">> " . $dst_path . "¤ò¥ª¡¼¥×¥ó¤Ç¤­¤Þ¤»¤ó¡£");
227            $flg_ok = false;
228        } else {
229            fwrite($dst_fp, $contents);
230            fclose($dst_fp);
231        }
232    }
233   
234    if($flg_ok) {
235        $objPage->update_mess.= ">> " . $dst_path . "¡§¥³¥Ô¡¼À®¸ù<br>";
236    } else {
237        $objPage->update_mess.= ">> " . $dst_path . "¡§¥³¥Ô¡¼¼ºÇÔ<br>";     
238    }
239   
240    return $flg_ok;
241}
242
243// ¤¹¤Ù¤Æ¤Î¥Ñ¥¹¤Î¥Ç¥£¥ì¥¯¥È¥ê¤òºîÀ®¤¹¤ë
244function lfMakeDirectory($path) {
245    $pos = 0;
246    $cnt = 0;               // ̵¸Â¥ë¡¼¥×Âкö
247    $len = strlen($path);   // ̵¸Â¥ë¡¼¥×Âкö
248   
249    while($cnt <= $len) {
250        $pos = strpos($path, "/", $pos);
251        // ¤³¤³¤Ç¤ÎȽÄê¤Ï¡¢Åù¹æ3¤Ä¤ò»ÈÍÑ
252        if($pos === false) {
253            // ¥¹¥é¥Ã¥·¥å¤¬¸«¤Ä¤«¤é¤Ê¤¤¾ì¹ç¤Ï¥ë¡¼¥×¤«¤éÈ´¤±¤ë
254            break;
255        }
256        $pos++; // ʸ»úȯ¸«°ÌÃÖ¤ò°ìʸ»ú¿Ê¤á¤ë
257        $dir = substr($path, 0, $pos);
258       
259        // ¤¹¤Ç¤Ë¸ºß¤¹¤ë¤«¤É¤¦¤«Ä´¤Ù¤ë
260        if(!file_exists($dir)) {
261            mkdir($dir);
262        }
263        $cnt++; // ̵¸Â¥ë¡¼¥×Âкö
264    }
265}
266
267// ¹¹¿·¾ðÊó¤òºÇ¿·¤Ë¤¹¤ë
268function lfLoadUpdateList() {
269    $objQuery = new SC_Query();
270    $path = UPDATE_HTTP . "update.txt";
271    $fp = @fopen($path, "rb");
272   
273    if(!$fp) {
274        sfErrorHeader(">> " . $path . "¤Î¼èÆÀ¤Ë¼ºÇÔ¤·¤Þ¤·¤¿¡£");
275    } else {
276        while (!feof($fp)) {
277            $arrCSV = fgetcsv($fp, UPDATE_CSV_LINE_MAX);
278            // ¥«¥é¥à¿ô¤¬Àµ¾ï¤Ç¤¢¤Ã¤¿¾ì¹ç¤Î¤ß
279            if(count($arrCSV) == UPDATE_CSV_COL_MAX) {
280                // ¼èÆÀ¤·¤¿¥¢¥Ã¥×¥Ç¡¼¥È¾ðÊó¤òDB¤Ë½ñ¤­¹þ¤à
281                $sqlval['module_id'] = $arrCSV[0];
282                $sqlval['module_name'] = $arrCSV[1];
283                $sqlval['latest_version'] = $arrCSV[3];
284                $sqlval['module_explain'] = $arrCSV[4];
285                $sqlval['main_php'] = $arrCSV[5];
286                $sqlval['extern_php'] = $arrCSV[6];
287                $sqlval['install_sql'] = $arrCSV[7];
288                $sqlval['uninstall_sql'] = $arrCSV[8];             
289                $sqlval['other_files'] = $arrCSV[9];
290                $sqlval['del_flg'] = $arrCSV[10];
291                $sqlval['update_date'] = "now()";
292                $sqlval['release_date'] = $arrCSV[12];
293                // ´û¸¥ì¥³¡¼¥É¤Î¥Á¥§¥Ã¥¯
294                $cnt = $objQuery->count("dtb_update", "module_id = ?", array($sqlval['module_id']));
295                if($cnt > 0) {
296                    // ¤¹¤Ç¤Ë¼èÆÀ¤µ¤ì¤Æ¤¤¤ë¾ì¹ç¤Ï¹¹¿·¤¹¤ë¡£
297                    $objQuery->update("dtb_update", $sqlval, "module_id = ?", array($sqlval['module_id']));
298                } else {
299                    // ¿·µ¬¥ì¥³¡¼¥É¤ÎÄɲÃ
300                    $sqlval['create_date'] = "now()";
301                    $objQuery->insert("dtb_update", $sqlval);
302                }
303            }
304        }
305        fclose($fp);
306    }
307}
308
309// ¥¤¥ó¥¹¥È¡¼¥ë½èÍý
310function lfInstallModule() {
311    global $objPage;
312   
313    $objQuery = new SC_Query();
314    $arrRet = $objQuery->select("module_id, extern_php, other_files, install_sql, latest_version", "dtb_update", "module_id = ?", array($_POST['module_id']));
315    $flg_ok = true; // ½èÍý¤ÎÀ®¸ùȽÄê
316   
317    if(count($arrRet) > 0) {
318        $arrFiles = array();
319        if($arrRet[0]['other_files'] != "") {
320            $arrFiles = split("\|", $arrRet[0]['other_files']);
321        }
322        $arrFiles[] = $arrRet[0]['extern_php'];
323        foreach($arrFiles as $val) {
324            // ¹¹¿·¥Õ¥¡¥¤¥ë¤Î¼èÆÀ
325            $ret=lfCopyUpdateFile($val);
326            if(!$ret) {
327                $flg_ok = false;
328            }
329        }
330    } else {
331        sfErrorHeader(">> Âоݤε¡Ç½¤Ï¡¢ÇÛÉÛ¤ò½ªÎ»¤·¤Æ¤ª¤ê¤Þ¤¹¡£");
332        $flg_ok = false;
333    }
334   
335    // ɬÍפÊSQLʸ¤Î¼Â¹Ô
336    if($arrRet[0]['install_sql'] != "") {
337        // SQLʸ¼Â¹Ô¡¢¥Ñ¥é¡¼¥á¡¼¥¿¤Ê¤·¡¢¥¨¥é¡¼Ìµ»ë
338        $arrInstallSql = split(";",$arrRet[0]['install_sql']);
339        foreach($arrInstallSql as $key => $val){
340            if (trim($val) != ""){
341                $ret = $objQuery->query(trim($val),"",true);
342            }
343        }
344        if(DB::isError($ret)) {
345            // ¥¨¥é¡¼Ê¸¤ò¼èÆÀ¤¹¤ë
346            ereg("\[(.*)\]", $ret->userinfo, $arrKey);
347            $objPage->update_mess.=">> ¥Æ¡¼¥Ö¥ë¹½À®¤ÎÊѹ¹¤Ë¼ºÇÔ¤·¤Þ¤·¤¿¡£<br>";
348            $objPage->update_mess.= $arrKey[0] . "<br>";
349            $flg_ok = false;
350        } else {
351            $objPage->update_mess.=">> ¥Æ¡¼¥Ö¥ë¹½À®¤ÎÊѹ¹¤ò¹Ô¤¤¤Þ¤·¤¿¡£<br>";
352        }
353    }
354   
355    if($flg_ok) {
356        $sqlval['now_version'] = $arrRet[0]['latest_version'];
357        $sqlval['update_date'] = "now()";
358        $objQuery->update("dtb_update", $sqlval, "module_id = ?", array($arrRet[0]['module_id']));
359    }
360}
361
362// ¥¢¥ó¥¤¥ó¥¹¥È¡¼¥ë½èÍý
363function lfUninstallModule() {
364    global $objPage;
365   
366    $objQuery = new SC_Query();
367    $arrRet = $objQuery->select("module_id, extern_php, other_files, install_sql, uninstall_sql, latest_version", "dtb_update", "module_id = ?", array($_POST['module_id']));
368    $flg_ok = true; // ½èÍý¤ÎÀ®¸ùȽÄê
369   
370    if(count($arrRet) > 0) {
371        $arrFiles = array();
372        if($arrRet[0]['other_files'] != "") {
373            $arrFiles = split("\|", $arrRet[0]['other_files']);
374        }
375        $arrFiles[] = $arrRet[0]['extern_php'];
376        foreach($arrFiles as $val) {
377            $path = ROOT_DIR . $val;
378            if(file_exists($path)) {
379                // ¥Õ¥¡¥¤¥ë¤òºï½ü¤¹¤ë
380                if(unlink($path)) {
381                    $objPage->update_mess.= ">> " . $path . "¡§ºï½üÀ®¸ù<br>";
382                } else {
383                    $objPage->update_mess.= ">> " . $path . "¡§ºï½ü¼ºÇÔ<br>";
384                }
385            }
386        }
387       
388        // ɬÍפÊSQLʸ¤Î¼Â¹Ô
389        if($arrRet[0]['uninstall_sql'] != "") {
390            // SQLʸ¼Â¹Ô¡¢¥Ñ¥é¡¼¥á¡¼¥¿¤Ê¤·¡¢¥¨¥é¡¼Ìµ»ë
391            $ret = $objQuery->query($arrRet[0]['uninstall_sql'],"",true);
392            if(DB::isError($ret)) {
393                // ¥¨¥é¡¼Ê¸¤ò¼èÆÀ¤¹¤ë
394                ereg("\[(.*)\]", $ret->userinfo, $arrKey);
395                $objPage->update_mess.=">> ¥Æ¡¼¥Ö¥ë¹½À®¤ÎÊѹ¹¤Ë¼ºÇÔ¤·¤Þ¤·¤¿¡£<br>";
396                $objPage->update_mess.= $arrKey[0] . "<br>";
397                $flg_ok = false;
398            } else {
399                $objPage->update_mess.=">> ¥Æ¡¼¥Ö¥ë¹½À®¤ÎÊѹ¹¤ò¹Ô¤¤¤Þ¤·¤¿¡£<br>";
400            }
401        }       
402    } else {
403        sfErrorHeader(">> Âоݤε¡Ç½¤Ï¡¢ÇÛÉÛ¤ò½ªÎ»¤·¤Æ¤ª¤ê¤Þ¤¹¡£");
404    }
405   
406    if($flg_ok) {
407        // ¥Ð¡¼¥¸¥ç¥ó¾ðÊó¤òºï½ü¤¹¤ë¡£
408        $sqlval['now_version'] = "";
409        $sqlval['update_date'] = "now()";
410        $objQuery->update("dtb_update", $sqlval, "module_id = ?", array($arrRet[0]['module_id']));
411    }
412}
413
414
415?>
Note: See TracBrowser for help on using the repository browser.