5 if(gwvpmini_isLoggedIn()) if(gwvpmini_isUserAdmin()) {
6 $MENU_ITEMS["20repos"]["text"] = "Administration";
\r
7 $MENU_ITEMS["20repos"]["link"] = "$BASE_URL/admin";
8 $CALL_ME_FUNCTIONS["admin"] = "gwvpmini_AdminCallMe";
14 function gwvpmini_AdminCallMe()
\r
17 //error_log("in admin callme");
\r
18 if(isset($_REQUEST["q"])) {
\r
19 $query = $_REQUEST["q"];
\r
20 $qspl = explode("/", $query);
\r
21 if(isset($qspl[0])) {
\r
22 if($qspl[0] == "admin") {
\r
23 if(isset($qspl[1])) {
\r
24 if($qspl[1] == "user") {
\r
25 return "gwvpmini_AdminUserCreate";
\r
27 if($qspl[1] == "changereg") {
28 return "gwvpmini_ChangeRegistration";
30 if($qspl[1] == "changeconfirm") {
31 return "gwvpmini_ChangeRegConfig";
33 if($qspl[1] == "changefromemail") {
34 return "gwvpmini_ChangeFromAddress";
36 if($qspl[1] == "removeuser") {
37 return "gwvpmini_RemoveUserPage";
39 if($qspl[1] == "removerepo") {
40 return "gwvpmini_RemoveRepoPage";
42 if($qspl[1] == "confremoveuser") {
43 return "gwvpmini_ConfRemoveUser";
45 if($qspl[1] == "confremoverepo") {
46 return "gwvpmini_ConfRemoveRepo";
48 if($qspl[1] == "switchenable") {
49 return "gwvpmini_SwitchEnableUser";
51 if($qspl[1] == "switchenablerepo") {
52 return "gwvpmini_SwitchEnableRepo";
54 if($qspl[1] == "changegravs") {
55 return "gwvpmini_SwitchGravatars";
57 if($qspl[1] == "changessl") {
58 return "gwvpmini_SwitchForceSSL";
61 error_log("i got here, where next?");
\r
62 return "gwvpmini_AdminMainPage";
\r
64 } else return false;
\r
72 function gwvpmini_RemoveRepoPage()
\r
74 gwvpmini_goMainPage("gwvpmini_RemoveRepoPageBody");
\r
79 function gwvpmini_RemoveUserPage()
81 gwvpmini_goMainPage("gwvpmini_RemoveUserPageBody");
85 function gwvpmini_AdminMainPage()
87 gwvpmini_goMainPage("gwvpmini_AdminMainPageBody");
90 function gwvpmini_AdminMainPageBody()
93 global $can_register, $reg_reqs_confirm, $confirm_from_address, $use_gravatar, $force_ssl;
96 $register = "Registration Enabled (<a href=\"$BASE_URL/admin/changereg\">Disable</a>)";
98 $register = "Registration Disabled (<a href=\"$BASE_URL/admin/changereg\">Enable</a>)";
101 if($reg_reqs_confirm) {
102 $regconfirm = "Registration Requires Confirmation (<a href=\"$BASE_URL/admin/changeconfirm\">Disable</a>)";
104 $regconfirm = "Registration Doesnt Require Confirmation (<a href=\"$BASE_URL/admin/changeconfirm\">Enable</a>)";
108 $usegrav = "Gravatars are enabled (<a href=\"$BASE_URL/admin/changegravs\">Disable</a>)";
110 $usegrav = "Gravatars are disabled (<a href=\"$BASE_URL/admin/changegravs\">Enable</a>)";
114 $forcessl = "Force SSL is enabled (<a href=\"$BASE_URL/admin/changessl\">Disable</a>)";
\r
116 $forcessl = "Force SSL is disabled (<a href=\"$BASE_URL/admin/changessl\">Enable</a>)";
\r
120 $totalusers = gwvpmini_GetNUsers();
121 echo "<table><tr valign=\"top\"><td>";
122 echo "<h2>Users - $totalusers</h2>";
123 echo "$register<br>$regconfirm<br>$usegrav<br>$forcessl<br>";
124 echo "<form method=\"post\" action=\"$BASE_URL/admin/changefromemail\">";
125 echo "Address emails are sent from <input type=\"text\" name=\"fromemail\" value=\"$confirm_from_address\"><input type=\"submit\" name=\"Update\" value=\"Update\"><br>";
128 echo "<table border=\"1\">";
129 echo "<tr><th>Username</th><th>Email Address</th><th>Full Name</th><th>Description</th><th>Status</th><th>Control</th></tr>";
130 foreach(gwvpmini_GetUsers() as $key => $val) {
132 $un = $val["username"];
134 $fn = $val["fullname"];
136 $st_t = $val["status"];
137 $st_l = $val["level"];
142 if($st_l == 0) $level = "User";
143 if($st_l == 1) $level = "Admin";
146 if($st_t[0] == "1") {
147 $status = ", disabled";
150 } else if ($st_t[0] == "0") {
153 } else if($st_t[0] == "2") {
154 $vl = explode(":", $st_t);
155 error_log("VL: ".print_r($vl, true));
156 $status = " Awaiting Confirmation (<a href=\"$BASE_URL/register/confirmreg/".$vl[1]."\">Confirm</a>)";
159 $st = "$level$status";
161 $unlval = "<a href=\"$BASE_URL/user/$un\">$un</a>";
162 echo "<tr><td>$unlval</td><td>$em</td><td>$fn</td><td>$ds</td><td>$st</td><td><a href=\"$BASE_URL/admin/removeuser/$id\">Remove</a> ";
163 if ($st_t[0] == "0"||$st_t[0] == "1") echo "<a href=\"$BASE_URL/admin/switchenable/$astat/$id\">$cstat</a></td></tr>";
164 else echo "</td></tr>";
170 echo "<h3>Create User</h3>";
171 echo "<form method=\"post\" action=\"$BASE_URL/admin/user/create\">";
172 echo "<table border=\"1\">";
\r
173 echo "<tr><th>Username</th><td><input type=\"text\" name=\"username\"></td></tr>";
174 echo "<tr><th>Password</th><td><input type=\"password\" name=\"password\"></td></tr>";
175 echo "<tr><th>Confirm Password</th><td><input type=\"password\" name=\"confpassword\"></td></tr>";
176 echo "<tr><th>Full Name</th><td><input type=\"text\" name=\"fullname\"></td></tr>";
177 echo "<tr><th>Description</th><td><input type=\"text\" name=\"desc\"></td></tr>";
178 echo "<tr><th>Email</th><td><input type=\"text\" name=\"email\"></td></tr>";
179 echo "<tr><th>Confirm Email</th><td><input type=\"text\" name=\"confemail\"></td></tr>";
180 echo "<tr><th>Admin?</th><td><input type=\"checkbox\" name=\"isadmin\"></td></tr>";
181 echo "<tr><td colspan=\"2\"><input type=\"submit\" name=\"Add\" value=\"Add\"></td></tr>";
184 echo "</td></tr></table>";
186 $totalrepos = gwvpmini_GetNRepos();
187 echo "<h2>Repo's - $totalrepos</h2>";
188 echo "<table border=\"1\">";
189 echo "<tr><th>Repo Name</th><th>Repo Desc</th><th>Owner</th><th>Control</th></tr>";
190 foreach(gwvpmini_GetRepos() as $key => $val) {
195 $st = $val["status"];
196 $udet = gwvpmini_getUser(null, null, $ow);
200 $owl = $udet["username"]." (".$udet["id"].") - ".$udet["fullname"]." (".$udet["email"].") - <a href=\"mailto:".$udet["email"]."\">Email Owner</a>";
211 echo "<tr><td><a href=\"$BASE_URL/view/$rn\">$rn</a></td><td>$ds</td><td>$owl</td><td><a href=\"$BASE_URL/admin/removerepo/$id\">Remove</a> <a href=\"$BASE_URL/admin/switchenablerepo/$stat/$id\">$cstat</a></td></tr>";
218 function gwvpmini_AdminUserCreate()
222 $name = $_REQUEST["username"];
223 $pass1 = $_REQUEST["password"];
224 $pass2 = $_REQUEST["confpassword"];
\r
225 $fname = $_REQUEST["fullname"];
226 $desc = $_REQUEST["desc"];
227 $email1 = $_REQUEST["email"];
\r
228 $email2 = $_REQUEST["confemail"];
229 if(isset($_REQUEST["isadmin"])) $level = 1;
232 $id = gwvpmini_GetUserId($name);
235 if($pass1 != $pass2) {
236 gwvpmini_SendMessage("error", "Passwords dont match");
237 header("Location: $BASE_URL/admin");
240 if($email1 != $email2) {
241 gwvpmini_SendMessage("error", "Email Addresses dont match");
242 header("Location: $BASE_URL/admin");
246 gwvpmini_AddUser($name, $pass1, $fname, $email1, $desc, $level, 0);
247 gwvpmini_SendMessage("info", "User $fname created");
249 gwvpmini_SendMessage("error", "User $name already exists, cant create");
252 header("Location: $BASE_URL/admin");
258 function gwvpmini_ChangeRegistration()
260 global $can_register, $BASE_URL;
263 gwvpmini_setConfigVal("canregister", "0");
264 gwvpmini_SendMessage("info", "Registration disabled");
266 gwvpmini_setConfigVal("canregister", "1");
\r
267 gwvpmini_SendMessage("info", "Registration enabled");
270 header("Location: $BASE_URL/admin");
274 function gwvpmini_ChangeRegConfig()
276 global $reg_reqs_confirm, $BASE_URL;
\r
278 if($reg_reqs_confirm) {
\r
279 gwvpmini_setConfigVal("registerrequiresconfirm", "0");
\r
280 gwvpmini_SendMessage("info", "Registration Confirmation disabled");
\r
282 gwvpmini_setConfigVal("registerrequiresconfirm", "1");
\r
283 gwvpmini_SendMessage("info", "Registration Confirmation enabled");
\r
286 header("Location: $BASE_URL/admin");
289 function gwvpmini_ChangeFromAddress()
293 $newfrom = $_REQUEST["fromemail"];
\r
295 gwvpmini_setConfigVal("eamilfromaddress", "$newfrom");
\r
296 gwvpmini_SendMessage("info", "Email from address updated to \"$newfrom\"");
\r
298 header("Location: $BASE_URL/admin");
\r
302 function gwvpmini_RemoveUserPageBody()
307 if(isset($_REQUEST["q"])) {
\r
308 $query = $_REQUEST["q"];
\r
309 $qspl = explode("/", $query);
\r
310 if(isset($qspl[2])) {
316 $details = gwvpmini_GetUsers($uid, 1);
317 $username = $details[$uid]["username"];
318 $fullname = $details[$uid]["fullname"];
319 $email = $details[$uid]["email"];
320 $desc = $details[$uid]["desc"];
322 error_log("user dets:".print_r($details, true));
324 echo "<h2>Remove User?</h2>";
325 echo "Are you sure you wish to remove the user, $username ($uid) - $fullname - $email - $desc?<br>";
326 echo "<a href=\"$BASE_URL/admin/confremoveuser/$uid\">Yes</a> <a href=\"$BASE_URL/admin\">No</a><br>";
328 echo "<h2>How?</h2>";
329 echo "You got here in a weird way or the uid of the user you were trying to delete is invalid<br>";
330 echo "<a href=\"$BASE_URL/admin\">Go Back</a>";
335 function gwvpmini_RemoveRepoPageBody()
\r
341 if(isset($_REQUEST["q"])) {
\r
342 $query = $_REQUEST["q"];
\r
343 $qspl = explode("/", $query);
\r
344 if(isset($qspl[2])) {
\r
349 $repdet = gwvpmini_getRepo(null, null, $rid);
350 if($repdet != false) $uid = $repdet["ownerid"];
351 $usedet = gwvpmini_getUser(null, null, $uid);
\r
355 $rname = $repdet["name"];
356 $rdesc = $repdet["desc"];
357 if($usedet == false) {
358 $ownedby = "which is unowned (Orphaned)";
360 $ownedby = "owned by <b>$username</b> ($uid) - \"$fullname\"";
362 $username = $usedet["username"];
363 $fullname = $usedet["fullname"];
366 error_log("user dets:".print_r($details, true));
\r
368 echo "<h2>Remove User?</h2>";
\r
369 echo "Are you sure you wish to remove the repo, <b>$rname</b> ($rid) - \"$rdesc\" $ownedby?<br>";
\r
370 echo "<a href=\"$BASE_URL/admin/confremoverepo/$rid\">Yes</a> <a href=\"$BASE_URL/admin\">No</a><br>";
\r
372 echo "<h2>How?</h2>";
\r
373 echo "You got here in a weird way or the uid of the repo you were trying to delete is invalid<br>";
\r
374 echo "<a href=\"$BASE_URL/admin\">Go Back</a>";
\r
379 function gwvpmini_ConfRemoveRepo()
\r
384 error_log("CONF REMOVE REPO");
387 if(isset($_REQUEST["q"])) {
\r
388 $query = $_REQUEST["q"];
\r
389 $qspl = explode("/", $query);
\r
390 if(isset($qspl[2])) {
\r
396 $details = gwvpmini_getRepo(null, null, $rid);
\r
397 $rname = $details["name"];
\r
398 gwvpmini_RemoveRepo($rid);
\r
399 gwvpmini_SendMessage("info", "Repo $rname ($rid) has been removed");
\r
401 gwvpmini_SendMessage("info", "Problem deleteing repo with rid $rid");
\r
404 header("Location: $BASE_URL/admin");
\r
407 function gwvpmini_ConfRemoveUser()
\r
412 if(isset($_REQUEST["q"])) {
\r
413 $query = $_REQUEST["q"];
\r
414 $qspl = explode("/", $query);
\r
415 if(isset($qspl[2])) {
\r
421 $details = gwvpmini_getUser(null, null, $uid);
422 $uname = $details["username"];
423 gwvpmini_RemoveUser($uid);
424 gwvpmini_SendMessage("info", "User $uname ($uid) has been removed");
\r
426 gwvpmini_SendMessage("info", "Problem deleteing user with uid $uid");
429 header("Location: $BASE_URL/admin");
\r
432 function gwvpmini_SwitchEnableUser()
\r
438 if(isset($_REQUEST["q"])) {
\r
439 $query = $_REQUEST["q"];
\r
440 $qspl = explode("/", $query);
\r
441 if(isset($qspl[2])) {
\r
444 if(isset($qspl[3])) {
449 if($newst == 1) $stat = "disabled";
450 else $stat = "enabled";
\r
452 if($uid > 0 && ($newst == 1 || $newst == 0)) {
\r
453 $details = gwvpmini_getUser(null, null, $uid);
\r
454 $uname = $details["username"];
\r
455 if($newst == 1) gwvpmini_DisableUser($uid);
456 if($newst == 0) gwvpmini_EnableUser($uid);
\r
457 gwvpmini_SendMessage("info", "User $uname ($uid) has been $stat");
\r
459 gwvpmini_SendMessage("info", "Problem disabling user with uid $uid");
\r
462 header("Location: $BASE_URL/admin");
\r
466 function gwvpmini_SwitchEnableRepo()
472 if(isset($_REQUEST["q"])) {
\r
473 $query = $_REQUEST["q"];
\r
474 $qspl = explode("/", $query);
\r
475 if(isset($qspl[2])) {
\r
478 if(isset($qspl[3])) {
\r
483 if($newst == 1) $stat = "disabled";
\r
484 else $stat = "enabled";
\r
486 if($rid > 0 && ($newst == 1 || $newst == 0)) {
\r
487 $details = gwvpmini_getRepo(null, null, $rid);
\r
488 if($newst == 1) gwvpmini_DisableRepo($rid);
\r
489 if($newst == 0) gwvpmini_EnableRepo($rid);
\r
490 gwvpmini_SendMessage("info", "Repo $uname ($rid) has been $stat");
\r
492 gwvpmini_SendMessage("info", "Problem disabling repo with rid $rid");
\r
495 header("Location: $BASE_URL/admin");
498 function gwvpmini_SwitchGravatars()
500 global $BASE_URL, $use_gravatar;
\r
502 if($newst == 1) $stat = "disabled";
\r
503 else $stat = "enabled";
\r
506 gwvpmini_setConfigVal("gravatarenabled", "0");
508 gwvpmini_setConfigVal("gravatarenabled", "1");
511 gwvpmini_SendMessage("info", "Gravatars $stat");
\r
513 header("Location: $BASE_URL/admin");
516 function gwvpmini_SwitchForceSSL()
518 global $BASE_URL, $force_ssl;
\r
520 if($newst == 1) $stat = "disabled";
\r
521 else $stat = "enabled";
\r
524 gwvpmini_setConfigVal("forcessl", "0");
\r
526 gwvpmini_setConfigVal("forcessl", "1");
\r
529 gwvpmini_SendMessage("info", "forcessl $stat");
\r
531 header("Location: $BASE_URL/admin");
\r