From 29422fa55379aa61a61019b832c83dab6d450264 Mon Sep 17 00:00:00 2001 From: cweiske Date: Sat, 3 Oct 2009 14:00:33 +0000 Subject: move files to new locations git-svn-id: https://semanticscuttle.svn.sourceforge.net/svnroot/semanticscuttle/trunk@386 b3834d28-1941-0410-a4f8-b48e95affb8f --- admin.php | 94 --------------------------------------------------------------- 1 file changed, 94 deletions(-) delete mode 100644 admin.php (limited to 'admin.php') diff --git a/admin.php b/admin.php deleted file mode 100644 index b57b568..0000000 --- a/admin.php +++ /dev/null @@ -1,94 +0,0 @@ -isLoggedOn() ) { - header('Location: '. createURL('login', '')); - exit(); -} - -if ( !$currentUser->isAdmin() ) { - header('Location: '. createURL('bookmarks', $currentUser->getUsername())); - exit(); -} - -@list($url, $action, $user) = isset($_SERVER['PATH_INFO']) ? explode('/', $_SERVER['PATH_INFO']) : NULL; - -if ( $action -&& (strpos($_SERVER['HTTP_REFERER'], ROOT.'admin') === 0) // Prevent CSRF attacks -) { - switch ( $action ) { - case 'delete': - if ( $user && ($userinfo = $userservice->getUserByUsername($user)) ) { - $uId = $userinfo['uId']; - - $tagcacheservice->deleteByUser($uId); - $tag2tagservice->removeLinkedTagsForUser($uId); - $userservice->deleteUser($uId); - $bookmark2tagservice->deleteTagsForUser($uId); - $commondescriptionservice->deleteDescriptionsForUser($uId); - $searchhistoryservice->deleteSearchHistoryForUser($uId); - $tagstatservice->deleteTagStatForUser($uId); - // XXX: don't delete bookmarks before tags, else tags can't be deleted !!! - $bookmarkservice->deleteBookmarksForUser($uId); - - $tplVars['msg'] = sprintf(T_('%s and all his bookmarks and tags were deleted.'), $user); - } - break; - case 'checkUrl' : - $bookmarks =& $bookmarkservice->getBookmarks(0, NULL, NULL, NULL, NULL, getSortOrder()); - foreach($bookmarks['bookmarks'] as $bookmark) { - if(!checkUrl($bookmark['bAddress'])) { - $tplVars['error'].= T_('Problem with ').$bookmark['bAddress'].' ('. $bookmark['username'] .')
'; - } - } - break; - default: - // DO NOTHING - } -} - -$templatename = 'admin.tpl'; -$users =& $userservice->getObjectUsers(); - -if ( !is_array($users) ) { - $users = array(); -} - -$tplVars['users'] =& $users; - -$templateservice->loadTemplate($templatename, $tplVars); -?> -- cgit v1.2.3