[snvoronkov]

Ну и как выполнять, если мы блочим по IP?:(

В днсы свой пропишите. Первый раз, чтоли?

[ayf]

Ну и как выполнять, если мы блочим по IP?:(

В днсы свой пропишите. Первый раз, чтоли?

А толку? У меня клиенты - сплошные юрики со своими админами. Даже если я положу свой ДНС среди дня - никто не заметит. Пользуют кто гугловский, а кто хочет фильтровать - яндекс.

[ayf]

Вы же не можете в канцеляризм =)

Не на час, а насовсем, до особого распоряжения, если угодно. Нужно до наступления 15 часов заблокировать сайт и до наступления 13 часов сообщить об этом дяденьке. Не пытайтесь понять логику.

 

Кстати, сей сайт не появился в реестре... Весьма странная ситуация... Или теперь нас так будет дергать любой кто захочет?

[visir]

Ну и как выполнять, если мы блочим по IP?:(

Спокуха, владелец этих IP-ов утверждает, что именно этот домен перенесен на специальные IP-адреса, на которых больше ничего нету.

Учения?

[ayf]

Ну и как выполнять, если мы блочим по IP?:(

Спокуха, владелец этих IP-ов утверждает, что именно этот домен перенесен на специальные IP-адреса, на которых больше ничего нету.

Учения?

Интересно. сайт в реестр внесен генпрокуратурой еще 24 числа и у меня заблочен по IP. Но при попытке через сервер выгрузок глянуть по домену - пишет, что нет такого в реестре. Судя по всему, опять что-то там криво работает.

[disappointed]

Что за пустая хрень влетела в реестр...

[disappointed]

URL на русском влетел http://antizapret.info/site.php?id=2130

[Andrei]

Что за пустая хрень влетела в реестр...

+1. у меня bind эту фигню не прожевал (блокировка я сделал через bind) :(

[Butch3r]

Как я понимаю в реестре появились домены без указания IP адреса?

[Andrei]

Судя по всему скрипт споткнулся об

-<content includeTime="2014-02-28T18:29:17" id="69088">
<decision org="суд" number="2-435/2013" date="2013-11-15"/>
-<url>
<![CDATA[http://ru.scribd.com/doc/43706359/дубров-Г-К-Генералы-о-еврейской-мафии]]>
</url>
<ip>50.97.140.66</ip>
</content>

 

В его результате обработки скриптом

xmlstarlet sel -T -t -m "reg:register/content" -v "concat('',domain)" -n /etc/zapret/dump.xml |  sed -r -e 's_^(.*)$_zone \"\1\" \{ type master\; file
\"\/etc\/bind\/db.null\"\; \};_g' > /etc/zapret/named.blocked

 

получилось для конфига bind-а:

zone "" { type master; file "/etc/bind/db.null"; };

и bind просто не переварил такую строку.

[disappointed]

Всё верно, так и вышло, только я использовал XML:Simple перловый.

[lcgc]

скрипт споткнулся об

тем более странно, что это не первый и не единственный случай кириллицы в выгрузке

[snvoronkov]

скрипт споткнулся об

тем более странно, что это не первый и не единственный случай кириллицы в выгрузке

Домена тута нетути.

[disappointed]

Домена тута нетути.

Точно, не заметил сразу.

Ну и как поступать с такими записями, брать домен самому из урла?

[Tem]

А вдруг в след раз не будет урла?

[disappointed]

А вдруг в след раз не будет урла?

Переписал логику, проверяю, если домен есть, то использую его, если нет то беру его из урла.

[Andrei]

А вдруг в след раз не будет урла?

Переписал логику, проверяю, если домен есть, то использую его, если нет то беру его из урла.

Наработки не публикуете?

[disappointed]

А вдруг в след раз не будет урла?

Переписал логику, проверяю, если домен есть, то использую его, если нет то беру его из урла.

Наработки не публикуете?

Парсер дампа с выгрузкой на сервер с BIND.

#!/usr/bin/perl

use XML::Simple;
use Digest::MD5 qw(md5_hex);
use encoding 'windows-1251';

$workdir = "/dt_billing/bin/zapret-info/";

my $xml = new XML::Simple;
my $data = $xml->XMLin($workdir."dump.xml");
my $whitelist = "vk\.com|vk\.me|wikipedia\.org|vkontakte\.ru|userapi\.com|odnoklassniki\.ru|facebook\.com|youtube\.com|mail\.ru|yandex\.ru|rambler\.ru|livejournal\.com|twitter\.com|imagevenue\.com";

foreach my $id (keys (%{$data-> {content}})) {
   $domain = lc($data->{content}->{$id}->{domain});
   if (ref $data->{content}->{$id}->{url} eq 'ARRAY') {
foreach my $url (values $data->{content}->{$id}->{url}) {
    $url = lc($url);
    $url =~ /^http(s|):\/\/([^\/]+)/;
	if ($domain) {
		$DOMAINS{$domain}=$id;
	    } elsif ($2) {
		$DOMAINS{$2}=$id;
	        }
    $cnt++;
    }
} else {
    $url = lc($data->{content}->{$id}->{url});
    $url =~ /^http(s|):\/\/([^\/]+)/;
	if ($domain) {
		$DOMAINS{$domain}=$id;
	    } elsif ($2) {
		$DOMAINS{$2}=$id;
	        }
    $cnt++;
   }
}

foreach (keys %DOMAINS) {
   if (($_ =~ /($whitelist)$/) || ($_ =~ /^\d+\.\d+\.\d+\.\d+$/)) {
print "Whitelist domain found: $_\n";
delete $DOMAINS{$_};
   }
}

foreach (sort keys %DOMAINS) {
$config .= "zone \"".$_."\" {
type master;
file \"/var/named/forbidden_domains.hosts\";
};\n";
}
chop($config);
print "Records processed: ".$cnt."\nForbidden domains: ".keys(%DOMAINS)."\n";
$md5 = md5_hex($config);
open (FILE, "<".$workdir."/forbidden_domains.conf");
local $/;
$file = <FILE>;
close FILE;
unless (md5_hex($file) eq $md5) {

print "File 'forbidden_domains.conf' is changed.\n";
if (keys(%DOMAINS) > 0) {
   open (FILE, ">".$workdir."/forbidden_domains.conf");
   print FILE $config;
   close FILE;
   system("/usr/bin/scp -q ".$workdir."/forbidden_domains.conf root\@123.123.123.123:/etc/bind");
   system("/usr/bin/ssh root\@123.123.123.123 '/usr/sbin/rndc reload || echo \"An error occured while forbidden_domains.conf update! Config file is not accepted (syntax errors). Please investigate.\" | mail admin\@domain.net'");
   }
} else {
   print "File 'forbidden_domains.conf' is up to date. Do nothing.\n";

[lcgc]

брать домен самому из урла

на мой взгляд, домен надо брать именно из урла

если не ошибаюсь, оно - обязательное

в отличие от полей с ip и доменом

[disappointed]

на мой взгляд, домен надо брать именно из урла

если не ошибаюсь, оно - обязательное

 

Не удивлюсь, если в будущем будут записи где домен будет отличен от того что в URL-е.

[sheft]

В России впервые вынесен приговор за распространение мультфильмов в жанре хентай

http://www.infox.ru/hi-tech/internet/2014/03/03/V_Rossii_vpyervyyye_.phtml

 

эксперты провели экспертное исследование хентай и пришли к однозначному выводу, что некоторые персонажи мультфильмов – несовершеннолетние дети в возрасте от 14 до 18 лет, а сюжет сконцентрирован на сексуальном насилии над детьми».

 

я что то не пойму, в законе вроде о детях, а подтянули мультперсонажей..

Изменено 3 марта, 2014 пользователем sheft

[Pilorama]

В ответ на действия российских надзорных органов, японским мультипликаторам рекомендуется располагать в кадре, на видном месте, рисовку паспортов каждого участвующего персонажа с явно указанным годом рождения. ^_^

[Ivan_83]

В ответ на действия российских надзорных органов, японским мультипликаторам рекомендуется располагать в кадре, на видном месте, рисовку паспортов каждого участвующего персонажа с явно указанным годом рождения. ^_^

Лет через 30 они же будут стариками :)

[Sergey Gilfanov]

Лет через 30 они же будут стариками :)

А некоторые произведения временем действия могут иметь будущее различной степени давности. И достаточно далекое прошлое.

В общем, зря они это затеяли. Найдется бойкий адвокат - может цирк на всю страну устроить.

[sheft]

эксперты провели экспертное исследование хентай

эксперты по хентаю. о как :)

Изменено 3 марта, 2014 пользователем sheft