#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <locale.h>

int issymbol_t(int b) {
    if (0xc0 <= b && b <= 0xdf)  return 1;
    if (0xe0 <= b && b <= 0xff)  return 1;
    if ('a' <= b && b <= 'z')  return 1;
    if ('A' <= b && b <= 'Z')  return 1;
    return 0;
}

int main(int argc,char** argv)
{
   setlocale(LC_ALL, "Rus");
   unsigned int sizeof_words = 200;
    
   int iChr = 0;
   int fNext = 0;
   int i;
   int count_symbols = 0; // Количество символов
   int count_words = 0; // Количество слов
   
   char **words; // Массив со строками
   char buf[256];

   FILE* pIn = fopen("texts.txt","rt");
    
   if (!pIn) return 0;

   words = (char **) malloc (sizeof_words*sizeof(char*));
   
   while ((iChr = fgetc(pIn)))
   {
      if (issymbol_t(iChr)) { // Если буква
       fNext = 1;
       buf[count_symbols] = (char)iChr;
       count_symbols++;
   }
      else if (fNext == 1) {
        buf[count_symbols] = '\0';
        
        for (i = 0; i<count_words; i++)
        {
            if (strcmp(buf,words[i]) == 0) {
                fNext = 0;
                break;
            }
        }
        
        if (fNext != 0) {
         words[count_words] = (char*)malloc((strlen(buf)+1) * sizeof(char));
         strcpy(words[count_words], buf);
         count_words++;
  }
  
        count_symbols = 0;
        fNext = 0;
        
   }
   if (iChr== EOF) break;
   
   if (count_words+200 > sizeof_words) {
    sizeof_words *= 2;
    words = (char **) realloc (words,sizeof_words*sizeof(char*));
    
   }
      
   }
   fclose(pIn);
   
    // Вывод
   
    for (i = 0; i<count_words; i++) printf("Word: %s\n",words[i]);

    printf("Unique words: %d\n",count_words);
    
    // Освобождаем память.
    for (i = 0; i<count_words; i++) free(words[i]);
    free(words);
       
    return 0;
}