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>
27 #ifdef HAVE_KRB5_ERR_H
32 #define INADDR_NONE 0xffffffff
37 struct servent *hmserv;
38 struct hostent *hostent;
39 char addr[4], hostname[MAXHOSTNAMELEN];
40 struct in_addr servaddr;
41 struct sockaddr_in sin;
42 int s, sinsize = sizeof(sin);
46 char **krealms = NULL;
51 char d1[ANAME_SZ], d2[INST_SZ];
56 initialize_krb_error_table();
59 initialize_krb5_error_table();
62 initialize_zeph_error_table();
64 (void) memset((char *)&__HM_addr, 0, sizeof(__HM_addr));
66 __HM_addr.sin_family = AF_INET;
68 /* Set up local loopback address for HostManager */
74 hmserv = (struct servent *)getservbyname(HM_SVCNAME, "udp");
75 __HM_addr.sin_port = (hmserv) ? hmserv->s_port : HM_SVC_FALLBACK;
77 (void) memcpy((char *)&__HM_addr.sin_addr, addr, 4);
81 /* Initialize the input queue */
86 if ((code = krb5_init_context(&Z_krb5_ctx)))
90 /* if the application is a server, there might not be a zhm. The
91 code will fall back to something which might not be "right",
92 but this is is ok, since none of the servers call krb_rd_req. */
94 servaddr.s_addr = INADDR_NONE;
95 if (! __Zephyr_server) {
96 if ((code = ZOpenPort(NULL)) != ZERR_NONE)
99 if ((code = ZhmStat(NULL, ¬ice)) != ZERR_NONE)
104 /* the first field, which is NUL-terminated, is the server name.
105 If this code ever support a multiplexing zhm, this will have to
106 be made smarter, and probably per-message */
109 code = krb5_get_host_realm(Z_krb5_ctx, notice.z_message, &krealms);
114 krealm = krb_realmofhost(notice.z_message);
117 hostent = gethostbyname(notice.z_message);
118 if (hostent && hostent->h_addrtype == AF_INET)
119 memcpy(&servaddr, hostent->h_addr, sizeof(servaddr));
121 ZFreeNotice(¬ice);
126 strcpy(__Zephyr_realm, krealms[0]);
127 krb5_free_host_realm(Z_krb5_ctx, krealms);
129 char *p; /* XXX define this somewhere portable */
130 /* XXX check ticket file here */
131 code = krb5_get_default_realm(Z_krb5_ctx, &p);
132 strcpy(__Zephyr_realm, p);
133 #ifdef HAVE_KRB5_FREE_DEFAULT_REALM
134 krb5_free_default_realm(Z_krb5_ctx, p);
144 strcpy(__Zephyr_realm, krealm);
145 } else if ((krb_get_tf_fullname(TKT_FILE, d1, d2, __Zephyr_realm)
147 ((krbval = krb_get_lrealm(__Zephyr_realm, 1)) != KSUCCESS)) {
151 strcpy(__Zephyr_realm, "local-realm");
155 __My_addr.s_addr = INADDR_NONE;
156 if (servaddr.s_addr != INADDR_NONE) {
157 /* Try to get the local interface address by connecting a UDP
158 * socket to the server address and getting the local address.
159 * Some broken operating systems (e.g. Solaris 2.0-2.5) yield
160 * INADDR_ANY (zero), so we have to check for that. */
161 s = socket(AF_INET, SOCK_DGRAM, 0);
163 memset(&sin, 0, sizeof(sin));
164 sin.sin_family = AF_INET;
165 memcpy(&sin.sin_addr, &servaddr, sizeof(servaddr));
166 sin.sin_port = HM_SRV_SVC_FALLBACK;
167 if (connect(s, (struct sockaddr *) &sin, sizeof(sin)) == 0
168 && getsockname(s, (struct sockaddr *) &sin, &sinsize) == 0
169 && sin.sin_addr.s_addr != 0)
170 memcpy(&__My_addr, &sin.sin_addr, sizeof(__My_addr));
174 if (__My_addr.s_addr == INADDR_NONE) {
175 /* We couldn't figure out the local interface address by the
176 * above method. Try by resolving the local hostname. (This
177 * is a pretty broken thing to do, and unfortunately what we
178 * always do on server machines.) */
179 if (gethostname(hostname, sizeof(hostname)) == 0) {
180 hostent = gethostbyname(hostname);
181 if (hostent && hostent->h_addrtype == AF_INET)
182 memcpy(&__My_addr, hostent->h_addr, sizeof(__My_addr));
185 /* If the above methods failed, zero out __My_addr so things will
186 * sort of kind of work. */
187 if (__My_addr.s_addr == INADDR_NONE)
188 __My_addr.s_addr = 0;
190 /* Get the sender so we can cache it */