/* trans.c Programme de conversion du temps des fichiers standard VLF
en temps Unix (integer) - F5YG 07/11/2009
*/

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

int main ( int argc, char * argv [] ) {

    FILE * infile;
    FILE * outfile;
    char cVar;
    char pszOutFileName [80] = "data1.txt";
    int i;
    unsigned long int time;

    printf ( "\nProgramme de conversion du temps des fichiers standard VLF" );
    printf ( "\nsans entête et réduit à un seul émetteur sous forme d'un" );
    printf ( "\ninteger. Le fichier sera sauvegardé en tant que data1.txt." );
    printf ( "\nF5YG - 07/11/2009" );
    printf ( "\nUsage : trans <fichier source>\n" );

    infile = fopen ( argv [1], "r" );
    if ( infile == NULL ) {
        printf ( "\ntrans : Impossible d'ouvrir le fichier source '%s'\n", argv [1] );
    }

    outfile = fopen ( pszOutFileName, "w" );

    while ( ( cVar = fgetc ( infile ) ) != EOF ) {
	    for ( i = 0; i < 10; i++ ) {
	    cVar = fgetc ( infile );
	}
	
	time = 0;
	cVar = fgetc ( infile );
	time = atoi ( &cVar ) * 36000;
	cVar = fgetc ( infile );
	time = time + atoi ( &cVar ) * 3600;
	cVar = fgetc ( infile );
	cVar = fgetc ( infile );
	time = time + atoi ( &cVar ) * 600;
	cVar = fgetc ( infile );
	time = time + atoi ( &cVar ) * 60;
	cVar = fgetc ( infile );
	cVar = fgetc ( infile );
	time = time + atoi ( &cVar ) * 10;
	cVar = fgetc ( infile );
	time = time + atoi ( & cVar );
	fprintf ( outfile, "%6u", time );
		
	while ( cVar != 10 ) {
	    cVar = fgetc ( infile );
	    fputc ( cVar, outfile );
	}

    }
    
    fclose ( infile );
    fclose ( outfile );

    printf ( "\ntrans : Conversion terminée\n" );

}