Cooldt Code

/*
 * cooldt: A cool-down time calculator for multi-layers pipe
 *
 * Copyright 2010, 2013 Benjamin DEGLO DE BESSES. All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without modification, are
 * permitted provided that the following conditions are met:
 *
 *    1. Redistributions of source code must retain the above copyright notice, this list of
 *       conditions and the following disclaimer.
 *
 *    2. Redistributions in binary form must reproduce the above copyright notice, this list
 *       of conditions and the following disclaimer in the documentation and/or other materials
 *       provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY Benjamin DEGLO DE BESSES "AS IS" AND ANY EXPRESS OR IMPLIED
 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND
 * FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL Benjamin DEGLO DE BESSES OR
 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON
 * ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 *
 */

#include "cooldt.h"
/*
 * main input of cooldt
 * The Return code of main is the number of errors
 */
int main(int argc, char *argv[])
{
    int NumberOfErrors = 0 ;

    /*
     * Too few argument
     */
    if ( argc < 2 )
    {
        WriteLicense(stdout) ;
        WriteHelpMessage(stdout) ;
        fprintf(stderr, "ERROR: too few argument\n") ;
        NumberOfErrors++;
    }

    /*
     * Too many arguments
     */
    else if ( argc > 2 )
    {
        WriteLicense(stdout) ;
        WriteHelpMessage(stdout) ;
        fprintf(stderr, "ERROR: too many arguments\n") ;
        NumberOfErrors++;
    }

    /*
     * One argument as required (argc=2)
     */
    else
    {
        /*
         * Create the output file name and open this file
         */
        char OutputFileName[CharBufferSize] ;
        FileNameDotTxt(argv[1], OutputFileName) ;
        FILE *fp = fopen( OutputFileName, "w") ;
        char ErrorMessage[CharBufferSize] ;

        WriteShortLicense(fp) ;
        WriteShortLicense(stdout) ;

        PipeProblem* PP = (PipeProblem*)malloc(sizeof(PipeProblem)) ;

        /*
         * Read the input data
         * Write potentials errors messages to the output file
         */
        NumberOfErrors += ReadData(fp, PP, argv[1]) ;

        /*
         * The input file is OK
         */
        if ( NumberOfErrors == 0 )
        {
            WriteInputData(fp, PP) ;

            /*
             * Check if input data values are OK
             * Write potentials errors messages to the output file
             */
            NumberOfErrors += CheckInputData(fp, ErrorMessage, PP) ;

            /*
             * The data are OK
             */
            if ( NumberOfErrors == 0)
            {
                /*
                 * Calculate the time step and cells number to reach the accuracy
                 * write the accuracy control report to OutputStream
                 */
                aaControl(fp, PP) ;

                /*
                 * Calculate the solution
                 * then write the results to OutputStream
                 */
                SolutionFullOutput(fp, PP) ;
            }
        }

        /*
         * Close the output file
         */
        fclose(fp) ;

        /*
         * Free data structures and pointers
         */
        FreePipeProblem(PP) ;
        free(PP) ;

        /*
         * Check for errors and return a message to stderr if any
         */
        if ( NumberOfErrors != 0 )
        {
            fprintf(stderr,"%i ERROR(S): see %s for details\n", NumberOfErrors, OutputFileName) ;
        }
    }

    /*
     * return the numbers of errors
     */
    return (NumberOfErrors) ;
}
/* End of main.c */