- Enhancement (Trac#189) first version of a (simple) End-Users portal.

- Fix for the appUserPreferences class

git-svn-id: http://svn.code.sf.net/p/itop/code/trunk@807 a333f486-631f-4898-b8df-5754b55c2be0

portal/index.php

@@ -0,0 +1,837 @@
+<?php
+// Copyright (C) 2010 Combodo SARL
+//
+//   This program is free software; you can redistribute it and/or modify
+//   it under the terms of the GNU General Public License as published by
+//   the Free Software Foundation; version 3 of the License.
+//
+//   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 more details.
+//
+//   You should have received a copy of the GNU General Public License
+//   along with this program; if not, write to the Free Software
+//   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+/**
+ * iTop User Portal main page
+ *
+ * @author      Erwan Taloc <erwan.taloc@combodo.com>
+ * @author      Romain Quetiez <romain.quetiez@combodo.com>
+ * @author      Denis Flaven <denis.flaven@combodo.com>
+ * @license     http://www.opensource.org/licenses/gpl-3.0.html LGPL
+ */
+require_once('../application/application.inc.php');
+require_once('../application/nicewebpage.class.inc.php');
+require_once('../application/wizardhelper.class.inc.php');
+
+/**
+ * Get the list of parameters (i.e. attribute codes) to be handled while creating a new UserRequest object
+ * @return Array The list of attribute codes
+ */
+function GetParamsList()
+{
+	return array('org_id', 'caller_id', 'service_id', 'servicesubcategory_id', 'request_type', 'title', 'description', 'impact', 'urgency', 'workgroup_id');
+}
+
+/**
+ * Outputs a list of parameters as hidden field into the current page
+ * (must be called when inside a form)
+ * @param WebPage $oP The current web page
+ * @param Array $aInteractive The list of parameters that are handled intractively and thus should not be output as hidden fields
+ * @param Hash $aParameters Array name => value for the parameters
+ * @return void
+ */
+function DumpHiddenParams($oP, $aInteractive, $aParameters)
+{
+	foreach($aParameters as $sAttCode => $value)
+	{
+		if (!in_array($sAttCode, $aInteractive))
+		{
+			$oP->Add("<input type=\"hidden\" name=\"attr_$sAttCode\" value=\"$value\">");
+		}
+	}
+}
+
+/**
+ * Read all the parameters of the page for building a UserRequest
+ * Parameters that were absent from the page's parameters are not set in the resulting hash array
+ * @input string $sMethod Either get or post
+ * @return Hash Array of name => value corresponding to the parameters that were passed to the page
+ */
+function ReadAllParams($sMethod = 'get')
+{
+	$aParams = GetParamsList();
+	$aValues = array();
+	foreach($aParams as $sName)
+	{
+		$value = utils::ReadParam('attr_'.$sName, null, $sMethod);
+		if (!is_null($value))
+		{
+			$aValues[$sName] = $value;
+		}
+	}
+	return $aValues;
+}
+
+/**
+ * Displays the portal main menu
+ * @param WebPage $oP The current web page
+ * @return void
+ */
+function DisplayMainMenu(WebPage $oP)
+{
+	$oP->AddMenuButton('refresh', 'Portal:Refresh', './index.php?operation=welcome');
+	$oP->AddMenuButton('create', 'Portal:CreateNewRequest', './index.php?operation=create_request');
+	$oP->AddMenuButton('change_pwd', 'Portal:ChangeMyPassword', './index.php?loginop=change_pwd');
+
+	$oP->add("<div id=\"#div_resolved_requests\">\n");
+	$oP->add("<h1 id=\"#open_requests\">".Dict::S('Portal:OpenRequests')."</h1>\n");
+	ListOpenRequests($oP);
+	$oP->add("</div>\n");
+	$oP->add("<div id=\"#div_resolved_requests\">\n");
+	$oP->add("<h1 id=\"#resolved_requests\">".Dict::S('Portal:ResolvedRequests')."</h1>\n");
+	ListResolvedRequests($oP);
+	$oP->add("</div>\n");
+}
+
+/**
+ * Displays the form to select a Service Id (among the valid ones for the specified user Organization)
+ * @param WebPage $oP Web page for the form output
+ * @param Organization $oUserOrg The organization of the current user
+ * @return void
+ */
+function SelectService($oP, $oUserOrg)
+{
+	// Init forms parameters
+	$aParameters = ReadAllParams();
+	
+	$oSearch = DBObjectSearch::FromOQL('SELECT Service AS s JOIN SLA AS sla ON sla.service_id=s.id JOIN lnkContractToSLA AS ln ON ln.sla_id=sla.id JOIN CustomerContract AS cc ON ln.contract_id=cc.id WHERE cc.org_id = :org_id');
+	$oSet = new CMDBObjectSet($oSearch, array(), array('org_id' => $oUserOrg->GetKey()));
+	$oP->add("<div class=\"wizContainer\" id=\"form_select_service\">\n");
+	$oP->add("<h1 id=\"select_subcategory\">".Dict::S('Portal:SelectService')."</h1>\n");
+	$oP->add("<form id=\"request_form\" method=\"get\">\n");
+	$oP->add("<table>\n");
+	while($oService = $oSet->Fetch())
+	{
+		$id = $oService->GetKey();
+		$sChecked = "";
+		if ($id == $aParameters['service_id'])
+		{
+			$sChecked = "checked";
+		}
+		$oP->p("<tr><td style=\"vertical-align:top\"><p><input name=\"attr_service_id\" $sChecked type=\"radio\" id=\"svc_$id\" value=\"$id\"></p></td><td style=\"vertical-align:top\"><p><b><label for=\"svc_$id\">".htmlentities($oService->GetName())."</label></b></p>");
+		$oP->p("<p>".htmlentities($oService->Get('description'))."</p></td></tr>");	DumpHiddenParams($oP, array('service_id'), $aParameters);
+		
+	}
+	$oP->add("</table>\n");	
+	DumpHiddenParams($oP, array('service_id'), $aParameters);
+	$oP->add("<input type=\"hidden\" name=\"step\" value=\"1\">");
+	$oP->add("<input type=\"hidden\" name=\"operation\" value=\"create_request\">");
+	$oP->p("<input type=\"submit\" value=\"".Dict::S('UI:Button:Next')."\">");
+	$oP->add("</form>");
+	$oP->add("</div class=\"wizContainer\">\n");
+	$sMessage = Dict::S('Portal:PleaseSelectOneService');
+	$oP->add_ready_script(
+<<<EOF
+	$('#request_form').submit(function() {
+		return CheckSelection('$sMessage');
+	});
+EOF
+);
+}
+
+/**
+ * Displays the form to select a Service Subcategory Id (among the valid ones for the specified user Organization)
+ * and based on the page's parameter 'service_id'
+ * @param WebPage $oP Web page for the form output
+ * @param Organization $oUserOrg The organization of the current user
+ * @return void
+ */
+
+function SelectSubService($oP, $oUserOrg)
+{
+	// Init forms parameters
+	$aParameters = ReadAllParams();
+	$iSvcId = $aParameters['service_id'];
+	$iDefaultSubSvcId = isset($aParameters['servicesubcategory_id']) ? $aParameters['servicesubcategory_id'] : 0;
+
+	$oSearch = DBObjectSearch::FromOQL('SELECT ServiceSubcategory AS ss WHERE ss.service_id = :svc_id');
+	$oSet = new CMDBObjectSet($oSearch, array(), array('svc_id' => $iSvcId));
+	$oService = MetaModel::GetObject('Service', $iSvcId, false);
+	if (is_object($oService))
+	{
+		$oP->add("<div class=\"wizContainer\" id=\"form_select_servicesubcategory\">\n");
+		$oP->add("<h1 id=\"select_subcategory\">".Dict::Format('Portal:SelectSubcategoryFrom_Service', htmlentities($oService->GetName()))."</h1>\n");
+		$oP->add("<form id=\"request_form\" method=\"get\">\n");
+		$oP->add("<table>\n");
+		while($oSubService = $oSet->Fetch())
+		{
+			$id = $oSubService->GetKey();
+			$sChecked = "";
+			if ($id == $iDefaultSubSvcId)
+			{
+				$sChecked = "checked";
+			}
+			$oP->p("<tr><td style=\"vertical-align:top\"><p><input name=\"attr_servicesubcategory_id\" $sChecked type=\"radio\" id=\"subsvc_$id\" value=\"$id\"></p></td><td style=\"vertical-align:top\"><p><b><label for=\"subsvc_$id\">".htmlentities($oSubService->GetName())."</label></b></p>");
+			$oP->p("<p>".htmlentities($oSubService->Get('description'))."</p></td></tr>");
+		}
+		$sMessage = Dict::S('Portal:PleaseSelectAServiceSubCategory');
+		$oP->add_ready_script(
+<<<EOF
+	$('#request_form').submit(function() {
+		return CheckSelection('$sMessage');
+	});
+EOF
+);
+		$oP->add("</table>\n");	
+		DumpHiddenParams($oP, array('servicesubcategory_id'), $aParameters);
+		$oP->add("<input type=\"hidden\" name=\"step\" value=\"2\">");
+		$oP->add("<input type=\"hidden\" name=\"operation\" value=\"create_request\">");
+		$oP->p("<input type=\"submit\" value=\"".Dict::S('UI:Button:Back')."\"  onClick=\"GoBack();\">&nbsp;<input type=\"submit\" value=\"".Dict::S('UI:Button:Next')."\">");
+		$oP->add("</form>");
+		$oP->add("</div>\n");
+	}
+	else
+	{
+		$oP->p("Error: Invalid Service: id = $iSvcId");
+	}
+}
+/**
+ * Displays the form for the final step of the UserRequest creation
+ * @param WebPage $oP The current web page for the form output
+ * @param Organization $oUserOrg The organization of the current user
+ * @return void
+ */
+function RequestCreationForm($oP, $oUserOrg)
+{
+	$aList = array('request_type', 'title', 'description', 'impact', 'urgency', 'workgroup_id');
+	$aParameters = ReadAllParams();
+
+	$oService = MetaModel::GetObject('Service', $aParameters['service_id'], false);
+	$oSubService = MetaModel::GetObject('ServiceSubcategory', $aParameters['servicesubcategory_id'], false);
+	if (is_object($oService) && is_object($oSubService))
+	{
+		$oRequest = new UserRequest();
+		$oRequest->Set('org_id', $oUserOrg->GetKey());
+		$oRequest->Set('caller_id', UserRights::GetContactId());
+		$oRequest->Set('service_id', $aParameters['service_id']);
+		$oRequest->Set('servicesubcategory_id', $aParameters['servicesubcategory_id']);
+		
+		$oAttDef = MetaModel::GetAttributeDef('UserRequest', 'service_id');
+		$aDetails[] = array('label' => $oAttDef->GetLabel(), 'value' => htmlentities($oService->GetName()));
+		$oAttDef = MetaModel::GetAttributeDef('UserRequest', 'servicesubcategory_id');
+		$aDetails[] = array('label' => $oAttDef->GetLabel(), 'value' => htmlentities($oSubService->GetName()));
+		$iFlags = 0;
+		foreach($aList as $sAttCode)
+		{
+			$value = '';
+			if (isset($aParameters[$sAttCode]))
+			{
+				$value = $aParameters[$sAttCode];
+				$oRequest->Set($sAttCode, $value);
+			}
+		}
+		foreach($aList as $sAttCode)
+		{
+			$value = '';
+			$oAttDef = MetaModel::GetAttributeDef(get_class($oRequest), $sAttCode);
+			$iFlags = $oRequest->GetAttributeFlags($sAttCode);
+			if (isset($aParameters[$sAttCode]))
+			{
+				$value = $aParameters[$sAttCode];
+			}
+			$aArgs = array('this' => $oRequest);
+				
+			$sValue = $oRequest->GetFormElementForField($oP, get_class($oRequest), $sAttCode, $oAttDef, $value, '', 'attr_'.$sAttCode, '', $iFlags, $aArgs);
+			$aDetails[] = array('label' => $oAttDef->GetLabel(), 'value' => $sValue);
+		}
+		$oP->add("<div class=\"wizContainer\" id=\"form_request_description\">\n");
+		$oP->add("<h1 id=\"title_request_form\">".Dict::S('Portal:DescriptionOfTheRequest')."</h1>\n");
+		$oP->add("<form id=\"request_form\" method=\"post\">\n");
+		$oP->add("<table>\n");
+		$oP->details($aDetails);		
+		DumpHiddenParams($oP, $aList, $aParameters);
+		$oP->add("<input type=\"hidden\" name=\"step\" value=\"3\">");
+		$oP->add("<input type=\"hidden\" name=\"operation\" value=\"create_request\">");
+		$oP->add("<input type=\"hidden\" name=\"transaction_id\" value=\"".utils::GetNewTransactionId()."\">\n");
+		$oP->p("<input type=\"submit\" value=\"".Dict::S('UI:Button:Back')."\" onClick=\"GoBack();\">&nbsp;<input type=\"submit\" value=\"".Dict::S('UI:Button:Finish')."\">");
+		$oP->add("</form>");
+		$oP->add("</div>\n");
+		$oP->add_ready_script(
+<<<EOF
+		// Starts the validation when the page is ready
+		CheckFields('request_form', false);
+		$('#request_form').submit( function() {
+			return CheckFields('request_form', true);
+		});
+EOF
+);
+	}
+	else
+	{
+		echo "<pre>\n";
+		print_r($aParameters);
+		echo "</pre>\n";
+	}
+}
+
+/**
+ * Validate the parameters and create the UserRequest object (based on the page's POSTed parameters)
+ * @param WebPage $oP The current web page for the  output
+ * @param Organization $oUserOrg The organization of the current user
+ * @return void
+ */
+function DoCreateRequest($oP, $oUserOrg)
+{
+	$aParameters = ReadAllParams();
+	$sTransactionId = utils::ReadPostedParam('transaction_id', '');
+	if (!utils::IsTransactionValid($sTransactionId))
+	{
+		$oP->add("<h1>".Dict::S('UI:Error:ObjectAlreadyCreated')."</h1>\n");
+		DisplayMainMenu($oP);
+		return;
+	}
+		
+	// Validate the parameters
+	// 1) Service
+	$oSearch = DBObjectSearch::FromOQL('SELECT Service AS s JOIN SLA AS sla ON sla.service_id=s.id JOIN lnkContractToSLA AS ln ON ln.sla_id=sla.id JOIN CustomerContract AS cc ON ln.contract_id=cc.id WHERE cc.org_id = :org_id AND s.id = :svc_id');
+	$oSet = new CMDBObjectSet($oSearch, array(), array('org_id' => $oUserOrg->GetKey(), 'svc_id' => $aParameters['service_id']));
+	if ($oSet->Count() != 1)
+	{
+		// Invalid service for the current user !
+		throw new Exception("Invalid Service: id={$aParameters['servicesubcategory_id']} for the current user (org_id=".$oUserOrg->GetKey().").");
+	}
+	$oService = $oSet->Fetch();
+	// 2) Service Subcategory
+	$oSearch = DBObjectSearch::FromOQL('SELECT ServiceSubcategory AS sc WHERE sc.id = :subcategory_id AND sc.service_id = :svc_id');
+	$oSet = new CMDBObjectSet($oSearch, array(), array('svc_id' => $aParameters['service_id'], 'subcategory_id' =>$aParameters['servicesubcategory_id'] ));
+	if ($oSet->Count() != 1)
+	{
+		// Invalid subcategory
+		throw new Exception("Invalid ServiceSubcategory: id={$aParameters['servicesubcategory_id']} for service ".$oService->GetName()."({$aParameters['service_id']})");
+	}
+		
+	$oRequest = new UserRequest();
+	$oRequest->Set('org_id', $oUserOrg->GetKey());
+	$oRequest->Set('caller_id', UserRights::GetContactId());
+	$aList = array('service_id', 'servicesubcategory_id', 'request_type', 'title', 'description', 'impact', 'urgency', 'workgroup_id');
+	foreach($aList as $sAttCode)
+	{
+		$oRequest->Set($sAttCode, $aParameters[$sAttCode]);	
+	}
+	
+	list($bRes, $aIssues) = $oRequest->CheckToWrite();
+	if ($bRes)
+	{
+		$oMyChange = MetaModel::NewObject("CMDBChange");
+		$oMyChange->Set("date", time());
+		if (UserRights::IsImpersonated())
+		{
+			$sUserString = Dict::Format('UI:Archive_User_OnBehalfOf_User', UserRights::GetRealUser(), UserRights::GetUser());
+		}
+		else
+		{
+			$sUserString = UserRights::GetUser();
+		}
+		$oMyChange->Set("userinfo", $sUserString);
+		$iChangeId = $oMyChange->DBInsert();
+		$oRequest->DBInsertTracked($oMyChange);
+		$oP->add("<h1>".Dict::Format('UI:Title:Object_Of_Class_Created', $oRequest->GetName(), MetaModel::GetName(get_class($oRequest)))."</h1>\n");
+		DisplayMainMenu($oP);
+	}
+	else
+	{
+		RequestCreationForm($oP, $oUserOrg);
+		$sIssueDesc = Dict::Format('UI:ObjectCouldNotBeWritten', implode(', ', $aIssues));
+		$oP->add_ready_script("alert('".addslashes($sIssueDesc)."');");
+	}	
+}
+
+/**
+ * Prompts the user for creating a new request
+ * @param WebPage $oP The current web page
+ * @return void
+ */
+function CreateRequest(WebPage $oP, Organization $oUserOrg)
+{
+	$iStep = utils::ReadParam('step', 0);
+	
+	switch($iStep)
+	{
+		case 0:
+		default:
+		$oP->AddMenuButton('cancel', 'UI:Button:Cancel', './index.php?operation=welcome');
+		SelectService($oP, $oUserOrg);
+		break;
+		
+		case 1:
+		$oP->AddMenuButton('cancel', 'UI:Button:Cancel', './index.php?operation=welcome');
+		SelectSubService($oP, $oUserOrg);
+		break;
+		
+		case 2:
+		$oP->AddMenuButton('cancel', 'UI:Button:Cancel', './index.php?operation=welcome');
+		RequestCreationForm($oP, $oUserOrg);
+		break;
+
+		case 3:
+		DoCreateRequest($oP, $oUserOrg);
+		break;
+	}
+}
+
+/**
+ * Displays the value of the given field, in HTML, without any hyperlink to other objects
+ * @param DBObject $oObj The object to use
+ * @param string $sAttCode Code of the attribute to display
+ * @return string HTML text representing the value of this field
+ */
+function GetFieldAsHtml($oObj, $sAttCode)
+{
+	$sValue = '';
+	$oAttDef = MetaModel::GetAttributeDef(get_class($oObj), $sAttCode);
+	if ($oAttDef->IsExternalKey())
+	{
+		// Special processing for external keys: don't display any hyperlink
+		$oTargetObj = MetaModel::GetObject($oAttDef->GetTargetClass(), $oObj->Get($sAttCode), false);
+		if (is_object($oTargetObj))
+		{
+			$sValue = $oTargetObj->GetName();						
+		}
+		else
+		{
+			$sValue = Dict::S('UI:UndefinedObject');
+		}
+	}
+	else
+	{
+		$sValue = $oObj->GetAsHTML($sAttCode);
+	}
+	return $sValue;	
+}
+
+/**
+ * Displays a list of objects, without any hyperlink (except for the object's details)
+ * @param WebPage $oP The web page for the output
+ * @param DBObjectSet $oSet The set of objects to display
+ * @param Array $aZList The ZList (list of field codes) to use for the tabular display
+ * @return string The HTML text representing the list
+ */
+ function DisplaySet($oP, $oSet, $aZList)
+ {
+	if ($oSet->Count() > 0)
+	{
+		$aAttribs = array();
+		$aValues = array();
+		$oAttDef = MetaModel::GetAttributeDef('UserRequest', 'ref');
+		$aAttribs['key'] = array('label' => $oAttDef->GetLabel(), 'description' => $oAttDef->GetDescription());
+		foreach($aZList as $sAttCode)
+		{
+			$oAttDef = MetaModel::GetAttributeDef('UserRequest', $sAttCode);
+			$aAttribs[$sAttCode] = array('label' => $oAttDef->GetLabel(), 'description' => $oAttDef->GetDescription());
+		}
+		while($oRequest = $oSet->Fetch())
+		{
+			$aRow = array();
+			
+			$aRow['key'] = '<a href="./index.php?operation=details&id='.$oRequest->GetKey().'">'.$oRequest->Get('ref').'</a>';
+			$sHilightClass = $oRequest->GetHilightClass();
+			if ($sHilightClass != '')
+			{
+				$aRow['@class'] = $sHilightClass;	
+			}
+			foreach($aZList as $sAttCode)
+			{
+				$aRow[$sAttCode] = GetFieldAsHtml($oRequest, $sAttCode);
+			}
+			$aValues[$oRequest->GetKey()] = $aRow;
+		}
+		$oP->Table($aAttribs, $aValues);
+	}
+	else
+	{
+		$oP->add(Dict::S('Portal:NoOpenRequest'));
+	}
+}
+
+/**
+ * Lists all the currently opened User Requests for the current user
+ * @param WebPage $oP The current web page
+ * @return void
+ */
+function ListOpenRequests(WebPage $oP)
+{
+	$iContactId = UserRights::GetContactId();
+	$oContact = MetaModel::GetObject('Contact', $iContactId, false); // false => Can fail
+	if (is_object($oContact))
+	{
+		$sOQL = 'SELECT UserRequest WHERE caller_id = :contact_id AND status NOT IN ("resolved", "closed")';
+		$oSearch = DBObjectSearch::FromOQL($sOQL);
+		$oSet = new CMDBObjectSet($oSearch, array(), array('contact_id' => $iContactId));
+		$aZList =  array('title', 'start_date', 'status', 'service_id', 'priority', 'workgroup_id', 'agent_id');
+		DisplaySet($oP, $oSet, $aZList);
+	}	
+}
+
+/**
+ * Lists all the currently Resolved (not "Closed")User Requests for the current user
+ * @param WebPage $oP The current web page
+ * @return void
+ */
+function ListResolvedRequests(WebPage $oP)
+{
+	$iContactId = UserRights::GetContactId();
+	$oContact = MetaModel::GetObject('Contact', $iContactId, false); // false => Can fail
+	if (is_object($oContact))
+	{
+		$sOQL = 'SELECT UserRequest WHERE caller_id = :contact_id AND status ="resolved"';
+		$oSearch = DBObjectSearch::FromOQL($sOQL);
+		$oSet = new CMDBObjectSet($oSearch, array(), array('contact_id' => $iContactId));
+		$aZList =  array('title', 'start_date', 'status', 'service_id', 'priority', 'workgroup_id', 'agent_id');
+		DisplaySet($oP, $oSet, $aZList);
+	}	
+}
+/**
+ * Displays the details of the specified UserRequest object
+ * @param WebPage $oP The current web page for the output
+ * @param UserRequest $oRequest The object to display
+ * @return void
+ */
+function DisplayRequestDetails($oP, UserRequest $oRequest)
+{
+	$aList = array('ref', 'status', 'title', 'description', 'request_type','ticket_log', 'start_date', 'tto_escalation_deadline', 'ttr_escalation_deadline', 'caller_id', 'service_id', 'servicesubcategory_id', 'product', 'impact', 'urgency', 'priority', 'workgroup_id', 'agent_id', 'related_problem_id', 'related_change_id', 'close_date', 'last_update', 'assignment_date', 'closure_deadline', 'resolution_code', 'solution', 'user_satisfaction', 'user_commment', 'freeze_reason');
+	$aDetails = array();
+	foreach($aList as $sAttCode)
+	{
+		$iFlags = $oRequest->GetAttributeFlags($sAttCode);
+		$oAttDef = MetaModel::GetAttributeDef(get_class($oRequest), $sAttCode);
+		if ( (!$oAttDef->IsLinkSet()) && (($iFlags & OPT_ATT_HIDDEN) == 0) )
+		{
+			// Don't display linked set and non-visible attributes (in this state)
+			$sDisplayValue = GetFieldAsHtml($oRequest, $sAttCode);
+			$aDetails[] = array('label' => '<span title="'.MetaModel::GetDescription('UserRequest', $sAttCode).'">'.MetaModel::GetLabel('UserRequest', $sAttCode).'</span>', 'value' => $sDisplayValue);
+		}
+	}
+	$oP->add('<div id="request_details">');
+	$oP->details($aDetails);
+	$oP->add('</div>');
+}
+
+/**
+ * Displays a form for the user to provide feedback about a 'resolved' UserRequest and then close the request
+ * @param WebPage $oP The current web page
+ * @param UserRequest $oRequest The object to display
+ * @return void
+ */
+function DisplayResolvedRequestForm($oP, UserRequest $oRequest)
+{
+	$oP->add("<div class=\"wizContainer\" id=\"form_close_request\">\n");
+	$oP->add("<form id=\"request_form\" method=\"post\">\n");
+	$oP->add('<table id="close_form_table"><tr><td style="vertical-align:top;">');
+	$oP->add("<h1 id=\"title_request_details\">".Dict::Format('Portal:TitleRequestDetailsFor_Request', $oRequest->GetName())."</h1>\n");
+	DisplayRequestDetails($oP, $oRequest);
+	$oP->add('</td><td style="vertical-align:top;">');
+	$aArgs = array('this' => $oRequest);
+	$sClass = get_class($oRequest);
+
+	$aDetails = array();
+	$aTargetStates = MetaModel::EnumStates($sClass);
+	$aTargetState = $aTargetStates['closed'];
+	$aExpectedAttributes = $aTargetState['attribute_list'];
+	$iFieldIndex = 0;
+	
+	foreach($aExpectedAttributes as $sAttCode => $iExpectCode)
+	{
+		// Prompt for an attribute if
+		// - the attribute must be changed or must be displayed to the user for confirmation
+		// - or the field is mandatory and currently empty
+		if ( ($iExpectCode & (OPT_ATT_MUSTCHANGE | OPT_ATT_MUSTPROMPT)) ||
+			 (($iExpectCode & OPT_ATT_MANDATORY) && ($oRequest->Get($sAttCode) == '')) ) 
+		{
+			$aAttributesDef = MetaModel::ListAttributeDefs($sClass);
+			$oAttDef = $aAttributesDef[$sAttCode];
+			$aArgs = array('this' => $oRequest);
+			$sHTMLValue = cmdbAbstractObject::GetFormElementForField($oP, $sClass, $sAttCode, $oAttDef, $oRequest->Get($sAttCode), $oRequest->GetEditValue($sAttCode), 'att_'.$iFieldIndex, '', $iExpectCode, $aArgs);
+			$aDetails[] = array('label' => $oAttDef->GetLabel(), 'value' => "<span id=\"field_att_$iFieldIndex\">$sHTMLValue</span>");
+			$aFieldsMap[$sAttCode] = 'att_'.$iFieldIndex;
+			$iFieldIndex++;
+		}
+	}
+	$aStimuli = MetaModel::EnumStimuli($sClass);
+	$oP->add("<h1>".Dict::S('Portal:EnterYourCommentsOnTicket')."</h1>");
+	$oP->details($aDetails);
+	$oP->add("<input type=\"hidden\" name=\"step\" value=\"2\">");
+	$oP->add("<input type=\"hidden\" name=\"transaction_id\" value=\"".utils::GetNewTransactionId()."\">\n");
+	$oP->add("<input type=\"hidden\" name=\"operation\" value=\"request_details\">");
+	$oP->p("<input type=\"submit\" value=\"".Dict::S('Portal:Button:CloseTicket')."\">");
+	$oP->add('</td></tr></table>');
+	$oP->add("</form>");
+	$oP->add("</div>\n");
+	$oP->add_ready_script(
+<<<EOF
+		// Starts the validation when the page is ready
+		CheckFields('request_form', false);
+		$('#request_form').submit( function() {
+			return CheckFields('request_form', true);
+		});
+EOF
+);
+}
+
+/**
+ * Actually close the request and saves the user's feedback
+ * @param WebPage $oP The current web page
+ * @param UserRequest $oRequest The object to close
+ * @return void
+ */
+function DoCloseRequest($oP, UserRequest $oRequest)
+{
+	$sTransactionId = utils::ReadPostedParam('transaction_id', '');
+	if (!utils::IsTransactionValid($sTransactionId))
+	{
+		$oP->add("<h1>".Dict::S('UI:Error:ObjectAlreadyCreated')."</h1>\n");
+		DisplayMainMenu($oP);
+		return;
+	}
+	
+	$sClass = get_class($oRequest);
+	$aDetails = array();
+	$aTargetStates = MetaModel::EnumStates($sClass);
+	$aTargetState = $aTargetStates['closed'];
+	$aExpectedAttributes = $aTargetState['attribute_list'];
+	$iFieldIndex = 0;
+	
+	foreach($aExpectedAttributes as $sAttCode => $iExpectCode)
+	{
+		// Prompt for an attribute if
+		// - the attribute must be changed or must be displayed to the user for confirmation
+		// - or the field is mandatory and currently empty
+		if ( ($iExpectCode & (OPT_ATT_MUSTCHANGE | OPT_ATT_MUSTPROMPT)) ||
+			 (($iExpectCode & OPT_ATT_MANDATORY) && ($oRequest->Get($sAttCode) == '')) ) 
+		{
+			$value = utils::ReadParam('attr_'.$sAttCode, null, 'post');
+			if (!is_null($value))
+			{
+				$oRequest->Set($sAttCode, $value);
+			}
+		}
+	}
+	if ($oRequest->ApplyStimulus('ev_close'))
+	{
+		$oMyChange = MetaModel::NewObject("CMDBChange");
+		$oMyChange->Set("date", time());
+		if (UserRights::IsImpersonated())
+		{
+			$sUserString = Dict::Format('UI:Archive_User_OnBehalfOf_User', UserRights::GetRealUser(), UserRights::GetUser());
+		}
+		else
+		{
+			$sUserString = UserRights::GetUser();
+		}
+		$oMyChange->Set("userinfo", $sUserString);
+		$iChangeId = $oMyChange->DBInsert();
+		$oRequest->DBUpdateTracked($oMyChange);
+		$oP->p("<h1>".Dict::Format('UI:Class_Object_Updated', MetaModel::GetName(get_class($oRequest)), $oRequest->GetName())."</h1>\n");
+		DisplayMainMenu($oP);
+	}
+	else
+	{
+		$oP->AddMenuButton('back', 'Portal:Back', './index.php?operation=welcome');
+		$oP->add('Error: cannot close the request - '.$oRequest->GetName());
+	}
+}
+
+/**
+ * Find the UserRequest object of the specified ID. Make sure that it the caller is the current user
+ * @param integer $id The ID of the request to find
+ * @return UserRequert The found object, or null in case of failure (object does not exist, user has no rights to see it...)
+ */
+function FindRequest($id)
+{
+	$oRequest = null;
+	$iContactId = UserRights::GetContactId();
+	$oContact = MetaModel::GetObject('Contact', $iContactId, false); // false => Can fail
+	if (is_object($oContact))
+	{
+		$sOQL = "SELECT UserRequest WHERE caller_id = :contact_id AND id = :request_id";
+		$oSearch = DBObjectSearch::FromOQL($sOQL);
+		$oSet = new CMDBObjectSet($oSearch, array(), array('contact_id' => $iContactId, 'request_id' => $id));
+		if ($oSet->Count() > 0)
+		{
+			$oRequest = $oSet->Fetch();
+		}
+	}
+	else
+	{
+		$oP->AddMenuButton('back', 'Portal:Back', './index.php?operation=welcome');
+		$oP->add("<p class=\"error\">".Dict::S('Portal:ErrorNoContactForThisUser')."</p>");
+	}
+	return $oRequest;	
+}
+/**
+ * Displays the details of a request
+ * @param WebPage $oP The current web page
+ * @return void
+ */
+function RequestDetails(WebPage $oP, $id)
+{
+	$oRequest = FindRequest($id);
+	if (!is_object($oRequest))
+	{
+		echo "Request not found ! count=".$oSet->Count();
+		return;
+	}
+	$iDefaultStep = 0;
+	if ($oRequest->GetState() == 'resolved')
+	{
+		// The current ticket is in 'resolved' state, prompt to close it
+		$iDefaultStep = 1;
+	}
+
+	$iStep = utils::ReadParam('step', $iDefaultStep);
+
+	switch($iStep)
+	{
+		case 0:
+		$oP->AddMenuButton('back', 'Portal:Back', './index.php?operation=welcome');
+		$oP->add("<h1 id=\"title_request_details\">".$oRequest->GetIcon()."&nbsp;".Dict::Format('Portal:TitleRequestDetailsFor_Request', $oRequest->GetName())."</h1>\n");
+		DisplayRequestDetails($oP, $oRequest);
+		break;
+		
+		case 1:
+		$oP->AddMenuButton('cancel', 'UI:Button:Cancel', './index.php?operation=welcome');
+		DisplayResolvedRequestForm($oP, $oRequest);
+		break;
+		
+		case 2:
+		DoCloseRequest($oP, $oRequest);
+		break;
+	}
+}
+
+/**
+ * Get The organization of the current user (i.e. the organization of its contact)
+ * @param WebPage $oP The current page, for errors output
+ * @return Organization The user's org or null in case of problem...
+ */
+function GetUserOrg($oP)
+{
+	$oOrg = null;
+	$iContactId = UserRights::GetContactId();
+	$oContact = MetaModel::GetObject('Contact', $iContactId, false); // false => Can fail
+	if (is_object($oContact))
+	{
+		$oOrg = MetaModel::GetObject('Organization', $oContact->Get('org_id'), false); // false => can fail
+	}
+	else
+	{
+		$oP->add("<p class=\"error\">".Dict::S('Portal:ErrorNoContactForThisUser')."</p>");
+	}
+	return $oOrg;
+}
+
+try
+{
+	require_once('../application/startup.inc.php');
+	require_once('../application/portalwebpage.class.inc.php');
+	$oAppContext = new ApplicationContext();
+	$sOperation = utils::ReadParam('operation', '');
+	
+	require_once('../application/loginwebpage.class.inc.php');
+	LoginWebPage::DoLogin(false /* bMustBeAdmin */, true /* IsAllowedToPortalUsers */); // Check user rights and prompt if needed
+
+	$oP = new PortalWebPage(Dict::S('Portal:Title'));
+	$oUserOrg = GetUserOrg($oP);
+
+	if (is_object($oUserOrg))
+	{
+		switch($sOperation)
+		{
+			case 'create_request':
+			CreateRequest($oP, $oUserOrg);
+			break;
+					
+			case 'details':
+			$iRequestId = utils::ReadParam('id', 0);
+			RequestDetails($oP, $iRequestId);
+			break;
+			
+			case 'welcome':
+			default:
+			DisplayMainMenu($oP);
+		} 
+	}
+	$oP->output();
+}
+catch(CoreException $e)
+{
+	require_once('../setup/setuppage.class.inc.php');
+	$oP = new SetupWebPage(Dict::S('UI:PageTitle:FatalError'));
+	$oP->add("<h1>".Dict::S('UI:FatalErrorMessage')."</h1>\n");	
+	$oP->error(Dict::Format('UI:Error_Details', $e->getHtmlDesc()));	
+	$oP->output();
+
+	if (MetaModel::IsLogEnabledIssue())
+	{
+		if (MetaModel::IsValidClass('EventIssue'))
+		{
+			try
+			{
+				$oLog = new EventIssue();
+	
+				$oLog->Set('message', $e->getMessage());
+				$oLog->Set('userinfo', '');
+				$oLog->Set('issue', $e->GetIssue());
+				$oLog->Set('impact', 'Page could not be displayed');
+				$oLog->Set('callstack', $e->getTrace());
+				$oLog->Set('data', $e->getContextData());
+				$oLog->DBInsertNoReload();
+			}
+			catch(Exception $e)
+			{
+				IssueLog::Error("Failed to log issue into the DB");
+			}
+		}
+
+		IssueLog::Error($e->getMessage());
+	}
+
+	// For debugging only
+	//throw $e;
+}
+catch(Exception $e)
+{
+	require_once('../setup/setuppage.class.inc.php');
+	$oP = new SetupWebPage(Dict::S('UI:PageTitle:FatalError'));
+	$oP->add("<h1>".Dict::S('UI:FatalErrorMessage')."</h1>\n");	
+	$oP->error(Dict::Format('UI:Error_Details', $e->getMessage()));	
+	$oP->output();
+
+	if (MetaModel::IsLogEnabledIssue())
+	{
+		if (MetaModel::IsValidClass('EventIssue'))
+		{
+			try
+			{
+				$oLog = new EventIssue();
+	
+				$oLog->Set('message', $e->getMessage());
+				$oLog->Set('userinfo', '');
+				$oLog->Set('issue', 'PHP Exception');
+				$oLog->Set('impact', 'Page could not be displayed');
+				$oLog->Set('callstack', $e->getTrace());
+				$oLog->Set('data', array());
+				$oLog->DBInsertNoReload();
+			}
+			catch(Exception $e)
+			{
+				IssueLog::Error("Failed to log issue into the DB");
+			}
+		}
+
+		IssueLog::Error($e->getMessage());
+	}
+}
+?>

portal/portal.css

@@ -0,0 +1,114 @@
+div#portal #banner {
+	width: 100%;
+	height: 60px;
+	display: inline-block;
+	vertical-align:middle;
+	background-color: #f6f6f1;
+}
+
+div#portal #logo {
+	width: 126px;
+	background: url(../images/itop-logo.png) 0 0 no-repeat;
+	margin-left:20px;
+	margin-right:20px;
+	height: 60px;
+	border: 0;
+	vertical-align: middle;
+	text-align: center;
+	display: inline-block;
+	line-height: 48px;
+	padding-right:50px;
+}
+
+#portal_menu {
+	height: 60px;
+}
+
+div.button {
+	margin-left:20px;
+	margin-right:20px;
+	height: 60px;
+	border: 0;
+	vertical-align: middle;
+	text-align: center;
+	display: inline-block;
+	line-height: 48px;
+}
+
+a.button , a.button:visited {
+	color: #1C94C4;
+	text-decoration: none;
+	vertical-align: middle;
+	height: 48px;
+	line-height: 48px;
+	display: inline-block;
+}
+
+a.button span {
+	vertical-align:middle;
+	margin-right: 20px;
+	margin-left: 50px;
+}
+
+#close_form_table {
+	width: 100%;
+	padding: 20px;
+}
+
+#logoff {
+	float: right;
+	background: url(../images/logoff.png) right center no-repeat;
+}
+
+#logoff span {
+	margin-right: 50px;
+	margin-left: 20px;
+}
+
+#cancel {
+	background: url(../images/stop-mid.png) 0 0 no-repeat;
+}
+
+#create {
+	background: url(../modules/itop-request-mgmt-1.0.0/images/user-request.png) 0 0 no-repeat;
+}
+#user_info {
+	background: url(../images/clean-mid.png) 0 0 no-repeat;
+}
+
+#change_pwd {
+	background: url(../images/password.png) 0 0 no-repeat;
+}
+#back {
+	background: url(../images/back.png) 0 0 no-repeat;
+}
+#back span {
+	margin-left: 54px;
+}
+#refresh {
+	background: url(../images/refresh.png) 0 0 no-repeat;
+	margin-right: 40px;
+}
+#refresh span {
+	margin-left: 54px;
+	margin-right: 20px;
+}
+
+#content {
+	margin: 10px;
+	padding: 10px;
+	text-align: center;
+}
+#request_details {
+	display: inline-block;
+}
+#request_details table {
+	border: #f1f1f6 2px solid;
+}
+#form_details {
+	display: inline-block;
+}
+.wizContainer table {
+	display: inline-block;
+	text-align: left;
+}