openfile.cc

c++编写的并行拉马克遗传算法的程序。实现分析对接程序

/* openfile.cc */

#ifdef sgi
    #include <stdio.h>
    #include <stdlib.h>
    #include "openfile.h"
#else
    extern "C"
    {
	#include <stdio.h>
	#include <stdlib.h>
        #include "openfile.h"
    }
#endif


extern char *programname;
extern FILE *logFile;

/*----------------------------------------------------------------------------*/
int openfile( char filename[MAX_CHARS],
	      char mode[],
	      FILE **fp )

{
	if ( (*fp = fopen(filename, mode)) == NULL ) {
		fprintf(stderr, "\n%s: I'm sorry; I can't find or open \"%s\"\n", programname, filename);
		fprintf(logFile,"\n%s: I'm sorry; I can't find or open \"%s\"\n", programname, filename);
		return( FALSE );
	}
	return( TRUE );
}

/*----------------------------------------------------------------------------*/
int openFile( char       filename[MAX_CHARS],
	      char       mode[],
	      FILE       **fp,
	      Clock      start,
	      struct tms tms_start,
	      Boole      mayExit)

{
    Clock  jobEnd;
    struct tms tms_jobEnd;

    if ( (*fp = fopen(filename, mode)) == NULL ) {
	fprintf(stderr, "\n%s: I'm sorry; I can't find or open \"%s\"\n", programname, filename);
	fprintf(logFile,"\n%s: I'm sorry; I can't find or open \"%s\"\n", programname, filename);

	jobEnd = times( &tms_jobEnd );
	timesys( jobEnd - start, &tms_start, &tms_jobEnd );
	pr_2x( logFile, stderr, UnderLine );

	if (mayExit) {
	    exit(-1); /* END PROGRAM */
	} else {
	    return( FALSE );
	}
    }
    return( TRUE );
}
/*----------------------------------------------------------------------------*/