<?php

/*

 * Snapr

 * Version 0.1 beta 1

 * Copyright (C) 2007 Dan Fuhry

 *

 * This program is Free Software; you can redistribute and/or modify it under the terms of the GNU General Public License

 * as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version.

 *

 * This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied

 * warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for details.

 */

// Add an [[:Image:foo]] tag handler to the wiki formatter

$plugins->attachHook('render_wikiformat_pre', 'snapr_process_image_tags($text);');

function snapr_process_image_tags(&$text)

{

	$text = snapr_image_tags_stage1($text, $taglist);

	$text = snapr_image_tags_stage2($text, $taglist);

}

/*

 * Functions copied from render.php

 */

/**

 * Changes wikitext image tags to HTML.

 * @param string The wikitext to process

 * @param array Will be overwritten with the list of HTML tags (the system uses tokens for TextWiki compatibility)

 * @return string

 */

function snapr_image_tags_stage1($text, &$taglist)

{

	global $db, $session, $paths, $template, $plugins; // Common objects

	static $idcache = array();

	$s_delim = "\xFF";

	$f_delim = "\xFF";

	$taglist = array();

	// Wicked huh?

	$regex = '/\[\[:' . str_replace('/', '\\/', preg_quote($paths->nslist['Gallery'])) . '([\w\s0-9_\(\)!@%\^\+\|\.-]+?)((\|thumb)|(\|([0-9]+)x([0-9]+)))?(\|left|\|right)?(\|raw|\|(.+))?\]\]/i';

	preg_match_all($regex, $text, $matches);

	foreach ( $matches[0] as $i => $match )

	{

		$full_tag   =& $matches[0][$i];

		$imagename  =& $matches[1][$i];

		$scale_type =& $matches[2][$i];

		$width      =& $matches[5][$i];

		$height     =& $matches[6][$i];

		$clear      =& $matches[7][$i];

		$caption    =& $matches[8][$i];

		// determine the image name

		$imagename = sanitize_page_id($imagename);

		if ( isset($idcache[$imagename]) )

		{

			$found_image_id = true;

			$filename =& $idcache[$imagename];

		}

		else

		{

			$found_image_id = false;

			// get the image ID

			// Ech... he sent us a string... parse it and see what we get

			if ( strstr($imagename, '/') )

			{

				$folders = explode('/', $imagename);

			}

			else

			{

				$folders = array($imagename);

			}

			foreach ( $folders as $i => $_crap )

			{

				$folder =& $folders[$i];

				$folder = dirtify_page_id($folder);

				$folder = str_replace('_', ' ', $folder);

			}

			unset($folder);

			$folders = array_reverse($folders);

			// This is one of the best MySQL tricks on the market. We're going to reverse-travel a folder path using LEFT JOIN and the incredible power of metacoded SQL

			$sql = 'SELECT g0.img_id, g0.img_title, g0.img_desc, g0.print_sizes, g0.img_time_upload, g0.img_time_mod, g0.img_filename, g0.folder_parent, g0.img_tags FROM '.table_prefix.'gallery AS g0';

			$where = "\n  " . 'WHERE g0.img_title=\'' . $db->escape($folders[0]) . '\'';

			foreach ( $folders as $i => $folder )

			{

				if ( $i == 0 )

					continue;

				$i_dec = $i - 1;

				$folder = $db->escape($folder);

				$sql .= "\n  LEFT JOIN ".table_prefix."gallery AS g{$i}\n    ON ( g{$i}.img_id=g{$i_dec}.folder_parent AND g{$i}.img_title='$folder' )";

				$where .= "\n    ".'AND g'.$i.'.img_id IS NOT NULL';

			}

			$where .= "\n    AND g{$i}.folder_parent IS NULL";

			$sql .= $where . ';';

			if ( !$db->sql_query($sql) )

			{

				$db->_die('The image metadata could not be loaded.');

			}

			if ( $db->numrows() > 0 )

			{

				$found_image_id = true;

				$row = $db->fetchrow();

				$db->free_result();

				$idcache[$imagename] = $row['img_id'];

				$filename =& $idcache[$imagename];

			}

		}

		if ( !$found_image_id )

		{

			$text = str_replace($full_tag, '[[' . makeUrlNS('Gallery', $imagename) . ']]', $text);

			continue;

		}

		if ( $scale_type == '|thumb' )

		{

			$r_width  = 225;

			$r_height = 225;

			$url = makeUrlNS('Special', 'GalleryFetcher/embed/' . $filename, 'width=' . $r_width . '&height=' . $r_height, true);

		}

		else if ( !empty($width) && !empty($height) )

		{

			$r_width = $width;

			$r_height = $height;

			$url = makeUrlNS('Special', 'GalleryFetcher/embed/' . $filename, 'width=' . $r_width . '&height=' . $r_height, true);

		}

		else

		{

			$url = makeUrlNS('Special', 'GalleryFetcher/' . $filename);

		}

		$img_tag = '<img src="' . $url . '" ';

		// if ( isset($r_width) && isset($r_height) && $scale_type != '|thumb' )

		// {

		//   $img_tag .= 'width="' . $r_width . '" height="' . $r_height . '" ';

		// }

		$img_tag .= 'style="border-width: 0px; /* background-color: white; */" ';

		$code = $plugins->setHook('snapr_img_tag_parse_img');

		foreach ( $code as $cmd )

		{

			eval($cmd);

		}

		$img_tag .= '/>';

		$complete_tag = '';

		if ( !empty($scale_type) && $caption != '|raw' )

		{

			$complete_tag .= '<div class="thumbnail" ';

			$clear_text = '';

			if ( !empty($clear) )

			{

				$side = ( $clear == '|left' ) ? 'left' : 'right';

				$opposite = ( $clear == '|left' ) ? 'right' : 'left';

				$clear_text .= "float: $side; margin-$opposite: 20px; width: {$r_width}px;";

				$complete_tag .= 'style="' . $clear_text . '" ';

			}

			$complete_tag .= '>';

			$complete_tag .= '<a href="' . makeUrlNS('Gallery', $filename) . '" style="display: block;">';

			$complete_tag .= $img_tag;

			$complete_tag .= '</a>';

			$mag_button = '<a href="' . makeUrlNS('Gallery', $filename) . '" style="display: block; float: right; clear: right; margin: 0 0 10px 10px;"><img alt="[ + ]" src="' . scriptPath . '/images/thumbnail.png" style="border-width: 0px;" /></a>';

			if ( !empty($caption) )

			{

				$cap = substr($caption, 1);

				$complete_tag .= $mag_button . $cap;

			}

			$complete_tag .= '</div>';

		}

		else if ( $caption == '|raw' )

		{

			$complete_tag .= "$img_tag";

			$taglist[$i] = $complete_tag;

			$repl = "{$s_delim}e_img_{$i}{$f_delim}";

			$text = str_replace($full_tag, $repl, $text);

			continue;

		}

		else

		{

			$complete_tag .= '<a href="' . makeUrlNS('Gallery', $filename) . '" style="display: block;"';

			$code = $plugins->setHook('snapr_img_tag_parse_link');

			foreach ( $code as $cmd )

			{

				eval($cmd);

			}

			$complete_tag .= '>';

			$complete_tag .= $img_tag;

			$complete_tag .= '</a>';

		}

		$complete_tag .= "\n\n";

		$taglist[$i] = $complete_tag;

		$pos = strpos($text, $full_tag);

		while(true)

		{

			$check1 = substr($text, $pos, 3);

			$check2 = substr($text, $pos, 1);

			if ( $check1 == '<p>' || $pos == 0 || $check2 == "\n" )

			{

				// die('found at pos '.$pos);

				break;

			}

			$pos--;

		}

		$repl = "{$s_delim}e_img_{$i}{$f_delim}";

		$text = substr($text, 0, $pos) . $repl . substr($text, $pos);

		$text = str_replace($full_tag, '', $text);

		unset($full_tag, $filename, $scale_type, $width, $height, $clear, $caption, $r_width, $r_height);

	}

	return $text;

}

/**

 * Finalizes processing of image tags.

 * @param string The preprocessed text

 * @param array The list of image tags created by RenderMan::process_image_tags()

 */

function snapr_image_tags_stage2($text, $taglist)

{

	$s_delim = "\xFF";

	$f_delim = "\xFF";

	foreach ( $taglist as $i => $tag )

	{

		$repl = "{$s_delim}e_img_{$i}{$f_delim}";

		$text = str_replace($repl, $tag, $text);

	}               

	return $text;

}

?>