AccessD Lab: сентября 2010

вторник, 28 сентября 2010 г.

Мораль

Если что-то работает - не трогай это. Путь работает. Не надо пытаться улучшить, если нет резерва. В этот раз повезло и не залип на всё ночь, но адреналина хватило )

понедельник, 27 сентября 2010 г.

Замечательная штука, сабж )
Я когда-то в амароке их эмбиент канал врубал. А тут вот заглянул, нашёл габбер канал, включил - и правда габбер. А вот его-то кстати и захотелось на днях. Между прочим, на последнем A Nigthmare Outdoor парочку неплохих вещей нарыл.

суббота, 25 сентября 2010 г.

Они в Москве!!!

Gabba Front Berlin. 2 октября.
А ещё будут Bonehead, The Massacre и Jensen.

четверг, 9 сентября 2010 г.

Ротация бекапов

Доделал скрипт для хранения и ротации бекапов. Из костыля к fsbackup оформилось что-то полноценное.
Можно отправлять несколько файлов, пример:

/root/scripts/store.pl /root/scripts/mybase.sql.gz backup.tar.gz

В сам скрипт забиваются реквизиты ftp сервера и глубина ротации.

#!/usr/bin/perl

use Net::FTP;
use File::Basename;

my $remote_host = "localhost";
my $remote_login = "backup";
my $remote_password = "yeyzfz200";
my $n = 12;
my $path;
my $file;

$ftp = Net::FTP->new($remote_host) || die "Can't connect to ftp server.\n";
$ftp->login($remote_login, $remote_password) || die "Can't login to ftp server.\n";
$ftp->binary();

while ($path = shift @ARGV) {
        my $file = basename($path);
        # old backup deleting
        print "Remove old backup\n";
        foreach $cur_dir ($ftp->ls()) {
                if ($cur_dir eq $file.".".($n - 1)) {
                        $ftp->delete($cur_dir);
                }
        }
        # backup rotate
        print "Backup rotating:\n";
        for ($i = $n - 2; $i > 0; --$i) {
                $j = $i + 1;
                foreach $cur_dir ($ftp->ls()) {
                        $name = $new_name = $cur_dir;
                        if ($name eq $file.".".$i) {
                                $new_name =~ s/\.$i$/\.$j/;
                                print "$name -> $new_name\n";
                                $ftp->rename($name, $new_name);
                        }
                }
        }
        foreach $cur_dir ($ftp->ls()) {
                $name = $new_name = $cur_dir;
                if ($name eq $file) {
                        $new_name = $name.".1";
                        print "$name -> $new_name\n";
                        $ftp->rename($name, $new_name) or die "Can't rename $name\n";
                }
        }

        $ftp->put("$path", "$file") || print "Can't PUT $path to remote FTP";
}

среда, 8 сентября 2010 г.

mysql: Host is blocked because of many connection errors;

Вот такое жизнерадостное сообщение порой можно получить от MySQL:

Host 'example.com' is blocked because of many connection errors; unblock with 'mysqladmin flush-hosts'

Связано вот с чем. У мускуля имеется своего рода защита от брутфорса - параметр max-connection-error. Как только число ошибок станет больше допустимого - хост блочится.
Пример из практики. Человек в скрипте указал пользователя, не имеющего доступа к базе, к которой собственно и был коннект. Несколько раз получил сообщение, что не выбрана база, а потом - Host blabla.de is blocked и т.д.
Тут, между прочим, широкие возможности открываются ;)

Собственно, дабы сбросить блокировку надо выполнить:

mysqladmin flush-hosts

вторник, 28 сентября 2010 г.

Мораль

понедельник, 27 сентября 2010 г.

di.fm

суббота, 25 сентября 2010 г.