#include <stdio.h>
#include "globals.h"

void cgi_bin(void)
{
  int t, r, c, i;
  char tile[128];
  char *wm[] = { ".", "empty", "doublwrd", "triplwrd" };
  char *lm[] = { ".", "empty", "double", "triplet" };
  char *wm2[] = { ".", ".", "-", "=" };
  char *lm2[] = { ".", ".", "'", ":" };
  fprintf(stdout, "Content-type: text/html\n");
  fprintf(stdout, "Refresh: 20;URL=/cgi-bin/xwordgadget\n"); // was demo
  fprintf(stdout, "\n");
  fprintf(stdout, "<HTML>\n<HEAD>\n<BASE HREF=\"http://www.gtoal.com/graphics/\">\n</HEAD>\n<BODY>\n<CENTER>\n");
  for (r = 1; r <= 15; r++) {
    for (c = 1; c <= 15; c++) {
      t = '@'+afill[r][c];
      if ((i = wordmult[r][c]) > 1) {
        sprintf(tile, "<IMG SRC=\"http://www.gtoal.com/graphics/%s.jpg\" ALT=\"%s\"", wm[i], wm2[i]);
      } else if ((i = lettermult[r][c]) > 1) {
        sprintf(tile, "<IMG SRC=\"http://www.gtoal.com/graphics/%s.jpg\" ALT=\"%s\"", lm[i], lm2[i]);
      } else {
        sprintf(tile, "<IMG SRC=\"http://www.gtoal.com/graphics/empty.jpg\" ALT=\".\"");
      }
      if (r == 8 && c == 8) sprintf(tile, "<IMG SRC=\"http://www.gtoal.com/graphics/star.jpg\"");
      if (t != '@') {
        if (islower(t)) {
          sprintf(tile, "<IMG SRC=\"http://www.gtoal.com/graphics/sp2.jpg\" ALT=\"%c\"", t);
	} else {
          sprintf(tile, "<IMG SRC=\"http://www.gtoal.com/graphics/%c2.jpg\" ALT=\"%c\"", t - 'A' + 'a', t);
	}
      }
      fprintf(stdout, "%s WIDTH=17 HEIGHT=17>", tile); // was 24
    }
    fprintf(stdout, "<BR>\n");
  }
  fprintf(stdout, "</CENTER><BR>\n</BODY></HTML>\n\n");
}