<?php
/**
 * Helper functions.
 *
 * @package    Adminimize
 * @subpackage Helping_Functions
 * @author     Frank Bültge <frank@bueltge.de
 * @since      2016-01-22
 */

if ( ! function_exists( 'add_action' ) ) {
	die( "Hi there!  I'm just a part of plugin, not much I can do when called directly." );
}

/**
 * Recursive search in array.
 *
 * @param string $needle
 * @param array  $haystack
 *
 * @return bool
 */
function _mw_adminimize_recursive_in_array( $needle, $haystack ) {

	if ( '' === $haystack ) {
		return false;
	}

	if ( ! $haystack ) {
		return false;
	}

	foreach ( $haystack as $stalk ) {
		if ( $needle === $stalk
			|| ( is_array( $stalk )
				&& _mw_adminimize_recursive_in_array( $needle, $stalk )
			)
		) {
			return true;
		}
	}

	return false;
}

/**
 * Check if array contains all array values from another array.
 *
 * @param array $array1
 * @param array $array2
 *
 * @return bool
 */
function _mw_adminimize_in_arrays( $array1, $array2 ) {

	return (bool) count( array_intersect( $array1, $array2 ) );
}

/**
 * Check the role with the current user data.
 *
 * @param string $role
 *
 * @return bool
 */
function _mw_adminimize_current_user_has_role( $role ) {

	$user = wp_get_current_user();
	if ( in_array( $role, (array) $user->roles, true ) ) {
		return true;
	}

	return false;
}

/**
 * Simple helper to debug to the console of the browser.
 * Set WP_DEBUG_DISPLAY in your wp-config.php to true for view debug messages inside the console.
 *
 * @param string | array | object
 * @param string                  $description
 *
 * @return string|void
 */
function _mw_adminimize_debug( $data, $description = '' ) {
	if ( ! _mw_adminimize_get_option_value( 'mw_adminimize_debug' ) ) {
		return;
	}

	if ( ! class_exists( 'DebugListener' ) ) {
		return;
	}

	// Buffering.
	ob_start();
	$output  = '';
	$output .= 'console.info(' . json_encode( $description ) . ');';
	$output .= 'console.log(' . json_encode( $data ) . ');';

	echo sprintf( '<script>%s</script>', $output );

	do_action( 'adminimize.log', $description, $data );
}

/**
 * Return duplicate items from array.
 *
 * @param $array
 *
 * @return array
 */
function _mw_adminimize_get_duplicate( $array ) {

  return array_unique( array_map( 'unserialize', array_diff_assoc( array_map( 'serialize', $array), array_map( 'serialize', array_unique( $array, SORT_REGULAR ) ) ) ), SORT_REGULAR );
}

/**
 * Get intersection of a multiple array.
 *
 * @since 2016-06-28
 *
 * @param $array  array  Array with settings of all roles.
 *
 * @return        array  Data with only the data, there in each role active.
 */
function _mw_adminimize_get_intersection( $array ) {

	return (array) call_user_func_array( 'array_intersect', array_values( $array ) );
}

/**
 * Flatten a multi-dimensional array in a simple array.
 *
 * @since  2016-11-19
 *
 * @param  array $array
 *
 * @return array $flat
 */
function _mw_adminimize_array_flatten( $array ) {

	$flat = array();
	foreach ( $array as $key => $value ) {
		if ( is_array( $value ) ) {
			$flat = array_merge( $flat, _mw_adminimize_array_flatten( $value ) );
		} else {
			$flat[ $key ] = $value;
		}
	}

	return $flat;
}

/**
 * Break the access to a page.
 *
 * @param string $slug Slug of each menu item.
 *
 * @return bool If the check is true, return also true as bool.
 */
function _mw_adminimize_check_page_access( $slug ) {

	// If this default behavior is deactivated.
	if ( _mw_adminimize_get_option_value( 'mw_adminimize_prevent_page_access' ) ) {
		return false;
	}

	$url = basename( esc_url_raw( $_SERVER['REQUEST_URI'] ) );
	$url = htmlspecialchars( $url );

	if ( ! isset( $url ) ) {
		return false;
	}

	$uri = wp_parse_url( $url );

	if ( ! isset( $uri['path'] ) ) {
		return false;
	}

	$slug_parts = wp_parse_url( $slug );
	$slug_path  = isset( $slug_parts['path'] ) ? $slug_parts['path'] : $slug;
	$slug_query = isset( $slug_parts['query'] ) ? $slug_parts['query'] : '';
	$request_query = isset( $uri['query'] ) ? $uri['query'] : '';

    if ( strpos( $uri['path'], $slug_path ) !== false ) {
        if ( empty( $slug_query ) && empty( $request_query ) ) {
            add_action( 'load-' . $slug, '_mw_adminimize_block_page_access' );
            return true;
        }

        // Slug has no query, but request does
        if ( empty( $slug_query ) && ! empty( $request_query ) ) {
            wp_parse_str( html_entity_decode( $request_query ), $request_params );

			// Only treat `post_type` as a differentiator on core post list / add-new screens.
			if (
				in_array( $slug_path, array( 'edit.php', 'post-new.php' ), true )
				&& isset( $request_params['post_type'] )
				&& 'post' !== $request_params['post_type']
			) {
				return false;
			}

            // Request is for default post type or doesn't specify post_type - block it
            add_action( 'load-' . $slug, '_mw_adminimize_block_page_access' );
            return true;
        }

        // Both have query params - verify slug params match in request
        if ( $slug_query && $request_query ) {
            wp_parse_str( html_entity_decode( $slug_query ), $slug_params );
            wp_parse_str( html_entity_decode( $request_query ), $request_params );

            // Check if all slug params are present in request with matching values
            $all_match = true;
            foreach ( $slug_params as $key => $value ) {
                if ( ! isset( $request_params[ $key ] ) || $request_params[ $key ] !== $value ) {
                    $all_match = false;
                    break;
                }
            }

            if ( $all_match ) {
                add_action( 'load-' . basename( $uri['path'] ), '_mw_adminimize_block_page_access' );
                return true;
            }
        }

        return false;
    }

	return false;
}

/**
 * Break the access to a page.
 *
 * @wp-hook load-$page_slug
 */
function _mw_adminimize_block_page_access() {

	$message = esc_attr__( 'Cheatin&#8217; uh? Sorry, you are not allowed to access this site.', 'adminimize' );
	$message = apply_filters( 'adminimize_nopage_access_message', $message );
	wp_die( esc_html( $message ) );
}

/**
 * Check option value string in array and get string back for active checkboxes.
 *
 * @param string $option String of option to check.
 * @param array  $haystack Array of all options.
 *
 * @return string String for checked input box or empty string.
 */
function _mw_adminimize_is_checked( $option, $haystack ) {

	if ( ! isset( $haystack ) ) {
		return '';
	}

	if ( in_array( htmlspecialchars_decode( $option ), $haystack, true ) ) {
		return ' checked="checked"';
	}

	return '';
}