[Comm] Re: Перенос юзеров со Спринга в Мастер

[Alexey Tourbin]

On Fri, Jan 24, 2003 at 10:07:48AM +0300, Alex Borisov wrote:
> можно например вот-так:
> --------------
>    
> #!/usr/bin/perl
> 
> # Переносим пользователей с сохранением их старых паролей
> # с одного сервера на другой. На старом сервере был единый 
> # файл shadow, на новом исользуется система TCB
> #
> # в текущем каталоге должны быть файлы passwd и shadow
> # 
> 
> open(PASS, "<./passwd") || die "Файл не найден";
> while (<PASS>)
>     {
>     ($login, $pass, $uid, $gid, $name, $home_dir, $shell) = split(':');
>     print "$login $name\n";
>     system("/usr/sbin/useradd $login -u '$uid' -c '$name' -d '$home_dir'"); 
>     system("cat ./shadow | grep $login > /etc/tcb/$login/shadow");
>     
>     }
> close(PASS);   

Друзья, дело-то не в файлах (и не в их количестве), а в правах доступа
на них. Поэтому нужно использовать стандартные утилиты перехода на tcb.


-- 
WBR, Alexey Tourbin
BIOZAK Ltd., Russia
----------- следующая часть -----------
Было удалено вложение не в текстовом формате...
Имя     : =?iso-8859-1?q?=CF=D4=D3=D5=D4=D3=D4=D7=D5=C5=D4?=
Тип     : application/pgp-signature
Размер  : 189 байтов
Описание: =?iso-8859-1?q?=CF=D4=D3=D5=D4=D3=D4=D7=D5=C5=D4?=
Url     : <http://lists.altlinux.org/pipermail/community/attachments/20030124/c5fbea05/attachment-0006.bin>