1 /* This file is part of the Project Athena Zephyr Notification System.
2 * It contains source for the ZInitialize function.
4 * Created by: Robert French
8 * Copyright (c) 1987, 1991 by the Massachusetts Institute of Technology.
9 * For copying and distribution information, see the file
14 static char rcsid_ZInitialize_c[] =
15 "$Zephyr: /afs/athena.mit.edu/astaff/project/zephyr/src/lib/RCS/ZInitialize.c,v 1.17 89/05/30 18:11:25 jtkohl Exp $";
20 #include <sys/socket.h>
26 #define INADDR_NONE 0xffffffff
31 struct servent *hmserv;
32 struct hostent *hostent;
33 char addr[4], hostname[MAXHOSTNAMELEN];
34 struct in_addr servaddr;
35 struct sockaddr_in sin;
36 int s, sinsize = sizeof(sin);
42 char d1[ANAME_SZ], d2[INST_SZ];
44 initialize_krb_error_table();
47 initialize_zeph_error_table();
49 (void) memset((char *)&__HM_addr, 0, sizeof(__HM_addr));
51 __HM_addr.sin_family = AF_INET;
53 /* Set up local loopback address for HostManager */
59 hmserv = (struct servent *)getservbyname(HM_SVCNAME, "udp");
60 __HM_addr.sin_port = (hmserv) ? hmserv->s_port : HM_SVC_FALLBACK;
62 (void) memcpy((char *)&__HM_addr.sin_addr, addr, 4);
66 /* Initialize the input queue */
70 /* if the application is a server, there might not be a zhm. The
71 code will fall back to something which might not be "right",
72 but this is is ok, since none of the servers call krb_rd_req. */
74 servaddr.s_addr = INADDR_NONE;
75 if (! __Zephyr_server) {
76 if ((code = ZOpenPort(NULL)) != ZERR_NONE)
79 if ((code = ZhmStat(NULL, ¬ice)) != ZERR_NONE)
84 /* the first field, which is NUL-terminated, is the server name.
85 If this code ever support a multiplexing zhm, this will have to
86 be made smarter, and probably per-message */
89 krealm = krb_realmofhost(notice.z_message);
91 hostent = gethostbyname(notice.z_message);
92 if (hostent && hostent->h_addrtype == AF_INET)
93 memcpy(&servaddr, hostent->h_addr, sizeof(servaddr));
100 strcpy(__Zephyr_realm, krealm);
101 } else if ((krb_get_tf_fullname(TKT_FILE, d1, d2, __Zephyr_realm)
103 ((krbval = krb_get_lrealm(__Zephyr_realm, 1)) != KSUCCESS)) {
107 strcpy(__Zephyr_realm, "local-realm");
110 __My_addr.s_addr = INADDR_NONE;
111 if (servaddr.s_addr != INADDR_NONE) {
112 /* Try to get the local interface address by connecting a UDP
113 * socket to the server address and getting the local address.
114 * Some broken operating systems (e.g. Solaris 2.0-2.5) yield
115 * INADDR_ANY (zero), so we have to check for that. */
116 s = socket(AF_INET, SOCK_DGRAM, 0);
118 memset(&sin, 0, sizeof(sin));
119 sin.sin_family = AF_INET;
120 memcpy(&sin.sin_addr, &servaddr, sizeof(servaddr));
121 sin.sin_port = HM_SRV_SVC_FALLBACK;
122 if (connect(s, (struct sockaddr *) &sin, sizeof(sin)) == 0
123 && getsockname(s, (struct sockaddr *) &sin, &sinsize) == 0
124 && sin.sin_addr.s_addr != 0)
125 memcpy(&__My_addr, &sin.sin_addr, sizeof(__My_addr));
129 if (__My_addr.s_addr == INADDR_NONE) {
130 /* We couldn't figure out the local interface address by the
131 * above method. Try by resolving the local hostname. (This
132 * is a pretty broken thing to do, and unfortunately what we
133 * always do on server machines.) */
134 if (gethostname(hostname, sizeof(hostname)) == 0) {
135 hostent = gethostbyname(hostname);
136 if (hostent && hostent->h_addrtype == AF_INET)
137 memcpy(&__My_addr, hostent->h_addr, sizeof(__My_addr));
140 /* If the above methods failed, zero out __My_addr so things will
141 * sort of kind of work. */
142 if (__My_addr.s_addr == INADDR_NONE)
143 __My_addr.s_addr = 0;
145 /* Get the sender so we can cache it */