neptune

Опять проблемы с аккумулятором

2010-03-17T09:18:00.001+03:00

Сегодня опять остался без машины - аккум сел. Проблема получается где-то в проводке - но где никак не могу понять. Когда я каждую ночь снимал клемму с аккумулятора - все было хорошо, даже почти севший вначале аккум за 2 недели успешно зарядился от генератора. Когда вновь перестал снимать клемму - за 3 недели аккум сел :(

Не знаю куда копать. Мерял ток утечки - через минуту после постановки на сигнализацию - 0.01А - то есть все вроде бы норм.
Думаю нужен как-нибудь девайс который будет постоянно мониторить ток утечки, как такое реализовать?

Мои скрипты blogger2lj и twitter2vkontakte

2009-09-11T10:52:00.001+04:00

Решил выложить свои скрипты для кросспостинга, а то многие просят.

Сперва Кросспостринг из твиттера на вконтакте. В настройках укажите логин/пароль от сервисов. Также понадодобятся модули Net::Twitter, WWW::Curl::Easy, WWW::Curl::Share, Text::Iconv,
У меня скрипт запускается по крону каждые 10 минут

twi2vk.pl


#!/usr/bin/perl
use strict;
use warnings;
use Net::Twitter;
use WWW::Curl::Easy;
use WWW::Curl::Share;
use URI::Escape;
use Text::Iconv;
use CGI;
use CGI qw /unescapeHTML/;

my $c = Text::Iconv->new('utf-8','utf-8');
my $q = new CGI;

my $twlogin = 'neptunix';
my $twpass = '';
my $vklogin = '';
my $vkpass = '';
my $debug = 0;
my $add = '';
#my $add = ' « http://twitter.com/neptunix »';    # Что добавить в конец сообщения


my $nt = Net::Twitter->new(
    traints => [qw/API::REST/],
    username => $twlogin,
    password => $twpass
);

my $twitterStatus;
eval {
    my $statuses = $nt->user_timeline({count => 20});
    for my $status (@$statuses){
        if ($status->{text} !~ m/^\@/){             # Убираем реплаи
                $twitterStatus = "$status->{text}";
        last;
        }
    }
};

if (my $err = $@) {
    die $@ unless $err && $err->isa('Net::Twitter::Error');

    warn    "HTTP Response Code: ", $err->code, "\n",
        "HTTP Message: ", $err->message, "\n",
        "Twitter error: ", $err->error, "\n";
}

# Vkontakte

my $curlsh = new WWW::Curl::Share;
$curlsh->setopt(CURLSHOPT_SHARE, CURL_LOCK_DATA_COOKIE);
$curlsh->setopt(CURLSHOPT_SHARE, CURL_LOCK_DATA_DNS);

# Setting the options
my $curl = new WWW::Curl::Easy;
$curl->setopt(CURLOPT_HEADER,1);
$curl->setopt(CURLOPT_URL, 'http://pda.vkontakte.ru/login?pda=index&amp;acknowledge=0');
my $response_body = '';
open (my $fileb, ">", \$response_body);
$curl->setopt(CURLOPT_WRITEDATA,$fileb);
$curl->setopt(CURLOPT_SHARE, $curlsh);
$curl->setopt(CURLOPT_POST, 1);
$curl->setopt(CURLOPT_POSTFIELDS, "email=$vklogin&pass=$vkpass");

# Starts the actual request
my $retcode = $curl->perform;
# Looking at the results...
if ($retcode == 0) {
 print("Transfer went ok\n") if($debug==1);
 my $response_code = $curl->getinfo(CURLINFO_HTTP_CODE);
  # judge result and next action based on $response_code
 print("Received response: $response_body\n") if($debug==1);
} else {
 print("An error happened: ".$curl->strerror($retcode)." ($retcode)\n");
 exit 0;
}

# Request status edit form
$curl->setopt(CURLOPT_URL, 'http://pda.vkontakte.ru/status');
$curl->setopt(CURLOPT_POST, 0);
# Starts the actual request
$retcode = $curl->perform;
# Looking at the results...
if ($retcode == 0) {
 print("Transfer went ok\n") if($debug==1);
 my $response_code = $curl->getinfo(CURLINFO_HTTP_CODE);
# judge result and next action based on $response_code
 print("Received response: $response_body\n") if($debug==1);
 } else {
 print("An error happened: ".$curl->strerror($retcode)." ($retcode)\n");
 exit 0;
}

my $activityhash = '';
if($response_body =~ /name="activityhash" value="(\w+)"/){
       $activityhash = $1;
} else {
       print "An error happened: no activityhash found\n";
       exit 0;
}

my $status = '';
if($response_body =~ /class="pad">\s+(.*)<br\/>/){
       $status = $1;
} else {
       print "An error happened: no status found\n";
       exit 0;
}

if($status !~ /\.\.$/) {$status =~ s/(.*)\.$/$1/;}
$status =~ s/\S+\s+\S+\s+\S+\s+(.*)/$1/;
$status = unescapeHTML($status);

$twitterStatus = $c->convert($twitterStatus);

$twitterStatus .= $add;

if ($status eq $twitterStatus) {
 if($debug) {print "Same status: $status\n";}
}

else {
 if($debug) {
 print "$status\n";
 print "$twitterStatus\n";
 }

## Update status
$curl->setopt(CURLOPT_URL, 'http://pda.vkontakte.ru/setstatus?pda=1');
$curl->setopt(CURLOPT_POST, 1);
$curl->setopt(CURLOPT_POSTFIELDS, 'activityhash=' . $activityhash . '&setactivity=' . uri_escape($twitterStatus));

# Starts the actual request
$retcode = $curl->perform;
if ($retcode == 0) {
 print("Transfer went ok\n") if($debug==1);
 my $response_code = $curl->getinfo(CURLINFO_HTTP_CODE);
 # judge result and next action based on $response_code
 print("Received response: $response_body\n") if($debug==1);
 } else {
 print("An error happened: ".$curl->strerror($retcode)." ($retcode)\n");
}

}

Постинг из Blogger в LiveJournal
Для работы нужно создать файл lastid.txt в той же директории (или прописать путь к нему), что и скрипт с правами на запись: touch lastid.txt;
chown user:user lastid.txt (user - пользователь от которого запускается скрипт)
У меня постинг работает по крону раз в сутки ночью
Здесь используются модули LJ::Simple, XML::FeedPP, Time::ParseDate

blogger2lj.pl


#!/usr/bin/perl
use strict;                             # Silly not to be
use POSIX;                              # For strftime()
use LJ::Simple;
use XML::FeedPP;                        # Parse Atom feed
use Time::ParseDate;                    # Parse date from feed

## Lj posting code taken from from ljpost

my $source = 'http://blogger.feed.source';
my $idfile = "lastid.txt";
my $user='lj-login';
my $pass='lj-pass';
my $post;
my $autoformat=0;
my $allowcomments=1;
my $add_to_post;                # Эта переменная добавляется к посту. Определена ниже.

##
## Получаем фид и берем ID из файла
##
my $feed = XML::FeedPP->new( $source );

my $lastid;             # Последний id

if(open(FILE, "$idfile")){
 $lastid = readline(FILE);
 chomp($lastid);
 close(FILE);
}

# Просмотр списка на наличие ID и ищем его в файле


my @add; # Массив для добавления постов

foreach my $item ( $feed->get_item() ) {
 my $id = $item->guid(); $id =~ s/.*post-(\d+)/$1/;
 if ($id != $lastid) {
  # Если новый id не соответствует старому - добавить в очередь на постинг (в массив $add)
  push @add, $id;
 }
 else { last; }
}


##
## Начало цикла постинга в ЖЖ
##

my $last_good_id;
$|=1;
($LJ::Simple::VERSION<0.07) && ($LJ::Simple::timeout = 300);
my $lj = new LJ::Simple({ user=>$user,pass=>$pass });
(defined $lj) || die "$0: Failed to log into LJ - $LJ::Simple::error\n";


for(my $i=$#add; $i>=0; $i--){
 foreach my $item ( $feed->get_item() ) {
  my $id = $item->guid(); $id =~ s/.*post-(\d+)/$1/;
  if($id == $add[$i]) {                         # Мы нашли наш пост. Будем его обрабатывать

   my %Event=();
   $lj->NewEntry(\%Event) || die "$0: Failed to prepare event - $LJ::Simple::error\n";

   my $time = parsedate( $item->pubDate );
   my(undef,$mins,$hrs,$dy,$mn,$yr,undef,undef,$l8)=localtime($time);

   my $goodtime = mktime(0,$mins,$hrs,$dy,$mn,$yr,0,0,$l8);
   $lj->SetDate(\%Event,$goodtime);

   my $subject = $item->title();
   ($subject ne "") && $lj->SetSubject(\%Event,$subject);

   my $tags;
   if(ref($item->category())){
   $tags = join (",", @{$item->category()});
   }
   else {
   $tags = $item->category();
   }
   ($tags ne "") && $lj->Setprop_taglist(\%Event,split(/,\s*/,$tags));

   if ($autoformat) {
    print "Autoformat: yes\n";
    $lj->Setprop_preformatted(\%Event,1) ||
    die "$0: Failed to set entry as preformatted - $LJ::Simple::error\n";
   }

   my $link = $item->link();
   $add_to_post = <<END;
<br/>
<div style="position: relative; background-color: #b8daee; border: #98c6e2 1px dotted; padding: 5px; margin: 2px; text-align: center; clear:both">Запись опубликована в блоге blog.brigadirov.com. Лучше оставляйте свои комментарии <a href="$link">там</a>. Но можно и тут.</div>
END

   my $post = $item->description();
   $post .= $add_to_post;
   $lj->SetEntry(\%Event,$post) ||
   die "$0: Failed to set entry - $LJ::Simple::error\n";

   if($allowcomments==0){
   $lj->Setprop_nocomments(\%Event,1) ||
   die "$0: Failed to set property - $LJ::Simple::error\n";
   }
   my ($item_id,$anum,$html_id)=$lj->PostEntry(\%Event);

   if (defined $item_id) {$last_good_id = $id;}

   (defined $item_id) ||
   die "$0: Failed to post entry - $LJ::Simple::error\n";

  }
 }
}

if(defined $last_good_id) {
 if(open(FILE, ">$idfile")){
  print FILE $last_good_id;
  close(FILE);
 }
}

Apple Event 09.09.09

2009-09-10T09:18:00.012+04:00

Вчера случился Apple Event, где были представлены некоторые новинки продукции и программного обеспечения. Появление Стива на сцене встречали бурными аплодисментами! Он вернулся после операции по пересадки печени.

Расскажу вкратце об основных новинках ...

Вышла прошивка iPhone 3.1 и уже доступна к загрузке. Конечно рекомендуется к обновлению только пользователям официально-разлоченных телефонов!

Обновилась линейка плееров iPod - от самого младшего iPod Shuffle и до iPod Classic и iPod Touch. Новые шафлы доступны теперь в 5 цветах ($59 и $79) и специальный вариант - в корпусе из нержавеющей стали ($99).
Classic увеличил вместительность жесткого диска до 160Гб, Touch теперь появился с топовой памятью в 64Гб! По сути это тот же iPhone 3GS только без GSM модуля.

iPod shuffle получил интересное обновление в виде появления видео-камеры способной снимать видео с разрешением 640x480 при 30 кадрах в секунду в формате H.264 с AAC звуком. Синхронизация с iTunes позволяет сразу закачать видео на компьютер и залить на YouTube. Модели выпускаются с памятью в 8 и 16 Гб. И это первый iPod, который обзавелся встроенным радио!

Новый iTunes 9 / iTunes LP. Теперь исполнители могут сами добавлять информацию о себе в виде дискографий, видео, фотографий, текстов песен в своем дизайне.

Сортировка приложения iPhone/iPod Touch теперь возможна прямо из iTunes. Здесь даже можно сортировать экраны приложений!

Помогите с голосованием пожалуйста

2009-09-07T13:02:00.003+04:00

Проголосуйте пожалуйста за альфабанковскую карту с фотографией моей девушки:
в конкурсе на сайте альфабанка

Для этого надо поставить нашу карточку и 2 других на пьедестал.
К сожалению каждый раз положения карточек - рандомное, потому не могу сказать на 1 или 2 странице она будет.
Спасибо большое :)

Мой переход с Лео на Снежного Барса

2009-08-30T22:37:00.000+04:00

Вот мы наконец и дождались - вышел последний билд Снежного Барса (Snow Leopard) под номером 432 и 28 Августа поступил в продажу. Опишу свои впечатления за 3 недели использования.

Первое что бросается в глаза - скорость работы. На моем макбуке все просто летает. Приложения грузятся заметно быстрее, Safari - почти мгновенно. Только ради этого стоит обновиться.

Quick Time X
После установки в глаза бросается новый Quick Time, который сразу перепрыгнул с 7 версии на 10-ю. Я ждал от него поддержу огромного числа форматов "из-коробки", однако ничего принципиально нового не произошло.
Аппаратного декодирования видео на своем макбуке я не заметил (тут видимо дело в видео от Intel GMA-950, однако на более новых макбуках должно работать). В результате простенький AVI-DVDRip съедает 25% процессорного времени. Для поддержки MKV и WMV по-прежнему нужны Perian и Flip4Mac. 720p WMV откровенно тормозит :( В общем все как и было.

64-битное ядро и приложения
Помимо отказа от архитектуры PPC, новая версия OS X поставляется с 64-битным ядром и приложениями. По умолчанию 64-битное ядро грузится только на серверах OS X. Для клиентов нужно при загрузке удерживать клавиши "6" и "4", однако это сработает только на следующих моделях:

Остальные довольствуются 32-битным ядром и 64-битными приложениями, правда как работает такая схема - непонятно, но действительно работает:

Exposé
Обновленный Exposé стал симпатичнее и информативнее - теперь он также отображает свернутые окна после горизонтального разделителя, в общем удобно!

Приложения
Все приложения, которые были на OS X 10.5 сохранились после установки 10.6 и отлично работают. Я правда ставил систему на новый HDD и воспользовался ассистентом миграции. Скопировалось все что было, даже файлы разбросанные по самым глубоким путям файловой системы. Правда нельзя просмотреть список копируемых файлов и удалить ненужные.

Недостатки
Стал хуже работать Wi-Fi. Иногда просто отваливается связь до роутера. Помогает отключение и включение AirPort.

В целом Snow Leopard смотрится как хорошее обновление Leopard :)

Каникулы строгого режима

2009-08-26T23:40:00.002+04:00

Моя рецензия на «Афише»

Каникулы строгого режима

Очень понравилось - смотрится на одном дыхании, как веселая сказка. Фильм очень добрый, смешной и трогательный. Безруков с Дюжевым молодцы!

blog.brigadirov.com 26.08.2009 23:42:00 · Хорошая рецензия? · Спасибо!
О фильме: Расписание · Трейлеры · Фотографии · Все рецензии

Mixero - твиттер клиент

2009-08-07T13:11:00.006+04:00

У меня сегодня какая-то ерунда с Твиттером. Началось все с того что я попробовать попользоваться Mixero (Adobe Air клиент) под Убунтой.

В приложении не работал постинг твитов, после нескольких неудачных попыток решил попробовать воспользоваться web интерфейсом - там тоже самое. Скорее всего это совпадение, но странно. Gwibber при этом работает нормально.
Сами по себе AIR-приложения в линуксе выглядят как-то убого. Нет теней от Compiza, шрифты какие-то слишком виндовые с неправильным сглаживанием. Хотя само приложение достаточно симпатичное.

Но разочаровал тот факт, что оно часто валится при выполнении тех или иных операций, а также не умеет открывать ссылки в браузере по умолчанию, а всегда открывает в firefox-е. В общем под линуксом - не юзабельно. В очередной раз после twihrl-а убедился что AIR приложения - полная фигня. В данном случае в линуксе.

Если кто-то хочет попробовать - напишите ретвит к себе:
"RT @Shatohin Все, кто хотят промокод для нового тви-клиента Mixero, должны быть моим фолловером и RT это сообщение."

loudtwitter.com

2009-07-03T11:54:00.003+04:00

Loudtwitter умер, потому пока больше обновлений твиттера в ЖЖ не ждите. Но думаю вскоре все исправиться, так что рано не радуйтесь :)

Удаленная загрузка торрента

2009-07-01T16:21:00.002+04:00

Тут в голову пришло как закачивать торренты с работы на домашний ноут.
Создаем директорию в Dropbox для torrent файлов. И кидаем туда файлы с рабочего компьютера.

Дома настраиваем торрент клиент на мониторинг той-же директории в Dropbox (Transmission и uTorrent точно умеют) и ставим автоматическое удаление .torrent файлов. Все!

Если torrent файл исчез из Dropbox - значит закачка пошла. Если нет - проблемы в интерент канале.
И никаких веб интерфейсов не нужно! Все легко и просто!

тви: #

А ну-ка все в Twitter

2009-07-01T16:15:00.004+04:00

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

Сейчас же для меня ситуация кардинально поменялась, через твиттер я общаюсь гораздо больше чем через IM, не говоря уже про запись в блог (который я почти заброчил пару лет назад).

А все почему? Лень писать в блог. Проще кинуть пару слов в твиттер, передавая основной смысл. В общем всех призываю им пользоваться!

Правильная синхронизация Mac Address Book и Google

2009-06-17T10:49:00.009+04:00

Если вам нужна синхронизация Google контактов с адресной книгой Mac OS, нужно её предварительно настроить (в настройках Адресной Книги). У меня настроена синхронизация с аккаунтом в Google Apps, работает отлично. Указываете свой логин и пароль от учетной записи Google.

Вроде бы всё, но есть небольшой нюанс. Никакой синхронизации у Вас происходить не будет. Вообще! Синхронизация с Google (возможно и с остальными сервисами, я не проверял) работает только при синхронизации iSync. А для iSync нужно мобильное устройство...

То если когда вы выполняете синхронизацию с телефоном - дополнительно происходит синхронизация и с Google. Но независимой синхронизации с Гуглом нет. Однако есть выход...

Вам нужно приложение Syncrospector. Оно есть в стандартной поставке Leo, (скорее всего в Tiger тоже).
Запускаете его, выбирает Google Contacts и нажимаете Sync в правом вехнем углу. И всё :)

Отремонтировал блок ZKE

2009-05-24T19:38:00.003+04:00

Отремонтировал блок zke — болезнь e46. На форуме e46club.ru в соответствующей теме e46club.ru/forumvb/viewtopic.php?t=10925

Проблема в нем в 2-х релюхах которые отвечают за открытие и закрытие дверей. В общем перепаяли обе релюхи и все ок! В Мади за такое хотят 5000р. Мне обошлось в 500р за реле + 1000 за перепайку

Светодиоды

2009-05-24T16:34:00.004+04:00

Как правильно подключать несколько светодиодов к одному источнику?
Подключаю последовательно с сопротивлением - 1 горит ярко, 2 - горят средненько, 3 - еле горят, 4 - вообще не горят.
Подключаю параллельно с 1 сопротивлением - эффект тот же. Надо чтоли подключать параллельно и на каждый вешать по сопротивлению?

Кто тут паять умеет?

2009-05-21T14:54:00.005+04:00

Расскажите как правильно выпаять реле из платы чтобы ничего не сгорело :)

У меня 2 реле: 10-контактное из блока ZKE в 46 кузове. Хочется сделать аккуратно и не испортить плату!

На картинке они примерно по центру:

Новая картинка-аватара

2009-05-21T12:13:00.004+04:00

Думаю вот такую аватару использовать. Что скажете? :)

Сгорел БП от Asus wl500gP

2009-05-21T11:33:00.004+04:00

Дома сгорел блок питания от asus Wl500gP :( Где мне найти такой-же?
Блок на 5В, 2.5А

Включил комменты в ЖЖ

2009-05-19T14:30:00.002+04:00

Решил в ЖЖ тоже включить комментарии... Все-такие система комментариев там лучшая.

Вопрос про аватары

2009-05-06T14:41:00.007+04:00

Что, по вашему, должно быть изображено на аватаре?

Последнее время наблюдаю что гораздо чаще стали использоваться уменьшенные варианты фотографий, в то время как раньше обычно была какая-нибудь дурацкая картинка...

Или мне это только кажется?

Поставили кондиционер

2009-05-06T10:57:00.005+04:00

Вчера поставили кондиционер. Дешевая китайская поделка Euronord EC-S07HR мощностью 2,1кВт - в Леруа стоит 7390. Установка заняла около 3 часов. Дырка наружу получилась глубиной около 60см. Повесили блок на внешнюю стенку балкона, трубки запихнули в теплоизоляцию, обмотали белой лентой и подключили.

Трасса получилось около 3,5 метров. Установка обошлась в 7350, то есть за ~15к мы получили работающий кондиционер. Охлаждает хорошо, работает очень тихо. Не думаю что кондиционеры за 20к, 30к и выше принципиально лучше.

Установщики - фирма Прибор-Монтаж. В общем мне понравилось - так что рекомендую.

Как-то так :)

Наш рыжий

2009-05-04T11:21:00.010+04:00

Решил выложить пару фоток кошака. Сейчас ему уже около 8 месяцев! Кстати он - Гарик :)

Тут ему около 3 месяцев:

Тут уже постарше:

А тут уже около 6 месяцев:

Мой twitter

2009-04-29T08:09:00.003+04:00

Для тех кто не в курсе, мой твиттер http://twitter.com/neptunix

Предлагаю всем тоже присоединяться.

Новая летняя резина (Dunlop SP Sport 9000)

2009-04-28T09:22:00.004+04:00

Поменял наконец резину. Теперь вот такая, 225/50/R16:

Привет жж

2009-04-24T15:17:00.001+04:00

Кстати привет всем кто меня помнит по ЖЖ :-D

Кросспостинг Blogger в ЖЖ (blogger2lj)

2009-04-24T15:05:00.005+04:00

Написал на perl достаточно простой кросспостинг из blogger в жж. Для этого понадобились 2 вещи:

ljpost (скрипт который юзает библиотеку LJ-Simple-0.15) - его я взял за основу
Модуль для обработки RSS/Atom фидов: XML-FeedPP

Что делает мой скрипт: по крону скачивает атом с блоггера, парсит его и отправляет все новые записи в журнал в ЖЖ. После успешного постинга в ЖЖ сохраняется id последнего поста из блоггера чтобы не получилось дубликатов.

В общем все достаточно просто, сделел где-то за пол дня. Кому нужен скрипт - обращайтесь!

Привет блог

2009-04-23T11:14:00.004+04:00

Я переехал сюда после ЖЖ и Вордпресса.