www/includes/SoapidioRequestPanel.class.php

   1 <?php
   2
   3 class SoapidioRequestPanel extends QPanel {
   4         protected $strFunctionDeclaration;
   5         protected $strFunctionName;
   6         protected $strFunctionArgumentsArray;
   7
   8         protected $objControlsArray;
   9
  10         /**
  11          * Constructor for this control
  12          * @param mixed $objParentObject Parent QForm or QControl that is responsible for rendering this control
  13          * @param string $strControlId optional control ID
  14          */
  15         public function __construct($objParentObject, $strControlId = null) {
  16                 try {
  17                         parent::__construct($objParentObject, $strControlId);
  18                 } catch (QCallerException $objExc) { $objExc->IncrementOffset(); throw $objExc; }
  19
  20                 $this->strCssClass = 'RequestPanel';
  21         }
  22
  23         /**
  24          * Set Function declaration got from PHP Soap client.
  25          *
  26          * @param string $strFunctionDeclaration
  27          */
  28         public function SetFunctionDeclaration($strFunctionDeclaration) {
  29                 $this->strFunctionDeclaration = $strFunctionDeclaration;
  30                 $this->ResetControls();
  31
  32                 if (!is_null($strFunctionDeclaration)) {
  33                         $this->GenerateControlData();
  34                 }
  35         }
  36
  37         /**
  38          * Delete all child controls and refresh control.
  39          *
  40          */
  41         public function ResetControls() {
  42                 $this->RemoveChildControls(true);
  43                 $this->objControlsArray = array();
  44                 $this->Refresh();
  45         }
  46         /**
  47
  48          * Generate the required controls for this FunctionDeclaration.
  49          *
  50          */
  51         protected function GenerateControlData() {
  52                 $intArgumentsBegin = strpos($this->strFunctionDeclaration, '(') + 1;
  53                 $intArgumentsLength = strpos($this->strFunctionDeclaration, ')') - $intArgumentsBegin;
  54                 $strArguments = substr($this->strFunctionDeclaration, $intArgumentsBegin, $intArgumentsLength);
  55                 $this->strFunctionArgumentsArray = explode(', ', $strArguments);
  56
  57                 $intFunctionBegin = strpos($this->strFunctionDeclaration, ' ') + 1;
  58                 $intFunctionLength = $intArgumentsBegin - $intFunctionBegin - 1;
  59                 $this->strFunctionName = substr($this->strFunctionDeclaration, $intFunctionBegin, $intFunctionLength);
  60
  61                 $btnRequest = new QButton($this);
  62                 $btnRequest->AddAction(new QClickEvent(), new QAjaxControlAction($this, 'btnRequest_Click'));
  63                 $btnRequest->Text = $this->strFunctionName;
  64
  65                 $this->objControlsArray[] = SoapidioRequestPanelElement::TableBegin;
  66                 for ($i = 0; $i < count($this->strFunctionArgumentsArray); $i++) {
  67                         $strFunctionArguments = explode(' ', $this->strFunctionArgumentsArray[$i]);
  68                         if ($strArguments) {
  69                                 $this->objControlsArray[] = SoapidioRequestPanelElement::RowBegin;
  70
  71                                 switch (QType::TypeFromDoc($strFunctionArguments[0])) {
  72                                         case QType::Boolean:
  73                                                 $txtControl = new QCheckBox($this);
  74                                                 $txtControl->Required = true;
  75                                                 $txtControl->AddAction(new QEnterkeyEvent(), new QTerminateAction());
  76
  77                                                 $clbControl = new QControlLabel($txtControl);
  78                                                 $clbControl->ForControl = $txtControl;
  79                                                 $clbControl->Text = sprintf('%s: ', substr($strFunctionArguments[1], 4));
  80
  81                                                 $this->objControlsArray[] = SoapidioRequestPanelElement::ColumnBegin;
  82                                                 $this->objControlsArray[] = $clbControl;
  83                                                 $this->objControlsArray[] = SoapidioRequestPanelElement::ColumnEnd;
  84
  85                                                 $this->objControlsArray[] = SoapidioRequestPanelElement::ColumnBegin;
  86                                                 $this->objControlsArray[] = $txtControl;
  87                                                 $this->objControlsArray[] = SoapidioRequestPanelElement::ColumnEnd;
  88                                                 break;
  89                                         case QType::Integer:
  90                                                 $txtControl = new QIntegerTextBox($this);
  91                                                 $txtControl->Required = true;
  92                                                 $txtControl->AddAction(new QEnterkeyEvent(), new QTerminateAction());
  93
  94                                                 $clbControl = new QControlLabel($txtControl);
  95                                                 $clbControl->ForControl = $txtControl;
  96                                                 $clbControl->Text = sprintf('%s: ', substr($strFunctionArguments[1], 4));
  97
  98                                                 $this->objControlsArray[] = SoapidioRequestPanelElement::ColumnBegin;
  99                                                 $this->objControlsArray[] = $clbControl;
 100                                                 $this->objControlsArray[] = SoapidioRequestPanelElement::ColumnEnd;
 101
 102                                                 $this->objControlsArray[] = SoapidioRequestPanelElement::ColumnBegin;
 103                                                 $this->objControlsArray[] = $txtControl;
 104                                                 $this->objControlsArray[] = SoapidioRequestPanelElement::ColumnEnd;
 105                                                 break;
 106                                         case QType::String:
 107                                                 $txtControl = new QTextBox($this);
 108                                                 $txtControl->Required = true;
 109                                                 $txtControl->AddAction(new QEnterkeyEvent(), new QTerminateAction());
 110
 111                                                 $clbControl = new QControlLabel($txtControl);
 112                                                 $clbControl->ForControl = $txtControl;
 113                                                 $clbControl->Text = sprintf('%s: ', substr($strFunctionArguments[1], 4));
 114
 115                                                 $this->objControlsArray[] = SoapidioRequestPanelElement::ColumnBegin;
 116                                                 $this->objControlsArray[] = $clbControl;
 117                                                 $this->objControlsArray[] = SoapidioRequestPanelElement::ColumnEnd;
 118
 119                                                 $this->objControlsArray[] = SoapidioRequestPanelElement::ColumnBegin;
 120                                                 $this->objControlsArray[] = $txtControl;
 121                                                 $this->objControlsArray[] = SoapidioRequestPanelElement::ColumnEnd;
 122                                                 break;
 123                                         case 'Session':
 124                                                 $lstControl = new QListBox($this);
 125                                                 $lstControl->Required = true;
 126                                                 $lstControl->AddAction(new QEnterkeyEvent(), new QTerminateAction());
 127
 128                                                 $dttExpire = new QDateTime(QDateTime::Now);
 129                                                 $dttExpire->AddSeconds(-QApplication::GetConfig('session_timeout', QType::Integer));
 130
 131                                                 // Query table and delete first timed out sessions for this ip address, delete only when there is no SessionKey assigned (checked via reverse relationship).
 132                                                 foreach (Session::QueryArray(
 133                                                         QQ::AndCondition(
 134                                                                 QQ::Equal(QQN::Session()->IpAddress, (string) QApplication::GetClientAddress()),
 135                                                                 QQ::LessThan(QQN::Session()->Changed, $dttExpire),
 136                                                                 QQ::IsNull(QQN::Session()->SessionKeyAsSession->Id)
 137                                                         )
 138                                                 ) as $objSession) {
 139                                                         $objSession->Delete();
 140                                                         QApplication::AddLogEntry(LogItemEnum::SESSIONTIMEOUT);
 141                                                 }
 142
 143                                                 foreach (Session::QueryArray(
 144                                                         QQ::AndCondition(
 145                                                                 QQ::Equal(QQN::Session()->IpAddress, (string) QApplication::GetClientAddress()),
 146                                                                 QQ::IsNotNull(QQN::Session()->UserId)
 147                                                         )
 148                                                 ) as $objSession) {
 149                                                         $lstControl->AddItem($objSession->__toString(), $objSession);
 150                                                 }
 151
 152                                                 if ($lstControl->ItemCount == 0) {
 153                                                         $lstControl->AddItem(QApplication::Translate('(no sessions available)'), null);
 154                                                         $btnRequest->Enabled = false;
 155                                                 }
 156
 157                                                 $clbControl = new QControlLabel($lstControl);
 158                                                 $clbControl->ForControl = $lstControl;
 159                                                 $clbControl->Text = sprintf('%s: ', substr($strFunctionArguments[1], 4));
 160
 161                                                 $this->objControlsArray[] = SoapidioRequestPanelElement::ColumnBegin;
 162                                                 $this->objControlsArray[] = $clbControl;
 163                                                 $this->objControlsArray[] = SoapidioRequestPanelElement::ColumnEnd;
 164
 165                                                 $this->objControlsArray[] = SoapidioRequestPanelElement::ColumnBegin;
 166                                                 $this->objControlsArray[] = $lstControl;
 167                                                 $this->objControlsArray[] = SoapidioRequestPanelElement::ColumnEnd;
 168                                                 break;
 169                                 }
 170
 171                                 $this->objControlsArray[] = SoapidioRequestPanelElement::RowEnd;
 172                         }
 173                 }
 174
 175                 $this->objControlsArray[] = SoapidioRequestPanelElement::RowBegin;
 176                 $this->objControlsArray[] = SoapidioRequestPanelElement::ColumnSpan;
 177                 $this->objControlsArray[] = $btnRequest;
 178                 $this->objControlsArray[] = SoapidioRequestPanelElement::ColumnEnd;
 179                 $this->objControlsArray[] = SoapidioRequestPanelElement::RowEnd;
 180                 $this->objControlsArray[] = SoapidioRequestPanelElement::TableEnd;
 181         }
 182
 183         /**
 184          * Action handler for request button. It execute on the parent form the pnlRequest_DoRequest() function.
 185          *
 186          */
 187         public function btnRequest_Click() {
 188                 $mixArgumentArray = array();
 189                 foreach ($this->objChildControlArray as $objControl) {
 190                         if (!($objControl instanceof QButton)) {
 191                                 switch (get_class($objControl)) {
 192                                         case 'QCheckBox':
 193                                                 $mixArgumentArray[] = $objControl->Checked;
 194                                                 break;
 195                                         case 'QIntegerTextBox':
 196                                                 $mixArgumentArray[] = $objControl->Text;
 197                                                 break;
 198                                         case 'QTextBox':
 199                                                 $mixArgumentArray[] = $objControl->Text;
 200                                                 break;
 201                                         case 'QListBox':
 202                                                 $mixArgumentArray[] = $objControl->SelectedValue;
 203                                                 break;
 204                                 }
 205
 206                         }
 207                 }
 208
 209                 $this->objForm->pnlRequest_DoRequest($this->strFunctionName, $this->strFunctionDeclaration, $mixArgumentArray);
 210         }
 211
 212         /**
 213          * Return HTML for this control.
 214          *
 215          * @return string
 216          */
 217         protected function GetControlHtml() {
 218                 $strReturn = '';
 219
 220                 for ($i = 0; $i < count($this->objControlsArray); $i++) {
 221                         if ($this->objControlsArray[$i] instanceof QControl) {
 222                                 $strReturn .= $this->objControlsArray[$i]->GetControlHtml();
 223                         } else if (is_int($this->objControlsArray[$i])) {
 224                                 switch ($this->objControlsArray[$i]) {
 225                                         case SoapidioRequestPanelElement::TableBegin:
 226                                                 $strReturn .= sprintf('<table class="%s">', $this->strCssClass);
 227                                                 break;
 228                                         case SoapidioRequestPanelElement::TableEnd:
 229                                                 $strReturn .= '</table>';
 230                                                 break;
 231
 232                                         case SoapidioRequestPanelElement::RowBegin:
 233                                                 $strReturn .= '<tr>';
 234                                                 break;
 235                                         case SoapidioRequestPanelElement::RowEnd:
 236                                                 $strReturn .= '</tr>';
 237                                                 break;
 238
 239                                         case SoapidioRequestPanelElement::ColumnBegin:
 240                                                 $strReturn .= '<td>';
 241                                                 break;
 242                                         case SoapidioRequestPanelElement::ColumnEnd:
 243                                                 $strReturn .= '</td>';
 244                                                 break;
 245                                         case SoapidioRequestPanelElement::ColumnSpan:
 246                                                 $strReturn .= '<td colspan="2">';
 247                                                 break;
 248                                 }
 249                         } else {
 250                                 throw new QCallerException('Non valid item in array');
 251                         }
 252                 }
 253
 254                 return $strReturn;
 255         }
 256
 257         /**
 258          * Parse $_POST data for all child controls.
 259          *
 260          */
 261         public function ParsePostData() {
 262                 foreach ($this->objChildControlArray as $objControl) {
 263                         $objControl->ParsePostData();
 264                 }
 265         }
 266 }
 267
 268 abstract class SoapidioRequestPanelElement {
 269         const TableBegin = 1;
 270         const TableEnd = 2;
 271
 272         const RowBegin = 4;
 273         const RowEnd = 8;
 274
 275         const ColumnSpan = 16;
 276         const ColumnBegin = 32;
 277         const ColumnEnd = 64;
 278 }
 279
 280 ?>