]> ncurses.scripts.mit.edu Git - ncurses.git/blobdiff - test/hanoi.c
ncurses 6.2 - patch 20200321
[ncurses.git] / test / hanoi.c
index 02eade7c330649aa119195ca05b07bc67b9e649e..8f1792d9d88b0279c926e35d25186eb8c8c30d65 100644 (file)
@@ -1,5 +1,6 @@
 /****************************************************************************
- * Copyright (c) 1998-2010,2012 Free Software Foundation, Inc.              *
+ * Copyright 2019,2020 Thomas E. Dickey                                     *
+ * Copyright 1998-2014,2017 Free Software Foundation, Inc.                  *
  *                                                                          *
  * Permission is hereby granted, free of charge, to any person obtaining a  *
  * copy of this software and associated documentation files (the            *
  *
  *     Date: 05.Nov.90
  *
- * $Id: hanoi.c,v 1.32 2012/06/09 20:30:32 tom Exp $
+ * $Id: hanoi.c,v 1.41 2020/02/02 23:34:34 tom Exp $
  */
 
 #include <test.priv.h>
+#include <math.h>
 
 #define NPEGS                  3       /* This is not configurable !! */
 #define MINTILES               3
@@ -84,110 +86,10 @@ static short TileColour[] =
     COLOR_MAGENTA,             /* Length 17 */
     COLOR_RED,                 /* Length 19 */
 };
+static int NTiles = 0;
 static int NMoves = 0;
 static bool AutoFlag = FALSE;
 
-static void InitTiles(int NTiles);
-static void DisplayTiles(void);
-static void MakeMove(int From, int To);
-static void AutoMove(int From, int To, int Num);
-static void Usage(void);
-static int Solved(int NumTiles);
-static int GetMove(int *From, int *To);
-static int InvalidMove(int From, int To);
-
-int
-main(int argc, char **argv)
-{
-    int NTiles, FromCol, ToCol;
-
-    setlocale(LC_ALL, "");
-
-    switch (argc) {
-    case 1:
-       NTiles = DEFAULTTILES;
-       break;
-    case 2:
-       NTiles = atoi(argv[1]);
-       if (NTiles > MAXTILES || NTiles < MINTILES) {
-           fprintf(stderr, "Range %d to %d\n", MINTILES, MAXTILES);
-           ExitProgram(EXIT_FAILURE);
-       }
-       break;
-    case 3:
-       if (strcmp(argv[2], "a")) {
-           Usage();
-           ExitProgram(EXIT_FAILURE);
-       }
-       NTiles = atoi(argv[1]);
-       if (NTiles > MAXTILES || NTiles < MINTILES) {
-           fprintf(stderr, "Range %d to %d\n", MINTILES, MAXTILES);
-           ExitProgram(EXIT_FAILURE);
-       }
-       AutoFlag = TRUE;
-       break;
-    default:
-       Usage();
-       ExitProgram(EXIT_FAILURE);
-    }
-#ifdef TRACE
-    trace(TRACE_MAXIMUM);
-#endif
-    initscr();
-    if (has_colors()) {
-       int i;
-       short bg = COLOR_BLACK;
-       start_color();
-#if HAVE_USE_DEFAULT_COLORS
-       if (use_default_colors() == OK)
-           bg = -1;
-#endif
-       for (i = 0; i < 9; i++)
-           init_pair((short) (i + 1), bg, TileColour[i]);
-    }
-    cbreak();
-    if (LINES < 24) {
-       endwin();
-       fprintf(stderr, "Min screen length 24 lines\n");
-       ExitProgram(EXIT_FAILURE);
-    }
-    if (AutoFlag) {
-       curs_set(0);
-       leaveok(stdscr, TRUE);  /* Attempt to remove cursor */
-    }
-    InitTiles(NTiles);
-    DisplayTiles();
-    if (AutoFlag) {
-       do {
-           noecho();
-           AutoMove(0, 2, NTiles);
-       } while (!Solved(NTiles));
-       sleep(2);
-    } else {
-       echo();
-       for (;;) {
-           if (GetMove(&FromCol, &ToCol))
-               break;
-           if (InvalidMove(FromCol, ToCol)) {
-               MvAddStr(STATUSLINE, 0, "Invalid Move !!");
-               refresh();
-               beep();
-               continue;
-           }
-           MakeMove(FromCol, ToCol);
-           if (Solved(NTiles)) {
-               MvPrintw(STATUSLINE, 0,
-                        "Well Done !! You did it in %d moves", NMoves);
-               refresh();
-               sleep(5);
-               break;
-           }
-       }
-    }
-    endwin();
-    ExitProgram(EXIT_SUCCESS);
-}
-
 static int
 InvalidMove(int From, int To)
 {
@@ -211,7 +113,7 @@ InvalidMove(int From, int To)
 }
 
 static void
-InitTiles(int NTiles)
+InitTiles(void)
 {
     int Size, SlotNo;
 
@@ -232,7 +134,7 @@ DisplayTiles(void)
     erase();
     MvAddStr(1, 24, "T O W E R S   O F   H A N O I");
     MvAddStr(3, 34, "SJR 1990");
-    MvPrintw(19, 5, "Moves : %d", NMoves);
+    MvPrintw(19, 5, "Moves : %d of %.0f", NMoves, pow(2.0, (float) NTiles) - 1);
     (void) attrset(A_REVERSE);
     MvAddStr(BASELINE, 8,
             "                                                               ");
@@ -255,7 +157,7 @@ DisplayTiles(void)
                memset(TileBuf, ' ', len);
                TileBuf[len] = '\0';
                if (has_colors())
-                   (void) attrset((attr_t) COLOR_PAIR(LENTOIND(len)));
+                   (void) attrset(AttrArg(COLOR_PAIR(LENTOIND(len)), 0));
                else
                    (void) attrset(A_REVERSE);
                MvAddStr(BASELINE - (SlotNo + 1),
@@ -310,12 +212,12 @@ AutoMove(int From, int To, int Num)
     if (Num == 1) {
        MakeMove(From, To);
        napms(500);
-       return;
+    } else {
+       AutoMove(From, OTHER(From, To), Num - 1);
+       MakeMove(From, To);
+       napms(500);
+       AutoMove(OTHER(From, To), To, Num - 1);
     }
-    AutoMove(From, OTHER(From, To), Num - 1);
-    MakeMove(From, To);
-    napms(500);
-    AutoMove(OTHER(From, To), To, Num - 1);
 }
 
 static int
@@ -330,9 +232,129 @@ Solved(int NumTiles)
 }
 
 static void
-Usage(void)
+usage(void)
+{
+    static const char *msg[] =
+    {
+       "Usage: hanoi [options] [[<No Of Tiles>] [a]]"
+       ,""
+       ,"Options:"
+#if HAVE_USE_DEFAULT_COLORS
+       ," -d       invoke use_default_colors"
+#endif
+       ," -n NUM   set number of tiles (positional param is deprecated)"
+       ," -X       solve automatically (positional \"a\" is deprecated)"
+    };
+    size_t n;
+
+    for (n = 0; n < SIZEOF(msg); n++)
+       fprintf(stderr, "%s\n", msg[n]);
+
+    ExitProgram(EXIT_FAILURE);
+}
+
+int
+main(int argc, char **argv)
 {
-    fprintf(stderr, "Usage: hanoi [<No Of Tiles>] [a]\n");
-    fprintf(stderr,
-           "The 'a' option causes the tower to be solved automatically\n");
+    int ch, FromCol, ToCol;
+
+#if HAVE_USE_DEFAULT_COLORS
+    bool d_option = FALSE;
+#endif
+
+    NTiles = DEFAULTTILES;
+    while ((ch = getopt(argc, argv, "dn:X")) != -1) {
+       switch (ch) {
+#if HAVE_USE_DEFAULT_COLORS
+       case 'd':
+           d_option = TRUE;
+           break;
+#endif
+       case 'n':
+           NTiles = atoi(optarg);
+           break;
+       case 'X':
+           AutoFlag = TRUE;
+           break;
+       default:
+           usage();
+           /* NOTREACHED */
+       }
+    }
+    setlocale(LC_ALL, "");
+
+    switch (ch = (argc - optind)) {
+    case 2:
+       if (strcmp(argv[optind + 1], "a")) {
+           usage();
+       }
+       AutoFlag = TRUE;
+       /* FALLTHRU */
+    case 1:
+       NTiles = atoi(argv[optind]);
+       /* FALLTHRU */
+    case 0:
+       break;
+    default:
+       usage();
+    }
+
+    if (NTiles > MAXTILES || NTiles < MINTILES) {
+       fprintf(stderr, "Range %d to %d\n", MINTILES, MAXTILES);
+       usage();
+    }
+
+    initscr();
+    if (has_colors()) {
+       int i;
+       short bg = COLOR_BLACK;
+       start_color();
+#if HAVE_USE_DEFAULT_COLORS
+       if (d_option && (use_default_colors() == OK))
+           bg = -1;
+#endif
+       for (i = 0; i < 9; i++)
+           init_pair((short) (i + 1), bg, TileColour[i]);
+    }
+    cbreak();
+    if (LINES < 24) {
+       endwin();
+       fprintf(stderr, "Min screen length 24 lines\n");
+       ExitProgram(EXIT_FAILURE);
+    }
+    if (AutoFlag) {
+       curs_set(0);
+       leaveok(stdscr, TRUE);  /* Attempt to remove cursor */
+    }
+    InitTiles();
+    DisplayTiles();
+    if (AutoFlag) {
+       do {
+           noecho();
+           AutoMove(0, 2, NTiles);
+       } while (!Solved(NTiles));
+       sleep(2);
+    } else {
+       echo();
+       for (;;) {
+           if (GetMove(&FromCol, &ToCol))
+               break;
+           if (InvalidMove(FromCol, ToCol)) {
+               MvAddStr(STATUSLINE, 0, "Invalid Move !!");
+               refresh();
+               beep();
+               continue;
+           }
+           MakeMove(FromCol, ToCol);
+           if (Solved(NTiles)) {
+               MvPrintw(STATUSLINE, 0,
+                        "Well Done !! You did it in %d moves", NMoves);
+               refresh();
+               sleep(5);
+               break;
+           }
+       }
+    }
+    stop_curses();
+    ExitProgram(EXIT_SUCCESS);
 }