Replace frexp(3) with MI code and add a frexpl(3) function to libm.
[dragonfly.git] / usr.bin / talk / invite.c
blobb1b0a1693cb58942236f2b7e6d9e6194e5cf7be0
1 /*
2 * Copyright (c) 1983, 1993
3 * The Regents of the University of California. All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 * must display the following acknowledgement:
15 * This product includes software developed by the University of
16 * California, Berkeley and its contributors.
17 * 4. Neither the name of the University nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 * SUCH DAMAGE.
33 * @(#)invite.c 8.1 (Berkeley) 6/6/93
34 * $FreeBSD: src/usr.bin/talk/invite.c,v 1.6.2.1 2000/10/05 17:40:38 ru Exp $
35 * $DragonFly: src/usr.bin/talk/invite.c,v 1.4 2004/08/19 23:32:02 joerg Exp $
38 #include <sys/param.h>
39 #include <sys/socket.h>
40 #include <err.h>
41 #include <errno.h>
42 #include <setjmp.h>
43 #include <signal.h>
44 #include <protocols/talkd.h>
45 #include "talk_ctl.h"
46 #include "talk.h"
49 * There wasn't an invitation waiting, so send a request containing
50 * our sockt address to the remote talk daemon so it can invite
51 * him
55 * The msg.id's for the invitations
56 * on the local and remote machines.
57 * These are used to delete the
58 * invitations.
60 int local_id, remote_id;
61 jmp_buf invitebuf;
63 void
64 invite_remote(void)
66 int nfd, read_mask, template, new_sockt;
67 struct itimerval itimer;
68 CTL_RESPONSE response;
70 itimer.it_value.tv_sec = RING_WAIT;
71 itimer.it_value.tv_usec = 0;
72 itimer.it_interval = itimer.it_value;
73 if (listen(sockt, 5) != 0)
74 p_error("Error on attempt to listen for caller");
75 #ifdef MSG_EOR
76 /* copy new style sockaddr to old, swap family (short in old) */
77 msg.addr = *(struct osockaddr *)&my_addr; /* XXX new to old style*/
78 msg.addr.sa_family = htons(my_addr.sin_family);
79 #else
80 msg.addr = *(struct sockaddr *)&my_addr;
81 #endif
82 msg.id_num = htonl(-1); /* an impossible id_num */
83 invitation_waiting = 1;
84 announce_invite();
86 * Shut off the automatic messages for a while,
87 * so we can use the interupt timer to resend the invitation
89 end_msgs();
90 setitimer(ITIMER_REAL, &itimer, (struct itimerval *)0);
91 message("Waiting for your party to respond");
92 signal(SIGALRM, re_invite);
93 (void) setjmp(invitebuf);
94 while ((new_sockt = accept(sockt, 0, 0)) < 0) {
95 if (errno == EINTR)
96 continue;
97 p_error("Unable to connect with your party");
99 close(sockt);
100 sockt = new_sockt;
103 * Have the daemons delete the invitations now that we
104 * have connected.
106 current_state = "Waiting for your party to respond";
107 start_msgs();
109 msg.id_num = htonl(local_id);
110 ctl_transact(my_machine_addr, msg, DELETE, &response);
111 msg.id_num = htonl(remote_id);
112 ctl_transact(his_machine_addr, msg, DELETE, &response);
113 invitation_waiting = 0;
117 * Routine called on interupt to re-invite the callee
119 /* ARGSUSED */
120 void
121 re_invite(int signo)
124 message("Ringing your party again");
125 waddch(my_win.x_win, '\n');
126 if (current_line < my_win.x_nlines - 1)
127 current_line++;
128 /* force a re-announce */
129 msg.id_num = htonl(remote_id + 1);
130 announce_invite();
131 longjmp(invitebuf, 1);
134 static char *answers[] = {
135 "answer #0", /* SUCCESS */
136 "Your party is not logged on", /* NOT_HERE */
137 "Target machine is too confused to talk to us", /* FAILED */
138 "Target machine does not recognize us", /* MACHINE_UNKNOWN */
139 "Your party is refusing messages", /* PERMISSION_REFUSED */
140 "Target machine can not handle remote talk", /* UNKNOWN_REQUEST */
141 "Target machine indicates protocol mismatch", /* BADVERSION */
142 "Target machine indicates protocol botch (addr)",/* BADADDR */
143 "Target machine indicates protocol botch (ctl_addr)",/* BADCTLADDR */
145 #define NANSWERS (sizeof (answers) / sizeof (answers[0]))
148 * Transmit the invitation and process the response
150 void
151 announce_invite(void)
153 CTL_RESPONSE response;
155 current_state = "Trying to connect to your party's talk daemon";
156 ctl_transact(his_machine_addr, msg, ANNOUNCE, &response);
157 remote_id = response.id_num;
158 if (response.answer != SUCCESS) {
159 if (response.answer < NANSWERS)
160 message(answers[response.answer]);
161 quit();
163 /* leave the actual invitation on my talk daemon */
164 current_state = "Trying to connect to local talk daemon";
165 ctl_transact(my_machine_addr, msg, LEAVE_INVITE, &response);
166 local_id = response.id_num;
170 * Tell the daemon to remove your invitation
172 void
173 send_delete(void)
176 msg.type = DELETE;
178 * This is just a extra clean up, so just send it
179 * and don't wait for an answer
181 msg.id_num = htonl(remote_id);
182 daemon_addr.sin_addr = his_machine_addr;
183 if (sendto(ctl_sockt, &msg, sizeof (msg), 0,
184 (struct sockaddr *)&daemon_addr,
185 sizeof (daemon_addr)) != sizeof(msg))
186 warn("send_delete (remote)");
187 msg.id_num = htonl(local_id);
188 daemon_addr.sin_addr = my_machine_addr;
189 if (sendto(ctl_sockt, &msg, sizeof (msg), 0,
190 (struct sockaddr *)&daemon_addr,
191 sizeof (daemon_addr)) != sizeof (msg))
192 warn("send_delete (local)");