<?php

/**
 * Advanced Ads
 *
 * @package   Advanced_Ads_Placements
 * @author    Thomas Maier <thomas.maier@webgilde.com>
 * @license   GPL-2.0+
 * @link      http://webgilde.com
 * @copyright 2014 Thomas Maier, webgilde GmbH
 */

/**
 * grouping placements functions
 *
 * @since 1.1.0
 * @package Advanced_Ads_Placements
 * @author  Thomas Maier <thomas.maier@webgilde.com>
 */
class Advanced_Ads_Placements {

	/**
	 * get placement types
	 *
	 * @since 1.2.1
	 * @return arr $types array with placement types
	 */
	public static function get_placement_types() {
		$types = array(
			'default' => array(
				'title' => __( 'default', ADVADS_SLUG ),
				'description' => __( 'Manual placement.', ADVADS_SLUG ),
				),
			'header' => array(
				'title' => __( 'header', ADVADS_SLUG ),
				'description' => __( 'Injected in Header (before closing </head> Tag, often not visible).', ADVADS_SLUG ),
				),
			'footer' => array(
				'title' => __( 'footer', ADVADS_SLUG ),
				'description' => __( 'Injected in Footer (before closing </body> Tag).', ADVADS_SLUG ),
				),
			'post_top' => array(
				'title' => __( 'before post', ADVADS_SLUG ),
				'description' => __( 'Injected before the post content.', ADVADS_SLUG ),
				),
			'post_bottom' => array(
				'title' => __( 'after post', ADVADS_SLUG ),
				'description' => __( 'Injected after the post content.', ADVADS_SLUG ),
				),
			'post_content' => array(
				'title' => __( 'post content', ADVADS_SLUG ),
				'description' => __( 'Injected into the post content. You can choose the paragraph after which the ad content is displayed.', ADVADS_SLUG ),
				),
		);
		return apply_filters( 'advanced-ads-placement-types', $types );
	}

	/**
	* update placements if sent
	 *
	 * @since 1.5.2
	*/
	static function update_placements(){

	    // check user permissions
	    if(!current_user_can('manage_options')){
		return;
	    }
	    remove_query_arg('message');

	    if ( isset($_POST['advads']['placement']) && check_admin_referer( 'advads-placement', 'advads_placement' ) ){
		$success = self::save_new_placement( $_POST['advads']['placement'] );
	    }
	    // save placement data
	    if ( isset($_POST['advads']['placements']) && check_admin_referer( 'advads-placement', 'advads_placement' )){
		$success = self::save_placements( $_POST['advads']['placements'] );
	    }

	    if(isset($success)){
		$message = $success ? 'updated' : 'error';
		wp_redirect( add_query_arg(array('message' => $message)) );
	    }
	}

	/**
	 * save a new placement
	 *
	 * @since 1.1.0
	 * @param array $new_placement
	 * @return mixed true if saved; error message if not
	 */
	public static function save_new_placement($new_placement) {
		// load placements // -TODO use model
		$placements = Advanced_Ads::get_ad_placements_array();

		// create slug
		$new_placement['slug'] = sanitize_title( $new_placement['name'] );

		// check if slug already exists or is empty
		if ( $new_placement['slug'] === '' || isset( $placements[$new_placement['slug']] ) ) {
		    return false;
		}

		// make sure only allowed types are being saved
		$placement_types = Advanced_Ads_Placements::get_placement_types();
		$new_placement['type'] = (isset($placement_types[$new_placement['type']])) ? $new_placement['type'] : 'default';
		// escape name
		$new_placement['name'] = esc_attr( $new_placement['name'] );

		// add new place to all placements
		$placements[$new_placement['slug']] = array(
			'type' => $new_placement['type'],
			'name' => $new_placement['name']
		);

		// save array
		update_option( 'advads-ads-placements', $placements );

		return true;
	}

	/**
	 * save placements
	 *
	 * @since 1.1.0
	 * @param array $placement_items
	 * @return mixed true if saved; error message if not
	 */
	public static function save_placements($placement_items) {

		// load placements // -TODO use model
		$placements = Advanced_Ads::get_ad_placements_array();

		foreach ( $placement_items as $_placement_slug => $_placement ) {
			// remove the placement
			if ( isset($_placement['delete']) ) {
				unset($placements[$_placement_slug]);
				continue;
			}
			// save item
			if ( isset($_placement['item']) ) {
				$placements[$_placement_slug]['item'] = $_placement['item']; }
			// save item options
			if ( isset($_placement['options']) ){
				$placements[$_placement_slug]['options'] = $_placement['options'];
				if ( isset($placements[$_placement_slug]['options']['index']) ) {
					$placements[$_placement_slug]['options']['index'] = absint( $placements[$_placement_slug]['options']['index'] ); }
			}
		}

		// save array
		update_option( 'advads-ads-placements', $placements );

		return true;
	}

	/**
	 * get items for item select field
	 *
	 * @since 1.1
	 * @return arr $select items for select field
	 */
	public static function items_for_select() {
		$select = array();
		$model = Advanced_Ads::get_instance()->get_model();

		// load all ad groups
		$groups = $model->get_ad_groups();
		foreach ( $groups as $_group ) {
			$select['groups']['group_' . $_group->term_id] = $_group->name;
		}

		// load all ads
		$ads = $model->get_ads( array('orderby' => 'name', 'order' => 'ASC') );
		foreach ( $ads as $_ad ) {
			$select['ads']['ad_' . $_ad->ID] = $_ad->post_title;
		}

		return $select;
	}

	/**
	 * get html tags for content injection
	 *
	 * @since 1.3.5
	 * @return arr $tags array with tags that can be used for content injection
	 */
	public static function tags_for_content_injection(){
		$tags = array(
			'p' => sprintf( __( 'paragraph (%s)', ADVADS_SLUG ), '&lt;p&gt;' ),
			'h2' => sprintf( __( 'headline 2 (%s)', ADVADS_SLUG ), '&lt;h2&gt;' ),
			'h3' => sprintf( __( 'headline 3 (%s)', ADVADS_SLUG ), '&lt;h3&gt;' ),
			'h4' => sprintf( __( 'headline 4 (%s)', ADVADS_SLUG ), '&lt;h4&gt;' ),
		);

		return $tags;
	}

	/**
	 * return content of a placement
	 *
	 * @since 1.1.0
	 * @param string $id slug of the display
	 */
	public static function output($id = '') {
		// get placement data for the slug
		if ( $id == '' ) {
			return; }

		$placements = get_option( 'advads-ads-placements', array() );

		if ( isset($placements[$id]['item']) ) {
			$_item = explode( '_', $placements[$id]['item'] );

			if ( isset($_item[1]) ) {
				$_item_id = absint( $_item[1] ); }
			elseif (empty($_item_id))
				return;

			// return either ad or group content
			if ( $_item[0] == 'ad' ) {
				// add the placement to the global output array
				$advads = Advanced_Ads::get_instance();
				$advads->current_ads[] = array('type' => 'placement', 'id' => $id, 'title' => $placements[$id]['name']);

				// create class from placement id, but not, if header injection
				if ( isset($placements[$id]['type']) && $placements[$id]['type'] == 'header' ){
					$ad_args = array();
				} else {
					$class = 'advads-' . $id;
					$ad_args = array('output' => array('class' => array($class)));
				}

				return Advanced_Ads_Select::get_instance()->get_ad_by_method( $_item_id, 'id', $ad_args );
			} elseif ( $_item[0] == 'group' ) {
				// add the placement to the global output array
				$advads = Advanced_Ads::get_instance();
				$advads->current_ads[] = array('type' => 'placement', 'id' => $id, 'title' => $placements[$id]['name']);

				return Advanced_Ads_Select::get_instance()->get_ad_by_method( $_item_id, 'group' );
			}
		}

		return;
	}

	/**
	 * inject ads directly into the content
	 *
	 * @since 1.2.1
	 * @param string $placement_id id of the placement
	 * @param arr $options placement options
	 * @param string $content
	 * @return type
	 * @link inspired by http://www.wpbeginner.com/wp-tutorials/how-to-insert-ads-within-your-post-content-in-wordpress/
	 */
	public static function &inject_in_content($placement_id, $options, &$content) {

		/*
         * hot-fixed to support some tags under idealised conditions.
         * this does ignore:
         * - autop() messups
         * - nesting of any kind
         * - non-valid XHTML (i.e. wild HTML)
         *
         * 'after' is experimental as the concept requires DOM and is not fully deterministic across implementations.
         * it falls back to 'before' n+1-th element or 'after' closing tag of the n-th.
         */
		$tag = isset($options['tag']) ? $options['tag'] : 'p';
		$position = isset($options['position']) ? $options['position'] : 'after';
		$paragraph_id = isset($options['index']) ? $options['index'] : 1;
		$offset = 0;
		$insertAt = null;

		// sanitise
		$tag = preg_quote( strtolower( $tag ), '`' );
		$before = $position !== 'after';
		$paragraph_id = max( 1, (int) $paragraph_id );

		// detect n-th tag
		$matches = array();
		while ( 1 === preg_match( "`<$tag(?=[ >/])(?:[^>]+/>|.+?(?:</$tag\s*>|(?=<$tag(?=[ >/])|$)))`Ssi", $content, $matches, PREG_OFFSET_CAPTURE, $offset ) ) {
			$offset = $matches[0][1];

			// skip empty
			// -TODO should only ignore whitespaces, not all special chars
			if ( '' === preg_replace( '/&[a-z0-9#]+;|\s+/i', '', strip_tags( htmlspecialchars( $matches[0][0] ) ) ) ) {
				continue;
			}

			$paragraph_id--;
			if ( $paragraph_id <= 0 ) {
				$insertAt = $before ? $offset : $offset + strlen( $matches[0][0] );
				break;
			}

			// start at next offset
			$offset += strlen( $matches[0][0] );
		}

		if ( isset($insertAt) ) {
			$ad_content = Advanced_Ads_Placements::output( $placement_id );
			if ( $insertAt === false ) {
				$content .= $ad_content; // fallback: end-of-content
			} else {
				$content = substr( $content, 0, $insertAt ) . $ad_content . substr( $content, $insertAt );
			}

			return $content;
		}

		return $content;
	}
}