main.c revision 1.13 1 /* $NetBSD: main.c,v 1.13 2000/06/22 06:47:48 thorpej Exp $ */
2
3 /*
4 * Copyright (c) 1988, 1990, 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 #include <sys/cdefs.h>
37 #ifndef lint
38 __COPYRIGHT("@(#) Copyright (c) 1988, 1990, 1993\n\
39 The Regents of the University of California. All rights reserved.\n");
40 #endif /* not lint */
41
42 #ifndef lint
43 #if 0
44 static char sccsid[] = "@(#)main.c 8.3 (Berkeley) 5/30/95";
45 #else
46 __RCSID("$NetBSD: main.c,v 1.13 2000/06/22 06:47:48 thorpej Exp $");
47 #endif
48 #endif /* not lint */
49
50 #include <sys/types.h>
51
52 #include <unistd.h>
53
54 #include "ring.h"
55 #include "externs.h"
56 #include "defines.h"
57 #ifdef AUTHENTICATION
58 #include <libtelnet/auth.h>
59 #endif
60 #ifdef ENCRYPTION
61 #include <libtelnet/encrypt.h>
62 #endif
63
64 /* These values need to be the same as defined in libtelnet/kerberos5.c */
65 /* Either define them in both places, or put in some common header file. */
66 #define OPTS_FORWARD_CREDS 0x00000002
67 #define OPTS_FORWARDABLE_CREDS 0x00000001
68
69 #if 0
70 #define FORWARD
71 #endif
72
73 #if defined(IPSEC) && defined(IPSEC_POLICY_IPSEC)
74 char *ipsec_policy_in = NULL;
75 char *ipsec_policy_out = NULL;
76 #endif
77
78 int main P((int, char *[]));
79
80 /*
81 * Initialize variables.
82 */
83 void
84 tninit()
85 {
86 init_terminal();
87
88 init_network();
89
90 init_telnet();
91
92 init_sys();
93
94 #if defined(TN3270)
95 init_3270();
96 #endif
97 }
98
99 void
100 usage()
101 {
102 fprintf(stderr, "Usage: %s %s%s%s%s\n",
103 prompt,
104 #ifdef AUTHENTICATION
105 "[-8] [-E] [-K] [-L] [-N] [-S tos] [-X atype] [-a] [-c] [-d]",
106 "\n\t[-e char] [-k realm] [-l user] [-f/-F] [-n tracefile] ",
107 #else
108 "[-8] [-E] [-L] [-N] [-S tos] [-a] [-c] [-d] [-e char] [-l user]",
109 "\n\t[-n tracefile]",
110 #endif
111 #if defined(TN3270) && defined(unix)
112 # ifdef AUTHENTICATION
113 "[-noasynch] [-noasynctty]\n\t[-noasyncnet] [-r] [-t transcom] ",
114 # else
115 "[-noasynch] [-noasynctty] [-noasyncnet] [-r]\n\t[-t transcom]",
116 # endif
117 #else
118 "[-r] ",
119 #endif
120 #ifdef ENCRYPTION
121 "[-x] "
122 #endif
123 #if defined(IPSEC) && defined(IPSEC_POLICY_IPSEC)
124 "[-P policy] [host-name [port]]"
125 #else
126 "[host-name [port]]"
127 #endif
128 );
129 exit(1);
130 }
131
132 /*
133 * main. Parse arguments, invoke the protocol or command parser.
134 */
135
136
137 int
138 main(argc, argv)
139 int argc;
140 char *argv[];
141 {
142 extern char *optarg;
143 extern int optind;
144 int ch;
145 char *user;
146 #ifdef FORWARD
147 extern int forward_flags;
148 #endif /* FORWARD */
149
150 tninit(); /* Clear out things */
151 #if defined(CRAY) && !defined(__STDC__)
152 _setlist_init(); /* Work around compiler bug */
153 #endif
154
155 TerminalSaveState();
156
157 if ((prompt = strrchr(argv[0], '/')) != NULL)
158 ++prompt;
159 else
160 prompt = argv[0];
161
162 user = NULL;
163
164 rlogin = (strncmp(prompt, "rlog", 4) == 0) ? '~' : _POSIX_VDISABLE;
165 autologin = -1;
166
167 #if defined(IPSEC) && defined(IPSEC_POLICY_IPSEC)
168 #define IPSECOPT "P:"
169 #else
170 #define IPSECOPT
171 #endif
172 while ((ch = getopt(argc, argv, "8EKLNS:X:acde:fFk:l:n:rt:x"
173 IPSECOPT)) != -1) {
174 #undef IPSECOPT
175 switch(ch) {
176 case '8':
177 eight = 3; /* binary output and input */
178 break;
179 case 'E':
180 rlogin = escape = _POSIX_VDISABLE;
181 break;
182 case 'K':
183 #ifdef AUTHENTICATION
184 autologin = 0;
185 #endif
186 break;
187 case 'L':
188 eight |= 2; /* binary output only */
189 break;
190 case 'N':
191 doaddrlookup = 0;
192 break;
193 case 'S':
194 {
195 #ifdef HAS_GETTOS
196 extern int tos;
197
198 if ((tos = parsetos(optarg, "tcp")) < 0)
199 fprintf(stderr, "%s%s%s%s\n",
200 prompt, ": Bad TOS argument '",
201 optarg,
202 "; will try to use default TOS");
203 #else
204 fprintf(stderr,
205 "%s: Warning: -S ignored, no parsetos() support.\n",
206 prompt);
207 #endif
208 }
209 break;
210 case 'X':
211 #ifdef AUTHENTICATION
212 auth_disable_name(optarg);
213 #endif
214 break;
215 case 'a':
216 autologin = 1;
217 break;
218 case 'c':
219 skiprc = 1;
220 break;
221 case 'd':
222 debug = 1;
223 break;
224 case 'e':
225 set_escape_char(optarg);
226 break;
227 case 'f':
228 #if defined(AUTHENTICATION) && defined(KRB5) && defined(FORWARD)
229 if (forward_flags & OPTS_FORWARD_CREDS) {
230 fprintf(stderr,
231 "%s: Only one of -f and -F allowed.\n",
232 prompt);
233 usage();
234 }
235 forward_flags |= OPTS_FORWARD_CREDS;
236 #else
237 fprintf(stderr,
238 "%s: Warning: -f ignored, no Kerberos V5 support.\n",
239 prompt);
240 #endif
241 break;
242 case 'F':
243 #if defined(AUTHENTICATION) && defined(KRB5) && defined(FORWARD)
244 if (forward_flags & OPTS_FORWARD_CREDS) {
245 fprintf(stderr,
246 "%s: Only one of -f and -F allowed.\n",
247 prompt);
248 usage();
249 }
250 forward_flags |= OPTS_FORWARD_CREDS;
251 forward_flags |= OPTS_FORWARDABLE_CREDS;
252 #else
253 fprintf(stderr,
254 "%s: Warning: -F ignored, no Kerberos V5 support.\n",
255 prompt);
256 #endif
257 break;
258 case 'k':
259 #if defined(AUTHENTICATION) && defined(KRB4)
260 {
261 extern char *dest_realm, dst_realm_buf[], dst_realm_sz;
262 dest_realm = dst_realm_buf;
263 (void)strncpy(dest_realm, optarg, dst_realm_sz);
264 }
265 #else
266 fprintf(stderr,
267 "%s: Warning: -k ignored, no Kerberos V4 support.\n",
268 prompt);
269 #endif
270 break;
271 case 'l':
272 autologin = 1;
273 user = optarg;
274 break;
275 case 'n':
276 #if defined(TN3270) && defined(unix)
277 /* distinguish between "-n oasynch" and "-noasynch" */
278 if (argv[optind - 1][0] == '-' && argv[optind - 1][1]
279 == 'n' && argv[optind - 1][2] == 'o') {
280 if (!strcmp(optarg, "oasynch")) {
281 noasynchtty = 1;
282 noasynchnet = 1;
283 } else if (!strcmp(optarg, "oasynchtty"))
284 noasynchtty = 1;
285 else if (!strcmp(optarg, "oasynchnet"))
286 noasynchnet = 1;
287 } else
288 #endif /* defined(TN3270) && defined(unix) */
289 SetNetTrace(optarg);
290 break;
291 case 'r':
292 rlogin = '~';
293 break;
294 case 't':
295 #if defined(TN3270) && defined(unix)
296 transcom = tline;
297 (void)strcpy(transcom, optarg);
298 #else
299 fprintf(stderr,
300 "%s: Warning: -t ignored, no TN3270 support.\n",
301 prompt);
302 #endif
303 break;
304 case 'x':
305 #ifdef ENCRYPTION
306 encrypt_auto(1);
307 decrypt_auto(1);
308 #else /* ENCRYPTION */
309 fprintf(stderr,
310 "%s: Warning: -x ignored, no ENCRYPT support.\n",
311 prompt);
312 #endif /* ENCRYPTION */
313 break;
314 #if defined(IPSEC) && defined(IPSEC_POLICY_IPSEC)
315 case 'P':
316 if (!strncmp("in", optarg, 2))
317 ipsec_policy_in = strdup(optarg);
318 else if (!strncmp("out", optarg, 3))
319 ipsec_policy_out = strdup(optarg);
320 else
321 usage();
322 break;
323 #endif
324 case '?':
325 default:
326 usage();
327 /* NOTREACHED */
328 }
329 }
330 if (autologin == -1)
331 autologin = (rlogin == _POSIX_VDISABLE) ? 0 : 1;
332
333 argc -= optind;
334 argv += optind;
335
336 if (argc) {
337 char *args[7], **argp = args;
338 #ifdef __GNUC__
339 (void) &argp; /* avoid longjmp clobbering */
340 #endif
341
342 if (argc > 2)
343 usage();
344 *argp++ = prompt;
345 if (user) {
346 *argp++ = "-l";
347 *argp++ = user;
348 }
349 *argp++ = argv[0]; /* host */
350 if (argc > 1)
351 *argp++ = argv[1]; /* port */
352 *argp = 0;
353
354 if (setjmp(toplevel) != 0)
355 Exit(0);
356 if (tn(argp - args, args) == 1)
357 return (0);
358 else
359 return (1);
360 }
361 (void)setjmp(toplevel);
362 for (;;) {
363 #ifdef TN3270
364 if (shell_active)
365 shell_continue();
366 else
367 #endif
368 command(1, 0, 0);
369 }
370 }
371