* Copyright (c) 1983 Regents of the University of California.
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* 3. All advertising materials mentioning features or use of this software
* must display the following acknowledgement:
* This product includes software developed by the University of
* California, Berkeley and its contributors.
* 4. Neither the name of the University nor the names of its contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
#if defined(LIBC_SCCS) && !defined(lint)
static char sccsid
[] = "@(#)rcmd.c 5.24 (Berkeley) 2/24/91";
#endif /* LIBC_SCCS and not lint */
rcmd(ahost
, rport
, locuser
, remuser
, cmd
, fd2p
)
const char *locuser
, *remuser
, *cmd
;
struct sockaddr_in sin
, sin2
, from
;
int lport
= IPPORT_RESERVED
- 1;
hp
= gethostbyname(*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
, (struct sockaddr
*)&sin
, sizeof(sin
)) >= 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");
if (select(32, &reads
, 0, 0, 0) < 1 ||
perror("select: setting up stderr");
"select: protocol failure in circuit setup.\n");
s3
= accept(s2
, (struct sockaddr
*)&from
, &len
);
from
.sin_port
= ntohs((u_short
)from
.sin_port
);
if (from
.sin_family
!= AF_INET
||
from
.sin_port
>= IPPORT_RESERVED
||
from
.sin_port
< IPPORT_RESERVED
/ 2) {
"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
, (struct sockaddr
*)&sin
, sizeof (sin
)) >= 0)
if (errno
!= EADDRINUSE
) {
if (*alport
== IPPORT_RESERVED
/2) {
errno
= EAGAIN
; /* close */
int _check_rhosts_file
= 1;
ruserok(rhost
, superuser
, ruser
, luser
)
const char *rhost
, *ruser
, *luser
;
char fhost
[MAXHOSTNAMELEN
];
*p
++ = isupper(*sp
) ? tolower(*sp
++) : *sp
++;
hostf
= superuser
? (FILE *)0 : fopen(_PATH_HEQUIV
, "r");
if (!_validuser(hostf
, fhost
, luser
, ruser
, baselen
)) {
if (first
== 1 && (_check_rhosts_file
|| superuser
)) {
if ((pwd
= getpwnam(luser
)) == NULL
)
(void)strcpy(pbuf
, pwd
->pw_dir
);
(void)strcat(pbuf
, "/.rhosts");
if ((hostf
= fopen(pbuf
, "r")) == NULL
)
* if owned by someone other than user or root or if
* writeable by anyone but the owner, quit
if (fstat(fileno(hostf
), &sbuf
) ||
sbuf
.st_uid
&& sbuf
.st_uid
!= pwd
->pw_uid
||
/* don't make static, used by lpd(8) */
_validuser(hostf
, rhost
, luser
, ruser
, baselen
)
char *rhost
, *luser
, *ruser
;
char *user
, 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));