OSDN Git Service

[feature]魔法領域の統計取得
[hengband/web.git] / score / db_common.inc
1 <?php
2 class ScoreDB
3 {
4     private static $sort_mode_list = ['default' => 'score', 'newcome'];
5
6     public function __construct() {
7         $this->dbh = new PDO('sqlite:db/score.db');
8         $this->dbh->setAttribute(PDO::ATTR_ERRMODE, PDO::ERRMODE_EXCEPTION);
9
10         $this->set_sort_mode(filter_input(INPUT_GET, 'sort'));
11     }
12
13     public function get_defines()
14     {
15         $id_define_array = [];
16         $tables = [['race', 'races'], ['class', 'classes'], ['personality', 'personalities'], ['realm', 'realms']];
17         foreach ($tables as $t) {
18             $id_define_array[$t[0]] = [];
19             $stmt = $this->dbh->query("SELECT {$t[0]}_id, {$t[0]}_name FROM {$t[1]} ORDER BY {$t[0]}_id");
20             foreach ($stmt->fetchAll(PDO::FETCH_NUM) as $row) {
21                 $id_define_array[$t[0]][intval($row[0])] = $row[1];
22             }
23         }
24
25         return $id_define_array;
26     }
27
28     /**
29      * スコア表示モードを設定する
30      *
31      * @param string $mode 設定する表示モード
32      * 'score' - スコア順に表示(デフォルト)
33      * 'newcome' - 新着順に表示
34      * 存在しない表示モードが指定された場合デフォルトの表示モードが設定される
35      */
36     public function set_sort_mode($mode)
37     {
38         if ($mode !== NULL && in_array($mode, self::$sort_mode_list)) {
39             $this->sort_mode = $mode;
40         } else {
41             $this->sort_mode = self::$sort_mode_list['default'];
42         }
43     }
44
45
46     /**
47      * スコア表示モード名を取得する
48      *
49      * @return string スコア表示モード名
50      */
51     public function get_sort_mode_name()
52     {
53         switch ($this->sort_mode) {
54         case 'score':
55             return "スコア順";
56         case 'newcome':
57             return "新着順";
58         default:
59             return "不明";
60         }
61     }
62
63
64     /**
65      * スコア検索の絞り込み用WHERE句を取得する
66      *
67      * @return array スコア検索絞り込み用のWHERE句('where')とプレースホルダに渡すパラメータ配列('params')の連想配列
68      */
69     private function get_search_condition()
70     {
71         $last_days = filter_input(INPUT_GET, 'last_days', FILTER_VALIDATE_INT);
72         $params = [];
73
74         if ($last_days > 0) {
75             $wheres[] = "date >= datetime('now', 'localtime', '-{$last_days} days')";
76         }
77
78         foreach (['race_id', 'class_id', 'personality_id'] as $key_column) {
79             $val = filter_input(INPUT_GET, $key_column, FILTER_VALIDATE_INT); 
80             if ($val > 0) {
81                 $wheres[] = "{$key_column} = :{$key_column}";
82                 $params[":{$key_column}"] = $val;
83             }
84         }
85
86         foreach (['realm_id1', 'realm_id2'] as $idx => $key_column) {
87             $val = filter_input(INPUT_GET, $key_column, FILTER_VALIDATE_INT); 
88             if ($val > 0) {
89                 $seq = $idx + 1;
90                 $wheres[] = "score_id IN (SELECT score_id FROM score_realms WHERE realm_id = :{$key_column} AND realm_seq = {$seq})";
91                 $params[":{$key_column}"] = $val;
92             }
93         }
94
95         foreach (['name'] as $key_column) {
96             $val = filter_input(INPUT_GET, $key_column);
97             $match_mode = filter_input(INPUT_GET, $key_column."_match");
98             if ($val !== NULL && strlen($val) > 0) {
99                 $wheres[] = "{$key_column} LIKE :{$key_column}";
100                 $params[":{$key_column}"] = ($match_mode == "strict") ? $val : "%".$val."%";
101             }
102         }
103
104         foreach (['killer'] as $key_column) {
105             $val = filter_input(INPUT_GET, $key_column);
106             if ($val !== NULL && strlen($val) > 0) {
107                 $wheres[] = "({$key_column} LIKE :{$key_column} OR {$key_column} = :{$key_column}1 OR {$key_column} = :{$key_column}2)";
108                 $params[":{$key_column}"] = "%".$val."%";
109                 $params[":{$key_column}1"] = "麻痺状態で".$val;
110                 $params[":{$key_column}2"] = "彫像状態で".$val;
111             }
112         }
113
114         $result['where'] = isset($wheres) ? 'WHERE '.implode(' AND ', $wheres) : '';
115         $result['params'] = $params;
116
117         return $result;
118     }
119
120
121     /**
122      * スコアソート用のORDER BY句を取得する
123      *
124      * @return string スコアソート用のORDER BY句
125      */
126     private function get_order_by()
127     {
128         switch ($this->sort_mode) {
129         case "score":
130             $order_by = "ORDER BY score DESC";
131             break;
132         case "newcome":
133             $order_by = 'ORDER BY score_id DESC';
134             break;
135         }
136
137         return $order_by;
138     }
139
140
141     /**
142      * スコア検索用のSQLクエリを取得する
143      *
144      * @param integer $offset スコア取得開始位置
145      * @param integer $limit スコア取得最大件数
146      * @param string $where スコア検索に用いるWHERE句
147      * @param string $order_by スコアソートに用いるORDER BY句
148      * @return string スコア検索用SQLクエリ
149      */
150     private function get_search_query($offset, $limit, $where, $order_by)
151     {
152         $query = <<<EOM
153 SELECT
154   *,
155   group_concat(realm_name) AS realms_name,
156   CASE
157     WHEN killer = 'ripe' THEN '勝利の後引退'
158     WHEN killer = 'Seppuku' THEN '勝利の後切腹'
159     ELSE killer || 'に殺された'
160   END AS death_reason
161 FROM
162  (SELECT
163     *
164   FROM
165     scores
166   {$where}
167   {$order_by}
168   LIMIT {$offset}, {$limit}) AS s
169 NATURAL INNER JOIN
170   races
171 NATURAL INNER JOIN
172   classes
173 NATURAL INNER JOIN
174   personalities
175 NATURAL LEFT JOIN
176   score_realms
177 NATURAL LEFT JOIN
178   realms
179 GROUP BY
180   score_id
181 {$order_by}
182 EOM;
183         return $query;
184     }
185
186
187     /**
188      * 検索でヒットしたスコアの総件数を取得する
189      *
190      * @param string $where スコア検索に用いるWHERE句
191      * @return integer スコア総件数
192      */
193     private function get_query_data_count($where, $params)
194     {
195         $stmt = $this->dbh->prepare("SELECT count(*) AS data_count from scores {$where}");
196         $stmt->execute($params);
197         $res = $stmt->fetchAll(PDO::FETCH_ASSOC);
198
199         return intval($res[0]['data_count']);
200     }
201
202
203     /**
204      * スコアを検索する
205      *
206      * @param integer $start_num 検索するスコアの開始位置
207      * @param integer $count 検索するスコア数
208      *
209      * @return array 検索したスコアの配列と、条件に合致するスコアの総件数の連想配列
210      */
211     public function search_score($start_num, $count)
212     {
213         $cond = $this->get_search_condition();
214         $order_by = $this->get_order_by();
215         $query_sql = $this->get_search_query(intval($start_num / $count) * $count, $count, $cond['where'], $order_by);
216
217         $search_start_time = microtime(true);
218         $this->dbh->beginTransaction();
219
220         $score_stmt = $this->dbh->prepare($query_sql);
221         $score_stmt->execute($cond['params']);
222         $result['scores'] = $score_stmt->fetchAll(PDO::FETCH_ASSOC);
223         $result['total_data_count'] = $this->get_query_data_count($cond['where'], $cond['params']);
224
225         $this->dbh->commit();
226         $result['elapsed_time'] = microtime(true) - $search_start_time;
227
228         return $result;
229     }
230
231     public function get_db_handle() {
232         return $this->dbh;
233     }
234
235     private function update_killers_cache_table()
236     {
237         try {
238             $this->dbh->beginTransaction();
239
240             $this->dbh->exec("DROP TABLE IF EXISTS killers_cache");
241             $this->dbh->exec(<<<EOM
242 CREATE TABLE
243   killers_cache
244 AS
245 SELECT
246   killer_name,
247   count(*) AS killer_count_total,
248   count(killed_status = 0 OR NULL) AS killer_count_normal,
249   count(killed_status != 0 OR NULL) AS killer_count_freeze
250 FROM
251  (SELECT
252     CASE
253       WHEN killer LIKE '麻痺状態で%' THEN substr(killer, 6)
254       WHEN killer LIKE '彫像状態で%' THEN substr(killer, 6)
255       WHEN killer = 'ripe' THEN '引退'
256       WHEN killer = 'Seppuku' THEN '切腹'
257       ELSE killer
258     END AS killer_name,
259     CASE
260       WHEN killer LIKE '麻痺状態で%' THEN 1
261       WHEN killer LIKE '彫像状態で%' THEN 2
262       ELSE 0
263     END AS killed_status
264   FROM
265     scores
266  )
267 GROUP BY
268   killer_name
269 ORDER BY
270   killer_count_total DESC
271 EOM
272             );
273             $this->dbh->commit();
274
275             return TRUE;
276         } catch (PDOException $e) {
277             $this->dbh->rollBack();
278
279             return FALSE;
280         }
281     }
282
283     public function get_killers_table()
284     {
285         //$this->update_cache_status('killers_cache', 0);
286         if (!$this->get_cache_status('killers_cache')) {
287             $this->update_killers_cache_table();
288             $this->update_cache_status('killers_cache', 1);
289         }
290
291         $killers = $this->dbh->query("SELECT * FROM killers_cache ORDER BY killer_count_total DESC")->fetchAll(PDO::FETCH_ASSOC);
292
293         return $killers;
294     }
295
296
297     /**
298      * 統計情報のキャッシュテーブルを更新する
299      *
300      * 種族・職業・性格について各種統計情報を取得しキャッシュテーブルに保存する
301      * 通常の統計情報の取得はこのキャッシュテーブルから行う
302      *
303      * @return boolean 生成に成功したらTRUE、失敗したらFALSE
304      */
305     private function update_statistics_cache_tables() {
306         $statistics_list = ['race', 'class', 'personality'];
307
308         try {
309             foreach ($statistics_list as $stat) {
310                 $table_name = $stat."_statistics";
311                 $this->dbh->exec("DROP TABLE IF EXISTS ".$table_name);
312                 $stmt = $this->dbh->query(
313                     <<<EOM
314 CREATE TABLE $table_name AS
315   SELECT
316     {$stat}_id,
317     count(sex=1 or NULL) AS male_count,
318     count(sex=0 or NULL) AS female_count,
319     count(*) AS total_count,
320     count(winner=1 OR NULL) AS winner_count,
321     avg(score) AS average_score,
322     max(score) AS max_score
323   FROM scores
324 GROUP BY ${stat}_id
325 EOM
326                 );
327             }
328
329             foreach (range(1, 2) as $seq) {
330                 $table_name = "realm{$seq}_statistics";
331                 $this->dbh->exec("DROP TABLE IF EXISTS ".$table_name);
332                 $stmt = $this->dbh->query(
333                     <<<EOM
334 CREATE TABLE $table_name AS
335 SELECT
336   class_id, class_name,
337   realm_id, realm_name,
338   count(*) AS total_count,
339   count(sex=1 OR NULL) AS male_count,
340   count(sex=0 OR NULL) AS female_count,
341   count(winner=1 OR NULL) AS winner_count,
342   avg(score) AS average_score,
343   max(score) AS max_score
344 FROM score_realms
345 NATURAL INNER JOIN scores
346 NATURAL INNER JOIN classes
347 NATURAL INNER JOIN realms
348 WHERE realm_seq={$seq}
349 GROUP BY class_id, realm_id
350 ORDER BY class_id, total_count DESC
351 EOM
352                 );
353             }
354
355             return TRUE;
356         } catch (PDOException $e) {
357             return FALSE;
358         }
359     }
360
361
362     /**
363      * 統計情報を取得する
364      *
365      * @param integer $sort_key_column 表示順序のキーとするカラムの名称
366      *
367      * @return array 統計情報
368      */
369     public function get_statistics_tables($sort_key_column) {
370         if (!$this->get_cache_status('statistics_cache')) {
371             $result = $this->update_statistics_cache_tables();
372             $this->update_cache_status('statistics_cache', $result ? 1 : 0);
373         }
374
375         $stat = [];
376
377         $this->dbh->beginTransaction();
378         foreach ([['race', 'races'], ['class', 'classes'], ['personality', 'personalities']] as $kind) {
379             $stmt = $this->dbh->query("SELECT ${kind[0]}_id AS id, ${kind[0]}_name AS name, * FROM ${kind[0]}_statistics NATURAL JOIN ${kind[1]} ORDER BY ${sort_key_column} DESC");
380             $stat[$kind[0]] = $stmt->fetchAll(PDO::FETCH_ASSOC);
381         }
382         foreach (['realm1', 'realm2'] as $realm) {
383             $stmt = $this->dbh->query("SELECT * FROM {$realm}_statistics;");
384             $stat[$realm] = $stmt->fetchAll(PDO::FETCH_ASSOC);
385         }
386         $this->dbh->commit();
387
388         return $stat;
389     }
390
391     public function table_exists($table_name)
392     {
393         $stmt = $this->dbh->prepare("SELECT count(*) AS table_exists FROM sqlite_master WHERE type='table' AND name=?");
394         $stmt->execute([$table_name]);
395         $res = $stmt->fetchAll(PDO::FETCH_ASSOC);
396
397         return intval($res[0]['table_exists']) === 1;
398     }
399
400
401     public function get_cache_status($cache_table_name)
402     {
403         if (!$this->table_exists('cache_status_table')) {
404             $this->create_cache_status_table();
405         }
406
407         $stmt = $this->dbh->prepare("SELECT cached FROM cache_status_table WHERE table_name=?");
408         $stmt->execute([$cache_table_name]);
409         $res = $stmt->fetchAll(PDO::FETCH_ASSOC);
410
411         return count($res) === 1 ? intval($res[0]['cached']) : 0;
412     }
413
414     public function update_cache_status($cache_table_name, $status)
415     {
416         if (!$this->table_exists('cache_status_table')) {
417             $this->create_cache_status_table();
418         }
419
420         $stmt = $this->dbh->prepare("INSERT OR REPLACE INTO cache_status_table VALUES(?, ?)");
421         $stmt->execute([$cache_table_name, $status]);
422
423         return $stmt->rowCount();
424     }
425
426     public function create_cache_status_table()
427     {
428         $this->dbh->exec(<<<EOM
429 CREATE TABLE cache_status_table
430   (table_name TEXT PRIMARY KEY,
431    cached BOOLEAN)
432 EOM
433         );
434     }
435
436     public function register_new_score($score_data)
437     {
438         $insert_stmt = $this->dbh->prepare(
439             <<<EOM
440 INSERT INTO scores
441  (version, score, name,
442   race_id, class_id, personality_id,
443   sex, level, depth, maxlv, maxdp,
444   au, turns, winner, killer)
445 SELECT
446  :version, :score, :name,
447  race_id, class_id, personality_id,
448  :sex, :level, :depth, :maxlv, :maxdp,
449  :au, :turns, :winner, :killer
450 FROM
451   races, classes, personalities
452 WHERE
453   race_name = :race AND
454   class_name = :class AND
455   personality_name = :personality
456 EOM
457         );
458  
459         $realm_insert_stmt = $this->dbh->prepare(
460             <<<EOM
461 INSERT INTO score_realms
462  (score_id, realm_id, realm_seq)
463 SELECT
464   ?, realm_id, ?
465 FROM
466   realms
467 WHERE
468   realm_name = ?
469 EOM
470         );
471
472         try {
473             $this->dbh->beginTransaction();
474             if ($insert_stmt->execute($score_data['character_info']) === FALSE ||
475                 $insert_stmt->rowCount() !== 1) {
476                 $dbh->rollBack();
477                 return FALSE;
478             }
479
480             // NOTE: score_idはINTEGER PRIMARY KEYなのでROWIDを参照している
481             //       したがってlastInsertIdで追加されたスコアのscore_idを取得可能
482             $score_id = $this->dbh->lastInsertId();
483
484             foreach ($score_data['realm_info'] as $realm_seq => $realm_name) {
485                 if ($realm_insert_stmt->execute([$score_id, $realm_seq + 1, $realm_name]) === FALSE ||
486                     $realm_insert_stmt->rowCount() !== 1) {
487                     $dbh->rollBack();
488                     return FALSE;
489                 }
490             }
491
492             // スコアが追加されたので死因ランキング・人気ランキングのキャッシュをクリア
493             $this->update_cache_status('killers_cache', 0);
494             $this->update_cache_status('statistics_cache', 0);
495             $this->dbh->commit();
496
497             return $score_id;
498         } catch (PDOException $e) {
499             $dbh->rollBack();
500         }
501
502         return FALSE;
503     }
504 }