<?php

/**

 * WordPress Link Template Functions

 *

 * @package WordPress

 * @subpackage Template

 */

/**

 * Display the permalink for the current post.

 *

 * @since 1.2.0

 * @uses apply_filters() Calls 'the_permalink' filter on the permalink string.

 */

function the_permalink() {

	echo apply_filters('the_permalink', get_permalink());

}

/**

 * Retrieve trailing slash string, if blog set for adding trailing slashes.

 *

 * Conditionally adds a trailing slash if the permalink structure has a trailing

 * slash, strips the trailing slash if not. The string is passed through the

 * 'user_trailingslashit' filter. Will remove trailing slash from string, if

 * blog is not set to have them.

 *

 * @since 2.2.0

 * @uses $wp_rewrite

 *

 * @param $string String a URL with or without a trailing slash.

 * @param $type_of_url String the type of URL being considered (e.g. single, category, etc) for use in the filter.

 * @return string

 */

function user_trailingslashit($string, $type_of_url = '') {

	global $wp_rewrite;

	if ( $wp_rewrite->use_trailing_slashes )

		$string = trailingslashit($string);

	else

		$string = untrailingslashit($string);

	// Note that $type_of_url can be one of following:

	// single, single_trackback, single_feed, single_paged, feed, category, page, year, month, day, paged

	$string = apply_filters('user_trailingslashit', $string, $type_of_url);

	return $string;

}

/**

 * Display permalink anchor for current post.

 *

 * The permalink mode title will use the post title for the 'a' element 'id'

 * attribute. The id mode uses 'post-' with the post ID for the 'id' attribute.

 *

 * @since 0.71

 *

 * @param string $mode Permalink mode can be either 'title', 'id', or default, which is 'id'.

 */

function permalink_anchor($mode = 'id') {

	global $post;

	switch ( strtolower($mode) ) {

		case 'title':

			$title = sanitize_title($post->post_title) . '-' . $post->ID;

			echo '<a id="'.$title.'"></a>';

			break;

		case 'id':

		default:

			echo '<a id="post-' . $post->ID . '"></a>';

			break;

	}

}

/**

 * Retrieve full permalink for current post or post ID.

 *

 * @since 1.0.0

 *

 * @param int $id Optional. Post ID.

 * @param bool $leavename Optional, defaults to false. Whether to keep post name or page name.

 * @return string

 */

function get_permalink($id = 0, $leavename = false) {

	$rewritecode = array(

		'%year%',

		'%monthnum%',

		'%day%',

		'%hour%',

		'%minute%',

		'%second%',

		$leavename? '' : '%postname%',

		'%post_id%',

		'%category%',

		'%author%',

		$leavename? '' : '%pagename%',

	);

	if ( is_object($id) && isset($id->filter) && 'sample' == $id->filter ) {

		$post = $id;

		$sample = true;

	} else {

		$post = &get_post($id);

		$sample = false;

	}

	if ( empty($post->ID) ) return false;

	if ( $post->post_type == 'page' )

		return get_page_link($post->ID, $leavename, $sample);

	elseif ($post->post_type == 'attachment')

		return get_attachment_link($post->ID);

	$permalink = get_option('permalink_structure');

	if ( '' != $permalink && !in_array($post->post_status, array('draft', 'pending')) ) {

		$unixtime = strtotime($post->post_date);

		$category = '';

		if ( strpos($permalink, '%category%') !== false ) {

			$cats = get_the_category($post->ID);

			if ( $cats ) {

				usort($cats, '_usort_terms_by_ID'); // order by ID

				$category = $cats[0]->slug;

				if ( $parent = $cats[0]->parent )

					$category = get_category_parents($parent, false, '/', true) . $category;

			}

			// show default category in permalinks, without

			// having to assign it explicitly

			if ( empty($category) ) {

				$default_category = get_category( get_option( 'default_category' ) );

				$category = is_wp_error( $default_category ) ? '' : $default_category->slug;

			}

		}

		$author = '';

		if ( strpos($permalink, '%author%') !== false ) {

			$authordata = get_userdata($post->post_author);

			$author = $authordata->user_nicename;

		}

		$date = explode(" ",date('Y m d H i s', $unixtime));

		$rewritereplace =

		array(

			$date[0],

			$date[1],

			$date[2],

			$date[3],

			$date[4],

			$date[5],

			$post->post_name,

			$post->ID,

			$category,

			$author,

			$post->post_name,

		);

		$permalink = get_option('home') . str_replace($rewritecode, $rewritereplace, $permalink);

		$permalink = user_trailingslashit($permalink, 'single');

		return apply_filters('post_link', $permalink, $post, $leavename);

	} else { // if they're not using the fancy permalink option

		$permalink = trailingslashit(get_option('home')) . '?p=' . $post->ID;

		return apply_filters('post_link', $permalink, $post, $leavename);

	}

}

/**

 * Retrieve permalink from post ID.

 *

 * @since 1.0.0

 *

 * @param int $post_id Optional. Post ID.

 * @param mixed $deprecated Not used.

 * @return string

 */

function post_permalink($post_id = 0, $deprecated = '') {

	return get_permalink($post_id);

}

/**

 * Retrieve the permalink for current page or page ID.

 *

 * Respects page_on_front. Use this one.

 *

 * @since 1.5.0

 *

 * @param int $id Optional. Post ID.

 * @param bool $leavename Optional, defaults to false. Whether to keep page name.

 * @param bool $sample Optional, defaults to false. Is it a sample permalink.

 * @return string

 */

function get_page_link( $id = false, $leavename = false, $sample = false ) {

	global $post;

	$id = (int) $id;

	if ( !$id )

		$id = (int) $post->ID;

	if ( 'page' == get_option('show_on_front') && $id == get_option('page_on_front') )

		$link = get_option('home');

	else

		$link = _get_page_link( $id , $leavename, $sample );

	return apply_filters('page_link', $link, $id);

}

/**

 * Retrieve the page permalink.

 *

 * Ignores page_on_front. Internal use only.

 *

 * @since 2.1.0

 * @access private

 *

 * @param int $id Optional. Post ID.

 * @param bool $leavename Optional. Leave name.

 * @param bool $sample Optional. Sample permalink.

 * @return string

 */

function _get_page_link( $id = false, $leavename = false, $sample = false ) {

	global $post, $wp_rewrite;

	if ( !$id )

		$id = (int) $post->ID;

	else

		$post = &get_post($id);

	$pagestruct = $wp_rewrite->get_page_permastruct();

	if ( '' != $pagestruct && ( ( isset($post->post_status) && 'draft' != $post->post_status && 'pending' != $post->post_status ) || $sample ) ) {

		$link = get_page_uri($id);

		$link = ( $leavename ) ? $pagestruct : str_replace('%pagename%', $link, $pagestruct);

		$link = trailingslashit(get_option('home')) . "$link";

		$link = user_trailingslashit($link, 'page');

	} else {

		$link = trailingslashit(get_option('home')) . "?page_id=$id";

	}

	return apply_filters( '_get_page_link', $link, $id );

}

/**

 * Retrieve permalink for attachment.

 *

 * This can be used in the WordPress Loop or outside of it.

 *

 * @since 2.0.0

 *

 * @param int $id Optional. Post ID.

 * @return string

 */

function get_attachment_link($id = false) {

	global $post, $wp_rewrite;

	$link = false;

	if (! $id) {

		$id = (int) $post->ID;

	}

	$object = get_post($id);

	if ( $wp_rewrite->using_permalinks() && ($object->post_parent > 0) && ($object->post_parent != $id) ) {

		$parent = get_post($object->post_parent);

		if ( 'page' == $parent->post_type )

			$parentlink = _get_page_link( $object->post_parent ); // Ignores page_on_front

		else

			$parentlink = get_permalink( $object->post_parent );

		if ( is_numeric($object->post_name) || false !== strpos(get_option('permalink_structure'), '%category%') )

			$name = 'attachment/' . $object->post_name; // <permalink>/<int>/ is paged so we use the explicit attachment marker

		else

			$name = $object->post_name;

		if (strpos($parentlink, '?') === false)

			$link = user_trailingslashit( trailingslashit($parentlink) . $name );

	}

	if (! $link ) {

		$link = trailingslashit(get_bloginfo('url')) . "?attachment_id=$id";

	}

	return apply_filters('attachment_link', $link, $id);

}

/**

 * Retrieve the permalink for the year archives.

 *

 * @since 1.5.0

 *

 * @param int|bool $year False for current year or year for permalink.

 * @return string

 */

function get_year_link($year) {

	global $wp_rewrite;

	if ( !$year )

		$year = gmdate('Y', time()+(get_option('gmt_offset') * 3600));

	$yearlink = $wp_rewrite->get_year_permastruct();

	if ( !empty($yearlink) ) {

		$yearlink = str_replace('%year%', $year, $yearlink);

		return apply_filters('year_link', get_option('home') . user_trailingslashit($yearlink, 'year'), $year);

	} else {

		return apply_filters('year_link', trailingslashit(get_option('home')) . '?m=' . $year, $year);

	}

}

/**

 * Retrieve the permalink for the month archives with year.

 *

 * @since 1.0.0

 *

 * @param bool|int $year False for current year. Integer of year.

 * @param bool|int $month False for current month. Integer of month.

 * @return string

 */

function get_month_link($year, $month) {

	global $wp_rewrite;

	if ( !$year )

		$year = gmdate('Y', time()+(get_option('gmt_offset') * 3600));

	if ( !$month )

		$month = gmdate('m', time()+(get_option('gmt_offset') * 3600));

	$monthlink = $wp_rewrite->get_month_permastruct();

	if ( !empty($monthlink) ) {

		$monthlink = str_replace('%year%', $year, $monthlink);

		$monthlink = str_replace('%monthnum%', zeroise(intval($month), 2), $monthlink);

		return apply_filters('month_link', get_option('home') . user_trailingslashit($monthlink, 'month'), $year, $month);

	} else {

		return apply_filters('month_link', trailingslashit(get_option('home')) . '?m=' . $year . zeroise($month, 2), $year, $month);

	}

}

/**

 * Retrieve the permalink for the day archives with year and month.

 *

 * @since 1.0.0

 *

 * @param bool|int $year False for current year. Integer of year.

 * @param bool|int $month False for current month. Integer of month.

 * @param bool|int $day False for current day. Integer of day.

 * @return string

 */

function get_day_link($year, $month, $day) {

	global $wp_rewrite;

	if ( !$year )

		$year = gmdate('Y', time()+(get_option('gmt_offset') * 3600));

	if ( !$month )

		$month = gmdate('m', time()+(get_option('gmt_offset') * 3600));

	if ( !$day )

		$day = gmdate('j', time()+(get_option('gmt_offset') * 3600));

	$daylink = $wp_rewrite->get_day_permastruct();

	if ( !empty($daylink) ) {

		$daylink = str_replace('%year%', $year, $daylink);

		$daylink = str_replace('%monthnum%', zeroise(intval($month), 2), $daylink);

		$daylink = str_replace('%day%', zeroise(intval($day), 2), $daylink);

		return apply_filters('day_link', get_option('home') . user_trailingslashit($daylink, 'day'), $year, $month, $day);

	} else {

		return apply_filters('day_link', trailingslashit(get_option('home')) . '?m=' . $year . zeroise($month, 2) . zeroise($day, 2), $year, $month, $day);

	}

}

/**

 * Retrieve the permalink for the feed type.

 *

 * @since 1.5.0

 *

 * @param string $feed Optional, defaults to default feed. Feed type.

 * @return string

 */

function get_feed_link($feed = '') {

	global $wp_rewrite;

	$permalink = $wp_rewrite->get_feed_permastruct();

	if ( '' != $permalink ) {

		if ( false !== strpos($feed, 'comments_') ) {

			$feed = str_replace('comments_', '', $feed);

			$permalink = $wp_rewrite->get_comment_feed_permastruct();

		}

		if ( get_default_feed() == $feed )

			$feed = '';

		$permalink = str_replace('%feed%', $feed, $permalink);

		$permalink = preg_replace('#/+#', '/', "/$permalink");

		$output =  get_option('home') . user_trailingslashit($permalink, 'feed');

	} else {

		if ( empty($feed) )

			$feed = get_default_feed();

		if ( false !== strpos($feed, 'comments_') )

			$feed = str_replace('comments_', 'comments-', $feed);

		$output = trailingslashit(get_option('home')) . "?feed={$feed}";

	}

	return apply_filters('feed_link', $output, $feed);