1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
|
<?php
// Static functions to support media lists
//
// webtrees: Web based Family History software
// Copyright (C) 2013 webtrees development team.
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
//
// $Id$
if (!defined('WT_WEBTREES')) {
header('HTTP/1.0 403 Forbidden');
exit;
}
class WT_Query_Media {
// Generate a list of all the folders in the current tree - for the media list.
public static function folderList() {
$folders = WT_DB::prepare(
"SELECT SQL_CACHE LEFT(m_filename, CHAR_LENGTH(m_filename) - CHAR_LENGTH(SUBSTRING_INDEX(m_filename, '/', -1))) AS media_path" .
" FROM `##media`" .
" WHERE m_file = ?" .
" AND m_filename NOT LIKE 'http://%'" .
" AND m_filename NOT LIKE 'https://%'" .
" GROUP BY 1" .
" ORDER BY 1"
)->execute(array(WT_GED_ID))->fetchOneColumn();
if (!$folders || reset($folders)!='') {
array_unshift($folders, '');
}
return array_combine($folders, $folders);
}
// Generate a list of all folders from all the trees - for the media admin.
public static function folderListAll() {
$folders = WT_DB::prepare(
"SELECT SQL_CACHE LEFT(m_filename, CHAR_LENGTH(m_filename) - CHAR_LENGTH(SUBSTRING_INDEX(m_filename, '/', -1))) AS media_path" .
" FROM `##media`" .
" WHERE m_filename NOT LIKE 'http://%'" .
" AND m_filename NOT LIKE 'https://%'" .
" GROUP BY 1" .
" ORDER BY 1"
)->execute()->fetchOneColumn();
if ($folders) {
return array_combine($folders, $folders);
} else {
return array();
}
}
// Generate a filtered, sourced, privacy-checked list of media objects - for the media list.
public static function mediaList($folder, $subfolders, $sort, $filter) {
// All files in the folder, plus external files
$sql =
"SELECT m_id AS xref, m_file AS gedcom_id, m_gedcom AS gedcom" .
" FROM `##media`" .
" WHERE m_file=?";
$args = array(
WT_GED_ID,
);
// Only show external files when we are looking at the root folder
if ($folder=='') {
$sql_external = " OR m_filename LIKE 'http://%' OR m_filename LIKE 'https://%'";
} else {
$sql_external = "";
}
// Include / exclude subfolders (but always include external)
switch ($subfolders) {
case 'include':
$sql .= " AND (m_filename LIKE CONCAT(?, '%') $sql_external)";
$args[] = $folder;
break;
case 'exclude':
$sql .= " AND (m_filename LIKE CONCAT(?, '%') AND m_filename NOT LIKE CONCAT(?, '%/%') $sql_external)";
$args[] = $folder;
$args[] = $folder;
break;
default:
throw new Exception('Bad argument (subfolders=', $subfolders, ') in WT_Query_Media::mediaList()');
}
// Apply search terms
if ($filter) {
$sql .= " AND (m_filename LIKE CONCAT('%', ?, '%') OR m_titl LIKE CONCAT('%', ?, '%'))";
$args[] = $filter;
$args[] = $filter;
}
switch ($sort) {
case 'file':
$sql .= " ORDER BY m_filename";
break;
case 'title':
$sql .= " ORDER BY m_titl";
break;
default:
throw new Exception('Bad argument (sort=', $sort, ') in WT_Query_Media::mediaList()');
}
$rows = WT_DB::prepare($sql)->execute($args)->fetchAll();
$list = array();
foreach ($rows as $row) {
$media = WT_Media::getInstance($row->xref, $row->gedcom_id, $row->gedcom);
if ($media->canShow()) {
$list[] = $media;
}
}
return $list;
}
}
|