/*
	creatdct.h

	Master include file

	Copyright (c) 1992 by CRC
*/

#include <stdio.h>
#include "machdep.h"

/* -------------------------------------------------------------------- */
					/* main() Return codes		*/
#define	SYNTAX_ERROR	1
#define FILE_ERROR	2
#define IO_ERROR	3
#define TOOLONG_ERROR	4
#define UEOF_ERROR	5
#define BADINPUT_ERROR	6

					/* Option structure 		*/
struct optionsdf {
	int	skip_blanks ; 
	int	dct_only ;
	int	notitle ; 
	int	debug ; 
} ;
extern struct optionsdf options ;

extern char progname[] ;


/* -------------------------------------------------------------------- */
					/* Line structure and def	*/

struct maskdf {
	int	n ;			/* length of mask	*/
	char	s[MAXWIDTH] ;
} ;


typedef struct maskdf Mask ;
typedef struct maskdf Line ;

#define NumMarker	'9'		/* !! change to 1		*/


/* -------------------------------------------------------------------- */
					/* I/O 				*/
extern char filename[FILENAMELENGTH] ; 

extern FILE *inf ;
extern int end_of_file ; 
extern int eof_okay ;

#define EndOfFile	1

/* -------------------------------------------------------------------- */
					/* variable layout		*/

#define NAMELEN		8

struct vardf {
	short int	col ;		/* column number	*/
	short int	w ; 		/* width		*/
	short int	tcol ;		/* ttl col number	*/
	short int	tw ; 		/* ttl width		*/
	char		name[NAMELEN] ;	/* name			*/
	char		vt ; 		/* variable type	*/
} ;

extern struct vardf vars[MAXVARS] ;
extern int numvar ;
extern int maxlinelength ;
extern int first_dta_line_no ;
extern int title_trouble ;

/* ordered: */
#define TYPE_BYTE	1
#define TYPE_INT	2
#define TYPE_LONG	3
#define TYPE_FLOAT	4
#define TYPE_STR	99



/* -------------------------------------------------------------------- */
					/* Stata type ranges		*/
#define MIN_BYTE	(-127.0e0)
#define MAX_BYTE	(126.0e0 )
#define MIN_INT		(-32768.0e0)
#define MAX_INT		(32766.0e0)
#define MIN_LONG	(-2147483648.0e0)
#define MAX_LONG	(2147483646.0e0)



/* -------------------------------------------------------------------- */
					/* External linkages		*/
/* creatdct.c */
int main() ;

/* pass1.c */
void pass1() ;

/* pass2.c */
void pass2() ;

/* pass3.c */
void pass3() ;


/* getline.c */
void reopen() ;
int input_line_no() ;
int getline() ;
int getnbline() ;
int getdtaline() ;

/* utils.c */
void initline() ;
void extend_line() ;
void cpytitlestr() ;

/* gnlutils.c */
char *skipblnk() ;
void stccpy() ;
void lowercase() ;
void cpytok() ;
void righttrim() ;
void righttrimchar() ;
int  haschar() ;
int  indexc() ;

/* chkifdbl.c */
int chkifdbl() ;