Mercurial > hg > fapweb
annotate admin.inc.php @ 86:4684336cec09
Some work.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Fri, 18 Oct 2013 09:10:06 +0300 |
parents | e85ed35585fc |
children | a85f258f6beb |
rev | line source |
---|---|
0 | 1 <? |
32 | 2 $sessionType = "admin"; |
3 | |
14
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
4 function stCreateSettingsData() |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
5 { |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
6 $args = array(); |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
7 |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
8 if (($res = stExecSQL("SELECT * FROM settings")) !== FALSE) |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
9 { |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
10 foreach ($res as $item) |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
11 { |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
12 switch ($item["vtype"]) |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
13 { |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
14 case VT_STR: |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
15 case VT_TEXT: $type = 0; break; |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
16 case VT_INT: $type = 4; break; |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
17 case VT_BOOL: $type = 3; break; |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
18 } |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
19 $args[] = "\"".$item["key"]."\":".$type; |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
20 } |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
21 } |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
22 |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
23 echo |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
24 "\n". |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
25 "function updateSettings()\n". |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
26 "{\n". |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
27 " var args = makePostArgs({".implode(",", $args)."}, \"st\", \"\");\n". |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
28 " sendPOSTRequest(\"action=update&type=settings&\"+args);\n". |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
29 " return false;\n". |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
30 "}\n"; |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
31 } |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
32 |
0 | 33 // Check if sessions are enabled |
5
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
34 if (!stChkSetting("admPassword")) |
0 | 35 { |
36 echo "<h1>Oh noes, admin configuration not done!</h1>\n". | |
37 "<p>Better go and prod that, so you get to use the fine admin interface.</p>\n"; | |
38 $authState = "error"; | |
39 } | |
40 else | |
5
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
41 if (stAdmSessionAuth()) |
0 | 42 { |
43 $authState = "ok"; | |
44 } | |
45 else | |
46 { | |
47 // Perform authentication if we are not in session already | |
5
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
48 echo |
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
49 "<h1>Party admin login</h1>\n". |
0 | 50 "<p>Please use illegal telepathy over HTTP to provide a password to enter the party administration systembolaget.</p>\n". |
32 | 51 stGetFormStart("admlogin", "admlogin.php"). |
0 | 52 stGetFormHiddenInput("mode", "check")."\n". |
32 | 53 stGetFormPasswordInput("admpass", "", "")."\n". |
54 stGetFormSubmitInput("submit", "Login"). | |
0 | 55 "</form>\n"; |
56 | |
57 $authState = "login"; | |
58 } | |
59 | |
60 if ($authState == "ok") | |
61 { | |
62 ?> | |
63 <script type="text/javascript"> | |
14
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
64 // <? stCreateSettingsData(); ?> |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
65 |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
66 |
0 | 67 function statusMsg(msg) |
68 { | |
69 document.getElementById("nstatus").innerHTML = msg; | |
70 } | |
71 | |
72 | |
73 function strtrim(str) | |
74 { | |
75 if (!str || str == null) | |
76 return ""; | |
77 return str.replace(/^\s+|\s+$/g,'') | |
78 } | |
79 | |
80 | |
81 function strencode(str) | |
82 { | |
7
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
83 return encodeURIComponent(str); |
0 | 84 } |
85 | |
86 | |
87 function createXMLRequest() | |
88 { | |
89 var req; | |
90 if (window.XMLHttpRequest) | |
91 { | |
92 // Modern browsers | |
93 req = new XMLHttpRequest(); | |
94 } | |
95 else | |
96 { | |
97 // Old IE versions | |
98 req = new ActiveXObject("Microsoft.XMLHTTP"); | |
99 } | |
100 return req; | |
101 } | |
102 | |
103 | |
104 function sendPOSTRequest(params, success, failure) | |
105 { | |
106 var req = createXMLRequest(); | |
107 req.open("POST", "ajax.php", true); | |
108 req.setRequestHeader("Content-type", "application/x-www-form-urlencoded"); | |
109 req.setRequestHeader("Content-length", params.length); | |
110 req.setRequestHeader("Connection", "close"); | |
111 | |
112 req.onreadystatechange = function() | |
113 { | |
114 if (req.readyState == 4) | |
115 { | |
116 if (req.status == 404) | |
117 { | |
32 | 118 window.location = "admlogout.php"; |
0 | 119 } |
120 else | |
121 if (req.status == 200) | |
122 { | |
14
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
123 if (success) |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
124 { |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
125 success(req.responseText); |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
126 } |
0 | 127 statusMsg(req.statusText); |
128 } | |
129 else | |
130 { | |
131 if (failure) | |
132 { | |
133 failure(req.status, req.statusText, req.responseText); | |
134 } | |
135 else | |
136 { | |
137 statusMsg("["+req.status+" - "+req.statusText+"] "+ req.responseText); | |
138 } | |
139 } | |
140 } | |
141 } | |
142 req.send(params); | |
143 } | |
144 | |
145 | |
146 function makePostArgs(fields, fprefix, fsuffix) | |
147 { | |
148 var res = []; | |
149 for (var id in fields) | |
150 { | |
151 var elem = document.getElementById(fprefix + id + fsuffix); | |
152 if (!elem) | |
153 { | |
14
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
154 alert("No such DOM element '"+ fprefix + id + fsuffix +"'."); |
0 | 155 return ""; |
156 } | |
157 | |
158 switch (fields[id]) | |
159 { | |
160 case 0: | |
161 case 1: | |
14
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
162 case 4: |
0 | 163 { |
164 var str = strtrim(elem.value); | |
14
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
165 if ((fields[id] == 1 || fields[id] == 4) && str == "") |
0 | 166 { |
59
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
167 alert("One or more of the required fields are empty."); |
0 | 168 return ""; |
169 } | |
14
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
170 if (fields[id] == 4) |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
171 res.push(id+"="+parseInt(elem.value)); |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
172 else |
e36c4d2b09c4
Fix settings to work, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
10
diff
changeset
|
173 res.push(id+"="+strencode(str)); |
0 | 174 } |
175 break; | |
176 | |
177 case 2: | |
178 res.push(id+"="+parseInt(elem.value)); | |
179 break; | |
180 | |
181 case 3: | |
182 res.push(id+"="+(elem.checked ? "1" : "0")); | |
183 break; | |
184 | |
185 } | |
186 } | |
187 return res.join("&"); | |
188 } | |
189 | |
190 | |
191 function refreshItems(id,name,msgname) | |
192 { | |
193 var msuccess = function(txt) | |
194 { | |
195 var nitem = document.getElementById(id); | |
196 nitem.innerHTML = txt; | |
197 } | |
198 | |
199 sendPOSTRequest("action=get&type="+name, msuccess); | |
200 } | |
201 | |
202 | |
203 function deleteItem(id,prefix,type,func,dsc) | |
204 { | |
205 var msuccess = function(txt) | |
206 { | |
207 var item = document.getElementById(prefix+id); | |
208 item.style.display = "none"; | |
7
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
209 setTimeout(func, 50); |
0 | 210 } |
211 | |
212 if (confirm("Are you sure you want to delete "+dsc+" #"+id+"?")) | |
213 { | |
214 sendPOSTRequest("action=delete&type="+type+"&id="+id, msuccess); | |
215 } | |
216 } | |
217 | |
218 | |
8
4c5f651aa107
Migrate certain settings to SQL database, cleanups, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
7
diff
changeset
|
219 function refreshSettings() |
4c5f651aa107
Migrate certain settings to SQL database, cleanups, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
7
diff
changeset
|
220 { |
10
11816aad6967
Start work on settings interface.
Matti Hamalainen <ccr@tnsp.org>
parents:
8
diff
changeset
|
221 refreshItems("nsettings", "settings", "General settings"); |
8
4c5f651aa107
Migrate certain settings to SQL database, cleanups, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
7
diff
changeset
|
222 } |
4c5f651aa107
Migrate certain settings to SQL database, cleanups, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
7
diff
changeset
|
223 |
4c5f651aa107
Migrate certain settings to SQL database, cleanups, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
7
diff
changeset
|
224 |
0 | 225 function refreshNews() |
226 { | |
227 refreshItems("nnews", "news", "News list"); | |
228 } | |
229 | |
230 | |
231 function refreshAttendees() | |
232 { | |
233 refreshItems("nattendees", "attendees", "Attendees list"); | |
234 } | |
235 | |
236 | |
86 | 237 function refreshVoters() |
0 | 238 { |
86 | 239 refreshItems("nvoters", "voters", "Voters list"); |
0 | 240 } |
241 | |
242 | |
243 function refreshCompos() | |
244 { | |
245 refreshItems("ncompos", "compos", "Compo list"); | |
246 } | |
247 | |
248 | |
249 function refreshEntries() | |
250 { | |
251 refreshItems("nentries", "entries", "Entry list"); | |
252 } | |
253 | |
254 | |
255 function addNews() | |
256 { | |
257 var args = makePostArgs({"title":1,"text":1,"author":1}, "nn", ""); | |
258 | |
259 var msuccess = function(txt) | |
260 { | |
7
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
261 setTimeout("refreshNews();", 50); |
0 | 262 } |
263 | |
61
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
264 if (args != "") |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
265 sendPOSTRequest("action=add&type=news&"+args, msuccess); |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
266 |
0 | 267 return false; |
268 } | |
269 | |
270 | |
271 function deleteNews(id) | |
272 { | |
273 deleteItem(id, "news", "news", "refreshNews();", "news item"); | |
274 } | |
275 | |
276 | |
61
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
277 function addAttendee() |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
278 { |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
279 var args = makePostArgs({"name":1,"groups":0,"oneliner":0,"email":0}, "ne", "x"); |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
280 |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
281 var msuccess = function(txt) |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
282 { |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
283 setTimeout("refreshAttendees();", 50); |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
284 } |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
285 |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
286 if (args != "") |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
287 sendPOSTRequest("action=add&type=attendees&"+args, msuccess); |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
288 |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
289 return false; |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
290 } |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
291 |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
292 |
0 | 293 function deleteAttendee(id) |
294 { | |
295 deleteItem(id, "attendee", "attendees", "refreshAttendees();", "attendee"); | |
296 } | |
297 | |
298 | |
299 function updateAttendee(id) | |
300 { | |
52
cba0b944da79
Start combining "users" with "attendees".
Matti Hamalainen <ccr@tnsp.org>
parents:
33
diff
changeset
|
301 var args = makePostArgs({"oneliner":0,"email":0,"active":3}, "at", id); |
0 | 302 |
53
71256605546b
More work on admin interface.
Matti Hamalainen <ccr@tnsp.org>
parents:
52
diff
changeset
|
303 var msuccess = function(txt) |
71256605546b
More work on admin interface.
Matti Hamalainen <ccr@tnsp.org>
parents:
52
diff
changeset
|
304 { |
71256605546b
More work on admin interface.
Matti Hamalainen <ccr@tnsp.org>
parents:
52
diff
changeset
|
305 setTimeout("refreshAttendees();", 50); |
71256605546b
More work on admin interface.
Matti Hamalainen <ccr@tnsp.org>
parents:
52
diff
changeset
|
306 } |
71256605546b
More work on admin interface.
Matti Hamalainen <ccr@tnsp.org>
parents:
52
diff
changeset
|
307 |
61
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
308 if (args != "") |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
309 sendPOSTRequest("action=update&type=attendees&id="+id+"&"+args, msuccess); |
0 | 310 } |
311 | |
312 | |
52
cba0b944da79
Start combining "users" with "attendees".
Matti Hamalainen <ccr@tnsp.org>
parents:
33
diff
changeset
|
313 function updateAttendee2(id) |
cba0b944da79
Start combining "users" with "attendees".
Matti Hamalainen <ccr@tnsp.org>
parents:
33
diff
changeset
|
314 { |
cba0b944da79
Start combining "users" with "attendees".
Matti Hamalainen <ccr@tnsp.org>
parents:
33
diff
changeset
|
315 var elem = document.getElementById("atactive"+id); |
cba0b944da79
Start combining "users" with "attendees".
Matti Hamalainen <ccr@tnsp.org>
parents:
33
diff
changeset
|
316 if (elem && !elem.checked) |
cba0b944da79
Start combining "users" with "attendees".
Matti Hamalainen <ccr@tnsp.org>
parents:
33
diff
changeset
|
317 { |
cba0b944da79
Start combining "users" with "attendees".
Matti Hamalainen <ccr@tnsp.org>
parents:
33
diff
changeset
|
318 if (confirm("Are you sure you want deactivate vote ID #"+id+"?")) |
cba0b944da79
Start combining "users" with "attendees".
Matti Hamalainen <ccr@tnsp.org>
parents:
33
diff
changeset
|
319 updateAttendee(id); |
cba0b944da79
Start combining "users" with "attendees".
Matti Hamalainen <ccr@tnsp.org>
parents:
33
diff
changeset
|
320 else |
cba0b944da79
Start combining "users" with "attendees".
Matti Hamalainen <ccr@tnsp.org>
parents:
33
diff
changeset
|
321 setTimeout("refreshAttendees();", 50); |
cba0b944da79
Start combining "users" with "attendees".
Matti Hamalainen <ccr@tnsp.org>
parents:
33
diff
changeset
|
322 } |
cba0b944da79
Start combining "users" with "attendees".
Matti Hamalainen <ccr@tnsp.org>
parents:
33
diff
changeset
|
323 else |
cba0b944da79
Start combining "users" with "attendees".
Matti Hamalainen <ccr@tnsp.org>
parents:
33
diff
changeset
|
324 updateAttendee(id); |
cba0b944da79
Start combining "users" with "attendees".
Matti Hamalainen <ccr@tnsp.org>
parents:
33
diff
changeset
|
325 } |
cba0b944da79
Start combining "users" with "attendees".
Matti Hamalainen <ccr@tnsp.org>
parents:
33
diff
changeset
|
326 |
cba0b944da79
Start combining "users" with "attendees".
Matti Hamalainen <ccr@tnsp.org>
parents:
33
diff
changeset
|
327 |
0 | 328 function addCompo() |
329 { | |
330 var args = makePostArgs({"name":1, "description":1}, "nc", ""); | |
331 | |
332 var msuccess = function(txt) | |
333 { | |
7
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
334 setTimeout("refreshCompos();", 50); |
0 | 335 } |
336 | |
61
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
337 if (args != "") |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
338 sendPOSTRequest("action=add&type=compo&"+args, msuccess); |
0 | 339 return false; |
340 } | |
341 | |
342 | |
343 function updateCompo(id) | |
344 { | |
55
4fac95384753
Make visibility of entry authors per compo.
Matti Hamalainen <ccr@tnsp.org>
parents:
53
diff
changeset
|
345 var args = makePostArgs({"name":1, "description":1, "visible":3, "voting":3, "showAuthors":3}, "co", id); |
0 | 346 |
61
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
347 if (args != "") |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
348 sendPOSTRequest("action=update&type=compo&id="+id+"&"+args); |
0 | 349 } |
350 | |
59
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
351 |
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
352 function addEntry(id) |
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
353 { |
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
354 var args = makePostArgs({"name":1, "author":1, "filename":0}, "ne", id); |
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
355 |
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
356 var msuccess = function(txt) |
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
357 { |
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
358 setTimeout("refreshEntries();", 50); |
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
359 } |
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
360 |
61
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
361 if (args != "") |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
362 sendPOSTRequest("action=add&type=entry&compo_id="+id+"&"+args, msuccess); |
59
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
363 return false; |
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
364 } |
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
365 |
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
366 |
0 | 367 function updateEntry(id) |
368 { | |
59
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
369 var args = makePostArgs({"name":1, "author":1, "filename":0, "compo_id":2}, "en", id); |
0 | 370 |
59
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
371 var msuccess = function(txt) |
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
372 { |
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
373 setTimeout("refreshEntries();", 50); |
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
374 } |
e5e38ed4e837
Work on compo entry addition and editing.
Matti Hamalainen <ccr@tnsp.org>
parents:
55
diff
changeset
|
375 |
61
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
376 if (args != "") |
e85ed35585fc
Work on attendee editing, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
59
diff
changeset
|
377 sendPOSTRequest("action=update&type=entry&id="+id+"&"+args, msuccess); |
0 | 378 } |
379 | |
380 | |
381 function deleteEntry(id) | |
382 { | |
383 deleteItem(id, "entry", "entries", "refreshEntries();", "entry"); | |
384 } | |
385 | |
386 | |
387 var registeredTabs = Object(); | |
388 | |
389 | |
390 function updateTabList() | |
391 { | |
392 var item = document.getElementById("pageTabs"); | |
393 var str = ""; | |
394 for (var id in registeredTabs) | |
395 { | |
7
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
396 str += "<a id=\"cc"+id+ |
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
397 "\"href=\"#\" onClick=\"switchActiveTab('"+id+ |
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
398 "')\">"+registeredTabs[id]+"</a>"; |
0 | 399 } |
400 | |
32 | 401 str += "<a class=\"admin\" href=\"admlogout.php\">Logout</a>"; |
0 | 402 |
403 item.innerHTML = str; | |
404 } | |
405 | |
406 | |
407 function registerTab(id, name) | |
408 { | |
409 registeredTabs[id] = name; | |
410 } | |
411 | |
412 | |
413 function refreshTabs() | |
414 { | |
415 for (var id in registeredTabs) | |
416 { | |
417 setTimeout("refresh"+ registeredTabs[id] +"();", 10); | |
418 } | |
419 } | |
420 | |
421 | |
422 function switchActiveTab(tab) | |
423 { | |
424 for (var id in registeredTabs) | |
425 { | |
426 var ob = document.getElementById(id); | |
7
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
427 var ccob = document.getElementById("cc"+id); |
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
428 if (ob && ccob) |
0 | 429 { |
430 ob.style.display = (tab == id) ? "block" : "none"; | |
7
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
431 ccob.style.borderTop = (tab == id) ? "4px solid white" : "none"; |
0 | 432 if (tab == id) |
433 { | |
434 setTimeout("refresh"+ registeredTabs[id] +"();", 10); | |
435 } | |
436 } | |
437 } | |
438 } | |
439 </script> | |
440 | |
5
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
441 <!-- ========================== --> |
0 | 442 |
5
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
443 <div id="nstatus">-</div> |
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
444 |
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
445 <div id="pageTabs"></div> |
0 | 446 |
447 <!-- ========================== --> | |
448 | |
8
4c5f651aa107
Migrate certain settings to SQL database, cleanups, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
7
diff
changeset
|
449 <div id="tabSettings"> |
10
11816aad6967
Start work on settings interface.
Matti Hamalainen <ccr@tnsp.org>
parents:
8
diff
changeset
|
450 <form method="post" action="" onsubmit="return updateSettings()"> |
11816aad6967
Start work on settings interface.
Matti Hamalainen <ccr@tnsp.org>
parents:
8
diff
changeset
|
451 <div id="nsettings"></div> |
11816aad6967
Start work on settings interface.
Matti Hamalainen <ccr@tnsp.org>
parents:
8
diff
changeset
|
452 </form> |
7
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
453 </div> |
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
454 |
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
455 <!-- ========================== --> |
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
456 |
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
457 <div id="tabNews"> |
5
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
458 <form method="post" action="" onsubmit="return addNews()"> |
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
459 <input id="nntitle" type="text" size="40" /><br /> |
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
460 <textarea id="nntext" rows="5" cols="60"></textarea><br /> |
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
461 <input id="nnauthor" type="text" value="orgaz" /> |
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
462 <input id="nnadd" type="submit" value=" Add post " /> |
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
463 <input type="button" value=" Clear " onClick="this.form.reset()" /> |
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
464 </form> |
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
465 <hr /> |
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
466 <div id="nnews"></div> |
0 | 467 </div> |
468 | |
469 <!-- ========================== --> | |
470 | |
7
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
471 <div id="tabAttendees"> |
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
472 <div id="nattendees"></div> |
0 | 473 </div> |
474 | |
475 <!-- ========================== --> | |
476 | |
86 | 477 <div id="tabVoters"> |
478 <div id="nvoters"></div> | |
0 | 479 </div> |
480 | |
481 <!-- ========================== --> | |
482 | |
7
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
483 <div id="tabCompos"> |
5
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
484 <form method="post" action="" onsubmit="return addCompo()"> |
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
485 <input id="ncname" type="text" size="64" /><br /> |
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
486 <textarea id="ncdescription" rows="5" cols="60"></textarea><br /> |
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
487 <input id="nccompo" type="submit" value=" Add compo " /> |
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
488 <input type="button" value=" Clear " onClick="this.form.reset()" /> |
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
489 </form> |
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
490 <hr /> |
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
491 <div id="ncompos"></div> |
0 | 492 </div> |
493 | |
494 <!-- ========================== --> | |
495 | |
7
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
496 <div id="tabEntries"> |
5
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
497 <div id="nentries"></div> |
0 | 498 </div> |
499 | |
500 <!-- ========================== --> | |
501 | |
502 <script type="text/javascript"> | |
8
4c5f651aa107
Migrate certain settings to SQL database, cleanups, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
7
diff
changeset
|
503 registerTab("tabSettings", "Settings"); |
7
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
504 registerTab("tabNews", "News"); |
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
505 registerTab("tabAttendees", "Attendees"); |
86 | 506 registerTab("tabVoters", "Voters"); |
7
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
507 registerTab("tabCompos", "Compos"); |
d76020022881
Various fixes, cleanups and improvements.
Matti Hamalainen <ccr@tnsp.org>
parents:
5
diff
changeset
|
508 registerTab("tabEntries", "Entries"); |
5
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
509 updateTabList(); |
17 | 510 switchActiveTab("tabSettings"); |
0 | 511 </script> |
5
76c3b89d7b11
Improve voting, clean up the code, etc.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
512 <? } ?> |