* Copyright (c) 1983 Regents of the University of California.
* All rights reserved. The Berkeley software License Agreement
* specifies the terms and conditions for redistribution.
#if defined(LIBC_SCCS) && !defined(lint)
static char sccsid
[] = "@(#)rcmd.c 5.13 (Berkeley) %G%";
#endif LIBC_SCCS and not lint
char *index(), *sprintf();
rcmd(ahost
, rport
, locuser
, remuser
, cmd
, fd2p
)
char *locuser
, *remuser
, *cmd
;
struct sockaddr_in sin
, sin2
, from
;
int lport
= IPPORT_RESERVED
- 1;
hp
= gethostbyname(*ahost
);
fprintf(stderr
, "%s: unknown host\n", *ahost
);
oldmask
= sigblock(sigmask(SIGURG
));
fprintf(stderr
, "socket: All ports in use\n");
sin
.sin_family
= hp
->h_addrtype
;
bcopy(hp
->h_addr_list
[0], (caddr_t
)&sin
.sin_addr
, hp
->h_length
);
if (connect(s
, (caddr_t
)&sin
, sizeof (sin
), 0) >= 0)
if (errno
== EADDRINUSE
) {
if (errno
== ECONNREFUSED
&& timo
<= 16) {
if (hp
->h_addr_list
[1] != NULL
) {
"connect to address %s: ", inet_ntoa(sin
.sin_addr
));
bcopy(hp
->h_addr_list
[0], (caddr_t
)&sin
.sin_addr
,
fprintf(stderr
, "Trying %s...\n",
inet_ntoa(sin
.sin_addr
));
int s2
= rresvport(&lport
), s3
;
(void) sprintf(num
, "%d", lport
);
if (write(s
, num
, strlen(num
)+1) != strlen(num
)+1) {
perror("write: setting up stderr");
s3
= accept(s2
, &from
, &len
, 0);
from
.sin_port
= ntohs((u_short
)from
.sin_port
);
if (from
.sin_family
!= AF_INET
||
from
.sin_port
>= IPPORT_RESERVED
) {
"socket: protocol failure in circuit setup.\n");
(void) write(s
, locuser
, strlen(locuser
)+1);
(void) write(s
, remuser
, strlen(remuser
)+1);
(void) write(s
, cmd
, strlen(cmd
)+1);
if (read(s
, &c
, 1) != 1) {
while (read(s
, &c
, 1) == 1) {
sin
.sin_family
= AF_INET
;
sin
.sin_addr
.s_addr
= INADDR_ANY
;
s
= socket(AF_INET
, SOCK_STREAM
, 0);
sin
.sin_port
= htons((u_short
)*alport
);
if (bind(s
, (caddr_t
)&sin
, sizeof (sin
)) >= 0)
if (errno
!= EADDRINUSE
) {
if (*alport
== IPPORT_RESERVED
/2) {
errno
= EAGAIN
; /* close */
ruserok(rhost
, superuser
, ruser
, luser
)
char fhost
[MAXHOSTNAMELEN
];
*p
++ = isupper(*sp
) ? tolower(*sp
++) : *sp
++;
hostf
= superuser
? (FILE *)0 : fopen("/etc/hosts.equiv", "r");
if (!_validuser(hostf
, fhost
, luser
, ruser
, baselen
)) {
if ((pwd
= getpwnam(luser
)) == NULL
)
(void)strcpy(pbuf
, pwd
->pw_dir
);
(void)strcat(pbuf
, "/.rhosts");
if ((hostf
= fopen(pbuf
, "r")) == NULL
)
(void)fstat(fileno(hostf
), &sbuf
);
if (sbuf
.st_uid
&& sbuf
.st_uid
!= pwd
->pw_uid
) {
_validuser(hostf
, rhost
, luser
, ruser
, baselen
)
char *rhost
, *luser
, *ruser
;
char ahost
[MAXHOSTNAMELEN
];
while (fgets(ahost
, sizeof (ahost
), hostf
)) {
while (*p
!= '\n' && *p
!= ' ' && *p
!= '\t' && *p
!= '\0') {
*p
= isupper(*p
) ? tolower(*p
) : *p
;
if (*p
== ' ' || *p
== '\t') {
while (*p
== ' ' || *p
== '\t')
while (*p
!= '\n' && *p
!= ' ' && *p
!= '\t' && *p
!= '\0')
if (_checkhost(rhost
, ahost
, baselen
) &&
!strcmp(ruser
, *user
? user
: luser
)) {
_checkhost(rhost
, lhost
, len
)
static char ldomain
[MAXHOSTNAMELEN
+ 1];
static char *domainp
= NULL
;
return(!strcmp(rhost
, lhost
));
if (strncmp(rhost
, lhost
, len
))
if (!strcmp(rhost
, lhost
))
if (*(lhost
+ len
) != '\0')
if (gethostname(ldomain
, sizeof(ldomain
)) == -1) {
ldomain
[MAXHOSTNAMELEN
] = NULL
;
if ((domainp
= index(ldomain
, '.')) == (char *)NULL
) {
for (cp
= ++domainp
; *cp
; ++cp
)
return(!strcmp(domainp
, rhost
+ len
+1));