Add the DragonFly cvs id and perform general cleanups on cvs/rcs/sccs ids. Most
[dragonfly.git] / usr.bin / talk / invite.c
1 /*
2  * Copyright (c) 1983, 1993
3  *      The Regents of the University of California.  All rights reserved.
4  *
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.
20  *
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.
32  *
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.2 2003/06/17 04:29:32 dillon Exp $
36  */
37
38 #include <err.h>
39 #include <errno.h>
40 #include <setjmp.h>
41 #include <signal.h>
42 #include <sys/types.h>
43 #include <sys/socket.h>
44 #include <protocols/talkd.h>
45 #include "talk_ctl.h"
46 #include "talk.h"
47
48 /*
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
52  */
53
54 /*
55  * The msg.id's for the invitations
56  * on the local and remote machines.
57  * These are used to delete the
58  * invitations.
59  */
60 int     local_id, remote_id;
61 jmp_buf invitebuf;
62
63 void
64 invite_remote()
65 {
66         int nfd, read_mask, template, new_sockt;
67         struct itimerval itimer;
68         CTL_RESPONSE response;
69
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();
85         /*
86          * Shut off the automatic messages for a while,
87          * so we can use the interupt timer to resend the invitation
88          */
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");
98         }
99         close(sockt);
100         sockt = new_sockt;
101
102         /*
103          * Have the daemons delete the invitations now that we
104          * have connected.
105          */
106         current_state = "Waiting for your party to respond";
107         start_msgs();
108
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;
114 }
115
116 /*
117  * Routine called on interupt to re-invite the callee
118  */
119 /* ARGSUSED */
120 void
121 re_invite(signo)
122         int signo;
123 {
124
125         message("Ringing your party again");
126         waddch(my_win.x_win, '\n');
127         if (current_line < my_win.x_nlines - 1)
128                 current_line++;
129         /* force a re-announce */
130         msg.id_num = htonl(remote_id + 1);
131         announce_invite();
132         longjmp(invitebuf, 1);
133 }
134
135 static  char *answers[] = {
136         "answer #0",                                    /* SUCCESS */
137         "Your party is not logged on",                  /* NOT_HERE */
138         "Target machine is too confused to talk to us", /* FAILED */
139         "Target machine does not recognize us",         /* MACHINE_UNKNOWN */
140         "Your party is refusing messages",              /* PERMISSION_REFUSED */
141         "Target machine can not handle remote talk",    /* UNKNOWN_REQUEST */
142         "Target machine indicates protocol mismatch",   /* BADVERSION */
143         "Target machine indicates protocol botch (addr)",/* BADADDR */
144         "Target machine indicates protocol botch (ctl_addr)",/* BADCTLADDR */
145 };
146 #define NANSWERS        (sizeof (answers) / sizeof (answers[0]))
147
148 /*
149  * Transmit the invitation and process the response
150  */
151 void
152 announce_invite()
153 {
154         CTL_RESPONSE response;
155
156         current_state = "Trying to connect to your party's talk daemon";
157         ctl_transact(his_machine_addr, msg, ANNOUNCE, &response);
158         remote_id = response.id_num;
159         if (response.answer != SUCCESS) {
160                 if (response.answer < NANSWERS)
161                         message(answers[response.answer]);
162                 quit();
163         }
164         /* leave the actual invitation on my talk daemon */
165         current_state = "Trying to connect to local talk daemon";
166         ctl_transact(my_machine_addr, msg, LEAVE_INVITE, &response);
167         local_id = response.id_num;
168 }
169
170 /*
171  * Tell the daemon to remove your invitation
172  */
173 void
174 send_delete()
175 {
176
177         msg.type = DELETE;
178         /*
179          * This is just a extra clean up, so just send it
180          * and don't wait for an answer
181          */
182         msg.id_num = htonl(remote_id);
183         daemon_addr.sin_addr = his_machine_addr;
184         if (sendto(ctl_sockt, &msg, sizeof (msg), 0,
185             (struct sockaddr *)&daemon_addr,
186             sizeof (daemon_addr)) != sizeof(msg))
187                 warn("send_delete (remote)");
188         msg.id_num = htonl(local_id);
189         daemon_addr.sin_addr = my_machine_addr;
190         if (sendto(ctl_sockt, &msg, sizeof (msg), 0,
191             (struct sockaddr *)&daemon_addr,
192             sizeof (daemon_addr)) != sizeof (msg))
193                 warn("send_delete (local)");
194 }