/***********************************/
/*  editor.c                       */
/*   ｱｽﾚﾁｯｸ ｸﾗﾌﾞ ﾒﾝﾊﾞｰ ｶﾝﾘ ﾌﾟﾛｸﾞﾗﾑ */
/***********************************/
#include <stdio.h>
#include <string.h>

/************************************/
/*    ｷｮｳﾂｳ ﾃｲｷﾞ                    */
/************************************/

#define MEMBER_MAX	    200			/* ﾒﾝﾊﾞｰｽｳ MAX */
#define AKICODE_TBL_NAME    "akicode.tbl"	/* ｱｷｺｰﾄﾞﾋｮｳ ﾌｧｲﾙ ﾒｲ */
#define CODEDATA_TBL_NAME   "codedata.tbl"  	/* ｺｰﾄﾞ ﾃﾞｰﾀ ﾀｲｼｮｳ ﾋｮｳ ﾌｧｲﾙ ﾒｲ */
#define KEISOKU_TBL_NAME    "keisoku.tbl"	/* ｹｲｿｸ ﾃﾞｰﾀ ﾋｮｳ ﾌｧｲﾙ ﾒｲ */

#define  TRUE          1    /* ｼﾝ            */
#define  FALSE         0    /* ｷﾞ            */
#define  OK            0    /* ｾｲｼﾞｮｳ        */
#define  CANCEL        1    /* ｼｮﾘ ﾁｭｳｼ      */
#define  NG           -1    /* ｲｼﾞｮｳ         */

/* ｹｲｿｸ ﾃﾞｰﾀ ﾃｰﾌﾞﾙ */
struct   KEISOKU_TBL {
    int  kaiin_code;       /* ｶｲｲﾝ ｺｰﾄﾞ     */
    int  count;            /* ｹｲｿｸ ｶｲｽｳ     */
    char first_date[ 9 ];  /* ｼｮｶｲ ﾋﾂﾞｹ     */
    int  first_data;       /* ｼｮｶｲ ﾃﾞｰﾀ     */
    char max_date[ 9 ];    /* ｻｲｺｳ ｷﾛｸ ﾋﾂﾞｹ */
    int  max_data;         /* ｻｲｺｳ ｷﾛｸ ﾃﾞｰﾀ */
    char soku_date[ 9 ];   /* ｹｲｿｸ ﾋﾂﾞｹ     */
    int  soku_data[ 10 ];  /* ｹｲｿｸ ﾃﾞｰﾀ     */
};


/***********************************/
/* ｷｮｳﾂｳ ﾃﾞｰﾀ                      */
/***********************************/

/* ｱｷｺｰﾄﾞ ﾋｮｳ */
int akicode_tbl[ MEMBER_MAX + 1 ];

/* ｺｰﾄﾞﾃﾞｰﾀ ﾀｲｼｮｳ ﾋｮｳ */
int codedata_tbl[ MEMBER_MAX ];

/* ｺｼﾞﾝﾍﾞﾂ ｹｲｿｸ ﾃﾞｰﾀﾋｮｳ */
struct KEISOKU_TBL kojin_keisoku_tbl;

/* ｿｰﾄ ﾖｳ ｹｲｿｸ ﾃﾞｰﾀ ﾋｮｳ */
struct KEISOKU_TBL sort_keisoku_tbl[ MEMBER_MAX ];

static int  codedata_tbl_create( void );
static int  akicode_tbl_create( void );

int  akicode_tbl_read( void );
int  kakunin_input( char *msg );
int  kojin_data_read( int kaiin_code );
void kojin_data_disp( int kaiin_code, char *msg );
struct KEISOKU_TBL init_kojin_keisoku_tbl( void );

void edit_akicode( void );
void edit_codedata( void );
void edit_keisoku_data( void );

/***********************************/
/* ﾒﾝﾊﾞｰ ｶﾝﾘ ﾌﾟﾛｸﾞﾗﾑ               */
/*  ﾒｲﾝ                            */
/*   ﾊﾟﾗﾒｰﾀ : ﾅｼ                   */
/*   ﾘﾀｰﾝ   : ﾅｼ                   */
/***********************************/
int main( void )
{
    int    loop = TRUE;			/* ﾙｰﾌﾟ ﾌﾗｸﾞ                */
    char   work[ 128 ];			/* ﾆｭｳﾘｮｸ ﾜｰｸ               */
    FILE   *fp;				/* ﾌｧｲﾙ ﾎﾟｲﾝﾀ               */
    char   *fname1 = AKICODE_TBL_NAME;	/* ｱｷ ｺｰﾄﾞ ﾋｮｳ ﾌｧｲﾙ         */
    char   *fname2 = CODEDATA_TBL_NAME;	/* ｺｰﾄﾞ ﾃﾞｰﾀ ﾀｲｼｮｳ ﾋｮｳ ﾌｧｲﾙ */
    int	   i;				/* ｲﾝﾃﾞｯｸｽ		    */

    /* ｱｷ ｺｰﾄﾞ ﾋｮｳ ﾌｧｲﾙ OPEN -> NULL ? */
    if( (fp = fopen( fname1, "rb" )) == NULL ) {
        printf( "\n ｱｷ ｺｰﾄﾞ ﾋｮｳ ﾌｧｲﾙ ｦ ｻｸｾｲ ｼﾃｲﾏｽ｡" );

        /* ｱｷ ｺｰﾄﾞ ﾋｮｳ ﾌｧｲﾙ ｻｸｾｲ */
        akicode_tbl_create( );
    }
    else {
        /* ｱｷ ｺｰﾄﾞ ﾋｮｳ ﾌｧｲﾙ CLOSE */
        fclose( fp );
    }

    /* ｺｰﾄﾞ ﾃﾞｰﾀ ﾀｲｼｮｳ ﾋｮｳ ﾌｧｲﾙ OPEN -> NULL ? */
    if( (fp = fopen( fname2, "rb" )) == NULL ) {
        printf( "\n ｺｰﾄﾞ ﾃﾞｰﾀ ﾀｲｼｮｳ ﾋｮｳ ﾌｧｲﾙ ｦ ｻｸｾｲ ｼﾃｲﾏｽ｡" );

        /* ｺｰﾄﾞ ﾃﾞｰﾀ ﾀｲｼｮｳ ﾋｮｳ ﾌｧｲﾙ ｻｸｾｲ */
        codedata_tbl_create( );
    }
    else {
        /* ｺｰﾄﾞ ﾃﾞｰﾀ ﾀｲｼｮｳ ﾋｮｳ ﾌｧｲﾙ CLOSE */
        fclose( fp );
    }

    while( loop ) {
        /* ﾃｰﾌﾞﾙ ｼｮｷ ｸﾘｱ */
		akicode_tbl[ 0 ] = 0;
		for( i = 0; i < MEMBER_MAX; i++) {
			akicode_tbl[ i + 1 ] = 0;
			codedata_tbl[ i ] = 0;
			sort_keisoku_tbl[ i ] = init_kojin_keisoku_tbl();
		}
		kojin_keisoku_tbl = init_kojin_keisoku_tbl();

        printf( "ｼｮﾘ ｦ ｾﾝﾀｸ ｼﾃｸﾀﾞｻｲ \n" );
        printf( "1:ｱｷｺｰﾄﾞ ﾋｮｳ \n" );
        printf( "2:ｺｰﾄﾞﾃﾞｰﾀ ﾋｮｳ \n" );
        printf( "3:ｹｲｿｸ ﾃﾞｰﾀ ﾋｮｳ \n" );
        printf( "E:ｼｭｳﾘｮｳ \n" );
        printf( "? " );

        /* ｼｮﾘｸﾌﾞﾝ ﾆｭｳﾘｮｸ */
        work[ 0 ] = '\0';
        scanf( "%s", work );

        /* ﾆｭｳﾘｮｸ ｹﾀｽｳ ﾁｪｯｸ -> 1ｲｶﾞｲ ? */
        if( strlen( work ) != 1 ) {
            printf( "ﾆｭｳﾘｮｸ ﾐｽ ﾃﾞｽ \n" );
            continue;
        }

        switch( work[ 0 ] ) {
            case '1':       /* ｱｷ ｺｰﾄﾞ ﾋｮｳ     */
                edit_akicode( );
                break;

            case '2':       /* ｺｰﾄﾞ ﾃﾞｰﾀ ﾀｲｼｮｳﾋｮｳ */
                edit_codedata( );
                break;

            case '3':       /* ｹｲｿｸ ﾃﾞｰﾀ ﾋｮｳ     */
                edit_keisoku_data( );
                break;

            case 'e':       /* ｼｭｳﾘｮｳ         */
            case 'E':
                loop = FALSE;
                break;

            default:
                printf( "\n ﾆｭｳﾘｮｸ ﾐｽ ﾃﾞｽ" );
                break;
        }
    }
    return OK;
}


/************************************/
/* ﾒﾝﾊﾞｰ ｶﾝﾘ ﾌﾟﾛｸﾞﾗﾑ                */
/*  ﾆｭｳｶｲ ﾄｳﾛｸ ｼｮﾘ                  */
/*   ｱｷ ｺｰﾄﾞ ﾋｮｳ ﾌｧｲﾙ ｻｸｾｲ          */
/*   ﾊﾟﾗﾒｰﾀ : ﾅｼ                    */
/*   ﾘﾀｰﾝ   : 0:OK                  */
/*           -1:NG                  */
/************************************/
static int akicode_tbl_create( void )
{

// main.cの同名の関数をコピー

}



/************************************/
/* ﾒﾝﾊﾞｰ ｶﾝﾘ ﾌﾟﾛｸﾞﾗﾑ                */
/*  ﾆｭｳｶｲ ﾄｳﾛｸ ｼｮﾘ                  */
/*   ｺｰﾄﾞ ﾃﾞｰﾀ ﾀｲｼｮｳ ﾋｮｳ ﾌｧｲﾙ ｻｸｾｲ  */
/*   ﾊﾟﾗﾒｰﾀ : ﾅｼ                    */
/*   ﾘﾀｰﾝ   : 0:OK                  */
/*           -1:NG                  */
/************************************/
static int codedata_tbl_create( void )
{

// main.cの同名の関数をコピー

}



/************************************/
/* ｷｮｳﾂｳ ﾙｰﾁﾝ                       */
/************************************/


/************************************/
/* ﾒﾝﾊﾞｰ ｶﾝﾘ ﾌﾟﾛｸﾞﾗﾑ                */
/*  ﾆｭｳｶｲ ﾄｳﾛｸ ｼｮﾘ                  */
/*   ｱｷ ｺｰﾄﾞ ﾋｮｳ ﾌｧｲﾙ READ          */
/*   ﾊﾟﾗﾒｰﾀ : ﾅｼ                    */
/*   ﾘﾀｰﾝ   : 0:OK                  */
/*           -1:NG                  */
/************************************/
int akicode_tbl_read( void )
{

// main.cの同名の関数をコピー

}



/***********************************/
/* ﾒﾝﾊﾞｰ ｶﾝﾘ ﾌﾟﾛｸﾞﾗﾑ               */
/*  ﾆｭｳﾘｮｸ ｶｸﾆﾝ                    */
/*   ﾊﾟﾗﾒｰﾀ : ｶｸﾆﾝ ﾒｯｾｰｼﾞ          */
/*   ﾘﾀｰﾝ   : 0:OK                 */
/*           -1:NG                 */
/***********************************/
int kakunin_input( char *msg )
{

// main.cの同名の関数をコピー

}


/************************************/
/* ﾒﾝﾊﾞｰ ｶﾝﾘ ﾌﾟﾛｸﾞﾗﾑ                */
/*   ｹｲｿｸ ﾃﾞｰﾀ ｼｮｷｶ                 */
/*   ﾊﾟﾗﾒｰﾀ : ﾅｼ                    */
/*   ﾘﾀｰﾝ   : ｹｲｿｸ ﾃﾞｰﾀ             */
/************************************/
struct KEISOKU_TBL init_kojin_keisoku_tbl( void )
{

// main.cの同名の関数をコピー

}


/************************************/
/* ﾒﾝﾊﾞｰ ｶﾝﾘ ﾌﾟﾛｸﾞﾗﾑ                */
/*  ﾆｭｳｶｲ ﾄｳﾛｸ ｼｮﾘ                  */
/*   ｱｷ ｺｰﾄﾞ ﾋｮｳ ﾌｧｲﾙ ｺｳｼﾝ          */
/*   ﾊﾟﾗﾒｰﾀ : ﾅｼ                    */
/*   ﾘﾀｰﾝ   : 0:OK                  */
/*           -1:NG                  */
/************************************/
static int akicode_tbl_update( void )
{

// main.cの同名の関数をコピー

}




void edit_akicode( void )
{
    int i, j;
    int flag = 0;

    akicode_tbl_read( );

    printf("ｱｷｺｰﾄﾞ ﾋｮｳ \n");

    printf("ﾖｳｿ 0 : %d \n", akicode_tbl[0]);
    printf("\n");

    for( i = 1; i <= MEMBER_MAX ; i++ ){
        printf("ﾖｳｿ %3d:%3d  ", i, akicode_tbl[i]);
        if ( i % 5 == 0 ) {
            printf("\n");
        }
    }

    while( 1 ) {
        printf("ﾍﾝｺｳｽﾙ ﾖｳｿ (-1:exit) ? ");
        scanf("%d", &i);

        if ( i == -1 ) {
            break;
        } else if ( i <= 0 || i > 200 ) {
            printf("ﾑｺｳﾅ ﾖｳｿ \n");
            continue;
        }

        printf("ｱﾀｲ: ");
        scanf("%d", &j);

        akicode_tbl[i] = j;
        flag = 1;
    }

    if (flag == 1) {
        akicode_tbl_update( );
    }

    return;
}


void edit_codedata( void )
{
    FILE    *fp;                        /* ﾌｧｲﾙ ﾎﾟｲﾝﾀ               */
    char    *fname = CODEDATA_TBL_NAME;	/* ｺｰﾄﾞ ﾃﾞｰﾀ ﾀｲｼｮｳ ﾋｮｳ ﾌｧｲﾙ */
    int     i, j;
    int     flag = 0;

    /* ｺｰﾄﾞ ﾃﾞｰﾀ ﾀｲｼｮｳ ﾋｮｳ ﾌｧｲﾙ OPEN -> NULL ? */
    if( (fp = fopen( fname, "w+b" )) == NULL ) {
        printf( "\n ｺｰﾄﾞ ﾃﾞｰﾀ ﾀｲｼｮｳ ﾋｮｳ ﾌｧｲﾙ OPEN ｴﾗｰ" );
        return;
    }

    /* ｺｰﾄﾞ ﾃﾞｰﾀ ﾀｲｼｮｳ ﾋｮｳ ﾌｧｲﾙ READ -> 1ｲｶﾞｲ ? */
    if( fread( (char *)codedata_tbl, sizeof( codedata_tbl ), 1, fp ) != 1 ) {
        printf( "\n ｺｰﾄﾞ ﾃﾞｰﾀ ﾀｲｼｮｳ ﾋｮｳ ﾌｧｲﾙ READ ｴﾗｰ" );
    }

    printf("ｺｰﾄﾞ1ﾃﾞｰﾀ ﾋｮｳ \n");

    for( i = 0; i < MEMBER_MAX ; i++ ){
        printf("ﾖｳｿ %3d:%3d  ", i+1, codedata_tbl[i]);
        if ( (i+1) % 5 == 0 ) {
            printf("\n");
        }
    }

    while( 1 ) {
        printf("ﾍﾝｺｳｽﾙ ﾖｳｿ (-1:exit) ? ");
        scanf("%d", &i);

        if ( i == -1 ) {
            break;
        } else if ( i <= 0 || i > 200 ) {
            printf("ﾑｺｳﾅ ﾖｳｿ \n");
            continue;
        }

        printf("ｱﾀｲ: ");
        scanf("%d", &j);

        codedata_tbl[i - 1] = j;
        flag = 1;
    }

    if( flag != 0 ) {
        /* ﾌｧｲﾙ ﾎﾟｲﾝﾀ ｦ ｾﾝﾄｳ ﾆ SEEK -> OK ﾃﾞ ﾅｲ ? */
        if( fseek( fp, 0L, SEEK_SET ) != OK ) {
            printf( "\n ｺｰﾄﾞ ﾃﾞｰﾀ ﾀｲｼｮｳ ﾋｮｳ ﾌｧｲﾙ SEEK ｴﾗｰ" );
        } else if ( fwrite( (char *)codedata_tbl, sizeof( codedata_tbl ), 1, fp ) != 1 ) {
            printf( "\n ｺｰﾄﾞ ﾃﾞｰﾀ ﾀｲｼｮｳ ﾋｮｳ ﾌｧｲﾙ WRITE ｴﾗｰ" );
        }
    }

    fclose( fp );

    return;
}


void edit_keisoku_data( void )
{
    int     i;							/* ｲﾝﾃﾞｯｸｽ              */
    int     j;
    int     count = 0;
    long    fptr;					/* ｹｲｿｸ ﾃﾞｰﾀ ﾌｧｲﾙ ﾎﾟｲﾝﾀ */
    FILE    *fp;						/* ﾌｧｲﾙ ﾎﾟｲﾝﾀ           */
    char    *fname = KEISOKU_TBL_NAME;				/* ｹｲｿｸ ﾃﾞｰﾀ ﾋｮｳ ﾌｧｲﾙ   */

    for( i = 0; i < MEMBER_MAX; i++) {
        sort_keisoku_tbl[i] = init_kojin_keisoku_tbl( );
    }

    /* ｹｲｿｸ ﾃﾞｰﾀ ﾌｧｲﾙ OPEN -> NULL ? */
    if( (fp = fopen( fname, "r+b" )) != NULL ) {
        /*ｹｲｿｸ ﾃﾞｰﾀ ﾌｧｲﾙ READ -> 1ｲｶﾞｲ ? */
        for (count = 0; count < MEMBER_MAX; count++ ) {
            /* ｶﾞｲﾄｳ ﾃﾞｰﾀ ﾎﾟｲﾝﾀ ｾｯﾄ */
            fptr = count * sizeof( struct KEISOKU_TBL );

            /* ｹｲｿｸ ﾃﾞｰﾀ ﾋｮｳ ﾌｧｲﾙ SEEK -> OK ﾃﾞ ﾅｲ ? */
            if( fseek( fp, fptr, SEEK_SET ) != OK ) {
               printf( "ｹｲｿｸ ﾃﾞｰﾀ ﾌｧｲﾙ SEEK ｴﾗｰ \n" );
               break;
            }

           if( fread( (char *)&kojin_keisoku_tbl, sizeof( kojin_keisoku_tbl ), 1, fp ) != 1 ) {
               break;
           }

           sort_keisoku_tbl[count] = kojin_keisoku_tbl;
        }

        printf("ｹｲｿｸ ﾃﾞｰﾀ ﾊ %d ｺ ﾃﾞｽ｡\n", count);
        printf("ﾖｳｿ ｶｲｲﾝ ｶｲｽｳ ｼｮｶｲ ﾋﾂﾞｹ ﾃﾞｰﾀ ｻｲｺｳ ﾋﾂﾞｹ ﾃﾞｰﾀ ｻｲｼﾝ ﾋﾂﾞｹ \n");
        for( i = 0; i < count; i++ ) {
            printf("%3d  %3d %4d %s  %4d %s  %4d %s \n", i, sort_keisoku_tbl[i].kaiin_code, sort_keisoku_tbl[i].count,
                sort_keisoku_tbl[i].first_date, sort_keisoku_tbl[i].first_data, sort_keisoku_tbl[i].max_date,
                sort_keisoku_tbl[i].max_data, sort_keisoku_tbl[i].soku_date);
        }

        fclose(fp);
    }

    while( 1 ) {
        printf("ﾍﾝｺｳｽﾙ ﾖｳｿ (-1:exit) ? ");
        scanf("%d", &i);

        if ( i == -1 ) {
            break;
        } else if ( i < 0 || i >= 200 ) {
            printf("ﾑｺｳﾅ ﾖｳｿ \n");
            continue;
        }

        printf("ﾖｳｿ ｶｲｲﾝ ｶｲｽｳ ｼｮｶｲ ﾋﾂﾞｹ ﾃﾞｰﾀ ｻｲｺｳ ﾋﾂﾞｹ ﾃﾞｰﾀ ｻｲｼﾝ ﾋﾂﾞｹ \n");
        printf("%3d  %3d %4d %s  %4d %s  %4d %s\n", i, sort_keisoku_tbl[i].kaiin_code, sort_keisoku_tbl[i].count,
            sort_keisoku_tbl[i].first_date, sort_keisoku_tbl[i].first_data, sort_keisoku_tbl[i].max_date,
            sort_keisoku_tbl[i].max_data, sort_keisoku_tbl[i].soku_date );

        printf("\nｹｲｿｸ ﾃﾞｰﾀ\n");
        printf("%4d %4d %4d %4d %4d %4d %4d %4d %4d %4d \n",
            sort_keisoku_tbl[i].soku_data[0], sort_keisoku_tbl[i].soku_data[1], sort_keisoku_tbl[i].soku_data[2],
            sort_keisoku_tbl[i].soku_data[3], sort_keisoku_tbl[i].soku_data[4], sort_keisoku_tbl[i].soku_data[5],
            sort_keisoku_tbl[i].soku_data[6], sort_keisoku_tbl[i].soku_data[7], sort_keisoku_tbl[i].soku_data[8],
            sort_keisoku_tbl[i].soku_data[9]);

        printf("ﾅﾆｦ ﾍﾝｺｳ ｼﾏｽｶ (0:ｽﾍﾞﾃ  1:ﾋﾂﾞｹ  2:ｿｸﾃｲ ﾃﾞｰﾀ  -1:ｷｬﾝｾﾙ) ? ");
        scanf("%d", &j);

        if ( j == -1 ) {
            continue;
        }

        if ( j == 0 || j == 1 ) {
            printf("ｶｲｲﾝ ﾊﾞﾝｺﾞｳ, ｶｲｽｳ, ｼｮｶｲ ﾋﾂﾞｹ, ｼｮｶｲ ﾃﾞｰﾀ, ｻｲｺｳ ﾋﾂﾞｹ, ｻｲｺｳ ﾃﾞｰﾀ, ｻｲｼﾝ ﾋﾂﾞｹ \n");
            scanf("%d%d%s%d%s%d%s", &(sort_keisoku_tbl[i].kaiin_code), &(sort_keisoku_tbl[i].count),
            &(sort_keisoku_tbl[i].first_date), &(sort_keisoku_tbl[i].first_data), &(sort_keisoku_tbl[i].max_date),
            &(sort_keisoku_tbl[i].max_data), &(sort_keisoku_tbl[i].soku_date) );
        }

        if ( j == 0 || j == 2 ) {
            printf("ﾃﾞｰﾀ x 10 \n");
            scanf("%d%d%d%d%d%d%d%d%d%d", 
            &(sort_keisoku_tbl[i].soku_data[0]), &(sort_keisoku_tbl[i].soku_data[1]), &(sort_keisoku_tbl[i].soku_data[2]),
            &(sort_keisoku_tbl[i].soku_data[3]), &(sort_keisoku_tbl[i].soku_data[4]), &(sort_keisoku_tbl[i].soku_data[5]),
            &(sort_keisoku_tbl[i].soku_data[6]), &(sort_keisoku_tbl[i].soku_data[7]), &(sort_keisoku_tbl[i].soku_data[8]),
            &(sort_keisoku_tbl[i].soku_data[9]) );
        }

        if ( count < i+1 ) {
            count = i+1;
        }
    }

    /* ｹｲｿｸ ﾃﾞｰﾀ ﾌｧｲﾙ OPEN -> NULL ? */
    if( (fp = fopen( fname, "w+b" )) == NULL ) {
        printf( "ｹｲｿｸ ﾃﾞｰﾀ ﾌｧｲﾙ OPEN ｴﾗｰ \n" );
        return;
    }

    /* ｹｲｿｸ ﾃﾞｰﾀ ﾋｮｳ ﾌｧｲﾙ WRITE -> 1ｲｶﾞｲ ? */
    if( fwrite( (char *)&sort_keisoku_tbl, count * sizeof( kojin_keisoku_tbl ), 1, fp ) != 1 ) {
            printf( "\n ｹｲｿｸ ﾃﾞｰﾀ ﾋｮｳ ﾌｧｲﾙ WRITE ｴﾗｰ" );
    }

    /* ｹｲｿｸ ﾃﾞｰﾀ ﾋｮｳ ﾌｧｲﾙ CLOSE */
    fclose( fp );
}