Telnet into pc to shut it down

[Jkeith247]

Could you not write an autoit program to run at startup on the machine to be shut down and simply shut down at a scheduled time?

Does the time the PC have to shut down change each night?

If it's the autoit icon in the corner that bothers you, you can hide it...

Opt("TrayIconHide", 1)          ;0=show, 1=hide tray icon

;insert code here using Date.au3 to monitor the time, then...

Shutdown(15)  ;Force a shutdown and power down

I could, but the idea is to have an ini that the user can input the desired time into to turn the remote machines off when they want on a nightly basis. Plus, this is also educational for me because I am going to need to learn how to use telnet within autoit to control some other peripheral devices. I have gotten pretty savy with autoit, and my last battle before I can continue is this whole telnet within auto it idea. :-) Edited January 21, 2011 by Jkeith247

[Jos]

I just had a look at this out of interest. Telnet is using all kinds of handshaking in its protocol so you need to "answer" that.

What I did was load the Telnet server on my Win7 Home and looked with a packetsniffer to see the conversion.

This script should be close to accomplish what you want.

Jos

expandcollapse popup

; Example script to send command to Windows7 Telnet server
TCPStartup()
$Socket = TCPConnect(@IPAddress1, 23)
If $Socket = -1 Then
    ; unable to connect
    Exit
EndIf
;
; Get handshake info
GetData($Socket)  
; send handshake back
TCPSend($Socket, Binary("0xFFFA250000FFF0"))  
; Get Welcome Message
GetData($Socket)  
; Send final handshake info
TCPSend($Socket, Binary("0xFFFA2700FFF0FFFA270003534655544C4E54564552013203534655544C4E544D4F444501436F6E736F6C65FFF0"))   
; Get Login message
GetData($Socket) 
; Send Userid
TCPSend($Socket, "userid" & @CR)
GetData($Socket)
; Send Password
TCPSend($Socket, "password" & @CR)
GetData($Socket)
; Send handshake info
TCPSend($Socket, Binary("0xFFFC18"))   
GetData($Socket)
; Send command
TCPSend($Socket, "help" & @CR)
GetData($Socket)
;
TCPCloseSocket($Socket)
TCPShutdown ( )

Func GetData($Socket)
    Sleep(500)
    $recv = TCPRecv($Socket, 2048)
    If @error Then Return
    If $recv <> "" then
        ConsoleWrite('Received from TelnetServer:' & $recv & @crlf)
    EndIf
    Return $recv
Endfunc

Edited January 22, 2011 by Jos

[Jkeith247]

I just had a look at this out of interest. Telnet is using all kinds of handshaking in its protocol so you need to "answer" that.

What I did was load the Telnet server on my Win7 Home and looked with a packetsniffer to see the conversion.

This script should be close to accomplish what you want.

Jos

expandcollapse popup

; Example script to send command to Windows7 Telnet server
TCPStartup()
$Socket = TCPConnect(@IPAddress1, 23)
If $Socket = -1 Then
    ; unable to connect
    Exit
EndIf
;
; Get handshake info
GetData($Socket)  
; send handshake back
TCPSend($Socket, Binary("0xFFFA250000FFF0"))  
; Get Welcome Message
GetData($Socket)  
; Send final handshake info
TCPSend($Socket, Binary("0xFFFA2700FFF0FFFA270003534655544C4E54564552013203534655544C4E544D4F444501436F6E736F6C65FFF0"))   
; Get Login message
GetData($Socket) 
; Send Userid
TCPSend($Socket, "userid" & @CR)
GetData($Socket)
; Send Password
TCPSend($Socket, "password" & @CR)
GetData($Socket)
; Send handshake info
TCPSend($Socket, Binary("0xFFFC18"))   
GetData($Socket)
; Send command
TCPSend($Socket, "help" & @CR)
GetData($Socket)
;
TCPCloseSocket($Socket)
TCPShutdown ( )

Func GetData($Socket)
    Sleep(500)
    $recv = TCPRecv($Socket, 2048)
    If @error Then Return
    If $recv <> "" then
        ConsoleWrite('Received from TelnetServer:' & $recv & @crlf)
    EndIf
    Return $recv
Endfunc

Zohmygod it worked!!!! Thank you so much!

How did you come about this? What are the binary strings you are sending?

Thanks again!

[Jos]

How did you come about this? What are the binary strings you are sending?

Thanks again!

Just Google for "telnet protocol commands" and you will find a welt of information... an example

As mentioned, I did a capture with a packetsniffer of a regular telnet session to a Win7 Telnet server and used that as the base to translate it to the posted script.

Jos

Edited January 22, 2011 by Jos

[Jkeith247]

Just Google for "telnet protocol commands" and you will find a welt of information... an example

As mentioned, I did a capture with a packetsniffer of a regular telnet session to a Win7 Telnet server and used that as the base to translate it to the posted script.

Jos

Well hey man, thanks again, this is huge.

[rudi]

Hi.

1.) connect and auth to the inter process communication (IPC$):

net use \\192.168.1.17\ipc$ /user:SomeLocalAdminUserOfThatPC cleartextpassword
or
... /User:DomainName\SomeDomainUserWithLocalAdminRights ...

2.) restart the Win box:

shutdown -r -t 0 -f -m \\192.168.1.17

Regards, Rudi.

[Bob Hoss]

A couple of other ways...

1. Use WMI and reboot/shutdown the computer remotely (assuming you have admin rights on each box) - script can run as scheduled task a remote machine or local.

2. Use PSShutdown - can handle lists of machines and so on.

HTH!