Модераторы: korob2001, ginnie

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> иллюзия в файловой ситеме 
:(
    Опции темы
gcc
Дата 6.6.2008, 14:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Агент алкомафии
****


Профиль
Группа: Участник
Сообщений: 2691
Регистрация: 25.4.2008
Где: %&й

Репутация: 1
Всего: 17



webmin для администрирования сервера 
а вот этот же проект, но для хостинга 400$ стоит http://www.virtualmin.com

я имел ввиду, что есть смысл сделать просто!


What is Virtualmin?

It is a Webmin module for managing multiple virtual hosts through a single interface, like Plesk or Cpanel. It supports the creation and management of Apache virtual hosts, BIND DNS domains, MySQL databases, and mailboxes and aliases with Sendmail or Postfix. It makes use of the existing Webmin modules for these servers, and so should work with any existing system configuration, rather than needing it's own mail server, web server and so on.

Virtualmin can also create a Webmin user for each virtual server, who is restricted to managing just his domain and its files. Webmin's existing module access control features are used, and are set up automatically to limit the user appropriately. These server administrators can also manage the mailboxes and mail aliases in their domain, via a web interface that is part of the module. 

================================================================

Two versions of Virtualmin exist, under separate licenses:

    * Virtualmin GPL

      This is the freely downloadable version, licensed under the GPL. It is under active development, but does not contain all of the features of the Pro version.
    * Virtualmin Pro

      This is the commerical version that you have to pay for. It includes numerous features not in the GPL version (like script installers, resellers, HTML editor, an improved UI, mobile access, spam and virus filtering). Customers also get support, a simplified complete installation script and access to a repository of updated packages. To learn more, visit the Virtualmin Pro website.

Both the Pro and GPL versions are built from the same codebase, so all bugfixes and some new features go into both of them.

Это сообщение отредактировал(а) gcc - 6.6.2008, 14:41
PM WWW ICQ Skype GTalk Jabber   Вверх
gcc
Дата 23.6.2008, 06:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Агент алкомафии
****


Профиль
Группа: Участник
Сообщений: 2691
Регистрация: 25.4.2008
Где: %&й

Репутация: 1
Всего: 17



 smile  smile 

Это сообщение отредактировал(а) gcc - 24.6.2008, 03:25
PM WWW ICQ Skype GTalk Jabber   Вверх
gcc
Дата 24.6.2008, 03:22 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Агент алкомафии
****


Профиль
Группа: Участник
Сообщений: 2691
Регистрация: 25.4.2008
Где: %&й

Репутация: 1
Всего: 17



в поиске я отрывки нашел...

было написнао что достаточно только вот этого:
Код

 if ($filename =~/[<>\|\-&\.\\\/\0]/)
     {die "Недопустимый символ в имени файла \n";}
  open(f, $filename);


но вот еще есть:
Код

        $insecure_data=~s/\0//g;


Код

        s/([\&;\`'\\\|"*?~<>^\(\)\[\]\{\}\$\n\r])/\\$1/g;


Код

       &;`'\"|*?~<>^()[]{}$\n\r


Код

        s/\.\.//g;


Код

        s/(\|)/\\$1/g


Ошибка, не полностью:
Код


        $temp =~ s/([;<>\*\|`&\$!#\(\)\[\]\{\}:'"])/\\$1/g; 


Фильтрация пользовательского ввода
Проблемы CGI на Perl


вот таких регулярных выражений достаточно?

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

Это сообщение отредактировал(а) gcc - 24.6.2008, 03:34
PM WWW ICQ Skype GTalk Jabber   Вверх
tolkien
Дата 24.6.2008, 07:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 277
Регистрация: 5.4.2008

Репутация: 4
Всего: 4



Код

# ****************************************************************************
# cleanInput($) - removes nasty things from the input string.
#                 replaces \n with <BR>
#
# PARAMETERS:
#  this - current object reference (not part of the function call)
#  input - the input to cleanse of nasties
# MODIFIES: Nothing
# RETURNS: clean input
# ****************************************************************************
sub cleanInputBR($){
  my $this = shift;  # first parm is always the object reference
  my $input = shift;

  # take the input and make it squeaky clean.
  my $CR = chr(13); # Carriage return
  my $LF = chr(10); # Line Feed

  $input = join "", split /\'/, $input;
  $input = join "", split /\"/, $input;
  $input = join "", split /\`/, $input;
  $input = join "", split /\\/, $input;
  $input = join "", split /\//, $input;
  $input = join "", split /\:/, $input;
  $input = join "", split /\;/, $input;
  $input = join "", split /\!/, $input;
  $input = join "", split /\~/, $input;
  $input = join "", split /\@/, $input;
  $input = join "", split /\#/, $input;
  $input = join "", split /\$/, $input;
  $input = join "", split /\%/, $input;
  $input = join "", split /\^/, $input;
  $input = join "", split /\&/, $input;
  $input = join "", split /\*/, $input;
  $input = join "", split /\</, $input;
  $input = join "", split /\>/, $input;
  $input = join "", split /\?/, $input;
  $input = join "", split /\)/, $input;
  $input = join "", split /\(/, $input;
  $input = join "", split /$LF/, $input;
  $input = join "<BR>", split /$CR/, $input;

  return $input;
}


Сегодня наткнулся. Помоему очень хорошая функция. И написана так необычно.
PM MAIL   Вверх
KSURi
Дата 24.6.2008, 12:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 887
Регистрация: 8.6.2006
Где: Russia

Репутация: 20
Всего: 27



простой 
Код

s///gs

в данном случае будет и быстрее и удобнее имхо


--------------------
Died at Life.pl line 21
PM Jabber   Вверх
amg
Дата 24.6.2008, 13:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1145
Регистрация: 3.8.2006
Где: Новосибирск

Репутация: 38
Всего: 50



Цитата(tolkien @  24.6.2008,  07:45 Найти цитируемый пост)
Сегодня наткнулся. Помоему очень хорошая функция. И написана так необычно.
Подозреваю, что tolkien так шутит (KSURi прав, соответствующее регулярное выражение будет гораздо быстрее, не говоря уже о том, что ГОРАЗДО короче и, IMHO, понятнее).



Это сообщение отредактировал(а) amg - 24.6.2008, 13:45
PM MAIL   Вверх
nitr
Дата 24.6.2008, 13:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2543
Регистрация: 10.2.2006
Где: Россия :)

Репутация: 37
Всего: 84



smile

Добавлено через 9 секунд
Код

=)



--------------------
PM   Вверх
Ramirez
Дата 24.6.2008, 16:52 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 305
Регистрация: 18.1.2005
Где: Moscow, ExUSSR

Репутация: 4
Всего: 5



еще надежнее:

Код

s/.+//g


=)
PM ICQ   Вверх
gcc
Дата 24.6.2008, 17:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Агент алкомафии
****


Профиль
Группа: Участник
Сообщений: 2691
Регистрация: 25.4.2008
Где: %&й

Репутация: 1
Всего: 17



Код

"\x31\xc9\x83\xe9\xb0\xd9\xee\xd9\x74\x24\xf4\x5b\x81\x73\x13\x42"

вот это не запуститься или подобно?

самое главно иправить ошибки... 

Это сообщение отредактировал(а) gcc - 24.6.2008, 18:59
PM WWW ICQ Skype GTalk Jabber   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl"
korob2001
sharq
  • В этом разделе обсуждаются общие вопросы по языку Perl
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Если ваш вопрос относится к CGI программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", можно скачать здесь


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.1766 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.