Author: arkurth
Date: Mon Aug 3 20:25:57 2009
New Revision: 800530
URL: http://svn.apache.org/viewvc?rev=800530&view=rev
Log:
VCL-195
Added commands in the subroutines which enable RDP in Version_6.pm to set the
registry key to allow RDP from any version of Remote Desktop whenever they are
called.
Modified:
incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Windows/Version_6.pm
Modified:
incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Windows/Version_6.pm
URL:
http://svn.apache.org/viewvc/incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Windows/Version_6.pm?rev=800530&r1=800529&r2=800530&view=diff
==============================================================================
--- incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Windows/Version_6.pm
(original)
+++ incubator/vcl/trunk/managementnode/lib/VCL/Module/OS/Windows/Version_6.pm
Mon Aug 3 20:25:57 2009
@@ -664,6 +664,13 @@
# First delete any rules which allow ping and then add a new rule
my $add_rule_command;
+
+ # Set the key to allow remote connections whenever enabling RDP
+ $add_rule_command .= 'reg.exe ADD
"HKEY_LOCAL_MACHINE\\SYSTEM\\CurrentControlSet\\Control\\Terminal Server" /t
REG_DWORD /v fDenyTSConnections /d 0 /f ; ';
+
+ # Set the key to allow connections from computers running any version
of Remote Desktop
+ $add_rule_command .= 'reg.exe ADD
"HKEY_LOCAL_MACHINE\\SYSTEM\\CurrentControlSet\\Control\\Terminal
Server\\WinStations\\RDP-Tcp" /t REG_DWORD /v UserAuthentication /d 0 /f ; ';
+
$add_rule_command .= 'netsh.exe advfirewall firewall delete rule';
$add_rule_command .= ' name=all';
$add_rule_command .= ' dir=in';
@@ -729,6 +736,13 @@
# First delete any rules which allow RDP and then add a new rule
my $add_rule_command;
+
+ # Set the key to allow remote connections whenever enabling RDP
+ $add_rule_command .= 'reg.exe ADD
"HKEY_LOCAL_MACHINE\\SYSTEM\\CurrentControlSet\\Control\\Terminal Server" /t
REG_DWORD /v fDenyTSConnections /d 0 /f ; ';
+
+ # Set the key to allow connections from computers running any version
of Remote Desktop
+ $add_rule_command .= 'reg.exe ADD
"HKEY_LOCAL_MACHINE\\SYSTEM\\CurrentControlSet\\Control\\Terminal
Server\\WinStations\\RDP-Tcp" /t REG_DWORD /v UserAuthentication /d 0 /f ; ';
+
$add_rule_command .= 'netsh.exe advfirewall firewall delete rule';
$add_rule_command .= ' name=all';
$add_rule_command .= ' dir=in';
