diff options
Diffstat (limited to 'admin/verify_emails_role.php')
| -rw-r--r-- | admin/verify_emails_role.php | 38 |
1 files changed, 38 insertions, 0 deletions
diff --git a/admin/verify_emails_role.php b/admin/verify_emails_role.php new file mode 100644 index 0000000..f9738c8 --- /dev/null +++ b/admin/verify_emails_role.php @@ -0,0 +1,38 @@ +<?php +// $Header$ +// Copyright (c) 2002-2003, Luis Argerich, Garland Foster, Eduardo Polidor, et. al. +// All Rights Reserved. See below for details and a complete list of authors. +// Licensed under the GNU LESSER GENERAL PUBLIC LICENSE. See http://www.gnu.org/copyleft/lesser.html for details. +// Initialization +require_once( '../../kernel/setup_inc.php' ); + + + $gBitUser->verifyTicket(); + + $whereSql = ''; + $bindVars = array( $gBitSystem->getConfig('users_validate_email_role') ); + if( !empty( $_REQUEST['start_user_id'] ) ) { + $whereSql = " AND user_id>?"; + $bindVars[] = $_REQUEST['start_user_id']; + } + + $selectSql = "SELECT uu.user_id,uu.email FROM users_users uu WHERE user_id NOT IN (SELECT user_id FROM users_roles_map WHERE role_id = ?) $whereSql ORDER BY uu.user_id"; + $users = $gBitDb->getAssoc($selectSql, $bindVars ); + $errors; + foreach ( $users as $id=>$email ){ + print date( "Y-m-d H:i:s" )." Verifying $email ( $id ) .... "; + flush(); + $emailStatus = $gBitUser->verifyMx($email,$errors); + if( $emailStatus === true){ + $gBitUser->addUserToRole( $id , $gBitSystem->getConfig('users_validate_email_role') ); + print "valid"; + } elseif( $emailStatus === -1 ) { + print "MX connection failed"; + } else { + print " --INVALID-- "; + } + print "<br/>\n"; + flush(); + } + + |