1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
|
/*
* CDDL HEADER START
*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License, Version 1.0 only
* (the "License"). You may not use this file except in compliance
* with the License.
*
* You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
* or http://www.opensolaris.org/os/licensing.
* See the License for the specific language governing permissions
* and limitations under the License.
*
* When distributing Covered Code, include this CDDL HEADER in each
* file and include the License file at usr/src/OPENSOLARIS.LICENSE.
* If applicable, add the following below this CDDL HEADER, with the
* fields enclosed by brackets "[]" replaced with your own identifying
* information: Portions Copyright [yyyy] [name of copyright owner]
*
* CDDL HEADER END
*/
/*
* Copyright 2000 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
/* Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989 AT&T */
/* All Rights Reserved */
/*
* University Copyright- Copyright (c) 1982, 1986, 1988
* The Regents of the University of California
* All Rights Reserved
*
* University Acknowledgment- Portions of this document are derived from
* software developed by the University of California, Berkeley, and its
* contributors.
*/
#pragma ident "%Z%%M% %I% %E% SMI"
#include "talk_ctl.h"
#include <libintl.h>
#include <sys/isa_defs.h>
#ifdef SYSV
#define bcopy(a, b, c) memcpy((b), (a), (c))
#endif /* SYSV */
static int look_for_invite(CTL_RESPONSE *);
static CTL_RESPONSE swapresponse();
/* see if the local daemon has a invitation for us */
int
check_local()
{
CTL_RESPONSE response;
/* the rest of msg was set up in get_names */
msg.ctl_addr = ctl_addr;
if (!look_for_invite(&response)) {
/* we must be initiating a talk */
return (0);
}
/*
* there was an invitation waiting for us,
* so connect with the other (hopefully waiting) party
*/
current_state = gettext("Waiting to connect with caller");
response = swapresponse(response);
while (connect(sockt, (struct sockaddr *)&response.addr,
sizeof (response.addr)) != 0) {
if (errno == ECONNREFUSED) {
/*
* the caller gave up, but the invitation somehow
* was not cleared. Clear it and initiate an
* invitation. (We know there are no newer invitations,
* the talkd works LIFO.)
*/
ctl_transact(rem_machine_addr, msg, DELETE, &response);
close(sockt);
open_sockt();
return (0);
} else if (errno == EINTR) {
/* we have returned from an interupt handler */
continue;
} else {
p_error(gettext("Unable to connect with initiator"));
}
}
return (1);
}
/* look for an invitation on 'machine' */
static int
look_for_invite(response)
CTL_RESPONSE *response;
{
current_state = gettext("Checking for invitation on caller's machine");
ctl_transact(rem_machine_addr, msg, LOOK_UP, response);
/*
* switch is for later options, such as multiple invitations
*/
switch (response->answer) {
case SUCCESS:
msg.id_num = response->id_num;
return (1);
default :
/* there wasn't an invitation waiting for us */
return (0);
}
}
/*
* heuristic to detect if need to reshuffle CTL_RESPONSE structure
*/
#if defined(_LITTLE_ENDIAN)
struct ctl_response_runrise {
char type;
char answer;
short junk;
int id_num;
struct sockaddr_in addr;
};
static CTL_RESPONSE
swapresponse(rsp)
CTL_RESPONSE rsp;
{
struct ctl_response_runrise swaprsp;
if (rsp.addr.sin_family != AF_INET) {
bcopy(&rsp, &swaprsp, sizeof (CTL_RESPONSE));
if (swaprsp.addr.sin_family == AF_INET) {
rsp.addr = swaprsp.addr;
rsp.type = swaprsp.type;
rsp.answer = swaprsp.answer;
rsp.id_num = swaprsp.id_num;
}
}
return (rsp);
}
#endif
#if defined(_BIG_ENDIAN)
struct ctl_response_sun3 {
char type;
char answer;
unsigned short id_num2;
unsigned short id_num1;
short sin_family;
short sin_port;
short sin_addr2;
short sin_addr1;
};
static CTL_RESPONSE
swapresponse(rsp)
CTL_RESPONSE rsp;
{
struct ctl_response_sun3 swaprsp;
if (rsp.addr.sin_family != AF_INET) {
bcopy(&rsp, &swaprsp, sizeof (struct ctl_response_sun3));
if (swaprsp.sin_family == AF_INET) {
rsp.type = swaprsp.type;
rsp.answer = swaprsp.answer;
rsp.id_num = swaprsp.id_num1
| (swaprsp.id_num2 << 16);
rsp.addr.sin_family = swaprsp.sin_family;
rsp.addr.sin_port = swaprsp.sin_port;
rsp.addr.sin_addr.s_addr =
(swaprsp.sin_addr2 << 16)| swaprsp.sin_addr1;
}
}
return (rsp);
}
#endif
|
