хотел напистаь не большой скрипт, чтобы просто в консоле перейти в ROOT и чтобы не вводить пароль в su, но не тут то было ...что-то не работает:
| Код | use IPC::Run qw(run timeout start harness);
my @cmd;
push @cmd, "/usr/bin/su";
my $in = "passwd"; my $out=""; my $err="";
# my $h = run3 \@cmd,\$in,\$out,\$err; #timeout('30'); #timeout($self->{_timeout}); start \@cmd, '<pty<', \$in, '>pty>', \$out, '2>', \$err;
printf STDERR "\n\n> output: %s \n> result: %s\n\n",$out,$?;
print $err;
|
в auth.log ошибка: если так:
| Код | # my $h = run3 \@cmd,\$in,\$out,\$err; #timeout('30'); #timeout($self->{_timeout});
|
| Цитата | Sep 23 21:11:48 the su: in prompt_echo_off(): tcgetattr(): Inappropriate ioctl for device Sep 23 21:11:48 the su: BAD SU ddd to root on tty
|
если так:
| Код | start \@cmd, '<pty<', \$in, '>pty>', \$out, '2>', \$err;
|
| Цитата | Sep 23 22:27:56 the su: in prompt_echo_off(): tcgetattr(): Device not configured Sep 23 22:27:56 the su: BAD SU ddd to root on tty
|
OS: FreeBSD вообщем, решение не нашел и не понял, почему так... вродебы все правильно..
|