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

cde/programs/dtterm/tests/decmode/decmode.c

@@ -0,0 +1,206 @@
+/* $XConsortium: decmode.c /main/3 1995/10/31 11:56:41 rswiston $ */
+#include <stdio.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 FillScrLnNumbers(Lines, Cols)
+int Lines, Cols;
+{
+  int i, j;
+  char Str[10];
+    HomeUp(); ClearScreen();
+    for (i=0; i < Lines; i++)  {
+      sprintf(Str, "%x", (i % 15) +1);
+      for (j=0; j < Cols; j++) WRITETEST(Str); 
+    }
+}
+
+void TestScrollRegn(Lines, Cols, ScrollTop, ScrollBottom, WinName, ImageFile)
+int Lines, Cols, ScrollTop, ScrollBottom;
+char *WinName, *ImageFile;
+{
+  char Str[IMAGE_FILE_LEN];
+    ClearScreen();
+    SetScrollRegn(ScrollTop, ScrollBottom);
+    SetOriginMode(DECModeSet); /* To Origin Mode */
+    FillScrLnNumbers(Lines, Cols);
+    FLUSHTEST(); 
+    HomeUp();
+#ifdef SYNLIB
+    sprintf(Str, "%sA", ImageFile);
+    MatchWindows(WinName, Str); 
+#endif
+    SetOriginMode(DECModeSave);  /* Save the mode set (Origin Mode) */
+    SetOriginMode(DECModeReset); /* Set the mode to cursor mode */
+    ClearScreen();
+    FillScrLnNumbers(Lines, Cols);
+    FLUSHTEST(); 
+    HomeUp();
+#ifdef SYNLIB
+    sprintf(Str, "%sB", ImageFile);
+    MatchWindows(WinName, Str); 
+#endif
+    ClearScreen();
+    SetOriginMode(DECModeRestore);  /* Restore the saved mode (Origin Mode)*/
+    FillScrLnNumbers(Lines, Cols);
+    FLUSHTEST(); 
+    HomeUp();
+#ifdef SYNLIB
+    sprintf(Str, "%sC", ImageFile);
+    MatchWindows(WinName, Str); 
+#endif
+}
+
+
+void TestReverseWrap(Lines, Cols, WinName, ImageFile)
+int Lines, Cols;
+char *WinName, *ImageFile;
+{
+  char Str[IMAGE_FILE_LEN];
+    SetScrollRegn(1, Lines);
+    SetOriginMode(DECModeReset);
+    SetWrapMode(DECModeSet);
+    SetWrapMode(DECModeSave);
+    FillScrLnNumbers(Lines, Cols);
+    FLUSHTEST(); 
+    HomeUp();
+    SetReverseWrap(DECModeSet);
+    SetReverseWrap(DECModeSave);
+    CursorBack((Lines*Cols) / 2);
+    InsertBlanks(Cols);
+#ifdef SYNLIB
+    sprintf(Str, "%sA", ImageFile);
+    MatchWindows(WinName, Str); 
+#endif
+    SetReverseWrap(DECModeReset);
+    SetWrapMode(DECModeReset);
+    CursorForward(Cols*Lines);
+    CursorBack((Lines*Cols));
+sleep(10);
+#ifdef SYNLIB
+    sprintf(Str, "%sB", ImageFile);
+    MatchWindows(WinName, Str); 
+#endif
+    SetWrapMode(DECModeRestore);
+    FillScrLnNumbers(Lines, Cols);
+    FLUSHTEST(); 
+    HomeUp();
+    SetReverseWrap(DECModeRestore);
+    BackSpace(((Lines*Cols) / 2) + 1);
+    InsertBlanks(Cols);
+#ifdef SYNLIB
+    sprintf(Str, "%sC", ImageFile);
+    MatchWindows(WinName, Str); 
+#endif
+}
+
+void TestReverseVideo(Lines, Cols, WinName, ImageFile)
+int Lines, Cols;
+char *WinName, *ImageFile;
+{
+  char Str[IMAGE_FILE_LEN];
+    SetOriginMode(DECModeReset);
+    SetWrapMode(DECModeSet);
+    FillScrLnNumbers(Lines, Cols);
+    SetVideoType(DECModeSet);
+    SetVideoType(DECModeSave);
+#ifdef SYNLIB
+    sprintf(Str, "%sA", ImageFile);
+    MatchWindows(WinName, Str); 
+#endif
+    SetVideoType(DECModeReset);
+    FillScrLnNumbers(Lines, Cols);
+#ifdef SYNLIB
+    sprintf(Str, "%sB", ImageFile);
+    MatchWindows(WinName, Str); 
+#endif
+    SetVideoType(DECModeRestore);
+    FillScrLnNumbers(Lines, Cols);
+#ifdef SYNLIB
+    sprintf(Str, "%sC", ImageFile);
+    MatchWindows(WinName, Str); 
+#endif
+    SetVideoType(DECModeReset);
+}
+
+void WriteTwiceCols(Cols)
+int Cols;
+{
+  int i;
+    for (i=0; i < (2*Cols); i++) 
+      if (i <= Cols) WRITETEST("a");
+      else WRITETEST("b");
+}
+
+void TestDECMode(WinName)
+char *WinName;
+{
+  int Lines, Cols, GotX, GotY;
+  char Str1[IMAGE_FILE_LEN], Str2[IMAGE_FILE_LEN];
+
+    START(1, 0, 0, 0,0);
+    if (CheckTermStatus() == -1)
+       {printf("terminal emulator malfunctioning\n"); exit(-1);}
+    ClearScreen(); 
+    GetWinSize(&Lines, &Cols); 
+#ifdef DEBUG
+fprintf(TermLog, "WINDOW Size Cols: %d Lines: %d \n", Cols, Lines);
+SAVELOG;
+#endif
+    sprintf(Str1, "%sdecmode1", IMAGE_DIR);
+    TestScrollRegn(Lines, Cols, 5, 15, WinName, Str1);
+    sprintf(Str1, "%sdecmode2", IMAGE_DIR);
+    TestScrollRegn(Lines, Cols, 3, 23, WinName, Str1);
+    SetWrapMode(DECModeReset);
+    ClearScreen();
+    WriteTwiceCols(Cols);
+    GetCursorPosn(&GotX, &GotY);
+    if (GotX != Cols) LogError("WrapMode Off failed");
+    else LogError("WrapMode Off Success");
+    NextLine();
+    WriteTwiceCols(Cols);
+    GetCursorPosn(&GotX, &GotY);
+    if (GotX != Cols) LogError("WrapMode Off failed");
+    else LogError("WrapMode Off Success");
+    sprintf(Str1, "%sdecmode3", IMAGE_DIR);
+    TestReverseWrap(Lines, Cols, WinName, Str1);
+    sprintf(Str1, "%sdecmode4", IMAGE_DIR);
+    TestReverseVideo(Lines, Cols, WinName, Str1);
+    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
+     TestDECMode("TermWin");
+#ifdef SYNLIB
+     CloseTest(False);
+#endif
+#ifdef LOG
+fprintf(TermLog, "TestName: <%s> ENDS\n", argv[0]);
+fclose(TermLog);
+#endif
+}
+