<?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.

 */

function page_Admin_UserRanks()

{

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

	global $lang;

	if ( $session->auth_level < USER_LEVEL_ADMIN || $session->user_level < USER_LEVEL_ADMIN )

	{

		$login_link = makeUrlNS('Special', 'Login/' . $paths->nslist['Special'] . 'Administration', 'level=' . USER_LEVEL_ADMIN, true);

		echo '<h3>' . $lang->get('adm_err_not_auth_title') . '</h3>';

		echo '<p>' . $lang->get('adm_err_not_auth_body', array( 'login_link' => $login_link )) . '</p>';

		return;

	}

	// This should be a constant somewhere

	$protected_ranks = array(

			RANK_ID_MEMBER,

			RANK_ID_MOD,

			RANK_ID_ADMIN,

			RANK_ID_GUEST

		);

	if ( $paths->getParam(0) == 'action.json' )

	{

		// ajax call, try to decode json request

		header('Content-type: application/json');

		if ( !isset($_POST['r']) )

		{

			echo enano_json_encode(array(

					'mode' => 'error',

					'error' => 'Missing JSON request payload'

				));

			return true;

		}

		try

		{

			$request = enano_json_decode($_POST['r']);

		}

		catch ( Exception $e )

		{

			echo enano_json_encode(array(

					'mode' => 'error',

					'error' => 'Invalid JSON request payload'

				));

			return true;

		}

		if ( !isset($request['mode']) )

		{

			echo enano_json_encode(array(

					'mode' => 'error',

					'error' => 'JSON request payload does not contain required parameter "mode"'

				));

			return true;

		}

		// we've got it

		switch ( $request['mode'] )

		{

			case 'get_rank':

				// easy enough, get a rank from the DB

				$rank_id = intval(@$request['rank_id']);

				if ( empty($rank_id) )

				{

					echo enano_json_encode(array(

							'mode' => 'error',

							'error' => 'Missing rank ID'

						));

					return true;

				}

				// query and fetch

				$q = $db->sql_query('SELECT rank_id, rank_title, rank_style FROM ' . table_prefix . "ranks WHERE rank_id = $rank_id;");

				if ( !$q || $db->numrows() < 1 )

					$db->die_json();

				$row = $db->fetchrow();

				$db->free_result();

				// why does mysql do this?

				$row['rank_id'] = intval($row['rank_id']);

				echo enano_json_encode($row);

				break;

			case 'save_rank':

				// easy enough, get a rank from the DB

				$rank_id = intval(@$request['rank_id']);

				// note - an empty rank_style field is permitted

				if ( empty($rank_id) )

				{

					echo enano_json_encode(array(

							'mode' => 'error',

							'error' => 'Missing rank ID'

						));

					return true;

				}

				if ( empty($request['rank_title']) )

				{

					echo enano_json_encode(array(

							'mode' => 'error',

							'error' => $lang->get('acpur_err_missing_rank_title')

						));

					return true;

				}

				// perform update

				$rank_title = $db->escape($request['rank_title']);

				$rank_style = $db->escape(@$request['rank_style']);

				$q = $db->sql_query('UPDATE ' . table_prefix . "ranks SET rank_title = '$rank_title', rank_style = '$rank_style' WHERE rank_id = $rank_id;");

				// regenerate the ranks cache

				generate_cache_userranks();

				echo enano_json_encode(array(

						'mode' => 'success'

					));

				break;

			case 'create_rank':

				if ( empty($request['rank_title']) )

				{

					echo enano_json_encode(array(

							'mode' => 'error',

							'error' => $lang->get('acpur_err_missing_rank_title')

						));

					return true;

				}

				$rank_title = $db->escape($request['rank_title']);

				$rank_style = $db->escape(@$request['rank_style']);

				// perform insert

				$q = $db->sql_query('INSERT INTO ' . table_prefix . "ranks ( rank_title, rank_style ) VALUES\n"

													. "  ( '$rank_title', '$rank_style' );");

				if ( !$q )

					$db->die_json();

				$rank_id = $db->insert_id();

				if ( !$rank_id )

				{

					echo enano_json_encode(array(

							'mode' => 'error',

							'error' => 'Refetch of rank ID failed'

						));

					return true;

				}

				// regenerate the ranks cache

				generate_cache_userranks();

				echo enano_json_encode(array(

						'mode' => 'success',

						'rank_id' => $rank_id

					));

				break;

			case 'delete_rank':

				// nuke a rank

				$rank_id = intval(@$request['rank_id']);

				if ( empty($rank_id) )

				{

					echo enano_json_encode(array(

							'mode' => 'error',

							'error' => 'Missing rank ID'

						));

					return true;

				}

				// is this rank protected (e.g. a system rank)?

				if ( in_array($rank_id, $protected_ranks) )

				{

					echo enano_json_encode(array(

							'mode' => 'error',

							'error' => $lang->get('acpur_err_cant_delete_system_rank')

						));

					return true;

				}

				// unset any user and groups that might be using it

				$q = $db->sql_query('UPDATE ' . table_prefix . "users SET user_rank = NULL WHERE user_rank = $rank_id;");

				if ( !$q )

					$db->die_json();

				$q = $db->sql_query('UPDATE ' . table_prefix . "groups SET group_rank = NULL WHERE group_rank = $rank_id;");

				if ( !$q )

					$db->die_json();

				// now remove the rank itself

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

				if ( !$q )

					$db->_die();

				// regenerate the ranks cache

				generate_cache_userranks();

				echo enano_json_encode(array(

						'mode' => 'success'

					));

				break;

			default:

				echo enano_json_encode(array(

					'mode' => 'error',

					'error' => 'Unknown requested operation'

				));

			return true;

		}

		return true;

	}

	// draw initial interface

	// yes, four paragraphs of introduction. Suck it up.

	echo '<h3>' . $lang->get('acpur_heading_main') . '</h3>';

	echo '<p>' . $lang->get('acpur_intro_para1') . '</p>';

	echo '<p>' . $lang->get('acpur_intro_para2') . '</p>';

	echo '<p>' . $lang->get('acpur_intro_para3') . '</p>';

	echo '<p>' . $lang->get('acpur_intro_para4') . '</p>';

	// fetch ranks

	$q = $db->sql_query('SELECT rank_id, rank_title, rank_style FROM ' . table_prefix . "ranks ORDER BY rank_title ASC;");

	if ( !$q )

		$db->_die();

	echo '<div class="rankadmin-left" id="admin_ranks_container_left">';

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

	{

		// format rank according to what its users look like

		// rank titles can be stored as language strings, so have the language manager fetch this

		// normally it refetches (which takes time) if a string isn't found, but it won't try to fetch

		// a string that isn't in the category_stringid format

		$rank_title = $lang->get($row['rank_title']);

		// FIXME: make sure htmlspecialchars() is escaping quotes and backslashes

		echo '<a href="#rank_edit:' . $row['rank_id'] . '" onclick="ajaxInitRankEdit(' . $row['rank_id'] . '); return false;" class="rankadmin-editlink" style="' . htmlspecialchars($row['rank_style']) . '" id="rankadmin_editlink_' . $row['rank_id'] . '">' . htmlspecialchars($rank_title) . '</a> ';

	}

	echo '<a href="#rank_create" onclick="ajaxInitRankCreate(); return false;" class="rankadmin-editlink rankadmin-createlink" id="rankadmin_createlink">' . $lang->get('acpur_btn_create_init') . '</a> ';

	echo '</div>';

	echo '<div class="rankadmin-right" id="admin_ranks_container_right">';

	echo $lang->get('acpur_msg_select_rank');

	echo '</div>';

	echo '<span class="menuclear"></span>';

}

?>