contrib/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. Neither the name of the University nor the names of its contributors
  14  *    may be used to endorse or promote products derived from this software
  15  *    without specific prior written permission.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  27  * SUCH DAMAGE.
  28  */
  29
  30 #if 0
  31 #ifndef lint
  32 static const char sccsid[] = "@(#)main.c        8.3 (Berkeley) 5/30/95";
  33 #endif
  34 #endif
  35
  36 #include <sys/param.h>
  37 #include <sys/socket.h>
  38 #include <stdlib.h>
  39 #include <string.h>
  40 #include <unistd.h>
  41
  42 #include "ring.h"
  43 #include "externs.h"
  44 #include "defines.h"
  45
  46 #ifdef  AUTHENTICATION
  47 #include <libtelnet/auth.h>
  48 #endif
  49 #ifdef  ENCRYPTION
  50 #include <libtelnet/encrypt.h>
  51 #endif
  52
  53 /* These values need to be the same as defined in libtelnet/kerberos5.c */
  54 /* Either define them in both places, or put in some common header file. */
  55 #define OPTS_FORWARD_CREDS      0x00000002
  56 #define OPTS_FORWARDABLE_CREDS  0x00000001
  57
  58 #if defined(IPSEC) && defined(IPSEC_POLICY_IPSEC)
  59 char *ipsec_policy_in = NULL;
  60 char *ipsec_policy_out = NULL;
  61 #endif
  62
  63 extern int tos;
  64 extern int quiet_mode;
  65
  66 int family = AF_UNSPEC;
  67
  68 /*
  69  * Initialize variables.
  70  */
  71 void
  72 tninit(void)
  73 {
  74     init_terminal();
  75
  76     init_network();
  77
  78     init_telnet();
  79
  80     init_sys();
  81 }
  82
  83 static void
  84 usage(void)
  85 {
  86         fprintf(stderr, "usage: %s %s%s%s%s\n",
  87             prompt,
  88 #ifdef  AUTHENTICATION
  89             "[-4] [-6] [-8] [-B baudrate] [-E] [-K] [-L] [-N] [-S tos] [-X atype]",
  90             "\n\t[-c] [-d] [-e char] [-k realm] [-l user] [-f/-F] [-n tracefile] ",
  91 #else
  92             "[-4] [-6] [-8] [-B baudrate] [-E] [-L] [-N] [-S tos] [-c] [-d]",
  93             "\n\t[-e char] [-l user] [-n tracefile] ",
  94 #endif
  95             "[-r] [-s src_addr] [-u] ",
  96 #if defined(IPSEC) && defined(IPSEC_POLICY_IPSEC)
  97             "[-P policy] "
  98 #endif
  99 #ifdef  ENCRYPTION
 100             "[-y] [host-name [port]]"
 101 #else   /* ENCRYPTION */
 102             "[host-name [port]]"
 103 #endif  /* ENCRYPTION */
 104         );
 105         exit(1);
 106 }
 107
 108 /*
 109  * main.  Parse arguments, invoke the protocol or command parser.
 110  */
 111
 112 int
 113 main(int argc, char *argv[])
 114 {
 115         u_long ultmp;
 116         int ch;
 117         char *ep, *user;
 118         char *src_addr = NULL;
 119 #ifdef  FORWARD
 120         extern int forward_flags;
 121 #endif  /* FORWARD */
 122
 123         setbuf(stdout, NULL);
 124         setbuf(stderr, NULL);
 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                             "468B:EKLNQS:X:acde:fFk:l:n:rs: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 'B':
 170                         DoBaudRate(optarg);
 171                         break;
 172                 case 'E':
 173                         rlogin = escape = _POSIX_VDISABLE;
 174                         break;
 175                 case 'K':
 176 #ifdef  AUTHENTICATION
 177                         autologin = 0;
 178 #endif
 179                         break;
 180                 case 'L':
 181                         eight |= 2;     /* binary output only */
 182                         break;
 183                 case 'N':
 184                         doaddrlookup = 0;
 185                         break;
 186                 case 'Q':
 187                         quiet_mode = 1;
 188                         break;
 189                 case 'S':
 190 #ifdef  HAS_GETTOS
 191
 192                         if ((tos = parsetos(optarg, "tcp")) < 0)
 193                                 fprintf(stderr, "%s%s%s%s\n",
 194                                         prompt, ": Bad TOS argument '",
 195                                         optarg,
 196                                         "; will try to use default TOS");
 197 #else
 198 #define MAXTOS  255
 199                         ultmp = strtoul(optarg, &ep, 0);
 200                         if (*ep || ep == optarg || ultmp > MAXTOS)
 201                                 fprintf(stderr, "%s%s%s%s\n",
 202                                         prompt, ": Bad TOS argument '",
 203                                         optarg,
 204                                         "; will try to use default TOS");
 205                         else
 206                                 tos = ultmp;
 207 #endif
 208                         break;
 209                 case 'X':
 210 #ifdef  AUTHENTICATION
 211                         auth_disable_name(optarg);
 212 #endif
 213                         break;
 214                 case 'a':
 215 #ifdef  AUTHENTICATION
 216                         /* It's the default now, so ignore */
 217 #else
 218                         autologin = 1;
 219 #endif
 220                         break;
 221                 case 'c':
 222                         skiprc = 1;
 223                         break;
 224                 case 'd':
 225                         telnet_debug = 1;
 226                         break;
 227                 case 'e':
 228                         set_escape_char(optarg);
 229                         break;
 230                 case 'f':
 231 #ifdef  AUTHENTICATION
 232 #if defined(KRB5) && defined(FORWARD)
 233                         if (forward_flags & OPTS_FORWARD_CREDS) {
 234                             fprintf(stderr,
 235                                     "%s: Only one of -f and -F allowed.\n",
 236                                     prompt);
 237                             usage();
 238                         }
 239                         forward_flags |= OPTS_FORWARD_CREDS;
 240 #else
 241                         fprintf(stderr,
 242                          "%s: Warning: -f ignored, no Kerberos V5 support.\n",
 243                                 prompt);
 244 #endif
 245 #else
 246                         fprintf(stderr,
 247                          "%s: Warning: -f ignored, no Kerberos V5 support.\n",
 248                                 prompt);
 249 #endif
 250                         break;
 251                 case 'F':
 252 #ifdef  AUTHENTICATION
 253 #if defined(KRB5) && defined(FORWARD)
 254                         if (forward_flags & OPTS_FORWARD_CREDS) {
 255                             fprintf(stderr,
 256                                     "%s: Only one of -f and -F allowed.\n",
 257                                     prompt);
 258                             usage();
 259                         }
 260                         forward_flags |= OPTS_FORWARD_CREDS;
 261                         forward_flags |= OPTS_FORWARDABLE_CREDS;
 262 #else
 263                         fprintf(stderr,
 264                          "%s: Warning: -F ignored, no Kerberos V5 support.\n",
 265                                 prompt);
 266 #endif
 267 #else
 268                         fprintf(stderr,
 269                          "%s: Warning: -F ignored, no Kerberos V5 support.\n",
 270                                 prompt);
 271 #endif
 272                         break;
 273                 case 'k':
 274 #ifdef  AUTHENTICATION
 275 #if defined(KRB4)
 276                     {
 277                         extern char *dest_realm, dst_realm_buf[], dst_realm_sz;
 278                         dest_realm = dst_realm_buf;
 279                         (void)strncpy(dest_realm, optarg, dst_realm_sz);
 280                     }
 281 #else
 282                         fprintf(stderr,
 283                            "%s: Warning: -k ignored, no Kerberos V4 support.\n",
 284                                                                 prompt);
 285 #endif
 286 #else
 287                         fprintf(stderr,
 288                            "%s: Warning: -k ignored, no Kerberos V4 support.\n",
 289                                                                 prompt);
 290 #endif
 291                         break;
 292                 case 'l':
 293 #ifdef  AUTHENTICATION
 294                         /* This is the default now, so ignore it */
 295 #else
 296                         autologin = 1;
 297 #endif
 298                         user = optarg;
 299                         break;
 300                 case 'n':
 301                                 SetNetTrace(optarg);
 302                         break;
 303                 case 'r':
 304                         rlogin = '~';
 305                         break;
 306                 case 's':
 307                         src_addr = optarg;
 308                         break;
 309                 case 'u':
 310                         family = AF_UNIX;
 311                         break;
 312                 case 'x':
 313 #ifndef ENCRYPTION
 314                         fprintf(stderr,
 315                             "%s: Warning: -x ignored, no ENCRYPT support.\n",
 316                                                                 prompt);
 317 #endif  /* ENCRYPTION */
 318                         break;
 319                 case 'y':
 320 #ifdef  ENCRYPTION
 321                         encrypt_auto(0);
 322                         decrypt_auto(0);
 323 #else
 324                         fprintf(stderr,
 325                             "%s: Warning: -y ignored, no ENCRYPT support.\n",
 326                                                                 prompt);
 327 #endif  /* ENCRYPTION */
 328                         break;
 329 #if defined(IPSEC) && defined(IPSEC_POLICY_IPSEC)
 330                 case 'P':
 331                         if (!strncmp("in", optarg, 2))
 332                                 ipsec_policy_in = strdup(optarg);
 333                         else if (!strncmp("out", optarg, 3))
 334                                 ipsec_policy_out = strdup(optarg);
 335                         else
 336                                 usage();
 337                         break;
 338 #endif
 339                 case '?':
 340                 default:
 341                         usage();
 342                         /* NOTREACHED */
 343                 }
 344         }
 345         if (autologin == -1)
 346                 autologin = (rlogin == _POSIX_VDISABLE) ? 0 : 1;
 347
 348         argc -= optind;
 349         argv += optind;
 350
 351         if (argc) {
 352                 char *args[9], **argp = args;
 353
 354                 if (argc > 2)
 355                         usage();
 356                 *argp++ = prompt;
 357                 if (user) {
 358                         *argp++ = strdup("-l");
 359                         *argp++ = user;
 360                 }
 361                 if (src_addr) {
 362                         *argp++ = strdup("-s");
 363                         *argp++ = src_addr;
 364                 }
 365                 *argp++ = argv[0];              /* host */
 366                 if (argc > 1)
 367                         *argp++ = argv[1];      /* port */
 368                 *argp = 0;
 369
 370                 if (setjmp(toplevel) != 0)
 371                         Exit(0);
 372                 if (tn(argp - args, args) == 1)
 373                         return (0);
 374                 else
 375                         return (1);
 376         }
 377         (void)setjmp(toplevel);
 378         for (;;) {
 379                         command(1, 0, 0);
 380         }
 381         return 0;
 382 }