function meth_Locator_Replace(&$Txt,&$Loc,&$Value,$CheckSub) { // This function enables to merge a locator with a text and returns the position just after the replaced block // This position can be useful because we don't know in advance how $Value will be replaced. // Found the value if there is a subname if ($CheckSub and $Loc->SubOk) { $SubId = 0; while ($SubId<$Loc->SubNbr) { $x = $Loc->SubLst[$SubId]; // &$Loc... brings an error with Event Example, I don't know why. if (is_array($Value)) { if (isset($Value[$x])) { $Value =& $Value[$x]; } elseif (array_key_exists($x,$Value)) {// can happens when value is NULL $Value =& $Value[$x]; } else { $Value =& tbs_Misc_UnlinkVar(''); if (!isset($Loc->PrmLst['noerr'])) $this->meth_Misc_Alert('Array value','Can\'t merge '.$this->ChrOpen.$Loc->FullName.$this->ChrClose.' because sub-item \''.$x.'\' is not an existing key in the array.',true); } $SubId++; } elseif (is_object($Value)) { if (method_exists($Value,$x)) { $x = call_user_func(array(&$Value,$x)); } elseif (isset($Value->$x)) { $x = $Value->$x; } else { if (!isset($Loc->PrmLst['noerr'])) $this->meth_Misc_Alert('Object value','Can\'t merge '.$this->ChrOpen.$Loc->FullName.$this->ChrClose.' because \''.$x.'\' is neither a method nor a property in the class \''.get_class($Value).'\'.',true); $x =& tbs_Misc_UnlinkVar(''); } $Value =& $x; $x =& tbs_Misc_UnlinkVar(''); $SubId++; } else { if (isset($Loc->PrmLst['selected'])) { $SelArray =& $Value; } else { if (!isset($Loc->PrmLst['noerr'])) $this->meth_Misc_Alert('Object or Array value expected','Can\'t merge '.$this->ChrOpen.$Loc->FullName.$this->ChrClose.' because the item before \''.$x.'\' is neither an object nor an array. Its type is '.gettype($Value).'.',true); } $Value =& tbs_Misc_UnlinkVar(''); $SubId = $Loc->SubNbr; } } } $CurrVal = $Value; // File inclusion if (isset($Loc->PrmLst['file'])) { $File = str_replace($this->ChrVal,$CurrVal,$Loc->PrmLst['file']); $this->meth_Merge_PhpVar($File,false); $OnlyBody = !(isset($Loc->PrmLst['htmlconv']) and (strtolower($Loc->PrmLst['htmlconv'])==='no')); // It's a text file, we don't get the BODY part if (tbs_Misc_GetFile($CurrVal,$File)) { if ($OnlyBody) $CurrVal = tbs_Html_GetPart($CurrVal,'BODY',false,true); } else { $CurrVal = ''; if (!isset($Loc->PrmLst['noerr'])) $this->meth_Misc_Alert('Parameter \'file\'','Field '.$this->ChrOpen.$Loc->FullName.$this->ChrClose.' : unable to read the file \''.$File.'\'.',true); } $Loc->ConvHtml = false; $Loc->ConvProtect = false; } // OnFormat event if (isset($Loc->PrmLst['onformat'])) { if ($Loc->FirstMerge) { $Loc->OnFrmInfo = $Loc->PrmLst['onformat']; $Loc->OnFrmPrm = array(&$Loc->FullName,'',&$Loc->PrmLst,&$this); $ErrMsg = false; if (!$this->meth_Misc_UserFctCheck($Loc->OnFrmInfo,$ErrMsg)) { unset($Loc->PrmLst['onformat']); if (!isset($Loc->PrmLst['noerr'])) $this->meth_Misc_Alert('Parameter \'onformat\'',$ErrMsg); $Loc->OnFrmInfo = 'pi'; // Execute the function pi() just to avoid extra error messages } } $Loc->OnFrmPrm[1] =& $CurrVal; if (isset($Loc->PrmLst['subtpl'])) { $this->meth_Misc_ChangeMode(true,$Loc,$CurrVal,true,true); call_user_func_array($Loc->OnFrmInfo,$Loc->OnFrmPrm); $this->meth_Misc_ChangeMode(false,$Loc,$CurrVal,true,true); } else { call_user_func_array($Loc->OnFrmInfo,$Loc->OnFrmPrm); } } // Select a value in a HTML option list $Select = isset($Loc->PrmLst['selected']); if ($Select) { if (is_array($CurrVal)) { $SelArray =& $CurrVal; $CurrVal =& tbs_Misc_UnlinkVar(' '); } else { $SelArray = false; } } // Convert the value to a string, use format if specified if (isset($Loc->PrmLst['frm'])) { $CurrVal = tbs_Misc_Format($Loc,$CurrVal); $Loc->ConvHtml = false; } else { if (!is_string($CurrVal)) $CurrVal = @strval($CurrVal); } // case of an 'if' 'then' 'else' options $OVal =& $CurrVal; // Must be assigner after $SelArray, if any $Script = isset($Loc->PrmLst['script']); if (isset($Loc->PrmLst['if'])) { if ($Loc->FirstMerge) { $this->meth_Merge_PhpVar($Loc->PrmLst['if'],false); if (isset($Loc->PrmLst['then'])) $this->meth_Merge_PhpVar($Loc->PrmLst['then'],true); if (isset($Loc->PrmLst['else'])) $this->meth_Merge_PhpVar($Loc->PrmLst['else'],true); } $x = str_replace($this->ChrVal,$CurrVal,$Loc->PrmLst['if']); if (tbs_Misc_CheckCondition($x)) { if (isset($Loc->PrmLst['then'])) $CurrVal =& tbs_Misc_UnlinkVar(''.$Loc->PrmLst['then']); // Now $CurrVal and $OVal are different } else { $Script = false; if (isset($Loc->PrmLst['else'])) { $CurrVal =& tbs_Misc_UnlinkVar(''.$Loc->PrmLst['else']); // Now $CurrVal and $OVal are different } else { $CurrVal = ''; } } } if ($Script) {// Include external PHP script $File = str_replace($this->ChrVal,$CurrVal,$Loc->PrmLst['script']); $this->meth_Merge_PhpVar($File,false); $Switch = isset($Loc->PrmLst['subtpl']); $GetOb = ($Switch or isset($Loc->PrmLst['getob'])); $CurrPrm =& $Loc->PrmLst; // Local var for users $this->meth_Misc_ChangeMode(true,$Loc,$CurrVal,$Switch,$GetOb); if (isset($Loc->PrmLst['once'])) {$x = @include_once($File);} else {$x = @include($File);} if ($x===false) { if (!isset($Loc->PrmLst['noerr'])) $this->meth_Misc_Alert('Parameter \'script\'','Field '.$this->ChrOpen.$Loc->FullName.$this->ChrClose.' cannot be merged because file \''.$File.'\' is not found or not readable.',true); } $this->meth_Misc_ChangeMode(false,$Loc,$CurrVal,$Switch,$GetOb); } if ($Loc->FirstMerge) { $Loc->FirstMerge = false; // Check HtmlConv parameter if (isset($Loc->PrmLst['htmlconv'])) { $x = strtolower($Loc->PrmLst['htmlconv']); $x = '+'.str_replace(' ','',$x).'+'; if (strpos($x,'+esc+')!==false) {tbs_Misc_ConvSpe($Loc); $Loc->ConvHtml = false; $Loc->ConvEsc = true; } if (strpos($x,'+wsp+')!==false) {tbs_Misc_ConvSpe($Loc); $Loc->ConvWS = true; } if (strpos($x,'+js+')!==false) {tbs_Misc_ConvSpe($Loc); $Loc->ConvHtml = false; $Loc->ConvJS = true; } if (strpos($x,'+no+')!==false) $Loc->ConvHtml = false; if (strpos($x,'+yes+')!==false) $Loc->ConvHtml = true; if (strpos($x,'+nobr+')!==false) {$Loc->ConvHtml = true; $Loc->ConvBr = false; } if (strpos($x,'+look+')!==false) {tbs_Misc_ConvSpe($Loc); $Loc->ConvLook = true; } } else { if ($this->HtmlCharSet===false) $Loc->ConvHtml = false; // No HTML } // We protect the data that does not come from the source of the template if (isset($Loc->PrmLst['protect'])) { $x = strtolower($Loc->PrmLst['protect']); switch ($x) { case 'no' : $Loc->ConvProtect = false; break; case 'yes': $Loc->ConvProtect = true; break; } } else { if ($this->Protect===false) $Loc->ConvProtect = false; } } // MaxLength if (isset($Loc->PrmLst['max'])) { $x = intval($Loc->PrmLst['max']); if (strlen($CurrVal)>$x) { if ($Loc->ConvHtml or ($this->HtmlCharSet===false)) { $CurrVal = substr($CurrVal,0,$x-1).$this->MaxEnd; } else { tbs_Html_Max($CurrVal,$x); } } } // HTML conversion, and TBS protection if ($Loc->ConvSpe) { // Using special parameters if ($Loc->ConvLook) { $Loc->ConvHtml = !tbs_Html_IsHtml($OVal); if ($Loc->ConvHtml===false) $OVal = tbs_Html_GetPart($OVal,'BODY',false,true); } if ($Loc->ConvHtml) { $this->meth_Conv_Html($OVal); if ($Loc->ConvBr) $OVal = nl2br($OVal); } if ($Loc->ConvEsc) $OVal = str_replace('\'','\'\'',$OVal); if ($Loc->ConvWS) { $check = ' '; $nbsp = ' '; do { $pos = strpos($OVal,$check); if ($pos!==false) $OVal = substr_replace($OVal,$nbsp,$pos,1); } while ($pos!==false); } if ($Loc->ConvJS) { $OVal = addslashes($OVal); // apply to ('), ("), (\) and (null) $OVal = str_replace("\n",'\n',$OVal); $OVal = str_replace("\r",'\r',$OVal); $OVal = str_replace("\t",'\t',$OVal); } } elseif ($Loc->ConvHtml) { $this->meth_Conv_Html($OVal); if ($Loc->ConvBr) $OVal = nl2br($OVal); } if ($Loc->ConvProtect) $OVal = str_replace($this->ChrOpen,$this->ChrProtect,$OVal); if ($CurrVal!==$OVal) $CurrVal = str_replace($this->ChrVal,$OVal,$CurrVal); // Case when it's an empty string if ($CurrVal==='') { if ($Loc->MagnetId===false) { if (isset($Loc->PrmLst['.'])) { $Loc->MagnetId = -1; } elseif (isset($Loc->PrmLst['ifempty'])) { $Loc->MagnetId = -2; } elseif (isset($Loc->PrmLst['magnet'])) { $Loc->MagnetId = 1; $Loc->PosBeg0 = $Loc->PosBeg; $Loc->PosEnd0 = $Loc->PosEnd; if (isset($Loc->PrmLst['mtype'])) { switch ($Loc->PrmLst['mtype']) { case 'm+m': $Loc->MagnetId = 2; break; case 'm*': $Loc->MagnetId = 3; break; case '*m': $Loc->MagnetId = 4; break; } } } else { $Loc->MagnetId = 0; } } switch ($Loc->MagnetId) { case 0: break; case -1: $CurrVal = ' '; break; // Enables to avoid blanks in HTML tables case -2: $CurrVal = $Loc->PrmLst['ifempty']; break; case 1: $Loc->Enlarged = true; tbs_Locator_EnlargeToTag($Txt,$Loc,$Loc->PrmLst['magnet'],false,false); break; case 2: $Loc->Enlarged = true; $CurrVal = tbs_Locator_EnlargeToTag($Txt,$Loc,$Loc->PrmLst['magnet'],false,true); break; case 3: $Loc->Enlarged = true; $Loc2 = tbs_Html_FindTag($Txt,$Loc->PrmLst['magnet'],true,$Loc->PosBeg,false,1,false); if ($Loc2!==false) { $Loc->PosBeg = $Loc2->PosBeg; if ($Loc->PosEnd<$Loc2->PosEnd) $Loc->PosEnd = $Loc2->PosEnd; } break; case 4: $Loc->Enlarged = true; $Loc2 = tbs_Html_FindTag($Txt,$Loc->PrmLst['magnet'],true,$Loc->PosBeg,true,1,false); if ($Loc2!==false) $Loc->PosEnd = $Loc2->PosEnd; break; } $NewEnd = $Loc->PosBeg; // Useful when mtype='m+m' } else { $NewEnd = $Loc->PosBeg + strlen($CurrVal); } $Txt = substr_replace($Txt,$CurrVal,$Loc->PosBeg,$Loc->PosEnd-$Loc->PosBeg+1); if ($Select) tbs_Html_MergeItems($Txt,$Loc,$CurrVal,$SelArray,$NewEnd); return $NewEnd; // Returns the new end position of the field }
function meth_Locator_Replace(&$Txt, &$Loc, &$Value, $SubStart) { // This function enables to merge a locator with a text and returns the position just after the replaced block // This position can be useful because we don't know in advance how $Value will be replaced. // Found the value if there is a subname if ($SubStart !== false and $Loc->SubOk) { for ($i = $SubStart; $i < $Loc->SubNbr; $i++) { $x = $Loc->SubLst[$i]; // &$Loc... brings an error with Event Example, I don't know why. if (is_array($Value)) { if (isset($Value[$x])) { $Value =& $Value[$x]; } elseif (array_key_exists($x, $Value)) { // can happens when value is NULL $Value =& $Value[$x]; } else { if (!isset($Loc->PrmLst['noerr'])) { $this->meth_Misc_Alert($Loc, 'item \'' . $x . '\' is not an existing key in the array.', true); } unset($Value); $Value = ''; break; } } elseif (is_object($Value)) { $ArgLst = tbs_Misc_CheckArgLst($x); if (method_exists($Value, $x)) { $x = call_user_func_array(array(&$Value, $x), $ArgLst); } elseif (property_exists($Value, $x)) { $x =& $Value->{$x}; } else { if (!isset($Loc->PrmLst['noerr'])) { $this->meth_Misc_Alert($Loc, 'item ' . $x . '\' is neither a method nor a property in the class \'' . get_class($Value) . '\'.', true); } unset($Value); $Value = ''; break; } $Value =& $x; unset($x); $x = ''; } else { if (!isset($Loc->PrmLst['noerr'])) { $this->meth_Misc_Alert($Loc, 'item before \'' . $x . '\' is neither an object nor an array. Its type is ' . gettype($Value) . '.', true); } unset($Value); $Value = ''; break; } } } $CurrVal = $Value; // Unlink if (isset($Loc->PrmLst['onformat'])) { if ($Loc->FirstMerge) { $Loc->OnFrmInfo = $Loc->PrmLst['onformat']; $Loc->OnFrmArg = array(&$Loc->FullName, '', &$Loc->PrmLst, &$this); $ErrMsg = false; if (!$this->meth_Misc_UserFctCheck($Loc->OnFrmInfo, $ErrMsg, false)) { unset($Loc->PrmLst['onformat']); if (!isset($Loc->PrmLst['noerr'])) { $this->meth_Misc_Alert($Loc, '(parameter onformat) ' . $ErrMsg); } $Loc->OnFrmInfo = 'pi'; // Execute the function pi() just to avoid extra error messages } } $Loc->OnFrmArg[1] =& $CurrVal; if (isset($Loc->PrmLst['subtpl'])) { $this->meth_Misc_ChangeMode(true, $Loc, $CurrVal); call_user_func_array($Loc->OnFrmInfo, $Loc->OnFrmArg); $this->meth_Misc_ChangeMode(false, $Loc, $CurrVal); $Loc->ConvProtect = false; $Loc->ConvHtml = false; } else { call_user_func_array($Loc->OnFrmInfo, $Loc->OnFrmArg); } } if ($Loc->FirstMerge) { if (isset($Loc->PrmLst['frm'])) { $Loc->ConvMode = 0; // Frm $Loc->ConvProtect = false; } else { // Analyze parameter 'htmlconv' if (isset($Loc->PrmLst['htmlconv'])) { $x = strtolower($Loc->PrmLst['htmlconv']); $x = '+' . str_replace(' ', '', $x) . '+'; if (strpos($x, '+esc+') !== false) { tbs_Misc_ConvSpe($Loc); $Loc->ConvHtml = false; $Loc->ConvEsc = true; } if (strpos($x, '+wsp+') !== false) { tbs_Misc_ConvSpe($Loc); $Loc->ConvWS = true; } if (strpos($x, '+js+') !== false) { tbs_Misc_ConvSpe($Loc); $Loc->ConvHtml = false; $Loc->ConvJS = true; } if (strpos($x, '+no+') !== false) { $Loc->ConvHtml = false; } if (strpos($x, '+yes+') !== false) { $Loc->ConvHtml = true; } if (strpos($x, '+nobr+') !== false) { $Loc->ConvHtml = true; $Loc->ConvBr = false; } } else { if ($this->HtmlCharSet === false) { $Loc->ConvHtml = false; } // No HTML } // Analyze parameter 'protect' if (isset($Loc->PrmLst['protect'])) { $x = strtolower($Loc->PrmLst['protect']); if ($x === 'no') { $Loc->ConvProtect = false; } elseif ($x === 'yes') { $Loc->ConvProtect = true; } } elseif ($this->Protect === false) { $Loc->ConvProtect = false; } } if ($Loc->Ope = isset($Loc->PrmLst['ope'])) { $ope = $Loc->PrmLst['ope']; if ($ope === 'list') { $Loc->OpeId = 1; $Loc->OpeSep = isset($Loc->PrmLst['valsep']) ? $Loc->PrmLst['valsep'] : ','; } else { $x = substr($ope, 0, 4); if ($x === 'max:') { $Loc->OpeId = isset($Loc->PrmLst['maxhtml']) ? 2 : 3; $Loc->OpeN = intval(trim(substr($ope, 4))); $Loc->OpeEnd = isset($Loc->PrmLst['maxend']) ? $Loc->PrmLst['maxend'] : '...'; if ($Loc->OpeN <= 0) { $Loc->Ope = false; } } elseif ($x === 'mod:') { $Loc->OpeId = 4; $Loc->OpeN = intval(trim(substr($ope, 4))); } elseif ($x === 'add:') { $Loc->OpeId = 5; $Loc->OpeN = intval(trim(substr($ope, 4))); } elseif (isset($this->_piOnOperation)) { $Loc->OpeId = 0; $Loc->OpeArg = array(&$Loc->FullName, &$CurrVal, &$Loc->PrmLst, &$Txt, $Loc->PosBeg, $Loc->PosEnd, &$Loc); } else { $Loc->Ope = false; if (!isset($Loc->PrmLst['noerr'])) { $this->meth_Misc_Alert($Loc, 'parameter ope doesn\'t support value \'' . $ope . '\'.', true); } } } } $Loc->FirstMerge = false; } $ConvProtect = $Loc->ConvProtect; // Plug-in OnFormat if ($this->_piOnFrm_Ok) { if (isset($Loc->OnFrmArgPi)) { $Loc->OnFrmArgPi[1] =& $CurrVal; } else { $Loc->OnFrmArgPi = array(&$Loc->FullName, &$CurrVal, &$Loc->PrmLst, &$this); } $this->meth_PlugIn_RunAll($this->_piOnFormat, $Loc->OnFrmArgPi); } // Operation if ($Loc->Ope) { switch ($Loc->OpeId) { case 0: $Loc->OpeArg[1] =& $CurrVal; $Loc->OpeArg[3] =& $Txt; if (!$this->meth_PlugIn_RunAll($this->_piOnOperation, $Loc->OpeArg)) { return $Loc->PosBeg; } break; case 1: if (is_array($CurrVal)) { $CurrVal = implode($Loc->OpeSep, $CurrVal); } break; case 2: if (strlen('' . $CurrVal) > $Loc->OpeN) { tbs_Html_Max($CurrVal, $Loc->OpeN, $Loc->OpeEnd); } break; case 3: if (strlen('' . $CurrVal) > $Loc->OpeN) { $CurrVal = substr('' . $CurrVal, 0, $Loc->OpeN) . $Loc->OpeEnd; } break; case 4: $CurrVal = intval($CurrVal) % $Loc->OpeN; break; case 5: $CurrVal = intval($CurrVal) + $Loc->OpeN; break; } } // HTML conversion or format if ($Loc->ConvMode === 1) { // Html simple if (!is_string($CurrVal)) { $CurrVal = @strval($CurrVal); } if ($Loc->ConvHtml) { $this->meth_Conv_Html($CurrVal); if ($Loc->ConvBr) { $CurrVal = nl2br($CurrVal); } } } elseif ($Loc->ConvMode === 0) { // Format $CurrVal = $this->meth_Misc_Format($CurrVal, $Loc->PrmLst); } elseif ($Loc->ConvMode === 2) { // Html special if (!is_string($CurrVal)) { $CurrVal = @strval($CurrVal); } if ($Loc->ConvHtml) { $this->meth_Conv_Html($CurrVal); if ($Loc->ConvBr) { $CurrVal = nl2br($CurrVal); } } if ($Loc->ConvEsc) { $CurrVal = str_replace('\'', '\'\'', $CurrVal); } if ($Loc->ConvWS) { $check = ' '; $nbsp = ' '; do { $pos = strpos($CurrVal, $check); if ($pos !== false) { $CurrVal = substr_replace($CurrVal, $nbsp, $pos, 1); } } while ($pos !== false); } if ($Loc->ConvJS) { $CurrVal = addslashes($CurrVal); // apply to ('), ("), (\) and (null) $CurrVal = str_replace("\n", '\\n', $CurrVal); $CurrVal = str_replace("\r", '\\r', $CurrVal); $CurrVal = str_replace("\t", '\\t', $CurrVal); } } // if/then/else process, there may be several if/then if ($Loc->PrmIfNbr) { $z = false; $i = 1; while ($i !== false) { if ($Loc->PrmIfVar[$i]) { $Loc->PrmIfVar[$i] = $this->meth_Merge_AutoVar($Loc->PrmIf[$i], true); } $x = str_replace($this->_ChrVal, $CurrVal, $Loc->PrmIf[$i]); if (tbs_Misc_CheckCondition($x)) { if (isset($Loc->PrmThen[$i])) { if ($Loc->PrmThenVar[$i]) { $Loc->PrmThenVar[$i] = $this->meth_Merge_AutoVar($Loc->PrmThen[$i], true); } $z = $Loc->PrmThen[$i]; } $i = false; } else { $i++; if ($i > $Loc->PrmIfNbr) { if (isset($Loc->PrmLst['else'])) { if ($Loc->PrmElseVar) { $Loc->PrmElseVar = $this->meth_Merge_AutoVar($Loc->PrmLst['else'], true); } $z = $Loc->PrmLst['else']; } $i = false; } } } if ($z !== false) { if ($ConvProtect) { $CurrVal = str_replace($this->_ChrOpen, $this->_ChrProtect, $CurrVal); // TBS protection $ConvProtect = false; } $CurrVal = str_replace($this->_ChrVal, $CurrVal, $z); } } if (isset($Loc->PrmLst['file'])) { $x = $Loc->PrmLst['file']; if ($x === true) { $x = $CurrVal; } $this->meth_Merge_AutoVar($x, false); $x = trim(str_replace($this->_ChrVal, $CurrVal, $x)); $CurrVal = ''; if ($x !== '') { if (tbs_Misc_GetFile($CurrVal, $x)) { if (isset($Loc->PrmLst['getbody'])) { $CurrVal = tbs_Html_GetPart($CurrVal, $Loc->PrmLst['getbody'], false, true); } } else { if (!isset($Loc->PrmLst['noerr'])) { $this->meth_Misc_Alert($Loc, 'the file \'' . $x . '\' given by parameter file is not found or not readable.', true); } } $ConvProtect = false; } } if (isset($Loc->PrmLst['script'])) { // Include external PHP script $x = $Loc->PrmLst['script']; if ($x === true) { $x = $CurrVal; } $this->meth_Merge_AutoVar($x, false); $x = trim(str_replace($this->_ChrVal, $CurrVal, $x)); if ($x !== '') { $this->_Subscript = $x; $this->CurrPrm =& $Loc->PrmLst; $sub = isset($Loc->PrmLst['subtpl']); if ($sub) { $this->meth_Misc_ChangeMode(true, $Loc, $CurrVal); } if ($this->meth_Misc_RunSubscript($CurrVal, $Loc->PrmLst) === false) { if (!isset($Loc->PrmLst['noerr'])) { $this->meth_Misc_Alert($Loc, 'the file \'' . $x . '\' given by parameter script is not found or not readable.', true); } } if ($sub) { $this->meth_Misc_ChangeMode(false, $Loc, $CurrVal); } if (isset($Loc->PrmLst['getbody'])) { $CurrVal = tbs_Html_GetPart($CurrVal, $Loc->PrmLst['getbody'], false, true); } unset($this->CurrPrm); $ConvProtect = false; } } // Case when it's an empty string if ($CurrVal === '') { if ($Loc->MagnetId === false) { if (isset($Loc->PrmLst['.'])) { $Loc->MagnetId = -1; } elseif (isset($Loc->PrmLst['ifempty'])) { $Loc->MagnetId = -2; } elseif (isset($Loc->PrmLst['magnet'])) { $Loc->MagnetId = 1; $Loc->PosBeg0 = $Loc->PosBeg; $Loc->PosEnd0 = $Loc->PosEnd; if (isset($Loc->PrmLst['mtype'])) { switch ($Loc->PrmLst['mtype']) { case 'm+m': $Loc->MagnetId = 2; break; case 'm*': $Loc->MagnetId = 3; break; case '*m': $Loc->MagnetId = 4; break; } } } else { $Loc->MagnetId = 0; } } switch ($Loc->MagnetId) { case 0: break; case -1: $CurrVal = ' '; break; // Enables to avoid blanks in HTML tables // Enables to avoid blanks in HTML tables case -2: $CurrVal = $Loc->PrmLst['ifempty']; break; case 1: $Loc->Enlarged = true; tbs_Locator_EnlargeToTag($Txt, $Loc, $Loc->PrmLst['magnet'], false); break; case 2: $Loc->Enlarged = true; $CurrVal = tbs_Locator_EnlargeToTag($Txt, $Loc, $Loc->PrmLst['magnet'], true); break; case 3: $Loc->Enlarged = true; $Loc2 = tbs_Html_FindTag($Txt, $Loc->PrmLst['magnet'], true, $Loc->PosBeg, false, 1, false); if ($Loc2 !== false) { $Loc->PosBeg = $Loc2->PosBeg; if ($Loc->PosEnd < $Loc2->PosEnd) { $Loc->PosEnd = $Loc2->PosEnd; } } break; case 4: $Loc->Enlarged = true; $Loc2 = tbs_Html_FindTag($Txt, $Loc->PrmLst['magnet'], true, $Loc->PosBeg, true, 1, false); if ($Loc2 !== false) { $Loc->PosEnd = $Loc2->PosEnd; } break; } $NewEnd = $Loc->PosBeg; // Useful when mtype='m+m' } else { if ($ConvProtect) { $CurrVal = str_replace($this->_ChrOpen, $this->_ChrProtect, $CurrVal); } // TBS protection $NewEnd = $Loc->PosBeg + strlen($CurrVal); } $Txt = substr_replace($Txt, $CurrVal, $Loc->PosBeg, $Loc->PosEnd - $Loc->PosBeg + 1); return $NewEnd; // Return the new end position of the field }