#include <stdio.h>

#include <stdlib.h>

#include <string.h>

#include <ctype.h>



// 単語の最大文字数

#define WORD_STRING_MAX     32



// 数値を文字列化するマクロ

#define VALUE_STR_(v)   #v

#define VALUE_STR(v)    VALUE_STR_(v)





// 単語構造体

typedef struct WordList

{

    char                word[WORD_STRING_MAX+1];

    int                 count;

    struct WordList *   next;

    struct WordList *   prev;

} WordList;



// 辞書構造体

typedef struct Dictionary

{

    int         list_num;   // 登録単語数

    WordList    *list;      // 単語リスト

} Dictionary;



// 辞書の実体

static Dictionary gDictionary;





// ----- 辞書の初期化

static void InitializeDictionary(void)

{

    gDictionary.list_num = 0;

    gDictionary.list = NULL;

}



// ----- 辞書の破棄

static void DestroyDictionary(void)

{

    WordList * curr = gDictionary.list;

    while(curr)

    {

        WordList *next = curr->next;

        free(curr);

        curr = next;

    };

}



// ---- 辞書から単語を検索する

static WordList *FindWordDictionary(const char *word)

{

    WordList *curr = NULL;



    // NULLチェック

    if(word)

    {

        curr = gDictionary.list;

        while(curr)

        {

            if(!strcmp(curr->word, word))

                break;

            curr = curr->next;

        };

    }

    return curr;

}



// ----- 辞書に単語を追加

static void InsertDictionary(const char *word)

{

    WordList *wordList;



    // NULLチェック

    if(!word)   return;



    // 既に単語があるかどうか

    wordList = FindWordDictionary(word);

    if(wordList)

        wordList->count++;

    else

    {

        // Dictionary領域確保

        wordList = (WordList*)malloc(sizeof(WordList));



        // リスト繋ぎ買え

        if(gDictionary.list)

        {

            gDictionary.list->prev = wordList;

            wordList->next = gDictionary.list;

            wordList->prev = NULL;

            gDictionary.list = wordList;

        }

        else

        {

            gDictionary.list = wordList;

            wordList->prev = wordList->next = NULL;

        }



        // 数と単語を設定

        gDictionary.list_num++;

        strcpy(wordList->word, word);

        wordList->count = 1;

    }

}



// ----- 辞書のソート（バブル）

static void SortDictionary(void)

{

    int count, loop_count;



    // 単語数が０ならスキップ

    if(gDictionary.list_num <= 0)

        return;



    loop_count = gDictionary.list_num;



    while(--loop_count)

    {

        WordList *curr = gDictionary.list;

        count = 0;

        while(curr->next && count < loop_count)

        {

            WordList *next = curr->next;

            if(strcmp(curr->word, next->word) > 0)

            {

                next->prev = curr->prev;

                curr->next = next->next;

                if(curr->prev)  curr->prev->next = next;

                if(next->next)  next->next->prev = curr;

                curr->prev = next;

                next->next = curr;

                if(gDictionary.list == curr)

                    gDictionary.list = next;

            }

            else

                curr = next;

            ++count;

        };

    }

}



// 辞書の内容を出力

static void DispDictionary(void)

{

    WordList * wordList = gDictionary.list;

    int index = 0;

    while(wordList)

    {

        printf("%4d : %s -> %2d time%c\n",

            ++index, wordList->word, wordList->count,

            wordList->count>1?'s': ' ');

        wordList = wordList->next;

    }

}

// ----- 単語を１つ入力し、辞書に追加する（アルファベット以外が入力されたら終了）

static int InputWord(void)

{

    char    buff[WORD_STRING_MAX];

    int     ret;



    // 単語入力

    ret = scanf("%" VALUE_STR(WORD_STRING_MAX) "s", buff);



    // 終了

    if(ret != 1 || !isalpha(buff[0]))

        return 0;



    // 辞書に追加

    InsertDictionary(buff);



    return 1;

}



// ----- 単語を複数回入力する

static void LoopInputWord(void)

{

    do

    {

        printf("Input word > ");

    }

    while(InputWord());

}



// ----- メイン関数

int main(void)

{

    // 辞書情報を初期化

    InitializeDictionary();



    // 単語を入力

    LoopInputWord();



    // 辞書をソート

    SortDictionary();



    // 出力

    DispDictionary();



    // 辞書の破棄

    DestroyDictionary();



    return EXIT_SUCCESS;

}

    char *name = "山田次郎";

    Person2 A;

    Person2 *pA = &A;

    strcpy(pA->name, "山田次郎");

    printf("%s\n", A.name);             // 実体からアクセス

    printf("%s\n", pA->name);           // ポインタからアクセス