format('U') + $dto->getOffset(); $text = date_i18n($format,$timestamp); return $text; } function amru_new_DateTime_nonfatal ($datetimestring='', $tzobj) { // date time create with exception trap to avoid fatal errors try { $dt = new DateTime($datetimestring); $dt->setTimezone($tzobj); } catch(Exception $e) { if (current_user_can('manage_options') or current_user_can('manage_userlists')) { echo '

' .__('Message to admin only:','amr-users').' ' .__('Fatal error caught','amr-users').' - '. sprintf(__('Unable to create DateTime object from this string: "%s" ','amr-users'),$datetimestring).' ' .__('Please check the content of your date fields, and any fields where you have specified a date format','amr-users').'

'; } //else fail silently return (false); } return ($dt); } function amru_newDateTime($text='') { // create new datetime object with the global timezone // because wordpress insists that the php default must stay as UTC global $tzobj; if (empty($tzobj)) $tzobj = amr_getset_timezone (); $d = amru_new_DateTime_nonfatal($text,$tzobj); // traps exceptions return ($d); } function amru_get_func_name ($fld, $format) { global $amr_users_field_types; if (empty($amr_users_field_types)) // to get the type of field $amr_users_field_types = ausers_get_option('amr-users-field-types'); if (empty($amr_users_field_types[$fld])) return false; // no defined fieldtype else $type = $amr_users_field_types[$fld]; $func = 'ausers_format_'.$type.'_'.$format; return $func; } function amr_is_assoc($array) { return (bool)count(array_filter(array_keys($array), 'is_string')); } function amr_debug() { if (WP_DEBUG and is_user_logged_in() and current_user_can('activate_plugins')) { return true; } else return false; } function amr_debug_no_such_list () { // called when the list searched for is not found in db option. global $aopt, $amain; if (empty($aopt)) { echo '
'; _e('Error finding amr-user option in database','amr-users'); return false; } else { if (empty($aopt['list'])) { echo '
'; _e('amr-user option has no lists in database. Possible corruption.','amr-users'); return false; } else { foreach ($aopt['list'] as $ulist => $details) { echo '
'; printf(__('Found list number : %s','amr-users'),$ulist); if (empty ($firstlist)) $firstlist = $ulist; } echo '
'; _e('Using first list found','amr-users'); return $firstlist; } } } function amr_adjust_query_args () { // cleanup and add to carry through as appropriate. esc_url on return global $amain; $base = remove_query_arg (array('refresh','listpage','rows_per_page')); if (!empty($_REQUEST['filter'])) { //unset($_POST['su']); unset($_REQUEST['su']); // do not do search and filter at same time. $argstoadd = $_POST; foreach ($argstoadd as $i => $value) { if (empty($value)) unset($argstoadd[$i]); }; //unset($argstoadd['fieldvaluefilter']); //unset ($argstoadd['refresh']); unset ($argstoadd['amr-meta']); unset ($argstoadd['action']); unset ($argstoadd['action2']); unset ($argstoadd['_wp_http_referer']); foreach ($argstoadd as $i => $value) { if (!is_array($value)) {// 2014 05 16 $argstoadd[$i] = urlencode($value); //encode any ampersands } else { // we might have field value filtering which comes as an array fieldvaluefilter[] = fieldname // as we could have more than 1 happening. // these should not have special characters in them as they are fieldnames and/or if they would will be dealt with later. //if (WP_DEBUG) {echo '
arg value '; var_dump($value);} } }; $base = add_query_arg($argstoadd, $base); } if (!empty($_REQUEST['su'])) { $search = filter_var ($_REQUEST['su'], FILTER_SANITIZE_STRING ); //$search = strip_tags ($_REQUEST['su']); $base = add_query_arg('su',$search ,$base); } if (!empty($_REQUEST['rows_per_page'])) { $rpp = (int) $_REQUEST['rows_per_page']; if (!($rpp === $amain['rows_per_page'])) $base = add_query_arg('rows_per_page',$rpp,$base); // int will force to a number } // if (!empty($_SERVER['QUERY_STRING']) ) $format = '&listpage=%#%'; // ?page=%#% : %#% is replaced by the page number // else $format = '?listpage=%#%'; return ($base); //201508 - causing double escaping / encoding and admin errors so remove the escurl } function amr_remove_grouping_field ($icols) { // note cannot group and filter on the same field global $aopt, $amr_current_list; if (!empty($aopt['list'][$amr_current_list]['grouping'])) { $grouping_field = $aopt['list'][$amr_current_list]['grouping'][1]; foreach ($icols as $i => $col) { if ($col == $grouping_field) { unset($icols[$i]); } } } return($icols); } function amr_build_cols ($s) { // get the technical column names, which could be combo fields // we call this 3 times, explore whether can rationalise the calls global $amain, $aopt, $amr_current_list; $iline = array(); $iline[0] = 'ID'; foreach ($s as $is => $cl) { // for each selected and sorted $colno = (int) $cl; if (!empty($iline[$colno])) { // then it's a combo $iline[$colno] .= $is; } else $iline[$colno] = $is; } // 20170217 index must come before grouping, not just numerically if (! empty($amain['customnav'][$amr_current_list] )) {// if we are doing custom navigation, need to record the index //if (!isset($aopt['list'][$amr_current_list]['selected']['index'])) { $iline[99990] = 'index'; //} } if (! empty($aopt['list'][$amr_current_list]['grouping'] )) {// if we are doing grouping $grouping_field = $aopt['list'][$amr_current_list]['grouping'][1]; $iline [99999] = $grouping_field; } //$iline = array_unique($iline); // why do we need this ? // what happens if grouping field also in use ? #20150106 // this is messing up the use of ID #20170201 // Not anymore #2017017 ID seems to be ok now return ($iline); } function amr_build_col_headings ($s) { // get the user column nice names, which could be combo fields global $aopt, $amain, $amr_current_list, $amr_nicenames; $line = array(); $line[0] = 'ID'; // must be first foreach ($s as $is => $cl) { // for each selected and sorted $colno = (int) $cl; $value = agetnice($is); if (!empty($line[$colno])) { $line[$colno] = $line[$colno].' '.$value; } else $line[$colno] = $value; } return ($line); } function amr_users_can_edit ($type) { if (is_admin() and (current_user_can('manage_options') or current_user_can('manage_userlists') ) and (!empty($_REQUEST[$type]) or !empty($_REQUEST['config']) )) return true; else return false; } function ausers_form_end() { $html = PHP_EOL.''; $html .= PHP_EOL.''; return ($html); } function ausers_form_start() { global $amain; if (isset($_REQUEST['clear_filtering']) //or !empty($_REQUEST['su']) ) $base = get_permalink(); else $base = remove_query_arg(array( 'refresh', 'listpage', 'rows_per_page', 'filter', 'su', 'fieldvaluefilter', 'doing_wp_cron', 'index')); //$base = get_permalink(); // maybe just do this if (!empty($_REQUEST['rows_per_page'])) { if (!($_REQUEST['rows_per_page'] == $amain['rows_per_page']) ) $base = add_query_arg('rows_per_page',(int) $_REQUEST['rows_per_page'],$base); } $html = PHP_EOL.'
'.PHP_EOL; $html .= PHP_EOL.'
'; $html .= PHP_EOL.''; $html .= PHP_EOL.wp_nonce_field('amr-meta','amr-meta',true,false); return ($html); } function amr_convert_mem($size) { $unit=array('b','kb','mb','gb','tb','pb'); return @round($size/pow(1024,($i=floor(log($size,1024)))),4).' '.$unit[$i]; } function track_progress($text) { global $time_start; global $cache; //**** return; if (!is_admin()) return; if (!( WP_DEBUG or isset($_GET['mem']) )) return; // only do something if debugging or requested //or isset($_REQUEST['mem']) // sometimes eems to trigger all the time so make sure only 'get' if (!isset($time_start)) { $time_start = microtime(true); $diff = 0; } else { $now = microtime(true); $diff = round(($now - $time_start),3); } $mem = memory_get_peak_usage(true); $mem = amr_convert_mem($mem); $t = 'At debug only: '.sprintf(__('At %s seconds, peak mem= %s','amr-users'),number_format($diff,3),$mem) ; $mem = memory_get_usage (true); $mem = amr_convert_mem($mem); $t .= ' real_mem='.$mem; $t .=' - '.$text; echo '
'.$t; error_log($t); //debug only if (!empty ($cache)) $cache->log_cache_event($t); } function amr_js_cdata( $data) { //inline js echo "\n"; } function amr_loading_message_js() { $js = 'jQuery(function ($) { $(window).load(function(){ $(".loading").hide(); } })'; return (amr_js_cdata( $js)); } function amr_get_combo_fields($list) { global $aopt; $s = $aopt['list'][$list]['selected']; asort ($s); foreach ($s as $is => $cl) { // for each selected and sorted $colno = (int) $cl; // reduce to an integer to get the column number $combofields[$colno][] = $is; // make a note of the fields in a column in case there are multple } $iline = amr_build_cols ($s); foreach ($combofields as $colno => $field) { // convert from column number to tech column name if (isset($iline[$colno])) $combofields[$iline[$colno]] = $field; unset($combofields[$colno]); } return($combofields); } function amr_get_icols($c, $rptid) { $line = $c->get_column_headings ($rptid); /* get the internal heading names for internal plugin use only */ /* get the user defined heading names */ if (!defined('str_getcsv')) $icols = amr_str_getcsv( ($line[0]['csvcontent']), ',','"','\\'); else $icols = str_getcsv( $line[0]['csvcontent'], ',','"','\\'); return ($icols); } function amr_get_usermasterfields() { global $wpdb,$wp_version ; $main_fields = array( 'ID', 'user_login', 'user_nicename', 'user_email', 'user_url', 'user_registered', 'display_name', 'user_status', 'user_activation_key'); // unlikey to use for selection normally? return $main_fields; } function amr_get_createdfields( ) { return (array('post_count','comment_count','avatar','first_role')); } if (!function_exists('esc_textarea') ) { function esc_textarea( $text ) { $safe_text = htmlspecialchars( $text, ENT_QUOTES ); } } // not in use ? function amr_users_dropdown ($choices, $current) { // does the options of the select if (empty($choices)) return''; foreach ($choices as $opt => $value){ echo ''; } } if (!function_exists('amr_setDefaultTZ')) {/* also used in other amr plugins - but is it used here?? */ function amr_setDefaultTZ() { if (function_exists ('get_option')) { /* Set the default php timezone, for various reasons wordpress does not do this, buut assumes UTC*/ $current_offset = get_option('gmt_offset'); $tzstring = get_option('timezone_string'); } else if (function_exists ('date_default_timezone_get')) $tzstring = date_default_timezone_get(); else $tzstring = 'UTC'; /* (wop code: Remove old Etc mappings. Fallback to gmt_offset. */ if ( false !== strpos($tzstring,'Etc/GMT') ) $tzstring = ''; if (empty($tzstring)) { // Create a UTC+- zone if no timezone string exists if ( 0 == $current_offset ) $tzstring = 'UTC+0'; elseif ($current_offset < 0) $tzstring = 'UTC' . $current_offset; else $tzstring = 'UTC+' . $current_offset; } } } function ausers_delete_htmltransients() { global $amain; if (empty($amain)) return; if (empty($amain['names'])) return; ///something wrong foreach ($amain['names'] as $i => $list) { delete_transient('amr-users-html-for-list-'.$i); } } function agetnice ($v){ global $amr_nicenames; if (isset ($amr_nicenames[$v])) return ($amr_nicenames[$v]); else return ucwords(str_replace('_',' ',$v)); /*** ideally check for table prefix and string out for newer wordpress versions ***/ } function amr_is_network_admin() { // probably overkill, but rather safe than sorry global $ausersadminurl, $ausers_do_network; if (is_network_admin()) return true; if (!empty($ausers_do_network)) { return true; } if (stristr($ausersadminurl,'/wp-admin/network/') == FALSE) return false; return (true); } function ausers_job_prefix () { if (amr_is_network_admin() ) return ('network_'); else return (''); } if (!function_exists('in_current_page')) { function in_current_page($item, $thispage, $rowsperpage ){ /* checks if the item by number should be in the current page or not */ $ipage = ceil ($item/$rowsperpage); return ($ipage == $thispage); } } if (!function_exists('amr_check_memory')) { function amr_check_memory() { /* */ if (!function_exists('memory_get_peak_usage')) return(false); $mem_usage = memory_get_peak_usage(true); $html = amru_convert_mem($mem_usage); return($html); } } function amru_convert_mem($mem_usage) { $html = ''; if ($mem_usage < 1024) $html .= $mem_usage." bytes"; elseif ($mem_usage < 1048576) $html .= round($mem_usage/1024,2)." KB"; /* kilobytes*/ else $html .= round($mem_usage/1048576,2)." MB"; /* megabytes */ return ($html); } if (!(function_exists('objectToArray'))) { // * Convert an object to an array function objectToArray( $object ) { /* useful for converting any meta values that are objects into arrays */ if (gettype ($object) == 'object') { $s = (get_object_vars ($object)); if (isset ($s['__PHP_Incomplete_Class_Name'])) unset ($s['__PHP_Incomplete_Class_Name']); /* forced access */ return($s); } else if (is_array ($object)) return array_map( 'objectToArray', $object ); /* repeat function on each value of array */ else return ($object ); } } function amr_getset_timezone () { global $tzobj; if (!empty($tzobj)) return $tzobj; if ($tz = get_option ('timezone_string') ) { if (empty($tz)) $tz = 'UTC'; $tzobj = timezone_open($tz); } else $tzobj = timezone_open('UTC'); return $tzobj; } function amr_users_reset_column_headings ($ulist) { if ($amr_users_column_headings = ausers_get_option('amr-users-custom-headings')) { unset($amr_users_column_headings[$ulist]); $results = ausers_update_option('amr-users-custom-headings', $amr_users_column_headings); } else $results = true; return ($results); } function amr_users_store_column_headings ($ulist, $customcols ) { if (!($amr_users_column_headings = ausers_get_option('amr-users-custom-headings'))) { $amr_users_column_headings = array(); } $amr_users_column_headings[$ulist] = $customcols; $results = ausers_update_option('amr-users-custom-headings', $amr_users_column_headings); if ($results) { amr_users_message(__('Custom Column Headings Updated','amr-users')); } else amr_users_message(__('Column headings not updated - no change or error.','amr-users')); return ($results); } function amr_users_get_column_headings ($ulist, $cols, $icols ) { global $amr_users_column_headings; if ($amr_users_column_headings = ausers_get_option('amr-users-custom-headings')) { if (!empty($amr_users_column_headings[$ulist]) ) { $customcols = $amr_users_column_headings[$ulist]; foreach ($icols as $ic => $cv) { if (isset($customcols[$cv])) { $cols[$ic] = $customcols[$cv]; } } return ($cols); } } return ($cols); } function amr_mimic_meta_box($id, $title, $callback , $toggleable = true) { global $screen_layout_columns; // $style = 'style="display:none;"'; $h = (2 == $screen_layout_columns) ? ' has-right-sidebar' : ''; echo '
'; echo '
'; echo '
'; echo '
' . "\n"; echo '

'; echo "

".$title."

\n"; echo '
' . "\n"; call_user_func($callback); echo "
"; } function amr_which_role($user_object, $role_no=1) { /* The wordpress user role area is described in the wordpress code as a big mess - I think the role business is one reason why */ /* This code is largely copied from wordpress */ /* Wordpress alllows multiple or no roles. However most users expect to see 1 role only */ global $wp_roles; if (empty($user_object->roles)) return (false); $roles = $user_object->roles; $role = array_shift($roles); //if (!empty($roles[0])) $role = $roles[0]; if (isset($wp_roles->role_names[$role])) $rolename = translate_user_role($wp_roles->role_names[$role] ); else $role_name = $role; return ($rolename); } if (!function_exists('a_novalue')) { function a_novalue ($v) { /* since empty returns true on 0 and 0 is valid , use this instead */ return (empty($v) or (strlen($v) <1)); }; } if (function_exists('amr_flag_error')) return; else { function amr_flag_error ($text) { echo '

'.$text.'

'; } } function amr_users_message($text) { echo PHP_EOL.'

'; echo $text; echo '

'.PHP_EOL; } function amr_users_feed($uri, $num=5, $text='Recent News', $icon="http://webdesign.anmari.com/images/amrusers-rss.png") { $feedlink = '

'.$text.'Rss icon

'; if (!function_exists ('fetch_feed')) { echo $feedlink; return (false); } if (!empty($text)) {?>

Rss icon

get_error_message(); echo $feedlink; return (false); } // Figure out how many total items there are, but limit it to 5. $maxitems = $rss->get_item_quantity($num); // Build an array of all the items, starting with element 0 (first element). $rss_items = $rss->get_items(0, $maxitems); ?>
    '.__('No items','amr-users').''; else { // Loop through each feed item and display each item as a hyperlink. foreach ( $rss_items as $item ) { $url = $item->get_permalink(); ?>
  • get_date('F j').' '; ?> get_title(); ?> get_description(); $teaser = strip_tags(substr($teaser,0,stripos($teaser, 'Related posts')), null); $teaser = substr($teaser,0, 200 - strlen($item->get_title())); echo $teaser.'...'; ?> get_description(); ?>
  • ...
$row) { if (!empty ($temp[$key]) ) $s2[$key] = $temp[$key]; unset ($temp[$key]); } if (count($temp) > 0) { if (!empty($s2) and is_array($s2)) { return (array_merge ($s2, $temp)); } else return ($temp); } else return ($s2); } function amr_usort( $a, $b) { /* comparision function - don't mess with it - it works - sorts strings to end, else in ascending order */ if ($a == $b) return (0); else if (is_string($a) and (strlen($a) == 0)) return (1); else if (is_string($b) and (strlen($a) == 0)) return (-1); else return ($a<$b) ? -1: 1; } //} function ausers_bulk_actions() { global $two; if (!(current_user_can('remove_users'))) return; $actions = array('delete'=>__('Delete','amr-users')); // use wp translation if (!isset($two)) $two = ''; echo PHP_EOL.'
'; echo PHP_EOL.'
'; echo "\n"; submit_button( __( 'Apply' ,'amr-users'), //text 'button-secondary action', // type 'dobulk'.$two, //name false, // wrap in p tag or not array( 'id' => "doaction$two" ) // other attributes ); $two = '2'; echo PHP_EOL.'
'.PHP_EOL; } function amr_is_bulk_request ($type) { if (((isset($_POST['dobulk'])) or (isset($_POST['dobulk2']) ) ) and ((!empty($_POST['action']) and ($_POST['action'] == $type)) or (!empty($_POST['action2']) and ($_POST['action2'] == $type) )) ) { //echo 'Delete requested
'; //*** return true; } else return false; } function amr_redirect_if_delete_requested () { if (amr_is_bulk_request ('delete')) { if (isset($_POST['users'])) { //echo 'Redirecting to delete screen
'; //*** wp_redirect( add_query_arg(array( 'users'=>$_POST['users'] , 'action'=>'delete' ), wp_nonce_url(network_admin_url('users.php'),'bulk-users'))); // safe because url not coming from outside - its the admin url } else { _e('No users selected','amr-users'); } exit; } } add_action('admin_init','amr_redirect_if_delete_requested'); add_action('admin_menu','amr_redirect_if_delete_requested');