By default all ports on a Windows NT box are open, both UDP and TCP. You
have to actually select the Advanced tab on the Microsoft TCP/IP properties
window. Then you have to select the Enable Security box (in the bottom left
corner) then configure it to restrict ports or to allow only certain ports.
As I say, if you haven't done this all ports are open.
As to what Perl snippets to use I'm afraid I'm a newbie at Perl however the
way I'd approach the problem is to run sysdiff from the nt resource kit to
see which bit of the registry is changed when TCP/IP security is enabled /
disabled then use something like win32::TieRegistry to write the change
directly to the registry. Unfortunately WinNT then requires a reboot to
re-read the registry afterwards.
Hope this helps.
-----Original Message-----
From: Jones, Benny [SMTP:[EMAIL PROTECTED]]
Sent: 02 October 2002 12:22
To: 'Jeff Urlwin'; Jones, Benny;
[EMAIL PROTECTED]
Subject: RE: Opening all ports on a Windows NT system
I *will* be using nmap on the remote system.
I want to prove that the firewall doesn't leak.
Thanks,
Benny
-----Original Message-----
From: Jeff Urlwin [ mailto:[EMAIL PROTECTED]
<mailto:[EMAIL PROTECTED]> ]
Sent: Wednesday, October 02, 2002 7:09 AM
To: Jones, Benny; [EMAIL PROTECTED]
Subject: RE: Opening all ports on a Windows NT system
You will probably be better off getting nmap or something similar
and
capturing the output with perl to parse and generate the information
you
need.
Regards,
Jeff
>
>
> I need the smallest perl snippet that will
> open (or attempt to open) ALL 65535 tcp
> ports on a Windows NT system. I'd like to
> use it with slight variation to open all
> UDP ports too.
>
> I'm testing a personal firewall, and will be
> looking at this system from a remote observer
> system.
>
> Thanks in advance.
>
> Benny
> _______________________________________________
> ActivePerl mailing list
> [EMAIL PROTECTED]
> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
<http://listserv.ActiveState.com/mailman/mysubs>
>
**********************************************************************
This email and any attached files are confidential and
intended solely for the use of the individual or entity to whom they
are addressed. If you have received this email in error please notify
the system manager ([EMAIL PROTECTED]).
Any misuse, transmission to unauthorised third parties or
misrepresentation of any of the data contained in this email may
may lead to MSV Ltd seeking legal redress.
This note also confirms that this email message has been swept by
MIMEsweeper for the presence of computer viruses.
www.marshallsv.com
**********************************************************************
_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
