Мы — долго запрягаем, быстро ездим, и сильно тормозим.
www.lissyara.su —> статьи —> FreeBSD —> Мелочи —> Wget4web

Wget4web

Автор: gonzo111.


http://irodov.nm.ru/wget4web/
http://irodov.nm.ru/wget4web/index_rus.htm


Makefile       
USE_APACHE=     2.2


[X] CGI                   Enable mod_cgi

Рихтуем $filesdir в /usr/local/www/wget4web/info.cgi и юзеров в users.cgi


httpd.conf или httpd-vhosts.conf 
<IfModule cgi_module>
AddHandler cgi-script .cgi

    Alias /wget "/usr/local/www/wget4web/"
    <Directory /usr/local/www/wget4web/>
     AllowOverride None
     #AllowOverride Authconfig
     Options Indexes FollowSymLinks MultiViews ExecCGI
     DirectoryIndex admincenter.cgi
     Order allow,deny
     Allow from all
    </Directory>

    # Проверка работы CGI, сделать chmod +x test.cgi
    #<Directory "/usr/local/www/apache22/cgi-bin">
    #    #AllowOverride None
    #    Options Indexes MultiViews ExecCGI
    #    Order allow,deny
    #    Allow from all
    #</Directory>
</IfModule>

Работа напильником

Что мешало автору довести до ума такой простенький скрипт не понятно.
add.cgi 
use CGI qw(:standard);

require "data/info.cgi";    #Config
-----строка 25-->require "admin.lib";
...........
#Without parametrs
else{
   print ("<BODY>\n");
-----строка 105--->leftmenu();

admin.lib 
sub leftmenu{
print qq(
   <TABLE>
   <TR><TD>
   <B>
   <P><A HREF="admincenter.cgi">Summary&nbsp;statistic</A>
--------->  <P><A HREF="add.cgi">Add Download&nbsp;files</A>
--------->  <P><A HREF="progress.cgi">Progress&nbsp;files</A>
   <P><A HREF="adminfiles.cgi">Downloaded&nbsp;files</A>
   <P><A HREF="admindel.cgi">Delete&nbsp;files</A>

progress.cgi 
#Main program
my $logname;

print header(
   -type=>'text/html',
   -Cache_Control=>'no-cache'
);
print ("<HTML>\n<HEAD>\n<TITLE>Download information</TITLE>");
----строка 190-----> leftmenu();
print ("<meta HTTP-EQUIV=\"Refresh\" CONTENT=\"$refreshstat\">\n");

Все сырое до горя
-после остановки закачки нету продолжить закачку
-вместо скорости знаки вопроса
-авторизация вообще непонятно зачем, тк процесс все равно пашет от имени  www, и другим видны тоже закачки
- при добавлении новых закачек непонятно зачем надо набирать заново пароль и логин



размещено: 2010-10-14,
последнее обновление: 2010-10-14,
автор: gonzo111


Комментарии пользователей [2 шт.]

ttys, 2010-10-14 в 21:34:02

в add.cgi
поменял на:
print ("<H3 align=center><A HREF=\"admincenter.cgi\">Main menu</A></H3>\n");
и добавил эту же строку в progress.cgi
--->строка 184

>>print ("<HTML>\n<HEAD>\n<TITLE>Download information</TITLE>");
>>----строка 190-----> leftmenu();
>>print ("<meta HTTP-EQUIV=\"Refresh\" CONTENT=\"$refreshstat\">\n");
не получилось у меня, как добавляю так вообще пустая страница

ЗЫ Гонзыч ты куда запхал алиасы?

Maksim, 2014-12-16 в 15:25:47

Здравствуйте. Можно задать вопрос. Я все настроил - вэб интрерфейс отображается.Задаю ссылку на закачку он пишет что закачка началась но на самом деле ничего не качается. Помогите пожалуйста. В чем может быть дело ?
 

  Этот информационный блок появился по той простой причине, что многие считают нормальным, брать чужую информацию не уведомляя автора (что не так страшно), и не оставляя линк на оригинал и автора — что более существенно. Я не против распространения информации — только за. Только условие простое — извольте подписывать автора, и оставлять линк на оригинальную страницу в виде прямой, активной, нескриптовой, незакрытой от индексирования, и не запрещенной для следования роботов ссылки.
  Если соизволите поставить автора в известность — то вообще почёт вам и уважение.

© lissyara 2006-10-24 08:47 MSK

Время генерации страницы 0.0379 секунд
Из них PHP: 24%; SQL: 76%; Число SQL-запросов: 76 шт.
У Вас отключено GZIP-сжатие в браузере. Размер страницы 15271