<?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;
}

?>