<?php
// Callback function for image replacement
function bfa_image_files($matches) {
	$templateURI = get_template_directory_uri(); 

	return '<img src="' . $templateURI . 
	'/images/icons/' . $matches[1] . '" alt="" />';
}


// Callback function for post meta replacement
function bfa_meta_value($matches) {
	global $post;
	return get_post_meta($post->ID, $matches[1], true);
}

// Date callback
function bfa_parse_date_callback( $matches ) {
	ob_start(); 
		the_time($matches[2]); 
		$date = ob_get_contents(); 
	ob_end_clean();	
	return $date;
}

// Date modified callback
function bfa_parse_date_modified_callback( $matches ) {
	ob_start(); 
		the_modified_time($matches[2]); 
		$date_modified = ob_get_contents(); 
	ob_end_clean();	
	return $date_modified;
}

function bfa_postinfo($postinfo_string) {

	// one theme option needed below for nofollow trackback / RSS links yes/no
	global $bfa_ata, $post;

	/* replace date format escape placeholders(#) with the actual escpae
	character (=backslashes). This function removes all backslashes from
	post info strings to avoid issues with hosts that have magic_quotes_gpc ON.
	But we want to keep the backslashes inside date items, because they are
	needed to escape literal strings inside dates */
	$postinfo_string = str_replace("#", "\\", $postinfo_string);

	$postinfo = $postinfo_string;

	// Author public name
	if ( strpos($postinfo_string,'%author%') !== FALSE ) {
		ob_start(); 
			coauthors_posts_links(); 
			$author = ob_get_contents(); 
		ob_end_clean();
		$postinfo = str_replace("%author%", $author, $postinfo);
	}

	// Public name of Author who last modified a post, since WordPress 2.8. 
	// Check first if function is available (= if this is WP 2.8+)
	if ( function_exists('the_modified_author') ) { 
		if ( strpos($postinfo_string,'%modified-author%') !== FALSE ) {
			ob_start(); 
				the_modified_author(); 
				$modified_author = ob_get_contents(); 
			ob_end_clean();
			$postinfo = str_replace("%modified-author%", $modified_author, $postinfo);
		}
	}

	// Author about yourself
	if ( strpos($postinfo_string,'%author-description%') !== FALSE ) {
		ob_start(); 
			the_author_meta('description'); 
			$author_description = ob_get_contents(); 
		ob_end_clean();
		$postinfo = str_replace("%author-description%", $author_description, $postinfo);
	}

	// Author login name
	if ( strpos($postinfo_string,'%author-login%') !== FALSE ) {
		ob_start(); 
			the_author_meta('user_login'); 
			$author_login = ob_get_contents(); 
		ob_end_clean();
		$postinfo = str_replace("%author-login%", $author_login, $postinfo);
	}

	// Author first name
	if ( strpos($postinfo_string,'%author-firstname%') !== FALSE ) {
		ob_start(); 
			the_author_meta('first_name'); 
			$author_firstname = ob_get_contents(); 
		ob_end_clean();
		$postinfo = str_replace("%author-firstname%", $author_firstname, $postinfo);
	}

	// Author last name
	if ( strpos($postinfo_string,'%author-lastname%') !== FALSE ) {
		ob_start(); 
			the_author_meta('last_name'); 
			$author_lastname = ob_get_contents(); 
		ob_end_clean();
		$postinfo = str_replace("%author-lastname%", $author_lastname, $postinfo);
	}

	// Author nickname
	if ( strpos($postinfo_string,'%author-nickname%') !== FALSE ) {
		ob_start(); 
			the_author_meta('nickname'); 
		 	$author_nickname = ob_get_contents(); 
		ob_end_clean();
		$postinfo = str_replace("%author-nickname%", $author_nickname, $postinfo);
	}

	// Author ID
	if ( strpos($postinfo_string,'%author-id%') !== FALSE ) {
		ob_start(); 
			the_author_meta('ID'); 
			$author_ID = ob_get_contents(); 
		ob_end_clean();
		$postinfo = str_replace("%author-id%", $author_ID, $postinfo);
	}

	// Author email address, clear text in HTML source code
	if ( strpos($postinfo_string,'%author-email-clear%') !== FALSE ) {
		ob_start(); 
			the_author_meta('email'); 
			$author_email_clear = ob_get_contents(); 
		ob_end_clean();
		$postinfo = str_replace("%author-email-clear%", $author_email_clear, $postinfo);
	}

	// Author email address obfuscated
	if ( strpos($postinfo_string,'%author-email%') !== FALSE ) {
		$postinfo = str_replace("%author-email%", antispambot(get_the_author_email()), $postinfo);
	}

	// Author website URL
	if ( strpos($postinfo_string,'%author-url%') !== FALSE ) {
		ob_start(); 
			the_author_meta('url'); 
			$author_url = ob_get_contents(); 
		ob_end_clean();
		$postinfo = str_replace("%author-url%", $author_url, $postinfo);
	}

	// Author website link
	if ( strpos($postinfo_string,'%author-link%') !== FALSE ) {
		ob_start(); 
			coauthors_posts_links();
			$author_link = ob_get_contents(); 
		ob_end_clean();
		$postinfo = str_replace("%author-link%", $author_link, $postinfo);
	}

	// Author posts archive link
	if ( strpos($postinfo_string,'%author-posts-link%') !== FALSE ) {
		ob_start(); 
			coauthors_posts_links();
			$author_posts_link = ob_get_contents(); 
		ob_end_clean();
		$postinfo = str_replace("%author-posts-link%", $author_posts_link, $postinfo);
	}
	
	//  LEGACY: %author-linked% replaced by %author-posts-link% in 3.3.2, but displays the same: Author posts archive link
	if ( strpos($postinfo_string,'%author-linked%') !== FALSE ) {
		ob_start(); 
			the_author_posts_link(); 
			$author_posts_link = ob_get_contents(); 
		ob_end_clean();
		$postinfo = str_replace("%author-linked%", $author_posts_link, $postinfo);
	}

	// Author post count
	if ( strpos($postinfo_string,'%author-post-count%') !== FALSE ) {
		ob_start(); 
			the_author_posts(); 
			$author_post_count = ob_get_contents(); 
		ob_end_clean();
		$postinfo = str_replace("%author-post-count%", $author_post_count, $postinfo);
	}

	// Author AOL Instant Messenger screenname
	if ( strpos($postinfo_string,'%author-aim%') !== FALSE ) {
		ob_start(); 
			the_author_meta('aim'); 
			$author_aim = ob_get_contents(); 
		ob_end_clean();
		$postinfo = str_replace("%author-aim%", $author_aim, $postinfo);
	}

	// Author Yahoo IM ID
	if ( strpos($postinfo_string,'%author-yim%') !== FALSE ) {
		ob_start(); 
			the_author_meta('yim'); 
			$author_yim = ob_get_contents(); 
		ob_end_clean();
		$postinfo = str_replace("%author-yim%", $author_yim, $postinfo);
	}

    // Author Gravatar 
    if (strpos($postinfo_string, '%gravatar%') !== FALSE) { 
        $gravatar = get_avatar(get_the_author_meta('ID'), 30); 
        $postinfo = str_replace("%gravatar%", $gravatar, $postinfo); 
    }  
	
	// Date & Time
	if ( strpos($postinfo_string,'%date(') !== FALSE ) {
		$postinfo = preg_replace_callback("/%date\((.*?)'(.*?)'(.*?)\)%/is","bfa_parse_date_callback",$postinfo);
	}

	// Date & Time, last modified
	if ( strpos($postinfo_string,'%date-modified(') !== FALSE ) {
		$postinfo = preg_replace_callback("/%date-modified\((.*?)'(.*?)'(.*?)\)%/is","bfa_parse_date_modified_callback",$postinfo);
	}	

	// Tags, linked - since WP 2.3
	if ( strpos($postinfo_string,'%tags-linked') !== FALSE ) {
		while ( strpos($postinfo,'%tags-linked') !== FALSE ) {
			$tag_link_options = preg_match("/(.*)%tags-linked\('(.*?)'(.*?)'(.*?)'(.*?)'(.*?)'(.*)/i",
			$postinfo_string,$tag_link_matches);
			$tags_linked = get_the_tag_list($tag_link_matches[2],	$tag_link_matches[4],
			$tag_link_matches[6]);
			$postinfo = preg_replace("/(.*)%tags-linked\((.*?)\)%(.*)/i", "\${1}" .
			$tags_linked. "\${3}", $postinfo);
		}	
	}

	// Tags, linked. If post has no tags, categories are displayed instead -  since WP 2.3
	if ( strpos($postinfo_string,'%tags-cats-linked') !== FALSE ) {
		while ( strpos($postinfo,'%tags-cats-linked') !== FALSE ) {
			$tag_link_options = preg_match("/(.*)%tags-cats-linked\('(.*?)'(.*?)'(.*?)'(.*?)'(.*?)'(.*)/i",
			$postinfo_string,$tag_link_matches);
			ob_start(); 
				the_tags($tag_link_matches[2], $tag_link_matches[4], $tag_link_matches[6]); 
				$tags_cats_linked = ob_get_contents(); 
			ob_end_clean();
			$postinfo = preg_replace("/(.*)%tags-cats-linked\((.*?)\)%(.*)/i", "\${1}" .
			$tags_cats_linked. "\${3}", $postinfo);
		}
	}

	// Tags, not linked - since WP 2.3
	if ( strpos($postinfo_string,'%tags(') !== FALSE ) {
		while ( strpos($postinfo,'%tags(') !== FALSE ) {
		
			$tag_options = preg_match("/(.*)%tags\('(.*?)'(.*?)'(.*?)'(.*?)'(.*?)'(.*)/i",
			$postinfo_string,$tag_matches);
			$posttags = get_the_tags();
		
			if ($posttags) { 
				foreach($posttags as $tag) {
				$tag_list .= $tag->name . $tag_matches[4]; 
				}
				// remove last separator
				$tag_list = preg_replace("/".$tag_matches[4]."$/mi", "", $tag_list);
				$tags = $tag_matches[2] . $tag_list . $tag_matches[6];
			} else { 
				$tags = ""; 
			}
			$postinfo = preg_replace("/(.*)%tags\((.*?)\)%(.*)/i", "\${1}" .$tags.
			"\${3}", $postinfo);
		}		
	}

	// 1st category
	if ( strpos($postinfo_string,'%category%') !== FALSE ) {
		$all_categories = get_the_category(); 
		$category = $all_categories[0]->cat_name;
		$category_notlinked = $category; 
		$postinfo = str_replace("%category%", $category_notlinked, $postinfo);
	}

	// 1st category, linked
	if ( strpos($postinfo_string,'%category-linked%') !== FALSE ) {
		$all_categories = get_the_category(); 
		$category = $all_categories[0]->cat_name;
		$category_linked = '<a class="'.$category . '" href="' . get_category_link($all_categories[0]->cat_ID) .
        '">' . $category . '</a>';
		$postinfo = str_replace("%category-linked%", $category_linked, $postinfo);
	}

	// Categories, linked with class name added 
	$categories_linked = '';
	if ( strpos($postinfo_string,'%categories-linked') !== FALSE ) {
		while ( strpos($postinfo,'%categories-linked') !== FALSE ) {
			$category_linked_separator = preg_match("/(.*)%categories-linked\('(.*?)'\)(.*)/i",
	        $postinfo_string,$category_linked_matches);
			ob_start(); 
			$categories = get_the_category();
			$items_in_categories = count($categories);
			$output = '';
			$categories_count = $items_in_categories;
			if($categories){
				foreach($categories as $category) { 
					$categories_count -= 1;
					if ($categories_count) { 
					  $seperator = $category_linked_matches[2];
					  }
					else {$seperator = '';}
					$categories_linked .= '<a class="'.$category->slug . '" href="'.get_category_link( $category->term_id ).'" title="' . esc_attr( $category->name ) . '">'.$category->cat_name.$seperator.'</a>';
				}
			}
			ob_end_clean();
			$postinfo = preg_replace("/(.*)%categories-linked\((.*?)\)%(.*)/i", "\${1}" .
    	    $categories_linked. "\${3}", $postinfo);
		}
	}

	// Categories, not linked
	if ( strpos($postinfo_string,'%categories(') !== FALSE ) {
		while ( strpos($postinfo,'%categories(') !== FALSE ) {
			$category_separator = preg_match("/(.*)%categories\('(.*?)'\)(.*)/i",
	        $postinfo_string,$category_matches);
			$categories = "";
			foreach((get_the_category()) as $category) { 
				$categories .= $category->cat_name . $category_matches[2]; 
			} 
			// remove last separator
			$categories = preg_replace("/".$category_matches[2]."$/mi", "", $categories);
			$postinfo = preg_replace("/(.*)%categories\((.*?)\)%(.*)/i", "\${1}" .
	        $categories. "\${3}", $postinfo);
		}
	}

	// Comment link
	if ( strpos($postinfo_string,'%comments(') !== FALSE ) {
		while ( strpos($postinfo,'%comments(') !== FALSE ) {
		
			$comment_options = preg_match("/(.*)%comments\('(.*?)'(.*?)'(.*?)'(.*?)'(.*?)'(.*?)'(.*?)'(.*)/i",
	        $postinfo_string,$comment_matches);
        
			if ( !comments_open() AND $comment_matches[8] == "dontshow" ) { 
				$comment_link = ''; 
			} else { 
				ob_start(); 
					comments_popup_link($comment_matches[2], $comment_matches[4],
    	     		 $comment_matches[6], 'comments-link', $comment_matches[8]);
					$comment_link = ob_get_contents(); 
				ob_end_clean(); 
			}

			if (!comments_open() ) {
				if ($post->comment_count == 0) {
					$comment_link = '<strong>' . $comment_matches[8] . '</strong>';
				} else {
					$comment_link = $comment_link . ' - <strong>(' . $comment_matches[8] . ')</strong>';
					}
			}
			if ( !comments_open() AND $comment_matches[8] == "dontshow" ) { 
				$comment_link = ''; 
			}
		
			$postinfo = preg_replace("/(.*)%comments\((.*?)\)%(.*)/i", "\${1}" .
    	    $comment_link. "\${3}", $postinfo);
        }
	}

	// Comments Feed link
	if ( strpos($postinfo_string,'%comments-rss') !== FALSE ) {
		while ( strpos($postinfo,'%comments-rss') !== FALSE ) {
		
			$comments_rss_link_text = preg_match("/(.*)%comments-rss\('(.*?)'(.*)/i",
	        $postinfo_string,$comments_rss_matches);
        
			ob_start(); 
				post_comments_feed_link($comments_rss_matches[2]); 
				$comments_rss_link = ob_get_contents(); 
			ob_end_clean();
			
			// make link nofollow if set in theme options
			if ( $bfa_ata['nofollow'] == "Yes" ) 
				$comments_rss_link = str_replace('href=', 'rel="nofollow" href=', $comments_rss_link);
			
			$postinfo = preg_replace("/(.*)%comments-rss\((.*?)\)%(.*)/i", "\${1}" .
        	$comments_rss_link. "\${3}", $postinfo);
		}
	}

	// Trackback URL
	if ( strpos($postinfo_string,'%trackback%') !== FALSE ) {
		$trackback_url = trackback_url(FALSE);
		$postinfo = str_replace("%trackback%", $trackback_url, $postinfo);
	}

	// Trackback Link
	if ( strpos($postinfo_string,'%trackback-linked(') !== FALSE ) {
		while ( strpos($postinfo,'%trackback-linked(') !== FALSE ) {
			$trackback_url = trackback_url(FALSE);
			$trackback_link_text = preg_match("/(.*)%trackback-linked\('(.*?)'(.*)/i",
   	     $postinfo_string,$trackback_matches);
			$trackback_link = '<a href="' . $trackback_url . '">' . $trackback_matches[2] . '</a>';
		
			// make link nofollow if set in theme options
			if ( $bfa_ata['nofollow'] == "Yes" ) {
				$trackback_link = str_replace('href=', 'rel="nofollow" href=', $trackback_link); 
			}
		
			$postinfo = preg_replace("/(.*)%trackback-linked\((.*?)\)%(.*)/i", "\${1}" .
	        $trackback_link. "\${3}", $postinfo);
		}
	}

	// Trackback RDF
	if ( strpos($postinfo_string,'%trackback-rdf%') !== FALSE ) {
		ob_start(); 
			trackback_rdf(); 
			$trackback_rdf = "<!-- " . ob_get_contents() . " -->"; 
		ob_end_clean();
		$postinfo = str_replace("%trackback-rdf%", $trackback_rdf, $postinfo);
	}

	// Permalink
	if ( strpos($postinfo_string,'%permalink%') !== FALSE ) {
		ob_start(); 
			the_permalink(); 
			$permalink = ob_get_contents(); 
		ob_end_clean();
		$postinfo = str_replace("%permalink%", $permalink, $postinfo);
	}

	// Post ID
	if ( strpos($postinfo_string,'%post-id%') !== FALSE ) {
		ob_start(); 
			the_ID(); 
			$post_id = ob_get_contents(); 
		ob_end_clean();
		$postinfo = str_replace("%post-id%", $post_id, $postinfo);
	}

	// Post Title
	if ( strpos($postinfo_string,'%post-title%') !== FALSE ) {
		ob_start(); 
			the_title(); 
			$post_title = ob_get_contents(); 
		ob_end_clean();
		$postinfo = str_replace("%post-title%", $post_title, $postinfo);
	}

	// Edit post
	if ( strpos($postinfo_string,'%edit(') !== FALSE ) {
		while ( strpos($postinfo,'%edit(') !== FALSE ) {
			$edit_options = preg_match("/(.*)%edit\('(.*?)'(.*?)'(.*?)'(.*?)'(.*?)'(.*)/i",
	        $postinfo_string,$edit_matches);
			ob_start(); 
				edit_post_link($edit_matches[4], $edit_matches[2], $edit_matches[6]);
	        	$edit_link = ob_get_contents();
			ob_end_clean();
			$postinfo = preg_replace("/(.*)%edit\((.*?)\)%(.*)/i", "\${1}" .
   	     $edit_link. "\${3}", $postinfo);
		}
	}

	// Print
	if ( strpos($postinfo_string,'%print(') !== FALSE ) {
		while ( strpos($postinfo,'%print(') !== FALSE ) {
			$print_text = preg_match("/(.*)%print\('(.*?)'(.*)/i",$postinfo_string,$print_text_matches);
			$print_link = '<a href="javascript:window.print()">' .$print_text_matches[2]. '</a>';
			$postinfo = preg_replace("/(.*)%print\((.*?)\)%(.*)/i", "\${1}" .
	        $print_link. "\${3}", $postinfo);
		}
	}

	// For the "WP-Email" plugin
	if ( strpos($postinfo_string,'%wp-email%') !== FALSE ) {
		$wp_email = ( function_exists('wp_email') ? email_link($email_post_text = '',
        $email_page_text = '', $echo = FALSE) : "" );
		$postinfo = str_replace("%wp-email%", $wp_email, $postinfo);
	}

	// For the "WP-Print" plugin
	if ( strpos($postinfo_string,'%wp-print%') !== FALSE ) {
		$wp_print = ( function_exists('wp_print') ? print_link($print_post_text = '',
        $print_page_text = '', $echo = FALSE) : "" );
		$postinfo = str_replace("%wp-print%", $wp_print, $postinfo);
	}

	// For the "WP-PostViews" plugin
	if ( strpos($postinfo_string,'%wp-postviews%') !== FALSE ) {
		$wp_postviews = ( function_exists('the_views') ? the_views($display = FALSE) : "" );
		$postinfo = str_replace("%wp-postviews%", $wp_postviews, $postinfo);
	}

	// For the "WP-PostRatings" plugin
	if ( strpos($postinfo_string,'%wp-postratings%') !== FALSE ) {
		$wp_postratings = ( function_exists('the_ratings') ?
        the_ratings($start_tag = 'span', $custom_id = 0, $display = FALSE) : "" );
		$postinfo = str_replace("%wp-postratings%", $wp_postratings, $postinfo);
	}

	// For the "Sociable" plugin
	if ( strpos($postinfo_string,'%sociable%') !== FALSE ) {
		ob_start(); 
			$sociable = ( (function_exists('sociable_html2') AND function_exists( do_sociable() ) ) ? do_sociable() : "");
			$sociable = ob_get_contents();
		ob_end_clean();
		$postinfo = str_replace("%sociable%", $sociable, $postinfo);
	}

	// For the "Share This" plugin
	if ( strpos($postinfo_string,'%share-this%') !== FALSE ) {
		ob_start();
			if ( function_exists('sharethis_button') ) { 
				sharethis_button(); 
				$share_this = ob_get_contents(); 
			} else { 
				$share_this = ""; 
			}
		ob_end_clean();
		$postinfo = str_replace("%share-this%", $share_this, $postinfo);
	} 

	// Images
	if ( strpos($postinfo_string,'<image(') !== FALSE ) 
		$postinfo = preg_replace_callback("|<image\((.*?)\)>|","bfa_image_files",$postinfo);

	/* The meta = ALL custom fields:values, formatted by Wordpress as
	unordered list <ul><li>..</li><li>..</li></ul> */
	if ( strpos($postinfo_string,'%meta%') !== FALSE ) {
		ob_start(); 
			the_meta(); 
			$the_meta = ob_get_contents(); 
		ob_end_clean();
		// 3.4.3.: remove bfa_ata metas */
		$the_meta = preg_replace("/<li>(.*)bfa_ata(.*)<\/li>/i", "", $the_meta);
		$postinfo = str_replace("%meta%", $the_meta, $postinfo);
	}

	// Single post meta values, not formatted
	if ( strpos($postinfo_string,'%meta(') !== FALSE ) 
		$postinfo = preg_replace_callback("|%meta\('(.*?)'\)%|","bfa_meta_value",$postinfo);

	// Since 3.6.7, parse widget areas
	$postinfo = bfa_parse_widget_areas($postinfo);	
		
	return $postinfo;
}

function bfa_getH() {
	global $bfa_ata, $post;
	return('#');
}
?>