Subversion Repositories svn1-original

/*************************************************************************

*           Copyright (C) 1992 Embedded Solutions.

*                       All rights reserved

*

* file:         noname.c

*

* purpose:      Create marathon time record in a manner

*               compatible with the BRMR program, as per the GETX07

*               program.

*

* functions:

*       main                    - Program entry point

*       get_team_number         - Get a team number from the user

*       read_field_data         - Read in existing team info

*       display_help            - Display help to the user

*

* programmer: David Purdie (DDP)

*

* revision  date        by      reason

*   00.0    19-Mar-94   DDP     created

*

**************************************************************************/

#include    <stdio.h>

#include    <stdlib.h>

#include    <ctype.h>

#include    <time.h>

#define TRUE    1

#define FALSE   0

/*

**  Global variables

*/

int         leg = 0;

char        ans;

FILE       *file;

char        filename[12];

char       *leg_table[] = {

    "Run",

    "Canoe",

    "Swim",

    "Horse",

    "Cycle",

};

time_t      teamtime[1000];

/*

**  Forward prototypes

*/

void        read_field_data( FILE * file );

void        display_help( int );

/*========================================================================

 *

 *  Program entry point

 *

 *  Purpose:

 *      This function is called start the program

 *

 *  Parameters:

 *      argc            - Number of arguments

 *      argv            - Address of argument pointers

 *

 *  Returns:

 *      Nothing

 *      Exit with valid exit codes

 *

 *========================================================================*/

main( int argc, char *argv[] )

{

    char        input[30];

    int         team;

    time_t     *teamptr;

    time_t      curtime;

    char        data_entered = FALSE;

    /*

     **  Display HELP

     */

    display_help( 0 );

    /*

     **  Determine the leg to get data for

     */

    if( argc >= 2 )

        leg = atoi( argv[1] );

/*

**  Initialise the team data base

*/

    for( team = 0, teamptr = teamtime; team < 999; team++, teamptr++ )

    {

        *teamptr = 0;

    }

    do

    {

        while( leg == 0 )

        {

            printf( "Which leg to collect data for : " );

            scanf( "%d", &leg );

            fflush( stdin );

        }

        if( ( leg == 0 )

            || ( leg > sizeof( leg_table ) / sizeof( leg_table[0] ) ) )

        {

            printf( "Invalid leg\n" );

            leg = 0;

            continue;

        }

        sprintf( filename, "LEG%1.1d", leg );

        file = fopen( filename, "at+" );

        if( file == NULL )

        {

            printf( "Error opening file\n" );

            exit( 1 );

        }

        fseek( file, 0, SEEK_END );

        if( ftell( file ) != 0 )

        {

            printf( "Leg data already exists. Append new data ? " );

            scanf( "%c", &ans );

            fflush( stdin );

            if( toupper( ans ) != 'Y' )

            {

                fclose( file );

                leg = 0;

                continue;

            }

            read_field_data( file );

        }

    } while( leg == 0 );

/*

**  Main loop: Collect team numbers from the uer

*/

    while( 1 )

    {

        /*

         ** Get the team number

         */

        printf( "Enter team > " );

        team = get_team_number();

        teamptr = &teamtime[team % 1000];

        /*

         **  Team-999 Exit

         */

        if( team == 999 )

            break;

        /*

         **  Just display the time

         */

        else if( team == 0 )

        {

            time( &curtime );

            printf( " %8.8s\n", ctime( &curtime ) + 11 );

            continue;

        }

        /*

         **  Save data to disk

         */

        else if( team == -1 )

        {

            if( data_entered )

            {

                fflush( file );

                fclose( file );

                file = fopen( filename, "at+" );

                if( file == NULL )

                {

                    printf( " Panic Cannot re-open data file\n" );

                    exit( 1 );

                }

                else

                    printf( " Data saved to disk\n" );

                data_entered = FALSE;

            }

            else

                printf( "\r" );

            continue;

        }

        else if( team == -2 )

            display_help( 1 );

        /*

         **  Determine operation

         **      1..998      Enter team data

         */

        else if( team < 999 )

        {

            if( *teamptr )

            {

                printf( " Already entered at %8.8s\a\n",

                        ctime( teamptr ) + 11 );

            }

            else

            {

                time( teamptr );

                printf( " %8.8s\n", ctime( teamptr ) + 11 );

                fprintf( file, "%3.3d %8.8s\n", team, ctime( teamptr ) + 11 );

                data_entered = TRUE;

            }

        }

        /*

         **  Overwrite team information

         **      1001..1998

         */

        else if( team < 1999 )

        {

            if( *teamptr )

            {

                printf( " Was %8.8s. ", ctime( teamptr ) + 11 );

                time( teamptr );

                printf( " Now %8.8s\a\n", ctime( teamptr ) + 11 );

                fprintf( file, "%3.3d %8.8s\n", team, ctime( teamptr ) + 11 );

                data_entered = TRUE;

            }

        }

        /*

         **  Display team time

         **      2001..2998

         */

        else if( team < 2999 )

        {

            if( *teamptr )

            {

                printf( " Entered as %8.8s\a\n", ctime( teamptr ) + 11 );

            }

            else

                printf( " Has not been entered\n" );

        }

        /*

         **  Invalid team number

         */

        else

        {

            printf( " Invalid team number\a\n" );

        }

    }

    /*

     **  Happy ending. Save the data and exit

     **  As some data may be duplicated on disk we should re-write the

     **  Entire file

     */

    fclose( file );

    printf( "\nCreating ordered data file\n" );

    file = fopen( "LEG.WRK", "wtt" );

    if( file == NULL )

    {

        printf( "Error creating linear data record of times\n" );

        exit( 1 );

    }

    for( team = 1, teamptr = &teamtime[1]; team < 999; team++, teamptr++ )

    {

        if( *teamptr )

            fprintf( file, "%3.3d %8.8s\n", team, ctime( teamptr ) + 11 );

    }

    fclose( file );

    remove( filename );

    if( rename( "LEG.WRK", filename ) != 0 )

    {

        perror( "Error renaming work file" );

        exit( 1 );

    }

    exit( 0 );

}

/*========================================================================

 *

 *  Get a team number from the user

 *

 *  Purpose:

 *      This function is called to get a team number from the user

 *

 *  Parameters:

 *      None

 *

 *  Returns:

 *      Team number

 *          0               - Just display time

 *          -1              - Time to save data

 *          -2              - Display help

 *

 *===========================================================================*/

int get_team_number(void)

{

    int         team = 0;

    int         num_digits = 0;

    int         ch;

    time_t      dummy;

    time_t      last_time = time( &dummy );

    /*

     **  Collect a number

     */

    for( ;; )

    {

        if( kbhit() )

        {

            ch = getch();

            /*

             **  Process the character

             */

            if( ch == '?' && num_digits == 0 )

                return ( -2 );

            if( ( ch == '\r' ) || ( ch == '\n' ) || ( ch == ' ' )

                || ( ch == ',' ) || ( ch == 0x1b ) || ( ch == 0x03 ) )

                return ( team );

            else if( ( ch >= '0' && ch <= '9' ) && ( num_digits < 4 ) )

            {

                num_digits += 1;

                team = team * 10 + ch - '0';

                putch( ch );

            }

            else if( ( ch == '\b' || ch == 0x177 ) && ( num_digits ) )

            {

                num_digits -= 1;

                team = team / 10;

                cputs( "\b \b" );

            }

            else

                putch( '\a' );

        }

        /*

         **  No key available

         **  Check time and save data if required

         */

        else if( num_digits == 0 )

        {

            if( time( &dummy ) - last_time > 20 )

                return ( -1 );

        }

    }

}

/*========================================================================

 *

 *  Read in existing team info

 *

 *  Purpose:

 *      This function is called to Read in existing team info

 *

 *  Parameters:

 *      file    - File pointer

 *

 *  Returns:

 *      Nothing

 *

 *========================================================================*/

void read_field_data( FILE * file )

{

    int         cnt;

    int         team, hh, mm, ss;

    /*

     **  Start from the begining

     */

    fseek( file, 0, SEEK_SET );

    while( feof( file ) == 0 )

    {

        cnt = fscanf( file, "%d %d:%d:%d", &team, &hh, &mm, &ss );

        if( cnt == 4 && team > 0 && team < 9999 )

        {

            teamtime[team] =

                ( long ) ss + ( ( long ) mm * 60 ) +

                ( ( long ) hh * 60 * 60 );

        }

    }

    /*

     **  Ensure file is at end

     */

    fseek( file, 0, SEEK_END );

}

/*========================================================================

 *

 *  Display help to the user

 *

 *  Purpose:

 *      This function is called to Display help to the user

 *

 *  Parameters:

 *      type            1 - Short help

 *                        - Long help

 *

 *  Returns:

 *      Nothing

 *

 *========================================================================*/

void display_help( int type )

{

    printf( "\n" );

    if( type != 1 )

    {

        printf

            ( "This program will simulate marathon data collection on a PC\n" );

        printf( "This program will save data to disk periodically\n" );

        printf( "Commands are:\n" );

    }

    printf( " nnn    - Register team time\n" );

    printf( "1nnn    - Force team time, override any existing time\n" );

    printf( "2nnn    - Display team time\n" );

    printf( " 999    - Exit program (DO NOT USE CONTROL-C)\n" );

}

/********************************* EOF ***********************************/