<?php
# -- BEGIN LICENSE BLOCK ---------------------------------------
#
# This file is part of Dotclear 2.
#
# Copyright (c) 2003-2013 Olivier Meunier & Association Dotclear
# Licensed under the GPL version 2.0 license.
# See LICENSE file or
# http://www.gnu.org/licenses/old-licenses/gpl-2.0.html
#
# -- END LICENSE BLOCK -----------------------------------------

require dirname(__FILE__).'/../inc/admin/prepend.php';

dcPage::check('categories');

$cat_id = '';
$cat_title = '';
$cat_url = '';
$cat_desc = '';
$cat_position = '';

# Getting existing category
if (!empty($_REQUEST['id']))
{
	try {
		$rs = $core->blog->getCategory($_REQUEST['id']);
	} catch (Exception $e) {
		$core->error->add($e->getMessage());
	}

	if (!$core->error->flag() && !$rs->isEmpty())
	{
		$cat_id = (integer) $rs->cat_id;
		$cat_title = $rs->cat_title;
		$cat_url = $rs->cat_url;
		$cat_desc = $rs->cat_desc;
	}
	unset($rs);

	# Getting hierarchy information
	$parents = $core->blog->getCategoryParents($cat_id);
	$rs = $core->blog->getCategoryParent($cat_id);
	$cat_parent = $rs->isEmpty() ? 0 : (integer) $rs->cat_id;
	unset($rs);

	# Allowed parents list
	$children = $core->blog->getCategories(array('start'=>$cat_id));
	$allowed_parents = array(__('Top level')=>0);

	$p = array();
	while ($children->fetch()) {
		$p[$children->cat_id] = 1;
	}

	$rs = $core->blog->getCategories();
	while ($rs->fetch()) {
		if (!isset($p[$rs->cat_id])) {
			$allowed_parents[] = new formSelectOption(
				str_repeat('&nbsp;&nbsp;',$rs->level-1).($rs->level-1 == 0 ? '' : '&bull; ').html::escapeHTML($rs->cat_title),
				$rs->cat_id
			);
		}
	}
	unset($rs);

	# Allowed siblings list
	$siblings = array();
	$rs = $core->blog->getCategoryFirstChildren($cat_parent);
	while ($rs->fetch()) {
		if ($rs->cat_id != $cat_id) {
			$siblings[html::escapeHTML($rs->cat_title)] = $rs->cat_id;
		}
	}
	unset($rs);
}

# Changing parent
if ($cat_id && isset($_POST['cat_parent']))
{
	$new_parent = (integer) $_POST['cat_parent'];
	if ($cat_parent != $new_parent)
	{
		try {
			$core->blog->setCategoryParent($cat_id,$new_parent);
			dcPage::addSuccessNotice(__('The category has been successfully moved'));
			$core->adminurl->redirect("admin.categories");
		} catch (Exception $e) {
			$core->error->add($e->getMessage());
		}
	}
}

# Changing sibling
if ($cat_id && isset($_POST['cat_sibling']))
{
	try {
		$core->blog->setCategoryPosition($cat_id,(integer) $_POST['cat_sibling'],$_POST['cat_move']);
		dcPage::addSuccessNotice(__('The category has been successfully moved'));
		$core->adminurl->redirect("admin.categories");
	} catch (Exception $e) {
		$core->error->add($e->getMessage());
	}
}

# Create or update a category
if (isset($_POST['cat_title']))
{
	$cur = $core->con->openCursor($core->prefix.'category');

	$cur->cat_title = $cat_title = $_POST['cat_title'];

	if (isset($_POST['cat_desc'])) {
		$cur->cat_desc = $cat_desc = $_POST['cat_desc'];
	}

	if (isset($_POST['cat_url'])) {
		$cur->cat_url = $cat_url = $_POST['cat_url'];
	} else {
		$cur->cat_url = $cat_url;
	}

	try
	{
		# Update category
		if ($cat_id)
		{
			# --BEHAVIOR-- adminBeforeCategoryUpdate
			$core->callBehavior('adminBeforeCategoryUpdate',$cur,$cat_id);

			$core->blog->updCategory($_POST['id'],$cur);

			# --BEHAVIOR-- adminAfterCategoryUpdate
			$core->callBehavior('adminAfterCategoryUpdate',$cur,$cat_id);

			dcPage::addSuccessNotice(__('The category has been successfully updated.'));

			$core->adminurl->redirect("admin.category",array('id' => $_POST['id']));
		}
		# Create category
		else
		{
			# --BEHAVIOR-- adminBeforeCategoryCreate
			$core->callBehavior('adminBeforeCategoryCreate',$cur);

			$id = $core->blog->addCategory($cur,(integer) $_POST['new_cat_parent']);

			# --BEHAVIOR-- adminAfterCategoryCreate
			$core->callBehavior('adminAfterCategoryCreate',$cur,$id);

			dcPage::addSuccessNotice(sprintf(__('The category "%s" has been successfully created.'),
				html::escapeHTML($cur->cat_title)));
			$core->adminurl->redirect("admin.categories");
		}
	}
	catch (Exception $e)
	{
		$core->error->add($e->getMessage());
	}
}


$title = $cat_id ? html::escapeHTML($cat_title) : __('New category');

$elements = array(
	html::escapeHTML($core->blog->name) => '',
	__('Categories') => $core->adminurl->get("admin.categories")
	);
if ($cat_id) {
	while($parents->fetch()) {
		$elements[html::escapeHTML($parents->cat_title)] = $core->adminurl->get("admin.category",array('id'=> $parents->cat_id));
	}
}
$elements[$title] = '';

$category_editor = $core->auth->getOption('editor');
$rte_flag = true;
$rte_flags  = @$core->auth->user_prefs->interface->rte_flags;
if (is_array($rte_flags) && in_array('cat_descr',$rte_flags)) {
	$rte_flag = $rte_flags['cat_descr'];
}

dcPage::open($title,
	dcPage::jsConfirmClose('category-form').
	dcPage::jsLoad('js/_category.js').
	($rte_flag ? $core->callBehavior('adminPostEditor',$category_editor['xhtml'],'category',array('#cat_desc'),'xhtml') : ''),
	dcPage::breadcrumb($elements)
);

if (!empty($_GET['upd'])) {
	dcPage::success(__('Category has been successfully updated.'));
}

echo
'<form action="'.$core->adminurl->get("admin.category").'" method="post" id="category-form">'.
'<h3>'.__('Category information').'</h3>'.
'<p><label class="required" for="cat_title"><abbr title="'.__('Required field').'">*</abbr> '.__('Name:').'</label> '.
form::field('cat_title',40,255,html::escapeHTML($cat_title),'','',false,'required placeholder="'.__('Name').'"').
'</p>';
if (!$cat_id)
{
	$rs = $core->blog->getCategories();
	echo
	'<p><label for="new_cat_parent">'.__('Parent:').' '.
	'<select id="new_cat_parent" name="new_cat_parent" >'.
	'<option value="0">'.__('(none)').'</option>';
	while ($rs->fetch()) {
		echo '<option value="'.$rs->cat_id.'" '.(!empty($_POST['new_cat_parent']) && $_POST['new_cat_parent'] == $rs->cat_id ? 'selected="selected"' : '').'>'.
		str_repeat('&nbsp;&nbsp;',$rs->level-1).($rs->level-1 == 0 ? '' : '&bull; ').html::escapeHTML($rs->cat_title).'</option>';
	}
	echo
	'</select></label></p>';
	unset($rs);
}
echo
'<div class="lockable">'.
'<p><label for="cat_url">'.__('URL:').'</label> '
.form::field('cat_url',40,255,html::escapeHTML($cat_url)).
'</p>'.
'<p class="form-note warn" id="note-cat-url">'.
__('Warning: If you set the URL manually, it may conflict with another category.').'</p>'.
'</div>'.

'<p class="area"><label for="cat_desc">'.__('Description:').'</label> '.
form::textarea('cat_desc',50,8,html::escapeHTML($cat_desc)).
'</p>'.

'<p><input type="submit" accesskey="s" value="'.__('Save').'" />'.
($cat_id ? form::hidden('id',$cat_id) : '').
$core->formNonce().
'</p>'.
'</form>';

if ($cat_id)
{
	echo
	'<h3 class="border-top">'.__('Move this category').'</h3>'.
	'<div class="two-cols">'.
	'<div class="col">'.

	'<form action="'.$core->adminurl->get("admin.category").'" method="post" class="fieldset">'.
	'<h4>'.__('Category parent').'</h4>'.
	'<p><label for="cat_parent" class="classic">'.__('Parent:').'</label> '.
	form::combo('cat_parent',$allowed_parents,$cat_parent).'</p>'.
	'<p><input type="submit" accesskey="s" value="'.__('Save').'" />'.
	form::hidden(array('id'),$cat_id).$core->formNonce().'</p>'.
	'</form>'.
	'</div>';

	if (count($siblings) > 0) {
		echo
		'<div class="col">'.
		'<form action="'.$core->adminurl->get("admin.category").'" method="post" class="fieldset">'.
		'<h4>'.__('Category sibling').'</h4>'.
		'<p><label class="classic" for="cat_sibling">'.__('Move current category').'</label> '.
		form::combo('cat_move',array(__('before')=>'before',__('after')=>'after'),'','','',false,'title="'.__('position: ').'"').' '.
		form::combo('cat_sibling',$siblings).'</p>'.
		'<p><input type="submit" accesskey="s" value="'.__('Save').'" />'.
		form::hidden(array('id'),$cat_id).$core->formNonce().'</p>'.
		'</form>'.
		'</div>';
	}

	echo '</div>';
}

dcPage::helpBlock('core_category');
dcPage::close();
