1 files changed, 135 insertions, 0 deletions
diff --git a/src/event.c b/src/event.c
new file mode 100755
index 0000000..4cf3953
--- /dev/null
+++ b/src/event.c
@@ -0,0 +1,135 @@
+/*	$calcurse: event.c,v 1.1 2006/07/31 21:00:03 culot Exp $	*/
+
+/*
+ * Calcurse - text-based organizer
+ * Copyright (c) 2004-2006 Frederic Culot
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
+ *
+ * Send your feedback or comments to : calcurse@culot.org
+ * Calcurse home page : http://culot.org/calcurse
+ *
+ */
+
+#include <ncurses.h>
+#include <stdlib.h>
+#include <string.h>
+#include <sys/types.h>
+#include <time.h>
+
+#include "i18n.h"
+#include "event.h"
+#include "utils.h"
+
+struct event_s *eventlist;
+
+/* Create a new event */
+struct event_s *event_new(char *mesg, long day, int id)
+{
+	struct event_s *o, **i;
+	o = (struct event_s *) malloc(sizeof(struct event_s));
+	o->mesg = (char *) malloc(strlen(mesg) + 1);
+	strcpy(o->mesg, mesg);
+	o->day = day;
+	o->id = id;
+	i = &eventlist;
+	for (;;) {
+		if (*i == 0 || (*i)->day > day) {
+			o->next = *i;
+			*i = o;
+			break;
+		}
+		i = &(*i)->next;
+	}
+	return o;
+}
+
+/* Check if the event belongs to the selected day */
+unsigned event_inday(struct event_s *i, long start)
+{
+	if (i->day <= start + 3600 * 24 && i->day > start) {
+		return 1;
+	}
+	return 0;
+}
+
+/* Write to file the event in user-friendly format */
+void event_write(struct event_s *o, FILE * f)
+{
+	struct tm *lt;
+	time_t t;
+
+	t = o->day;
+	lt = localtime(&t);
+	fprintf(f, "%02u/%02u/%04u [%d] %s\n",
+		lt->tm_mon + 1, lt->tm_mday, 1900 + lt->tm_year, o->id, o->mesg);
+}
+
+/* Load the events from file */
+struct event_s *event_scan(FILE * f, struct tm start, int id)
+{
+	struct tm *lt;
+	char buf[MESG_MAXSIZE], *nl;
+	time_t tstart, t;
+
+	t = time(NULL);
+	lt = localtime(&t);
+
+        /* Read the event description */
+	fgets(buf, MESG_MAXSIZE, f);
+	nl = strchr(buf, '\n');
+	if (nl) {
+		*nl = '\0';
+	}
+        start.tm_hour = 12;
+        start.tm_min = 0;
+	start.tm_sec =  0;
+	start.tm_isdst = -1;
+	start.tm_year -= 1900;
+	start.tm_mon--;
+
+	tstart = mktime(&start);
+	if (tstart == -1) {
+		fputs(_("FATAL ERROR in event_scan: date error in the event\n"), stderr);
+		exit(EXIT_FAILURE);
+	}
+	return event_new(buf, tstart, id);
+}
+
+/* Delete an event from the list */
+void event_delete_bynum(long start, unsigned num)
+{
+	unsigned n;
+	struct event_s *i, **iptr;
+
+	n = 0;
+	iptr = &eventlist;
+	for (i = eventlist; i != 0; i = i->next) {
+		if (event_inday(i, start)) {
+			if (n == num) {
+				*iptr = i->next;
+				free(i->mesg);
+				free(i);
+				return;
+			}
+			n++;
+		}
+		iptr = &i->next;
+	}
+	/* NOTREACHED */
+	fputs(_("FATAL ERROR in event_delete_bynum: no such event\n"), stderr);
+	exit(EXIT_FAILURE);
+}