端口扫描的函数

Visited times , Welcome to Data Mining Forum & Data Mining Expert & Data Mining Tools

来源：TROELS

一个用于端口扫描的函数

作者： Troels Arvin

<?

/*------------------------------------------------------------------------------------

PortScanner PHP3 script

-------------------------------

A php3 routine to perform a port scann of an ip adress or hostname.

Ground idea (Netbus detector) by Troels Arvin <tarvin@mdb.ku.dk>

At the end of this file there is a list of port an there description.

Create a file i.e port_def.inc, insert this definitions and include

the file in this script.

Author: Fabian Dennler, fab@harlequin.ch

数据挖掘研究院

Date: 03.05.2000

Version 1.0, September 21 1999.

Revision 03.05.2000

Latest version is at: http://www.harlequin.ch/projekte/scripts/

------------------------------------------------------------------------------------*/

?>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" "http://www.w3.org/TR/REC-html40/loose.dtd">

<html>

 数据挖掘论坛







<head><title>Online Port Scanner Utility</title>

<meta name="description" content="Online Port Scanner utility - see if there are unknows open Ports">

<meta name="keywords" content="port scanner, detection">

<style type="text/css">



</style>

</head>

<body>

<center>

<table cellpadding="0" cellspacing="0">

<tr align="center">

<td>?/td>

<td align="center"><h1>Online Port Scanner</h1></td>

<td>?/td>

</tr>

<tr>

<td colspan=3>

Mit diesem Online Scanner ist es m鰃lich ein bestimmter Rechner im Internet nach offener Ports zu durchsuchen.

Sie k鰊nen den Scanner so einstellen, das er die "Well Know Ports" und/oder die "Registred Ports" durchsucht, aber auch

mit Benutzerdefinierte Angaben. Momentan beschrenkt sich dieser Dienst f黵 TCP Verbindungen.

</td>

</tr>

</table>

<hr noshade size="1">

数据挖掘实验室

<?php

error_reporting(0);

function connectToPort ($host, $port) {

global $OPEN_PORTS;

// This function is the interesting part of the script.

// It may be called from the ’MAIN’

// part of the script further down.

// Not declared ill unless we find something

$status = 0;

// print "<p>Trying port $port at $host...";

// Open a socket to the user’s computer (or proxy; in

// this case, the result can’t be trusted)

$socket = fsockopen($host, $port, &$errno, &$errstr);

if ($socket) {

// A connection could be made.

// print "

Port $port connection established - <strong>ATTENTION!</strong></p>";

$status = 1;

$OPEN_PORTS[$port] = $port;

// print "$OPEN_PORTS";

// Let’s see if it’s speaking

// To make sure that we will not be listening for ever

数据挖掘研究院

// in case of a silent (but open) port

set_socket_blocking($socket, 0);

$count = 0;

$portOutput = "";

// We will not keep trying for ever; let’s stop after

// 10000 glances

while ($count < 10000) {

if ($readString = fread($socket, 1)) {

// Convert <, >, " and & to HTML entities

$readString = htmlspecialchars($readString);

// Add the output to the sum of output

$portOutput .= $readString;

// $portOutput .= $portOutput."

";

}

$count++;

}

// Enough of this. Close the connection.

fclose($socket);

if ($portOutput != "") {

print "<p align="left"><b>Server Output for Port $port:</b>

";

print "<p align="left">$portOutput</p>";

}

} else {

// In case we have good news:

// print "

Port $port connection refused - <code>good</code></p>";

数据挖掘论坛

}

// Return status for the port we just examined

return $status;

};

function Port_print($item) {

global $scann_host;

global $OPEN_PORTS;

global $PORTSNUMBER;

global $PORTSDESCRIPTION;

if ($item!= "") {

// print "$OPEN_PORTS";

$check_connection = "telnet://".$scann_host. ":".$item;

if ($OPEN_PORTS[$item]) {

print "<li><a href="$check_connection">$PORTSNUMBER[$item] : $PORTSDESCRIPTION[$item]</a>

n";

};

};

};

function printForm ($host, $uri) {

// Make sure the user knows what’s going on.

// This should not be dangerous in any way, but let’s ask anyway

print "

<form method=post action="$uri">

<table cellpadding=’1’ cellspacing=’0’ border=’0’ bgcolor=’ <tr align="center">

<td colspan=2><h2>Scanner Konfiguration</h2></td>

数据挖掘工具

</tr>

<tr align="center">

<td valign="top">Durchsuche Host</td>

<td align="left">

<li><input type=text name="Host_To_Scann" Value="localhost">

</td>

</tr>

<tr align="center">

<td valign="top">Durchsuche Ports</td>

<td align="left">

<li><input type=checkbox checked name="Well_Know_Ports">Well Know Ports

<li><input type=checkbox name="Registred_Ports">Registred Ports

<li><input type=checkbox name="User_Ports">Benutzerdefinierte Ports <small>(Folgende Felder Eintragen)</small>

</td>

</tr>

<tr align="center">

<td valign="top">?/td>

<td align="left">

From <input type=text name="User_Port_From"> To <input type=text name="User_Port_To">

?

</td>

</tr>

</table> 数据挖掘论坛

<table><tr><td>

<p class="permission">Permission to connect to <code>selected ports</code> at

<code>selected host</code>爂ranted:牋<input

type=checkbox name=permission value="ok"></p>

</td>

</tr>

<tr>

<td align=’center’><p><input class=submit type=submit></p></td>

</form>

</tr></table>

</td></tr></table></td></tr></table>

";

};

// **********

// MAIN

// **********

// Initialize

$Detection_Status = 0;

$CONN_PORT[];

$OPEN_PORTS[];

// Set Port List

include "port_def.inc";

// This may seem stupid; but if PHP is running in ’safe mode’,

// the SCRIPT_URI environment variable doesn’t seem to

// be readily available

数据挖掘研究院

$uri = "http://" . $SERVER_NAME . $REQUEST_URI;

// Standard CGI environment variable; we are not using CGI, but

// fortunately, the variable is still avaliable

if ($Host_To_Scann!= "localhost") {

$scann_host = gethostbyaddr($Host_To_Scann);

}

else {

$scann_host = gethostbyaddr($REMOTE_ADDR);

};

// Trying to make sure that the user actually wants me

// to scan his/her ports. - And trying to make sure that nobody is

// directly linking to the script.

if (!(($permission == "ok") && ($REQUEST_METHOD == "POST") && ($HTTP_REFERER == $uri))) {

// Write the permission-asking form - i.e. call the

// previously defined ’printForm’ function

printForm($host, $uri);

}

else {

if (!($Well_Know_Ports== "")) {

for ($i=0;$i<=1023;$i++) {

$Scann_Ports[$i] = $PORTSNUMBER[$i];

};
数据挖掘论坛
};

if (!($Registred_Ports== "")) {

for ($i=1024;$i<=17007;$i++) {

$Scann_Ports[$i] = $PORTSNUMBER[$i];

};

};

if (!($User_Ports== "")) {

$Scan_Ports[]=0;

for ($i=$User_Port_From;$i<=$User_Port_To;$i++) {

$Scann_Ports[$i] = $PORTSNUMBER[$i];

};

};

// Paranoia checks OK. Let’s do it

print "

<h2>Processing host $scann_host ...</h2>

";

// print "<table border=1 cellpadding=5>";

// print "<tr><td>";

// Call script and add the status to the sum of status

// codes. The function ’connectToPort’ is defined above

while(list($KEY,$VALUE) = each($Scann_Ports)) {

//echo "$VALUEn";

$Detection_Status += connectToPort($scann_host, $Scann_Ports[$VALUE]);

// echo "$Detection_Status";

// echo "<hr noshade>n";

};

数据挖掘实验室
// print "</td></tr>";

// print "</table>";

// print "<hr noshade>n";

// Summarize results

print "<table>";

print "<tr><td align="center">";

print "<h1>Conclusion</h1>";

print "</td></tr>";

print "<tr><td>";

if ($Detection_Status > 0) {

print "

<p>Connection to at least one port succeeded.</p>

<p>This means that this computer have any services activated.

See <a href="http://www2.dgsys.com/~lkh/ipnumb.html" target=’_blank’>port definition</a> for more informations.</p>

";

print "<p><b>Following services are running:</b></p>";

array_walk( $Scann_Ports , ’Port_print’ );

print "

<p>You may <a href="$uri">try again</a>.</p>

";

} 数据挖掘研究院

else {

// It’s nice to bring good news

print "

<p>No ports responded at host $scann_host.

Congratulations - that’s a <code>good</code> sign!</p>

<p>You may <a href="$uri">try again</a>.</p>

";

}

print "</td></tr>";

print "</table>";

}

?>

<hr noshade size="1">

</center>

</body> 数据挖掘交友

</html>

/*-------------------------------------------------------------------------------------------------------------------------------------*/

/*-------------------------------------------------------------------------------------------------------------------------------------*/

/* PORT DEFINITIONS */

/*-------------------------------------------------------------------------------------------------------------------------------------*/

/*-------------------------------------------------------------------------------------------------------------------------------------*/

数据挖掘实验室

<?PHP

$PORTSNUMBER[];

$PORTSDESCRIPTION[];

/* WELL KNOW PORTS PORTS */

$PORTSNUMBER[0] = 0;

$PORTSDESCRIPTION[0] = "Reserved";

// Jon Postel

数据挖掘实验室

$PORTSNUMBER[1] = 1;

$PORTSDESCRIPTION[1] = "TCP Port Service Multiplexer";

// Mark Lottor

$PORTSNUMBER[2] = 2;

$PORTSDESCRIPTION[2] = "Management Utility"; 数据挖掘实验室

$PORTSNUMBER[3] = 3;

$PORTSDESCRIPTION[3] = "Compression Process";

// Bernie Volz

$PORTSNUMBER[4] = 4;

$PORTSDESCRIPTION[4] = "Unassigned"; 数据挖掘工具

$PORTSNUMBER[5] = 5;

$PORTSDESCRIPTION[5] = "Remote Job Entry";

// Jon Postel

$PORTSNUMBER[6] = 6;

$PORTSDESCRIPTION[6] = "Unassigned"; 数据挖掘实验室

$PORTSNUMBER[7] = 7;

$PORTSDESCRIPTION[7] = "Echo";

// Jon Postel

$PORTSNUMBER[8] = 8;

$PORTSDESCRIPTION[8] = "Unassigned"; 数据挖掘交友

$PORTSNUMBER[9] = 9;

$PORTSDESCRIPTION[9] = "Discard";

// Jon Postel

$PORTSNUMBER[10] = 10;

$PORTSDESCRIPTION[10] = "Unassigned";

数据挖掘实验室

$PORTSNUMBER[11] = 11;

$PORTSDESCRIPTION[11] = "Active Users";

// Jon Postel

$PORTSNUMBER[12] = 12;

$PORTSDESCRIPTION[12] = "Unassigned";

数据挖掘工具

$PORTSNUMBER[13] = 13;

$PORTSDESCRIPTION[13] = "Daytime";

// Jon Postel

$PORTSNUMBER[14] = 14;

$PORTSDESCRIPTION[14] = "Unassigned";

数据挖掘论坛

$PORTSNUMBER[15] = 15;

$PORTSDESCRIPTION[15] = "Unassigned";

$PORTSNUMBER[16] = 16;

$PORTSDESCRIPTION[16] = "Unassigned";

数据挖掘实验室

$PORTSNUMBER[17] = 17;

$PORTSDESCRIPTION[17] = "Quote of the Day";

// Jon Postel

$PORTSNUMBER[18] = 18;

$PORTSDESCRIPTION[18] = "Message Send Protocol"; 数据挖掘工具

// Rina Nethaniel

$PORTSNUMBER[19] = 19;

$PORTSDESCRIPTION[19] = "Character Generator";

$PORTSNUMBER[20] = 20;

$PORTSDESCRIPTION[20] = "File Transfer [Default Data]";

数据挖掘交友

$PORTSNUMBER[21] = 21;

$PORTSDESCRIPTION[21] = "File Transfer [Control]";

// Jon Postel

$PORTSNUMBER[22] = 22;

$PORTSDESCRIPTION[22] = "Unassigned"; 数据挖掘工具

$PORTSNUMBER[23] = 23;

$PORTSDESCRIPTION[23] = "Telnet";

// Jon Postel

$PORTSNUMBER[24] = 24;

$PORTSDESCRIPTION[24] = "any private mail system";

数据挖掘工具

// Rick Adam

$PORTSNUMBER[25] = 25;

$PORTSDESCRIPTION[25] = "Simple Mail Transfer";

// Jon Postel

$PORTSNUMBER[26] = 26;

$PORTSDESCRIPTION[26] = "Unassigned";

数据挖掘交友

$PORTSNUMBER[27] = 27;

$PORTSDESCRIPTION[27] = "NSW User System FE";

// Robert Thomas

$PORTSNUMBER[28] = 28;

$PORTSDESCRIPTION[28] = "Unassigned"; 数据挖掘工具

$PORTSNUMBER[29] = 29;

$PORTSDESCRIPTION[29] = "MSG ICP";

// Robert Thomas

$PORTSNUMBER[30] = 30;

$PORTSDESCRIPTION[30] = "Unassigned";

数据挖掘论坛

$PORTSNUMBER[31] = 31;

$PORTSDESCRIPTION[31] = "MSG Authentication";

// Robert Thomas

$PORTSNUMBER[32] = 32;

$PORTSDESCRIPTION[32] = "Unassigned";

数据挖掘研究院

$PORTSNUMBER[33] = 33;

$PORTSDESCRIPTION[33] = "Display Support Protocol";

// Ed Cain

$PORTSNUMBER[34] = 34;

$PORTSDESCRIPTION[34] = "Unassigned";

数据挖掘论坛

$PORTSNUMBER[35] = 35;

$PORTSDESCRIPTION[35] = "any private printer server";

// Jon Postel

$PORTSNUMBER[36] = 36;

$PORTSDESCRIPTION[36] = "Unassigned";

数据挖掘研究院

$PORTSNUMBER[37] = 37;

$PORTSDESCRIPTION[37] = "Time";

// Jon Postel

$PORTSNUMBER[38] = 38;

$PORTSDESCRIPTION[38] = "Route Access Protocol"; 数据挖掘研究院

// Robert Ullmann

$PORTSNUMBER[39] = 39;

$PORTSDESCRIPTION[39] = "Resource Location Protocol";

// Mike Accetta

$PORTSNUMBER[40] = 40;

数据挖掘工具

$PORTSDESCRIPTION[40] = "Unassigned";

$PORTSNUMBER[41] = 41;

$PORTSDESCRIPTION[41] = "Graphics";

$PORTSNUMBER[42] = 42; 数据挖掘研究院

$PORTSDESCRIPTION[42] = "Host Name Server";

$PORTSNUMBER[43] = 43;

$PORTSDESCRIPTION[43] = "Who Is";

$PORTSNUMBER[44] = 44; 数据挖掘实验室

$PORTSDESCRIPTION[44] = "Who Is";

$PORTSNUMBER[45] = 45;

$PORTSDESCRIPTION[45] = "Message Processing Module [recv]";

$PORTSNUMBER[46] = 46; 数据挖掘论坛

$PORTSDESCRIPTION[46] = "MPM [default send]";

// Jon Postel

$PORTSNUMBER[47] = 47;

$PORTSDESCRIPTION[47] = "NI FTP";

// Steve Kille 数据挖掘实验室

$PORTSNUMBER[48] = 48;

$PORTSDESCRIPTION[48] = "Digital Audit Daemon";

// Larry Scott

$PORTSNUMBER[49] = 49;

$PORTSDESCRIPTION[49] = "Login Host Protocol";

数据挖掘研究院

// Pieter Ditmars

$PORTSNUMBER[50] = 50;

$PORTSDESCRIPTION[50] = "Remote Mail Checking Protocol";

// Steve Dorner

$PORTSNUMBER[51] = 51; 数据挖掘实验室

$PORTSDESCRIPTION[51] = "IMP Logical Address Maintenance";

// Andy Malis

$PORTSNUMBER[52] = 52;

$PORTSDESCRIPTION[52] = "XNS Time Protocol";

// Susie Armstrong

数据挖掘工具

$PORTSNUMBER[53] = 53;

$PORTSDESCRIPTION[53] = "Domain Name Server";

// Paul Mockapetris

$PORTSNUMBER[54] = 54;

$PORTSDESCRIPTION[54] = "XNS Clearinghouse"; 数据挖掘论坛

$PORTSNUMBER[55] = 55;

$PORTSDESCRIPTION[55] = "ISI Graphics Language";

$PORTSNUMBER[56] = 56;

$PORTSDESCRIPTION[56] = "XNS Authentication";

数据挖掘实验室

$PORTSNUMBER[57] = 57;

$PORTSDESCRIPTION[57] = "any private terminal access";

// Jon Postel

$PORTSNUMBER[58] = 58;

$PORTSDESCRIPTION[58] = "XNS Mail"; 数据挖掘实验室

// Susie Armstrong

$PORTSNUMBER[59] = 59;

$PORTSDESCRIPTION[59] = "any private file service";

// Kathy Huber

$PORTSNUMBER[66] = 66;

数据挖掘实验室

$PORTSDESCRIPTION[66] = "Oracle SQL*NET";

// Jack Haverty

$PORTSNUMBER[67] = 67;

$PORTSDESCRIPTION[67] = "Bootstrap Protocol Server";

$PORTSNUMBER[68] = 68; 数据挖掘交友

$PORTSDESCRIPTION[68] = "Bootstrap Protocol Client";

$PORTSNUMBER[69] = 69;

$PORTSDESCRIPTION[69] = "Trivial File Transfer";

// David Clark

$PORTSNUMBER[70] = 70; 数据挖掘研究院

$PORTSDESCRIPTION[70] = "Gopher";

// Mark McCahill

$PORTSNUMBER[71] = 71;

$PORTSDESCRIPTION[71] = "Remote Job Service";

$PORTSNUMBER[76] = 76;

数据挖掘实验室

$PORTSDESCRIPTION[76] = "Distributed External Object Store";

$PORTSNUMBER[78] = 78;

$PORTSDESCRIPTION[78] = "vettcp";

// Christopher Leong

$PORTSNUMBER[79] = 79;

数据挖掘实验室

$PORTSDESCRIPTION[79] = "Finger";

// David Zimmerman

$PORTSNUMBER[80] = 80;

$PORTSDESCRIPTION[80] = "World Wide Web HTTP";

// Jon Postel 数据挖掘实验室

$PORTSNUMBER[88] = 88;

$PORTSDESCRIPTION[88] = "Kerberos";

// Eliot Moss

$PORTSNUMBER[92] = 92;

$PORTSDESCRIPTION[92] = "Network Printing Protocol";

数据挖掘交友

// Jeremy Siegel

$PORTSNUMBER[107] = 107;

$PORTSDESCRIPTION[107] = "Remote Telnet Service";

// Joyce K. Reynolds

$PORTSNUMBER[110] = 110;

数据挖掘工具

$PORTSDESCRIPTION[110] = "Post Office Protocol - Version 3";

// Glenn Davis

$PORTSNUMBER[113] = 113;

$PORTSDESCRIPTION[113] = "Authentication Service";

// Martin Forssen

数据挖掘研究院

$PORTSNUMBER[115] = 115;

$PORTSDESCRIPTION[115] = "Simple File Transfer Protocol";

// Larry Barnes

$PORTSNUMBER[119] = 119;

$PORTSDESCRIPTION[119] = "Network News Transfer Protocol";

数据挖掘论坛

// Larry Peterson

$PORTSNUMBER[137] = 137;

$PORTSDESCRIPTION[137] = "NETBIOS Name Service";

$PORTSNUMBER[138] = 138;

$PORTSDESCRIPTION[138] = "NETBIOS Datagram Service";

数据挖掘实验室

$PORTSNUMBER[139] = 139;

$PORTSDESCRIPTION[139

[数据挖掘专家] [数据挖掘研究院] [数据挖掘论坛] [数据挖掘实验室]

上一篇：php多文件上传
下一篇：动态的使用b、k、m、g来显示文件大小的代码

最新评论共有 0 位网友发表了评论 , 查看所有评论

发表评论( 不能超过250字，需审核，请自觉遵守互联网相关政策法规。 )

数据挖掘网站导航	数据挖掘论坛导航
数据挖掘工具数据挖掘论坛 DataCruncher - Cognos MineSet - MathSoft Intelligent Miner - GainSmarts Sqlserver - SAS - Clementine CART - Weka - WizSoft NeuroShell - ModelQuest data mining tools - Darwin 数据挖掘交友数据挖掘博客	数据挖掘工具数据挖掘资源数据挖掘技术算法数据挖掘相关期刊、会议研究院联盟合作专区数据挖掘基础与相关技术数据挖掘厂商与就业数据挖掘研究者乐园知名厂商数据挖掘工具资料国内数据挖掘实验室 Foreign Data Mining Lab