男人的胸怀是委屈撑大的。

<?php
 
error_reporting(7);
 
class msn
 
{
 
    private $startcomm = 0;
 
    private $username = '';
 
    private $password = '';
 
    private $commend = '';
 
    private $domain = '';
 
    private $socket = '';
 
    private $challenge = '';
 
    private $status = array();
 
    private $data = array();
 
 
 
    function set_account($username, $password)
 
    {
 
        $this->username = $username;
 
        $this->password = $password;
 
    }
 
 
 
    function getData(){
 
        $buffer="";
 
        while (!feof($this->socket)) {
 
            $buffer .= fread($this->socket,1024);
 
            if (preg_match("/\r/",$buffer)) {
 
                break;
 
            }
 
        }
 
        $this->checkData($buffer);
 
    }
 
 
 
    function getData2() {
 
        $buffer="";
 
        while (!feof($this->socket)) {
 
            $buffer .= fread($this->socket,1024);
 
            if (preg_match("/\r\n\r\n/",$buffer)) {
 
                break;
 
            }
 
        }
 
        $this->checkData($buffer);
 
    }
 
 
 
    function checkData($buffer) {
 
        if (preg_match("/lc\=(.+?)/Ui",$buffer,$matches)) {    
 
            $this->challenge = "lc=" . $matches[1];
 
        }
 
 
 
        if (preg_match("/(XFR 3 NS )([0-9\.\:]+?) (.*) ([0-9\.\:]+?)/is",$buffer,$matches)) {
 
            $split = explode(":",$matches[2]);
 
            $this->startcomm = 1;
 
            $this->msn_connect($split[0],$split[1]);
 
        }
 
 
 
        if (preg_match("/tpf\=([a-zA-Z0-9]+?)/Ui",$buffer,$matches)) {
 
            $this->nexus_connect($matches[1]);
 
        }
 
 
 
        $split = explode("\n",$buffer);
 
        for ($i=0;$i<count($split);$i++) {  
 
            $detail = explode(" ",$split[$i]);
 
            if ($detail[0] == "LST") {
 
                if(isset($detail[2])) $this->data[] = array($detail[1], urldecode($detail[2]));
 
            }
 
        }
 
        $this->status = array(200, $this->data);
 
        //echo $buffer;
 
    }
 
 
 
    function msn_connect($server,$port) {
 
        if ($this->socket) {
 
            fclose($this->socket);
 
        }
 
        $this->socket = @fsockopen($server,$port, $errno, $errstr, 20);
 
        if (!$this->socket) {
 
            $this->status = array(500,'MSN验证服务器无法连接');
 
            return false;
 
        } else {
 
            $this->startcomm++;
 
            $this->send_command("VER " . $this->startcomm . " MSNP8 CVR0",1);
 
            $this->send_command("CVR " . $this->startcomm . " 0x0409 win 4.10 i386 MSNMSGR 6.2 MSMSGS " . $this->username,1);
 
            $this->send_command("USR " . $this->startcomm . " TWN I " . $this->username,1);
 
        }
 
    }
 
 
 
    function send_command($command) {
 
        $this->commend = $command;
 
        $this->startcomm++;       
 
        fwrite($this->socket,$command . "\r\n");
 
        $this->getData();
 
    }
 
 
 
    function nexus_connect($tpf) {
 
        $arr[] = "GET /rdr/pprdr.asp HTTP/1.0\r\n\r\n";
 
        $curl = curl_init();
 
        curl_setopt($curl, CURLOPT_URL, "https://nexus.passport.com:443/rdr/pprdr.asp");
 
        curl_setopt($curl, CURLOPT_RETURNTRANSFER, 1);
 
        curl_setopt($curl, CURLOPT_VERBOSE, 0);
 
        curl_setopt($curl, CURLOPT_HEADER,1);
 
        curl_setopt($curl, CURLOPT_HTTPHEADER, $arr);
 
        curl_setopt($curl, CURLOPT_SSL_VERIFYPEER, FALSE);
 
        $data = curl_exec($curl);
 
        curl_close($curl);
 
        preg_match("/DALogin=(.+?),/",$data,$matches);
 
        if(!isset($matches[1])) return false;
 
        $split = explode("/",$matches[1]);
 
        $headers[0] = "GET /$split[1] HTTP/1.1\r\n";
 
        $headers[1] = "Authorization: Passport1.4 OrgVerb=GET,OrgURL=http%3A%2F%2Fmessenger%2Emsn%2Ecom,sign-in=" . $this->username . ",pwd=" . $this->password . ", " . trim($this->challenge) . "\r\n";
 
        $curl = curl_init();
 
        curl_setopt($curl, CURLOPT_URL, "https://" . $split[0] . ":443/". $split[1]);
 
        curl_setopt($curl, CURLOPT_RETURNTRANSFER, 1);
 
        curl_setopt($curl, CURLOPT_VERBOSE, 0);
 
        curl_setopt($curl,CURLOPT_FOLLOWLOCATION,1);
 
        curl_setopt($curl, CURLOPT_HTTPHEADER, $headers);
 
        curl_setopt($curl, CURLOPT_HEADER,1);
 
        curl_setopt($curl, CURLOPT_SSL_VERIFYPEER, FALSE);
 
        $data = curl_exec($curl);
 
        curl_close($curl);
 
        preg_match("/t=(.+?)'/",$data,$matches);
 
        if(!isset($matches[1])){
 
            $this->status = array(404, '你输入的MSN帐号或者密码错误');
 
            return false;
 
        }
 
        $this->send_command("USR " . $this->startcomm . " TWN S t=" . trim($matches[1]) . "",2);
 
        $this->send_command("CHG " . $this->startcomm . " HDN",2);
 
        $this->send_command("SYN " . $this->startcomm . " 0",2);
 
        $this->getData2();
 
        $this->send_command("SYN " . $this->startcomm . " 1 46 2",2);
 
        $this->getData2();
 
        $this->send_command("CHG ". $this->startcomm . " BSY");
 
        $this->getData();     
 
    }
 
 
 
    public function getStatus()
 
    {
 
        return $this->status;
 
    }
 
}
 
 
 
 
 
$msn = new MSN;
 
$msn->set_account('xx@hotmail.com', 'xxxxx');
 
$msn->msn_connect("messenger.hotmail.com",1863);
 
$data = $msn->getStatus();
 
print_r($data);
?>

cd /usr/local/
wget http://nchc.dl.sourceforge.net/sourceforge/nagios/nagios-3.0.6.tar.gz
tar xzf nagios-3.0.6.tar.gz
cd nagios-3.0.6
/usr/sbin/useradd nagios
passwd nagios
/usr/sbin/groupadd nagcmd
/usr/sbin/usermod -G nagcmd nagios
./configure --with-command-group=nagcmd
make all
make install
make install-init
make install-config
make install-commandmode
vi /usr/local/nagios/etc/objects/contacts.cfg //修改管理员邮件地址

wget http://jaist.dl.sourceforge.net/sourceforge/nagiosplug/nagios-plugins-1.4.13.tar.gz
tar xf nagios-plugins-1.4.13.tar.gz
cd nagios-plugins-1.4.13
./configure --with-nagios-user=nagios --with-nagios-group=nagcmd
make
make install

/sbin/chkconfig --add nagios
/sbin/chkconfig nagios on
/usr/local/nagios/bin/nagios -v /usr/local/nagios/etc/nagios.cfg
/sbin/service nagios start

      wget http://www.cpan.org/modules/by-module/FCGI/FCGI-0.67.tar.gz
      tar -zxvf FCGI-0.67.tar.gz
      cd FCGI-0.67
      perl Makefile.PL
      make && make install

      wget http://search.cpan.org/CPAN/authors/id/G/GB/GBJK/FCGI-ProcManager-0.18.tar.gz
      tar -xzxf FCGI-ProcManager-0.18.tar.gz
      cd FCGI-ProcManager-0.18
      perl Makefile.PL
      make
      make install

cd /usr/local/nagios/bin/
vi perl-cgi.pl

#!/usr/bin/perl
 
use FCGI;
#perl -MCPAN -e 'install FCGI'
use Socket;
 
#this keeps the program alive or something after exec'ing perl scripts
END() { } BEGIN() { }
*CORE::GLOBAL::exit = sub { die "fakeexit\nrc=".shift()."\n"; }; eval q{exit}; if ($@) { exit unless $@ =~ /^fakeexit/; } ;
 
&main;
 
sub main {
                #$socket = FCGI::OpenSocket( ":3461", 10 ); #use IP sockets
                $socket = FCGI::OpenSocket( "/var/run/nagios.sock", 10 ); #use UNIX sockets - user running this script must have w access to the 'nginx' folder!!
                $request = FCGI::Request( \*STDIN, \*STDOUT, \*STDERR, \%ENV, $socket );
                if ($request) {request_loop()};
                        FCGI::CloseSocket( $socket );
}
 
sub request_loop {
                while( $request->Accept() >= 0 ) {
 
                   #processing any STDIN input from WebServer (for CGI-GET actions)
                   $env = $request->GetEnvironment();
                   $stdin_passthrough ='';
                   $req_len = 0 + $ENV{CONTENT_LENGTH};
                   if ($ENV{REQUEST_METHOD} eq 'GET'){
                                $stdin_passthrough .= $ENV{'QUERY_STRING'};
                        }
 
                        #running the cgi app
                        if ( (-x $ENV{SCRIPT_FILENAME}) && #can I execute this?
                                 (-s $ENV{SCRIPT_FILENAME}) && #Is this file empty?
                                 (-r $ENV{SCRIPT_FILENAME})     #can I read this file?
                        ){
                                #http://perldoc.perl.org/perlipc.html#Safe-Pipe-Opens
                open $cgi_app, '-|', $ENV{SCRIPT_FILENAME}, $stdin_passthrough or print("Content-type: text/plain\r\n\r\n"); print "Error: CGI app returned no output - Executing $ENV{SCRIPT_FILENAME} failed !\n";
                                if ($cgi_app) {print <$cgi_app>; close $cgi_app;}
                        }
                        else {
                                print("Content-type: text/plain\r\n\r\n");
                                print "Error: No such CGI app - $req_len - $ENV{CONTENT_LENGTH} - $ENV{REQUEST_METHOD} - $ENV{SCRIPT_FILENAME} may not exist or is not executable by this process.\n";
                        }
 
                }
}

vi start_ngind_cgi.sh

#!/bin/bash
 
## start_nginx_cgi.sh: start nginx cgi mode
## ljzhou, 2007.08.20
 
 
PERL="/usr/bin/perl"
NGINX_CGI_FILE="/usr/local/nagios/bin/perl-cgi.pl"
 
 
#bg_num=`jobs -l |grep "NGINX_CGI_FILE"`
#PID=`ps aux|grep "perl-cgi"|cut -c10-14|xargs kill -9`
PID=`ps aux|grep 'perl-cgi'|cut -c10-14|sed -n "1P"`
echo $PID
sockfiles="/var/run/nagios.sock"
kill -9 $PID
 
$PERL $NGINX_CGI_FILE &
 
sleep 3
 
`chown nobody.nobody $sockfiles`

htpasswd -c /usr/local/nagios/etc/htpasswd.users nagiosadmin

        location /nagios {
                auth_basic              "Restricted";
                auth_basic_user_file    /usr/local/nagios/etc/htpasswd.users;
        }
        location ~ \.cgi$ {
                root /usr/local/nagios/sbin;
                rewrite ^/nagios/cgi-bin/(.*)\.cgi /$1.cgi break;
                fastcgi_index index.cgi;
                fastcgi_pass    unix:/var/run/nagios.sock;
 
                fastcgi_param   SCRIPT_FILENAME                     /usr/local/nagios/sbin$fastcgi_script_name;
                fastcgi_param   QUERY_STRING                        $query_string;
 
                fastcgi_param   REMOTE_ADDR                        $remote_addr;
                fastcgi_param   REMOTE_PORT                        $remote_port;
                fastcgi_param   REQUEST_METHOD                     $request_method;
                fastcgi_param   REQUEST_URI                        $request_uri;
 
                #fastcgi_param SCRIPT_NAME                        $fastcgi_script_name;
                fastcgi_param   SERVER_ADDR                        $server_addr;
                fastcgi_param   SERVER_NAME                        $server_name;
                fastcgi_param   SERVER_PORT                        $server_port;
                fastcgi_param   SERVER_PROTOCOL                    $server_protocol;
                fastcgi_param   SERVER_SOFTWARE                    nginx;
 
                fastcgi_param   CONTENT_LENGTH                     $content_length;
                fastcgi_param   CONTENT_TYPE                       $content_type;
                fastcgi_param   GATEWAY_INTERFACE                  CGI/1.1;
                fastcgi_param   HTTP_ACCEPT_ENCODING        gzip,deflate;
                fastcgi_param   HTTP_ACCEPT_LANGUAGE        zh-cn;
       }

/usr/local/nagios/bin/start_nginx_cgi.sh
vi /etc/rc.local //将/usr/local/nagios/bin/start_nginx_cgi.sh写在最后一行

ps -aux|grep nginx
kill -HUP pid //此处的pid是ps查出的nginx主进程id

cd 你的虚拟主机根目录
ln -s /usr/local/nagios/share nagios