Get rid of the #define mess for other platforms. We're just Unix.
authorJeroen Ruigrok/asmodai <asmodai@dragonflybsd.org>
Sun, 20 Feb 2005 17:19:11 +0000 (17:19 +0000)
committerJeroen Ruigrok/asmodai <asmodai@dragonflybsd.org>
Sun, 20 Feb 2005 17:19:11 +0000 (17:19 +0000)
usr.sbin/pcvt/vttest/esc.c
usr.sbin/pcvt/vttest/header.h
usr.sbin/pcvt/vttest/main.c

index b2bce92..e4e1028 100644 (file)
@@ -1,3 +1,5 @@
+/* $DragonFly: src/usr.sbin/pcvt/vttest/Attic/esc.c,v 1.2 2005/02/20 17:19:11 asmodai Exp $ */
+
 #include "header.h"
 
 println(s) char *s; {
@@ -137,7 +139,6 @@ char inchar() {
    *   then read it, without waiting for CR.
    */
 
-#ifdef UNIX
   int lval, waittime, getpid(); static int val; char ch;
 
   fflush(stdout);
@@ -152,29 +153,6 @@ char inchar() {
     val = ch;
   if ((val==0177) && (val==lval))
     kill(getpid(), (int) SIGTERM);
-#endif
-#ifdef SARG10
-  int val, waittime;
-
-  waittime = 0;
-  while(!uuo(051,2,&val)) {            /* TTCALL 2, (INCHRS)   */
-    zleep(100);                                /* Wait 0.1 seconds     */
-    if ((waittime += ttymode) > 600)   /* Time-out, in case    */
-      return('\177');                  /* of hung in ttybin(1) */
-  }
-#endif
-#ifdef SARG20  /* try to fix a time-out function */
-  int val, waittime;
-
-  waittime = 0;
-  while(jsys(SIBE,2,_PRIIN) == 0) {    /* Is input empty? */
-    zleep(100);
-    if ((waittime += ttymode) > 600)
-      return('\177');
-  }
-  ejsys(BIN,_PRIIN);
-  val = jsac[2];
-#endif
   return(val);
 }
 
@@ -194,24 +172,8 @@ char *instr() {
   i = 0;
   result[i++] = inchar();
 /* Wait 0.1 seconds (1 second in vanilla UNIX) */
-#ifdef SARG10
-  if (trmop(01031,0) < 5) zleep(500); /* wait longer if low speed */
-  else                    zleep(100);
-#else
   zleep(100);
-#endif
-#ifdef UNIX
   fflush(stdout);
-#ifdef XENIX
-  while(rdchk(0)) {
-    read(0,result+i,1);
-    if (i++ == 78) break;
-  }
-#else
-#ifdef SIII
-  while(read(2,result+i,1) == 1)
-    if (i++ == 78) break;
-#else
   while(ioctl(0,FIONREAD,&l1), l1 > 0L) {
     while(l1-- > 0L) {
       read(0,result+i,1);
@@ -219,133 +181,19 @@ char *instr() {
     }
   }
 out1:
-#endif
-#endif
-#endif
-#ifdef SARG10
-  while(uuo(051,2,&val)) {     /* TTCALL 2, (INCHRS)  */
-    if (!(val == '\012' && crflag))    /* TOPS-10 adds LF to CR */
-      result[i++] = val;
-    crflag = val == '\015';
-    if (i == 79) break;
-    zleep(50);          /* Wait 0.05 seconds */
-  }
-#endif
-#ifdef SARG20
-  while(jsys(SIBE,2,_PRIIN) != 0) {    /* read input until buffer is empty */
-    ejsys(BIN,_PRIIN);
-    result[i++] = jsac[2];
-    if (i == 79) break;
-    zleep(50);         /* Wait 0.05 seconds */
-  }
-#endif
   result[i] = '\0';
   return(result);
 }
 
 ttybin(bin) int bin; {
-#ifdef SARG10
-  #define OPEN 050
-  #define IO_MOD 0000017
-  #define _IOPIM 2
-  #define _IOASC 0
-  #define _TOPAG 01021
-  #define _TOSET 01000
-
-  int v;
-  static int arglst[] = {
-    _IOPIM,
-    `TTY`,
-    0
-  };
-  arglst[0] = bin ? _IOPIM : _IOASC;
-  v = uuo(OPEN, 1, &arglst[0]);
-  if (!v) { printf("OPEN failed"); exit(); }
-  trmop(_TOPAG + _TOSET, bin ? 0 : 1);
-  ttymode = bin;
-#endif
-#ifdef SARG20
-  /*   TTYBIN will set the line in BINARY/ASCII mode
-   *   BINARY mode is needed to send control characters
-   *   Bit 28 must be 0 (we don't flip it).
-   *   Bit 29 is used for the mode change.
-   */
-
-  #define _TTASC 0000100
-  #define _MOXOF 0000043
-
-  int v;
-
-  ejsys(RFMOD,_CTTRM);
-  v = ejsys(SFMOD,_CTTRM, bin ? (~_TTASC & jsac[2]) : (_TTASC | jsac[2]));
-  if (v) { printf("SFMOD failed"); exit(); }
-  v = ejsys(MTOPR,_CTTRM,_MOXOF,0);
-  if (v) { printf("MTOPR failed"); exit(); }
-#endif
-}
-
-#ifdef SARG20
-/*
- *     SUPERBIN turns off/on all input character interrupts
- *     This affects ^C, ^O, ^T
- *     Beware where and how you use it !!!!!!!
- */
-
-superbin(bin) int bin; {
-  int v;
-
-  v = ejsys(STIW,(0//-5), bin ? 0 : -1);
-  if (v) { printf("STIW superbinary setting failed"); exit(); }
-  ttymode = bin;
 }
 
-/*
- *     PAGE affects the ^S/^Q handshake.
- *     Set bit 34 to turn it on. Clear it for off.
- */
-
-page(bin) int bin; {
-  int v;
-
-  #define TT_PGM 0000002
-
-  ejsys(RFMOD,_CTTRM); /* Get the current terminal status */
-  v = ejsys(STPAR,_CTTRM, bin ? (TT_PGM | jsac[2]) : (~TT_PGM & jsac[2]));
-  if (v) { printf("STPAR failed"); exit(); }
-}
-#endif
 
 trmop(fc,arg) int fc, arg; {
-#ifdef SARG10
-  int retvalp;
-  int arglst[3];
-
-  /* TRMOP is a TOPS-10 monitor call that does things to the terminal. */
-
-  /* Find out TTY nbr (PA1050 barfs if TRMOP get -1 instead of udx)    */
-  /* A TRMNO monitor call returns the udx (Universal Device Index)     */
-
-  arglst[0] = fc;              /* function code        */
-  arglst[1] = calli(0115, -1); /* udx, TRMNO. UUO      */
-  arglst[2] = arg;             /* Optional argument    */
-
-  if (calli(0116, 3 // &arglst[0], &retvalp))           /* TRMOP. UUO */
-  return (retvalp);
-  else {
-    printf("?Error return in TRMOP.");
-    exit();
-  }
-#endif
 }
 
 inputline(s) char *s; {
   scanf("%s",s);
-#ifdef SARG10
-  readnl();
-#endif
-#ifdef SARG20
-  readnl();
-#endif
 }
 
 inflush() {
@@ -356,26 +204,9 @@ inflush() {
 
   int val;
 
-#ifdef UNIX
-#ifdef XENIX
-  while(rdchk(0)) read(0,&val,1);
-#else
-#ifdef SIII
-  while(read(2,&val,1));
-#else
   long l1;
   ioctl (0, FIONREAD, &l1);
   while(l1-- > 0L) read(0,&val,1);
-#endif
-#endif
-#endif
-#ifdef SARG10
-  while(uuo(051,2,&val))       /* TTCALL 2, (INCHRS)  */
-    ;
-#endif
-#ifdef SARG20
-  ejsys(CFIBF,_PRIIN);         /* Clear input buffer */
-#endif
 }
 
 zleep(t) int t; {
@@ -384,15 +215,7 @@ zleep(t) int t; {
  *    Sleep and do nothing (don't waste CPU) for t milliseconds
  */
 
-#ifdef SARG10
-  calli(072,t);                /* (HIBER) t milliseconds */
-#endif
-#ifdef SARG20
-  ejsys(DISMS,t);      /* DISMISS for t milliseconds */
-#endif
-#ifdef UNIX
   t = t / 1000;
   if (t == 0) t = 1;
   sleep(t);            /* UNIX can only sleep whole seconds */
-#endif
 }
index 7143d7c..45c4454 100644 (file)
@@ -1,33 +1,8 @@
-/* $DragonFly: src/usr.sbin/pcvt/vttest/Attic/header.h,v 1.2 2004/01/23 19:57:41 joerg Exp $ */
+/* $DragonFly: src/usr.sbin/pcvt/vttest/Attic/header.h,v 1.3 2005/02/20 17:19:11 asmodai Exp $ */
 #define VERSION "1.7b 1985-04-19"
 
-/* Choose one of these */
-
-/* #define XENIX */     /* XENIX implies UNIX                           */
-/* #define SIII */      /* SIII  implies UNIX, (NDELAY a la System III) */
-#define UNIX            /* UNIX                                         */
-/* #define VMS */       /* VMS not done yet -- send me your version!!!! */
-/* #define SARG20 */    /* Sargasso C for TOPS-20                       */
-/* #define SARG10 */    /* Sargasso C for TOPS-10                       */
-
-/* These #ifdef:s are implementation dependent stuff for the Sargasso C */
-/* Unix C barfs on directives like "#strings", so we keep them         */
-/* indented. Then unix c can't find them, but Sargasso C *can*.                */
-/* Admittedly kludgey, but it works...)                                        */
-#ifdef SARG10
-  #define _UNIXCON  /* Make UNIX-flavored I/O on TOPS */
-  #strings low      /* put strings in lowseg mem so we can modify them. */
-#endif
-#ifdef SARG20
-  #define _UNIXCON  /* Make UNIX-flavored I/O on TOPS */
-  #strings low      /* put strings in lowseg mem so we can modify them. */
-  #include <TOPS20.HDR>
-#endif
-
 #include <stdio.h>
 
-
-#ifdef UNIX
 #include <ctype.h>
 #include <sgtty.h>
 #include <signal.h>
@@ -38,8 +13,4 @@ char stdioBuf[BUFSIZ];
 int brkrd, reading;
 void   onterm(int);
 void   onbrk(int);
-#ifdef SIII
-#include <fcntl.h>
-#endif
-#endif
 int ttymode;
index 969e15a..f424229 100644 (file)
@@ -16,7 +16,7 @@ choice to the address below.
 */
 
 /* $FreeBSD: src/usr.sbin/pcvt/vttest/main.c,v 1.4.6.1 2000/12/11 01:03:35 obrien Exp $ */
-/* $DragonFly: src/usr.sbin/pcvt/vttest/Attic/main.c,v 1.3 2004/01/23 19:57:41 joerg Exp $ */
+/* $DragonFly: src/usr.sbin/pcvt/vttest/Attic/main.c,v 1.4 2005/02/20 17:19:11 asmodai Exp $ */
 
 #include "header.h"
 
@@ -92,18 +92,11 @@ main() {
       ""
     };
 
-#ifdef UNIX
   initterminal(setjmp(intrenv));
   signal(SIGINT, onbrk);
   signal(SIGTERM, onterm);
   reading = 0;
-#else
-  initterminal(0);
-#endif
   do {
-#ifdef SARG20
-    ttybin(1); /* set line to binary mode again. It's reset somehow!! */
-#endif
     ed(2);
     cup(5,10); printf("VT100 test program, version %s", VERSION);
     cup(7,10); println("Choose test type:");
@@ -821,9 +814,7 @@ TAB*    qQ   wW   eE   rR   tT   yY   uU   iI   oO   pP   [{   ]}      DEL
   ledmsg[4] = "L1";          ledseq[4] = "1";
   ledmsg[5] = "";            ledseq[5] = "";
 
-#ifdef UNIX
   fflush(stdout);
-#endif
   ed(2);
   cup(10,1);
   println("These LEDs (\"lamps\") on the keyboard should be on:");
@@ -882,11 +873,9 @@ TAB*    qQ   wW   eE   rR   tT   yY   uU   iI   oO   pP   [{   ]}      DEL
     sgr("");
   }
   cup(22,1);
-#ifdef UNIX
   sgttyNew.sg_flags &= ~CRMOD;
   sgttyNew.sg_flags &= ~ECHO;
   stty(0, &sgttyNew);
-#endif
   inflush();
   printf("Press each key, both shifted and unshifted. Finish with RETURN:");
   do { /* while (kbdc != 13) */
@@ -902,9 +891,6 @@ TAB*    qQ   wW   eE   rR   tT   yY   uU   iI   oO   pP   [{   ]}      DEL
       }
     }
   } while (kbdc != 13);
-#ifdef SARG10
-  inchar();  /* Local hack: Read LF that TOPS-10 adds to CR */
-#endif
   cup(23,1); el(0);
 
   for (ckeymode = 0; ckeymode <= 2; ckeymode++) {
@@ -984,10 +970,8 @@ TAB*    qQ   wW   eE   rR   tT   yY   uU   iI   oO   pP   [{   ]}      DEL
     }
   }
 
-#ifdef UNIX
   sgttyNew.sg_flags |= CRMOD;
   stty(0, &sgttyNew);
-#endif
   ed(2);
   cup(5,1);
   println("Finally, a check of the ANSWERBACK MESSAGE, which can be sent");
@@ -1001,10 +985,8 @@ TAB*    qQ   wW   eE   rR   tT   yY   uU   iI   oO   pP   [{   ]}      DEL
   println("the answerback message should be displayed in reverse mode.");
   println("Finish with a single RETURN.");
 
-#ifdef UNIX
   sgttyNew.sg_flags &= ~CRMOD;
   stty(0, &sgttyNew);
-#endif
   do {
     cup(17,1);
     inflush();
@@ -1022,29 +1004,17 @@ TAB*    qQ   wW   eE   rR   tT   yY   uU   iI   oO   pP   [{   ]}      DEL
     sgr("0");
   }
   cup(19,1);
-#ifdef UNIX
   sgttyNew.sg_flags |= CRMOD;
   stty(0, &sgttyNew);
-#endif
   println(
   "Push each CTRL-key TWICE. Note that you should be able to send *all*");
   println(
   "CTRL-codes twice, including CTRL-S (X-Off) and CTRL-Q (X-Off)!");
   println(
   "Finish with DEL (also called DELETE or RUB OUT), or wait 1 minute.");
-#ifdef UNIX
-#ifdef SIII
-  sgttyNew.sg_flags &= ~CBREAK;
-  stty(0, &sgttyNew);
-#endif
   sgttyNew.sg_flags |= RAW;
   stty(0, &sgttyNew);
-#endif
   ttybin(1);
-#ifdef SARG20
-  page(0);     /* Turn off all character processing at input */
-  superbin(1); /* Turn off ^C (among others). Keep your fingers crossed!! */
-#endif
   do {
     cup(23,1); kbdc = inchar();
     cup(23,1); el(0);
@@ -1060,21 +1030,10 @@ TAB*    qQ   wW   eE   rR   tT   yY   uU   iI   oO   pP   [{   ]}      DEL
       printf("%s", ckeytab[kbdc].csymbol);
     }
   } while (kbdc != '\177');
-#ifdef UNIX
   sgttyNew.sg_flags &= ~RAW;
   sgttyNew.sg_flags |= ECHO;
   stty(0, &sgttyNew);
-#ifdef SIII
-  sgttyNew.sg_flags |= CBREAK;
-  stty(0, &sgttyNew);
-#endif
-#endif
   ttybin(0);
-#ifdef SARG20
-  superbin(0); /* Puuuh! We made it!? */
-  page(1);     /* Back to normal input processing */
-  ttybin(1);   /* This must be the mode for DEC20 */
-#endif
   cup(24,1);
   okflag = 1;
   for (i = 0; i < 32; i++) if (ckeytab[i].ccount < 2) okflag = 0;
@@ -1120,10 +1079,8 @@ tst_reports() {
     { "", "" }
   };
 
-#ifdef UNIX
   sgttyNew.sg_flags &= ~ECHO;
   stty(0, &sgttyNew);
-#endif
   cup(5,1);
   println("This is a test of the ANSWERBACK MESSAGE. (To load the A.B.M.");
   println("see the TEST KEYBOARD part of this program). Below here, the");
@@ -1143,10 +1100,8 @@ tst_reports() {
   println("Test of LineFeed/NewLine mode.");
   cup(3,1);
   sm("20");
-#ifdef UNIX
   sgttyNew.sg_flags &= ~CRMOD;
   stty(0, &sgttyNew);
-#endif
   printf("NewLine mode set. Push the RETURN key: ");
   report = instr();
   cup(4,1);
@@ -1164,10 +1119,8 @@ tst_reports() {
   if (!strcmp(report, "\015")) printf(" -- OK");
   else                         printf(" -- Not expected");
   cup(9,1);
-#ifdef UNIX
   sgttyNew.sg_flags |= CRMOD;
   stty(0, &sgttyNew);
-#endif
   holdit();
 
   ed(2);
@@ -1274,10 +1227,8 @@ tst_reports() {
   }
   cup(24,1);
   holdit();
-#ifdef UNIX
   sgttyNew.sg_flags |= ECHO;
   stty(0, &sgttyNew);
-#endif
 }
 
 tst_vt52() {
@@ -1811,9 +1762,7 @@ tst_rst() {
   printf ("The terminal will now be RESET. ");
   holdit();
   ris();
-#ifdef UNIX
   fflush(stdout);
-#endif
   zleep(5000);         /* Wait 5.0 seconds */
   cup(10,1);
   println("The terminal is now RESET. Next, the built-in confidence test");
@@ -1821,9 +1770,7 @@ tst_rst() {
   holdit();
   ed(2);
   dectst(1);
-#ifdef UNIX
   fflush(stdout);
-#endif
   zleep(5000);         /* Wait 5.0 seconds */
   cup(10,1);
   println("If the built-in confidence test found any errors, a code");
@@ -1833,7 +1780,6 @@ tst_rst() {
 
 initterminal(pn) int pn; {
 
-#ifdef UNIX
   if (pn==0) {
     fflush(stdout);
     gtty(0,&sgttyOrg);
@@ -1847,28 +1793,6 @@ initterminal(pn) int pn; {
     sgttyNew.sg_flags = sgttyOrg.sg_flags | CBREAK;
     }
   stty(0,&sgttyNew);
-#ifdef SIII
-  close(2);
-  open(_PATH_TTY,O_RDWR|O_NDELAY);
-#endif
-#endif
-#ifdef SARG10
-  /* Set up neccesary TOPS-10 terminal parameters      */
-
-  trmop(02041, `VT100`);       /* tty type vt100       */
-  trmop(02002, 0);     /* tty no tape  */
-  trmop(02003, 0);     /* tty lc       */
-  trmop(02005, 1);     /* tty tab      */
-  trmop(02010, 1);     /* tty no crlf  */
-  trmop(02020, 0);     /* tty no tape  */
-  trmop(02021, 1);     /* tty page     */
-  trmop(02025, 0);     /* tty blanks   */
-  trmop(02026, 1);     /* tty no alt   */
-  trmop(02040, 1);     /* tty defer    */
-#endif
-#ifdef SARG20
-  ttybin(1);   /* set line to binary mode */
-#endif
   /* Set up my personal prejudices     */
 
   esc("<");    /* Enter ANSI mode (if in VT52 mode)    */
@@ -1904,16 +1828,10 @@ bye () {
   printf("That's all, folks!\n");
   printf("\n\n\n");
   inflush();
-#ifdef SARG20
-  ttybin(0);   /* reset line to normal mode */
-#endif
-#ifdef UNIX
   stty(0,&sgttyOrg);
-#endif
   exit(0);
 }
 
-#ifdef UNIX
 void
 onbrk(int no) {
   signal(SIGINT, onbrk);
@@ -1928,7 +1846,6 @@ onterm(int no) {
   signal(SIGTERM, onterm);
   longjmp(intrenv, 1);
 }
-#endif
 
 holdit() {
   inflush();
@@ -1937,7 +1854,6 @@ holdit() {
 }
 
 readnl() {
-#ifdef UNIX
   char ch;
   fflush(stdout);
   brkrd = 0;
@@ -1946,15 +1862,6 @@ readnl() {
   if (brkrd)
     kill(getpid(), SIGTERM);
   reading = 0;
-#endif
-#ifdef SARG10
- while (getchar() != '\n')
- ;
-#endif
-#ifdef SARG20
- while (getchar() != '\n')
-   ;
-#endif
 }
 
 scanto(str, pos, toc) char *str; int *pos; char toc; {