26-05-2015
<?php
function customerr($errno,$errstr)
{
echo "<b>Error:</b> [".$errno."]<br/>Due to ".$errstr;
}
function flatdelete2($file,$arr)
{
if(!file_exists($file))
return false;
else
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
//
$aw=sizeof($a2);
if($aw>1)
{
$q=$x=0;
for($i=0;$i<sizeof($a2);$i++)
{
for($h=0;$h<sizeof($arr);$h++)
{
if($i==$arr[$h])
$q++;
}
if($q==0)
{
$ad[$x]=$a2[$i];
$x++;
}
$q=0;
}
$st=sizeof($ad);
$tu=$ad[0]."@|@";
for($i=1;$i<$tu;$i++)
$tu=$tu.$ad[$i]."@|@";
$a4=@file_put_contents($file,$tu);
if($a4)
return true;
else
return false;
}
else
return false;
//
}
}
}
}
//dublicate words remover
function dub_remover($u)
{
$pos[0]=0;
$r=0;
if(is_array($u))
{
foreach($u as $ab=>$bc)
$r++;
if($r>=1)
{
$s=$o=$w=$q=$x=0;
for($i=0;$i<$r;$i++)
{
for($j=$o;$j<$r;$j++)
{
if($i!=$j)
{
if($u[$i]==$u[$j])
{
$pos[$s]=$j;
$s++;
}
}
}
$o++;
}
if($pos[0]==0)
{
for($i=0;$i<$r;$i++)
{
$ad[$i]=$u[$i];
}
return $ad;
}
else
{
foreach($pos as $k=>$v)
$w++;
for($i=0;$i<$r;$i++)
{
for($h=0;$h<$w;$h++)
{
if($i==$pos[$h])
$q++;
}
if($q==0)
{
$ad[$x]=$u[$i];
$x++;
}
$q=0;
}
return $ad;
}
}
else
return false;
}
else
return false;
}
//badwords remover
function badword_remover($h,$badwords)
{
foreach($badwords as $k=>$v)
{
$h=str_replace($v,"***",$h);
}
return $h;
}
function flatasc1($crperpage,$aw,$crp=1)
{
$crass38=$crp*$crperpage;
$crstart=$crass38-$crperpage;
$cre=$crp*$crperpage;
if($aw<$cre)
{
$crend=$aw;
}
else
{
$crend=$cre;
}
$frloop=0;
for($crstart;$crstart<$crend;$crstart++)
{
$asc[$frloop]=$crstart;
$frloop++;
}
return $asc;
}
function flatdes1($crperpage,$aw,$crp=1)
{
$aw=$aw-1;
$crmtotal=$aw;
$crmper=$crperpage;
$crmur2=$crp-1;
$crmstart=(($crmtotal+1)-(($crmur2*$crmper)+1));
if($crmstart<$crmper)
{
$crmend=-1;
}
else
{
$crmend=((($crmtotal+1)-(($crmur2*$crmper)+1))-$crmper);
}
$frloop=0;
for($cri2=$crmstart;$cri2>$crmend;$cri2--)
{
$des[$frloop]=$cri2;
$frloop++;
}
return $des;
}
function flatasc($crperpage,$aw)
{
if(isset($_GET["p"]))
{
$crp=$_GET["p"];
}
else
{
$crp=1;
}
$crass38=$crp*$crperpage;
$crstart=$crass38-$crperpage;
$cre=$crp*$crperpage;
if($aw<$cre)
{
$crend=$aw;
}
else
{
$crend=$cre;
}
$frloop=0;
for($crstart;$crstart<$crend;$crstart++)
{
$asc[$frloop]=$crstart;
$frloop++;
}
return $asc;
}
function flatdes($crperpage,$aw)
{
if(isset($_GET["p"]))
{
$crp=$_GET["p"];
}
else
{
$crp=1;
}
$aw=$aw-1;
$crmtotal=$aw;
$crmper=$crperpage;
$crmur2=$crp-1;
$crmstart=(($crmtotal+1)-(($crmur2*$crmper)+1));
if($crmstart<$crmper)
{
$crmend=-1;
}
else
{
$crmend=((($crmtotal+1)-(($crmur2*$crmper)+1))-$crmper);
}
$frloop=0;
for($cri2=$crmstart;$cri2>$crmend;$cri2--)
{
$des[$frloop]=$cri2;
$frloop++;
}
return $des;
}
function smilies($cmt2,$url)
{
$image=array('[:)'=>'img27.gif',
':)'=>'img1.gif',
'>:('=>'img10.gif',
':(('=>'img2.gif',
':('=>'img3.gif',
':DD'=>'img4.gif',
':D'=>'img5.gif',
':o'=>'img6.gif',
'O_O'=>'img7.gif',
':P'=>'img8.gif',
'B)'=>'img9.gif',
'o_O'=>'img11.gif',
'>_>'=>'img12.gif',
'-_-'=>'img13.gif',
'O:-)'=>'img18.gif',
':-('=>'img14.gif',
'[:-)'=>'img28.gif',
':-))'=>'img26.gif',
':-)'=>'img15.gif',
'^^'=>'img16.gif',
';)'=>'img17.gif',
':pardon:'=>'img46.gif',
':p'=>'img19.gif',
';-D'=>'img20.gif',
':*('=>'img21.gif',
']:->'=>'img22.gif',
'(y)'=>'img23.gif',
'<3'=>'img24.gif',
':*'=>'img25.gif',
':-O'=>'img29.gif',
'?-|'=>'img30.gif',
':aggressive:'=>'img31.gif',
':bomb:'=>'img32.gif',
':bye:'=>'img33.gif',
':celebrate:'=>'img34.gif',
':clap:'=>'img35.gif',
':confused:'=>'img36.gif',
':crazy:'=>'img37.gif',
':dance:'=>'img38.gif',
':fool:'=>'img39.gif',
':inlove:'=>'img40.gif',
':LOL:'=>'img41.gif',
':lol:'=>'img42.gif',
':mamba:'=>'img43.gif',
':drink:'=>'img44.gif',
':mock:'=>'img45.gif',
':rofl:'=>'img47.gif',
':rolleyes:'=>'img48.gif',
':rose:'=>'img49.gif',
':shy:'=>'img51.gif',
':secret:'=>'img50.gif',
':sick:'=>'img52.gif',
':sorry:'=>'img53.gif',
':wack:'=>'img54.gif',
':yay:'=>'img56.gif',
':wacko:'=>'img55.gif'
);
foreach($image as $s=>$xc)
{
$cmt2=str_replace($s,"<img src='".$url.$xc."' alt='*'/>",$cmt2);
}
return $cmt2;
}
function bb_to_html($cmtt)
{
$bbtags=array('[h1]'=>'<h1>',
'[/h1]'=>'</h1>',
'[b]'=>'<b>',
'[/b]'=>'</b>',
'[u]'=>'<u>',
'[/u]'=>'</u>',
'[br]'=>'<br/>',
'[br/]'=>'<br/>',
'[quote]'=>'<span style="background-color:#777777;color:#eee;font-weight:bold;">',
'[/quote]'=>'</span>',
'(c)'=>'�',
'(r)'=>'�',
'[i]'=>'<i>',
'[/i]'=>'</i>');
$cmtt=str_ireplace(array_keys($bbtags),array_values($bbtags),$cmtt);
$bbextended=array("/\[url](.*?)\[\/url]/is"=>"<a href=\"$1\">$1</a>",
"/\[url=(.*?)\](.*?)\[\/url\]/is"=>"<a href=\"$1\" title=\"$1\">$2</a>",
"/\[size=(.*?)\](.*?)\[\/size\]/is"=>"<div style=\"font-size:$1\">$2</div>",
"/\[color=(.*?)\](.*?)\[\/color\]/is"=>"<span style=\"color:#$1\">$2</span>",
"/\[ul](.*?)\[\/ul]/is"=>"<ul>$1</ul>",
"/\[ol](.*?)\[\/ol]/is"=>"<ol>$1</ol>",
"/\[li](.*?)\[\/li]/is"=>"<li>$1</li>",
"/\[img](.*?)\[\/img]/is"=>"<img src=\"$1\" alt=\"$1\" style=\"max-width:500px\"/>");
foreach($bbextended as $match=>$replacement)
{
$cmtt=preg_replace($match,$replacement,$cmtt);
}
return $cmtt;
}
function html_to_bb($cmtt)
{
$bbtags=array('[h1]'=>'<h1>',
'[/h1]'=>'</h1>',
'[b]'=>'<b>',
'[/b]'=>'</b>',
'[u]'=>'<u>',
'[/u]'=>'</u>',
'[br]'=>'<br/>',
'[br/]'=>'<br/>',
'[quote]'=>'<span style="background-color:#777777;color:#eee;font-weight:bold;">',
'[/quote]'=>'</span>',
'(c)'=>'�',
'(r)'=>'�',
'[i]'=>'<i>',
'[/i]'=>'</i>');
$cmtt=str_ireplace(array_values($bbtags),array_keys($bbtags),$cmtt);
$bbextended=array("/\<a href=\"(.*?)\" title=\"(.*?)\"\>(.*?)\<\/a\>/is"=>"[url=$1]$3[/url]",
'/\<a href="(.*?)"\>(.*?)\<\/a\>/is'=>"[url]$1[/url]",
"/\[url=(.*?)\](.*?)\[\/url\]/is"=>"<a href=\"$1\" title=\"$1\">$2</a>",
"/\[size=(.*?)\](.*?)\[\/size\]/is"=>"<div style=\"font-size:$1\">$2</div>",
"/\[color=(.*?)\](.*?)\[\/color\]/is"=>"<span style=\"color:#$1\">$2</span>",
"/\<ul>(.*?)\<\/ul>/is"=>"[ul]$1[/ul]",
"/\<ol>(.*?)\<\/ol>/is"=>"[ol]$1[/ol]",
"/\<li>(.*?)\<\/li>/is"=>"[li]$1[/li]",
"/\[img](.*?)\[\/img]/is"=>"<img src=\"$1\" alt=\"$1\"/>");
foreach($bbextended as $match=>$replacement)
{
$cmtt=preg_replace($match,$replacement,$cmtt);
}
return $cmtt;
}
function pagination($cmttotal,$cmtcurrent,$cmper)
{
if($cmttotal>=$cmper)
{
$cmtrtotalpages=round($cmttotal/$cmper);
$cmtrtotalpages2=$cmttotal/$cmper;
if($cmtrtotalpages2>$cmtrtotalpages)
{
$cmtrtotalpages=$cmtrtotalpages+1;
}
$cmtrpagesar['«'] = "1";
if($cmtcurrent > 1)
{
$cmtrcmtd=$cmtcurrent-1;
$cmtrpagesar['‹'] = $cmtrcmtd;
if($cmtrcmtd==1)
{
$cmtrst=1;
}
else if($cmtrcmtd==2)
{
$cmtrst=$cmtrcmtd-1;
}
else if($cmtrcmtd>=3)
{
$cmtrst=$cmtrcmtd-2;
}
for($cmtri1=$cmtrst;$cmtri1<=$cmtrcmtd;$cmtri1++)
{
$cmtrpagesar[$cmtri1] = $cmtri1;
}
}
if($cmtrtotalpages > $cmtcurrent+4)
{
$cmtrfinalstop=$cmtcurrent+4;
}
else
{
$cmtrfinalstop=$cmtrtotalpages;
}
for($cmtrj1=$cmtcurrent;$cmtrj1<=$cmtrfinalstop;$cmtrj1++)
{
$cmtrpagesar[$cmtrj1] = $cmtrj1;
}
if($cmtrtotalpages > $cmtcurrent)
{
$cmtrpagesar['›'] = $cmtcurrent+1;
}
$cmtrpagesar['»'] = $cmtrtotalpages;
}
else
{
$cmtrpagesar['1'] = "1";
}
return $cmtrpagesar;
}
function logic1($array,$limit,$how,$tr,$fa)
{
$nh=$array;
for($i=0;$i<$limit;$i++)
{
if(isset($nh[$i])!=$how)
{
$nh[$i]=$fa;
}
else
{
$nh[$i]=$tr;
}
}
for($j=0;$j<$limit;$j++)
{
$nq[$j]=$nh[$j];
}
return $nq;
}
function flatsrchcol3($string,$search,$col)
{
$qa1=$string;
$qa2=$search;
$qa3=$col;
$a2=explode("@|@",$qa1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
$cl=$qa3-1;
$ew=0;
for($a4=0;$a4<$a3;$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
if($a5[$a4][$cl]==$qa2)
{
$sd[$ew]=$a2[$a4];
$ew++;
}
}
return $sd;
}
}
//return 1:|:2 2:|:3 3:|:4
function flatsrchcol9($file,$search,$col)
{
$a1=@file_get_contents($file);
if($a1)
{
$qa1=$a1;
$qa2=$search;
$qa3=$col;
$a2=explode("@|@",$qa1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
$cl=$qa3-1;
$ew=0;
for($a4=0;$a4<($a3-1);$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
if($a5[$a4][$cl]==$qa2)
{
$sd[$ew]=$a2[$a4];
$ew++;
}
}
if(!isset($sd))
return false;
else
return $sd;
}
}
else
return false;
}
function flatsrchcol4($string,$search,$col)
{
$qa1=$string;
$qa2=$search;
$qa3=$col;
$a2=explode("@|@",$qa1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
$cl=$qa3-1;
$ew=0;
for($a4=0;$a4<$a3;$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
if($a5[$a4][$cl]==$qa2)
{
$ar=$a4+1;
$sd[$ew]=$ar;
$ew++;
}
}
return $sd;
}
}
function flatarrtosave2($file,$array,$col)
{
$n=$array;
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
}
for($a4=0;$a4<$a3;$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
}
if(is_array($a5[0]))
{
$a6=0;
foreach($a5[0] as $key=>$val)
{
$a6++;
}
}
$n3=0;
$col=$col-1;
foreach($n as $n1=>$n2)
{
$a5[$n1][$col]=$n2;
}
$a3=$a3-1;
for($a11=0;$a11<$a3;$a11++)
{
for($a12=0;$a12<$a6;$a12++)
{
if($a11==0 && $a12==0)
{
if($a12==0)
{
$ass=$a5[$a11][$a12];
}
else
{
$ass=$ass.":|:".$a5[$a11][$a12];
}
}
else
{
if($a12==0)
{
$ass=$ass.$a5[$a11][$a12];
}
else
{
$ass=$ass.":|:".$a5[$a11][$a12];
}
}
}
$ass=$ass."@|@";
}
return $ass;
}
}
function flatsrcharr($file,$srch,$col)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
$cl=$col-1;
$xz=0;
for($a4=0;$a4<($a3-1);$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
if($a5[$a4][$cl]==$srch)
{
$sd[$xz]=$a4;
$xz++;
}
}
if(!isset($sd))
$od=false;
else
$od=$sd;
}
return $od;
}
return false;
}
function flatsrcharr2($file,$srch,$col,$srch1,$col1)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
$cl=$col-1;
$cl1=$col1-1;
$xz=0;
for($a4=0;$a4<($a3-1);$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
if($a5[$a4][$cl]==$srch && $a5[$a4][$cl1]==$srch1)
{
$sd[$xz]=$a4;
$xz++;
}
}
if(!isset($sd))
$od=false;
else
$od=$sd;
}
return $od;
}
return false;
}
function flatsrchcol($file,$srch,$col)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
$cl=$col-1;
for($a4=0;$a4<($a3-1);$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
if($a5[$a4][$cl]==$srch)
{
$sd=$a4;
}
}
if(!isset($sd))
$od=false;
else
$od=$a2[$sd];
}
return $od;
}
return false;
}
function flatsrchcol21($file,$srch,$col)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
$cl=$col-1;
$sd='a';
for($a4=0;$a4<($a3-1);$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
if($a5[$a4][$cl]==$srch)
{
$sd=$a4+1;
}
}
if($sd!='a')
$od=$sd;
else
return false;
}
return $od;
}
return false;
}
function flatsrchcol2($file,$srch,$col)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
$cl=$col-1;
$sd='a';
for($a4=0;$a4<($a3-1);$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
if($a5[$a4][$cl]==$srch)
{
$sd=$a4;
}
}
if($sd=='a')
return false;
else
$od=$sd+1;
}
return $od;
}
return false;
}
function flatsrchcol6($file,$srch,$col,$srch1,$col1)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
$cl=$col-1;
$cl1=$col1-1;
$sd='a';
for($a4=0;$a4<($a3-1);$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
if($a5[$a4][$cl]==$srch && $a5[$a4][$cl1]==$srch1)
{
$sd=$a4+1;
}
}
if($sd!='a')
$od=$sd;
else
return false;
}
return $od;
}
return false;
}
function flatsrchcol63($file,$srch,$col,$srch1,$col1,$srch2,$col2)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
$cl=$col-1;
$cl1=$col1-1;
$cl2=$col2-1;
$sd='a';
for($a4=0;$a4<($a3-1);$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
if($a5[$a4][$cl]==$srch && $a5[$a4][$cl1]==$srch1 && $a5[$a4][$cl2]==$srch2)
{
$sd=$a4+1;
}
}
if($sd!='a')
$od=$sd;
else
return false;
}
return $od;
}
return false;
}
function flatsrchcol5($file,$srch,$col)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
$cl=$col-1;
$aq3=0;
for($a4=0;$a4<($a3-1);$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
if($a5[$a4][$cl]==$srch)
{
$aq3++;
}
}
$od=$aq3;
}
return $od;
}
return false;
}
function flatsrchcol7($file,$srch,$col,$srch1,$col1)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
$cl=$col-1;
$cl1=$col1-1;
$aq3=0;
for($a4=0;$a4<($a3-1);$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
if($a5[$a4][$cl]==$srch && $a5[$a4][$cl1]==$srch1)
{
$aq3++;
}
}
$od=$aq3;
}
return $od;
}
return false;
}
function flatsrchnew($file,$srch,$col,$srch1,$col1)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
$cl=$col-1;
$cl1=$col1-1;
$aq3=0;
for($a4=0;$a4<($a3-1);$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
if(date("Y-m-d",$a5[$a4][$cl])==$srch && $a5[$a4][$cl1]==$srch1)
{
$aq3++;
}
}
$od=$aq3;
}
return $od;
}
return false;
}
function flatsrchcol123($file,$srch,$col,$srch1,$col1,$srch2,$col2)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
$cl=$col-1;
$cl1=$col1-1;
$cl2=$col2-1;
$ll=0;
for($a4=0;$a4<($a3-1);$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
if($a5[$a4][$cl]==$srch && $a5[$a4][$cl1]==$srch1 && $a5[$a4][$cl2]==$srch2)
{
$aq3[$ll]=$a2[$a4];
$ll++;
}
}
if(isset($aq3))
$od=$aq3;
else
return false;
}
return $od;
}
return false;
}
function flatsrchcol12($file,$srch,$col,$srch1,$col1)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
$cl=$col-1;
$cl1=$col1-1;
$ll=0;
for($a4=0;$a4<($a3-1);$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
if($a5[$a4][$cl]==$srch && $a5[$a4][$cl1]==$srch1)
{
$aq3[$ll]=$a2[$a4];
$ll++;
}
}
if(isset($aq3))
$od=$aq3;
else
return false;
}
return $od;
}
return false;
}
function flatremove($string)
{
$cmtue=rawurlencode($string);
$cmtue1=str_replace("%0A","%20",$cmtue);
$cmtue2=str_replace("%0a","%20",$cmtue1);
$cmt=rawurldecode($cmtue2);
$frt1=str_replace("<","<",$cmt);
$frt2=str_replace(":|:","~",$frt1);
$frt3=str_replace("@|@","~",$frt2);
return $frt3;
}
function sendpm($from,$to,$message)
{
$ass1="/www/members/".$from."/pm/last.txt";
$ass2="/www/members/".$to."/pm/pm.txt";
$ass3=flatremove($message);
$ass4=$from.":|:".$to.":|:".date("Y-m-d h:i:s").":|:".$ass3."@|@";
return $ass4;
}
function sendout_pm($from,$to,$topic,$message)
{
$from=flatremove($from);
$to=flatremove($to);
$topic=flatremove($topic);
$message=flatremove($message);
$seass1=$from.":|:".time().":|:".$topic.":|:".$message.":|:unread@|@";
$ass12="/www/members/".$to."/pm/msg.txt";
$ass22=flatread3("/www/members/".$to."/pm/newmsg.txt");
$ass22=$ass22+1;
$ass32=@flatadd2($ass12,$seass1);
$ass42=@flatadd3("/www/members/".$to."/pm/newmsg.txt",$ass22);
if($ass32 && $ass42)
return true;
else
return false;
}
function sendin_pm($from,$to,$topic,$message)
{
$from=flatremove($from);
$to=flatremove($to);
$topic=flatremove($topic);
$message=flatremove($message);
$seass1=$to.":|:".time().":|:".$topic.":|:".$message.":|:send@|@";
$ass12="/www/members/".$from."/pm/out.txt";
$ass32=@flatadd2($ass12,$seass1);
if($ass32)
return true;
else
return false;
}
function flatadd2($file,$string)
{
$a1=@file_put_contents($file,$string,FILE_APPEND);
if($a1)
{
return true;
}
else
{
return false;
}
return false;
}
function flatread3($file)
{
$a1=@file_get_contents($file);
if($a1)
{
return $a1;
}
else
{
return false;
}
return false;
}
function flatadd3($file,$string)
{
$a1=@file_put_contents($file,$string);
if($a1)
{
return true;
}
else
{
return false;
}
return false;
}
function flatdelete($file,$id)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
$se=$a3-1;
if($se!=1)
{
$i1=$a3+1;
$i2=$id-1;
for($i3=$id;$i3<$a3;$i3++)
{
$a2[$i2]=$a2[$i3];
$i2++;
}
$i1=$a3-2;
$ass=$a2[0]."@|@";
for($i3=1;$i3<$i1;$i3++)
{
$ass=$ass.$a2[$i3]."@|@";
}
$fiedit=@file_put_contents($file,$ass);
if($fiedit)
{
return "Deleted successfully!";
}
else
{
return false;
}
}
else
{
return "Line is one. So, it cannot delete.";
}
}
}
return false;
}
function flatdelete1($file,$id)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
$se=$a3-1;
$i1=$a3+1;
$i2=$id-1;
for($i3=$id;$i3<$a3;$i3++)
{
$a2[$i2]=$a2[$i3];
$i2++;
}
$i1=$a3-2;
if($se>1)
{
$ass=$a2[0]."@|@";
for($i3=1;$i3<$i1;$i3++)
{
$ass=$ass.$a2[$i3]."@|@";
}
$fiedit=@file_put_contents($file,$ass);
if($fiedit)
{
return "Deleted successfully!";
}
else
{
return false;
}
}
else
{
$ass="";
$fiedit=@file_put_contents($file,$ass);
if($fiedit)
{
return false;
}
else
{
return true;
}
}
}
}
return false;
}
function flatadd($file,$id,$string)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
$a3=$a3-1;
$id=$id-1;
$i1=$a3+1;
$i2=$i1-1;
for($i1;$i1>$id;$i1--)
{
$a2[$i1]=$a2[$i2];
$i2--;
}
$a2[$i1]=$string;
$i1=$a3+1;
$ass=$a2[0]."@|@";
for($i3=1;$i3<$i1;$i3++)
{
$ass=$ass.$a2[$i3]."@|@";
}
$fiedit=@file_put_contents($file,$ass);
if($fiedit)
{
return true;
}
else
{
return false;
}
}
}
return false;
}
function flatread($file)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
for($a4=0;$a4<($a3-1);$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
}
}
return $a5;
}
return false;
}
function flatread2($file,$row,$col)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
for($a4=0;$a4<$a3;$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
}
$row=$row-1;
$col=$col-1;
$a7=$a5[$row][$col];
}
return $a7;
}
return false;
}
function flatreadrow($file,$row)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
for($a4=0;$a4<$a3;$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
}
}
$row=$row-1;
$a5=$a2[$row];
return $a5;
}
return false;
}
function flatreadcol($file,$col)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
for($a4=0;$a4<$a3;$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
}
}
$a3=$a3-1;
$col=$col-1;
$a6=$a5[0][$col];
for($ai=1;$ai<$a3;$ai++)
{
$a6=$a6.":|:".$a5[$ai][$col];
}
return $a6;
}
return false;
}
function flatreadcol2($file,$col)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
for($a4=0;$a4<$a3;$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
}
}
$a3=$a3-1;
$col=$col-1;
for($ai=0;$ai<$a3;$ai++)
{
$a6[$ai]=$a5[$ai][$col];
}
return $a6;
}
return false;
}
function flatcols($file)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
for($a4=0;$a4<$a3;$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
}
if(is_array($a5[0]))
{
$a6=0;
foreach($a5[0] as $key=>$val)
{
$a6++;
}
}
}
return $a6;
}
return false;
}
function flatrows($file)
{
if(!file_exists($file))
return false;
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
$a3=$a3-1;
return $a3;
}
else
{
return "A";
}
}
else
return false;
return false;
}
function flatedit1($file,$rows,$cols,$string)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
for($a4=0;$a4<$a3;$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
}
if(is_array($a5[0]))
{
$a6=0;
foreach($a5[0] as $key=>$val)
{
$a6++;
}
}
}
//
$ass6=$rows;
$ass7=$ass6-1;
$cols=$cols-1;
if(isset($a5[$ass7][$cols]))
$a5[$ass7][$cols]=$string;
else
$a5[$ass7][$cols]=$string;
for($a11=0;$a11<$a3-1;$a11++)
{
for($a12=0;$a12<$a6;$a12++)
{
if($a11==0 && $a12==0)
{
if($a12==0)
{
$ass=$a5[$a11][$a12];
}
else
{
$ass=$ass.":|:".$a5[$a11][$a12];
}
}
else
{
if($a12==0)
{
$ass=$ass.$a5[$a11][$a12];
}
else
{
$ass=$ass.":|:".$a5[$a11][$a12];
}
}
}
$ass=$ass."@|@";
}
//
$fiedit=@file_put_contents($file,$ass);
if($fiedit)
{
return true;
}
else
{
return false;
}
}
return false;
}
function flatedit($file,$rows,$cols,$string)
{
$a1=@file_get_contents($file);
if($a1)
{
$a2=explode("@|@",$a1);
if(is_array($a2))
{
$a3=0;
foreach($a2 as $key=>$val)
{
$a3++;
}
for($a4=0;$a4<$a3;$a4++)
{
$a5[$a4]=explode(":|:",trim($a2[$a4]));
}
if(is_array($a5[0]))
{
$a6=0;
foreach($a5[0] as $key=>$val)
{
$a6++;
}
}
}
//
$ass6=$rows;
$ass7=$ass6-1;
$cols=$cols-1;
$a5[$ass7][$cols]=$string;
$a3=$a3-1;
for($a11=0;$a11<$a3;$a11++)
{
for($a12=0;$a12<$a6;$a12++)
{
if($a11==0 && $a12==0)
{
if($a12==0)
{
$ass=$a5[$a11][$a12];
}
else
{
$ass=$ass.":|:".$a5[$a11][$a12];
}
}
else
{
if($a12==0)
{
$ass=$ass.$a5[$a11][$a12];
}
else
{
$ass=$ass.":|:".$a5[$a11][$a12];
}
}
}
$ass=$ass."@|@";
}
//
$fiedit=@file_put_contents($file,$ass);
if($fiedit)
{
return true;
}
else
{
return false;
}
}
return false;
}
?>