家有长城宽带，想装debian，应如何起步安装？

journeyer · 发表于 2004-8-6 21:12:03

我装的是长宽，联入网络需要密码登录，我还不清楚在安装基本系统之前(非X窗口)如何使用网络，所以想想向先行者请教一下：基本系统可以通过长宽网络安装吗，需要什么特别设置吗？先谢谢了。

smile787 · 发表于 2004-8-6 21:19:37

最初由 journeyer 发表
我装的是长宽，联入网络需要密码登录，我还不清楚在安装基本系统之前(非X窗口)如何使用网络，所以想想向先行者请教一下：基本系统可以通过长宽网络安装吗，需要什么特别设置吗？先谢谢了。

具体是认证是基于什么的？web认证？pppoe拨号？

journeyer · 发表于 2004-8-7 18:50:30

web认证。

smile787 · 发表于 2004-8-7 22:01:38

最初由 journeyer 发表
web认证。

好像不行吧。。。;)

ys_freedom · 发表于 2004-8-7 22:22:36

web认证是帮定iP与网卡的序列号马？

hugojoe · 发表于 2004-8-7 22:32:33

我是通过光盘安装的基本系统，然后启动lynx就可以出现认证窗口了。

ys_freedom · 发表于 2004-8-7 22:35:50

hugojoe兄用的是staroffice马？请问感觉比oo如何？那里有下载的？

mrkissinger · 发表于 2004-8-8 02:52:57

下面是我的长宽认证程序，你自己看看。
因为我同时使用长宽和歌华，所以你要自己改一下。

#!/usr/bin/perl
use strict;
use Switch;
use HTML::Form;
use LWP::UserAgent;
use POSIX qw(strftime);
my $dialog="whiptail";
my $tmpfile="/tmp/isp.tmp";
my $result;
my $dev;
my $myip;
my $html="
<form name='authform' action='http://211.161.45.9:3002/cgi-bin/authcgi_login' method='post'>
<input type='hidden' name='sip' value='211.161.45.9'>
<input type='hidden' name='uip' value='220.113.14.3'>
<input type='hidden' name='url' value='www.linuxeden.com'>
<input type='hidden' name='uact' value='login'>
<input type='hidden' name='uact_status' value='1'>
<input type='text' name='uid' size='32' value='' maxlength='32'>
<input type='password' name='upwd' size='32' value='' maxlength='32'>
<input type='hidden' name='vpn' value='0'>
<input type='submit' name='go' value='用户登入' >
<input type='hidden' name='btype' value='0'>
</form>
";
# Select ISP
system ("$dialog --title 修改上网方式 --menu 请选择上网的ISP 10 20 2 1 长宽 2 歌华 2> $tmpfile");
$result=getResult($tmpfile);
SWITCH:
{
$result eq "1" &&
do
{
print "长宽";
&changeISP("eth2","220.113.14.1");
};
$result eq "2" &&
do
{
print "歌华";
&changeISP("eth1","219.236.0.1");
};
}
system ("$dialog --title 修改成功 --msgbox 修改成功 10 20 2> $tmpfile");
#{{{ changeISP()
# Update dynamic domain name
sub changeISP()
{
my $dev=shift(@_);
my $gw=shift(@_);
system("ifdown $dev && ifup $dev");
while (system("route del default")==0)
{
# Delete each "default" gateway
}
system("route add default gw $gw");
if ($dev eq "eth2")
{
&network_auth();
}
system("3322 $dev");
}
#}}}
#{{{ getResult()
# Read the dialog result from tmpfile
sub getResult()
{
my $tmpfile=shift(@_);
my $linebuffer;
my $buffer;
open(RESULT,$tmpfile);
while ($linebuffer=<RESULT>)
{
$buffer=$buffer.$linebuffer;
}
return($buffer);
}
#}}}
#{{{ getIP()
sub getIP()
{
my $dev=shift(@_);
if ($dev eq "")
{
#print "Using default device\n";
$dev="eth0";
}
open(IP,"ifconfig $dev |");
my $ip;
my $inline;
while ($inline=<IP>)
{
#print $inline;
$ip.=$inline;
}
$ip=~ /(\d+\.)+\d+/g;
return($&);
}
#}}}
#{{{ network_auth()
sub network_auth
{
# Submit the filled form to authorize
my $myip=&getIP("eth2");
print "$myip\n";
my $method='POST';
my $action_uri='http://211.161.45.9:3002/cgi-bin/authcgi_login';
my $enctype='multi-part/form-data';
my @f=HTML::Form->parse($html,'authform');
#my $form=HTML::Form->new( $method, $action_uri, $enctype );
my $form=shift @f;
my $ua = LWP::UserAgent->new;
$ua->cookie_jar({ file => "/tmp/cookies.txt" });
$form->value('sip','211.161.45.9');
$form->value('uip',$myip);
$form->value('url','www.linuxeden.com');
$form->value('uact','login');
$form->value('uact_status','0');
$form->value('uid','010010007282');
$form->value('upwd','');
#$form->value('remuser','1');
$form->value('vpn','0');
$form->value('go','用户登入');
$form->value('btype','0');
#$form->value('jap','0');
my $response=$ua->request($form->make_request);
print $response->content."\n";
}
#}}}

复制代码

KMnO4 · 发表于 2004-8-8 18:44:35

http://www.linuxsir.cn/forum.php?mod=viewthread&tid=131307

journeyer · 发表于 2004-8-9 20:56:08

这两天忙些杂事，没顾得上网，想不到有这么多朋友关心，等忙过这阵子，我就试试，有什么再向各位请教！

(我的长宽IP为动态，网卡也没绑定)

阿弥陀佛！

		自动登录	找回密码
密码			注册

家有长城宽带，想装debian，应如何起步安装？

回复: 家有长城宽带，想装debian，应如何起步安装？

我有一个超级笨着

谢谢各位！

浏览过的版块