<?php
if( ! defined( 'ABSPATH' ) ){
	exit; // Exit if accessed directly
}

class Mfn_Dashboard extends Mfn_API {

	public $notices = array(
			
		'no_purchase_code' 	=> 'Please enter purchase code.',
		'no_connection' 	=> 'Could not connect to the Envato (ThemeForest) server to verify purchase. Please try again later.',
		
		'registered'		=> 'Thank you for registration.',
		'deregistered'		=> 'Theme deregistered. You can now move your site to another domain.',	
	);
	
	public $version = '';

	/**
	 * Mfn_Dashboard constructor
	 */
	public function __construct(){
		
		parent::__construct();
		
		// after_switch_theme is triggered on the request immediately following a theme switch.
		add_action( 'after_switch_theme', array( $this, 'after_switch_theme' ) );
		
		// Notices displayed near the top of admin pages. The hook function should echo a message to be displayed. 
		add_action( 'admin_notices', array( $this, 'admin_notices' ), 1 );
		
		// It runs after the basic admin panel menu structure is in place.
		add_action( 'admin_menu', array( $this, 'init' ) );
		
		// admin_init is triggered before any other hook when a user accesses the admin area.
		add_action( 'admin_init', array( $this, 'register_setting' ) );

		// Filters a specific network option before its value is updated.
		add_filter( 'pre_update_site_option_betheme_purchase_code', array( $this, 'is_code_empty' ), 10, 2 );

	}
	
	/**
	 * Check if purchase code is empty
	 */
	public function is_code_empty( $new = false, $old = false ) {
		if( ! $new && $new === $old ) {
			add_settings_error( 'betheme_registration', 'registration_error', $this->notices[ 'no_purchase_code' ], 'error inline mfn-dashboard-error' );
			delete_site_option( 'betheme_registered' );
		}
	
		return $new;
	}

	/**
	 * Add admin page & enqueue styles
	 */
	public function init(){
		
		$title = array(
			'betheme'	=> 'BeTheme',
			'dashboard'	=> __( 'Dashboard', 'mfn-opts' ),
			'options'	=> __( 'BeTheme Options', 'mfn-opts' ),	// TMP
		);
		
		$icon = 'data:image/svg+xml;base64,PD94bWwgdmVyc2lvbj0iMS4wIiBlbmNvZGluZz0idXRmLTgiPz4NCjwhLS0gR2VuZXJhdG9yOiBBZG9iZSBJbGx1c3RyYXRvciAyMC4wLjAsIFNWRyBFeHBvcnQgUGx1Zy1JbiAuIFNWRyBWZXJzaW9uOiA2LjAwIEJ1aWxkIDApICAtLT4NCjxzdmcgdmVyc2lvbj0iMS4wIiBpZD0iTGF5ZXJfMSIgeG1sbnM9Imh0dHA6Ly93d3cudzMub3JnLzIwMDAvc3ZnIiB4bWxuczp4bGluaz0iaHR0cDovL3d3dy53My5vcmcvMTk5OS94bGluayIgeD0iMHB4IiB5PSIwcHgiDQoJIHZpZXdCb3g9IjAgMCAzMCAyMCIgZW5hYmxlLWJhY2tncm91bmQ9Im5ldyAwIDAgMzAgMjAiIHhtbDpzcGFjZT0icHJlc2VydmUiIHdpZHRoPSI4MCIgaGVpZ2h0PSI4MCI+DQogIDxzdHlsZT4jc3ZnLW1mbi1jb2xvcntmaWxsOiMwMDk2RUR9PC9zdHlsZT4NCjxnPg0KCTxwYXRoIGlkPSJzdmctbWZuLWNvbG9yIiBkPSJNMCwxOS44VjBoNy4zYzEuNCwwLDIuNSwwLjEsMy41LDAuNGMxLDAuMywxLjcsMC42LDIuMywxLjFjMC42LDAuNSwxLDEsMS4zLDEuN2MwLjMsMC43LDAuNCwxLjQsMC40LDIuMg0KCQljMCwwLjQtMC4xLDAuOS0wLjIsMS4zYy0wLjEsMC40LTAuMywwLjgtMC42LDEuMmMtMC4zLDAuNC0wLjYsMC43LTEsMWMtMC40LDAuMy0wLjksMC41LTEuNSwwLjhjMS4zLDAuMywyLjMsMC44LDIuOSwxLjUNCgkJYzAuNiwwLjcsMC45LDEuNiwwLjksMi43YzAsMC44LTAuMiwxLjYtMC41LDIuM2MtMC4zLDAuNy0wLjgsMS40LTEuNCwxLjljLTAuNiwwLjUtMS40LDEtMi4zLDEuM2MtMC45LDAuMy0yLDAuNS0zLjIsMC41SDB6DQoJCSBNNC42LDguM0g3YzAuNSwwLDEsMCwxLjQtMC4xYzAuNC0wLjEsMC44LTAuMiwxLTAuNEM5LjcsNy43LDkuOSw3LjQsMTAsNy4xYzAuMS0wLjMsMC4yLTAuNywwLjItMS4yYzAtMC41LTAuMS0wLjktMC4yLTEuMg0KCQlDMTAsNC40LDkuOCw0LjIsOS41LDRDOS4zLDMuOCw5LDMuNiw4LjYsMy42QzguMiwzLjUsNy44LDMuNCw3LjMsMy40SDQuNlY4LjN6IE00LjYsMTEuNHY0LjloMy4yYzAuNiwwLDEuMS0wLjEsMS41LTAuMg0KCQljMC40LTAuMiwwLjctMC40LDAuOS0wLjZjMC4yLTAuMiwwLjQtMC41LDAuNC0wLjhjMC4xLTAuMywwLjEtMC42LDAuMS0wLjljMC0wLjQsMC0wLjctMC4xLTFjLTAuMS0wLjMtMC4zLTAuNS0wLjUtMC43DQoJCWMtMC4yLTAuMi0wLjUtMC40LTAuOS0wLjVjLTAuNC0wLjEtMC45LTAuMi0xLjQtMC4ySDQuNnoiLz4NCgk8cGF0aCBpZD0ic3ZnLW1mbi1jb2xvciIgZD0iTTIyLjgsNS41YzAuOSwwLDEuOCwwLjEsMi42LDAuNGMwLjgsMC4zLDEuNCwwLjcsMiwxLjNjMC42LDAuNiwxLDEuMiwxLjMsMmMwLjMsMC44LDAuNSwxLjcsMC41LDIuNw0KCQljMCwwLjMsMCwwLjYsMCwwLjhjMCwwLjItMC4xLDAuNC0wLjEsMC41cy0wLjIsMC4yLTAuMywwLjJjLTAuMSwwLTAuMywwLjEtMC41LDAuMUgyMGMwLjEsMS4yLDAuNSwyLDEuMSwyLjYNCgkJYzAuNiwwLjUsMS4zLDAuOCwyLjIsMC44YzAuNSwwLDAuOS0wLjEsMS4zLTAuMmMwLjQtMC4xLDAuNy0wLjIsMC45LTAuNGMwLjMtMC4xLDAuNS0wLjMsMC44LTAuNGMwLjItMC4xLDAuNS0wLjIsMC43LTAuMg0KCQljMC4zLDAsMC42LDAuMSwwLjgsMC40bDEuMiwxLjVjLTAuNCwwLjUtMC45LDAuOS0xLjQsMS4yYy0wLjUsMC4zLTEsMC42LTEuNSwwLjdzLTEuMSwwLjMtMS42LDAuNGMtMC41LDAuMS0xLDAuMS0xLjUsMC4xDQoJCWMtMSwwLTEuOS0wLjItMi44LTAuNWMtMC45LTAuMy0xLjYtMC44LTIuMy0xLjRjLTAuNi0wLjYtMS4yLTEuNC0xLjUtMi40Yy0wLjQtMC45LTAuNi0yLTAuNi0zLjNjMC0wLjksMC4yLTEuOCwwLjUtMi43DQoJCWMwLjMtMC44LDAuOC0xLjYsMS40LTIuMkMxOC4zLDYuOSwxOSw2LjQsMTkuOSw2QzIwLjcsNS43LDIxLjcsNS41LDIyLjgsNS41eiBNMjIuOCw4LjRjLTAuOCwwLTEuNCwwLjItMS45LDAuNw0KCQljLTAuNSwwLjUtMC44LDEuMS0wLjksMmg1LjNjMC0wLjMsMC0wLjctMC4xLTFjLTAuMS0wLjMtMC4yLTAuNi0wLjQtMC44QzI0LjYsOSwyNC4zLDguOCwyNCw4LjZDMjMuNyw4LjUsMjMuMyw4LjQsMjIuOCw4LjR6Ii8+DQo8L2c+DQo8L3N2Zz4=';
		
		if( WHITE_LABEL ){
			$title['betheme'] = 'Theme';
			$icon = false;
		}
		
		$this->page = add_menu_page(
			$title['betheme'],
			$title['betheme'],
			'edit_theme_options',
			'betheme',
			array( $this, 'template' ),
			$icon,
			3
		);
		
		add_submenu_page(
			'betheme',
			$title['dashboard'],
			$title['dashboard'],
			'edit_theme_options',
			'betheme',
			array( $this, 'template' )
		);
		
		// TMP: old BeTheme Options link
		add_theme_page(
			$title['options'],
			$title['options'],
			'edit_theme_options',
			'betheme-options',
			array( $this, 'template_options' )
		);

		// Runs when an administration menu page is loaded.
		add_action( 'load-' . $this->page, array( $this, 'on_load' ) );
		
		// Fires when styles are printed for a specific admin page based on $hook_suffix.
		add_action( 'admin_print_styles-'. $this->page, array( $this, 'enqueue' ) );
	}
	
	/**
	 * Dashboard template
	 */
	public function template(){
		include_once LIBS_DIR . '/admin/templates/dashboard.php';
	}
	
	/**
	 * TMP: old BeTheme Options link
	 */
	public function template_options(){
		include_once LIBS_DIR . '/admin/templates/tmp-options.php';
	}
	
	/**
	 * Enqueue styles and scripts
	 */
	public function enqueue(){
		wp_enqueue_style( 'mfn-dashboard', LIBS_URI. '/admin/assets/dashboard.css', array(), THEME_VERSION );
		wp_enqueue_script( 'mfn-dashboard', LIBS_URI. '/admin/assets/dashboard.js', false, THEME_VERSION, true );
	}
	
	/**
	 * Redirect after switch theme
	 */
	public function after_switch_theme(){
		
		if( mfn_is_registered() ){
			$this->refresh_transients();
		}

		wp_safe_redirect( admin_url( 'admin.php?page=betheme' ) );
	}
	
	/**
	 * Admin notice - plase register
	 */
	public function admin_notices(){
		
		// Current screen is not always available, most notably on the customizer screen.
		if( ! function_exists( 'get_current_screen' ) ) {
			return false;
		}
		
		$current_screen = get_current_screen();
		$current_screen = $current_screen->base;
		
		$whitelist = array(
			'toplevel_page_betheme',
			'betheme_page_be-plugins',
			'betheme_page_be-websites',
			'betheme_page_be-status',
			'betheme_page_be-support',
		);
		
		if( in_array( $current_screen, $whitelist ) ){
			return false;
		}
		
		if( mfn_is_registered() || $this->is_localhost() ){
			return false;
		}
		
		include_once LIBS_DIR . '/admin/templates/notice-register.php';

	}

	/**
	 * Refresh site transients
	 */
	public function refresh_transients(){
		
		delete_site_transient( 'betheme_plugins' );
		
		delete_site_transient( 'update_themes' );
		do_action( 'wp_update_themes' );	
		
	}
	
	/**
	 * Register a setting and its data
	 */
	public function register_setting(){
		register_setting( 'betheme_registration', 'betheme_purchase_code', array( $this, 'registration' ) );
	}

	/**
	 * A callback function that sanitizes the option's value
	 */
	public function registration( $code ){	
		$code = trim( $code );
		
		if( isset( $_POST[ 'register' ] ) ) {
			$code = $this->register( $code );		
		} elseif( $_POST[ 'deregister' ] ) {	
			$code = $this->deregister();	
		}

		return $code;
	}
	
	/**
	 * Register theme
	 */
	protected function register( $code ){
		
		if( ! $code ){
			return false;
		}

		$args = array(
			'user-agent' 	=> 'WordPress/'. get_bloginfo( 'version' ) .'; '. network_site_url(),
			'timeout' 		=> 30,
			'body' 			=> array(
				'code' 			=> urlencode( trim( $_POST[ 'betheme_purchase_code' ] ) ),
				'register'		=> 1,
			),
		);

		$response = $this->remote_post( 'register', $args );
		if( is_wp_error( $response ) ){
			add_settings_error( 'betheme_registration', 'registration_error', $response->get_error_message(), 'error inline mfn-dashboard-error' );
			return false;
		}

		if( empty( $response['success'] ) ){
			add_settings_error( 'betheme_registration', 'registration_error', $this->notices[ 'no_connection' ], 'error inline mfn-dashboard-error' );
			return false;
		}
		
		update_site_option( 'betheme_registered', 1 );
		add_settings_error( 'betheme_registration', 'registration_success', $this->notices[ 'registered' ], 'updated inline mfn-dashboard-error' );
		
		$this->refresh_transients();
		
		return $code;
	}
	
	/**
	 * Deregister theme
	 */
	protected function deregister(){
		
		$code = mfn_get_purchase_code();
		
		if( ! $code ){
			return false;
		}

		$args = array(
			'user-agent' 	=> 'WordPress/'. get_bloginfo( 'version' ) .'; '. network_site_url(),
			'timeout' 		=> 30,
			'body' 			=> array(
				'code' 			=> urlencode( $code ),
				'deregister'	=> 1,
			),
		);

		$response = $this->remote_post( 'register', $args );
		if( is_wp_error( $response ) ){
			add_settings_error( 'betheme_registration', 'registration_error', $response->get_error_message(), 'error inline mfn-dashboard-error' );
			return $code;
		}
		
		if( empty( $response['success'] ) ){
			add_settings_error( 'betheme_registration', 'registration_error', $this->notices[ 'no_connection' ], 'error inline mfn-dashboard-error' );
			return $code;
		}
		
		delete_site_option( 'betheme_registered' );
		add_settings_error( 'betheme_registration', 'registration_success', $this->notices[ 'deregistered' ], 'updated inline mfn-dashboard-error' );
		
		$this->refresh_transients();
		
		return false;
	}
	
	/**
	 * Update the value of an option that was already added for the current network
	 */
	public function on_load(){

		if( ! isset( $_POST['option_page'] ) || $_POST['option_page'] !== 'betheme_registration' ){
			return false;
		}

		check_admin_referer( 'betheme_registration-options' );
		
		$value = wp_unslash( trim( $_POST[ 'betheme_purchase_code' ] ) );
		update_site_option( 'betheme_purchase_code', $value );

		set_transient( 'settings_errors', get_settings_errors(), 30 );

		$location = add_query_arg( 'settings-updated', 'true', wp_get_referer() );
		wp_redirect( $location );
		exit;

	}
	
}
