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