/*
電話帳ソフトウェア
作成者
2ei
22 中村勇介
31 牧田光平
*/

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

#define NUMBER_OF_USERS 256     //ユーザー数
#define ERROR_FILE "ファイルエラーが発生したので強制終了します\n"  //エラーメッセージ
#define DELETE_CL( a ) ( pointer )->a[ strlen( ( pointer )->a ) - 1 ] = '\0'    //改行の削除
#define FILE_NAME "userdata.txt"    //ユーザデータ格納txtファイル名

/*電話帳に登録される情報の構造体*/
struct userdata
{
    /*氏名格納*/

    char first_name[256];       //名
    char last_name[256];        //姓

    /*フリガナ格納(アルファベットで氏名を格納する場合は不要)*/
    char first_name_phonetic[256];  //名のフリガナ
    char last_name_phonetic[256];   //姓のフリガナ

    /*電話番号格納。ハイフンを想定してchar型で格納する。*/
    char phone_number1[256];        //電話番号1
    char phone_number2[256];        //電話番号2
    char phone_number3[256];        //電話番号3

    /*メールアドレス格納*/
    char mail_address1[256];        //メールアドレス1
    char mail_address2[256];        //メールアドレス2
    char mail_address3[256];        //メールアドレス3

    /*住所格納。郵便番号は個別で保持*/
    char zip_code[256];     //郵便番号
    char address[256];      //住所

    /*グループ格納*/
    char group[256];

};


void DeleteNewLine( struct userdata *pointer );                 //改行を削除
void DispUserDetail( struct userdata *pointer );                //登録されているユーザーの情報を表示
void Sort4Phonetic( void );                                     //フリガナを利用したソート関数
void Sort4Group( void );                                        //グループ別ソート関数
void DispData( struct userdata *pointer , int user );           //電話帳表示(氏名のみ)
int AddNewUser( struct userdata *pointer , int user );          //新規ユーザデータ作成
int ReadUserData( struct userdata *pointer );                   //txtからユーザーデータを読み込む
int CheckTxtFile( void );                                       //txtファイルの有無をチェック
int Menu( struct userdata *pointer , int user , int *user_p );  //メニュー表示
int WriteUserData2Txt( struct userdata *pointer , int user );   //すべてのデータをtxtファイルに書き込む


/*現在構造体配列に格納されているすべてのデータをtxtファイルに出力する
ファイルを新規作成し、先頭から書き込む。
正常に書き込めた場合、書き込んだユーザー数を返す*/
int WriteUserData2Txt( struct userdata *pointer , int user )
{
    FILE *file_p;

    int num;

    //ファイル作成エラーの場合
    if ( ( file_p = fopen( FILE_NAME , "w" ) ) == NULL )
    {
        //エラー出力
        printf( ERROR_FILE );

        //強制終了
        exit( EXIT_FAILURE );
    }

    else;

    //書き込み処理
    for( num = 0; num < user; num++ )
    {
        //データ区切り線書き込み
        //fprintf( file_p , "-\n" );
        fputs( "-", file_p );

        //情報を構造体のメンバに書き込む
        fprintf( file_p , "%s\n" , ( pointer + num )->first_name );             //名
        fprintf( file_p , "%s\n" , ( pointer + num )->last_name );              //姓

        fprintf( file_p , "%s\n" , ( pointer + num )->first_name_phonetic );    //名フリガナ
        fprintf( file_p , "%s\n" , ( pointer + num )->last_name_phonetic ); //姓フリガナ

        fprintf( file_p , "%s\n" , ( pointer + num )->phone_number1 );          //電話番号1
        fprintf( file_p , "%s\n" , ( pointer + num )->phone_number2 );          //電話番号2
        fprintf( file_p , "%s\n" , ( pointer + num )->phone_number3 );          //電話番号3

        fprintf( file_p , "%s\n" , ( pointer + num )->mail_address1 );          //メールアドレス1
        fprintf( file_p , "%s\n" , ( pointer + num )->mail_address2 );          //メールアドレス2
        fprintf( file_p , "%s\n" , ( pointer + num )->mail_address3 );          //メールアドレス3

        fprintf( file_p , "%s\n" , ( pointer + num )->zip_code );               //郵便番号
        fprintf( file_p , "%s\n" , ( pointer + num )->address );                //住所

        fprintf( file_p , "%s\n" , ( pointer + num )->group );                  //グループ

    }

    //ファイルクローズ
    fclose( file_p );

    //書き込んだユーザ数を返却
    return num;
}

/*新規ユーザデータを配列の要素の空き要素に追加
構造体配列のアドレス、現在登録されているユーザー数を引数として受け取る
ユーザーデータが作成された場合は1を返し、これをユーザ数に追加する必要がある*/
int AddNewUser( struct userdata *pointer , int user )
{
    printf("新規ユーザを登録します\n");

    printf("姓:");                         scanf( "%s" , ( pointer + user )->last_name );
    printf("名:");                         scanf( "%s" , ( pointer + user )->first_name );

    printf("姓フリガナ(英語):");         scanf( "%s" , ( pointer + user )->last_name_phonetic );
    printf("名フリガナ(英語):");         scanf( "%s" , ( pointer + user )->first_name_phonetic );

    printf("電話番号1:");                   scanf( "%s" , ( pointer + user )->phone_number1 );
    printf("電話番号2:");                   scanf( "%s" , ( pointer + user )->phone_number2 );
    printf("電話番号3:");                   scanf( "%s" , ( pointer + user )->phone_number3 );

    printf("メールアドレス1:");              scanf( "%s" , ( pointer + user )->mail_address1 );
    printf("メールアドレス2:");              scanf( "%s" , ( pointer + user )->mail_address2 );
    printf("メールアドレス3:");              scanf( "%s" , ( pointer + user )->mail_address3 );

    printf("郵便番号:");                    scanf( "%s" , ( pointer + user )->zip_code );
    printf("住所:");                      scanf( "%s" , ( pointer + user )->address );

    printf("グループ(学校とか会社とか):");  scanf( "%s" , ( pointer + user )->group );

    printf("--------------------------------\n");

    return 1;
}

/*受け取った構造体配列のポインタに格納されているユーザーデータを全項目について表示
返す値については未定とする*/
void DispUserDatail( struct userdata *pointer )
{
    int user_number;

    printf("指定された個人の詳細を表示します\n");
    printf("No:");
    scanf("%d" , &user_number );

    //配列の添え字は0から始まるが表示は1からなのでデクリメント
    user_number--;

    printf("\n--------------------------------\n");

    printf( "%s" ,   ( pointer + user_number )->last_name );
    printf( "%s\n" , ( pointer + user_number )->first_name );   //姓名表示

    printf( "%s" ,   ( pointer + user_number )->last_name_phonetic );
    printf( "%s\n" , ( pointer + user_number )->first_name_phonetic );  //姓名ふりがな表示

    printf("電話番号1:%s\n" , ( pointer + user_number )->phone_number1 );       //電話番号1
    printf("電話番号2:%s\n" , ( pointer + user_number )->phone_number2 );       //電話番号2
    printf("電話番号3:%s\n" , ( pointer + user_number )->phone_number3 );       //電話番号3

    printf( "メールアドレス1:%s\n" , ( pointer + user_number )->mail_address1 ); //メールアドレス1
    printf( "メールアドレス2:%s\n" , ( pointer + user_number )->mail_address2 ); //メールアドレス2
    printf( "メールアドレス3:%s\n" , ( pointer + user_number )->mail_address3 ); //メールアドレス3

    printf( "郵便番号:%s\n" , ( pointer + user_number )->zip_code );        //郵便番号
    printf( "住所:%s\n" , ( pointer + user_number )->address );               //住所

    printf("グループ:%s\n" , ( pointer + user_number )->group );        //グループ

    printf("--------------------------------\n\n");
}

/*ReadUserDataでtxtファイルから読み込んだ文字列の改行を削除する
引数として構造体配列の操作する配列のポインタを受け取る。*/
void DeleteNewLine( struct userdata *pointer )
{
    //ポインタとして格納する配列名は"pointer"である必要がある
    //DELETE_CLはdefinrマクロにて定義済み
    DELETE_CL( first_name );                //名
    DELETE_CL( last_name );                 //姓
    DELETE_CL( first_name_phonetic );       //名ふりがな
    DELETE_CL( last_name_phonetic );        //姓ふりがな
    DELETE_CL( phone_number1 );             //電話番号1
    DELETE_CL( phone_number2 );             //電話番号2
    DELETE_CL( phone_number3 );             //電話番号3
    DELETE_CL( mail_address1 );             //メールアドレス1
    DELETE_CL( mail_address2 );             //メールアドレス2
    DELETE_CL( mail_address3 );             //メールアドレス3
    DELETE_CL( zip_code );                  //郵便番号
    DELETE_CL( address );                   //住所
    DELETE_CL( group );                     //グループ
}

int Menu( struct userdata *pointer , int user , int *user_p )
{
    int select_menu;
    int written_users;

    printf("何か入力してくださいな。\n");

    getch();
    system( "cls" );
    printf("1:電話帳表示\n");
    printf("2:項目の詳細表示\n");
    printf("3:新規登録\n");
    //printf("4:検索\n");
    printf("0:終了\n");

    //ハイパー入力された値のチェックターイム!!!!
    do
    {
        //初期化
        select_menu = -1;

        printf("動作:");
        scanf( "%d" , &select_menu );

        if( select_menu < 0 || select_menu > 4 )
        {
            printf("無効な値です.\n再入力してください.\n");
        }

        else;

    }while( select_menu < 0 || select_menu > 4 );

    switch( select_menu )
    {
        case 0:
        {
            //書き込み完了ユーザ数代入
            written_users = WriteUserData2Txt( pointer , user );

            //ダイアログ表示
            printf("%d人のデータを正常に書き込みました\n" , written_users );
            printf("プログラムを終了します\n");
            break;
        }

        case 1:
        {
            //電話帳(氏名のみ)表示
            DispData( pointer , user );
            break;
        }

        case 2:
        {
            //指定されたユーザの詳細表示
            DispUserDatail( pointer );
            break;
        }
        case 3:
        {
            //電話帳に書き込むのよ(ユーザ数の追加)
            *user_p += AddNewUser( pointer , user );
            break ;
        }
    }

    return select_menu;
}

/*これ「2012-02-22 0時32分にここまで書いた」とか書いたほうがいいんだろうけどそんな順序良く書いてるわけじゃないから
結局やらないんだよね……^^;*/

/*txtファイルの有無をチェックする。fopen関数において、読み取りモードでエラーが発生した場合、
新しくtxtファイルを作成する。データは初期化される。(txtファイルの先頭に「end」を書き込む)
txtファイルが存在する場合は1を、何らかのエラーの場合は0を返す*/
int CheckTxtFile( void )
{
    FILE *file_p;       //ファイルポインタ

    int file_flag = 0;  //ファイル存在フラグ

    //file_flagが0の場合ループ
    while( !file_flag )
    {
        file_p = fopen( FILE_NAME , "r" );

        //ファイルが存在しない、もしくはfopenに失敗した場合
        if( file_p == NULL )
        {
            //書きこみモードでtxtファイルを新規作成
            file_p = fopen( FILE_NAME , "w" );

            //fprintf( file_p , "start" );

            //ファイルのクローズ
            fclose( file_p );

            //フラグを立てる
            file_flag = 1;
        }

        //ファイルが存在する場合
        else
        {
            //ファイルのクローズ
            fclose( file_p );

            //フラグを立てる
            file_flag = 1;
        }
    }

    //値の返却
    return file_flag;
}

/*電話帳に登録されているデータを表示。表示するのは氏名のみ。
引数として、構造体配列の先頭アドレス、登録人数を受け取る。*/
void DispData( struct userdata *pointer , int user )
{
    int num;

    printf("\n--------------------------------\n");

    //登録されている人数分繰り返す
    for( num = 0; num < user; num++ )
    {
        //表示例「 12:中村 勇介」
        printf("%3d:%s %s\n" , num + 1 , ( pointer + num )->last_name , ( pointer + num )->first_name );
    }

    printf("--------------------------------\n\n");
}

/*txtファイルから構造体にデータを格納する。
引数として構造体配列の先頭アドレスを受け取る。登録人数を返す*/
int ReadUserData( struct userdata *pointer )
{
    //ファイルポインタ格納変数
    FILE *file_p;

    int num;

    char tmp = 1;

    printf("電話帳データロード中\n");

    //ファイルオープン
    if ( ( file_p = fopen( FILE_NAME , "r" ) ) == NULL )
    {
        //エラーメッセージ出力
        printf( ERROR_FILE );

        //強制終了
        exit( EXIT_FAILURE );
    }

    else;

    //構造体の各メンバにデータを代入
    //EOF行読み込みで終了(for文内if文で処理)
    for( num = 0; ; num++ )
    {

        tmp = fgetc( file_p );

        if( tmp == EOF )
        {
            break;
        }

        else;

        //情報を構造体のメンバに読み込む
        fgets( ( pointer + num )->first_name , 256 , file_p );              //名
        fgets( ( pointer + num )->last_name , 256 , file_p );               //姓

        fgets( ( pointer + num )->first_name_phonetic , 256 , file_p );     //名フリガナ
        fgets( ( pointer + num )->last_name_phonetic , 256 , file_p );      //姓フリガナ

        fgets( ( pointer + num )->phone_number1 , 256 , file_p );           //電話番号1
        fgets( ( pointer + num )->phone_number2 , 256 , file_p );           //電話番号2
        fgets( ( pointer + num )->phone_number3 , 256 , file_p );           //電話番号3

        fgets( ( pointer + num )->mail_address1 , 256 , file_p );           //メールアドレス1
        fgets( ( pointer + num )->mail_address2 , 256 , file_p );           //メールアドレス2
        fgets( ( pointer + num )->mail_address3 , 256 , file_p );           //メールアドレス3

        fgets( ( pointer + num )->zip_code , 256 , file_p );                //郵便番号
        fgets( ( pointer + num )->address , 256 , file_p );                 //住所

        fgets( ( pointer + num )->group , 256 , file_p );                   //グループ

        //改行の削除
        DeleteNewLine( pointer + num );

    }

    //ファイルを閉じる
    fclose( file_p );

    printf("%d人のデータをロードしました\n" , num );

    //読み込み人数を返す
    return num;
}

int main( void )
{
    //友達(NUMBER_OF_USERS)人できるかな
    struct userdata data_array[NUMBER_OF_USERS];

    int users;  //テキストファイル中に記述されているユーザー数格納

    //ファイルがエラーの場合
    if( !CheckTxtFile() )
    {
        //エラーメッセージ出力
        printf( ERROR_FILE );

        //強制終了
        exit( EXIT_FAILURE );
    }
    else;

    //ユーザーデータ格納
    users = ReadUserData( data_array );

    do{
        printf("%d人のデータが読み込まれています\n" , users );

    }while( Menu( data_array , users , &users ) );

    return 0;
}