<?php
/**
 * VK_Breadcrumb
 *
 * @package vektor-inc/vk-breadcrumb
 * @license GPL-2.0+
 *
 * @version 0.2.8
 */

namespace VektorInc\VK_Breadcrumb;

use VektorInc\VK_Helpers\VkHelpers;

/**
 * Bread Crumb
 */
class VkBreadcrumb {

	/**
	 * Bread Crumb Array
	 */
	public static function get_array() {

		global $wp_query;

		// Get Post top page info
		// get_post_type() だとtaxonomyページで該当の投稿がない時に投稿タイプを取得できないため VkHelpers::get_post_type_info() を使用.
		$post_type_info = VkHelpers::get_post_type_info();
		$post_top_info  = VkHelpers::get_post_top_info();
		$post_type      = $post_type_info['slug'];
		$show_on_front  = get_option( 'show_on_front' );
		$page_on_front  = get_option( 'page_on_front' );
		$post           = $wp_query->get_queried_object();

		// Home.
		$front_page_name = 'HOME';
		$page_on_front   = get_option( 'page_on_front' );

		if ( $page_on_front ) {
			$front_page_name = get_the_title( $page_on_front );
		}

		$breadcrumb_array = array(
			array(
				'name'  => $front_page_name,
				'id'    => '',
				'url'   => home_url(),
				'class' => 'breadcrumb-list__item--home',
				'icon'  => 'fas fa-fw fa-home',
			),
		);

		if ( is_home() && ! is_front_page() ) {
			$breadcrumb_array[] = array(
				'name'  => esc_html( $post_top_info['name'] ),
				'id'    => '',
				'url'   => '',
				'class' => '',
				'icon'  => '',
			);

		} elseif ( is_404() ) {
			$breadcrumb_array[] = array(
				'name'  => __( 'Not found', 'lightning' ),
				'id'    => '',
				'url'   => '',
				'class' => '',
				'icon'  => '',
			);
		} elseif ( is_attachment() ) {
			$breadcrumb_array[] = array(
				'name'  => get_the_title(),
				'id'    => '',
				'url'   => '',
				'class' => '',
				'icon'  => '',
			);

		} elseif ( is_author() ) {
			$user_obj           = get_queried_object();
			$breadcrumb_array[] = array(
				'name'  => $user_obj->display_name,
				'id'    => '',
				'url'   => '',
				'class' => '',
				'icon'  => '',
			);

		} elseif ( is_search() ) {
			// For filter search term & keywords or term & no keyword.
			if ( get_search_query() ) {
				// translators: search keyword .
				$name = sprintf( __( 'Search Results for : %s', 'lightning' ), get_search_query() );
			} else {
				$name = __( 'Search Results', 'lightning' );
			}
			$breadcrumb_array[] = array(
				'name'  => $name,
				'id'    => '',
				'url'   => '',
				'class' => '',
				'icon'  => '',
			);

		} elseif ( is_page() && ! is_front_page() ) {
			$post = $wp_query->get_queried_object();
			// 第一階層.
			if ( 0 === $post->post_parent ) {
				$breadcrumb_array[] = array(
					'name'  => strip_tags( apply_filters( 'single_post_title', get_the_title() ) ),
					'id'    => '',
					'url'   => '',
					'class' => '',
					'icon'  => '',
				);
			} else {
				// 子階層がある場合.
				$ancestors = array_reverse( get_post_ancestors( $post->ID ) );
				array_push( $ancestors, $post->ID );
				foreach ( $ancestors as $ancestor ) {
					if ( end( $ancestors ) !== $ancestor ) {
						$breadcrumb_array[] = array(
							'name'  => strip_tags( apply_filters( 'single_post_title', get_the_title( $ancestor ) ) ),
							'id'    => '',
							'url'   => get_permalink( $ancestor ),
							'class' => '',
							'icon'  => '',
						);
					} else {
						$breadcrumb_array[] = array(
							'name'  => strip_tags( apply_filters( 'single_post_title', get_the_title( $ancestor ) ) ),
							'id'    => '',
							'url'   => '',
							'class' => '',
							'icon'  => '',
						);
					}
				}
			}
		} elseif ( is_post_type_archive() && ! is_date() ) {
			$breadcrumb_array[] = array(
				'name'  => $post_type_info['name'],
				'id'    => '',
				'url'   => '',
				'class' => '',
				'icon'  => '',
			);
		} elseif ( ( is_single() || is_archive() ) || is_date() && ! is_post_type_archive() && ! is_search() ) {
			if ( 'post' !== $post_type_info['slug'] || $post_top_info['use'] ) {
				$breadcrumb_array[] = array(
					'name'  => $post_type_info['name'],
					'id'    => '',
					'url'   => $post_type_info['url'],
					'class' => '',
					'icon'  => '',
				);
			}
		}

		/*****************************************************
		 * Under 3 hierarchy
		 */

		if ( is_date() && ! is_search() ) {
			$breadcrumb_array[] = array(
				'name'  => get_the_archive_title(),
				'id'    => '',
				'url'   => '',
				'class' => '',
				'icon'  => '',
			);

		} elseif ( is_tag() && ! is_search() ) {
			$breadcrumb_array[] = array(
				'name'  => single_tag_title( '', false ),
				'id'    => '',
				'url'   => '',
				'class' => '',
				'icon'  => '',
			);

		} elseif ( is_category() && ! is_search() ) {

			/*****************************************
			 *  Category
			 */

			// Get category information & insert to $cat.
			$cat = get_queried_object();

			// parent !== 0  >>>  Parent exist.
			if ( 0 !== $cat->parent ) {
				// 祖先のカテゴリー情報を逆順で取得.
				$ancestors = array_reverse( get_ancestors( $cat->cat_ID, 'category' ) );
				// 祖先階層の配列回数分ループ.
				foreach ( $ancestors as $ancestor ) :
					$breadcrumb_array[] = array(
						'name'  => get_cat_name( $ancestor ),
						'id'    => '',
						'url'   => get_category_link( $ancestor ),
						'class' => '',
						'icon'  => '',
					);
				endforeach;
			}
			$breadcrumb_array[] = array(
				'name'  => $cat->cat_name,
				'id'    => '',
				'url'   => '',
				'class' => '',
				'icon'  => '',
			);

		} elseif ( is_tax() && ! is_search() ) {

			/*****************************************
			 * Term
			 */
			$now_term        = $wp_query->queried_object->term_id;
			$now_term_parent = $wp_query->queried_object->parent;
			$now_taxonomy    = $wp_query->queried_object->taxonomy;

			// parent が !0 の場合 = 親カテゴリーが存在する場合.
			if ( 0 !== $now_term_parent ) {
				// 祖先のカテゴリー情報を逆順で取得.
				$ancestors = array_reverse( get_ancestors( $now_term, $now_taxonomy ) );
				// 祖先階層の配列回数分ループ.
				foreach ( $ancestors as $ancestor ) :
					$pan_term           = get_term( $ancestor, $now_taxonomy );
					$breadcrumb_array[] = array(
						'name'  => esc_html( $pan_term->name ),
						'id'    => '',
						'url'   => get_term_link( $ancestor, $now_taxonomy ),
						'class' => '',
						'icon'  => '',
					);
				endforeach;
			}
			$breadcrumb_array[] = array(
				'name'  => single_cat_title( '', '', false ),
				'id'    => '',
				'url'   => '',
				'class' => '',
				'icon'  => '',
			);

		} elseif ( is_single() ) {

			/**********************************
			 * Single
			 */

			// Case of post.
			if ( 'post' == $post_type_info['slug'] ) {
				$category = get_the_category();
				if ( $category ) {
					// get parent category info.
					$parents = array_reverse( get_ancestors( $category[0]->term_id, 'category', 'taxonomy' ) );
					array_push( $parents, $category[0]->term_id );
					foreach ( $parents as $parent_term_id ) {
						$parent_obj         = get_term( $parent_term_id, 'category' );
						$term_url           = get_term_link( $parent_obj->term_id, $parent_obj->taxonomy );
						$breadcrumb_array[] = array(
							'name'  => $parent_obj->name,
							'id'    => '',
							'url'   => $term_url,
							'class' => '',
							'icon'  => '',
						);
					}
				}
			} else {
				// Case of custom post type.
				// Taxonomy of Single or Page.
				$get_taxonomies = get_the_taxonomies();

				// 非公開のタクソノミーを自動的に除外.
				foreach ( $get_taxonomies as $taxonomy => $value ) {
					$taxonomy_info = get_taxonomy( $taxonomy );
					if ( empty( $taxonomy_info->public ) ) {
						unset( $get_taxonomies[ $taxonomy ] );
					}
				}

				$taxonomies = array();

				// 一旦タクソノミーの文字列配列に変換しないと色々と面倒.
				foreach ( $get_taxonomies as $key => $value ) {
					$taxonomies[] = $key;
				}

				// 除外するタクソノミーの文字列配列.
				$exclusion = array();
				$exclusion = apply_filters( 'vk_breadcrumb_taxonomies_exludion', $exclusion );

				// タクソノミーの差分を採用.
				if ( $exclusion ) {
					$taxonomies = array_diff( $taxonomies, $exclusion );
				}

				if ( $taxonomies ) {

					foreach ( $taxonomies as $key ) {
						$taxonomy = $key;
						break;
					}

					$terms = get_the_terms( get_the_ID(), $taxonomy );

					// keeps only the first term (categ).
					$term = reset( $terms );
					if ( 0 != $term->parent ) {

						// Get term ancestors info.
						$ancestors = array_reverse( get_ancestors( $term->term_id, $taxonomy ) );
						// Print loop term ancestors.
						foreach ( $ancestors as $ancestor ) {
							$pan_term           = get_term( $ancestor, $taxonomy );
							$breadcrumb_array[] = array(
								'name'  => $pan_term->name,
								'id'    => '',
								'url'   => get_term_link( $ancestor, $taxonomy ),
								'class' => '',
								'icon'  => '',
							);
						}
					}
					$term_url           = get_term_link( $term->term_id, $taxonomy );
					$breadcrumb_array[] = array(
						'name'  => $term->name,
						'id'    => '',
						'url'   => $term_url,
						'class' => '',
						'icon'  => '',
					);
				}
			}

			$breadcrumb_array[] = array(
				'name'  => get_the_title(),
				'id'    => '',
				'url'   => '',
				'class' => '',
				'icon'  => '',
			);
		} // is_single

		return apply_filters( 'vk_breadcrumb_array', $breadcrumb_array );

	}


	/**
	 * Get Bread Crumb
	 *
	 * @param array $options
	 */
	public static function get_breadcrumb( $options = array() ) {

		if ( ! $options ) {
			$options = array(
				'id_outer'           => 'breadcrumb',
				'class_outer'        => 'breadcrumb',
				'wrapper_attributes' => '',
				'class_inner'        => 'container',
				'class_list'         => 'breadcrumb-list',
				'class_list_item'    => 'breadcrumb-list__item',
			);
		}

		$options = apply_filters( 'breadcrumb_html_options', $options );

		$breadcrumb_array = self::get_array();

		// Microdata
		// Refference http://schema.org/BreadcrumbList .
		/*-------------------------------------------*/
		$microdata_li        = ' itemprop="itemListElement" itemscope itemtype="http://schema.org/ListItem"';
		$microdata_li_a      = ' itemprop="item"';
		$microdata_li_a_span = ' itemprop="name"';

		$breadcrumb_html = '<!-- [ #' . esc_attr( $options['class_outer'] ) . ' ] -->';
		if ( ! empty( $options['wrapper_attributes'] ) ) {
			$breadcrumb_html .= '<div id="' . esc_attr( $options['id_outer'] ) . '" ' . $options['wrapper_attributes'] . '>';
		} else {
			$breadcrumb_html .= '<div id="' . esc_attr( $options['id_outer'] ) . '" class="' . $options['class_outer'] . '">';
		}
		$breadcrumb_html .= '<div class="' . esc_attr( $options['class_inner'] ) . '">';
		$breadcrumb_html .= '<ol class="' . esc_attr( $options['class_list'] ) . '" itemscope itemtype="https://schema.org/BreadcrumbList">';

		$position = 0;
		foreach ( $breadcrumb_array as $key => $value ) {

			$id = ( $value['id'] ) ? ' id="' . esc_attr( $value['id'] ) . '"' : '';

			$class = ' class="' . esc_attr( $options['class_list_item'] );
			if ( ! empty( $value['class'] ) ) {
				$class .= ' ' . esc_attr( $value['class'] );
			}
			$class .= '"';

			$breadcrumb_html .= '<li' . $id . $class . $microdata_li . '>';

			if ( $value['url'] ) {
				$breadcrumb_html .= '<a href="' . esc_url( $value['url'] ) . '"' . $microdata_li_a . '>';
			}

			if ( ! empty( $value['icon'] ) ) {
				$breadcrumb_html .= '<i class="' . $value['icon'] . '"></i>';
			}

			$breadclumb_post_title_allowed_html = array(
				'i'    => array(
					'id'    => array(),
					'class' => array(),
				),
				'ruby' => array(),
				'rt'   => array(),
			);
			$breadcrumb_html                   .= '<span' . $microdata_li_a_span . '>' . wp_kses( $value['name'], $breadclumb_post_title_allowed_html ) . '</span>';

			if ( $value['url'] ) {
				$breadcrumb_html .= '</a>';
			}
			++$position;
			$breadcrumb_html .= '<meta itemprop="position" content="' . $position . '" />';

			$breadcrumb_html .= '</li>';

		}

			$breadcrumb_html .= '</ol>';
			$breadcrumb_html .= '</div>';
			$breadcrumb_html .= '</div>';
			$breadcrumb_html .= '<!-- [ /#' . esc_attr( $options['class_outer'] ) . ' ] -->';
			$breadcrumb_html  = apply_filters( 'vk_breadcrumb_html', $breadcrumb_html );
			return $breadcrumb_html;

	}


	/**
	 * Print Bread Crumb
	 */
	public static function the_breadcrumb() {
		$allowed_html = array(
			'div'  => array(
				'id'        => array(),
				'class'     => array(),
				'itemprop'  => array(),
				'itemscope' => array(),
				'itemtype'  => array(),
			),
			'ol'   => array(
				'id'        => array(),
				'class'     => array(),
				'itemprop'  => array(),
				'itemscope' => array(),
				'itemtype'  => array(),
			),
			'li'   => array(
				'id'        => array(),
				'class'     => array(),
				'itemprop'  => array(),
				'itemscope' => array(),
				'itemtype'  => array(),
			),
			'a'    => array(
				'id'       => array(),
				'class'    => array(),
				'href'     => array(),
				'target'   => array(),
				'itemprop' => array(),
			),
			'span' => array(
				'id'        => array(),
				'class'     => array(),
				'itemprop'  => array(),
				'itemscope' => array(),
				'itemtype'  => array(),
			),
			'i'    => array(
				'id'    => array(),
				'class' => array(),
			),
			'meta' => array(
				'itemprop' => array(),
				'content'  => array(),
			),
			'ruby' => array(),
			'rt'   => array(),
		);
		echo wp_kses( self::get_breadcrumb(), $allowed_html );
	}


	/**
	 * Scheme array
	 *
	 * @return array $json_array
	 */
	public static function get_scheme_json_array() {
		$array                  = self::get_array();
		$json_array             = array();
		$json_array['@context'] = 'https://schema.org';
		$json_array['@type']    = 'BreadcrumbList';
		$count                  = 1;
		foreach ( $array as $key => $value ) {
			$json_array['itemListElement'][ $key ]['@type']    = 'ListItem';
			$json_array['itemListElement'][ $key ]['position'] = $count;
			$json_array['itemListElement'][ $key ]['name']     = esc_html( $value['name'] );
			if ( ! empty( $value['url'] ) ) {
				$json_array['itemListElement'][ $key ]['item'] = esc_html( esc_url( $value['url'] ) );
			}
			$count++;
		}
		return $json_array;
	}

	/**
	 * Print scheme script
	 *
	 * @return void
	 */
	public static function the_scheme_script() {
		$json_array = self::get_scheme_json_array();
		echo '<script type="application/ld+json">' . "\n";
		echo wp_json_encode( $json_array, JSON_UNESCAPED_UNICODE | JSON_UNESCAPED_SLASHES | JSON_PRETTY_PRINT );
		echo '</script>';
	}
}
