sslug-teknik team mailing list archive

[Hans Schou <abuse@xxxxxxxx>]

On Wed, 27 Jul 2005, Ivar Madsen wrote:

> Jeg har brug for at kunne køre nogle få komandoer når jeg ikke er
> hjemme, kan man på en eller anden måde wap'pe på serveren, og få på
> den måde logge på, og køre dem?

Hvis du syntes brugerfladen på WAP er god, så er der lidt her:
http://www.linuxbog.dk/web/web/wap-apache.html
Både PHP og Perl.

Hvis du vælger PHP/Wap så kig lige på 
http://www.hawhaw.de/

> En af de ting jeg godt vil have, det er at få åbnet for tcp/22 i min
> ZyXEL 650 router, hvordan kan man klare det fra et script?

Det var godt nok en lidt giftig ting. Måske følgende script kan give 
lidt inspiration. Det bruges til at se header/content-type på en 
webserver.

#!/usr/bin/perl
# http://www.codetoad.com/perl_socket_programming.asp
use IO::Socket::INET;
my $host="www.sslug.dk";
my $dir = "/";
my $cmd = "HEAD";
if ($ARGV[0]) {
        $host = $ARGV[0];
        if ($ARGV[1]) {
                $dir = $ARGV[1];
                if ($ARGV[2]) {
                        $cmd = $ARGV[2];
                }
        }
}
print "Send: $host $cmd $dir\n";
$MySocket=new IO::Socket::INET->new(PeerPort=>80, Proto=>'tcp', 
PeerAddr=>$host);
$msg = "$cmd $dir HTTP/1.1\nhost: $host\n\n";
$MySocket->send($msg);
print "$msg";
$MySocket->recv($text,4096);
print "$text";

Jeg har ikke lige prøvet socket programmering med PHP, men man kan
http://dk.php.net/manual/da/function.socket-create.php

/hans
-- 
Horsebakken 78, DK-2400 København NV, Phone: +45 2264 8020
----------------------------------------------------------
Det frarådes at medbringe natriumkloridbomber ved flyrejser.