Add game_text_format to Pattern.

diff --git a/pattern.c b/pattern.c
index 9f96757d893b3b4d5711a48a967fcf3526d122c8..0688f33e4272e6d7a7fdb144a7351c6fa1f428dc 100644 (file)
--- a/pattern.c
+++ b/pattern.c
@@ -919,7 +919,89 @@ static int game_can_format_as_text_now(const game_params *params)
 
 static char *game_text_format(const game_state *state)
 {
-    return NULL;
+    int w = state->w, h = state->h, i, j;
+    int left_gap = 0, top_gap = 0, ch = 2, cw = 1, limit = 1;
+
+    int len, topleft, lw, lh, gw, gh; /* {line,grid}_{width,height} */
+    char *board, *buf;
+
+    for (i = 0; i < w; ++i) {
+       top_gap = max(top_gap, state->rowlen[i]);
+       for (j = 0; j < state->rowlen[i]; ++j)
+           while (state->rowdata[i*state->rowsize + j] >= limit) {
+               ++cw;
+               limit *= 10;
+           }
+    }
+    for (i = 0; i < h; ++i) {
+       int rowlen = 0, predecessors = FALSE;
+       for (j = 0; j < state->rowlen[i+w]; ++j) {
+           int copy = state->rowdata[(i+w)*state->rowsize + j];
+           rowlen += predecessors;
+           predecessors = TRUE;
+           do ++rowlen; while (copy /= 10);
+       }
+       left_gap = max(left_gap, rowlen);
+    }
+
+    cw = max(cw, 3);
+
+    gw = w*cw + 2;
+    gh = h*ch + 1;
+    lw = gw + left_gap;
+    lh = gh + top_gap;
+    len = lw * lh;
+    topleft = lw * top_gap + left_gap;
+
+    board = snewn(len + 1, char);
+    sprintf(board, "%*s\n", len - 2, "");
+
+    for (i = 0; i < lh; ++i) {
+       board[lw - 1 + i*lw] = '\n';
+       if (i < top_gap) continue;
+       board[lw - 2 + i*lw] = ((i - top_gap) % ch ? '|' : '+');
+    }
+
+    for (i = 0; i < w; ++i) {
+       for (j = 0; j < state->rowlen[i]; ++j) {
+           int cell = topleft + i*cw + 1 + lw*(j - state->rowlen[i]);
+           int nch = sprintf(board + cell, "%*d", cw - 1,
+                             state->rowdata[i*state->rowsize + j]);
+           board[cell + nch] = ' '; /* de-NUL-ify */
+       }
+    }
+
+    buf = snewn(left_gap, char);
+    for (i = 0; i < h; ++i) {
+       char *p = buf, *start = board + top_gap*lw + left_gap + (i*ch+1)*lw;
+       for (j = 0; j < state->rowlen[i+w]; ++j) {
+           if (p > buf) *p++ = ' ';
+           p += sprintf(p, "%d", state->rowdata[(i+w)*state->rowsize + j]);
+       }
+       memcpy(start - (p - buf), buf, p - buf);
+    }
+
+    for (i = 0; i < w; ++i) {
+       for (j = 0; j < h; ++j) {
+           int cell = topleft + i*cw + j*ch*lw;
+           int center = cell + cw/2 + (ch/2)*lw;
+           int dx, dy;
+           board[cell] = 0 ? center : '+';
+           for (dx = 1; dx < cw; ++dx) board[cell + dx] = '-';
+           for (dy = 1; dy < ch; ++dy) board[cell + dy*lw] = '|';
+           if (state->grid[i*w+j] == GRID_UNKNOWN) continue;
+           for (dx = 1; dx < cw; ++dx)
+               for (dy = 1; dy < ch; ++dy)
+                   board[cell + dx + dy*lw] =
+                       state->grid[i*w+j] == GRID_FULL ? '#' : '.';
+       }
+    }
+
+    memcpy(board + topleft + h*ch*lw, board + topleft, gw - 1);
+
+    sfree(buf);
+
+    return board;
 }
 
 struct game_ui {
@@ -1708,7 +1790,7 @@ const struct game thegame = {
     dup_game,
     free_game,
     TRUE, solve_game,
-    FALSE, game_can_format_as_text_now, game_text_format,
+    TRUE, game_can_format_as_text_now, game_text_format,
     new_ui,
     free_ui,
     encode_ui,