/*
 *	xkal2pcal.c : Prints yearly or one-shot reminders in pcal format.
 *		Output to given file or ~/.calendar.
 *
 *	George Ferguson, ferguson@cs.rochester.edu,  19 Feb 1991.
 *
 *	$Id: xkal2pcal.c,v 1.2 1991/12/31 23:02:22 jik Submitted $
 *
 */
#ifndef lint
static char rcs_id[] = "$Id: xkal2pcal.c,v 1.2 1991/12/31 23:02:22 jik Submitted $";
#endif
#include <stdio.h>
#include <X11/Intrinsic.h>
#include "app-resources.h"
#include "db.h"
#include "date-strings.h"
extern char *getenv();
extern int errno;

/*
 * Functions declared in this file
 */
int main();
static void syntax();

/*
 * Data declared in this file
 */
char *program;
AppResources appResources;
int appointsChanged = False;		/* need this for linkage */

/*	-	-	-	-	-	-	-	-	*/

int
main(argc, argv)
int argc;
char **argv;
{
    FILE *fp;
    char *s,output[1024];		/* how big shall we be? */
    int dow = 0,err;
    Yearrec *yp;
    Monrec *mp;
    Dayrec *dp;
    Msgrec *xp;

    program = *argv;
    XtToolkitInitialize();	/* gotta have this, although no display */
    getResources(&argc,argv);
    if (argc == 2) {
	strcpy(output,argv[1]);
    } else if (argc == 1) {
	strcpy(output,"");
	if ((s=getenv("HOME")) != NULL) {
	    strcpy(output,s);
	    strcat(output,"/");
	}
	strcat(output,".calendar");
    } else {
	exit(1);
    }
    initDb();
    initDateStrings();
    if (appResources.systemAppoints && *appResources.systemAppoints)
	readDb(appResources.systemAppoints,True);
    if (appResources.personalAppoints && *appResources.personalAppoints)
	readDb(appResources.personalAppoints,False);
    appResources.outputFormat = "%m %d %y%~%t ";
    if (strcmp(output,"-") == 0) {
	fp = stdout;
    } else if ((fp=fopen(output,"w")) == NULL) {
	err = errno;
	fprintf(stderr,"%s: ",program);
	errno = err;
	perror(output);
	exit(1);
    }
    for (yp = Db[dow]; yp != NULL; yp = yp->next)
	for (mp = yp->mons; mp != NULL; mp = mp->next)
	    for (dp = mp->days; dp != NULL; dp = dp->next)
		for (xp = dp->msgs; xp != NULL; xp = xp->next)
		    if (xp->month && xp->day)
			writeAppoint(fp,xp);
    fclose(fp);
    exit(0);
}

#ifdef USE_ALERT
/*
 * alert() : This function is defined so that db.c will link happily,
 *	although it will never be called since xkal2pcal runs in non-
 *	interactive mode.
 */
/*VARARGS*/
void
alert()
{
    /* notused */
}
#endif

static void
syntax()
{
    fprintf(stderr,"usage: %s [file]  (default is ~/.calendar)\n",program);
}