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