Text Analysis Tool

Click on the icon to show examples

Shows the 6th couplet from all poems in the Necati text.
Search for:	Show UTF-8	in XML File:
Show all lines that have an instance of the word "o{n=}arur" in the Necati text.
Search for:	Show UTF-8	in XML File:
Try entering these examples in the tool below

Analysis Tool

Search for:	Show UTF-8		in XML File:

'; //End Of Tool Interface //Declare Diagrph arrays $UTF8 = array('Ā','ā','ă','Ç','ç','Ḍ','ḍ','ė','Ğ','ğ','Ġ','ġ','Ḥ','ḥ','Ḫ','ẖ','Ī','ī','ĭ','İ','ı','Ḳ','ḳ','Ñ','ñ','Ö','ö','Ō','ō','Ş','ş','Ṣ','ṣ','S̲','s̲','Ṭ','ṭ','Ü','ü','Ū','ū','Ż','ż','Ẓ','ẓ','Ẕ','ẕ','ˀ','ʿ',' ̮','·'); $Diagraph = array('{A=}','{a=}','{a-}','{C,}','{c,}','{D!}','{d!}','{e.}','{G=}','{g=}','{G.}','{g.}','{H!}','{h!}','{H-}','{h-}','{I=}','{i=}','{i-}','{I.}','{i.}','{K!}','{k!}','{N=}','{n=}','{O:}','{o:}','{O=}','{o=}','{S,}','{s,}','{S!}','{s!}','{S-}','{s-}','{T!}','{t!}','{U:}','{u:}','{U=}','{u=}','{Z.}','{z.}','{Z!}','{z!}','{Z-}','{z-}','{*}','{@}','{--}','{..}'); // Get variables from HTML Form $query = $_REQUEST['query']; $option = $_REQUEST['option']; $diagraph = $_REQUEST['diagraph']; //must create a default for &filename to avoid empty string error when loading the xml into dom object bellow. 2007-05-17 $filename = $_REQUEST['filename']; if(empty($filename)){ $filename = 'smNecati.xml'; } $filename2 = 'search2.xsl'; //increase Time Limit OF PHP Functions(5 min) set_time_limit(300); //If Wordlist display pre-generated text if($option == 'WRDLIST') { $wrdfile = str_replace('xml','txt',$filename); if (is_readable($wrdfile)) { $lines = file($wrdfile); // Loop through our array foreach ($lines as $line_num => $line) { echo "$line"; } } else { echo ' WordList not available'; } } //IF NOT A WORD LIST else { //If Search Term has UTF-8 Convert to Diagraph for($i=0; $i < count($UTF8); $i++) { If(strpos($query ,$UTF8[$i])!== False) { $query = str_replace($UTF8[$i],$Diagraph[$i],$query); } } //Format variables for XSL stylesheet if($diagraph == "on") { $diagraph = "True"; } if($option == 'B_WRD') { $query = " $query"; $option = 'WRD'; } else if($option == 'E_WRD') { $query = "$query "; $option = 'WRD'; } else if($option == 'X_WRD') { $query = " $query "; $option = 'WRD'; } else if($option == 'WRDLIST') { $filename2 ='wordlist.xsl'; } else if($option == 'DOC') { $filename2 ='doc.xsl'; } // Load the XML document $xml = new DOMDocument; $xml->load($filename); // Load the XSL stylesheet $xsl = new DOMDocument; $xsl->load($filename2); // Configure the processor $proc = new XSLTProcessor; // Attach the xsl rules $proc->importStyleSheet($xsl); // Pass parameters to the XSL Stylesheet $proc->setParameter('', 'option', $option); $proc->setParameter('', 'query', $query); $proc->setParameter('', 'diagraph', $diagraph); // Output XHTML echo $proc->transformToXML($xml); } //Function to make an object into an array function object2array ( $object ) { if ( !is_object ( $object ) ) return $object; $return = array (); $var = get_object_vars ( $object ); while ( list ( $k, $v ) = each ( $var ) ) $return [ $k ] = object2array ( $v ); return $return; } //Function to flatten an array function flattenArray($array) { $flatArray = array(); foreach( $array as $subElement ) { if( is_array($subElement) ) $flatArray = array_merge($flatArray, flattenArray($subElement)); else $flatArray[] = $subElement; } return $flatArray; } ?>