Date: Fri, 17 Jan 2003 15:48:20 -0800 From: "Koyabu, Ken" <ken.koyabu@dli.net> To: "'questions@FreeBSD.org'" <questions@FreeBSD.org> Cc: "Koyabu, Ken" <ken.koyabu@dli.net> Subject: Question Regarding Kerberos Message-ID: <953B9655BA44D5119D1E00508BE27C155AC2F6@DLIEXC00>
next in thread | raw e-mail | index | archive | help
Hi, I need some help.
I'm running FreeBSD 4.5-RELEASE version.
I ported the following perl script from the system running FreeBSD
2.2.7-RELEASE. (the perl script works fine on FreeBSD 2.2.7.)
But, when I execute this perl script on FreeBSD 4.5, it fails with the
following messages:
open2: exec of socket 140.237.253.1 23 failed at /opr/get line 23
I'm using stable perl 5.6.1 on FreeBSD 4.5 server.
Here is the actual perl script which I'm trying to run:
----------------------------------------------------------------------------
---------------------------------
#!/usr/local/bin/perl
use FileHandle;
use IPC::Open2;
require 'getopt.pl';
do Getopt("s");
$line=1;
$skip_to = $opt_s;
while(<>) {
chop;
next if /^#/;
next if /^\s*$/;
($name,$ip,$login,$pass,$pass2) = split;
next if $line++ < $skip_to;
print "$name\n";
$pid = open2 ( \*TELNET_IN , \*TELNET_OUT, "socket $ip 23" );
<<< FAILED AT THIS LINE #23
sleep 10; # give it some time to connect to the host
print TELNET_OUT $login,"\n";
sleep 10; # wait for response
print TELNET_OUT "$pass\n";
sleep 10;
and so on................
----------------------------------------------------------------------------
---------------------------------
When I tried to telnet to one of Cisco router, I got this messages which I
do not see when I telnet from older version of FreeBSD server.
login: Kerberos: No default realm defined for Kerberos!
I could still manually telnet & logged on the router, but I never saw
"Kerberos" message at telnet login before with older FreeBSD.
The reason socket can not be executed from this perl scrip is...because of
"kerberos"? I may installed Kerberos option at installation time, but I
don't think I turned on kerberos for authentication. I really do not need
kerberos, so I would like to turn it off if it's possible, and I need to
make this perl script to work on FreeBSD 4.5 environment.
I would really appreciate your help.
Regards,
Ken
To Unsubscribe: send mail to majordomo@FreeBSD.org
with "unsubscribe freebsd-questions" in the body of the message
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?953B9655BA44D5119D1E00508BE27C155AC2F6>