From b818ffae24857f39a57c7c43dea2c9aa87815368 Mon Sep 17 00:00:00 2001
From: mensonge <mensonge@b3834d28-1941-0410-a4f8-b48e95affb8f>
Date: Wed, 3 Dec 2008 13:24:17 +0000
Subject: New Feature: admin can check urls validity

git-svn-id: https://semanticscuttle.svn.sourceforge.net/svnroot/semanticscuttle/trunk@190 b3834d28-1941-0410-a4f8-b48e95affb8f
---
 admin.php | 13 ++++++++++---
 1 file changed, 10 insertions(+), 3 deletions(-)

(limited to 'admin.php')

diff --git a/admin.php b/admin.php
index 99841c8..fa2c3db 100644
--- a/admin.php
+++ b/admin.php
@@ -32,7 +32,9 @@ $currentUser = $userservice->getCurrentObjectUser();
 // Header variables
 $tplVars['subtitle'] = T_('Manage users');
 $tplVars['loadjs'] = true;
-$tplVars['sidebar_blocks'] = array('users' );
+$tplVars['sidebar_blocks'] = array('users' );
+$tplVars['error'] = '';
+$tplVars['msg'] = '';
 
 if ( !$userservice->isLoggedOn() ) {
 	header('Location: '. createURL('login', ''));
@@ -65,14 +67,19 @@ if ( $action
 			}
 			break;
 		case 'checkUrl' :
-			$tplVars['msg'] =  checkUrl('http://fr3.php.net/manual/fr/function.get-headers.php')?"no pb": "ouille";
+			$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'] .')<br/>';  
+				}
+			}
 			break;
 		default:
 			// DO NOTHING
 	}
 }
 
-$templatename = 'userlist.tpl';
+$templatename = 'admin.tpl';
 $users =& $userservice->getObjectUsers();
 
 if ( !is_array($users) ) {
-- 
cgit v1.2.3