// Refers to a single instance of this class. ##

private static $instance = null;

/* properties */

public $text_domain = 'export-user-data'; // for translation ##

private $q_eud_exports = ''; // export settings ##

private $usermeta_saved_fields = array();

private $bp_fields_saved_fields = array();

private $bp_fields_update_time_saved_fields = array();

private $role = '';

private $start_date = '';

private $end_date = '';

private $limit_offset = '';

private $limit_total = '';

private $format = '';

/**

* Creates or returns an instance of this class.

*

* @return Foo A single instance of this class.

*/

public static function get_instance() {

if ( null == self::$instance ) {

self::$instance = new self;

}

return self::$instance;

}

/**

* Class contructor

*

* @since 0.1

**/

private function __construct()

{

if ( is_admin() ) {

add_action( 'init', array( $this, 'load_plugin_textdomain' ), 1 );

add_action( 'init', array( $this, 'load_user_options' ), 2 );

add_action( 'admin_menu', array( $this, 'add_admin_pages' ) );

add_action( 'init', array( $this, 'generate_data' ), 3 );

add_filter( 'q_eud_exclude_data', array( $this, 'exclude_data' ) );

add_action( 'admin_enqueue_scripts', array( $this, 'add_css_and_js' ), 1 );

add_action( 'admin_footer', array( $this, 'jquery' ), 100000 );

add_action( 'admin_footer', array( $this, 'css' ), 100000 );

// check for saved settings, default to empty array ##

}

}

/**

* Load plugin text-domain

*

* @since 0.9.0

* @return void

**/

public function load_plugin_textdomain()

{

load_plugin_textdomain( $this->text_domain, false, basename( dirname( __FILE__ ) ) . '/languages' );

}

/**

* Add administration menus

*

* @since 0.1

**/

public function add_admin_pages()

{

add_users_page( __( 'Export User Data', $this->text_domain ), __( 'Export User Data', $this->text_domain ), 'list_users', $this->text_domain, array( $this, 'users_page' ) );

}

/**

* style and interaction

*/

public function add_css_and_js( $hook )

{

// load the scripts on only the plugin admin page ##

if ( isset( $_GET['page'] ) && ( $_GET['page'] == $this->text_domain ) ) {

wp_register_style( 'q_export_user_data', plugins_url( 'css/export-user-data.css' ,__FILE__ ));

wp_enqueue_style( 'q_export_user_data' );

wp_enqueue_script( 'q_eud_multi_select_js', plugins_url( 'js/jquery.multi-select.js', __FILE__ ), array('jquery'), '0.9.8', false );

}

}

/**

* Return Byte count of $val

*

* @link http://wordpress.org/support/topic/how-to-exporting-a-lot-of-data-out-of-memory-issue?replies=2

* @since 0.9.6

*/

public function return_bytes( $val )

{

$val = trim( $val );

$last = strtolower($val[strlen($val)-1]);

switch( $last ) {

// The 'G' modifier is available since PHP 5.1.0

case 'g':

$val *= 1024;

case 'm':

$val *= 1024;

case 'k':

$val *= 1024;

}

return $val;

}

/**

* clean that stuff up

*/

public function sanitize( $value )

{

$value = str_replace("\r", '', $value);

$value = str_replace("\n", '', $value);

$value = str_replace("\t", '', $value);

return $value;

}

/**

* Load up saved exports for this user

*

* @since 0.9.6

* @return Array of saved exports

*/

public function load_user_options()

{

$this->q_eud_exports = get_user_meta( get_current_user_id(), 'q_eud_exports' ) ? get_user_meta( get_current_user_id(), 'q_eud_exports', true ) : array() ;

#var_dump( $this->q_eud_exports );

}

/**

* Get list of saved exports for this user

*

* @since 0.9.4

* @return Array of saved exports

*/

public function get_user_options()

{

// get the stored options - filter empty array items ##

$q_eud_exports = array_filter( $this->q_eud_exports );

// quick check if the array is empty ##

if ( empty ( $q_eud_exports ) ) {

return false;

}

// test the array of saved exports ##

#$this->pr( $q_eud_exports );

// start with an empty array ##

$exports = array();

// loop over each saved export and grab each key ##

foreach ( $q_eud_exports as $key => $value ) {

$exports[] = $key;

}

// kick back array ##

return( $exports );

}

/**

* Check for and load stored user options

*

* @since 0.9.3

* @return void

*/

public function get_user_options_by_export( $export = null )

{

// sanity check ##

if ( is_null ( $export ) ) { return false; }

if ( isset( $this->q_eud_exports[$export] ) ) {

$this->usermeta_saved_fields = $this->q_eud_exports[$export]['usermeta_saved_fields'];

$this->bp_fields_saved_fields = $this->q_eud_exports[$export]['bp_fields_saved_fields'];

$this->bp_fields_update_time_saved_fields = $this->q_eud_exports[$export]['bp_fields_update_time_saved_fields'];

$this->role = $this->q_eud_exports[$export]['role'];

$this->start_date = $this->q_eud_exports[$export]['start_date'];

$this->end_date = $this->q_eud_exports[$export]['end_date'];

$this->limit_offset = $this->q_eud_exports[$export]['limit_offset'];

$this->limit_total = $this->q_eud_exports[$export]['limit_total'];

$this->format = $this->q_eud_exports[$export]['format'];

} else {

$this->usermeta_saved_fields = array();

$this->bp_fields_saved_fields = array();

$this->bp_fields_update_time_saved_fields = array();

$this->role = '';

$this->start_date = '';

$this->end_date = '';

$this->limit_offset = '';

$this->limit_total = '';

$this->format = '';

}

}

/**

* method to store user options

*

* @todo sanitizing function is not correct - yet... ##

* @param string $save_export Export Key name

* @param array $save_options Array of export options to save

* @since 0.9.3

* @return void

*/

public function set_user_options( $key = null, $options = null )

{

// sanity check ##

if ( is_null ( $key ) || is_null ( $options ) ) {

#$this->pr( 'missing save values' );

return false;

}

#$this->pr( $key );

#$this->pr( $options );

// for now, I'm simply allowing keys to be resaved - but this is not so logical ##

if ( array_key_exists( $key, $this->q_eud_exports ) ) {

#$this->pr( 'key exists, skipping save' );

#return false;

}

if ( isset( $options ) && is_array( $options ) ) {

// @todo - sanitizing function is not correct - yet... ##

/*

// update_option sanitizes the option name but not the option value ##

foreach ( $options as $field_name => $field_value ) {

// so do that here. ##

if ( is_array( $field_value ) ) {

foreach ( $field_value as $field_array_key => $field_array_value ) {

$options[$key][$field_name][$field_array_key] = sanitize_text_field( $field_array_value );

}

} else {

$options[$key][$field_name] = sanitize_text_field( $field_value );

}

}

*/

// assign the sanitized array of values to the class property $q_eud_exports as a new array with key $key ##

$this->q_eud_exports[$key] = $options;

// update stored user_meta values, if previous key found ##

if ( get_user_meta( get_current_user_id(), 'q_eud_exports' ) !== false ) {

#update_option( 'q_eud_exports', $this->q_eud_exports );

update_user_meta( get_current_user_id(), 'q_eud_exports', $this->q_eud_exports );

// create new user meta key ##

} else {

#add_option( 'q_eud_exports', $this->q_eud_exports, $deprecated, $autoload );

add_user_meta( get_current_user_id(), 'q_eud_exports', $this->q_eud_exports );

}

}

}

/**

* method to delete user options

*

* @param $key String Key name to drop from property

* @since 0.9.3

* @return void

*/

public function delete_user_options( $key = null )

{

// sanity check ##

if ( is_null ( $key ) || ! array_key_exists( $key, $this->q_eud_exports ) ) { return false; }

// clean it up ##

$key = sanitize_text_field( $key );

// check it out ##

#$this->pr( $key );

// drop the array by it's key name from the class property ##

unset( $this->q_eud_exports[$key] );

// update the saved data ##

update_user_meta( get_current_user_id(), 'q_eud_exports', $this->q_eud_exports );

}

/**

* Process content of CSV file

*

* @since 0.1

**/

public function generate_data()

{

// This function runs before we display the admin page, so we need to skip

// the rest of this function if the user didn't click on the

// Save, Load, or Delete Settings buttons

if (

! isset( $_POST['_wpnonce-q-eud-export-user-page_export'] )

|| isset( $_POST['load_export'] )

|| isset( $_POST['save_export'] )

|| isset( $_POST['delete_export'] ) )

{

return false;

}

// check admin referer ##

check_admin_referer( 'q-eud-export-user-page_export', '_wpnonce-q-eud-export-user-page_export' );

// build argument array ##

$args = array(

#'fields' => 'all_with_meta',

'fields' => 'all', // reduce initial data load and call up required fields inside the loop ##

'role' => sanitize_text_field( $_POST['role'] )

);

// did they request a specific program ? ##

if ( isset( $_POST['program'] ) && $_POST['program'] != '' ) {

$args['meta_key'] = 'member_of_club';

$args['meta_value'] = (int)$_POST['program'];

$args['meta_compare'] = '=';

}

// is there a range limit in place for the export ? ##

if ( isset( $_POST['limit_offset'] ) && $_POST['limit_offset'] != '' && isset( $_POST['limit_total'] ) && $_POST['limit_total'] != '' ) {

// let's just make sure they are integer values ##

$limit_offset = (int)$_POST['limit_offset'];

$limit_total = (int)$_POST['limit_total'];

if ( is_int( $limit_offset ) && is_int( $limit_total ) ) {

$args['offset'] = $limit_offset;

/* cwjordan codex says:

* number - Limit the total number of users returned

* so don't subtract the offset, like as not

* that will give us a negative number for $args['number']

* e.g. offset of 1000 total of 100 */

$args['number'] = $limit_total;

// $args['number'] = $limit_total - $limit_offset;

#wp_die(pr($args));

}

}

/* pre_user query */

add_action( 'pre_user_query', array( $this, 'pre_user_query' ) );

$users = get_users( $args );

remove_action( 'pre_user_query', array( $this, 'pre_user_query' ) );

/* no users found, so chuck an error into the args array and exit the export */

if ( ! $users ) {

$referer = add_query_arg( 'error', 'empty', wp_get_referer() );

wp_redirect( $referer );

exit;

}

/* get sitename and clean it up */

$sitename = sanitize_key( get_bloginfo( 'name' ) );

if ( ! empty( $sitename ) ) {

$sitename .= '.';

}

// export method ? ##

$export_method = 'excel'; // default to Excel export ##

if ( isset( $_POST['format'] ) && $_POST['format'] != '' ) {

$export_method = sanitize_text_field( $_POST['format'] );

}

// set export filename structure ##

$filename = $sitename . 'users.' . date( 'Y-m-d-H-i-s' );

switch ( $export_method ) {

case "csv":

// to csv ##

header( 'Content-Description: File Transfer' );

header( 'Content-Disposition: attachment; filename='.$filename.'.csv' );

header( 'Content-Type: text/csv; charset=' . get_option( 'blog_charset' ), true );

// set a csv check flag

$is_csv = true;

// nothing here

$doc_begin = '';

//preformat

$pre = '';

// how to seperate data ##

$seperator = ','; // comma for csv ##

// line break ##

$breaker = "\n";

// nothing here

$doc_end = '';

break;

case ('excel'):

// to xls ##

header( 'Content-Description: File Transfer' );

header("Content-Type: application/vnd.ms-excel");

header("Content-Disposition: attachment; filename=$filename.xls");

header("Pragma: no-cache");

header("Expires: 0");

// set a csv check flag

$is_csv = false;

//grab the template file (for tidy formatting)

include( 'xml-template.php' );

// open xml

$doc_begin = $xml_doc_begin;

//preformat

$pre = $xml_pre;

// how to seperate data ##

$seperator = $xml_seperator;

// line break ##

$breaker = $xml_breaker;

// close xml

$doc_end = $xml_doc_end;

break;

}

// function to exclude data ##

$exclude_data = apply_filters( 'q_eud_exclude_data', array() );

// check for selected usermeta fields ##

$usermeta = isset( $_POST['usermeta'] ) ? $_POST['usermeta']: '';

$usermeta_fields = array();

if ( $usermeta && is_array( $usermeta ) ) {

foreach( $usermeta as $field ) {

$usermeta_fields[] = sanitize_text_field ( $field );

}

}

#pr($usermeta_fields);

#exit;

// check for selected x profile fields ##

$bp_fields = isset( $_POST['bp_fields'] ) ? $_POST['bp_fields'] : '';

$bp_fields_passed = array();

if ( $bp_fields && is_array($bp_fields) ) {

foreach( $bp_fields as $field ) {

// reverse tidy ##

$field = str_replace( '__', ' ', sanitize_text_field ( $field ) );

// add to array ##

$bp_fields_passed[] = $field;

}

}

// cwjordan: check for x profile fields we want update time for ##

$bp_fields_update = isset( $_POST['bp_fields_update_time'] ) ? $_POST['bp_fields_update_time'] : '';

$bp_fields_update_passed = array();

if ( $bp_fields_update && is_array( $bp_fields_update ) ) {

foreach( $bp_fields_update as $field ) {

// reverse tidy ##

$field = str_replace( '__', ' ', sanitize_text_field ( $field ) );

// add to array ##

$bp_fields_update_passed[] = $field . " Update Date";

}

}

// global wpdb object ##

global $wpdb;

// exportable user data ##

$data_keys = array(

'ID'

, 'user_login'

#, 'user_pass'

, 'user_nicename'

, 'user_email'

, 'user_url'

, 'user_registered'

#, 'user_activation_key'

#, 'user_status',

, 'display_name'

);

// compile final fields list ##

$fields = array_merge( $data_keys, $usermeta_fields, $bp_fields_passed, $bp_fields_update_passed );

// build the document headers ##

$headers = array();

foreach ( $fields as $key => $field ) {

// rename programs field ##

if ( $field == 'member_of_club' ){

$field = 'Program';

}

if ( in_array( $field, $exclude_data ) ) {

unset( $fields[$key] );

} else {

if ( $is_csv ) {

$headers[] = '"' . $field . '"';

} else {

$headers[] = $field;

#echo '<script>console.log("Echoing header cell: '.$field.'")</script>';

}

}

}

// no more buffering while spitting back the export data ##

ob_end_flush();

// get the value in bytes allocated for Memory via php.ini ##

// @link http://wordpress.org/support/topic/how-to-exporting-a-lot-of-data-out-of-memory-issue?replies=2

$memory_limit = $this->return_bytes( ini_get('memory_limit') ) * .75;

// we need to disable caching while exporting because we export so much data that it could blow the memory cache

// if we can't override the cache here, we'll have to clear it later...

if ( function_exists( 'override_function' ) ) {

override_function('wp_cache_add', '$key, $data, $group="", $expire=0', '');

override_function('wp_cache_set', '$key, $data, $group="", $expire=0', '');

override_function('wp_cache_replace', '$key, $data, $group="", $expire=0', '');

override_function('wp_cache_add_non_persistent_groups', '$key, $data, $group="", $expire=0', '');

} elseif ( function_exists( 'runkit_function_redefine' ) ) {

runkit_function_redefine('wp_cache_add', '$key, $data, $group="", $expire=0', '');

runkit_function_redefine('wp_cache_set', '$key, $data, $group="", $expire=0', '');

runkit_function_redefine('wp_cache_replace', '$key, $data, $group="", $expire=0', '');

runkit_function_redefine('wp_cache_add_non_persistent_groups', '$key, $data, $group="", $expire=0', '');

}

// open doc wrapper.. ##

echo $doc_begin;

// echo headers ##

echo $pre . implode( $seperator, $headers ) . $breaker;

// build row values for each user ##

foreach ( $users as $user ) {

// check if we're hitting any Memory limits, if so flush them out ##

// per http://wordpress.org/support/topic/how-to-exporting-a-lot-of-data-out-of-memory-issue?replies=2

if ( memory_get_usage( true ) > $memory_limit ) {

wp_cache_flush();

}

// open up a new empty array ##

$data = array();

// BP loaded ? ##

if ( function_exists ('bp_is_active') ) {

$bp_data = BP_XProfile_ProfileData::get_all_for_user( $user->ID );

}

// loop over each field ##

foreach ( $fields as $field ) {

// check if this is a BP field ##

if ( isset( $bp_data ) && isset( $bp_data[$field] ) && in_array( $field, $bp_fields_passed ) ) {

$value = $bp_data[$field];

if ( is_array( $value ) ) {

$value = maybe_unserialize($value['field_data']); // suggested by @grexican ##

#$value = $value['field_data'];

/**

* cwjordan

* after unserializing it we then

* need to implode it so

* that we have something readable?

* Going to use :: as a separator

* because that's what Buddypress Members Import

* expects, but we might want to make that

* configurable.

*/

if ( is_array( $value ) ) {

$value = implode("::", $value );

}

}

$value = $this->sanitize($value);

// check if this is a BP field we want the updated date for ##

} elseif ( in_array( $field, $bp_fields_update_passed ) ) {

global $bp;

$real_field = str_replace(" Update Date", "", $field);

$field_id = xprofile_get_field_id_from_name( $real_field );

$value = $wpdb->get_var (

$wpdb->prepare(

"

SELECT last_updated

FROM {$bp->profile->table_name_data}

WHERE user_id = %d AND field_id = %d

"

, $user->ID

, $field_id

)

);

// include the user's role in the export ##

} elseif ( isset( $_POST['q_eud_role'] ) && $_POST['q_eud_role'] != '' && $field == 'role' ){

// add "Role" as $value ##

$value = $user->roles[0] ? $user->roles[0] : '' ; // empty value if no role found - note: we only take the first role assigned to the user ##

// user data or usermeta ##

} else {

$value = isset( $user->{$field} ) ? $user->{$field} : '';

#$value = is_array( $value ) ? serialize( $value ) : $value; // maybe serialize the value ##

$value = is_array( $value ) ? implode(", ", $value ) : $value; // maybe serialize the value - suggested by @nicmare ##

}

// correct program value to Program Name ##

if ( $field == 'member_of_club' ) {

$value = get_the_title($value);

}

if ( $is_csv ) {

$data[] = '"' . str_replace( '"', '""', $value ) . '"';

} else {

$data[] = $value;

}

}

// echo row data ##

echo $pre . implode( $seperator, $data ) . $breaker;

}

// close doc wrapper..

echo $doc_end;

// stop PHP, so file can export correctly ##

exit;

}

/**

* Content of the settings page

*

* @since 0.1

**/

public function users_page()

{

// quick security check ##

if ( ! current_user_can( 'list_users' ) ) {

wp_die( __( 'You do not have sufficient permissions to access this page.', $this->text_domain ) );

}

// Save settings button was pressed ##

if (

isset( $_POST['save_export'] )

&& check_admin_referer( 'q-eud-export-user-page_export', '_wpnonce-q-eud-export-user-page_export' )

) {

// start with an empty variable ##

$save_export = "";

if ( ! empty( $_POST['save_new_export_name'] ) ) {

// assign value ##

$save_export = $_POST['save_new_export_name'];

} elseif ( ! empty( $_POST['export_name'] ) ) {

$save_export = $_POST['export_name'];

}

// clean up $save_export ##

$save_export = sanitize_text_field( $save_export );

// Build array of $options to save and save them ##

if ( $save_export != "" ) {

// prepare all array values ##

$usermeta = isset( $_POST['usermeta'] ) ? $_POST['usermeta']: '' ;

$bp_fields = isset( $_POST['bp_fields'] ) ? $_POST['bp_fields'] : '' ;

$bp_fields_update = isset( $_POST['bp_fields_update_time'] ) ? $_POST['bp_fields_update_time'] : '' ;

$format = isset( $_POST['format'] ) ? $_POST['format'] : '' ;

$role = isset( $_POST['role'] ) ? $_POST['role'] : '' ;

$start_date = isset( $_POST['start_date'] ) ? $_POST['start_date'] : '' ;

$end_date = isset( $_POST['end_date'] ) ? $_POST['end_date'] : '' ;

$limit_offset = isset( $_POST['limit_offset'] ) ? $_POST['limit_offset'] : '' ;

$limit_total = isset( $_POST['limit_total'] ) ? $_POST['limit_total'] : '' ;

// assign all values to a multidimensional array with $save_export as the key of the upper array ##

#$options = array (

$save_array = array (

'usermeta_saved_fields' => $usermeta,

'bp_fields_saved_fields' => $bp_fields,

'bp_fields_update_time_saved_fields' => $bp_fields_update,

'role' => $role,

'start_date' => $start_date,

'end_date' => $end_date,

'limit_offset' => $limit_offset,

'limit_total' => $limit_total,

'format' => $format

);

#);

// store the options, for next load ##

$this->set_user_options( $save_export, $save_array );

// Display the settings the user just saved instead of blanking the form ##

$_POST['load_export'] = 'Load Settings';

$_POST['export_name'] = $save_export;

}

}

// Load settings button was pressed ( or option saved and $_POST variables hijacked )##

if (

isset( $_POST['load_export'] )

&& isset( $_POST['export_name'] )

&& check_admin_referer( 'q-eud-export-user-page_export', '_wpnonce-q-eud-export-user-page_export' )

) {

$this->get_user_options_by_export( sanitize_text_field( $_POST['export_name'] ) );

}

// Delete settings button was pressed ##

if (

isset( $_POST['delete_export'] )

&& isset( $_POST['export_name'] )

&& check_admin_referer( 'q-eud-export-user-page_export', '_wpnonce-q-eud-export-user-page_export' )

) {

$this->delete_user_options( sanitize_text_field( $_POST['export_name'] ) );

}

?>

<div class="wrap">

<h2><?php _e( 'Export User Data', $this->text_domain ); ?></h2>

<?php

// nothing happening? ##

if ( isset( $_GET['error'] ) ) {

echo '<div class="updated"><p><strong>' . __( 'No users found.', $this->text_domain ) . '</strong></p></div>';

}

?>

<form method="post" action="" enctype="multipart/form-data">

<?php wp_nonce_field( 'q-eud-export-user-page_export', '_wpnonce-q-eud-export-user-page_export' ); ?>

<table class="form-table">

<?php

// allow admin to select user meta fields to export ##

global $wpdb;

$meta_keys = $wpdb->get_results( "SELECT distinct(meta_key) FROM $wpdb->usermeta" );

// get meta_key value from object ##

$meta_keys = wp_list_pluck( $meta_keys, 'meta_key' );

// let's note some of them odd keys ##

$meta_keys_system = array(

'metaboxhidden',

'activation',

'bp_',

'nav_',

'wp_',

'admin_color',

'wpmudev',

'screen_',

'show_',

'rich_',

'reward_',

'meta-box',

'manageedit',

'edit_',

'closedpostboxes_',

'dismissed_',

'manage',

'comment',

'current',

'incentive_',

'_wdp',

'ssl',

'wdfb',

'users_per_page',

);

// allow array to be filtered ##

$meta_keys_system = apply_filters( 'export_user_data_meta_keys_system', $meta_keys_system );

// test array ##

#echo '<pre>'; var_dump($meta_keys); echo '</pre>';

// check if we got anything ? ##

if ( $meta_keys ) {

?>

<tr valign="top">

<th scope="row">

<label for="q_eud_usermeta"><?php _e( 'User Meta Fields', $this->text_domain ); ?></label>

<p class="filter" style="margin: 10px 0 0;">

<?php _e('Filter', $this->text_domain); ?>: <a href="#" class="usermeta-all"><?php _e('All', $this->text_domain); ?></a> | <a href="#" class="usermeta-common"><?php _e('Common', $this->text_domain); ?></a>

</p>

<p class="filter" style="margin: 10px 0 0;">

<?php _e('Select', $this->text_domain); ?>: <a href="#" class="select-all"><?php _e('All', $this->text_domain); ?></a> | <a href="#" class="select-none"><?php _e('None', $this->text_domain); ?></a>

</p>

</th>

<td>

<select multiple="multiple" id="usermeta" name="usermeta[]">

<?php

foreach ( $meta_keys as $key ) {

#echo "\n\t<option value='" . esc_attr( $role ) . "'>$name</option>";

// display $key ##

$display_key = $key;

// rename programs field ##

if ( $display_key == 'member_of_club' ){

$display_key = 'program';

}

// tidy ##

$display_key = str_replace( "_", " ", ucwords( $display_key ) );

#echo "<label for='".esc_attr( $key )."' title='".esc_attr( $key )."'><input id='".esc_attr( $key )."' type='checkbox' name='usermeta[]' value='".esc_attr( $key )."'/> $display_key</label><br />";

// class ##

$usermeta_class = 'normal';

foreach ( $meta_keys_system as $drop ) {

if ( strpos( $key, $drop ) !== false ) {