商业源码-编程源码-IPB(Invision Power Board) v2.0.0.zip

<?php /* +-------------------------------------------------------------------------- | Invision Power Board v2.0.0 | ============================================= | by Matthew Mecham | (c) 2001 - 2004 Invision Power Services, Inc. | http://www.invisionpower.com | ============================================= | Web: http://www.invisionboard.com | Time: Fri, 17 Sep 2004 03:46:59 GMT | Release: 7cd49fc13aa3585d795c83283eb61fdf | Licence Info: http://www.invisionboard.com/?license +--------------------------------------------------------------------------- | | > Admin Forum functions | > Module written by Matt Mecham | > Date started: 1st march 2002 | | > Module Version Number: 1.0.0 | > DBA Checked: Tue 25th May 2004 +-------------------------------------------------------------------------- */ if ( ! defined( 'IN_ACP' ) ) { print "<h1>Incorrect access</h1>You cannot access this file directly. If you have recently upgraded, make sure you upgraded 'admin.php'."; exit(); } class ad_member { var $base_url; var $modules = ""; function auto_run() { global $ibforums, $DB, $std; //----------------------------------------- // Get the sync module //----------------------------------------- if ( USE_MODULES == 1 ) { require ROOT_PATH."modules/ipb_member_sync.php"; $this->modules = new ipb_member_sync(); } //----------------------------------------- // Kill globals - globals bad, Homer good. //----------------------------------------- $tmp_in = array_merge( $_GET, $_POST, $_COOKIE ); foreach ( $tmp_in as $k => $v ) { unset($$k); } $ibforums->admin->nav[] = array( 'act=mem&code=edit', 'Edit Member Search Form' ); //----------------------------------------- switch($ibforums->input['code']) { case 'doform': $this->member_do_edit_form(); break; case 'doedit': $this->member_do_edit(); break; //----------------------------------------- case 'unsuspend': $this->member_unsuspend(); break; //----------------------------------------- case 'add': $this->member_add_form(); break; case 'doadd': $this->member_do_add(); break; //----------------------------------------- case 'doprune': $this->member_doprune(); break; //----------------------------------------- // ranks / titles //----------------------------------------- case 'title': $this->titles_start(); break; case 'rank_edit': $this->titles_rank_setup('edit'); break; case 'rank_add': $this->titles_rank_setup('add'); break; case 'do_add_rank': $this->titles_add_rank(); break; case 'do_rank_edit': $this->titles_edit_rank(); break; case 'rank_delete': $this->titles_delete_rank(); break; //----------------------------------------- case 'mod': $this->view_mod(); break; case 'domod': $this->domod(); break; //----------------------------------------- case 'changename': $this->member_change_name_start(); break; case 'dochangename': $this->member_change_name_complete(); break; //----------------------------------------- case 'banmember': $this->member_suspend_start(); break; case 'dobanmember': $this->member_suspend_complete(); break; //----------------------------------------- // Change Passy //----------------------------------------- case 'changepassword': $this->member_password_start(); break; case 'dochangepassword': $this->member_password_complete(); break; //----------------------------------------- // Member search //----------------------------------------- case 'search': $this->search_form(); break; case 'searchresults': $this->search_results(); break; //----------------------------------------- // Delete / Prune //----------------------------------------- case 'member_delete': $this->member_delete(); break; default: $this->search_form(); break; } } //----------------------------------------- // // PASS: START // //----------------------------------------- function member_password_complete() { global $ibforums, $DB, $std; if ( ! $ibforums->input['password'] ) { $ibforums->main_msg = "You must enter a password!"; $this->member_password_start(); } $salt = $ibforums->converge->generate_password_salt(5); $salt = str_replace( '\\', "\\\\", $salt ); $key = $ibforums->converge->generate_auto_log_in_key(); $md5_once = md5( trim($ibforums->input['password']) ); $converge = $DB->simple_exec_query( array( 'select' => '*', 'from' => 'members_converge', 'where' => 'converge_id='.$ibforums->input['id'] ) ); $save_array = array(); if ( $ibforums->input['newsalt'] ) { $save_array['converge_pass_salt'] = $salt; $save_array['converge_pass_hash'] = md5( md5($salt) . $md5_once ); } else { $save_array['converge_pass_hash'] = md5( md5( $converge['converge_pass_salt'] ) . $md5_once ); } $DB->do_update( 'members_converge', $save_array, 'converge_id='.$ibforums->input['id'] ); if ( $ibforums->input['newkey'] ) { $DB->do_update( 'members', array( 'member_login_key' => $key ), 'id='.$ibforums->input['id'] ); } //----------------------------------------- // Redirect //----------------------------------------- $page_query = ""; foreach( array('name','email','ip_address','aim_name','icq_number','yahoo','signature','posts','suspended', 'registered_first', 'registered_last','last_post_first', 'last_post_last', 'last_activity_first', 'last_activity_last','mgroup','namewhere','gotcount', 'fromdel') as $bit ) { $page_query .= '&'.$bit.'='.trim($ibforums->input[ $bit ]); } $ibforums->admin->save_log("Members Password Changed ( id: {$ibforums->input['id']} )"); $ibforums->admin->done_screen("Password Changed", "Member Search", "act=mem".$page_query, "redirect" ); } //----------------------------------------- // // PASS: START // //----------------------------------------- function member_password_start() { global $ibforums, $DB, $std; //----------------------------------------- // Redirect //----------------------------------------- $page_array = array( 1 => array( 'code' , 'dochangepassword' ), 2 => array( 'act' , 'mem' ), 3 => array( 'id' , $ibforums->input['id'] ), ); foreach( array('name','email','ip_address','aim_name','icq_number','yahoo','signature','posts','suspended', 'registered_first', 'registered_last','last_post_first', 'last_post_last', 'last_activity_first', 'last_activity_last','mgroup','namewhere','gotcount', 'fromdel') as $bit ) { $page_array[] = array( $bit, trim($ibforums->input[ $bit ]) ); } $ibforums->html .= $ibforums->adskin->start_form( $page_array ); //----------------------------------------- // Get member //----------------------------------------- $member = $DB->simple_exec_query( array( 'select' => '*', 'from' => 'members', 'where' => 'id='.$ibforums->input['id'] ) ); $ibforums->adskin->td_header[] = array( "&nbsp;" , "40%" ); $ibforums->adskin->td_header[] = array( "&nbsp;" , "60%" ); //----------------------------------------- $ibforums->html .= $ibforums->adskin->start_table( "Change password for member: {$member['name']}" ); $ibforums->html .= $ibforums->adskin->add_td_row( array( "<strong>Enter the new password</strong>" , $ibforums->adskin->form_input('password' ), ) ); $ibforums->html .= $ibforums->adskin->add_td_row( array( "<b>Create new password salt?</b><div style='color:gray'>If set to 'yes', a new password salt will be generated. Useful if a member is having trouble logging in.</div>" , $ibfo