From: ProFTP <q7u5@ukr.net.>
Newsgroups: email
Date: Mon, 15 Jul 2009 14:31:37 +0000 (UTC)
Subject: Быстрое обновление и восстановление портов
Внимание, прежде чем последовать советам из данной статьи, обязательно прочитайте
комментарии к ней, так как в тексте много неточностей.
Содержание:
Введение.
1. Скачивание и установка дерева портов.
2. Обновление и исправление базы данных портов.
3. Редактирование /etc/make.conf (оптимизация, etc).
4. Простое обновление.
5. Полезные опции portupgrade.
6. Проверенные скрипты тщательного обновления (автоматическое обновление).
7. Исправление некоторых проблем.
Введение
если нужно обновить (и(или)восстановить) порты, может быть запутанная ситуация (например, если не обновлять год), portupgrade очень часто с первого раза не исправляет ошибки
OS: FreeBSD 7.0, FreeBSD 7.1, FreeBSD 8.0
1. Скачивание и установка дерева портов.
для начало перейти в:
cd /usr
скачаем архив дерева портов, это будет быстрее чем обновлять через cvsup, ищем ближайщый ftp провайдера/города/страны
если perl не стоит, то скорее всего он будет из мира, по-моему путь /usr/local/bin/perl
2. Обновление и исправление базы данных портов.
бэкап базы пакетов:
cp /var/log/dpkgdb.db /home/dpkgdb.db
можно заархивировать каталоги /etc/ /usr/local/etc программа может затереть конфиг (осторожно с символическими ссылками чтобы не удалить случайно важную информацию)
pkgdb -aF
опции:
-a all;
-F исправлять не спрашивая, считается безопасный метод;
-fu если база сбита.
вроде бы все
зеркала лучше указать свои, эти могут быть медленные....
4. Простое обновление.
если portupgrade не стоит, то поставить:
(потянет ruby)
cd /usr/ports/sysutils/portupgrade && make && make install && make clean
в headbook'е написано:
portupgrade -a
но это можно не сработать, если стоит очень много программ старых или запутанных, рекомендуют:
portupgrade -arR
чтобы пройтись вдоль всех зависимостей
5. Полезные опции portupgrade.
полезные опции в portupgrade:
-W не чистить порт перед обновлением ;
-w не чистить порт после обновления;
-F для того что скачать все исходники сразу, если проблемы с интернетом: portupgrade -aFrR
опции -f устанавливает дальше все зависимости, если даже где-то ошибка, то пытается продолжить дальше...;
-l /var/log/pport.log - записывает последнюю ошибку;
-L %s::%s создает файл в текущем каталоге, в котором записывает весь вывод установленных портов.
2 полезные команды make:
1) cd /usr/ports/deve/icu && make run-depends-list покажет зависимости данного порта,
2) make all-depends-list - все зависимости и зависимости тех портов которые зависят от порта
есть один важный недостаток, бывает версия порта называется не совсем корректно, например cairo-1.8.6_1,1 и portupgrade может всегда писать что порт устаревший
6. Проверенные скрипты тщательного обновления.
portupgrade -arR часто тоже может выдаст ошибку!!
есть вариант написать скрипт, который обновит те порты который устаревшие в месте с зависимостями:
#!/usr/bin/perl
$nn = 0;
while (1) {
$nn++;
open( OPERN, "portversion |" );
@all = <OPERN>;
if ( $nn > 6 ) {
print "while 6 exit";
exit;
}
foreach (@all) {
my ( $pp, $st ) = split( / /, $_, 2 );
if ( $st =~ '<' ) {
print "UPDATE: $ppn";
system("portupgrade -f $pp");
} else {
print "ok UPDATE";
exit;
}
}
}
при этом может быть очень часто что что-то пропустит из-за подзависимоти каких-то скорее всего, цикл идет в 2 этапов if ( !$nn > 2 )
если порты запутанные, можно написать чтобы обновляло и новую версия как не корректную if ( $st =~ '<' || $st =~ '>') {
Важное примечание: при обновлении Desktop лучше сначала попробовать portupgrade -aRr, так как опция -R (portupgrade -Rf $all[0] для скрипта ниже)
будет устанавливать все зависимости по новому, если нужно обновить, к примеру, 4 программы evince/firefox3/xfce4, то они потянут около 20-60 зависимостей
каждая (не считал), и одно и тоже portupgrade будет собирать (но имейте ввиду что эта опция -R надежная), более "мягче" есть вариант в данном случае
поставить portupgrade -rf ports_old, при этом будут собираться только "ближайшие" зависимости, самый жесткий вариант portupgrade -Rrf ports_old скорее всего
лучше использовать в редких случаях, например, если не хочет компилироваться /devel/icu, так же можно просто -f или -R.
перед кажой установленной программой желательно пересмотреть еще раз список устаревших портов, чтобы не компилировать одно и тоже лишный раз,
так как с опциями -R или -r многое уже может быть обновленно, portversion быстро смотрит какие версии установлены...
вот маленький скрипт для этого + еще реализовал запись в лог файл, чтобы было видно какой порт обновляется и сколько время прошло:
#!/usr/bin/perl
$nn = 0;
while (1) {
$nn++;
open( OPERN, "portversion |" );
my @all2 = <OPERN>;
close OPERN;
my @all;
for ( $i = 0 ; $i < @all2 ; $i++ ) {
my ( $pp, $st ) = split( / /, $all2[$i], 2 );
if ( $st =~ '<' ) {
push @all, $pp; # $all[$i] = $pp;
}
}
exit if ( !$all[0] || $nn > 2 );
while (1) {
last if !$all[0];
print "$all[0]n";
logsave( get_time(), $all[0] );
system("portupgrade -rf $all[0]");
logsave( get_time(), $all[0] );
shift @all;
my @all = old(@all);
}
}
sub old {
my @all = @_;
open( OPEN2, "portversion |" );
my @all_all = <OPEN2>;
close OPEN2;
my @old;
my @no_old;
foreach my $p (@all_all) {
my ( $pname, $status ) = split( / /, $p, 2 );
if ( $status =~ '<' ) {
push @old, $pname;
}
else {
push @no_old, $pname;
}
}
my %seen;
@seen{@all} = ();
delete @seen{@no_old};
return keys %seen;
}
sub get_time {
my ( $sec, $min, $hour, $mday, $mon, $year, $wday, $yday, $isdst ) =
localtime(time);
$mon++;
$year += 1900;
if ( $mday < 10 ) { $mday = "0$mday"; }
if ( $mon < 10 ) { $mon = "0$mon"; }
if ( $min < 10 ) { $min = "0$min"; }
my $date = "$mday $mon $year";
my $time = "$hour:$min:$sec";
my $cur_all_day = $mday + $mon * 30 + $year * 365;
my $radate = "$year-$mon-$mday $hour:$min:$sec";
return $radate;
}
sub logsave {
my ( $time, $ports ) = @_;
my $logfile;
$logfile = "n time: $time n ports: $ports nn";
system("touch /var/log/portupgrade.log");
open( DB2, "/var/log/portupgrade.log" ) || die "Cannot open file: $!";
my @base = <DB2>;
close(DB2);
open( DB, ">/var/log/portupgrade.log" ) || die "Cannot open file : $!";
print DB @base;
print DB $logfile;
close(DB);
}
я использовал эти два.
дальше я написал простейший скрипт для автоматического обновления, который обновит дерево портов и порты через cron,
отправит на email какие порты он обновил, и какие были устаревшие, можно поставить раз в неделю в cron
нужно заменить email адрес на тот который будет отсылаться Вам, и проверить работоспособность ftp с которого архив порта скачать
Vova
