Pastable version of Wikipedia API and text formatting

<pre class='prettyprint' language='php'>&lt;?php

function fetch($url,$start,$end){
	$page = file_get_contents($url);
 	$s1=explode($start, $page);
 	$s2=explode($end, $page);
 	$page=str_replace($s1[0], '', $page);
 	$page=str_replace($s2[1], '', $page);
 	return $page;
}

$query = $_GET['query'];

if($_GET['lang'] != '')
{
	$lang = $_GET['lang'];
}
else
{
	$lang = 'it';
}

$xml = fetch(&quot;http://&quot;.$lang.&quot;.wikipedia.org/w/api.php?action=query&amp;prop=revisions&amp;titles=&quot;.$query.&quot;&amp;rvprop=content&amp;format=xml&quot;,&quot;&lt;rev&gt;&quot;,&quot;&lt;/rev&gt;&quot;);

/* THIS FUNCTION WAS IN PARSER.PHP */
function doHeadings($text)
{
	for ( $i = 6; $i &gt;= 1; --$i ) 
	{
		$h = str_repeat( '=', $i );
		$text = preg_replace( &quot;/^{$h}(.+){$h}\\s*$/m&quot;,&quot;&lt;h{$i}&gt;\\1&lt;/h{$i}&gt;\\2&quot;, $text );
	}
		
	return $text;
}
/* THIS FUNCTION WAS IN PARSER.PHP */
function doAllQuotes($text)
{
	$outtext = '';
	$lines = explode( &quot;\n&quot;, $text );
	foreach ( $lines as $line ) {
		$outtext .= doQuotes ( $line ) . &quot;\n&quot;;
	}
	$outtext = substr($outtext, 0,-1);

return $outtext;
}
/* THIS FUNCTION WAS IN PARSER.PHP */
function doQuotes( $text ) {
		$arr = preg_split( &quot;/(''+)/&quot;, $text, -1, PREG_SPLIT_DELIM_CAPTURE );
		if ( count( $arr ) == 1 )
			return $text;
		else
		{
			# First, do some preliminary work. This may shift some apostrophes from
			# being mark-up to being text. It also counts the number of occurrences
			# of bold and italics mark-ups.
			$i = 0;
			$numbold = 0;
			$numitalics = 0;
			foreach ( $arr as $r )
			{
				if ( ( $i % 2 ) == 1 )
				{
					# If there are ever four apostrophes, assume the first is supposed to
					# be text, and the remaining three constitute mark-up for bold text.
					if ( strlen( $arr[$i] ) == 4 )
					{
						$arr[$i-1] .= &quot;'&quot;;
						$arr[$i] = &quot;'''&quot;;
					}
					# If there are more than 5 apostrophes in a row, assume they're all
					# text except for the last 5.
					else if ( strlen( $arr[$i] ) &gt; 5 )
					{
						$arr[$i-1] .= str_repeat( &quot;'&quot;, strlen( $arr[$i] ) - 5 );
						$arr[$i] = &quot;'''''&quot;;
					}
					# Count the number of occurrences of bold and italics mark-ups.
					# We are not counting sequences of five apostrophes.
					if ( strlen( $arr[$i] ) == 2 )      { $numitalics++;             }
					else if ( strlen( $arr[$i] ) == 3 ) { $numbold++;                }
					else if ( strlen( $arr[$i] ) == 5 ) { $numitalics++; $numbold++; }
				}
				$i++;
			}

# If there is an odd number of both bold and italics, it is likely
			# that one of the bold ones was meant to be an apostrophe followed
			# by italics. Which one we cannot know for certain, but it is more
			# likely to be one that has a single-letter word before it.
			if ( ( $numbold % 2 == 1 ) &amp;&amp; ( $numitalics % 2 == 1 ) )
			{
				$i = 0;
				$firstsingleletterword = -1;
				$firstmultiletterword = -1;
				$firstspace = -1;
				foreach ( $arr as $r )
				{
					if ( ( $i % 2 == 1 ) and ( strlen( $r ) == 3 ) )
					{
						$x1 = substr ($arr[$i-1], -1);
						$x2 = substr ($arr[$i-1], -2, 1);
						if ($x1 == ' ') {
							if ($firstspace == -1) $firstspace = $i;
						} else if ($x2 == ' ') {
							if ($firstsingleletterword == -1) $firstsingleletterword = $i;
						} else {
							if ($firstmultiletterword == -1) $firstmultiletterword = $i;
						}
					}
					$i++;
				}

# If there is a single-letter word, use it!
				if ($firstsingleletterword &gt; -1)
				{
					$arr [ $firstsingleletterword ] = &quot;''&quot;;
					$arr [ $firstsingleletterword-1 ] .= &quot;'&quot;;
				}
				# If not, but there's a multi-letter word, use that one.
				else if ($firstmultiletterword &gt; -1)
				{
					$arr [ $firstmultiletterword ] = &quot;''&quot;;
					$arr [ $firstmultiletterword-1 ] .= &quot;'&quot;;
				}
				# ... otherwise use the first one that has neither.
				# (notice that it is possible for all three to be -1 if, for example,
				# there is only one pentuple-apostrophe in the line)
				else if ($firstspace &gt; -1)
				{
					$arr [ $firstspace ] = &quot;''&quot;;
					$arr [ $firstspace-1 ] .= &quot;'&quot;;
				}
			}

# Now let's actually convert our apostrophic mush to HTML!
			$output = '';
			$buffer = '';
			$state = '';
			$i = 0;
			foreach ($arr as $r)
			{
				if (($i % 2) == 0)
				{
					if ($state == 'both')
						$buffer .= $r;
					else
						$output .= $r;
				}
				else
				{
					if (strlen ($r) == 2)
					{
						if ($state == 'i')
						{ $output .= '&lt;/i&gt;'; $state = ''; }
						else if ($state == 'bi')
						{ $output .= '&lt;/i&gt;'; $state = 'b'; }
						else if ($state == 'ib')
						{ $output .= '&lt;/b&gt;&lt;/i&gt;&lt;b&gt;'; $state = 'b'; }
						else if ($state == 'both')
						{ $output .= '&lt;b&gt;&lt;i&gt;'.$buffer.'&lt;/i&gt;'; $state = 'b'; }
						else # $state can be 'b' or ''
						{ $output .= '&lt;i&gt;'; $state .= 'i'; }
					}
					else if (strlen ($r) == 3)
					{
						if ($state == 'b')
						{ $output .= '&lt;/b&gt;'; $state = ''; }
						else if ($state == 'bi')
						{ $output .= '&lt;/i&gt;&lt;/b&gt;&lt;i&gt;'; $state = 'i'; }
						else if ($state == 'ib')
						{ $output .= '&lt;/b&gt;'; $state = 'i'; }
						else if ($state == 'both')
						{ $output .= '&lt;i&gt;&lt;b&gt;'.$buffer.'&lt;/b&gt;'; $state = 'i'; }
						else # $state can be 'i' or ''
						{ $output .= '&lt;b&gt;'; $state .= 'b'; }
					}
					else if (strlen ($r) == 5)
					{
						if ($state == 'b')
						{ $output .= '&lt;/b&gt;&lt;i&gt;'; $state = 'i'; }
						else if ($state == 'i')
						{ $output .= '&lt;/i&gt;&lt;b&gt;'; $state = 'b'; }
						else if ($state == 'bi')
						{ $output .= '&lt;/i&gt;&lt;/b&gt;'; $state = ''; }
						else if ($state == 'ib')
						{ $output .= '&lt;/b&gt;&lt;/i&gt;'; $state = ''; }
						else if ($state == 'both')
						{ $output .= '&lt;i&gt;&lt;b&gt;'.$buffer.'&lt;/b&gt;&lt;/i&gt;'; $state = ''; }
						else # ($state == '')
						{ $buffer = ''; $state = 'both'; }
					}
				}
				$i++;
			}
			# Now close all remaining tags.  Notice that the order is important.
			if ($state == 'b' || $state == 'ib')
				$output .= '&lt;/b&gt;';
			if ($state == 'i' || $state == 'bi' || $state == 'ib')
				$output .= '&lt;/i&gt;';
			if ($state == 'bi')
				$output .= '&lt;/b&gt;';
			# There might be lonely ''''', so make sure we have a buffer
			if ($state == 'both' &amp;&amp; $buffer)
				$output .= '&lt;b&gt;&lt;i&gt;'.$buffer.'&lt;/i&gt;&lt;/b&gt;';
			return $output;
		}
	}
	
$xml = doHeadings($xml);
$xml = doAllQuotes($xml);
$xml = str_replace('[[','',$xml); /* WIKIMEDIA IDENTIFY THE CONTENT BETWEEN [[ and ]] AS A LINK AND I REMOVE IT. */
$xml = str_replace(']]','',$xml);

echo $xml;exit;
?&gt;</pre>
<a href="http://www.refactormycode.com/codes/208-wikipedia-api-and-text-formatting" style="color:#fff" title="As seen on RefactorMyCode.com"><img alt="Small_logo" src="http://www.refactormycode.com/images/small_logo.gif" style="border:0" /></a>

Refactor :my => 'code'

Recent

Popular

Pastable version of Wikipedia API and text formatting