source: trunk/Modules/Admin/Admin.php

Last change on this file was 894, checked in by chronos, 3 years ago
  • Fixed: Export error due to PHP 8.1 deprecated code.
  • Modified: Code cleanup.
File size: 14.0 KB
Line 
1<?php
2
3class ModuleAdmin extends Module
4{
5 function __construct(System $System)
6 {
7 parent::__construct($System);
8 $this->Name = 'Admin';
9 $this->Version = '1.0';
10 $this->Creator = 'Chronos';
11 $this->License = 'GNU/GPL';
12 $this->Description = 'Administrator section of the web';
13 $this->Dependencies = array('Translation');
14 }
15
16 function DoStart(): void
17 {
18 Core::Cast($this->System)->RegisterMenuItem(array(
19 'Title' => T('Administration'),
20 'Hint' => T('Administration tools'),
21 'Link' => $this->System->Link('/admin/'),
22 'Permission' => LICENCE_ADMIN,
23 'Icon' => '',
24 ));
25 $this->System->RegisterPage(['admin'], 'PageAdmin');
26 }
27}
28
29class PageAdmin extends Page
30{
31 function ShowMenu()
32 {
33 $Output = '<h3>'.T('Administration tools').'</h3>';
34
35 $Output .= '<br />'.
36 '<a href="https://'.Core::Cast($this->System)->Config['Web']['Host'].'/phpmyadmin/">'.T('Database management').'</a><br/>'.
37 '<small>Rozhraní phpMyAdmin pro přímou správu databáze</small><br/><br/>'.
38 '<a href="'.$this->System->Link('/import/').'">'.T('Text import').'</a><br/>'.
39 '<small>Načtení zdrojových textů do databáze</small><br/><br/>'.
40 '<a href="'.$this->System->Link('/log/').'">'.T('Event log').'</a><br/>'.
41 '<small>Procházení všech systémových záznamů akcí a událostí</small><br/><br/>'.
42 '<a href="'.$this->System->Link('/admin/?action=testing').'">'.T('Testing').'</a><br/>'.
43 '<small>Testovací funkce</small><br/><br/>'.
44 '<a href="'.$this->System->Link('/admin/?action=locale').'">'.T('Export of the web interface translation').'</a><br/>'.
45 '<small>Exportovat texty z PHP souborů pro překlad rozhraní</small><br/><br/>'.
46 '<a href="'.$this->System->Link('/admin/?action=uncomplete').'">Nastavit nekompletní texty</a><br/>'.
47 '<small>Nastaví questy, které jsou v popisu nebo objektu stejné jako nedokončené</small><br/><br/>'.
48 '<a href="'.$this->System->Link('/admin/?action=repairversion').'">Opravit špatně nastavené VersionEnd</a><br/>'.
49 '<small>Nastaví špatné version end a Take na originální text, které vzniklo v důsledku importu a špatně indexovaného indexu Take</small><br/><br/>'.
50 '<a href="'.$this->System->Link('/admin/?action=dbcstructure').'">Připravit dbc strukturu</a><br/>'.
51 '<small>Otevře dbc soubory převedené do textové formy pro přípravu struktury pro import</small><br/><br/>'.
52 '<a href="'.$this->System->Link('/admin/?action=merge').'">Sjednocení textů</a><br/>'.
53 '<small>Sjednotí stejné originální texty v databázi</small><br/><br/>';
54 return $Output;
55 }
56
57 function TestError($P1, $P2)
58 {
59 $s = $TT[0];
60 }
61
62 function TestException($P1, $P2)
63 {
64 throw new Exception('Test exception');
65 }
66
67 function TestSQLError($Query)
68 {
69 $DbResult = $this->System->Database->query($Query);
70 }
71
72 function ShowPHPInfo()
73 {
74 return phpinfo();
75 }
76
77 function Testing()
78 {
79 $this->Title = T('Testing');
80 $Output = '<a href="'.$this->System->Link('/admin/?action=phpinfo').'">PHP info</a><br/>'.
81 '<small>PHP informace</small><br/><br/>'.
82 '<a href="'.$this->System->Link('/admin/?action=error').'">Testovací chyba</a><br/>'.
83 '<small>Vyvolá testovací chybu</small><br/><br/>'.
84 '<a href="'.$this->System->Link('/admin/?action=exception').'">Testovací výjimka</a><br/>'.
85 '<small>Vyvolá testovací chybu</small><br/><br/>'.
86 '<a href="'.$this->System->Link('/admin/?action=sqlerror').'">Chybný SQL dotaz</a><br/>'.
87 '<small>Vyvolá testovací chybu</small><br/><br/>';
88 return $Output;
89 }
90
91 function Uncomplete()
92 {
93 $DbResult = $this->System->Database->query('SELECT `gs_tran`.`ID`,`gs_tran`.`Details`,`gs_tran`.`Objectives` FROM '
94 .'`TextQuest` AS `gs_tran` '
95 .'JOIN `TextQuest` AS `gs_orig` ON `gs_orig`.`Entry` = `gs_tran`.`Entry` '
96 .'AND `gs_orig`.`Language` =0 '
97 .'WHERE `gs_tran`.`Language` !=0 '
98 .'AND `gs_tran`.`Complete` =1 '
99 .'AND ( (`gs_tran`.`Details` = `gs_orig`.`Details` AND "" != `gs_orig`.`Details` )'
100 .' OR ( `gs_tran`.`Objectives` != `gs_orig`.`Objectives` AND "" = `gs_tran`.`Objectives` )'
101 .' OR ( `gs_tran`.`Details` != `gs_orig`.`Details` AND "" = `gs_tran`.`Details` )'
102 .' OR (`gs_tran`.`Objectives` = `gs_orig`.`Objectives` AND "" != `gs_orig`.`Objectives` ))'
103 );
104 $Output = 'Questy: <br />';
105 while ($quest = $DbResult->fetch_assoc())
106 {
107 $Output .= $quest['ID'].', ';
108 $this->System->Database->query('UPDATE `TextQuest` SET `complete` = 0 WHERE ID='.$quest['ID']);
109 }
110 $Output .= '<br / ><br / >Questy nastaveny jako nedokončené!';
111 return $Output;
112 }
113
114 function RepairVersionEnd()
115 {
116 $TranslationTree = ModuleTranslation::Cast($this->System->ModuleManager->GetModule('Translation'))->GetTranslationTree();
117
118 $Output = '';
119 foreach ($TranslationTree as $Group)
120 // $Group = $TranslationTree[1];
121 {
122
123 $sql = 'SELECT `T`.`ID`,`T`.`Take`,`sub1`.`ID` as `origID`,T.`VersionStart`,T.`VersionEnd`,`sub1`.`VersionStart` as OrigStart,sub1.`VersionEnd` as `OrigEnd` FROM `'.$Group['TablePrefix'] .'` as `T` '.
124 ' JOIN `'.$Group['TablePrefix'].'` as `sub1` ON `sub1`.`Language` = 0 AND `T`.`Entry` = `sub1`.`Entry` AND `T`.`VersionStart` = `sub1`.`VersionStart` '.
125 ' WHERE `T`.`Take` != `sub1`.`ID` AND `T`.`Language` != 0'.
126 // ' WHERE `T`.`Language` != 0 AND `T`.`VersionEnd` != `sub1`.`VersionEnd` AND `T`.`Take` NOT IN'.
127 // '(Select `ID` FROM `'.$Group['TablePrefix'].'` as `sub2` WHERE `sub2`.`Language` = 0 AND `T`.`Entry` = `sub2`.`Entry` AND `T`.`VersionStart` = `sub2`.`VersionStart`)'.
128 ' '; //LIMIT 1000
129 $DbResult = $this->System->Database->query($sql);
130 echo ': <br />'.$Group['TablePrefix'].': <br />';
131 while ($line = $DbResult->fetch_assoc())
132 {
133 echo ($line['ID'].', ');
134 $this->System->Database->query('UPDATE `'.$Group['TablePrefix'].'` SET `VersionEnd` = '.
135 $line['OrigEnd'].', `Take` = '.$line['origID'].' WHERE ID='.$line['ID']);
136 }
137 echo '<br / >Verze '.$Group['TablePrefix'].' opraveny!';
138 }
139 return 'Hotovo!';
140 }
141
142 function StripText($Text)
143 {
144 $Text = strtolower($Text);
145 $Text = str_replace(' ', '', $Text);
146 return $Text;
147 }
148
149 function MergeSameText()
150 {
151 $TranslationTree = ModuleTranslation::Cast($this->System->ModuleManager->GetModule('Translation'))->GetTranslationTree();
152
153 $Output = '';
154 foreach ($TranslationTree as $Group)
155 // $Group = $TranslationTree[1];
156 {
157
158 $sql = 'SELECT * FROM `'.$Group['TablePrefix'] .'` as `T` '.
159 // ' JOIN `'.$Group['TablePrefix'].'` as `sub1` ON `sub1`.`Language` = 0 AND `T`.`Entry` = `sub1`.`Entry` AND `T`.`VersionStart` < `sub1`.`VersionStart` '.
160 ' WHERE `T`.`Language` = 0 '.
161 ' ORDER BY `T`.`VersionStart`'; //LIMIT 1000
162 $DbResult = $this->System->Database->query($sql);
163 echo ': <br />'.$Group['TablePrefix'].': ';
164 while ($line = $DbResult->fetch_assoc())
165 {
166 $sql = 'SELECT * FROM `'.$Group['TablePrefix'] .'` as `T` '.
167 ' WHERE `T`.`Language` = 0 AND `T`.`VersionStart` > '.$line['VersionEnd'].' AND `T`.`Entry` = '.$line['Entry'].
168 ' ORDER BY `T`.`VersionStart` LIMIT 1'; //LIMIT 1000
169 $DbResult2 = $this->System->Database->query($sql);
170 if ($DbResult2->num_rows > 0)
171 {
172 $line2 = $DbResult2->fetch_assoc();
173
174 $Same = true;
175 foreach ($TranslationTree[$Group['Id']]['Items'] as $Column)
176 {
177 if ($this->StripText($line[$Column['Column']]) <> $this->StripText($line2[$Column['Column']]))
178 $Same = false;
179 }
180 if ($Same)
181 {
182 echo $line['ID'].'='.$line2['ID'].' (';
183 // $this->System->Database->query('UPDATE `'.$Group['TablePrefix'].'` SET `Take` = NULL WHERE ID='.$line2['ID']);
184
185 $sql = 'SELECT * FROM `'.$Group['TablePrefix'] .'` as `T` '.
186 ' WHERE `T`.`Entry` = '.$line['Entry'].' AND (`T`.`Take` = '.$line['ID'].' OR `T`.`Take` = '.$line2['ID'].') ';
187 $DbResult3 = $this->System->Database->query($sql);
188 while ($line3 = $DbResult3->fetch_assoc())
189 {
190 echo $line3['ID'].' ';
191 $this->System->Database->query('UPDATE `'.$Group['TablePrefix'].'` SET `VersionEnd` = '.$line2['VersionEnd'].', `VersionStart` = '.$line['VersionStart'].', `Take` = '.$line['ID'].' WHERE ID='.$line3['ID']);
192 }
193
194 $this->System->Database->query('DELETE FROM`'.$Group['TablePrefix'].'` WHERE ID='.$line2['ID']);
195 $this->System->Database->query('UPDATE `'.$Group['TablePrefix'].'` SET `VersionEnd` = '.$line2['VersionEnd'].' WHERE ID='.$line['ID']);
196 echo '), ';
197 }
198 }
199 }
200 echo('Texty '.$Group['TablePrefix'].' sjednoceny!');
201 }
202 return 'Hotovo!';
203 }
204
205 function DbcStructure()
206 {
207 $TranslationTree = ModuleTranslation::Cast($this->System->ModuleManager->GetModule('Translation'))->GetTranslationTree();
208
209 $Output = '';
210 if (array_key_exists('GameVersion', $_GET))
211 {
212 $_SESSION['GameVersion'] = $_GET['GameVersion'];
213 }
214 if (!array_key_exists('GameVersion', $_SESSION))
215 $_SESSION['GameVersion'] = Core::Cast($this->System)->Config['Web']['GameVersion'];
216
217 $Output .= '<br />Nastavená verze: '.$_SESSION['GameVersion'].'<br />';
218
219 if (array_key_exists('GroupItem', $_GET)) {
220 $DbResult = $this->System->Database->query('SELECT * FROM `ClientVersion` WHERE `Version` = "'.$_SESSION['GameVersion'].'"');
221 $Version = $DbResult->fetch_assoc();
222 $this->System->Database->query('INSERT INTO `GroupItemDBC` (`Id` ,`ClientVersion` ,`GroupItem` ,`ColumnIndex`)VALUES (NULL , \''.$Version['Id'].'\', \''.$_GET['GroupItem'].'\', \''.$_GET['ColumnIndex'].'\')');
223 $Output .= 'vloženo <br />';
224 }
225 if (array_key_exists('id', $_GET))
226 {
227 $Group = $TranslationTree[$_GET['id']];
228 // $Output .= '<form action="?action=dbcstructure&amp;id='.$Group['Id'].'">';
229 // foreach ($Group['Items'] as $GroupItem)
230 // {
231 // $Output .= $GroupItem['Column'].': <input name="'.$GroupItem['Id'].'"><br />';
232 // }
233 // $Output .= '<input type="submit" value="uložit"></form>';
234
235 $FileName = NormalizePath(dirname(__FILE__).'/../source/'.$_SESSION['GameVersion'].'/dbc/'.$Group['DBCFileName'].'.dbc.csv');
236 $File = new FileStream();
237 $File->OpenFile($FileName);
238
239 //while (!$File->EOF())
240
241 $Output .= '<table class="BaseTable">';
242 $Output .= '<tr><td>';
243 $Line = $File->ReadLine();
244
245 for ($i = 0; $i < substr_count($Line, ','); $i++)
246 {
247 $Output .= $i;
248 $Output .= '</td><td>';
249 }
250 $Output .= '</td></tr><tr><td>';
251 for ($i = 0; $i < substr_count($Line, ','); $i++)
252 {
253 foreach ($Group['Items'] as $GroupItem)
254 {
255 $Output .= ' <a href="'.$this->System->Link('/admin/?action=dbcstructure&amp;id='.
256 $Group['Id'].'&amp;GroupItem='.$GroupItem['Id'].'&amp;ColumnIndex='.$i).'">'.
257 $GroupItem['Column'].'</a><br/>';
258 }
259 $Output .= '</td><td>';
260 }
261
262 $Output .= '</td></tr><tr><td>';
263
264 $Output .= str_replace(',', '</td><td>', $Line);
265 $Output .= '</td></tr><tr><td>';
266 for ($i = 0; $i < 50; $i++)
267 {
268 $Line = $File->ReadLine();
269 $Output .= str_replace(',', '</td><td>', $Line);
270 $Output .= '</td></tr><tr><td>';
271 }
272
273 $Output .= '</td></tr>';
274 $Output .= '</table>';
275 } else
276 {
277 $DbResult = $this->System->Database->query('SELECT * FROM `ClientVersion`');
278 while ($Version = $DbResult->fetch_assoc())
279 {
280 $Output .= '<a href="'.$this->System->Link('/admin/?action=dbcstructure&amp;GameVersion='.
281 $Version['Version']).'">'.$Version['Version'].'</a> ';
282 }
283 $Output .= '<br /><br />';
284
285 foreach ($TranslationTree as $Group)
286 {
287 if ($Group['DBCFileName'] <> '')
288 $Output .= '<a href="'.$this->System->Link('/admin/?action=dbcstructure&amp;id='.
289 $Group['Id']).'">'.$Group['DBCFileName'].'</a><br/>';
290 }
291 }
292 return $Output;
293 }
294
295 function ShowLocale()
296 {
297 Core::Cast($this->System)->LocaleManager->UpdateAll(dirname(dirname(__FILE__)));
298 $Output = 'Překlad rozhraní přegenerován';
299 $Output .= '<table class="BaseTable"><tr><th>Originál</th><th>Překlad</th></tr>';
300 foreach (Core::Cast($this->System)->LocaleManager->CurrentLocale->Texts->Data as $Index => $Item)
301 $Output .= '<tr><td>'.$Index.'</td><td>'.$Item.'</td></tr>';
302 $Output .= '</table>';
303 $Output .= 'Překladové soubory zaktualizovány';
304 return $Output;
305 }
306
307 function Show(): string
308 {
309 $User = ModuleUser::Cast($this->System->GetModule('User'))->User;
310 $this->Title = T('Administration');
311 $Output = '';
312 if ($User->Licence(LICENCE_ADMIN))
313 {
314 if (array_key_exists('action', $_GET))
315 {
316 if ($_GET['action'] == 'error') $Output .= $this->TestError(12, 'test');
317 else if ($_GET['action'] == 'exception') $Output .= $this->TestException(12, 'test');
318 else if ($_GET['action'] == 'sqlerror') $Output .= $this->TestSQLError('SELECT dads FROM sdas');
319 else if ($_GET['action'] == 'testing') $Output .= $this->Testing();
320 else if ($_GET['action'] == 'phpinfo') $Output .= $this->ShowPHPInfo();
321 else if ($_GET['action'] == 'locale') $Output .= $this->ShowLocale();
322 else if ($_GET['action'] == 'uncomplete') $Output .= $this->Uncomplete();
323 else if ($_GET['action'] == 'repairversion') $Output .= $this->RepairVersionEnd();
324 else if ($_GET['action'] == 'dbcstructure') $Output .= $this->DbcStructure();
325 else if ($_GET['action'] == 'merge') $Output .= $this->MergeSameText();
326 else $Output .= $this->ShowMenu();
327 } else $Output .= $this->ShowMenu();
328 } else $Output .= ShowMessage(T('Access denied'), MESSAGE_CRITICAL);
329 return $Output;
330 }
331}
Note: See TracBrowser for help on using the repository browser.