04. marts 2001 - 14:25
#1
Kender ikke til stofanet, men hvordan virker det? Er det det samme som DSL, eller har man et modem man ringer op med, eller`?
04. marts 2001 - 14:26
#2
Det er et kabelmodem, tilsluttet et REALTEK 8029 netkort (eller noget lignende, det kan godt ske at nummeret på netkortet er forkert).
Hastigheden ligger på niveau med den store ADSL (2048/512).
04. marts 2001 - 14:34
#3
Oki... Så går jeg ud fra at det der \"kabelmodem\" har en IP, f.eks. 10.0.0.1.
Her er de ting jeg vil TRO der skal stå:
gateway: 10.0.0.1
DNS: <StofaNet\'s DNS>
IP: Hent vha. DHCP. (nemmest)
04. marts 2001 - 14:42
#4
Hvordan får jeg forbindelse ???? Det er forbindelsen jeg ikke kan oprette. Jeg har set ret mange steder med .txt filer der kan fungere som dialup\'s, men hvordan bruger jeg dem ???
04. marts 2001 - 14:43
#5
du skal sætte dit netkort op til den adresse som står i dine stofa noter, samt default route til en router der står i dine stofa noter. Så telnet\'er du til den login server der står i dine stofa noter - og så var det det.
(sæt DNS op i /etc/resolv.conf)
altså:
ifconfig til at sætte netkort op
route til at sætte default route på
og telnet til login server.
Derefter kan du hente et login script fra stofas webserver (ligger muligvis endda på cd\'en du fik fra stofa?
04. marts 2001 - 15:13
#6
Jeg mener ikke, der lå noget på stofacd\'en.
Tilgiv mig - jeg er ikke for god til Linux, men kan du ikke skrive en punkt-for-punkt \"to-do\" liste. Brugerfladen er KDE2 på Linux 7.1 (SuSe)
06. marts 2001 - 11:44
#7
Jeg bruger de følgende script, du skal
skifte dit id og password ud, sørg for at
den script er executable (chmod 777)
#! /usr/bin/perl -w
# A script to get stofa connection up
# Also, a test to do sockets in perl
require 5.002;
use strict;
use Socket;
my $ID = \"00000000\\n\" ; # my connection id, and a newline
my $pwd = \"blabla\\n\" ; # my password
my $cmd = 1; # command to get the net up
my $host=\"192.168.30.2\";
my $serviceport = \"259\";
my $iaddr = gethostbyname(\'localhost\');
my $proto = getprotobyname(\'tcp\');
my $paddr = sockaddr_in(0,$iaddr);
$|=1;
my $hisiaddr = inet_aton( $host ) || die \"unknwon host\";
my $hispaddr = sockaddr_in($serviceport,$hisiaddr);
socket(SOCKET, PF_INET, SOCK_STREAM, $proto) || die \"socket: $!\";
connect (SOCKET, $hispaddr ) || die \"connect: $!\";
my $line = \"-\" x 128;
my $ch = \" \";
while ($ch ne \":\" ) {
read(SOCKET, $ch, 1);
print $ch;
}
print \"\\n\";
my $count1 = send(SOCKET,$ID,0);
print \"Sent ID (c=$count1)\\n\";
$ch = \" \";
while ($ch ne \":\" ) {
read(SOCKET, $ch, 1);
print $ch;
}
print \"\\n\";
my $count2 = send(SOCKET,$pwd,0);
print \"Sent pwd (c=$count2)\\n\";
$ch = \" \";
while ($ch ne \":\" ) {
read(SOCKET, $ch, 1);
print $ch;
}
print \"\\n\";
$ch = \" \";
while ($ch ne \":\" ) {
read(SOCKET, $ch, 1);
print $ch;
}
print \"\\n\";
my $choice = \"$cmd \\n\" ; # 1=connection up
my $count3 = send(SOCKET,$choice,0);
print \"Sent choice: $cmd (c=$count3)\\n\";
$ch = \" \";
while ($ch ne \".\" ) {
read(SOCKET, $ch, 1);
print $ch;
}
while ($ch ne \"\\n\" ) {
read(SOCKET, $ch, 1);
print $ch;
}
print \"\\n\";
close SOCKET or die \"couldn\'t close cocket: $!\";