main.c revision 1.11 1 1.11 abs /* $NetBSD: main.c,v 1.11 1999/07/28 06:35:16 abs Exp $ */
2 1.5 thorpej
3 1.1 cgd /*
4 1.4 jtk * Copyright (c) 1988, 1990, 1993
5 1.4 jtk * The Regents of the University of California. All rights reserved.
6 1.1 cgd *
7 1.1 cgd * Redistribution and use in source and binary forms, with or without
8 1.1 cgd * modification, are permitted provided that the following conditions
9 1.1 cgd * are met:
10 1.1 cgd * 1. Redistributions of source code must retain the above copyright
11 1.1 cgd * notice, this list of conditions and the following disclaimer.
12 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 cgd * notice, this list of conditions and the following disclaimer in the
14 1.1 cgd * documentation and/or other materials provided with the distribution.
15 1.1 cgd * 3. All advertising materials mentioning features or use of this software
16 1.1 cgd * must display the following acknowledgement:
17 1.1 cgd * This product includes software developed by the University of
18 1.1 cgd * California, Berkeley and its contributors.
19 1.1 cgd * 4. Neither the name of the University nor the names of its contributors
20 1.1 cgd * may be used to endorse or promote products derived from this software
21 1.1 cgd * without specific prior written permission.
22 1.1 cgd *
23 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 1.1 cgd * SUCH DAMAGE.
34 1.1 cgd */
35 1.1 cgd
36 1.7 christos #include <sys/cdefs.h>
37 1.1 cgd #ifndef lint
38 1.7 christos __COPYRIGHT("@(#) Copyright (c) 1988, 1990, 1993\n\
39 1.7 christos The Regents of the University of California. All rights reserved.\n");
40 1.1 cgd #endif /* not lint */
41 1.1 cgd
42 1.1 cgd #ifndef lint
43 1.5 thorpej #if 0
44 1.5 thorpej static char sccsid[] = "@(#)main.c 8.3 (Berkeley) 5/30/95";
45 1.5 thorpej #else
46 1.11 abs __RCSID("$NetBSD: main.c,v 1.11 1999/07/28 06:35:16 abs Exp $");
47 1.5 thorpej #endif
48 1.1 cgd #endif /* not lint */
49 1.1 cgd
50 1.1 cgd #include <sys/types.h>
51 1.8 enami
52 1.8 enami #include <unistd.h>
53 1.1 cgd
54 1.1 cgd #include "ring.h"
55 1.1 cgd #include "externs.h"
56 1.1 cgd #include "defines.h"
57 1.1 cgd
58 1.3 cgd /* These values need to be the same as defined in libtelnet/kerberos5.c */
59 1.3 cgd /* Either define them in both places, or put in some common header file. */
60 1.4 jtk #define OPTS_FORWARD_CREDS 0x00000002
61 1.4 jtk #define OPTS_FORWARDABLE_CREDS 0x00000001
62 1.3 cgd
63 1.3 cgd #if 0
64 1.3 cgd #define FORWARD
65 1.3 cgd #endif
66 1.3 cgd
67 1.9 itojun #if defined(IPSEC) && defined(IPSEC_POLICY_IPSEC)
68 1.9 itojun char *ipsec_policy = NULL;
69 1.9 itojun #endif
70 1.9 itojun
71 1.7 christos int main P((int, char *[]));
72 1.7 christos
73 1.1 cgd /*
74 1.1 cgd * Initialize variables.
75 1.1 cgd */
76 1.1 cgd void
77 1.1 cgd tninit()
78 1.1 cgd {
79 1.1 cgd init_terminal();
80 1.1 cgd
81 1.1 cgd init_network();
82 1.4 jtk
83 1.1 cgd init_telnet();
84 1.1 cgd
85 1.1 cgd init_sys();
86 1.1 cgd
87 1.1 cgd #if defined(TN3270)
88 1.1 cgd init_3270();
89 1.1 cgd #endif
90 1.1 cgd }
91 1.1 cgd
92 1.1 cgd void
93 1.1 cgd usage()
94 1.1 cgd {
95 1.1 cgd fprintf(stderr, "Usage: %s %s%s%s%s\n",
96 1.1 cgd prompt,
97 1.3 cgd #ifdef AUTHENTICATION
98 1.11 abs "[-8] [-E] [-K] [-L] [-N] [-S tos] [-X atype] [-a] [-c] [-d]",
99 1.11 abs "\n\t[-e char] [-k realm] [-l user] [-f/-F] [-n tracefile] ",
100 1.1 cgd #else
101 1.11 abs "[-8] [-E] [-L] [-N] [-S tos] [-a] [-c] [-d] [-e char] [-l user]",
102 1.4 jtk "\n\t[-n tracefile]",
103 1.1 cgd #endif
104 1.1 cgd #if defined(TN3270) && defined(unix)
105 1.3 cgd # ifdef AUTHENTICATION
106 1.4 jtk "[-noasynch] [-noasynctty]\n\t[-noasyncnet] [-r] [-t transcom] ",
107 1.1 cgd # else
108 1.4 jtk "[-noasynch] [-noasynctty] [-noasyncnet] [-r]\n\t[-t transcom]",
109 1.1 cgd # endif
110 1.1 cgd #else
111 1.1 cgd "[-r] ",
112 1.1 cgd #endif
113 1.9 itojun #if defined(IPSEC) && defined(IPSEC_POLICY_IPSEC)
114 1.10 thorpej "[-P policy] "
115 1.10 thorpej #endif
116 1.1 cgd "[host-name [port]]"
117 1.1 cgd );
118 1.1 cgd exit(1);
119 1.1 cgd }
120 1.1 cgd
121 1.1 cgd /*
122 1.1 cgd * main. Parse arguments, invoke the protocol or command parser.
123 1.1 cgd */
124 1.1 cgd
125 1.1 cgd
126 1.7 christos int
127 1.1 cgd main(argc, argv)
128 1.1 cgd int argc;
129 1.1 cgd char *argv[];
130 1.1 cgd {
131 1.1 cgd extern char *optarg;
132 1.1 cgd extern int optind;
133 1.1 cgd int ch;
134 1.7 christos char *user;
135 1.3 cgd #ifdef FORWARD
136 1.3 cgd extern int forward_flags;
137 1.3 cgd #endif /* FORWARD */
138 1.1 cgd
139 1.1 cgd tninit(); /* Clear out things */
140 1.1 cgd #if defined(CRAY) && !defined(__STDC__)
141 1.1 cgd _setlist_init(); /* Work around compiler bug */
142 1.1 cgd #endif
143 1.1 cgd
144 1.1 cgd TerminalSaveState();
145 1.1 cgd
146 1.7 christos if ((prompt = strrchr(argv[0], '/')) != NULL)
147 1.1 cgd ++prompt;
148 1.1 cgd else
149 1.1 cgd prompt = argv[0];
150 1.1 cgd
151 1.1 cgd user = NULL;
152 1.1 cgd
153 1.1 cgd rlogin = (strncmp(prompt, "rlog", 4) == 0) ? '~' : _POSIX_VDISABLE;
154 1.1 cgd autologin = -1;
155 1.1 cgd
156 1.9 itojun #if defined(IPSEC) && defined(IPSEC_POLICY_IPSEC)
157 1.9 itojun #define IPSECOPT "P:"
158 1.9 itojun #else
159 1.9 itojun #define IPSECOPT
160 1.9 itojun #endif
161 1.11 abs while ((ch = getopt(argc, argv, "8EKLNS:X:acde:fFk:l:n:rt:x"
162 1.9 itojun IPSECOPT)) != -1) {
163 1.9 itojun #undef IPSECOPT
164 1.1 cgd switch(ch) {
165 1.1 cgd case '8':
166 1.1 cgd eight = 3; /* binary output and input */
167 1.1 cgd break;
168 1.1 cgd case 'E':
169 1.1 cgd rlogin = escape = _POSIX_VDISABLE;
170 1.1 cgd break;
171 1.1 cgd case 'K':
172 1.3 cgd #ifdef AUTHENTICATION
173 1.1 cgd autologin = 0;
174 1.1 cgd #endif
175 1.1 cgd break;
176 1.1 cgd case 'L':
177 1.1 cgd eight |= 2; /* binary output only */
178 1.11 abs break;
179 1.11 abs case 'N':
180 1.11 abs doaddrlookup = 0;
181 1.1 cgd break;
182 1.1 cgd case 'S':
183 1.1 cgd {
184 1.1 cgd #ifdef HAS_GETTOS
185 1.1 cgd extern int tos;
186 1.1 cgd
187 1.1 cgd if ((tos = parsetos(optarg, "tcp")) < 0)
188 1.1 cgd fprintf(stderr, "%s%s%s%s\n",
189 1.1 cgd prompt, ": Bad TOS argument '",
190 1.1 cgd optarg,
191 1.1 cgd "; will try to use default TOS");
192 1.1 cgd #else
193 1.1 cgd fprintf(stderr,
194 1.1 cgd "%s: Warning: -S ignored, no parsetos() support.\n",
195 1.1 cgd prompt);
196 1.1 cgd #endif
197 1.1 cgd }
198 1.1 cgd break;
199 1.1 cgd case 'X':
200 1.3 cgd #ifdef AUTHENTICATION
201 1.1 cgd auth_disable_name(optarg);
202 1.1 cgd #endif
203 1.1 cgd break;
204 1.1 cgd case 'a':
205 1.1 cgd autologin = 1;
206 1.1 cgd break;
207 1.1 cgd case 'c':
208 1.1 cgd skiprc = 1;
209 1.1 cgd break;
210 1.1 cgd case 'd':
211 1.1 cgd debug = 1;
212 1.1 cgd break;
213 1.1 cgd case 'e':
214 1.1 cgd set_escape_char(optarg);
215 1.1 cgd break;
216 1.3 cgd case 'f':
217 1.3 cgd #if defined(AUTHENTICATION) && defined(KRB5) && defined(FORWARD)
218 1.3 cgd if (forward_flags & OPTS_FORWARD_CREDS) {
219 1.4 jtk fprintf(stderr,
220 1.3 cgd "%s: Only one of -f and -F allowed.\n",
221 1.3 cgd prompt);
222 1.3 cgd usage();
223 1.3 cgd }
224 1.3 cgd forward_flags |= OPTS_FORWARD_CREDS;
225 1.3 cgd #else
226 1.3 cgd fprintf(stderr,
227 1.4 jtk "%s: Warning: -f ignored, no Kerberos V5 support.\n",
228 1.3 cgd prompt);
229 1.3 cgd #endif
230 1.3 cgd break;
231 1.3 cgd case 'F':
232 1.3 cgd #if defined(AUTHENTICATION) && defined(KRB5) && defined(FORWARD)
233 1.3 cgd if (forward_flags & OPTS_FORWARD_CREDS) {
234 1.4 jtk fprintf(stderr,
235 1.3 cgd "%s: Only one of -f and -F allowed.\n",
236 1.3 cgd prompt);
237 1.3 cgd usage();
238 1.3 cgd }
239 1.3 cgd forward_flags |= OPTS_FORWARD_CREDS;
240 1.3 cgd forward_flags |= OPTS_FORWARDABLE_CREDS;
241 1.3 cgd #else
242 1.3 cgd fprintf(stderr,
243 1.4 jtk "%s: Warning: -F ignored, no Kerberos V5 support.\n",
244 1.3 cgd prompt);
245 1.3 cgd #endif
246 1.3 cgd break;
247 1.1 cgd case 'k':
248 1.3 cgd #if defined(AUTHENTICATION) && defined(KRB4)
249 1.1 cgd {
250 1.1 cgd extern char *dest_realm, dst_realm_buf[], dst_realm_sz;
251 1.1 cgd dest_realm = dst_realm_buf;
252 1.1 cgd (void)strncpy(dest_realm, optarg, dst_realm_sz);
253 1.1 cgd }
254 1.1 cgd #else
255 1.1 cgd fprintf(stderr,
256 1.1 cgd "%s: Warning: -k ignored, no Kerberos V4 support.\n",
257 1.1 cgd prompt);
258 1.1 cgd #endif
259 1.1 cgd break;
260 1.1 cgd case 'l':
261 1.1 cgd autologin = 1;
262 1.1 cgd user = optarg;
263 1.1 cgd break;
264 1.1 cgd case 'n':
265 1.1 cgd #if defined(TN3270) && defined(unix)
266 1.1 cgd /* distinguish between "-n oasynch" and "-noasynch" */
267 1.1 cgd if (argv[optind - 1][0] == '-' && argv[optind - 1][1]
268 1.1 cgd == 'n' && argv[optind - 1][2] == 'o') {
269 1.1 cgd if (!strcmp(optarg, "oasynch")) {
270 1.1 cgd noasynchtty = 1;
271 1.1 cgd noasynchnet = 1;
272 1.1 cgd } else if (!strcmp(optarg, "oasynchtty"))
273 1.1 cgd noasynchtty = 1;
274 1.1 cgd else if (!strcmp(optarg, "oasynchnet"))
275 1.1 cgd noasynchnet = 1;
276 1.1 cgd } else
277 1.1 cgd #endif /* defined(TN3270) && defined(unix) */
278 1.1 cgd SetNetTrace(optarg);
279 1.1 cgd break;
280 1.1 cgd case 'r':
281 1.1 cgd rlogin = '~';
282 1.1 cgd break;
283 1.1 cgd case 't':
284 1.1 cgd #if defined(TN3270) && defined(unix)
285 1.1 cgd transcom = tline;
286 1.1 cgd (void)strcpy(transcom, optarg);
287 1.1 cgd #else
288 1.1 cgd fprintf(stderr,
289 1.1 cgd "%s: Warning: -t ignored, no TN3270 support.\n",
290 1.1 cgd prompt);
291 1.1 cgd #endif
292 1.1 cgd break;
293 1.1 cgd case 'x':
294 1.1 cgd fprintf(stderr,
295 1.1 cgd "%s: Warning: -x ignored, no ENCRYPT support.\n",
296 1.1 cgd prompt);
297 1.1 cgd break;
298 1.9 itojun #if defined(IPSEC) && defined(IPSEC_POLICY_IPSEC)
299 1.9 itojun case 'P':
300 1.9 itojun ipsec_policy = strdup(optarg);
301 1.9 itojun break;
302 1.9 itojun #endif
303 1.1 cgd case '?':
304 1.1 cgd default:
305 1.1 cgd usage();
306 1.1 cgd /* NOTREACHED */
307 1.1 cgd }
308 1.1 cgd }
309 1.1 cgd if (autologin == -1)
310 1.1 cgd autologin = (rlogin == _POSIX_VDISABLE) ? 0 : 1;
311 1.1 cgd
312 1.1 cgd argc -= optind;
313 1.1 cgd argv += optind;
314 1.1 cgd
315 1.1 cgd if (argc) {
316 1.1 cgd char *args[7], **argp = args;
317 1.7 christos #ifdef __GNUC__
318 1.7 christos (void) &argp; /* avoid longjmp clobbering */
319 1.7 christos #endif
320 1.1 cgd
321 1.1 cgd if (argc > 2)
322 1.1 cgd usage();
323 1.1 cgd *argp++ = prompt;
324 1.1 cgd if (user) {
325 1.1 cgd *argp++ = "-l";
326 1.1 cgd *argp++ = user;
327 1.1 cgd }
328 1.1 cgd *argp++ = argv[0]; /* host */
329 1.1 cgd if (argc > 1)
330 1.1 cgd *argp++ = argv[1]; /* port */
331 1.1 cgd *argp = 0;
332 1.1 cgd
333 1.1 cgd if (setjmp(toplevel) != 0)
334 1.1 cgd Exit(0);
335 1.1 cgd if (tn(argp - args, args) == 1)
336 1.1 cgd return (0);
337 1.1 cgd else
338 1.1 cgd return (1);
339 1.1 cgd }
340 1.1 cgd (void)setjmp(toplevel);
341 1.1 cgd for (;;) {
342 1.1 cgd #ifdef TN3270
343 1.1 cgd if (shell_active)
344 1.1 cgd shell_continue();
345 1.1 cgd else
346 1.1 cgd #endif
347 1.1 cgd command(1, 0, 0);
348 1.1 cgd }
349 1.1 cgd }
350