<?php
namespace PostFee;

if ( ! defined( 'ABSPATH' ) ) {
	exit;
}

/**
 * Plans are what users buy. They are stored as a private post type so they
 * get the normal list/edit screens.
 */
class Plans {

	const POST_TYPE = 'postfee_plan';

	public static function init() {
		add_action( 'init', array( __CLASS__, 'register' ) );
		add_action( 'add_meta_boxes_' . self::POST_TYPE, array( __CLASS__, 'add_meta_box' ) );
		add_action( 'save_post_' . self::POST_TYPE, array( __CLASS__, 'save' ) );
		add_filter( 'manage_' . self::POST_TYPE . '_posts_columns', array( __CLASS__, 'columns' ) );
		add_action( 'manage_' . self::POST_TYPE . '_posts_custom_column', array( __CLASS__, 'column' ), 10, 2 );
	}

	public static function types() {
		return array(
			'single'       => __( 'Pay per post', 'postfee' ),
			'package'      => __( 'Post package', 'postfee' ),
			'subscription' => __( 'Subscription', 'postfee' ),
			'upgrade'      => __( 'Upgrade for an existing post', 'postfee' ),
		);
	}

	/**
	 * How long after a post goes live deleting it gives the post back, as
	 * key => array( label, seconds ). Null seconds means without limit.
	 */
	public static function return_windows() {
		return array(
			'never'   => array( __( 'Never', 'postfee' ), 0 ),
			'day'     => array( __( 'For a day after it goes live', 'postfee' ), DAY_IN_SECONDS ),
			'week'    => array( __( 'For a week after it goes live', 'postfee' ), WEEK_IN_SECONDS ),
			'month'   => array( __( 'For a month after it goes live', 'postfee' ), MONTH_IN_SECONDS ),
			'year'    => array( __( 'For a year after it goes live', 'postfee' ), YEAR_IN_SECONDS ),
			'forever' => array( __( 'Always', 'postfee' ), null ),
		);
	}

	/**
	 * Units a length of time can be entered in, as key => array( label, days ).
	 * Lengths are stored and counted in days.
	 */
	public static function units() {
		return array(
			'day'   => array( __( 'Days', 'postfee' ), 1 ),
			'week'  => array( __( 'Weeks', 'postfee' ), 7 ),
			'month' => array( __( 'Months', 'postfee' ), 30 ),
			'year'  => array( __( 'Years', 'postfee' ), 365 ),
		);
	}

	/**
	 * One of a plan's lengths of time in the unit it was entered in, e.g. "2 weeks".
	 */
	public static function duration( $plan, $key ) {
		$unit   = $plan[ $key . '_unit' ];
		$amount = (int) ( $plan[ $key ] / self::units()[ $unit ][1] );

		switch ( $unit ) {
			case 'week':
				/* translators: %d: number of weeks */
				return sprintf( _n( '%d week', '%d weeks', $amount, 'postfee' ), $amount );
			case 'month':
				/* translators: %d: number of months */
				return sprintf( _n( '%d month', '%d months', $amount, 'postfee' ), $amount );
			case 'year':
				/* translators: %d: number of years */
				return sprintf( _n( '%d year', '%d years', $amount, 'postfee' ), $amount );
		}
		/* translators: %d: number of days */
		return sprintf( _n( '%d day', '%d days', $amount, 'postfee' ), $amount );
	}

	public static function register() {
		$cap = 'manage_options';
		register_post_type(
			self::POST_TYPE,
			array(
				'labels'       => array(
					'name'          => __( 'Plans', 'postfee' ),
					'singular_name' => __( 'Plan', 'postfee' ),
					'add_new_item'  => __( 'Add New Plan', 'postfee' ),
					'edit_item'     => __( 'Edit Plan', 'postfee' ),
					'search_items'  => __( 'Search Plans', 'postfee' ),
					'not_found'     => __( 'No plans found.', 'postfee' ),
				),
				'public'       => false,
				'show_ui'      => true,
				'show_in_menu' => 'postfee',
				'supports'     => array( 'title', 'excerpt', 'page-attributes' ),
				'map_meta_cap' => false,
				'capabilities' => array(
					'edit_post'          => $cap,
					'read_post'          => $cap,
					'delete_post'        => $cap,
					'edit_posts'         => $cap,
					'edit_others_posts'  => $cap,
					'delete_posts'       => $cap,
					'publish_posts'      => $cap,
					'read_private_posts' => $cap,
					'create_posts'       => $cap,
				),
			)
		);
	}

	/**
	 * @return array|null Plan data, or null if the plan does not exist or is not published.
	 */
	public static function get( $id ) {
		$post = $id ? get_post( $id ) : null;
		if ( ! $post || self::POST_TYPE !== $post->post_type || 'publish' !== $post->post_status ) {
			return null;
		}

		$type   = get_post_meta( $post->ID, '_postfee_type', true );
		$window = get_post_meta( $post->ID, '_postfee_return_window', true );

		$durations = array();
		foreach ( array( 'credit_days', 'listing_days', 'featured_days' ) as $key ) {
			$days = absint( get_post_meta( $post->ID, '_postfee_' . $key, true ) );
			$unit = get_post_meta( $post->ID, '_postfee_' . $key . '_unit', true );
			// A length that is not a whole number of its unit is shown in days.
			$durations[ $key . '_unit' ] = isset( self::units()[ $unit ] ) && 0 === $days % self::units()[ $unit ][1] ? $unit : 'day';
		}

		return $durations + array(
			'unpublish_on_end' => (bool) get_post_meta( $post->ID, '_postfee_unpublish_on_end', true ),
			'return_window' => isset( self::return_windows()[ $window ] ) ? $window : 'forever',
			'id'            => $post->ID,
			'name'          => $post->post_title,
			'description'   => $post->post_excerpt,
			'type'          => isset( self::types()[ $type ] ) ? $type : 'single',
			'price'         => (float) get_post_meta( $post->ID, '_postfee_price', true ),
			'credits'       => absint( get_post_meta( $post->ID, '_postfee_credits', true ) ),
			'interval'      => 'year' === get_post_meta( $post->ID, '_postfee_interval', true ) ? 'year' : 'month',
			'credit_days'   => absint( get_post_meta( $post->ID, '_postfee_credit_days', true ) ),
			'listing_days'  => absint( get_post_meta( $post->ID, '_postfee_listing_days', true ) ),
			'featured_days' => absint( get_post_meta( $post->ID, '_postfee_featured_days', true ) ),
			'post_types'    => array_filter( (array) get_post_meta( $post->ID, '_postfee_post_types', true ) ),
		);
	}

	/**
	 * @param array  $types     Plan types to include, empty for all.
	 * @param string $post_type Only plans usable for this post type.
	 */
	public static function all( $types = array(), $post_type = '' ) {
		$ids   = get_posts(
			array(
				'post_type'      => self::POST_TYPE,
				'post_status'    => 'publish',
				'posts_per_page' => 100,
				'orderby'        => array(
					'menu_order' => 'ASC',
					'title'      => 'ASC',
				),
				'fields'         => 'ids',
			)
		);
		$plans = array();
		foreach ( $ids as $id ) {
			$plan = self::get( $id );
			if ( ! $plan || ( $types && ! in_array( $plan['type'], $types, true ) ) ) {
				continue;
			}
			if ( $post_type && $plan['post_types'] && ! in_array( $post_type, $plan['post_types'], true ) ) {
				continue;
			}
			$plans[] = $plan;
		}
		return $plans;
	}

	/**
	 * Credits keep working if their plan is later deleted or unrestricted.
	 */
	public static function allows_post_type( $plan_id, $post_type ) {
		$post_types = array_filter( (array) get_post_meta( $plan_id, '_postfee_post_types', true ) );
		return ! $post_types || in_array( $post_type, $post_types, true );
	}

	public static function price_label( $plan ) {
		if ( $plan['price'] <= 0 ) {
			return __( 'Free', 'postfee' );
		}
		$price = postfee_format_price( postfee_to_minor( $plan['price'] ) );
		if ( 'subscription' === $plan['type'] ) {
			/* translators: %s: price */
			return sprintf( 'year' === $plan['interval'] ? __( '%s / year', 'postfee' ) : __( '%s / month', 'postfee' ), $price );
		}
		return $price;
	}

	/**
	 * Human-readable list of what a plan includes.
	 */
	public static function summary( $plan ) {
		$lines = array();

		if ( 'single' === $plan['type'] ) {
			$lines[] = __( '1 post', 'postfee' );
		} elseif ( 'package' === $plan['type'] ) {
			/* translators: %d: number of posts */
			$lines[] = sprintf( _n( '%d post', '%d posts', $plan['credits'], 'postfee' ), $plan['credits'] );
			if ( $plan['credit_days'] ) {
				/* translators: %s: length of time, e.g. "30 days" */
				$lines[] = sprintf( __( 'Use within %s', 'postfee' ), self::duration( $plan, 'credit_days' ) );
			}
		} elseif ( 'subscription' === $plan['type'] ) {
			if ( $plan['credits'] ) {
				$lines[] = 'year' === $plan['interval']
					/* translators: %d: number of posts */
					? sprintf( _n( '%d post per year', '%d posts per year', $plan['credits'], 'postfee' ), $plan['credits'] )
					/* translators: %d: number of posts */
					: sprintf( _n( '%d post per month', '%d posts per month', $plan['credits'], 'postfee' ), $plan['credits'] );
			} else {
				$lines[] = __( 'Unlimited posts', 'postfee' );
			}
		}

		if ( $plan['listing_days'] ) {
			$lines[] = 'upgrade' === $plan['type']
				/* translators: %s: length of time, e.g. "30 days" */
				? sprintf( __( 'Extends the listing by %s', 'postfee' ), self::duration( $plan, 'listing_days' ) )
				/* translators: %s: length of time, e.g. "30 days" */
				: sprintf( __( 'Listed for %s', 'postfee' ), self::duration( $plan, 'listing_days' ) );
		}
		if ( $plan['featured_days'] ) {
			/* translators: %s: length of time, e.g. "30 days" */
			$lines[] = sprintf( __( 'Featured for %s', 'postfee' ), self::duration( $plan, 'featured_days' ) );
		}

		return $lines;
	}

	public static function add_meta_box() {
		add_meta_box( 'postfee-plan', __( 'Plan details', 'postfee' ), array( __CLASS__, 'meta_box' ), self::POST_TYPE, 'normal', 'high' );
	}

	public static function meta_box( $post ) {
		$meta = function ( $key, $default = '' ) use ( $post ) {
			$value = get_post_meta( $post->ID, '_postfee_' . $key, true );
			return '' === $value ? $default : $value;
		};
		// A number and a unit for a length of time, which is saved in days.
		$duration = function ( $key ) use ( $meta ) {
			$days = absint( $meta( $key, 0 ) );
			$unit = $meta( $key . '_unit', 'day' );
			$unit = isset( self::units()[ $unit ] ) && 0 === $days % self::units()[ $unit ][1] ? $unit : 'day';
			printf( '<input type="number" min="0" step="1" name="postfee_%1$s" id="postfee_%1$s" value="%2$d" class="small-text"> ', esc_attr( $key ), absint( $days / self::units()[ $unit ][1] ) );
			printf( '<select name="postfee_%1$s_unit" aria-label="%2$s">', esc_attr( $key ), esc_attr__( 'Unit', 'postfee' ) );
			foreach ( self::units() as $value => $option ) {
				printf( '<option value="%s" %s>%s</option>', esc_attr( $value ), selected( $unit, $value, false ), esc_html( $option[0] ) );
			}
			echo '</select>';
		};
		$type       = $meta( 'type', 'single' );
		$post_types = (array) $meta( 'post_types', array() );

		wp_nonce_field( 'postfee_save_plan', '_postfee_plan_nonce' );
		?>
		<table class="form-table" role="presentation">
			<tr>
				<th><label for="postfee_type"><?php esc_html_e( 'Type', 'postfee' ); ?></label></th>
				<td>
					<select name="postfee_type" id="postfee_type">
						<?php foreach ( self::types() as $value => $label ) : ?>
							<option value="<?php echo esc_attr( $value ); ?>" <?php selected( $type, $value ); ?>><?php echo esc_html( $label ); ?></option>
						<?php endforeach; ?>
					</select>
					<p class="description"><?php esc_html_e( 'Pay per post covers one post. To sell several posts at once, choose Post package.', 'postfee' ); ?></p>
				</td>
			</tr>
			<tr>
				<th><label for="postfee_price"><?php esc_html_e( 'Price', 'postfee' ); ?></label></th>
				<td>
					<input type="number" min="0" step="0.01" name="postfee_price" id="postfee_price" value="<?php echo esc_attr( $meta( 'price', '0' ) ); ?>" class="small-text" style="width:8em"> <?php echo esc_html( postfee_currency() ); ?>
					<p class="description"><?php esc_html_e( 'For subscriptions this is charged every billing period. Use 0 for a free plan.', 'postfee' ); ?></p>
				</td>
			</tr>
			<tr data-postfee-types="package subscription">
				<th><label for="postfee_credits"><?php esc_html_e( 'Number of posts', 'postfee' ); ?></label></th>
				<td>
					<input type="number" min="0" step="1" name="postfee_credits" id="postfee_credits" value="<?php echo esc_attr( $meta( 'credits', '5' ) ); ?>" class="small-text">
					<p class="description"><?php esc_html_e( 'Packages: posts included. Subscriptions: posts per billing period, 0 for unlimited.', 'postfee' ); ?></p>
				</td>
			</tr>
			<tr data-postfee-types="subscription">
				<th><label for="postfee_interval"><?php esc_html_e( 'Billing period', 'postfee' ); ?></label></th>
				<td>
					<select name="postfee_interval" id="postfee_interval">
						<option value="month" <?php selected( $meta( 'interval', 'month' ), 'month' ); ?>><?php esc_html_e( 'Monthly', 'postfee' ); ?></option>
						<option value="year" <?php selected( $meta( 'interval', 'month' ), 'year' ); ?>><?php esc_html_e( 'Yearly', 'postfee' ); ?></option>
					</select>
				</td>
			</tr>
			<tr data-postfee-types="package">
				<th><label for="postfee_credit_days"><?php esc_html_e( 'Credits valid for', 'postfee' ); ?></label></th>
				<td>
					<?php $duration( 'credit_days' ); ?>
					<p class="description"><?php esc_html_e( '0 means unused posts never expire.', 'postfee' ); ?></p>
				</td>
			</tr>
			<tr>
				<th><label for="postfee_listing_days"><?php esc_html_e( 'Listing duration', 'postfee' ); ?></label></th>
				<td>
					<?php $duration( 'listing_days' ); ?>
					<p class="description"><?php esc_html_e( 'How long a post stays published, counted from the day it goes live. 0 means it never expires. For upgrades, the time added.', 'postfee' ); ?></p>
				</td>
			</tr>
			<tr>
				<th><label for="postfee_featured_days"><?php esc_html_e( 'Featured for', 'postfee' ); ?></label></th>
				<td>
					<?php $duration( 'featured_days' ); ?>
					<p class="description"><?php esc_html_e( 'Featured posts are made sticky and get the "postfee-featured" CSS class. 0 means not featured. A month counts as 30 days and a year as 365.', 'postfee' ); ?></p>
				</td>
			</tr>
			<tr data-postfee-types="subscription">
				<th><?php esc_html_e( 'When the subscription ends', 'postfee' ); ?></th>
				<td>
					<label>
						<input type="checkbox" name="postfee_unpublish_on_end" value="1" <?php checked( $meta( 'unpublish_on_end', '' ) ); ?>>
						<?php esc_html_e( 'Unpublish the posts made with it, and publish them again when it is renewed', 'postfee' ); ?>
					</label>
					<p class="description"><?php esc_html_e( 'Applies when a subscription is cancelled or a renewal payment is not received within a day of being due. The posts come back if a late payment arrives or the user subscribes to this plan again. Time off the site still counts towards the listing duration.', 'postfee' ); ?></p>
				</td>
			</tr>
			<tr data-postfee-types="single package subscription">
				<th><label for="postfee_return_window"><?php esc_html_e( 'Deleted posts can be replaced', 'postfee' ); ?></label></th>
				<td>
					<select name="postfee_return_window" id="postfee_return_window">
						<?php foreach ( self::return_windows() as $value => $window ) : ?>
							<option value="<?php echo esc_attr( $value ); ?>" <?php selected( $meta( 'return_window', 'forever' ), $value ); ?>><?php echo esc_html( $window[0] ); ?></option>
						<?php endforeach; ?>
					</select>
					<p class="description"><?php esc_html_e( 'When a post is deleted in this time, the user can use it for another post. "Always" makes the number of posts a limit on how many are live at once, not on how many are posted in total. Posts deleted while awaiting review are replaced unless this is "Never".', 'postfee' ); ?></p>
				</td>
			</tr>
			<tr>
				<th><?php esc_html_e( 'Post types', 'postfee' ); ?></th>
				<td>
					<?php foreach ( postfee_post_types() as $post_type ) : ?>
						<label style="margin-right:1em">
							<input type="checkbox" name="postfee_post_types[]" value="<?php echo esc_attr( $post_type ); ?>" <?php checked( in_array( $post_type, $post_types, true ) ); ?>>
							<?php echo esc_html( get_post_type_object( $post_type )->labels->singular_name ); ?>
						</label>
					<?php endforeach; ?>
					<p class="description"><?php esc_html_e( 'Leave all unchecked to allow every enabled post type.', 'postfee' ); ?></p>
				</td>
			</tr>
		</table>
		<?php
		wp_enqueue_script( 'postfee-plan', POSTFEE_URL . 'assets/js/plan.js', array(), POSTFEE_VERSION, true );
	}

	public static function save( $post_id ) {
		if ( ! isset( $_POST['_postfee_plan_nonce'] ) || ! wp_verify_nonce( sanitize_key( $_POST['_postfee_plan_nonce'] ), 'postfee_save_plan' ) ) {
			return;
		}
		if ( ( defined( 'DOING_AUTOSAVE' ) && DOING_AUTOSAVE ) || ! current_user_can( 'manage_options' ) ) {
			return;
		}

		$type = isset( $_POST['postfee_type'] ) ? sanitize_key( $_POST['postfee_type'] ) : 'single';
		update_post_meta( $post_id, '_postfee_type', isset( self::types()[ $type ] ) ? $type : 'single' );
		update_post_meta( $post_id, '_postfee_price', isset( $_POST['postfee_price'] ) ? max( 0, round( (float) $_POST['postfee_price'], 2 ) ) : 0 );
		update_post_meta( $post_id, '_postfee_interval', isset( $_POST['postfee_interval'] ) && 'year' === $_POST['postfee_interval'] ? 'year' : 'month' );

		update_post_meta( $post_id, '_postfee_credits', isset( $_POST['postfee_credits'] ) ? absint( $_POST['postfee_credits'] ) : 0 );

		foreach ( array( 'credit_days', 'listing_days', 'featured_days' ) as $key ) {
			$unit = isset( $_POST[ 'postfee_' . $key . '_unit' ] ) ? sanitize_key( $_POST[ 'postfee_' . $key . '_unit' ] ) : 'day';
			$unit = isset( self::units()[ $unit ] ) ? $unit : 'day';
			update_post_meta( $post_id, '_postfee_' . $key . '_unit', $unit );
			update_post_meta( $post_id, '_postfee_' . $key, ( isset( $_POST[ 'postfee_' . $key ] ) ? absint( $_POST[ 'postfee_' . $key ] ) : 0 ) * self::units()[ $unit ][1] );
		}

		update_post_meta( $post_id, '_postfee_unpublish_on_end', empty( $_POST['postfee_unpublish_on_end'] ) ? 0 : 1 );

		$window = isset( $_POST['postfee_return_window'] ) ? sanitize_key( $_POST['postfee_return_window'] ) : 'forever';
		update_post_meta( $post_id, '_postfee_return_window', isset( self::return_windows()[ $window ] ) ? $window : 'forever' );

		$post_types = isset( $_POST['postfee_post_types'] ) ? array_map( 'sanitize_key', (array) $_POST['postfee_post_types'] ) : array();
		update_post_meta( $post_id, '_postfee_post_types', array_values( array_intersect( $post_types, postfee_post_types() ) ) );
	}

	public static function columns( $columns ) {
		$date = isset( $columns['date'] ) ? $columns['date'] : null;
		unset( $columns['date'] );
		$columns['postfee_type']     = __( 'Type', 'postfee' );
		$columns['postfee_price']    = __( 'Price', 'postfee' );
		$columns['postfee_includes'] = __( 'Includes', 'postfee' );
		if ( $date ) {
			$columns['date'] = $date;
		}
		return $columns;
	}

	public static function column( $column, $post_id ) {
		$plan = self::get( $post_id );
		if ( ! $plan ) {
			return;
		}
		if ( 'postfee_type' === $column ) {
			echo esc_html( self::types()[ $plan['type'] ] );
		} elseif ( 'postfee_price' === $column ) {
			echo esc_html( self::price_label( $plan ) );
		} elseif ( 'postfee_includes' === $column ) {
			echo esc_html( implode( ' · ', self::summary( $plan ) ) );
		}
	}
}