aboutsummaryrefslogtreecommitdiff
path: root/payloads/libpayload/curses/PDCurses-3.4/demos/ptest.c
diff options
context:
space:
mode:
Diffstat (limited to 'payloads/libpayload/curses/PDCurses-3.4/demos/ptest.c')
-rw-r--r--payloads/libpayload/curses/PDCurses-3.4/demos/ptest.c285
1 files changed, 285 insertions, 0 deletions
diff --git a/payloads/libpayload/curses/PDCurses-3.4/demos/ptest.c b/payloads/libpayload/curses/PDCurses-3.4/demos/ptest.c
new file mode 100644
index 0000000000..1134f6ffca
--- /dev/null
+++ b/payloads/libpayload/curses/PDCurses-3.4/demos/ptest.c
@@ -0,0 +1,285 @@
+/* $Id: ptest.c,v 1.24 2008/07/13 16:08:17 wmcbrine Exp $ */
+
+#include <curses.h>
+#include <panel.h>
+#include <stdlib.h>
+
+PANEL *p1, *p2, *p3, *p4, *p5;
+WINDOW *w4, *w5;
+
+long nap_msec = 1;
+
+char *mod[] =
+{
+ "test ", "TEST ", "(**) ", "*()* ", "<--> ", "LAST "
+};
+
+void pflush(void)
+{
+ update_panels();
+ doupdate();
+}
+
+void backfill(void)
+{
+ int y, x;
+
+ erase();
+
+ for (y = 0; y < LINES - 1; y++)
+ for (x = 0; x < COLS; x++)
+ printw("%d", (y + x) % 10);
+}
+
+void wait_a_while(long msec)
+{
+ int c;
+
+ if (msec != 1)
+ timeout(msec);
+
+ c = getch();
+
+ if (c == 'q')
+ {
+ endwin();
+ exit(1);
+ }
+}
+
+void saywhat(const char *text)
+{
+ mvprintw(LINES - 1, 0, "%-20.20s", text);
+}
+
+/* mkpanel - alloc a win and panel and associate them */
+
+PANEL *mkpanel(int rows, int cols, int tly, int tlx)
+{
+ WINDOW *win = newwin(rows, cols, tly, tlx);
+ PANEL *pan = (PANEL *)0;
+
+ if (win)
+ {
+ pan = new_panel(win);
+
+ if (!pan)
+ delwin(win);
+ }
+
+ return pan;
+}
+
+void rmpanel(PANEL *pan)
+{
+ WINDOW *win = pan->win;
+
+ del_panel(pan);
+ delwin(win);
+}
+
+void fill_panel(PANEL *pan)
+{
+ WINDOW *win = pan->win;
+ char num = *((char *)pan->user + 1);
+ int y, x, maxy, maxx;
+
+ box(win, 0, 0);
+ mvwprintw(win, 1, 1, "-pan%c-", num);
+ getmaxyx(win, maxy, maxx);
+
+ for (y = 2; y < maxy - 1; y++)
+ for (x = 1; x < maxx - 1; x++)
+ mvwaddch(win, y, x, num);
+}
+
+int main(int argc, char **argv)
+{
+ int itmp, y;
+
+ if (argc > 1 && atol(argv[1]))
+ nap_msec = atol(argv[1]);
+
+#ifdef XCURSES
+ Xinitscr(argc, argv);
+#else
+ initscr();
+#endif
+ backfill();
+
+ for (y = 0; y < 5; y++)
+ {
+ p1 = mkpanel(10, 10, 0, 0);
+ set_panel_userptr(p1, "p1");
+
+ p2 = mkpanel(14, 14, 5, 5);
+ set_panel_userptr(p2, "p2");
+
+ p3 = mkpanel(6, 8, 12, 12);
+ set_panel_userptr(p3, "p3");
+
+ p4 = mkpanel(10, 10, 10, 30);
+ w4 = panel_window(p4);
+ set_panel_userptr(p4, "p4");
+
+ p5 = mkpanel(10, 10, 13, 37);
+ w5 = panel_window(p5);
+ set_panel_userptr(p5, "p5");
+
+ fill_panel(p1);
+ fill_panel(p2);
+ fill_panel(p3);
+ fill_panel(p4);
+ fill_panel(p5);
+ hide_panel(p4);
+ hide_panel(p5);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("h3 s1 s2 s4 s5;");
+ move_panel(p1, 0, 0);
+ hide_panel(p3);
+ show_panel(p1);
+ show_panel(p2);
+ show_panel(p4);
+ show_panel(p5);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("s1;");
+ show_panel(p1);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("s2;");
+ show_panel(p2);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("m2;");
+ move_panel(p2, 10, 10);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("s3;");
+ show_panel(p3);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("m3;");
+ move_panel(p3, 5, 5);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("b3;");
+ bottom_panel(p3);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("s4;");
+ show_panel(p4);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("s5;");
+ show_panel(p5);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("t3;");
+ top_panel(p3);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("t1;");
+ top_panel(p1);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("t2;");
+ top_panel(p2);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("t3;");
+ top_panel(p3);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("t4;");
+ top_panel(p4);
+ pflush();
+ wait_a_while(nap_msec);
+
+ for (itmp = 0; itmp < 6; itmp++)
+ {
+ saywhat("m4;");
+ mvwaddstr(w4, 3, 1, mod[itmp]);
+ move_panel(p4, 4, itmp * 10);
+ mvwaddstr(w5, 4, 1, mod[itmp]);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("m5;");
+ mvwaddstr(w4, 4, 1, mod[itmp]);
+ move_panel(p5, 7, itmp * 10 + 6);
+ mvwaddstr(w5, 3, 1, mod[itmp]);
+ pflush();
+ wait_a_while(nap_msec);
+ }
+
+ saywhat("m4;");
+ move_panel(p4, 4, itmp * 10);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("t5;");
+ top_panel(p5);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("t2;");
+ top_panel(p2);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("t1;");
+ top_panel(p1);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("d2;");
+ rmpanel(p2);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("h3;");
+ hide_panel(p3);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("d1;");
+ rmpanel(p1);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("d4; ");
+ rmpanel(p4);
+ pflush();
+ wait_a_while(nap_msec);
+
+ saywhat("d5; ");
+ rmpanel(p5);
+ pflush();
+ wait_a_while(nap_msec);
+
+ if (nap_msec == 1)
+ break;
+
+ nap_msec = 100L;
+ }
+
+ endwin();
+
+ return 0;
+} /* end of main */