<?php

class DPage
{
	private $_id;
	private $_label;
	private $_tblmap;

	private $_printdone;
	private $_disp_tid;
	private $_disp_ref;
	private $_extended;
	private $_linked_tbls;

	public function __construct($id, $label, $tblmap)
	{
		$this->_id = $id;
		$this->_label = $label;
		$this->_tblmap = $tblmap;
	}

	public function GetID()
	{
		return $this->_id;
	}

	public function GetLabel()
	{
		return $this->_label;
	}

	public function GetTblMap()
	{
		return $this->_tblmap;
	}

	public function PrintHtml($disp)
	{
		$this->_disp_tid = $disp->Get(DInfo::FLD_TID);
		$this->_disp_ref = $disp->Get(DInfo::FLD_REF);

		$this->_linked_tbls = NULL;
		$this->_extended = TRUE;
		if ($this->_disp_tid == '') {
			$this->_extended = FALSE;
		}
		elseif (($last = strrpos($this->_disp_tid, '`')) > 0) {
			$this->_disp_tid = substr($this->_disp_tid, $last+1);
		}

		if (($topmesg = $disp->Get(DInfo::FLD_TopMsg)) != NULL) {

			foreach($topmesg as $tm) {
				echo UIBase::message('', $tm, 'error');
			}
		}

		$root = $disp->Get(DInfo::FLD_PgData);
		if ($root == NULL)
			return;


		if ($root->Get(CNode::FLD_KEY) == CNode::K_EXTRACTED) {
			$this->print_tbl($this->_disp_tid, $root, $disp);
		}
		else {
			$this->_printdone = FALSE;
			$this->print_map($this->_tblmap, $root, $disp);
		}

		if ($disp->IsViewAction() && $this->_linked_tbls != NULL) {
			$this->_extended = TRUE;
			$disp->SetPrintingLinked(TRUE);
			foreach( $this->_linked_tbls as $lti) {
				$this->_disp_tid = $lti;
				$this->_disp_ref = $disp->Get(DInfo::FLD_REF);
				$this->_printdone = FALSE;
				$this->print_map($this->_tblmap, $root, $disp);
			}
			$disp->SetPrintingLinked(FALSE);
		}
	}

	private function print_map($tblmap, $node, $disp)
	{
		$dlayer = ($node == NULL) ? NULL : $node->LocateLayer($tblmap->GetLoc());
		$maps = $tblmap->GetMaps($this->_extended);
		foreach ($maps as $m)
		{
			if (is_a($m, 'DTblMap')) {
				if (is_array($dlayer)) {
					$ref = $this->_disp_ref;
					if (($first = strpos($ref, '`')) > 0) {
						$this->_disp_ref = substr($ref, $first+1);
						$ref = substr($ref, 0, $first);
					}
					else {
						$this->_disp_ref = '';
					}
					$dlayer = $dlayer[$ref];
				}
				$this->print_map($m, $dlayer, $disp);
				if ($this->_printdone)
					break;
			}
			else {
				if ($m != NULL && ($this->_disp_tid == '' || $this->_disp_tid == $m)) {
					$this->print_tbl($m, $dlayer, $disp);
					if ($this->_disp_tid == $m) {
						$this->_printdone = TRUE;
						break;
					}
				}
			}
		}

	}

	private function print_tbl($tid, $dlayer, $disp)
	{
		$tbl = DTblDef::getInstance()->GetTblDef($tid);
		$tbl->PrintHtml($dlayer, $disp);

		if ( ($linked = $tbl->Get(DTbl::FLD_LINKEDTBL)) != NULL) {
			if ($this->_linked_tbls == NULL)
				$this->_linked_tbls = $linked;
			else
				$this->_linked_tbls = array_merge($this->_linked_tbls, $linked);
		}
	}


}