/*
** Do not change these include commands.
** All necessary header files are included in "geminc.h".
** All macros and constants are in "gemprm.h" and "bridge.h".
*/
#include "geminc.h"
#include "gemprm.h"
#include "bridge.h"

#include "decod_ut.h"

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

/************************************************************************
 * DCMSFC								*
 *									*
 * This program decodes ship, buoy, and C-MAN reports into BUFR output. *
 *									*
 *  Command line:							*
 *  dcmsfc [options] [bufrtb] [msfctbl] [tidetbl] [rshpfl]              *
 *                                                                      *
 *  bufrtb        = BUFR table                                          *
 *  msfctbl       = Marine surface station table                        *
 *  tidetbl       = Tide gauge station table                            *
 *  rshpfl        = List of WMO bulletins which contain restricted	*
 *		    ship data						*
 **									*
 * Log:									*
 * K. Tyle/GSC		 4/97	Based on DCMETR				*
 * R. Hollern/NCEP	12/97	Eliminated gempak references 		*
 * J. Ator/NCEP		05/01	Remove call to uerror			*
 * J. Ator/NCEP         01/05   Increased ndfhr1 from 120 to 240        *
 * C. Caruso Magee/NCEP 03/05   Added tide gauge station table          *
 * C. Caruso Magee/NCEP 02/06   Added new args to calling sequence of   *
 *                              dc_gopt                                 *
 * J. Ator/NCEP         01/09   Add circflg to dc_gopt call sequence    *
 * J. Ator/NCEP		07/09	Add rshpfl argument			*
 * M. Weiss/NCEP        01/19   Modify for Dell environment             *
 * J. Ator/NCEP         09/21   Modify for WCOSS2 environment           *
 ***********************************************************************/
{

/*
**	Change the values of these default variables for the
**	specific decoder.
**
**	These variables are the number of expected command line
**	parameters; the program name; the packing and station tables;
**	values for the the number of additional stations and the
**	number of times; and the number of hours, prior to the
**	"current" time, to decode.
*/

#define NUMEXP 4

	int	nexp    = NUMEXP;
	char	*prgnam = "DCMSFC";

/*
**	Define the standard decoder parameters.
*/
	char	stntbl[DCMXLN], stntb2[DCMXLN];
	char	prmfil[DCMXLN];
	int	iadstn;
	int	maxtim;
	int	nhours;
	int	txtflg;
	int	iwndht;
	int	circflg;

/*
**      Define default values for the standard decoder parameters.
*/
	char	*defprm = " ";
	char	*defstn = " ";
	char	*dfstn2 = " ";
	int	idfadd  = 0;
	int	idfmax  = 0;
	int	ndfhr1  = 240;
	int	ndfhr2  = 240;
	int	idfwdh  = 0;

/*      Define the additional decoder parameters.
*/
        const char *dvstr = DVSTR;  /* DVSTR is a compile-time macro */
	char	bufrtb[DCMXLN];
        char    msfctbl[DCMXLN];
        char    tidetbl[DCMXLN];
        char    rshpfl[DCMXLN];
/*
**      Do not change these variables.  These variables are used by all
**      decoders for getting the command line parameters.
*/
        char    parms[NUMEXP][DCMXLN];
        char    curtim[DCMXLN];
        int     num;
        int     iret;
        int     ier;
         
/*---------------------------------------------------------------------*/

/*
**	Initialize the output logs, set the time out and 
**	parse the command line parameters.
*/
	dc_init ( prgnam, argc, argv, nexp, parms, &num, &iret );

/*
**	Check for an initialization error.
**	On an error, exit gracefully.
*/
	if  ( iret < 0 )  {
	    dc_exit ( &iret );
	}

/*
**	For all optional command line parameters, set default    
**      values for the corresponding decoder parameters.
*/
        dc_gopt ( defprm, defstn, dfstn2, idfadd, idfmax, ndfhr1,
                  ndfhr2, idfwdh, prmfil, stntbl, stntb2, &iadstn,
                  &maxtim, curtim, &nhours, &txtflg, &circflg,
		  &iwndht, &iret );
                                                                                
/*
**
**	Set default value for additional decoder parameter
*/
	strcpy ( bufrtb, "bufrtab.001" );
	strcpy ( msfctbl, "msfc.tbl" );
	strcpy ( tidetbl, "tidg.tbl" );
	strcpy ( rshpfl, "decod_restricted.ship.headers" );

/*
**      Now, for each additional decoder parameter, if a value was
**      defined on the command line, then use that value instead of
**      the default value.
*/
        if ( num > 0 ) {
           strcpy ( bufrtb, parms[0] );
        }

        if ( num > 1 ) {
           strcpy ( msfctbl, parms[1] );
        }

        if ( num > 2 ) {
           strcpy ( tidetbl, parms[2] );
        }

        if ( num > 3 ) {
           strcpy ( rshpfl, parms[3] );
        }
/*
**	Call the decoding routine.
**
**	Change this function call, define command, and prototype
**	for the specific decoder.
*/

#ifdef UNDERSCORE
#define ma_dcod ma_dcod_
#endif

	void ma_dcod ( char *, char *, char *, char *, char *, int *, int *,
                       size_t, size_t, size_t, size_t, size_t );

        ut_prvs ( dvstr, strlen(dvstr) );
	ma_dcod ( curtim, msfctbl, tidetbl, bufrtb, rshpfl,
		  &nhours, &iret, strlen(curtim), 
		  strlen(msfctbl), strlen(tidetbl),
		  strlen(bufrtb), strlen(rshpfl) );
/*
**	Send a shut down message to the logs and close the log files.
*/
	dc_exit ( &iret );

}