Initial import of the CDE 2.1.30 sources from the Open Group.

cde/programs/dtterm/tests/scroll/scroll.c

@@ -0,0 +1,83 @@
+/* $XConsortium: scroll.c /main/3 1995/10/31 11:58:41 rswiston $ */
+#include <stdio.h>
+#include <math.h>
+#include  "synvar.h"
+#include  "common.h"
+
+#ifdef LOG
+FILE *TermLog;
+#define SAVELOG  fclose(TermLog); TermLog = fopen("term.log", "a");
+#endif
+
+char LogStr[200];
+
+void TestScrolling(WinName)
+char *WinName;
+{
+
+  int i, NumLines, NumCols;
+  char Str[200];
+
+    START(1,0,0,0,0);
+    if (CheckTermStatus() == -1)
+       {printf("terminal emulator malfunctioning\n"); DONE(); return;} 
+    GetWinSize(&NumLines, &NumCols);
+#ifdef DEBUG
+sprintf(LogStr, "WINDOW Size Cols: %d Lines: %d \n", NumCols, NumLines);
+LogError(LogStr);
+#endif
+    ClearScreen();  
+    SetScrollType(DECModeSet);
+    SetScrollType(DECModeSave);
+    for (i=0; i < (20*NumLines); i++) {
+      sprintf(Str, "%s%d", "It's in smooth Scroll Mode. is it right", i);
+      WRITETEST(Str);
+      NextLine();
+    }
+    ClearScreen();
+sleep(2);
+    SetScrollType(DECModeReset);
+    for (i=0; i < (20*NumLines); i++) {
+      sprintf(Str, "%s%d", "It's in Jump Scroll Mode. is it right", i);
+      WRITETEST(Str);
+      NextLine();
+    }
+    SetScrollType(DECModeRestore);
+    ClearScreen();
+sleep(2);
+    for (i=0; i < (20*NumLines); i++) {
+      sprintf(Str, "%s%d", "It's in smooth Scroll Mode. is it right", i);
+      WRITETEST(Str);
+      NextLine();
+    }
+    DONE();
+}
+
+main(argc, argv)
+int argc;
+char *argv[];
+{
+     
+#ifdef LOG
+if ((TermLog = fopen("term.log", "a")) == NULL) {
+   if ((TermLog = fopen("term.log", "w")) == NULL)
+      {printf("Logfile could not be opened \n"); exit(-1);}
+}
+fprintf(TermLog, "**************************************************\n");
+LogTime();
+fprintf(TermLog, "TestName: <%s> STARTS\n", argv[0]);
+#endif 
+#ifdef SYNLIB
+     InitTest(argc, argv);
+     AssignWinName("TermWin", TERM_EMU);
+#endif
+     TestScrolling("TermWin");
+#ifdef SYNLIB
+     CloseTest(False);
+#endif
+#ifdef LOG
+fprintf(TermLog, "TestName: <%s> ENDS\n", argv[0]);
+fclose(TermLog);
+#endif
+}
+