a"; return $qqq; } function random_dir($arrdir) { if(count($arrdir) < 2) return 0; return rand(0,count($arrdir)-1); } function resort($raw){ $raw1 = array(); $rraw = array(); $il=0; for ($i = 0; $i <= count($raw) - 1; $i++) { if(stristr($raw[$i],"<%rdc%>")) {$raw[$i]=str_replace("<%rdc%>","%rdc",$raw[$i]);} if(stristr($raw[$i],"<%num%>")) {$raw[$i]=str_replace("<%num%>","%num",$raw[$i]);} if(stristr($raw[$i],"<%link%>")) {$raw[$i]=str_replace("<%link%>","%link",$raw[$i]);} if(stristr($raw[$i],"<%text%>")) {$raw[$i]=str_replace("<%text%>","%text",$raw[$i]);} if(stristr($raw[$i],"<%bid%>")) {$raw[$i]=str_replace("<%bid%>","%bid",$raw[$i]);} if(stristr($raw[$i],"<%word%>")) {$raw[$i]=str_replace("<%word%>","%word",$raw[$i]);} if(stristr($raw[$i],"<%url%>")) {$raw[$i]=str_replace("<%url%>","%url",$raw[$i]);} if(stristr($raw[$i],"<%id%>")) {$raw[$i]=str_replace("<%id%>","%id",$raw[$i]);} if(stristr($raw[$i],"<%cgi2post%>")) {$raw[$i]=str_replace("<%cgi2post%>","%cgi2post",$raw[$i]);} if(stristr($raw[$i],"<%path%>")) {$raw[$i]=str_replace("<%path%>","%path",$raw[$i]);} if(stristr($raw[$i],"<%script%>")) {$raw[$i]=str_replace("<%script%>","%script",$raw[$i]);} } for ($i = 0; $i <= count($raw) - 1; $i++) { $rraw=explode( "<%", $raw[$i]); for ($i1 = 0; $i1 <= count($rraw) - 1; $i1++) {if($i1 != 0) {$raw1[$il]="<%".$rraw[$i1]; $il++;} else {$raw1[$il]=$rraw[$i1]; $il++;}}} $il=0; $raw=$raw1; for ($i = 0; $i <= count($raw) - 1; $i++) { $rraw=explode( "%>", $raw[$i]); for ($i1 = 0; $i1 <= count($rraw) - 1; $i1++) {if($i1 != count($rraw)-1) {$raw1[$il]=$rraw[$i1]."%>"; $il++;} else {$raw1[$il]=$rraw[$i1]; $il++;}}} $raw=$raw1; for ($i = 0; $i <= count($raw) - 1; $i++) { $raw1[$i]=str_replace("<%", "%", str_replace("%>","%",$raw[$i]));} return $raw1; } function str_ret_val ($str, $str_key, $str_spl) { if(($str = stristr(trim($str), $str_key)) === false) { return false;} else { $str = trim(substr(stristr($str, "="), 1)); if(($pos = strpos($str, $str_spl))=== false) { return $str;} else { return trim(substr($str, 0, $pos)); }}} function str_ins_val ($str, $str_key, $str_val, $str_spl) { if($str1 = str_ret_val($str, $str_key, $str_spl)) { return str_replace($str_key."=".$str1, $str_key."=".$str_val, $str);} else { return $str.$str_spl.$str_key."=".$str_val; }} function reverse($str = '') { return implode("",array_reverse(str_split($str))); } function rel_pop($record, $arr){ global $irf,$dtheme; global $param; global $script; global $aloc; $quest = array(); $arr1=array(); $sh = str_ret_val($record, "sh", "%"); $dr = str_ret_val($record, "dr", "%"); $type = str_ret_val($record, "type", "%"); $spl = str_ret_val($record, "spl", "%"); $head = str_ret_val($record, "head", "%"); $img_src = str_ret_val($record, "img_src", "%"); $st = str_ret_val($record, "st", "%"); $keys = array_keys($param); $rec=''; $hide_s=" onMouseOut=\"window.status='';return true;\" onMouseOver=\"window.status='Search for ""; $hide_e="\"';return true;\""; if($irf){$iref=invs_ref();}else{$iref="";} $rdn=1; if(count($arr)>2){$rdn=mt_rand(1,count($arr)-2);} for($ii=0; $ii <= count($arr) - 1; $ii++) { $arr1[$ii]=str_replace(" ", "+", $arr[$ii]);$arr1[$ii]=str_replace("&", "%26", $arr[$ii]); $quest[$ii]=$script."?qq=".$arr1[$ii]; if(!$param['ext']){for($i=0; $i < count($keys); $i++) { if(($keys[$i] != "theme"||$param[$keys[$i]] != $dtheme)&&strcmp("page",$keys[$i])&&strcmp("template_folder",$keys[$i])&&strcmp("aff",$keys[$i])&&strcmp("ext",$keys[$i])&&strcmp("pid",$keys[$i])&&strcmp("qq",$keys[$i])&&strcmp("nextsrch",$keys[$i])) {$quest[$ii]=$quest[$ii]."&".$keys[$i]."=".$param[$keys[$i]];}}} else{for($i=0; $i < count($keys); $i++) { if(($keys[$i] != "theme"||$param[$keys[$i]] != $dtheme)&&strcmp("page",$keys[$i])&&strcmp("qq",$keys[$i])&&strcmp("template_folder",$keys[$i])&&strcmp("ext",$keys[$i])&&strcmp("pid",$keys[$i])&&strcmp("nextsrch",$keys[$i])) {$quest[$ii]=$quest[$ii]."&".$keys[$i]."=".$param[$keys[$i]];}}} } if($dr == "g") { $rec = "

$head"; for($ii=1; $ii <= count($arr) - 2; $ii++) { if($ii==1){$rec = $rec."

$arr[$ii] ";} else{$rec = $rec."

$spl

$arr[$ii] ";} if($ii==(count($arr)-2)) { $rec=$rec.$iref;}} $rec = $rec."

";} if($dr == "v") { if($sh == "tab") {$rec .= ""; $rec = $rec."

$head"; for($ii=1; $ii <= count($arr) - 2; $ii++) { $rec = $rec."

$arr[$ii] \n"; if($ii==$rdn) { $rec=$rec.$iref;}} $rec = $rec."

";} if($sh == "ul") {$rec = "" : $rec=$rec.">"; $rec=$rec." $head"; for($ii=1; $ii <= count($arr) - 2; $ii++) { $rec = $rec."

$arr[$ii] \n"; if($ii==$rdn) { $rec=$rec.$iref;}} $rec = $rec."";} if($sh == "ulim") {$rec = "

";}} return $rec;} function proc($buf, $r_yes, $p_yes, $r_arr, $p_arr,$to){ global $n, $path; global $source,$dtheme; global $word; global $next; global $param; global $irf; global $script; global $aloc; $keys = array_keys($param); $to=$script.$to; $find_symb = false; if(stristr($buf,"%ini%") !== false) {$find_symb = true;} if(stristr($buf,"%REL") !== false) { $find_symb = true; if($r_yes) { return rel_pop($buf, $r_arr);}} if(stristr($buf,"%POP") !== false) {$find_symb = true; if($p_yes) {return rel_pop($buf, $p_arr);}} if (stristr($buf,"%previous") !== false) {$find_symb = true; if($n>1) { $prev_name = stristr($buf, "%previous"); $prev_name = substr(stristr($prev_name, "="), 1, strpos(stristr($prev_name,"="), "%") -1); return str_replace("%previous=".$prev_name."%", " $prev_name ", $buf);}} if (stristr($buf,"%next") !== false) {$find_symb = true; if( $next) { $to.="\"onMouseOut=\"window.status='';return true;\" onMouseOver=\"window.status='next';return true;"; $next_name=stristr($buf, "%next"); $next_name = substr(stristr($next_name, "="), 1, strpos(stristr($next_name,"="), "%") -1); return str_replace("%next=".$next_name."%", " $next_name ", $buf);}} if(!$find_symb) { $cgistuff = ""; foreach($param as $key => $val) { if(($key != "theme"||$val != $dtheme)&&strcmp("irf",$key)&&strcmp("ext",$key)&&strcmp("pid",$key)&&strcmp("qq",$key)&&strcmp("page",$key)&&strcmp("rdc",$key)&&strcmp("template_folder",$key)) {$cgistuff .= "";} } $buf = str_replace("%cgi2post", $cgistuff, $buf); $buf = str_replace("%path", $path, $buf); $buf = str_replace("%script", $script, $buf); $word = str_replace("+"," ",$word); return str_replace("%word", htmlentities($word, ENT_QUOTES), $buf);} } /////////////////////////////////////////////////////////////////////////////////////////////////////////////// if(isset($_SERVER['PHP_SELF'])) { $script = basename($_SERVER['PHP_SELF']); $fini = basename($_SERVER['PHP_SELF'],".php")."_ini.php"; if(!file_exists($fini)) {$fini = basename($_SERVER['PHP_SELF'],".php").".ini";} } else { $script = basename($HTTP_SERVER_VARS['PHP_SELF']); $fini = substr($script,0,strlen($script)-8)."_ini.php"; if(!file_exists($fini)) {$fini = substr($script,0,strlen($script)-4).".ini";} } $a_ini = array() ; $buffer = array(); $err = array(); $num = array(); $source = array(); $a_ini = file($fini); $irf = true; $templates = array(); $param = array(); $keys = array(); $get = array(); $ip=getenv("REMOTE_ADDR"); $get= @$_GET ? $_GET : $_POST; $scr_loc = $script; $tmpl_file = isset($get['qq']) ? "results.htm" : "index.htm"; // $nnn=fopen("rrrr.txt","w");fwrite($nnn,"script - $script, ini - $fini"); fclose($nnn); $param['tmpl'] = 0; for($i = 0; $i<=count($a_ini)-1; $i++) { if (!strcmp(trim(substr(trim($a_ini[$i]), 0, 15)), "template_folder")) $param['template_folder'] = str_ret_val($a_ini[$i], "template_folder", "/*"); if (!strcmp(trim(substr(trim($a_ini[$i]), 0, 4)), "tmpl")) $param['tmpl'] = str_ret_val($a_ini[$i], "tmpl", "/*"); if (!strcmp(trim(substr(trim($a_ini[$i]), 0, 13)), "default_theme")) $dtheme = $param['theme'] = str_ret_val($a_ini[$i], "default_theme", "/*"); if (!strcmp(trim(substr(trim($a_ini[$i]), 0, 3)), "rel")) $param['rel'] = str_ret_val($a_ini[$i], "rel", "/*"); if (!strcmp(trim(substr(trim($a_ini[$i]), 0, 3)),"pop")) $param['pop'] = str_ret_val($a_ini[$i], "pop", "/*"); if (!strcmp(trim(substr(trim($a_ini[$i]), 0, 3)),"rdc")) $param['rdc'] = str_ret_val($a_ini[$i], "rdc", "/*"); if (!strcmp(trim(substr(trim($a_ini[$i]), 0, 3)), "num")) $param['num'] = str_ret_val($a_ini[$i], "num", "/*"); if (!strcmp(trim(substr(trim($a_ini[$i]), 0, 3)), "aff")) $param['aff'] = str_ret_val($a_ini[$i], "aff", "/*"); if (!strcmp(trim(substr(trim($a_ini[$i]), 0, 3)), "irf")) {$param['irf'] = str_ret_val($a_ini[$i], "irf", "/*"); } if (!strcmp(trim(substr(trim($a_ini[$i]), 0, 3)), "ext")) {$param['ext'] = str_ret_val($a_ini[$i], "ext", "/*"); } if (!strcmp(trim(substr(trim($a_ini[$i]), 0, 6)), "source")) $source['source'] = str_ret_val($a_ini[$i], "source", "/*")."?out=fd";} //$nnn=fopen("rrrr.txt","w"); foreach($param as $key => $val) {fwrite($nnn,"$key => $val \n");} fclose($nnn); //$nnn=fopen("rrrr.txt","w"); for($i = 0; $i < count($templates); $i++) {fwrite($nnn,"$i => |$templates[$i]|");} fclose($nnn); if(!@$param['template_folder']) {$err['template_folder']="There is no value for template_folder in configuration file.
Write a name of temlate folder.\n";} if($source['source']){$hr1="go=a3RgsmNoLmZpbmR3aGF0LmNvbS9i3Q3MTYxJg9N1NhZjBUZE5Jdlc6OEdRNVJEcnJacEw1YllUamtzaVNIcDtsOFQ3YUkxemNabkpx=";} if(!@$source['source']) {$err['source']="There is no value for source in configuration file.
Write the link for input searched results.\n";} $keys = array_keys($get); $param['theme'] = @$get['theme']&&is_dir($param['template_folder']."/".$get['theme']) ? $get['theme'] : $param['theme']; if(!@$param['theme']) {$err['theme']="There is no value for default_theme in configuration file.
Write a default theme in config file.\n";} $source['pattern'] = $param['template_folder']."/".$param['theme']; $param['tmpl'] = $get['tmpl'] ? $get['tmpl'] : $param['tmpl']; $path = ""; if($param['tmpl'] && is_numeric($param['tmpl'])&& is_dir($source['pattern']."/".$param['tmpl'])) { $path = $source['pattern']."/".$param['tmpl']."/"; $source['pattern'] .= "/".$param['tmpl']."/".$tmpl_file; } if(!$path) { $arrdir = array(); $tt = array(); $d = dir($source['pattern']); if($d) { while (false !== ($entry = $d->read())) { if($entry!='.' && $entry!='..' && is_numeric($entry)) { $ent = $source['pattern'].'/'.$entry; if(is_dir($ent)) { $arrdir[] = $ent; $tt[] = $entry; } } } $d->close(); } $rnd = random_dir($arrdir); $get['tmpl'] = $tt[$rnd]; $path = $arrdir[$rnd]."/"; $source['pattern'] = $arrdir[$rnd]."/".$tmpl_file; } $buffer = @file($source['pattern']); $i = 0; foreach($get as $k => $v) { $sgn = $i ? "&" : "?"; $i++; $scr_loc .= $sgn.$k."=".$v; } if(!$buffer) {$err['open']="Error opening ".$source['pattern']." for reading
\n";} $buffer=resort($buffer); $search=array(); //$nnn=fopen("rrrr.txt","w"); for($i = 0; $i <= count($buffer) - 1; $i++) {fwrite($nnn,$buffer[$i]);} fclose($nnn); $i = 0; $j = 0; $k = 0; $n=0;$jk=0; //***************************************************************************************** if(isset($get['aff'])&&$param['ext']==1) {$get_aff=$get['aff'];}else {$get_aff='';} //****************************************************************************************** $js = " function locn(s) { wrf = window.open(arrLink[s],'NewWindow'+s); wrf.focus(); } "; for ($i = 0; $i <= count($buffer) - 1; $i++) { //************************************************************************************ if(stristr($buffer[$i],"%id")!==false){ if($get_aff!='') { $buf=str_replace("%id","&aff=$get_aff",$buffer[$i]); } else { $buf =str_replace("%id","",$buffer[$i]); } $buf =$buffer[$i]; } //************************************************************************************ if (stristr($buffer[$i],"%loop%") !== false) { $j = $i;} if ((stristr($buffer[$i],"") !== false||stristr($buffer[$i],"") !== false)&&$j>0&&$k==0) { $jk = $i;} if (stristr($buffer[$i],"%/loop%") !== false) { $k = $i;} if(stristr($buffer[$i],"%ini%") !== false) { if(stristr($buffer[$i],"aff") !== false) {$param['aff'] = str_ret_val($buffer[$i], "aff", "%");} if(stristr($buffer[$i],"rel") !== false) {$param['rel'] = str_ret_val($buffer[$i], "rel", "%");} if(stristr($buffer[$i],"irf") !== false) {$param['irf'] = str_ret_val($buffer[$i], "irf", "%");} if(stristr($buffer[$i],"pop") !== false) {$param['pop'] = str_ret_val($buffer[$i], "pop", "%"); } if(stristr($buffer[$i],"num") !== false) {$param['num'] = str_ret_val($buffer[$i], "num", "%");} if(stristr($buffer[$i],"rdc") !== false) {$param['rdc'] = str_ret_val($buffer[$i], "rdc", "%");} if(stristr($buffer[$i],"ext") !== false) {$param['ext'] = str_ret_val($buffer[$i], "ext", "%");} } if(stristr($buffer[$i],"%search%") !== false) { if(stristr($buffer[$i],"box_name") !== false) {$search['bn'] = str_ret_val($buffer[$i], "box_name", "%");} if(stristr($buffer[$i],"size") !== false) {$search['size'] = str_ret_val($buffer[$i], "size", "%");} if(stristr($buffer[$i],"knob_name") !== false) {$search['kn'] = str_ret_val($buffer[$i], "kn", "%");} if(stristr($buffer[$i],"type") !== false) {$search['type'] = strtolower(str_ret_val($buffer[$i], "type", "%"));} if(stristr($buffer[$i],"src") !== false) {$search['src'] = str_ret_val($buffer[$i], "src", "%"); } if(count($search)>0) { if(!isset($search['bn'])) {$search['bn']='search';} if(!isset($search['kn'])) {$search['kn']='go';} if(!isset($search['size'])) {$search['size']='20';} if(!isset($search['type'])) {$search['type']='submit';} if($search['type']=='image'&&!isset($search['src'])) {$search['type']='submit';} } //print_r($search); exit; if($get_aff!='') { $s=""; $buffer[$i]=$s; } } if($jk==0){$jk=$k-1; } //$nnn=fopen("rrrr.txt","w"); foreach($param as $key => $val) {fwrite($nnn,"$key => $val \n");} fclose($nnn); //---------------------from get-------------------------------------------------- for($i=0; $i < count($keys); $i++) { if(strcmp("qq",$keys[$i])==0) {$param[$keys[$i]]=$get[$keys[$i]]; $param[$keys[$i]]=urlencode($param[$keys[$i]]);} elseif(strcmp("page",$keys[$i])==0){$param[$keys[$i]]=$get[$keys[$i]]; $n = 2;} elseif(strcmp("ext",$keys[$i])!=0) {$param[$keys[$i]]=$get[$keys[$i]];}} if($n ==0) {$n=1;} //$nnn=fopen("rrrr.txt","w"); foreach($param as $key => $val) {fwrite($nnn,"$key => $val \n");} fclose($nnn); if(($param['rdc'] != 0 ) && ($param['rdc'] != 1 )) { $param['rdc'] = 0 ;} for ($i = 0; $i <= count($buffer) - 1; $i++) { if((($pos_r = strpos($buffer[$i],"%rdc")) !== false)&&(stristr($buffer[$i],"%ini%") === false)) { if($param['rdc'] == 0 ) { $bb=stristr(stristr($buffer[$i],"%rdc"),">"); // $buffer[$i]=substr_replace($buffer[$i]," target=_blank onMouseOut=\"window.status='';return true;\" onMouseOver=\"window.status='http://%url';return true;\"".$bb, strpos($buffer[$i],">",$pos_r)); $buffer[$i]=substr_replace($buffer[$i]," onMouseOut=\"window.status='';return true;\" onMouseOver=\"window.status='http://%url';return true;\"".$bb, strpos($buffer[$i],">",$pos_r)); }else{ $bb=stristr(stristr($buffer[$i],"%rdc"),">"); // $buffer[$i]=substr_replace($buffer[$i]," target=_blank".$bb, strpos($buffer[$i],">",$pos_r)); $buffer[$i]=substr_replace($buffer[$i]," ".$bb, strpos($buffer[$i],">",$pos_r)); }}} $keys=array(); $keys=array_keys($param); for($i=0; $i < count($keys); $i++) { if(($keys[$i] != "theme"||$param[$keys[$i]] != $dtheme)&&strcmp("irf",$keys[$i]) && strcmp("ext",$keys[$i])&&strcmp("template_folder",$keys[$i])&& strcmp("rdc",$keys[$i])&& strcmp("tmpl",$keys[$i])) {$source['source']=$source['source']."&".$keys[$i]."=".$param[$keys[$i]];}} if(!isset($get['surfer_ip'])||$get['surfer_ip']=='') {$source['source']=$source['source']."&surfer_ip=".$ip;} if(!isset($param['ext'])||$param['ext'] != 1 ) {$param['ext']=0;} if($param['irf']==0) {$irf=false;} if(!$param['num']) { $param['num']="15";} $ni=mt_rand(0,2); $numb=(int)$param['num']; for($i=0; $i <= $ni; $i++) { $num[$i]=mt_rand(1,$numb); } sort($num); $word = str_replace("+"," ",str_ret_val($source['source'], "qq=","&")); //$word = html_entity_decode($word); $word = str_replace("%26","&",str_ret_val($source['source'], "qq=","&")); //$word=$word." ".$numb."-".$ni."-".count($num)."(".$num[0].",".$num[1].",".$num[2].")"; if(!$param['aff']) {$err['aff']="There is no value for aff in configuration file.
Write your id number.\n";} if(count($err)) { $error=" Error

Error

"; foreach($err as $key => $value) { if($err[$key]) {$error=$error."

".$value."

";}} $error=$error."

Find and buy toyota park.Official site of the 2009 Jeep wrangler.Visit Subaru of America for reviews, pricing and photos of impreza.2006 Nissan 350Z highlights from Consumer Guide Automotive. Learn about the 2006 nissan 350z.Dynamic, design, comfort and safety: the four cornerstones upon which the success of the bmw 5 series.Find and buy toyota center kennewick.Contact: View company contact information fo protege.What does this mean for legacy.The website of American suzuki motorcycle.The site for all new 2009 chevy.Use the Organic natural food stores.Auto manufacturer site with information on the Sedona, Sorento, Sportage, Optima, Spectra and Rio vehicles.kia.Get more online information on hyundai getz.Find and buy used nissan 350z.Kia cars, commercial vehicles, dealers, news and history in Australia. kia com.Site for Ford's cars and minivans, trucks, and SUVs. Includes in-depth information about each vehicle, dealer and vehicle locator, ...fords dealers.The Web site for Toyota Center � Houston, Texas' premier sports and entertainment facility, and the only place to buy tickets to Toyota Center toyota center seating.Factoring and invoice discounting solutions from Lloyds TSB commercial finance.Read Fodor's reviews to find the best travel destinations, hotels and restaurants. Plan your trip online with Fodor's.travel guide.Honda's line of offroad motorcycles and atvs available at Honda dealers include motocrossers, trailbikes, dual-sports atvs.Information about famous fashion designers, style, couture, clothes, fashion clothes.Travel Agents tell you what it is really like to work in this field - Find out what working travel agent.Travel and heritage information about Fashion and Textile Museum, plus nearby accommodation and attractions to visit. Part of the Greater London Travel fashion.Get buying advice on the Mazda rx8foods to avoid with diareah

foods to avoid with diareah

they have been

"; echo $error; exit;} if(isset($get['pos'])) { if(strstr($get['pos'],"l") !== false) { $loc=$get['al']."?surfer_ip=".$ip; foreach($param as $key => $val) { if(($key != "rd")&&($key != "al")&&($key != "irf")&&($key != "ext")&&($key != "tmpl")&&($key != "rdc")&&($key != "rel")&&($key != "pop")&&($key != "num")) {$loc=$loc."&".$key."=".rawurlencode($val);} } // $nnn=fopen("rrrr.txt","w");fwrite($nnn,$loc); fclose($nnn); header("Location: $loc"); exit;}} if(isset($get['rd'])) { $loc=$get['al']."?surfer_ip=".$ip; foreach($param as $key => $val) { if(($key != "rd")&&($key != "al")&&($key != "irf")&&($key != "ext")&&($key != "tmpl")&&($key != "rdc")&&($key != "rel")&&($key != "pop")&&($key != "num")) {$loc=$loc."&".$key."=".rawurlencode($val);} } // $nnn=fopen("rrrr.txt","w");fwrite($nnn,$loc); fclose($nnn); //$nnn=fopen("rrrr.txt","w"); fwrite($nnn,$_SERVER['HTTP_REFERER']); fclose($nnn); header("Location: $loc"); exit; } // $nnn=fopen("rrrr.txt","w");fwrite($nnn,$source['source']); fclose($nnn); //echo $param['pop']; $oldstr = array("%num", "%link", "%text", "%url", "%rdc", "%bid", "%word"); $next = false; $pop_y = false; $rel_y = false; $to=''; // $nnn=fopen("rrrr.txt","w");fwrite($nnn,$source['source']); fclose($nnn); //echo $source['source']; $err=array(); $source['source'] .= "&ref=".urlencode("http://".$_SERVER['SERVER_NAME'].$_SERVER['REQUEST_URI']); $err = file($source['source']); $ai=0; $ei=0; $a_ini=array();$ee=false;$sc=0; while($ei < count($err)){ if((strstr($err[$ei], "REL|")!==false) || (strstr($err[$ei], "POP|")!==false) || (strstr($err[$ei], "NEXT|")!==false)) {$ee=true;} if(!$ee){$sc=$sc + substr_count($err[$ei],"|"); if($sc > 4) { $a_ini[$ai]=$a_ini[$ai].$err[$ei]; $ei++; $ai++; $sc=0;$a_ini[$ai]="";} else { $a_ini[$ai]=$a_ini[$ai].$err[$ei]; $ei++;}} else { if((strncmp($err[$ei],"POP",3) ==0) ||(strncmp($err[$ei],"REL",3) ==0)||(strncmp($err[$ei],"NEXT",4)==0)){ $a_ini[$ai]=$err[$ei]; $ai++; $ei++;} else{$ai--; $a_ini[$ai]=$a_ini[$ai].$err[$ei]; $ai++; $ei++;}}} //$nnn=fopen("rrrr.txt","w"); for($i = 0; $i <= count($a_ini) - 1; $i++) {fwrite($nnn,$a_ini[$i])."\n";} fclose($nnn); $rel_a=array();$pop_a=array();$is_al=false; for($i=0; $i <= count($a_ini) - 1; $i++) { if(!$is_al){$is_al=true;$ntl=explode( "|", $a_ini[$i]); $aloc=substr($ntl[4],0,strpos($ntl[4],"?")); $aloco = $aloc;} if(strstr($a_ini[$i], "REL|")) { $rel_a = explode( "|",$a_ini[$i]);$rel_y = true;} if(strstr($a_ini[$i], "NEXT")) { $next = true; $to=substr(strstr($a_ini[$i], ".php?"),4); if(!$param['ext']) {$to=substr($to,0,strpos($to,"aff=")).substr(strstr(substr(strstr($to,"aff="),3),"&"),1);} $to=substr($to,0,strpos($to,"surfer_ip")).substr(strstr(substr(strstr($to,"surfer_ip"),5),"&"),1); // $to=substr($to,0,strpos($to,"out=")).substr(strstr(substr(strstr($to,"out="),3),"&"),1); if($param['tmpl']!=''){$to.="&tmpl=".$param['tmpl'];} $nip = @$get['surfer_ip'] ? $get['surfer_ip'] : $ip; $to.="&surfer_ip=".$nip;} if(strstr($a_ini[$i], "POP|")) { $pop_y = true; $pop_a = explode( "|", $a_ini[$i]);}} $pop_a = array_slice($pop_a, 0, $param['pop']+2); $k = $k ? $k : -1; for ($i = 0; $i <= $j -1; $i++) { echo proc($buffer[$i], $rel_y, $pop_y, $rel_a, $pop_a,$to);} $ni=0; $jsvar = "