Port Reporter 도구

Port Reporter 는 아마도 MS개발자가 개인적으로 만들 프로그램 같습니다...

msconfig도 MS개발자 개인이 만들 프로그램인데, 이게 인기가 많아서 2003에는 아예 포함이 되버렸지요.... Port Reporter는 Windows2000과 Windows Server 2003에 서비스 형태로 설치되는 프로그매으로 해당 호스트에 접속하는 접속로그와 프로세스 로그등을 남기는 프로그램입니다.

로그는 3가지 형태로 PR-INITIAL-*.log PR-PORTS-*.log PR-PIDS-*.log 입니다..

INITIAL 로그 파일에는 Port Reporter 서비스가 시작될 때 컴퓨터에서 실행되는 포트, 프로세스 및 모듈에 대해 Port Reporter 서비스가 수집하는 데이터가 포함되어 있습니다

PR-PORTS 로그 파일에는 컴퓨터에 있는 TCP 및 UDP 포트의 활동에 대한 요약 데이터가 포함됩니다.

PR-PIDS 로그 파일에는 포트, 프로세스, 관련 모듈 및 프로세스가 실행하는 데 사용하는 사용자 계정에 대한 자세한 정보가 포함되어 있습니다

설치는 다운로드 받은후, 압축을 푼다음에 Pr-Setup.exe를 실행시키면 됩니다.

설치해서 해봤는데.. 그런데요.. 유용하네염... 자세한 내용은 다음 kb를 참고하세요.....
http://support.microsoft.com/?id=837243

IIS/PWS Banner Edit Tool

IIS배너는 특정서버의 웹서버 및 운영체제를 악의적인 목적으로 하는 접근자에게 노출시키는 약점이 있습니다.

헥사 에더터를 이용해 직접 수정이 가능하지만, 실수할경우 문제가 발생할수 있기 때문에 다음 툴을 이용하면 간단하게 수정이 가능합니다.



다운로드 : ------
WWW : http://www.nstalker.com/defense/products/IIS-Banner-Edit.zip
FTP : http://www.nstalker.com/defense/products/FTP-Banner-Edit.zip
SMTP : http://www.nstalker.com/defense/products/SMTP-Banner-Edit.zip



31-iisbanner.gif

ADSI 및 WSH를 사용하여 FSMO 역할 소유자를 찾는 방법

다음 스크립트는 지정된 도메인이나 도메인 컨트롤러에 대한 FSMO(신축 단일 마스터 작업) 역할 소유자를 출력해 줍니다.

다음 코드를 Find_fsmo.vbs 같은 파일로 저장후에 실해하면 됩니다.

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

Option Explicit
Dim WSHNetwork, objArgs, ADOconnObj, bstrADOQueryString, RootDom, RSObj
Dim FSMOobj,CompNTDS, Computer, Path, HelpText


Set WSHNetwork = CreateObject("WScript.Network")
Set objArgs = WScript.Arguments

HelpText = "This script will find the FSMO role owners for your domain." & Chr(13) &_
Chr(10) & "The syntax is as follows:" & Chr(13) & Chr(10) &_
"find_fsmo DC=MYDOM,DC=COM" & Chr(13) & Chr(10) &_
"""Where MYDOM.COM is your domain name.""" & Chr(13) & Chr(10) & "OR:" &_
Chr(13) & Chr(10) & "find_fsmo MYDCNAME " & Chr(13) & Chr(10) &_
"""Where MYDCNAME is the name of a Windows 2000 Domain Controller"""


Select Case objArgs.Count
Case 0
Path = InputBox("Enter your DC name or the DN for your domain"&_
" 'DC=MYDOM,DC=COM':","Enter path",WSHNetwork.ComputerName)
Case 1
Select Case UCase(objArgs(0))
Case "?"
WScript.Echo HelpText
WScript.Quit
Case "/?"
WScript.Echo HelpText
WScript.Quit
Case "HELP"
WScript.Echo HelpText
WScript.Quit
Case Else
Path = objArgs(0)
End Select
Case Else
WScript.Echo HelpText
WScript.Quit
End Select


Set ADOconnObj = CreateObject("ADODB.Connection")

ADOconnObj.Provider = "ADSDSOObject"
ADOconnObj.Open "ADs Provider"


'PDC FSMO
bstrADOQueryString = "<LDAP://"&Path&">;(&(objectClass=domainDNS)(fSMORoleOwner=*));adspath;subtree"
Set RootDom = GetObject("LDAP://RootDSE")
Set RSObj = ADOconnObj.Execute(bstrADOQueryString)
Set FSMOobj = GetObject(RSObj.Fields(0).Value)
Set CompNTDS = GetObject("LDAP://" & FSMOobj.fSMORoleOwner)
Set Computer = GetObject(CompNTDS.Parent)
WScript.Echo "The PDC FSMO is: " & Computer.dnsHostName


'Rid FSMO
bstrADOQueryString = "<LDAP://"&Path&">;(&(objectClass=rIDManager)(fSMORoleOwner=*));adspath;subtree"

Set RSObj = ADOconnObj.Execute(bstrADOQueryString)
Set FSMOobj = GetObject(RSObj.Fields(0).Value)
Set CompNTDS = GetObject("LDAP://" & FSMOobj.fSMORoleOwner)
Set Computer = GetObject(CompNTDS.Parent)
WScript.Echo "The RID FSMO is: " & Computer.dnsHostName


'Infrastructure FSMO
bstrADOQueryString = "<LDAP://"&Path&">;(&(objectClass=infrastructureUpdate)(fSMORoleOwner=*));adspath;subtree"

Set RSObj = ADOconnObj.Execute(bstrADOQueryString)
Set FSMOobj = GetObject(RSObj.Fields(0).Value)
Set CompNTDS = GetObject("LDAP://" & FSMOobj.fSMORoleOwner)
Set Computer = GetObject(CompNTDS.Parent)
WScript.Echo "The Infrastructure FSMO is: " & Computer.dnsHostName


'Schema FSMO
bstrADOQueryString = "<LDAP://"&RootDom.Get("schemaNamingContext")&_
">;(&(objectClass=dMD)(fSMORoleOwner=*));adspath;subtree"

Set RSObj = ADOconnObj.Execute(bstrADOQueryString)
Set FSMOobj = GetObject(RSObj.Fields(0).Value)
Set CompNTDS = GetObject("LDAP://" & FSMOobj.fSMORoleOwner)
Set Computer = GetObject(CompNTDS.Parent)
WScript.Echo "The Schema FSMO is: " & Computer.dnsHostName


'Domain Naming FSMO
bstrADOQueryString = "<LDAP://"&RootDom.Get("configurationNamingContext")&_
">;(&(objectClass=crossRefContainer)(fSMORoleOwner=*));adspath;subtree"

Set RSObj = ADOconnObj.Execute(bstrADOQueryString)
Set FSMOobj = GetObject(RSObj.Fields(0).Value)
Set CompNTDS = GetObject("LDAP://" & FSMOobj.fSMORoleOwner)
Set Computer = GetObject(CompNTDS.Parent)
WScript.Echo "The Domain Naming FSMO is: " & Computer.dnsHostName


* 위 스크립트는 MSDN에서 참조하였습니다.