<?php

/*

 * Enano - an open-source CMS capable of wiki functions, Drupal-like sidebar blocks, and everything in between

 * Copyright (C) 2006-2009 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.

 */

class Namespace_File extends Namespace_Default

{

	function send()

	{

		global $output;

		$output->add_before_footer($this->show_info());

		$output->add_before_footer($this->display_categories());

		if ( $this->exists )

		{

			$this->send_from_db();

		}

		else

		{

			$output->header();

			$this->error_404();

			$output->footer();

		}

	}

	function show_info()

	{

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

		global $lang;

		require_once(ENANO_ROOT . '/includes/log.php');

		$local_page_id = $this->page_id;

		$local_namespace = $this->namespace;

		$html = '';

		// Prevent unnecessary work

		if ( $local_namespace != 'File' )

			return null;

		$selfn = $db->escape($this->page_id);

		$q = $db->sql_query('SELECT f.mimetype,f.time_id,f.size,l.log_id FROM ' . table_prefix . "files AS f\n"

											. "  LEFT JOIN " . table_prefix . "logs AS l\n"

											. "    ON ( l.time_id = f.time_id AND ( l.action = 'reupload' OR l.action IS NULL ) )\n"

											. "  WHERE f.page_id = '$selfn'\n"

											. "    ORDER BY f.time_id DESC;");

		if ( !$q )

		{

			$db->_die('The file type could not be fetched.');

		}

		if ( $db->numrows() < 1 )

		{

			$html .= '<div class="mdg-comment" style="margin-left: 0;">

							<h3>' . $lang->get('onpage_filebox_heading') . '</h3>

							<p>' . $lang->get('onpage_filebox_msg_not_found', array('upload_link' => makeUrlNS('Special', 'UploadFile/'.$local_page_id))) . '</p>

						</div>

						<br />';

			return $html;

		}

		$r = $db->fetchrow();

		$mimetype = $r['mimetype'];

		$datestring = enano_date(ED_DATE | ED_TIME, (int)$r['time_id']);

		$html .= '<div class="mdg-comment" style="margin-left: 0;">

						<h3>' . $lang->get('onpage_filebox_heading') . '</h3>

						<p>' . $lang->get('onpage_filebox_lbl_type') . ' '.$r['mimetype'].'<br />';

		$size = $r['size'] . ' ' . $lang->get('etc_unit_bytes');

		if ( $r['size'] >= 1048576 )

		{

			$size .= ' (' . ( round($r['size'] / 1048576, 1) ) . ' ' . $lang->get('etc_unit_megabytes_short') . ')';

		}

		else if ( $r['size'] >= 1024 )

		{

			$size .= ' (' . ( round($r['size'] / 1024, 1) ) . ' ' . $lang->get('etc_unit_kilobytes_short') . ')';

		}

		$html .= $lang->get('onpage_filebox_lbl_size', array('size' => $size));

		$html .= '<br />' . $lang->get('onpage_filebox_lbl_uploaded') . ' ' . $datestring . '</p>';

		// are we dealing with an image?

		$is_image = substr($mimetype, 0, 6) == 'image/';

		// for anything other than plain text and 

		if ( !$is_image && ( substr($mimetype, 0, 5) != 'text/' || $mimetype == 'text/html' || $mimetype == 'text/javascript' ) )

		{

			$html .= '<div class="warning-box">

							' . $lang->get('onpage_filebox_msg_virus_warning') . '

						</div>';

		}

		if ( $is_image )

		{

			// show a thumbnail of the image

			$html .= '<p>

							<a href="'.makeUrlNS('Special', 'DownloadFile'.'/'.$selfn).'">

								<img style="border: 0;" alt="' . htmlspecialchars($paths->page) . '" src="' . makeUrlNS('Special', "DownloadFile/$selfn/{$r['time_id']}", 'preview', true) . '" />

							</a>

						</p>';

		}

		$html .= '<p>

						<a href="'.makeUrlNS('Special', 'DownloadFile'.'/'.$selfn.'/'.$r['time_id'].htmlspecialchars(urlSeparator).'download').'">

							' . $lang->get('onpage_filebox_btn_download') . '

						</a>';

		// allow reupload if:

		//   * we are allowed to upload new versions, and

		//      - the file is unprotected, or

		//      - we have permission to override protection

		if ( !$this->perms )

			$this->perms = $session->fetch_page_acl($this->page_id, $this->namespace);

		if ( $this->perms->get_permissions('upload_new_version') && ( !$this->page_protected || $this->perms->get_permissions('even_when_protected') ) )

		{

			// upload new version link

			$html .= '  |  <a href="'.makeUrlNS('Special', "UploadFile/$selfn", false, true).'">

							' . $lang->get('onpage_filebox_btn_upload_new') . '

						</a>';

		}

		// close off paragraph

		$html .= '</p>';

		// only show this if there's more than one revision

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

		{

			// requery, sql_result_seek() doesn't work on postgres

			$db->free_result();

			$q = $db->sql_query('SELECT f.mimetype,f.time_id,f.size,l.log_id FROM ' . table_prefix . "files AS f\n"

											. "  LEFT JOIN " . table_prefix . "logs AS l\n"

											. "    ON ( l.time_id = f.time_id AND ( l.action = 'reupload' OR l.action IS NULL ) )\n"

											. "  WHERE f.page_id = '$selfn'\n"

											. "    ORDER BY f.time_id DESC;");

			if ( !$q )

				$db->_die();

			$log = new LogDisplay();

			$log->add_criterion('page', $paths->nslist['File'] . $this->page_id);

			$log->add_criterion('action', 'reupload');

			$data = $log->get_data();

			$i = -1;

			$html .= '<h3>' . $lang->get('onpage_filebox_heading_history') . '</h3><p>';

			$last_rollback_id = false;

			$download_flag = $is_image ? false : 'download';

			while ( $r = $db->fetchrow($q) )

			{

				$html .= '(<a href="'.makeUrlNS('Special', "DownloadFile/$selfn/{$r['time_id']}", $download_flag, true).'">' . $lang->get('onpage_filebox_btn_this_version') . '</a>) ';

				if ( $session->get_permissions('history_rollback') && $last_rollback_id )

					$html .= ' (<a href="#rollback:' . $last_rollback_id . '" onclick="ajaxRollback(\''.$last_rollback_id.'\'); return false;">' . $lang->get('onpage_filebox_btn_revert') . '</a>) ';

				else if ( $session->get_permissions('history_rollback') && !$last_rollback_id )

					$html .= ' (' . $lang->get('onpage_filebox_btn_current') . ') ';

				$last_rollback_id = $r['log_id'];

				$html .= $r['mimetype'].', ';

				$fs = $r['size'];

				$fs = (int)$fs;

				if($fs >= 1048576)

				{

					$fs = round($fs / 1048576, 1);

					$size = $fs . ' ' . $lang->get('etc_unit_megabytes_short');

				}

				else

				if ( $fs >= 1024 )

				{

					$fs = round($fs / 1024, 1);

					$size = $fs . ' ' . $lang->get('etc_unit_kilobytes_short');

				}

				else

				{

					$size = $fs . ' ' . $lang->get('etc_unit_bytes');

				}

				$html .= $size;

				if ( isset($data[++$i]) )

					$html .= ': ' . LogDisplay::render_row($data[$i], false, false);

				$html .= '<br />';

			}

			$html .= '</p>';

		}

		$db->free_result();

		$html .= '<h3>' . $lang->get('onpage_filebox_lbl_pagesusing') . '</h3>';

		$regexp = ENANO_DBLAYER == 'PGSQL' ? '~ E' : 'REGEXP ';

		$q = $db->sql_query('SELECT t.page_id, t.namespace, p.name FROM ' . table_prefix . "page_text AS t\n"

			              . "  LEFT JOIN " . table_prefix . "pages AS p\n"

			              . "    ON ( t.page_id = p.urlname AND t.namespace = p.namespace )\n"

			              . "  WHERE t.page_text {$regexp}'\\\\[\\\\[:" .

							  addslashes(preg_quote($paths->nslist[$this->namespace])) .

							  addslashes(preg_quote($this->page_id)) .

							  "(\\\\||\\\\])';");

		if ( !$q )

			$db->_die();

		if ( $db->numrows() < 1 )

		{

			$html .= '<p>' . $lang->get('onpage_filebox_msg_no_inlinks') . '</p>';

		}

		else

		{

			$html .= '<p>' . $lang->get('onpage_filebox_msg_pagesusing') . '</p>';

			$html .= '<ul>';

			while ( $row = $db->fetchrow() )

			{

				$html .= '<li><a href="' . makeUrlNS($row['namespace'], $row['page_id']) . '">' .

							htmlspecialchars($row['name']) .

							'</a></li>';

			}

			$html .= '</ul>';

		}

		$db->free_result();

		$html .= '</div><br />';

		return $html;

	}

	/**

 	* Delete a file from the database and filesystem based on file ID.

 	* @param int File ID

 	* @return null

 	*/

	public static function delete_file($file_id)

	{

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

		if ( !is_int($file_id) )

			// seriously?

			return null;

		// pull file info

		$q = $db->sql_query('SELECT filename, page_id, time_id, file_extension, file_key FROM ' . table_prefix . "files WHERE file_id = $file_id;");

		if ( !$q )

			$db->_die();

		if ( $db->numrows() < 1 )

		{

			$db->free_result();

			return null;

		}

		$row = $db->fetchrow();

		$db->free_result();

		// make sure the image isn't used by multiple revisions

		$q = $db->sql_query('SELECT 1 FROM ' . table_prefix . "files WHERE file_key = '{$row['file_key']}';");

		if ( !$q )

			$db->_die();

		if ( $db->numrows() < 1 )

		{

			// remove from filesystem

			$file_path = ENANO_ROOT . "/files/{$row['file_key']}{$row['file_extension']}";

			@unlink($file_path);

			// old filename standard

			$file_path = ENANO_ROOT . "/files/{$row['file_key']}-{$row['time_id']}{$row['file_extension']}";

			@unlink($file_path);

		}

		$db->free_result();

		// remove from cache

		if ( $dp = @opendir(ENANO_ROOT . '/cache/') )

		{

			$regexp = '#' . preg_quote($row['filename']) . '-' . $row['time_id'] . '-[0-9]+x[0-9]+' . preg_quote($row['file_extension']) . '#';

			while ( $dh = @readdir($dp) )

			{

				if ( preg_match($regexp, $dh) )

				{

					// it's a match, delete the cached thumbnail

					@unlink(ENANO_ROOT . "/cache/$dh");

				}

			}

			closedir($dp);

		}

		// remove from database

		$q = $db->sql_query('DELETE FROM ' . table_prefix . "files WHERE file_id = $file_id;");

		if ( !$q )

			$db->_die();

		// remove from logs

		$page_id_db = $db->escape($row['page_id']);

		$q = $db->sql_query('DELETE FROM ' . table_prefix . "logs WHERE page_id = '{$page_id_db}' AND namespace = 'File' AND action = 'reupload' AND time_id = {$row['time_id']};");

		if ( !$q )

			$db->_die();

		return true;

	}

}