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

Мораль

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

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

di.fm

Замечательная штука, сабж )
Я когда-то в амароке их эмбиент канал врубал. А тут вот заглянул, нашёл габбер канал, включил - и правда габбер. А вот его-то кстати и захотелось на днях. Между прочим, на последнем 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