100) { return; } //---------------------------------------------------------- // create a string $s_dir containing the full current path. //---------------------------------------------------------- $s_dir=""; for ($c=0; $c<=$dir_depth; $c++) { $s_dir .= $cur_path[$c]; } //-------------------------------------------------------------------- // Open the directory, and read all the files from it one by one... //-------------------------------------------------------------------- $dhandle=opendir("$s_dir"); while ($file = readdir($dhandle)) { //------------------------------------------------- // Ignore the 'this' and 'parent' directory items //------------------------------------------------- if (($file!=".") && ($file!="..")) { //------------------------------------------------------------------------- // if the file is a regular file - check it for the search text. // Only check files with a .php extension - this is all there is on WB! //------------------------------------------------------------------------- if (is_file($s_dir.$file)) { $file_ext = substr($file, strlen($file)-3, 3); if ($file_ext == "htm") { search_file($s_dir.$file); } } //---------------------------------------------------------------------------------------- // if the file is a directory - add it to the current_path and call this function again. //---------------------------------------------------------------------------------------- elseif (is_dir($file)) { $cur_path[++$dir_depth] = ($file."/"); search_dir(); $dir_depth--; } } } } // End of function. //---------------------------------------------------------------- // Function: search_file() - searches a file for the search term //---------------------------------------------------------------- function search_file ($file) { global $search_term, $results, $r_text, $r_title, $matches; //---------------------------------------------------------- // create a string $s_dir containing the full current path //---------------------------------------------------------- $s_dir=""; for ($c=0; $c<=$dir_depth; $c++) { $s_dir .= $cur_path[$c]; } //----------------------------------------------------------------------------------------- // Open the file, read it's contents into a variable $f_data. Create a lowercase version so // the search is case insensitive, then check that for the search term. //----------------------------------------------------------------------------------------- $f_size = filesize($file); $f_handle = fopen($file, "r"); $f_data = fread($f_handle, $f_size); //-------------------------------------------------------------------- // If the file contains 'SSIGNORE' - Don't Search it. This prevents // scripts and other non-content files from being searched. //-------------------------------------------------------------------- if ($text = strstr($f_data, 'SSIGNORE')) { return; } $f_dlc = strtolower($f_data); $t_text = ""; $in_tag = 0; if ($text = strstr($f_dlc, $search_term)) { $results[$matches] = $file; //------------------------------------ // Remove any HTML tags from the text //------------------------------------ for ($c = 0; $c < 200; $c++) { if (strcmp(substr($text, $c, 3), "<") == 0) { $in_tag=1; } elseif (strcmp(substr($text, $c, 3), ">") == 0) { $in_tag=0; } elseif ($in_tag == 0) { $t_text .= substr($text, $c, 1); } } $r_text [$matches] = "...". $t_text. "..."; $t_start = strpos ($f_dlc, "") + 7; $t_end = strpos ($f_dlc, ""); $r_title[$matches++] = substr($f_data, $t_start, $t_end-$t_start); } fclose($f_handle); } // End of function. ?>
Explore Qur'an
Explore Qur'an
Bismilla_hir rahma_nir rahim

Search

 
Home
 
Messages
 
Greetings
 
Articles
Feed Back
What is New
 
Contact us
Bismilla_hir rahma_nir rahim

To search for orignal text in (Arabic) of The Holy Qur'an follow the link below.
After opening the web page (www.....1_1.gif) just change the "Surah_Ayat" number in the address bar follwed by Enter.

You may search our web site for all documents containing matching words or patterns.

"; echo "$r_title[$a]"; } echo "

$matches Matches.

"; ?>