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

?>