PHP clsTinyButStrong::f_Xml_FindTagStart方法代码示例

 function OpenDoc_ChangeCellType(&$Txt, &$Loc, $Ope, $IsMerging, &$Value)
 {
     // change the type of a cell in an ODS file
     $Loc->PrmLst['odsok'] = true;
     // avoid the field to be processed twice
     if ($Ope === 'odsStr') {
         return true;
     }
     static $OpeLst = array('odsNum' => 'float', 'odsPercent' => 'percentage', 'odsCurr' => 'currency', 'odsBool' => 'boolean', 'odsDate' => 'date', 'odsTime' => 'time');
     $AttStr = 'office:value-type="string"';
     $AttStr_len = strlen($AttStr);
     if (!isset($OpeLst[$Ope])) {
         return false;
     }
     $t0 = clsTinyButStrong::f_Xml_FindTagStart($Txt, 'table:table-cell', true, $Loc->PosBeg, false, true);
     if ($t0 === false) {
         return false;
     }
     // error in the XML structure
     $te = strpos($Txt, '>', $t0);
     if ($te === false || $te > $Loc->PosBeg) {
         return false;
     }
     // error in the XML structure
     $len = $te - $t0 + 1;
     $tag = substr($Txt, $t0, $len);
     $p = strpos($tag, $AttStr);
     if ($p === false) {
         return false;
     }
     // error: the cell was expected to have a string contents since it contains a TBS tag.
     // replace the current string with blanck chars
     $len = $Loc->PosEnd - $Loc->PosBeg + 1;
     $Txt = substr_replace($Txt, str_repeat(' ', $len), $Loc->PosBeg, $len);
     // prepare special formating for the value
     $type = $OpeLst[$Ope];
     $att_new = 'office:value-type="' . $type . '"';
     $newfrm = false;
     switch ($type) {
         case 'float':
             $att_new .= ' office:value="[]"';
             break;
         case 'percentage':
             $att_new .= ' office:value="[]"';
             break;
         case 'currency':
             $att_new .= ' office:value="[]"';
             if (isset($Loc->PrmLst['currency'])) {
                 $att_new .= ' office:currency="' . $Loc->PrmLst['currency'] . '"';
             }
             break;
         case 'boolean':
             $att_new .= ' office:boolean-value="[]"';
             break;
         case 'date':
             $att_new .= ' office:date-value="[]"';
             $newfrm = 'yyyy-mm-ddThh:nn:ss';
             break;
         case 'time':
             $att_new .= ' office:time-value="[]"';
             $newfrm = '"PT"hh"H"nn"M"ss"S"';
             break;
     }
     // replace the sring attribute with the new attribute
     //$diff = strlen($att_new) - $AttStr_len;
     $p_att = $t0 + $p;
     $p_fld = $p_att + strpos($att_new, '[');
     // new position of the fields in $Txt
     $Txt = substr_replace($Txt, $att_new, $p_att, $AttStr_len);
     // move the TBS field
     $Loc->PosBeg = $p_fld;
     $Loc->PosEnd = $p_fld + 1;
     if ($IsMerging) {
         // the field is currently beeing merged
         if ($type === 'boolean') {
             if ($Value) {
                 $Value = 'true';
             } else {
                 $Value = 'false';
             }
         } elseif ($newfrm !== false) {
             $prm = array('frm' => $newfrm);
             $Value = $this->TBS->meth_Misc_Format($Value, $prm);
         }
         $Loc->ConvStr = false;
         $Loc->ConvProtect = false;
     } else {
         if ($newfrm !== false) {
             $Loc->PrmLst['frm'] = $newfrm;
         }
     }
 }

 /**
  * Search a start tag of an element in the TXT contents, and return an object if it is found.
  * Instead of a TXT content, it can be an object of the class. Thus, the object is linked to a copy
  *  of the source of the parent element. The parent element can receive the changes of the object using method UpdateParent().
  */
 static function FindStartTag(&$TxtOrObj, $Tag, $PosBeg, $Forward = true)
 {
     if (is_object($TxtOrObj)) {
         $TxtOrObj->FindEndTag();
         $Txt = $TxtOrObj->GetSrc();
         if ($Txt === false) {
             return false;
         }
         $Parent =& $TxtOrObj;
     } else {
         $Txt =& $TxtOrObj;
         $Parent = false;
     }
     $PosBeg = clsTinyButStrong::f_Xml_FindTagStart($Txt, $Tag, true, $PosBeg, $Forward, true);
     if ($PosBeg === false) {
         return false;
     }
     return new clsTbsXmlLoc($Txt, $Tag, $PosBeg, null, $Parent);
 }

 function tag_ChangeCellType(&$Txt, $Loc, $Type)
 {
     // Change the cell type. This function assumes that the current cell has a type set to String. String type is expected since the cell contains a TBS tag.
     if ($Type === 'String') {
         return true;
     }
     $t0 = clsTinyButStrong::f_Xml_FindTagStart($Txt, 'Data', true, $Loc->PosBeg, false, true);
     if ($t0 === false) {
         return false;
     }
     // error in the XML structure
     $te = strpos($Txt, '>', $t0);
     if ($te === false || $te > $Loc->PosBeg) {
         return false;
     }
     // error in the XML structure
     $len = $te - $t0 + 1;
     $tag = substr($Txt, $t0, $len);
     $len = strlen($tag);
     $att = ' ss:Type="String"';
     $att2 = ' ss:Type="' . $Type . '"';
     $tag = str_replace($att, $att2, $tag);
     $Txt = substr_replace($Txt, $tag, $t0, $len);
     $diff = strlen($tag) - $len;
     if ($diff !== 0) {
         $Loc->PosBeg += $diff;
         $Loc->PosEnd += $diff;
     }
     $this->tag_ChangeCellFormat($Loc, $Type);
     return true;
 }