Wake on Lan via site activeren

Pagina: 1
Acties:
  • 100 views sinds 30-01-2008
  • Reageer

  • MP83
  • Registratie: Januari 2000
  • Laatst online: 31-01 18:11
Ik wil graag mijn pc aan kunnen zetten van afstand dmv wake on lan. Ik heb een 3com 905CTX nic met wol kabeltje geinstalleerd, ook in mn bios staat alles goed ingesteld mbt WOL.

M'n pc is verbonden met chello via een linux server.

Weet iemand hoe ik nu met misschien php of cgi iets kan activeren zodat die pc aangaat? Wat ik uiteindelijk zou willen is een pagina op die server waar ik dus de pc kan kiezen welke ik aan wil zetten. Natuurlijk wel beveiligd achter htacces file :P

Alvast bedankt! *D

ps. zou iemand me ook ff kunnen nmap'pen: 213.93.151.192 Heb net alles ingesteld, wil graag weten of alles nu goed zit...

  • MP83
  • Registratie: Januari 2000
  • Laatst online: 31-01 18:11
:? Topic verscheen 2x....

Lekker vaag.. :z

  • Mr_Blobby
  • Registratie: Mei 2000
  • Laatst online: 27-05 13:40
Op http://gsd.di.uminho.pt/jpo/software/wakeonlan/mini-howto/wol-mini-howto-3.html staan allemaal tools voor verschillende platformen.
In Perl staat de Wake On Lan functie hieronder gecodeerd:
#!/usr/bin/perl
#
# little perl script to send a wake-up "magic" packet via lan to power-on
# a PC. This is only supported by new BIOS versions, and must be supported
# by the LAN adapter.
#
# (c) 1999 by Marc Heuse <mheuse@kpmg.com>, the GPL applies to this code.
#

$IP="255.255.255.255"; # limited broadcast ip (default)
$PORT="9991"; # udp port (default)
$INIT_STREAM="\377\377\377\377\377\377"; # (don't change this)

require 5.002;
use Socket;

if (not defined $ARGV[0]) {
print "(c) 1999 by Marc Heuse <mheuse\@kpmg.com>\n\n";
print "Syntax: $0 ethernet_id [ip-address] [udp-port]\n\n";
print "Sends a magic wakeup packet to turn on a PC via the LAN\n";
print "Example: $0 00:80:c9:d1:e0:eb 10.70.82.255 53\n\n";
exit(1);
}

$ETHERNET_ID = $ARGV[0];
$IP = $ARGV[1] if defined $ARGV[1];
$PORT = $ARGV[2] if defined $ARGV[2];

print STDOUT "Sending to Ethernet-ID $ETHERNET_ID, using destination
$IP:$PORT\n";

$protocol = getprotobyname('udp');
socket(S, &PF_INET, &SOCK_DGRAM, $protocol) || die "can't create socket\n";
setsockopt(S, SOL_SOCKET, SO_REUSEADDR, 1);
setsockopt(S, SOL_SOCKET, SO_BROADCAST, 1);
bind(S, sockaddr_in(0, INADDR_ANY)) || die "can't bind\n";
$ipaddr = inet_aton($IP) || die "unknown host: $IP\n";
$paddr = sockaddr_in($PORT, $ipaddr) || die "sockaddr failed\n";

$ETHERNET_ID =~ s/[:-]//g;
$ETHERNET_ID = pack "H12", $ETHERNET_ID;

$WAKE_UP = $INIT_STREAM; $i=0;
while ($i<16) {
$WAKE_UP = $WAKE_UP . $ETHERNET_ID;
$i++;
}

# send three times to be sure the system gets the packet
send (S, $WAKE_UP,0,$paddr) || die "send failed.\n";
send (S, $WAKE_UP,0,$paddr);
send (S, $WAKE_UP,0,$paddr);
Veel suc6!

en zij zagen niet hoe spot in mij worstelde met verdriet


  • MP83
  • Registratie: Januari 2000
  • Laatst online: 31-01 18:11
Site = down, maar alvast bedankt, ik ga ff met dat script aan de slag :)


Iemand anders nog tips?

  • MP83
  • Registratie: Januari 2000
  • Laatst online: 31-01 18:11
Op woensdag 31 oktober 2001 15:08 schreef Mr.Blonde het volgende:
ps. zou iemand me ook ff kunnen nmap'pen: 213.93.151.192 Heb net alles ingesteld, wil graag weten of alles nu goed zit...
Iemand die dit ff kan doen? Thx..

Verwijderd

als ik t goed begrijp wil jij dus een commando aan je server doorgeven, en vervolgens moet de server daardoor een magic packet zenden naar een bepaalde client op het netwerk?

Ik weet verder niks voor je, doe alleen maar dos en windows, maar dit was om je vraag wat te verduidelijken.
Is in elk geval wel interessant.

Wat je dus gaat bouwen is een script waarin je een tabel met MAC-adressen hebt van je machines, en daarvan kies je een of meer adressen uit via je browser, en dan gaat de server die pc's welke die mac-adressen hebben, wakker maken?

Succes en houd ons op de hoogte.

  • TiMmS
  • Registratie: September 2001
  • Laatst online: 07-10-2024
jah dat zei die :)

Alleen mensen zonder fantasie vluchten in de realiteit.


  • MP83
  • Registratie: Januari 2000
  • Laatst online: 31-01 18:11
Yep, das wat ik wil :)

Dat script van hierboven geeft alleen maar internal server errors... :?

Iemand een andere oplossing of tip? (8>

  • MP83
  • Registratie: Januari 2000
  • Laatst online: 31-01 18:11
/kick :z

  • Mr_Blobby
  • Registratie: Mei 2000
  • Laatst online: 27-05 13:40
Dat script van hierboven is ook geen cgi-script.
Het werkt alleen "stand alone".

Een kant en klare perl-module voor wake-on-lan is te vinden op CPAN:
De readme:
http://www.perl.com/CPAN/authors/id/CLINTDW/Net-Wake-0.01.readme
De module:
http://www.perl.com/CPAN/authors/id/CLINTDW/Net-Wake-0.01.tar.gz

Het moet toch niet zo moeilijk zijn om een cgi-script te maken die deze module gebruikt?

en zij zagen niet hoe spot in mij worstelde met verdriet


  • MP83
  • Registratie: Januari 2000
  • Laatst online: 31-01 18:11
Ikzelf heb helaas geen verstand van cgi...iemand die een beetje kan helpen?
Pagina: 1