mirror of
https://github.com/GnoConsortium/gno.git
synced 2024-05-29 02:41:28 +00:00
b40c451852
Updates for v1.1 as submitted by Marlin Allred. His comments: "I compiled calendar with the 2.0.6 libraries and fixed it so the date could be put anywhere on the line. I also fix[ed] the program so that tomorrow's and Monday's activity was also being listed. The man page for calendar was also updated. [...] I did not update the source file to indicate the changes made." calendar.desc: Updated for v1.1.
110 lines
4.2 KiB
C
110 lines
4.2 KiB
C
/* Calendar file v1.0. Copyright 1994 by Christopher Neufeld */
|
|
/* The executable for this file contains linked runtime libraries
|
|
copyrighted by The Byte Works. Used with permission. */
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <stddef.h>
|
|
#include <time.h>
|
|
#include <ctype.h>
|
|
#include <string.h>
|
|
|
|
#pragma stacksize 512
|
|
|
|
#define NMONTHS 12
|
|
#define NDAYS 31
|
|
#define MAXLINELEN 255
|
|
|
|
#define CALFILE "calendar"
|
|
|
|
#define SECSPERDAY (24 * 60 * (long)60)
|
|
|
|
const char months[NMONTHS][4] = {"jan", "feb", "mar", "apr", "may", "jun",
|
|
"jul", "aug", "sep", "oct", "nov", "dec"};
|
|
|
|
#ifdef NODIFFTIME
|
|
#define difftime(x1,x2) (double)((x1) - (x2))
|
|
#endif /* Note that this is not necessarily portable, but works with */
|
|
/* some systems which don't have 'difftime' */
|
|
|
|
int main(void)
|
|
{
|
|
FILE *ifile;
|
|
time_t t1, t2;
|
|
struct tm st1, st2;
|
|
int monthnum, daynum, dayschk, i, j;
|
|
char *ptr1, *ptr2, holdmnth[4];
|
|
static char thislin[MAXLINELEN+1];
|
|
long deltat;
|
|
long ldayschk;
|
|
|
|
if ((ifile = fopen(CALFILE, "r")) == NULL) exit(0); /* Open calendar file
|
|
in CWD. If there is none, exit successfully */
|
|
t1 = time(NULL); /* Get the current time */
|
|
st1 = *localtime(&t1); /* Convert to formatted date/time */
|
|
st1.tm_sec = st1.tm_min = st1.tm_hour = 0; /* Pretend it's midnight, it
|
|
makes the checking later much easier */
|
|
t1 = mktime(&st1); /* Make an internal representation for that midnight
|
|
(the one which heralded today's date) */
|
|
dayschk = (st1.tm_wday >= 5) ? 8 - st1.tm_wday : 2; /* Check today and
|
|
tomorrow, unless tomorrow is on the weekend, in
|
|
which case we check up to and including Monday */
|
|
thislin[MAXLINELEN] = 0;
|
|
while (!feof(ifile)) {
|
|
if (fgets(thislin, MAXLINELEN, ifile) == NULL) { /* Get a line from the calendar file */
|
|
if (feof(ifile)) break; /* Didn't read a line, if we're done, quit */
|
|
fprintf(stderr, "Can't happen\n");
|
|
continue; /* Something funny happened on the read */
|
|
}
|
|
ptr1 = thislin;
|
|
while (isspace(*ptr1) && *ptr1 != 0) ptr1++; /* Flush initial whitespace */
|
|
if (*ptr1 == 0) continue; /* Blank line */
|
|
monthnum = -1;
|
|
while (*ptr1) {
|
|
if (isdigit(*ptr1)) { /* month/day format */
|
|
monthnum = strtoul(ptr1, &ptr2, 10) - 1;
|
|
daynum = strtoul(ptr2+1, NULL, 10);
|
|
/* We've now parsed a month/day format line */
|
|
if (monthnum && monthnum < NMONTHS && daynum && daynum <= NDAYS)
|
|
break; /* Valid date, print line of the file */
|
|
} else {
|
|
for (i=0; i<3; i++) holdmnth[i] = tolower(ptr1[i]); /* make the search
|
|
case-insensitive */
|
|
holdmnth[3] = 0;
|
|
for (i = 0; i < NMONTHS; i++)
|
|
if (!(strcmp(holdmnth, months[i]))) {
|
|
monthnum = i; /* look for "jan", "feb", etc. */
|
|
break;
|
|
}
|
|
if (monthnum != -1) { /* found a valid month, get day */
|
|
while (!isspace(*ptr1) && *ptr1 != 0) ptr1++; /* flush text */
|
|
if (*ptr1 == 0) break;
|
|
while (isspace(*ptr1) && *ptr1 != 0) ptr1++; /* flush whitespace */
|
|
if (*ptr1 == 0) break; /* No day number, go to next line in file */
|
|
daynum = atoi(ptr1); /* get day number */
|
|
if (daynum >= 1 && daynum <= NDAYS) break; /* Valid, go print line */
|
|
}
|
|
}
|
|
ptr1++;
|
|
}
|
|
st2.tm_sec = st2.tm_min = st2.tm_hour = st2.tm_isdst = 0;
|
|
st2.tm_mday = daynum;
|
|
st2.tm_mon = monthnum;
|
|
st2.tm_year = st1.tm_year;
|
|
/* We've now set up the time for midnight at the
|
|
beginning of the day represented by the line we
|
|
found in the calendar file */
|
|
t2 = mktime(&st2); /* Change to internal format */
|
|
if ((deltat = difftime(t2, t1)) < 0) { /* The day was in the past, check
|
|
the same date next year */
|
|
st2.tm_year++;
|
|
t2 = mktime(&st2);
|
|
deltat = difftime(t2, t1);
|
|
}
|
|
if (deltat <= dayschk * SECSPERDAY) printf(thislin);
|
|
/* print the entire line if it is inside our acceptance window */
|
|
}
|
|
fclose(ifile);
|
|
exit(0);
|
|
}
|