|
ru.unix.bsd
- RU.UNIX.BSD ------------------------------------------------------------------
From : Sergey Melnikov 2:5061/83 16 Feb 2005 11:05:32
To : Igor Rulyov
Subject : Re: теоритическая реализация ЭТОГО
--------------------------------------------------------------------------------
15 Фев 05 20:51, Igor Rulyov wrote to Dmitriy Kirhlarov:
>> Может лучше юзерам специальную страничку сделать на вебе, чтоб сами
>> включали-выключали инет?
IR> А ентот скрипт очень будет сложный для написания новичком? ;)
cat inet.cgi
#!/usr/bin/perl
use CGI qw/:standard/;
if (param())
{
if (param ("Disconnect"))
{system ("exec /home/admin/bin/off.sh")};
if ( param ("Connect"))
{system ("exec /home/admin/bin/on.sh")};
sleep 30;
print ("Location: inet.cgi?\n\n");
}else{
$number=system("ps -ax |grep 'pppd call etes' |awk '{print $1}'|head -n 1");
if ( $number != '' )
{$bottom = "Disconnect"}
else {$bottom = "Connect"};
print header(-charset=>'koi8-r'),
start_html( -bgcolor=>White,
-title=> 'Fucking connect'
),'<center>';
print "<br><br><br><br><br><br><br><br><br><br><br>";
print start_form(action=>'inet.cgi');
print submit(-name=> "$bottom"),'</center>',end_form,end_html;}
on.sh и off.sh - соответственно запуск и остановка pppd. Суидные они должны
быть.
Sergey
... Hе пытайтесь понять женщину, а то, не дай бог, еще поймете!
--- GoldED+/BSD 1.1.5
* Origin: this game has no name (2:5061/83)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
