Tcl

Send a Wake-on-LAN Magic Packet

Demonstrates Socket.SendWakeOnLan, which sends a Wake-on-LAN magic packet for a MAC address to a UDP broadcast address and port.

Background. The MAC address is six bytes written as hexadecimal. Wake-on-LAN wakes a powered-down machine on the local network that has the feature enabled.

Chilkat Tcl Downloads

Download Chilkat for Tcl

Tcl


load ./chilkat.dll

set success 0

set socket [new_CkSocket]

#  Send a Wake-on-LAN magic packet to wake a machine by its MAC address.  The MAC is six bytes
#  written as hexadecimal, and the packet is sent to the UDP broadcast address and port.
set success [CkSocket_SendWakeOnLan $socket "000102030405" 9 "255.255.255.255"]
if {$success == 0} then {
    puts [CkSocket_lastErrorText $socket]
    delete_CkSocket $socket
    exit
}

puts "Wake-on-LAN packet sent."

delete_CkSocket $socket