#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#define N 1000
#define TEMOCHImax 25
// #define CARDTOTAL 100
#define JIJIN 1
#define TEKIJIN 2
#define KIDOKU 4

char buf[N], *ku[N];
int status[N];

// prototype
int getMaxCard();
int getNumbers(int);

int getMaxCard()
{
  int i, t, max = 0, maxi = 0;
  for (i = 0; ku[i]; ++i) {
    if (status[i] == JIJIN) {
      t = getNumbers(i);
      if (max < t) {
        max = t;
        maxi = i;
      }
    }
  }
  // printf("%d %d %s\n", maxi, max, ku[maxi]);
  return maxi;
}

int getNumbers(int i)
{
  int j, k, r = 0, n;
  char dmy[] = "　";

  n = strlen(dmy);
  // printf("n=%d\n", n);
  for (j = 0; ku[j]; ++j) {
    if (status[j] == TEKIJIN) {
      for (k = 0; strncmp(ku[i] + k, ku[j] + k, n) == 0; k += n) {
        r++;
        // printf("%s %s", ku[i], ku[j]);
      }
    }

  }
  return r;
}

int main()
{
  int i, j;
  FILE *p = fopen("hyaku.txt", "r");

  // 1)　百人一首を一行31-32文字のひらがなでテキストファイルとして作っておく。
  for (i = 0; fgets(buf, N, p); ++i) {
    ku[i] = (char *)malloc(strlen(buf));
    strcpy(ku[i], buf);
  }
  // 2)　テキストファイルを読み取り、現在の 自陣(1-25枚) 敵陣(1-25枚)を決める。
  i = TEMOCHImax;
  printf("\n自陣\n" );
  while (i--) {
    while (status[j = rand() % 100] & (JIJIN + TEKIJIN));
    status[j] = JIJIN;
    printf("%s", ku[j]);
  }
  i = TEMOCHImax;
  printf("\n敵陣\n" );
  while (i--) {
    while (status[j = rand() % 100] & (JIJIN + TEKIJIN));
    status[j] = TEKIJIN;
    printf("%s", ku[j]);
  }
  // 3)　既に読まれた札数とその札を決める。
  printf("\n既読数 = ");
  scanf("%d", &i);
  printf("\n以下を既読としました。\n");
  while (i--) {
    while (status[j = rand() % 100] & (KIDOKU));
    status[j] += KIDOKU;
    printf("%s", ku[j]);
  }
  // 4)　設定した状況の元で、自陣の札のうち、敵陣に置かれた時に、敵陣札の中で
  // 　　決まり字に至るまでの間に最も候補札数の多くなる札を選んで返し札とする。
  // 　　ただし最大候補札数の札が複数あった場合は、決まり字の文字数が大きい方、
  // 　　それでも決まらないときは乱数を使って選別することとする。

  // for (i = 0; ku[i]; ++i) printf("%d", status[i]);

  printf("\n返し札：\n%s", ku[getMaxCard()]);

  return 0;
}