version 1.1, 1996/12/05 06:04:40 |
version 1.4, 2003/06/25 22:41:24 |
|
|
#include <stdlib.h> |
#include <stdlib.h> |
#include <string.h> |
#include <string.h> |
#include <time.h> |
#include <time.h> |
|
#include <tzfile.h> |
|
|
#include "calendar.h" |
#include "calendar.h" |
|
|
|
|
e_p = (e_h + e_l + 114 - (7 * e_m)) % 31; |
e_p = (e_h + e_l + 114 - (7 * e_m)) % 31; |
e_p = e_p + 1; |
e_p = e_p + 1; |
|
|
e_q = 31 + 28; |
e_q = 31 + 28 + e_p; |
|
if (isleap(year)) |
|
e_q++; |
|
|
if (e_k == 0 && e_c != 0) |
|
e_q += 1; |
|
|
|
if (e_n == 4) |
if (e_n == 4) |
e_q += 31; |
e_q += 31; |
|
|
e_q += e_p; |
|
|
|
#if DEBUG |
#if DEBUG |
printf("%d %d %d %d %d %d %d %d %d %d %d %d %d %d %d\n", e_a , e_b , e_c , e_d , e_e , e_f , e_g , e_h , e_i , e_k , e_l , e_m , e_n , e_p , e_q); |
printf("%d %d %d %d %d %d %d %d %d %d %d %d %d %d %d\n", e_a , e_b , e_c , e_d , e_e , e_f , e_g , e_h , e_i , e_k , e_l , e_m , e_n , e_p , e_q); |
#endif |
#endif |
|
|
return (e_q); |
return (e_q); |
} |
|
|
|
/* return year day for Easter or easter depending days |
|
* Match: Easter([+-][0-9]+)? |
|
* e.g: Easter-2 is Good Friday (2 days before Easter) |
|
*/ |
|
|
|
int |
|
geteaster(s, year) |
|
char *s; |
|
int year; |
|
{ |
|
register int offset = 0; |
|
extern struct fixs neaster; |
|
|
|
#define EASTER "easter" |
|
#define EASTERNAMELEN (sizeof(EASTER) - 1) |
|
|
|
if (strncasecmp(s, EASTER, EASTERNAMELEN) == 0) |
|
s += EASTERNAMELEN; |
|
else if ( neaster.name != NULL |
|
&& strncasecmp(s, neaster.name, neaster.len) == 0 |
|
) |
|
s += neaster.len; |
|
else |
|
return(0); |
|
|
|
#if DEBUG |
|
printf("%s %d %d\n", s, year, EASTERNAMELEN); |
|
#endif |
|
|
|
/* Easter+1 or Easter-2 |
|
* ^ ^ */ |
|
|
|
switch(*s) { |
|
|
|
case '-': |
|
case '+': |
|
offset = atoi(s); |
|
break; |
|
|
|
default: |
|
offset = 0; |
|
} |
|
|
|
return (easter(year) + offset); |
|
} |
} |