<?php klasės klientasGetObj
{ funkcija getBrowse() { pasaulinis _SERVER USD; $Agent = $_SERVER['HTTP_USER_AGENT']; $browser = ''; $browserver = ''; $Browser = masyvas('Lynx', 'MOSAIC', 'AOL', 'Opera', 'JAVA', 'MacWeb', 'WebExplorer', 'OmniWeb'); už($i = 0; $i < = 7; $i ++){ if(strpos($Agent, $Browsers[$i])){ $browser = $Browsers[$i]; $browserver = ''; } } if(ereg('Mozilla', $Agent) && !ereg('MSIE', $Agent)){ $temp = sprogti('(', $Agent); $Part = $temp[0]; $temp = sprogti('/', $Part); $browserver = $temp[1]; $temp = sprogti(' ', $browserver); $browserver = $temp[0]; $browserver = preg_replace('/([d.]+)/', '1', $browserver); $browserver = $browserver; $browser = 'Netscape Navigator'; } if(ereg('Mozilla', $Agent) && ereg('Opera', $Agent)) { $temp = sprogti('(', $Agent); $Part = $temp[1]; $temp = sprogti(')', $Part); $browserver = $temp[1]; $temp = sprogti(' ', $browserver); $browserver = $temp[2]; $browserver = preg_replace('/([d.]+)/', '1', $browserver); $browserver = $browserver; $browser = "Opera"; } if(ereg('Mozilla', $Agent) && ereg('MSIE', $Agent)){ $temp = sprogti('(', $Agent); $Part = $temp[1]; $temp = sprogti('; ", $Part); $Part = $temp[1]; $temp = sprogti(' ', $Part); $browserver = $temp[2]; $browserver = preg_replace('/([d.]+)/','1',$browserver); $browserver = $browserver; $browser = "Internet Explorer"; } if($browser != ''){ $browseinfo = $browser." ".$browserver; } else { $browseinfo = klaidingas; } grąžinti $browseinfo; }
funkcija getIP () { pasaulinis _SERVER USD; if (getenv('HTTP_CLIENT_IP')) { $ip = getenv('HTTP_CLIENT_IP'); } else if (getenv('HTTP_X_FORWARDED_FOR')) { $ip = getenv('HTTP_X_FORWARDED_FOR'); } else if (getenv('REMOTE_ADDR')) { $ip = getenv('REMOTE_ADDR'); } else { $ip = $_SERVER['REMOTE_ADDR']; } grąžinti $ip; }
funkcija getOS () { pasaulinis _SERVER USD; $agent = $_SERVER['HTTP_USER_AGENT']; $os = klaidingas; if (eregi('win', $agent) && strpos($agent, '95')){ $os = "Windows 95"; } else if (eregi('win 9x', $agent) && strpos($agent, '4.90')){ $os = 'Windows ME'; } else if (eregi('win', $agent) && ereg('98', $agent)){ $os = "Windows 98"; } else if (eregi('win', $agent) && eregi('nt 5.1', $agent)){ $os = "Windows XP"; } else if (eregi('win', $agent) && eregi('nt 5', $agent)){ $os = "Windows 2000"; } else if (eregi('win', $agent) && eregi('nt', $agent)){ $os = "Windows NT"; } else if (eregi('win', $agent) && ereg('32', $agent)){ $os = "Windows 32"; } else if (eregi('linux', $agent)){ $os = "Linux"; } else if (eregi('unix', $agent)){ $os = 'Unix'; } else if (eregi('saulė', $agent) && eregi('os', $agent)){ $os = 'SunOS'; } else if (eregi('ibm', $agent) && eregi('os', $agent)){ $os = 'IBM OS/2'; } else if (eregi('Mac', $agent) && eregi('PC', $agent)){ $os = "Macintosh"; } else if (eregi('PowerPC', $agent)){ $os = "PowerPC"; } else if (eregi('AIX', $agent)){ $os = 'AIX'; } else if (eregi('HPUX', $agent)){ $os = "HPUX"; } else if (eregi('NetBSD', $agent)){ $os = 'NetBSD'; } else if (eregi('BSD', $agent)){ $os = 'BSD'; } else if (ereg('OSF1', $agent)){ $os = 'OSF1'; } else if (ereg('IRIX', $agent)){ $os = "IRIX"; } else if (eregi('FreeBSD', $agent)){ $os = 'FreeBSD'; } else if (eregi('teleportuoti', $agent)){ $os = 'teleportuotis'; } else if (eregi('flashget', $agent)){ $os = 'flashget'; } else if (eregi('webzip', $agent)){ $os = 'webzip'; } else if (eregi('neprisijungęs', $agent)){ $os = 'neprisijungęs'; } kitaip { $os = "Nežinoma"; } grąžinti $os; }
}?>
<?php $code = naujas klientasGetObj; $str 1 = $code->getBrowse(); Naršyklė: $str 2 = $code->getIP(); IP adresas: $str 3 = $code->getOS(); Operacinė sistema: echo "tikslinė naršyklė:".$str 1." OS:".$str 3." IP:".$str 2; ?>
|