X-Git-Url: https://git.stderr.nl/gitweb?a=blobdiff_plain;ds=sidebyside;f=src%2Fsplittest.c;fp=src%2Fsplittest.c;h=0000000000000000000000000000000000000000;hb=0b85f1dd5993e2ed111ec2ba13bbbb4ebda06ada;hp=7448437e15e40a124ca87ecbead7c29c2c412b3d;hpb=08f8444e2ae5480eea1cf7e2c1e2eb57f46152db;p=rodin%2Fchimara.git diff --git a/src/splittest.c b/src/splittest.c deleted file mode 100644 index 7448437..0000000 --- a/src/splittest.c +++ /dev/null @@ -1,331 +0,0 @@ -#include -#include -#include "glk.h" - -#define SPACE_FACTOR 1.8 - -void center_text(winid_t win, char *text) -{ - glui32 width, height; - glk_window_get_size(win, &width, &height); - - glk_set_window(win); - glk_window_clear(win); - - if(glk_window_get_type(win) == wintype_TextGrid) { - glk_window_move_cursor(win, width / 2 - strlen(text) / 2, height / 2); - glk_put_string(text); - } else if(glk_window_get_type(win) == wintype_TextBuffer) { - int count; - for(count = 0; count < height / 2; count++) - glk_put_char('\n'); - for(count = 0; - count < (int)(SPACE_FACTOR * (width / 2 - strlen(text) / 2)); - count++) - glk_put_char(' '); - glk_put_string(text); - } -} - -void print_two_rows(winid_t win) -{ - glui32 width, height; - glk_window_get_size(win, &width, &height); - - glk_set_window(win); - glk_window_clear(win); - - glui32 x = width / 2 - 3; - glui32 y = (height - 1) / 2; - if(x < 0) - x = 0; - if(y < 0) - y = 0; - - glk_window_move_cursor(win, x, y); - glk_put_string("C: 2"); - glk_window_move_cursor(win, x + 3, y + 1); - glk_put_string("rows"); -} - -void wait_for_key(winid_t win) -{ - event_t ev; - glk_request_char_event(win); - do - glk_select(&ev); - while(ev.type != evtype_CharInput); -} - -void glk_main(void) -{ - winid_t win_a = NULL, win_b = NULL, win_c = NULL, win_d = NULL; - - fprintf(stderr, "TEST CASES FROM GLK SPEC\n\n" - "(Press a key in window A to continue each time)\n\n" - "Say you do two splits, each a 50-50 percentage split. You start\n" - "with the original window A, and split that into A and B; then\n" - "you split B into B and C.\n\n"); - - win_a = glk_window_open(0, 0, 0, wintype_TextBuffer, 0); - win_b = glk_window_open(win_a, winmethod_Proportional | winmethod_Below, - 50, wintype_TextBuffer, 0); - win_c = glk_window_open(win_b, winmethod_Proportional | winmethod_Below, - 50, wintype_TextBuffer, 0); - if(!win_a || !win_b || !win_c) - return; - center_text(win_a, "A"); - center_text(win_b, "B"); - center_text(win_c, "C"); - - wait_for_key(win_a); - glk_window_close(glk_window_get_root(), NULL); - - fprintf(stderr, "Or, you could split A into A and B, and then split A\n" - "again into A and C.\n\n"); - - win_a = glk_window_open(0, 0, 0, wintype_TextBuffer, 0); - win_b = glk_window_open(win_a, winmethod_Proportional | winmethod_Below, - 50, wintype_TextBuffer, 0); - win_c = glk_window_open(win_a, winmethod_Proportional | winmethod_Below, - 50, wintype_TextBuffer, 0); - if(!win_a || !win_b || !win_c) - return; - center_text(win_a, "A"); - center_text(win_b, "B"); - center_text(win_c, "C"); - - wait_for_key(win_a); - glk_window_close(glk_window_get_root(), NULL); - - fprintf(stderr, "Here are more ways to perform the first example; all of\n" - "them have the same tree structure, but look different on the\n" - "screen. Here, we turn the second split (B into B/C) upside down;\n" - "we put the new window (C) above the old window (B).\n\n"); - - win_a = glk_window_open(0, 0, 0, wintype_TextBuffer, 0); - win_b = glk_window_open(win_a, winmethod_Proportional | winmethod_Below, - 50, wintype_TextBuffer, 0); - win_c = glk_window_open(win_b, winmethod_Proportional | winmethod_Above, - 50, wintype_TextBuffer, 0); - if(!win_a || !win_b || !win_c) - return; - center_text(win_a, "A"); - center_text(win_b, "B"); - center_text(win_c, "C"); - - wait_for_key(win_a); - glk_window_close(glk_window_get_root(), NULL); - - fprintf(stderr, "Here, we mess with the percentages. The first split (A\n" - "into A/B) is a 25-75 split, which makes B three times the size\n" - "of A. The second (B into B/C) is a 33-66 split, which makes C\n" - "twice the size of B. This looks rather like the second example,\n" - "but has a different internal structure.\n\n"); - - win_a = glk_window_open(0, 0, 0, wintype_TextBuffer, 0); - win_b = glk_window_open(win_a, winmethod_Proportional | winmethod_Below, - 75, wintype_TextBuffer, 0); - win_c = glk_window_open(win_b, winmethod_Proportional | winmethod_Below, - 67, wintype_TextBuffer, 0); - if(!win_a || !win_b || !win_c) - return; - center_text(win_a, "A"); - center_text(win_b, "B"); - center_text(win_c, "C"); - - wait_for_key(win_a); - glk_window_close(glk_window_get_root(), NULL); - - fprintf(stderr, "Here, the second split (B into B/C) is vertical instead\n" - "of horizontal, with the new window (C) on the left of the old\n" - "one.\n\n"); - - win_a = glk_window_open(0, 0, 0, wintype_TextBuffer, 0); - win_b = glk_window_open(win_a, winmethod_Proportional | winmethod_Below, - 50, wintype_TextBuffer, 0); - win_c = glk_window_open(win_b, winmethod_Proportional | winmethod_Left, - 50, wintype_TextBuffer, 0); - if(!win_a || !win_b || !win_c) - return; - center_text(win_a, "A"); - center_text(win_b, "B"); - center_text(win_c, "C"); - - wait_for_key(win_a); - glk_window_close(glk_window_get_root(), NULL); - - fprintf(stderr, "In the following two-split process, you can see that\n" - "when a window is split, it is replaced by a new pair window, and\n" - "moves down to become one of its two children.\n\n"); - - if(!(win_a = glk_window_open(0, 0, 0, wintype_TextBuffer, 0))) - return; - center_text(win_a, "A"); - wait_for_key(win_a); - - if(!(win_b = glk_window_open(win_a, - winmethod_Proportional | winmethod_Below, - 50, wintype_TextBuffer, 0))) - return; - center_text(win_a, "A"); - center_text(win_b, "B"); - wait_for_key(win_a); - - if(!(win_c = glk_window_open(win_b, winmethod_Proportional | winmethod_Left, - 50, wintype_TextBuffer, 0))) - return; - center_text(win_a, "A"); - center_text(win_b, "B"); - center_text(win_c, "C"); - wait_for_key(win_a); - - glk_window_close(glk_window_get_root(), NULL); - - fprintf(stderr, "What happens when there is a conflict? The rules are\n" - "simple. Size control always flows down the tree, and the player\n" - "is at the top. Let's bring out an example: first we split A into\n" - "A and B, with a 50%% proportional split. Then we split A into A\n" - "and C, with C above, being a text grid window, and C gets a\n" - "fixed size of two rows (as measured in its own font size). A\n" - "gets whatever remains of the 50%% it had before.\n\n"); - - win_a = glk_window_open(0, 0, 0, wintype_TextBuffer, 0); - win_b = glk_window_open(win_a, winmethod_Proportional | winmethod_Below, - 50, wintype_TextBuffer, 0); - win_c = glk_window_open(win_a, winmethod_Fixed | winmethod_Above, - 2, wintype_TextGrid, 0); - if(!win_a || !win_b || !win_c) - return; - center_text(win_a, "A"); - center_text(win_b, "B: 50%"); - print_two_rows(win_c); - wait_for_key(win_a); - - fprintf(stderr, "(Stage 1) Now the player stretches the window\n" - "vertically.\n\n"); - - wait_for_key(win_a); - - fprintf(stderr, "(Stage 2) Then the user maliciously starts squeezing the\n" - "window down, in stages.\n\n"); - - center_text(win_a, "A"); - center_text(win_b, "B: 50%"); - print_two_rows(win_c); - wait_for_key(win_a); - - fprintf(stderr, "(Stage 3) The logic remains the same. At stage 3,\n" - "there's no room left for A, so it winds up with zero height.\n" - "Nothing displayed in A will be visible.\n\n"); - - center_text(win_a, "A"); - center_text(win_b, "B"); - center_text(win_c, "C"); - wait_for_key(win_a); - - fprintf(stderr, "(Stage 4) At stage 4, there isn't even room in the upper\n" - "50%% to give C its two rows; so it only gets one.\n\n"); - - center_text(win_a, "A"); - center_text(win_b, "B"); - center_text(win_c, "C"); - wait_for_key(win_a); - - fprintf(stderr, "(Stage 5) Finally, C is squashed out of existence as\n" - "well.\n\n"); - - center_text(win_a, "A"); - center_text(win_b, "B"); - wait_for_key(win_a); - - glk_window_close(glk_window_get_root(), NULL); - - fprintf(stderr, "What happens when you split a fixed-size window? The\n" - "resulting pair window retains the same size constraint as the\n" - "original window that was split. The key window for the original\n" - "split is still the key window for that split, even though it's\n" - "now a grandchild instead of a child.\n\n"); - - if(!(win_a = glk_window_open(0, 0, 0, wintype_TextBuffer, 0))) - return; - center_text(win_a, "A"); - wait_for_key(win_a); - - fprintf(stderr, "After the first split, the new pair window (O1, which\n" - "covers the whole screen) knows that its first child (A) is above\n" - "the second, and gets 50%% of its own area. (A is the key window\n" - "for this split, but a proportional split doesn't care about key\n" - "windows.)\n\n"); - - if(!(win_b = glk_window_open(win_a, - winmethod_Proportional | winmethod_Below, - 50, wintype_TextBuffer, 0))) - return; - center_text(win_a, "A: 50%"); - center_text(win_b, "B"); - wait_for_key(win_a); - - fprintf(stderr, "After the second split, all this remains true; O1 knows\n" - "that its first child gets 50%% of its space, and A is O1's key\n" - "window. But now O1's first child is O2 instead of A. The newer\n" - "pair window (O2) knows that its first child (C) is above the\n" - "second, and gets a fixed size of two rows. (As measured in C's\n" - "font, because C is O2's key window.)\n\n"); - - if(!(win_c = glk_window_open(win_a, winmethod_Fixed | winmethod_Above, 2, - wintype_TextGrid, 0))) - return; - center_text(win_a, "A"); - center_text(win_b, "B"); - print_two_rows(win_c); - wait_for_key(win_a); - - fprintf(stderr, "If we split C, now, the resulting pair will still be two\n" - "C-font rows high -- that is, tall enough for two lines of\n" - "whatever font C displays. For the sake of example, we'll do this\n" - "vertically.\n\n"); - - if(!(win_d = glk_window_open(win_c, - winmethod_Proportional | winmethod_Right, - 50, wintype_TextBuffer, 0))) - return; - center_text(win_a, "A"); - center_text(win_b, "B"); - center_text(win_c, "C"); - center_text(win_d, "D"); - wait_for_key(win_a); - - fprintf(stderr, "When you close a window (and it is not the root window),\n" - "the other window in its pair takes over all the freed-up area.\n" - "Let's close D, in the current example:\n\n"); - - glk_window_close(win_d, NULL); - center_text(win_a, "A"); - center_text(win_b, "B"); - center_text(win_c, "C"); - wait_for_key(win_a); - - fprintf(stderr, "But what if we had closed C instead of D? We would have\n" - "gotten this:\n\n"); - - glk_window_close(glk_window_get_root(), NULL); - win_a = glk_window_open(0, 0, 0, wintype_TextBuffer, 0); - win_b = glk_window_open(win_a, winmethod_Proportional | winmethod_Below, 50, - wintype_TextBuffer, 0); - win_c = glk_window_open(win_a, winmethod_Fixed | winmethod_Above, 2, - wintype_TextGrid, 0); - win_d = glk_window_open(win_c, winmethod_Proportional | winmethod_Right, 50, - wintype_TextBuffer, 0); - glk_window_close(win_c, NULL); - center_text(win_a, "A"); - center_text(win_b, "B"); - center_text(win_d, "D"); - wait_for_key(win_a); - - glk_window_close(win_d, NULL); - glk_window_close(win_b, NULL); - glk_window_clear(win_a); - glk_set_window(win_a); - glk_put_string("That's all, folks..."); -}