WOL Script (Wake on LAN)

Diese Seite verwendet Cookies. Durch die Nutzung unserer Seite erklären Sie sich damit einverstanden, dass wir Cookies setzen. Weitere Informationen

  • so habe mir ein paar infos rausgesucht...es geht über ein sogenanntes "magic paket"...hmm..

    das Magic Paket hat folgenden aufbau:

    Magic Packet-Technologie

    Wake Up On LAN verwendete ursprünglich eine als Magic
    Packet bekannte Technik, die ein Datenpaket direkt an
    ein System sendet. Dieses Paket besteht aus Daten mit
    16-facher Wiederholung der Adresse des MAC-Layers. Die
    MAC-Adresse ist nur einmal für den Netzwerkadapter im
    System vorhanden, so daß das Magic Packet nur das für
    den Start ausgewählte System aktiviert. Wenn der
    Netzwerkadapter dieses Paket empfängt und
    entschlüsselt, sendet er ein PME-Signal an das
    System, wodurch es wieder vollständig aktiviert und
    gestartet wird.

    Interessant...jetzt nur noch die frage, wie ich so ein paket versende ...
    Lerne nicht Programmiersprachen, lerne Programmieren...

    :D Alles andere ist Syntax :D

    [Blockierte Grafik: http://www.xing.com/img/buttons/10_en_btn.gif]

  • mit welcher sprache willst du eigentlich coden?
    für linux gibts das programm "wakeonlan" - ist bei den meisten distris vorhanden

    ist ja GPL.. daher hier der code
    Usage
    wakeonlan [-h] [-v] [-i IP_address] [-p port] [-f file] [[hardware_address] ...]

    Options
    -h
    this information
    -v
    displays the script version
    -i ip_address
    set the destination IP address
    default: 255.255.255.255 (the limited broadcast address)
    -p port
    set the destination port
    default: 9 (the discard port)
    -f file
    uses file as a source of hardware addresses


    Quellcode

    1. #!/usr/bin/perl -w
    2. #
    3. # $Id: wakeonlan,v 1.4.2.3 2005/01/27 16:03:54 jpo Exp $
    4. #
    5. #########################################################################
    7. use strict;
    8. use Net::hostent;
    9. use Socket;
    10. use Getopt::Std;
    11. use vars qw($VERSION $opt_v $opt_h $opt_i $opt_p $opt_f);
    12. $VERSION = '0.41';
    14. my $DEFAULT_IP = '255.255.255.255';
    15. my $DEFAULT_PORT = getservbyname('discard', 'udp');
    17. #
    18. # Process the command line
    19. #
    21. getopts("hvp:i:f:");
    23. if ($opt_h) { usage(); exit(0); }
    24. if ($opt_v) { print "wakeonlan version $VERSION\n"; exit(0); }
    25. if (!$opt_f and !@ARGV) { usage(); exit(0); }
    26. if ($opt_i) { $DEFAULT_IP = $opt_i; } # override default value
    27. if ($opt_p) { $DEFAULT_PORT = $opt_p; } # override default value
    29. if ($opt_f) { process_file($opt_f); }
    31. # The rest of the command line is a list of hardware addresses
    33. foreach (@ARGV) {
    34. wake($_, $opt_i, $opt_p);
    35. }
    37. #
    38. # wake
    39. #
    40. # The 'magic packet' consists of 6 times 0xFF followed by 16 times
    41. # the hardware address of the NIC. This sequence can be encapsulated
    42. # in any kind of packet, in this case an UDP packet targeted at the
    43. # discard port (9).
    44. #
    46. sub wake
    47. {
    48. my $host = shift;
    49. my $ipaddr = shift || $DEFAULT_IP;
    50. my $port = shift || $DEFAULT_PORT;
    52. my ($raddr, $them, $proto);
    53. my ($hwaddr, $hwaddr_re, $pkt);
    55. # get the hardware address (ethernet address)
    57. $hwaddr_re = join(':', ('[0-9A-Fa-f]{1,2}') x 6);
    58. if ($host =~ m/^$hwaddr_re$/) {
    59. $hwaddr = $host;
    60. } else {
    61. # $host is not a hardware address, try to resolve it
    62. my $ip_re = join('\.', ('([0-9]|[1-9][0-9]|1[0-9]{2}|2([0-4][0-9]|5[0-5]))') x 4);
    63. my $ip_addr;
    64. if ($host =~ m/^$ip_re$/) {
    65. $ip_addr = $host;
    66. } else {
    67. my $h;
    68. unless ($h = gethost($host)) {
    69. warn "$host is not a hardware address and I could not resolve it as to an IP address.\n";
    70. return undef;
    71. }
    72. $ip_addr = inet_ntoa($h->addr);
    73. }
    74. # look up ip in /etc/ethers
    75. unless (open (ETHERS, '<', '/etc/ethers')) {
    76. warn "$host is not a hardware address and I could not open /etc/ethers.\n";
    77. return undef;
    78. }
    79. while (<ETHERS>) {
    80. if (($_ !~ m/^$/) && ($_ !~ m/^#/)) { # ignore comments
    81. my ($mac, $ip);
    82. ($mac, $ip) = split(' ', $_, 3);
    83. if ($ip =~ m/^$ip$/) {
    84. if ($ip eq $ip_addr) {
    85. $hwaddr = $mac;
    86. last;
    87. }
    88. next;
    89. } else {
    90. my $h2;
    91. unless ($h2 = gethost($ip)) {
    92. next;
    93. }
    94. if (inet_ntoa($h2->addr) eq $ip_addr) {
    95. $hwaddr = $mac;
    96. last;
    97. }
    98. }
    99. }
    100. }
    101. close (ETHERS);
    102. unless (defined($hwaddr)) {
    103. warn "Could not find $host in /etc/ethers\n";
    104. return undef;
    105. }
    106. }
    108. # Generate magic sequence
    110. foreach (split /:/, $hwaddr) {
    111. $pkt .= chr(hex($_));
    112. }
    113. $pkt = chr(0xFF) x 6 . $pkt x 16;
    115. # Allocate socket and send packet
    117. $raddr = gethostbyname($ipaddr)->addr;
    118. $them = pack_sockaddr_in($port, $raddr);
    119. $proto = getprotobyname('udp');
    121. socket(S, AF_INET, SOCK_DGRAM, $proto) or die "socket : $!";
    122. setsockopt(S, SOL_SOCKET, SO_BROADCAST, 1) or die "setsockopt : $!";
    124. print "Sending magic packet to $ipaddr:$port with $hwaddr\n";
    126. send(S, $pkt, 0, $them) or die "send : $!";
    127. close S;
    128. }
    130. #
    131. # process_file
    132. #
    134. sub process_file {
    135. my $filename = shift;
    136. my ($hwaddr, $ipaddr, $port);
    138. open (F, "<$filename") or die "open : $!";
    139. while(<F>) {
    140. next if /^\s*#/; # ignore comments
    141. next if /^\s*$/; # ignore empty lines
    143. chomp;
    144. ($hwaddr, $ipaddr, $port) = split;
    146. wake($hwaddr, $ipaddr, $port);
    147. }
    148. close F;
    149. }
    Alles anzeigen

  • Ich benötige dies unter Windows für ein Netzwerkscript..

    ich möchte zb. folgendes aufrufen im Script:
    wake.exe -ip 192.168.115.7 -mac 0002A5F95974

    und dann sollte er mir den pc einschalten bzw. das signal senden...
    mal schauen, vieleicht kann ich mir ja aus denem script was basteln

    ich möchte dies in C++ Programmieren
    Lerne nicht Programmiersprachen, lerne Programmieren...

    :D Alles andere ist Syntax :D

    [Blockierte Grafik: http://www.xing.com/img/buttons/10_en_btn.gif]