<?php
/**
*
* @ This file is created by deZender.Net
* @ deZender (PHP5 Decoder for SourceGuardian & phpSHIELD)
*
* @	Version			:	1.1.6.0
* @	Author			:	DeZender
* @	Release on		:	02.06.2013
* @	Official site	:	http://DeZender.Net
*
*/

	class clsTbsLocator {
		public $PosBeg = false;
		public $PosEnd = false;
		public $Enlarged = false;
		public $FullName = false;
		public $SubName = '';
		public $SubOk = false;
		public $SubLst = array(  );
		public $SubNbr = 0;
		public $PrmLst = array(  );
		public $PrmIfNbr = false;
		public $MagnetId = false;
		public $BlockFound = false;
		public $FirstMerge = true;
		public $ConvProtect = true;
		public $ConvHtml = true;
		public $ConvMode = 1;
		public $ConvBr = true;
	}

	class clsTbsDataSource {
		public $Type = false;
		public $SubType = 0;
		public $SrcId = false;
		public $Query = '';
		public $RecSet = false;
		public $RecKey = '';
		public $RecNum = 0;
		public $RecNumInit = 0;
		public $RecSaving = false;
		public $RecSaved = false;
		public $RecBuffer = false;
		public $CurrRec = false;
		public $TBS = false;
		public $OnDataOk = false;
		public $OnDataPrm = false;
		public $OnDataPrmDone = array(  );
		public $OnDataPi = false;

		public function DataAlert($Msg) {
			return $this->TBS->meth_Misc_Alert( 'when merging block ' . $this->TBS->_ChrOpen . $this->TBS->_CurrBlock . $this->TBS->_ChrClose, $Msg );
		}

		public function DataPrepare(&$SrcId, $TBS) {
			$this->SrcId = &$SrcId;
			$this->TBS = &$TBS;

			$FctInfo = false;
			$FctObj = false;

			if (is_array( $SrcId )) {
				$this->Type = 0;
			} else {
				if (is_resource( $SrcId )) {
					$Key = get_resource_type( $SrcId );
					switch ($Key) {
						case 'mysql link': {
							$this->Type = 6;
							break;
						}

						case 'mysql link persistent': {
							$this->Type = 6;
							break;
						}

						case 'mysql result': {
							$this->Type = 6;
							$this->SubType = 1;
							break;
						}

						case 'pgsql link': {
							$this->Type = 7;
							break;
						}

						case 'pgsql link persistent': {
							$this->Type = 7;
							break;
						}

						case 'pgsql result': {
							$this->Type = 7;
							$this->SubType = 1;
							break;
						}

						case 'sqlite database': {
							$this->Type = 8;
							break;
						}

						case 'sqlite database (persistent)': {
							$this->Type = 8;
							break;
						}

						case 'sqlite result': {
							$this->Type = 8;
							$this->SubType = 1;
							break;
						}

						default: {
							$FctInfo = $Key;
							$FctCat = 'r';
						}
					}
				} else {
					if (is_string( $SrcId )) {
						switch (strtolower( $SrcId )) {
							case 'array': {
								$this->Type = 0;
								$this->SubType = 1;
								break;
							}

							case 'clear': {
								$this->Type = 0;
								$this->SubType = 3;
								break;
							}

							case 'mysql': {
								$this->Type = 6;
								$this->SubType = 2;
								break;
							}

							case 'text': {
								$this->Type = 2;
								break;
							}

							case 'num': {
								$this->Type = 1;
								break;
							}

							default: {
								$FctInfo = $SrcId;
								$FctCat = 'k';
							}
						}
					} else {
						if (is_object( $SrcId )) {
							$FctInfo = get_class( $SrcId );
							$FctCat = 'o';
							$FctObj = &$SrcId;
							$this->SrcId = &$SrcId;
						} else {
							if ($SrcId === false) {
								$this->DataAlert( 'the specified source is set to FALSE. Maybe your connection has failed.' );
							} else {
								$this->DataAlert( 'unsupported variable type : \'' . gettype( $SrcId ) . '\'.' );
							}
						}
					}
				}
			}


			if ($FctInfo !== false) {
				$ErrMsg = false;

				if ($TBS->meth_Misc_UserFctCheck( $FctInfo, $FctCat, $FctObj, $ErrMsg )) {
					$this->Type = $FctInfo['type'];

					if ($this->Type !== 5) {
						if ($this->Type === 4) {
							$this->FctPrm = array( false, 0 );
							$this->SrcId = &$FctInfo['open'][0];
						}

						$this->FctOpen = &$FctInfo['open'];
						$this->FctFetch = &$FctInfo['fetch'];
						$this->FctClose = &$FctInfo['close'];
					}
				} else {
					$this->Type = $this->DataAlert( $ErrMsg );
				}
			}

			return $this->Type !== false;
		}

		public function DataOpen($Query) {
			$this->CurrRec = true;

			if ($this->RecSaved) {
				$this->FirstRec = true;
				$this->RecKey = '';
				$this->RecNum = $this->RecNumInit;

				if ($this->OnDataOk) {
					$this->OnDataArgs[1] = &$this->CurrRec;
				}

				return true;
			}
..........................................................
................................
..............