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