386BSD 0.1 development
[unix-history] / usr / src / usr.bin / tip / remote.c
index 3896ac1..62219b3 100644 (file)
@@ -1,4 +1,40 @@
-/*     remote.c        4.2     81/06/16        */
+/*
+ * Copyright (c) 1983 The Regents of the University of California.
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. All advertising materials mentioning features or use of this software
+ *    must display the following acknowledgement:
+ *     This product includes software developed by the University of
+ *     California, Berkeley and its contributors.
+ * 4. Neither the name of the University nor the names of its contributors
+ *    may be used to endorse or promote products derived from this software
+ *    without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
+ * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
+ * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+ * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+ * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+ * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+ * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+ * SUCH DAMAGE.
+ */
+
+#ifndef lint
+static char sccsid[] = "@(#)remote.c   5.5 (Berkeley) 6/1/90";
+#endif /* not lint */
+
 # include "tip.h"
 
 /*
 # include "tip.h"
 
 /*
  *   data base.
  */
 static char **caps[] = {
  *   data base.
  */
 static char **caps[] = {
-       &AT, &DV, &CM, &CU, &EL, &IE, &OE, &PN
+       &AT, &DV, &CM, &CU, &EL, &IE, &OE, &PN, &PR, &DI,
+       &ES, &EX, &FO, &RC, &RE, &PA
 };
 
 static char *capstrings[] = {
 };
 
 static char *capstrings[] = {
-       "at", "dv", "cm", "cu", "el", "ie", "oe", "pn", 0
+       "at", "dv", "cm", "cu", "el", "ie", "oe", "pn", "pr",
+       "di", "es", "ex", "fo", "rc", "re", "pa", 0
 };
 
 char *rgetstr();
 };
 
 char *rgetstr();
@@ -26,6 +64,17 @@ getremcap(host)
        register char **p, ***q;
 
        if ((stat = rgetent(tbuf, host)) <= 0) {
        register char **p, ***q;
 
        if ((stat = rgetent(tbuf, host)) <= 0) {
+               if (DV ||
+                   host[0] == '/' && access(DV = host, R_OK | W_OK) == 0) {
+                       CU = DV;
+                       HO = host;
+                       HW = 1;
+                       DU = 0;
+                       if (!BR)
+                               BR = DEFBR;
+                       FS = DEFFS;
+                       return;
+               }
                fprintf(stderr, stat == 0 ?
                        "tip: unknown host %s\n" :
                        "tip: can't open host description file\n", host);
                fprintf(stderr, stat == 0 ?
                        "tip: unknown host %s\n" :
                        "tip: can't open host description file\n", host);
@@ -33,13 +82,16 @@ getremcap(host)
        }
 
        for (p = capstrings, q = caps; *p != NULL; p++, q++)
        }
 
        for (p = capstrings, q = caps; *p != NULL; p++, q++)
-               **q = rgetstr(*p, &bp);
-       if ((BR = rgetnum("br")) < 0)
+               if (**q == NULL)
+                       **q = rgetstr(*p, &bp);
+       if (!BR && (BR = rgetnum("br")) < 0)
                BR = DEFBR;
        if ((FS = rgetnum("fs")) < 0)
                FS = DEFFS;
                BR = DEFBR;
        if ((FS = rgetnum("fs")) < 0)
                FS = DEFFS;
-       DU = rgetflag("du");
-       HW = rgetflag("hw");
+       if (DU < 0)
+               DU = 0;
+       else
+               DU = rgetflag("du");
        if (DV == NOSTR) {
                fprintf(stderr, "%s: missing device spec\n", host);
                exit(3);
        if (DV == NOSTR) {
                fprintf(stderr, "%s: missing device spec\n", host);
                exit(3);
@@ -50,7 +102,61 @@ getremcap(host)
                fprintf(stderr, "%s: missing phone number\n", host);
                exit(3);
        }
                fprintf(stderr, "%s: missing phone number\n", host);
                exit(3);
        }
+
+       HD = rgetflag("hd");
+
+       /*
+        * This effectively eliminates the "hw" attribute
+        *   from the description file
+        */
+       if (!HW)
+               HW = (CU == NOSTR) || (DU && equal(DV, CU));
        HO = host;
        HO = host;
+       /*
+        * see if uppercase mode should be turned on initially
+        */
+       if (rgetflag("ra"))
+               boolean(value(RAISE)) = 1;
+       if (rgetflag("ec"))
+               boolean(value(ECHOCHECK)) = 1;
+       if (rgetflag("be"))
+               boolean(value(BEAUTIFY)) = 1;
+       if (rgetflag("nb"))
+               boolean(value(BEAUTIFY)) = 0;
+       if (rgetflag("sc"))
+               boolean(value(SCRIPT)) = 1;
+       if (rgetflag("tb"))
+               boolean(value(TABEXPAND)) = 1;
+       if (rgetflag("vb"))
+               boolean(value(VERBOSE)) = 1;
+       if (rgetflag("nv"))
+               boolean(value(VERBOSE)) = 0;
+       if (rgetflag("ta"))
+               boolean(value(TAND)) = 1;
+       if (rgetflag("nt"))
+               boolean(value(TAND)) = 0;
+       if (rgetflag("rw"))
+               boolean(value(RAWFTP)) = 1;
+       if (rgetflag("hd"))
+               boolean(value(HALFDUPLEX)) = 1;
+       if (RE == NOSTR)
+               RE = (char *)"tip.record";
+       if (EX == NOSTR)
+               EX = (char *)"\t\n\b\f";
+       if (ES != NOSTR)
+               vstring("es", ES);
+       if (FO != NOSTR)
+               vstring("fo", FO);
+       if (PR != NOSTR)
+               vstring("pr", PR);
+       if (RC != NOSTR)
+               vstring("rc", RC);
+       if ((DL = rgetnum("dl")) < 0)
+               DL = 0;
+       if ((CL = rgetnum("cl")) < 0)
+               CL = 0;
+       if ((ET = rgetnum("et")) < 0)
+               ET = 10;
 }
 
 char *
 }
 
 char *
@@ -75,7 +181,7 @@ getremote(host)
         *   a rotary action to be simulated)
         */
        if (next == NOSTR)
         *   a rotary action to be simulated)
         */
        if (next == NOSTR)
-               return(NOSTR);
+               return (NOSTR);
        if ((cp = index(next, ',')) == NULL) {
                DV = next;
                next = NOSTR;
        if ((cp = index(next, ',')) == NULL) {
                DV = next;
                next = NOSTR;
@@ -84,5 +190,5 @@ getremote(host)
                DV = next;
                next = cp;
        }
                DV = next;
                next = cp;
        }
-       return(DV);
+       return (DV);
 }
 }