1*45193Ssklower /*
2*45193Ssklower  * Fetch netdb entry for a host given
3*45193Ssklower  * its name from /etc/x25hosts
4*45193Ssklower  *
5*45193Ssklower  * Frank Pronk  1985
6*45193Ssklower  */
7*45193Ssklower 
8*45193Ssklower #include <netdb.h>
9*45193Ssklower 
10*45193Ssklower struct hostent *
getx25hostbyname(name)11*45193Ssklower getx25hostbyname (name)
12*45193Ssklower register char *name;
13*45193Ssklower {
14*45193Ssklower 	register struct hostent *p;
15*45193Ssklower 	register char **cp;
16*45193Ssklower 	struct hostent *getx25hostent ();
17*45193Ssklower 
18*45193Ssklower 	setx25hostent (0);
19*45193Ssklower 	while (p = getx25hostent ()) {
20*45193Ssklower 		if (strcmp (p->h_name, name) == 0)
21*45193Ssklower 			break;
22*45193Ssklower 		for (cp = p->h_aliases; *cp != 0; cp++)
23*45193Ssklower 			if (strcmp (*cp, name) == 0)
24*45193Ssklower 				goto found;
25*45193Ssklower 	}
26*45193Ssklower found:
27*45193Ssklower 	endx25hostent ();
28*45193Ssklower 	return (p);
29*45193Ssklower }
30