[BACK]Return to day.c CVS log [TXT][DIR] Up to [local] / src / usr.bin / calendar

Diff for /src/usr.bin/calendar/day.c between version 1.15 and 1.31

version 1.15, 2003/06/03 02:56:06 version 1.31, 2015/12/07 18:46:35
Line 29 
Line 29 
  * SUCH DAMAGE.   * SUCH DAMAGE.
  */   */
   
 #ifndef lint  
 static const char copyright[] =  
 "@(#) Copyright (c) 1989, 1993\n\  
         The Regents of the University of California.  All rights reserved.\n";  
 #endif /* not lint */  
   
 #ifndef lint  
 #if 0  
 static const char sccsid[] = "@(#)calendar.c  8.3 (Berkeley) 3/25/94";  
 #else  
 static char rcsid[] = "$OpenBSD$";  
 #endif  
 #endif /* not lint */  
   
 #include <sys/types.h>  #include <sys/types.h>
 #include <sys/uio.h>  #include <sys/uio.h>
   
Line 53 
Line 39 
 #include <stdlib.h>  #include <stdlib.h>
 #include <string.h>  #include <string.h>
 #include <time.h>  #include <time.h>
 #include <tzfile.h>  
   
 #include "pathnames.h"  #include "pathnames.h"
 #include "calendar.h"  #include "calendar.h"
   
   extern struct iovec header[];
   
 #define WEEKLY 1  #define WEEKLY 1
 #define MONTHLY 2  #define MONTHLY 2
 #define YEARLY 3  #define YEARLY 3
Line 65 
Line 52 
 struct tm *tp;  struct tm *tp;
 int *cumdays, offset;  int *cumdays, offset;
 char dayname[10];  char dayname[10];
   enum calendars calendar;
   u_long julian;
   
   
 /* 1-based month, 0-based days, cumulative */  /* 1-based month, 0-based days, cumulative */
Line 88 
Line 77 
 static struct fixs fnmonths[13];      /* full national months names */  static struct fixs fnmonths[13];      /* full national months names */
 static struct fixs nmonths[13];       /* short national month names */  static struct fixs nmonths[13];       /* short national month names */
   
   void
   fill_print_date(struct match *m, struct tm *tm)
   {
           if (strftime(m->print_date, sizeof(m->print_date),
               daynames ? "%a %b %d" : "%b %d", tm) == 0)
                   m->print_date[sizeof(m->print_date) - 1] = '\0';
   }
   
 void setnnames(void)  void
   setnnames(void)
 {  {
         char buf[80];          char buf[80];
         int i, l;          int i, l;
Line 98 
Line 95 
         for (i = 0; i < 7; i++) {          for (i = 0; i < 7; i++) {
                 tm.tm_wday = i;                  tm.tm_wday = i;
                 l = strftime(buf, sizeof(buf), "%a", &tm);                  l = strftime(buf, sizeof(buf), "%a", &tm);
                 for (; l > 0 && isspace((int)buf[l - 1]); l--)                  for (; l > 0 && isspace((unsigned char)buf[l - 1]); l--)
                         ;                          ;
                 buf[l] = '\0';                  buf[l] = '\0';
                 if (ndays[i].name != NULL)                  if (ndays[i].name != NULL)
Line 108 
Line 105 
                 ndays[i].len = strlen(buf);                  ndays[i].len = strlen(buf);
   
                 l = strftime(buf, sizeof(buf), "%A", &tm);                  l = strftime(buf, sizeof(buf), "%A", &tm);
                 for (; l > 0 && isspace((int)buf[l - 1]); l--)                  for (; l > 0 && isspace((unsigned char)buf[l - 1]); l--)
                         ;                          ;
                 buf[l] = '\0';                  buf[l] = '\0';
                 if (fndays[i].name != NULL)                  if (fndays[i].name != NULL)
Line 121 
Line 118 
         for (i = 0; i < 12; i++) {          for (i = 0; i < 12; i++) {
                 tm.tm_mon = i;                  tm.tm_mon = i;
                 l = strftime(buf, sizeof(buf), "%b", &tm);                  l = strftime(buf, sizeof(buf), "%b", &tm);
                 for (; l > 0 && isspace((int)buf[l - 1]); l--)                  for (; l > 0 && isspace((unsigned char)buf[l - 1]); l--)
                         ;                          ;
                 buf[l] = '\0';                  buf[l] = '\0';
                 if (nmonths[i].name != NULL)                  if (nmonths[i].name != NULL)
Line 131 
Line 128 
                 nmonths[i].len = strlen(buf);                  nmonths[i].len = strlen(buf);
   
                 l = strftime(buf, sizeof(buf), "%B", &tm);                  l = strftime(buf, sizeof(buf), "%B", &tm);
                 for (; l > 0 && isspace((int)buf[l - 1]); l--)                  for (; l > 0 && isspace((unsigned char)buf[l - 1]); l--)
                         ;                          ;
                 buf[l] = '\0';                  buf[l] = '\0';
                 if (fnmonths[i].name != NULL)                  if (fnmonths[i].name != NULL)
Line 141 
Line 138 
                 fnmonths[i].len = strlen(buf);                  fnmonths[i].len = strlen(buf);
         }          }
         /* Hardwired special events */          /* Hardwired special events */
         spev[0].name = strdup(EASTER);          spev[0].name = strdup(PESACH);
         spev[0].nlen = EASTERNAMELEN;          spev[0].nlen = PESACHLEN;
         spev[0].getev = easter;          spev[0].getev = pesach;
         spev[1].name = strdup(PASKHA);          spev[1].name = strdup(EASTER);
         spev[1].nlen = PASKHALEN;          spev[1].nlen = EASTERNAMELEN;
         spev[1].getev = paskha;          spev[1].getev = easter;
           spev[2].name = strdup(PASKHA);
           spev[2].nlen = PASKHALEN;
           spev[2].getev = paskha;
         for (i = 0; i < NUMEV; i++) {          for (i = 0; i < NUMEV; i++) {
                 if (spev[i].name == NULL)                  if (spev[i].name == NULL)
                         err(1, NULL);                          err(1, NULL);
Line 155 
Line 155 
 }  }
   
 void  void
 settime(now)  settime(time_t *now)
         time_t *now;  
 {  {
         tp = localtime(now);          tp = localtime(now);
         tp->tm_sec = 0;          tp->tm_sec = 0;
Line 165 
Line 164 
         tp->tm_isdst = 0;          tp->tm_isdst = 0;
         tp->tm_hour = 12;          tp->tm_hour = 12;
         *now = mktime(tp);          *now = mktime(tp);
         if (isleap(tp->tm_year + TM_YEAR_BASE))          if (isleap(tp->tm_year + 1900))
                 cumdays = daytab[1];                  cumdays = daytab[1];
         else          else
                 cumdays = daytab[0];                  cumdays = daytab[0];
         /* Friday displays Monday's events */          /* Friday displays Monday's events */
         offset = tp->tm_wday == 5 ? 3 : 1;          offset = tp->tm_wday == 5 ? 3 : 1;
         if (f_dayAfter)          if (f_SetdayAfter)
                 offset = 0;     /* Except not when range is set explicitly */                  offset = 0;     /* Except not when range is set explicitly */
         header[5].iov_base = dayname;          header[5].iov_base = dayname;
   
Line 185 
Line 184 
 /* convert [Year][Month]Day into unix time (since 1970)  /* convert [Year][Month]Day into unix time (since 1970)
  * Year: two or four digits, Month: two digits, Day: two digits   * Year: two or four digits, Month: two digits, Day: two digits
  */   */
 time_t Mktime (date)  time_t
     char *date;  Mktime(char *date)
 {  {
     time_t t;          time_t t;
     int len;          int len;
     struct tm tm;          struct tm tm;
   
     (void)time(&t);          (void)time(&t);
     tp = localtime(&t);          tp = localtime(&t);
   
     len = strlen(date);          len = strlen(date);
     if (len < 2)          if (len < 2)
         return((time_t)-1);                  return((time_t)-1);
     tm.tm_sec = 0;          bzero(&tm, sizeof tm);
     tm.tm_min = 0;          tm.tm_sec = 0;
     /* Avoid getting caught by a timezone shift; set time to noon */          tm.tm_min = 0;
     tm.tm_isdst = 0;          /* Avoid getting caught by a timezone shift; set time to noon */
     tm.tm_hour = 12;          tm.tm_isdst = 0;
     tm.tm_wday = 0;          tm.tm_hour = 12;
     tm.tm_mday = tp->tm_mday;          tm.tm_wday = 0;
     tm.tm_mon = tp->tm_mon;          tm.tm_mday = tp->tm_mday;
     tm.tm_year = tp->tm_year;          tm.tm_mon = tp->tm_mon;
           tm.tm_year = tp->tm_year;
   
     /* Day */          /* Day */
     tm.tm_mday = atoi(date + len - 2);          tm.tm_mday = atoi(date + len - 2);
   
     /* Month */          /* Month */
     if (len >= 4) {          if (len >= 4) {
         *(date + len - 2) = '\0';                  *(date + len - 2) = '\0';
         tm.tm_mon = atoi(date + len - 4) - 1;                  tm.tm_mon = atoi(date + len - 4) - 1;
     }          }
   
     /* Year */          /* Year */
     if (len >= 6) {          if (len >= 6) {
                 *(date + len - 4) = '\0';                  *(date + len - 4) = '\0';
                 tm.tm_year = atoi(date);                  tm.tm_year = atoi(date);
   
         /* tm_year up TM_YEAR_BASE ... */                  if (tm.tm_year < 69)            /* Y2K */
         if (tm.tm_year < 69)            /* Y2K */                          tm.tm_year += 100;
                 tm.tm_year += 2000 - TM_YEAR_BASE;                  else if (tm.tm_year > 1900)
         else if (tm.tm_year < 100)                          tm.tm_year -= 1900;
                 tm.tm_year += 1900 - TM_YEAR_BASE;          }
         else if (tm.tm_year > TM_YEAR_BASE)  
                 tm.tm_year -= TM_YEAR_BASE;  
     }  
   
 #if DEBUG  #if DEBUG
     printf("Mktime: %d %d %d %s\n", (int)mktime(&tm), (int)t, len,          printf("Mktime: %d %lld %d %s\n", (int)mktime(&tm), (long long)t, len,
            asctime(&tm));              asctime(&tm));
 #endif  #endif
     return(mktime(&tm));          return(mktime(&tm));
 }  }
   
   static void
   adjust_calendar(int *day, int *month)
   {
           switch (calendar) {
           case GREGORIAN:
                   break;
   
           case JULIAN:
                   *day += julian;
                   if (*day > (cumdays[*month + 1] - cumdays[*month])) {
                           *day -= (cumdays[*month + 1] - cumdays[*month]);
                           if (++*month > 12)
                                   *month = 1;
                   }
                   break;
           case LUNAR:
                   break;
           }
   }
   
 /*  /*
  * Possible date formats include any combination of:   * Possible date formats include any combination of:
  *      3-charmonth                     (January, Jan, Jan)   *      3-charmonth                     (January, Jan, Jan)
Line 249 
Line 266 
  * with \t, is shown along with the matched line.   * with \t, is shown along with the matched line.
  */   */
 struct match *  struct match *
 isnow(endp, bodun)  isnow(char *endp, int bodun)
         char    *endp;  
         int     bodun;  
 {  {
         int day = 0, flags = 0, month = 0, v1, v2, i;          int day = 0, flags = 0, month = 0, v1, v2, i;
         int monthp, dayp, varp = 0;          int monthp, dayp, varp = 0;
Line 278 
Line 293 
   
         /* adjust bodun rate */          /* adjust bodun rate */
         if (bodun && !bodun_always)          if (bodun && !bodun_always)
                 bodun = !(arc4random() % 3);                  bodun = !arc4random_uniform(3);
   
         /* Easter or Easter depending days */          /* Easter or Easter depending days */
         if (flags & F_SPECIAL)          if (flags & F_SPECIAL)
                 vwd = v1;                  vwd = v1;
Line 312 
Line 327 
                 if (month == -1) {                  if (month == -1) {
                         month = tp->tm_mon + 1;                          month = tp->tm_mon + 1;
                         interval = MONTHLY;                          interval = MONTHLY;
                 }                  } else if (calendar)
                           adjust_calendar(&day, &month);
                 if ((month > 12) || (month < 1))                  if ((month > 12) || (month < 1))
                         return (NULL);                          return (NULL);
         }          }
Line 330 
Line 346 
                         day = 1;                          day = 1;
                 /* If a weekday was spelled out without an ordering,                  /* If a weekday was spelled out without an ordering,
                  * assume the first of that day in the month */                   * assume the first of that day in the month */
                 if ((flags & F_ISDAY) && (day >= 1) && (day <=7))                  if ((flags & F_ISDAY)) {
                         day += 10;                          if ((day >= 1) && (day <=7))
                                   day += 10;
                   } else if (calendar)
                           adjust_calendar(&day, &month);
         }          }
   
         /* Hm ... */          /* Hm ... */
Line 348 
Line 367 
                         if (month == -1) {                          if (month == -1) {
                                 month = tp->tm_mon + 1;                                  month = tp->tm_mon + 1;
                                 interval = MONTHLY;                                  interval = MONTHLY;
                         }                          } else if (calendar)
                                   adjust_calendar(&day, &month);
                 }                  }
   
                 /* {Month} {Weekday,Day} ...  */                  /* {Month} {Weekday,Day} ...  */
Line 357 
Line 377 
                         month = v1;                          month = v1;
                         /* if no recognizable day, assume the first */                          /* if no recognizable day, assume the first */
                         day = v2 ? v2 : 1;                          day = v2 ? v2 : 1;
                         if ((flags & F_ISDAY) && (day >= 1) && (day <= 7))                          if ((flags & F_ISDAY)) {
                                 day += 10;                                  if ((day >= 1) && (day <= 7))
                                           day += 10;
                           } else
                                   adjust_calendar(&day, &month);
                 }                  }
         }          }
   
Line 412 
Line 435 
                          */                           */
                                 if (tp->tm_yday > 300 && tmtmp.tm_mon <= 1)                                  if (tp->tm_yday > 300 && tmtmp.tm_mon <= 1)
                                         variable_weekday(&vwd, tmtmp.tm_mon + 1,                                          variable_weekday(&vwd, tmtmp.tm_mon + 1,
                                             tmtmp.tm_year + TM_YEAR_BASE + 1);                                              tmtmp.tm_year + 1900 + 1);
                                 else                                  else
                                         variable_weekday(&vwd, tmtmp.tm_mon + 1,                                          variable_weekday(&vwd, tmtmp.tm_mon + 1,
                                             tmtmp.tm_year + TM_YEAR_BASE);                                              tmtmp.tm_year + 1900);
                                 day = cumdays[tmtmp.tm_mon + 1] + vwd;                                  day = cumdays[tmtmp.tm_mon + 1] + vwd;
                                 tmtmp.tm_mday = vwd;                                  tmtmp.tm_mday = vwd;
                         }                          }
                         v2 = day - tp->tm_yday;                          v2 = day - tp->tm_yday;
                         if ((v2 > v1) || (v2 < 0)) {                          if ((v2 > v1) || (v2 < 0)) {
                                 if ((v2 += isleap(tp->tm_year + TM_YEAR_BASE) ? 366 : 365)                                  if ((v2 += isleap(tp->tm_year + 1900) ? 366 : 365)
                                     <= v1)                                      <= v1)
                                         tmtmp.tm_year++;                                          tmtmp.tm_year++;
                                 else if(!bodun || (day - tp->tm_yday) != -1)                                  else if(!bodun || (day - tp->tm_yday) != -1)
Line 440 
Line 463 
                         }                          }
   
                         (void)mktime(&tmtmp);                          (void)mktime(&tmtmp);
                         if (strftime(tmp->print_date,                          fill_print_date(tmp, &tmtmp);
                             sizeof(tmp->print_date),  
                         /*    "%a %b %d", &tm);  Skip weekdays */  
                             "%b %d", &tmtmp) == 0)  
                                 tmp->print_date[sizeof(tmp->print_date) - 1] = '\0';  
   
                         tmp->var   = varp;                          tmp->var   = varp;
                         tmp->next  = NULL;                          tmp->next  = NULL;
                         return(tmp);                          return(tmp);
                 }                  }
         }          } else {
         else {  
                 varp = 1;                  varp = 1;
                 /* Set up v1 to the event number and ... */                  /* Set up v1 to the event number and ... */
                 v1 = vwd % (NUMEV + 1) - 1;                  v1 = vwd % (NUMEV + 1) - 1;
Line 498 
Line 515 
                                 if (vwd) {                                  if (vwd) {
                                         v1 = vwd;                                          v1 = vwd;
                                         variable_weekday(&v1, tmtmp.tm_mon + 1,                                          variable_weekday(&v1, tmtmp.tm_mon + 1,
                                             tmtmp.tm_year + TM_YEAR_BASE);                                              tmtmp.tm_year + 1900);
                                         tmtmp.tm_mday = v1;                                          tmtmp.tm_mday = v1;
                                 } else                                  } else
                                         tmtmp.tm_mday = dayp;                                          tmtmp.tm_mday = dayp;
Line 509 
Line 526 
                                 if (flags & F_SPECIAL) {                                  if (flags & F_SPECIAL) {
                                         tmtmp.tm_mon = 0;       /* Gee, mktime() is nice */                                          tmtmp.tm_mon = 0;       /* Gee, mktime() is nice */
                                         tmtmp.tm_mday = spev[v1].getev(tmtmp.tm_year +                                          tmtmp.tm_mday = spev[v1].getev(tmtmp.tm_year +
                                             TM_YEAR_BASE) + vwd;                                              1900) + vwd;
                                 } else if (vwd) {                                  } else if (vwd) {
                                         v1 = vwd;                                          v1 = vwd;
                                         variable_weekday(&v1, tmtmp.tm_mon + 1,                                          variable_weekday(&v1, tmtmp.tm_mon + 1,
                                             tmtmp.tm_year + TM_YEAR_BASE);                                              tmtmp.tm_year + 1900);
                                         tmtmp.tm_mday = v1;                                          tmtmp.tm_mday = v1;
                                 } else {                                  } else {
                                 /* Need the following to keep Feb 29 from                                  /* Need the following to keep Feb 29 from
Line 535 
Line 552 
                                         if ((tmp = malloc(sizeof(struct match))) == NULL)                                          if ((tmp = malloc(sizeof(struct match))) == NULL)
                                                 err(1, NULL);                                                  err(1, NULL);
                                         tmp->when = ttmp;                                          tmp->when = ttmp;
                                         if (strftime(tmp->print_date,                                          fill_print_date(tmp, &tmtmp);
                                             sizeof(tmp->print_date),  
                                         /*    "%a %b %d", &tm);  Skip weekdays */  
                                             "%b %d", &tmtmp) == 0)  
                                                 tmp->print_date[sizeof(tmp->print_date) - 1] = '\0';  
                                         tmp->bodun = bodun && tdiff == -1;                                          tmp->bodun = bodun && tdiff == -1;
                                         tmp->var   = varp;                                          tmp->var   = varp;
                                         tmp->next  = NULL;                                          tmp->next  = NULL;
Line 560 
Line 573 
   
   
 int  int
 getmonth(s)  getmonth(char *s)
         char *s;  
 {  {
         char **p;          char **p;
         struct fixs *n;          struct fixs *n;
Line 580 
Line 592 
   
   
 int  int
 getday(s)  getday(char *s)
         char *s;  
 {  {
         char **p;          char **p;
         struct fixs *n;          struct fixs *n;
Line 604 
Line 615 
  * ... etc ...   * ... etc ...
  */   */
 int  int
 getdayvar(s)  getdayvar(char *s)
         char *s;  
 {  {
         int offset;          int offset;
   
Line 645 
Line 655 
   
   
 int  int
 foy(year)  foy(int year)
         int year;  
 {  {
         /* 0-6; what weekday Jan 1 is */          /* 0-6; what weekday Jan 1 is */
         year--;          year--;
Line 656 
Line 665 
   
   
 void  void
 variable_weekday(day, month, year)  variable_weekday(int *day, int month, int year)
         int *day, month, year;  
 {  {
         int v1, v2;          int v1, v2;
         int *cumdays;          int *cumdays;
Legend:
Removed from v.1.15  
changed lines
  Added in v.1.31