summaryrefslogtreecommitdiff
path: root/ext/calendar/calendar.c
diff options
context:
space:
mode:
Diffstat (limited to 'ext/calendar/calendar.c')
-rw-r--r--ext/calendar/calendar.c334
1 files changed, 0 insertions, 334 deletions
diff --git a/ext/calendar/calendar.c b/ext/calendar/calendar.c
deleted file mode 100644
index cacc09c4f1..0000000000
--- a/ext/calendar/calendar.c
+++ /dev/null
@@ -1,334 +0,0 @@
-/*
- +----------------------------------------------------------------------+
- | PHP version 4.0 |
- +----------------------------------------------------------------------+
- | Copyright (c) 1997, 1998, 1999, 2000 The PHP Group |
- +----------------------------------------------------------------------+
- | This source file is subject to version 2.02 of the PHP license, |
- | that is bundled with this package in the file LICENSE, and is |
- | available at through the world-wide-web at |
- | http://www.php.net/license/2_02.txt. |
- | If you did not receive a copy of the PHP license and are unable to |
- | obtain it through the world-wide-web, please send a note to |
- | license@php.net so we can mail you a copy immediately. |
- +----------------------------------------------------------------------+
- | Authors: Shane Caraveo <shane@caraveo.com> |
- | Colin Viebrock <cmv@easydns.com> |
- | Hartmut Holzgraefe <hartmut@six.de> |
- +----------------------------------------------------------------------+
- */
-/* $Id: */
-
-#include "php.h"
-#include "php_calendar.h"
-#include "sdncal.h"
-
-function_entry calendar_functions[] = {
- PHP_FE(jdtogregorian, NULL)
- PHP_FE(gregoriantojd, NULL)
- PHP_FE(jdtojulian, NULL)
- PHP_FE(juliantojd, NULL)
- PHP_FE(jdtojewish, NULL)
- PHP_FE(jewishtojd, NULL)
- PHP_FE(jdtofrench, NULL)
- PHP_FE(frenchtojd, NULL)
- PHP_FE(jddayofweek, NULL)
- PHP_FE(jdmonthname, NULL)
- PHP_FE(easter_date, NULL)
- PHP_FE(easter_days, NULL)
- PHP_FE(unixtojd, NULL)
- PHP_FE(jdtounix, NULL)
- {NULL, NULL, NULL}
-};
-
-
-zend_module_entry calendar_module_entry = {
- "Calendar",
- calendar_functions,
- NULL, /*PHP_MINIT(calendar),*/
- NULL,
- NULL,
- NULL,
- PHP_MINFO(calendar),
- STANDARD_MODULE_PROPERTIES,
-};
-
-#ifdef COMPILE_DL_CALENDAR
-ZEND_GET_MODULE(calendar)
-#endif
-
-PHP_MINIT_FUNCTION(calendar)
-{
- /*
- REGISTER_INT_CONSTANT("CAL_EASTER_TO_xxx",0, CONST_CS | CONST_PERSISTENT);
- */
- return SUCCESS;
-}
-
-PHP_MINFO_FUNCTION(calendar)
-{
- php_printf("Calendar support enabled");
-}
-
-
-/* {{{ proto string jdtogregorian(int juliandaycount)
- Convert a julian day count to a gregorian calendar date */
-PHP_FUNCTION(jdtogregorian)
-{
- pval **julday;
- int year, month, day;
- char date[10];
-
- if (zend_get_parameters_ex(1, &julday) != SUCCESS) {
- WRONG_PARAM_COUNT;
- }
-
- convert_to_long_ex(julday);
- SdnToGregorian((*julday)->value.lval, &year, &month, &day);
- sprintf(date, "%i/%i/%i", month, day, year);
-
- RETURN_STRING(date,1);
-}
-/* }}} */
-
-/* {{{ proto int gregoriantojd(int month, int day, int year)
- Convert a gregorian calendar date to julian day count */
- PHP_FUNCTION(gregoriantojd)
-{
- pval **year, **month, **day;
- int jdate;
-
- if (zend_get_parameters_ex(3, &month, &day, &year) != SUCCESS) {
- WRONG_PARAM_COUNT;
- }
-
- convert_to_long_ex(month);
- convert_to_long_ex(day);
- convert_to_long_ex(year);
-
- jdate = GregorianToSdn((*year)->value.lval, (*month)->value.lval,(*day)->value.lval);
-
- RETURN_LONG(jdate);
-}
-/* }}} */
-
-/* {{{ proto string jdtojulian(int juliandaycount)
- Convert a julian day count to a julian calendar date */
- PHP_FUNCTION(jdtojulian)
-{
- pval **julday;
- int year, month, day;
- char date[10];
-
- if (zend_get_parameters_ex(1, &julday) != SUCCESS) {
- WRONG_PARAM_COUNT;
- }
-
- convert_to_long_ex(julday);
- SdnToJulian((*julday)->value.lval, &year, &month, &day);
- sprintf(date, "%i/%i/%i", month, day, year);
-
- RETURN_STRING(date,1);
-}
-/* }}} */
-
-
-/* {{{ proto int juliantojd(int month, int day, int year)
- Convert a julian calendar date to julian day count */
- PHP_FUNCTION(juliantojd)
-{
- pval **year, **month, **day;
- int jdate;
-
- if (zend_get_parameters_ex(3, &month, &day, &year) != SUCCESS) {
- WRONG_PARAM_COUNT;
- }
-
- convert_to_long_ex(month);
- convert_to_long_ex(day);
- convert_to_long_ex(year);
-
- jdate = JulianToSdn((*year)->value.lval,(*month)->value.lval, (*day)->value.lval);
-
- RETURN_LONG(jdate);
-}
-/* }}} */
-
-
-/* {{{ proto string jdtojewish(int juliandaycount)
- Convert a julian day count to a jewish calendar date */
- PHP_FUNCTION(jdtojewish)
-{
- pval **julday;
- int year, month, day;
- char date[10];
-
- if (zend_get_parameters_ex(1, &julday) != SUCCESS) {
- WRONG_PARAM_COUNT;
- }
-
- convert_to_long_ex(julday);
-
- SdnToJewish((*julday)->value.lval, &year, &month, &day);
- sprintf(date, "%i/%i/%i", month, day, year);
-
- RETURN_STRING(date,1);
-}
-/* }}} */
-
-
-/* {{{ proto int jewishtojd(int month, int day, int year)
- Convert a jewish calendar date to a julian day count */
- PHP_FUNCTION(jewishtojd)
-{
- pval **year, **month, **day;
- int jdate;
-
- if (zend_get_parameters_ex(3, &month, &day, &year) != SUCCESS) {
- WRONG_PARAM_COUNT;
- }
-
- convert_to_long_ex(month);
- convert_to_long_ex(day);
- convert_to_long_ex(year);
-
- jdate = JewishToSdn((*year)->value.lval,(*month)->value.lval, (*day)->value.lval);
-
- RETURN_LONG(jdate);
-}
-/* }}} */
-
-
-/* {{{ proto string jdtofrench(int juliandaycount)
- Convert a julian day count to a french republic calendar date */
- PHP_FUNCTION(jdtofrench)
-{
- pval **julday;
- int year, month, day;
- char date[10];
-
- if (zend_get_parameters_ex(1, &julday) != SUCCESS) {
- WRONG_PARAM_COUNT;
- }
-
- convert_to_long_ex(julday);
-
- SdnToFrench((*julday)->value.lval, &year, &month, &day);
- sprintf(date, "%i/%i/%i", month, day, year);
-
- RETURN_STRING(date,1);
-}
-/* }}} */
-
-
-/* {{{ proto int frenchtojd(int month, int day, int year)
- Convert a french republic calendar date to julian day count */
- PHP_FUNCTION(frenchtojd)
-{
- pval **year, **month, **day;
- int jdate;
-
- if (zend_get_parameters_ex(3, &month, &day, &year) != SUCCESS) {
- WRONG_PARAM_COUNT;
- }
-
- convert_to_long_ex(month);
- convert_to_long_ex(day);
- convert_to_long_ex(year);
-
- jdate = FrenchToSdn((*year)->value.lval,(*month)->value.lval,(*day)->value.lval);
-
- RETURN_LONG(jdate);
-}
-/* }}} */
-
-/* {{{ proto mixed jddayofweek(int juliandaycount [, int mode])
- Returns name or number of day of week from julian day count */
- PHP_FUNCTION(jddayofweek)
-{
- pval *julday, *mode;
- int day;
- char *daynamel, *daynames;
- int myargc=ZEND_NUM_ARGS(),mymode=0;
-
- if ((myargc < 1) || (myargc > 2) || (zend_get_parameters(ht,myargc, &julday, &mode) != SUCCESS)) {
- WRONG_PARAM_COUNT;
- }
-
- convert_to_long(julday);
- if(myargc==2) {
- convert_to_long(mode);
- mymode = mode->value.lval;
- }
-
- day = DayOfWeek(julday->value.lval);
- daynamel = DayNameLong[day];
- daynames = DayNameShort[day];
-
- switch (mymode) {
- case 0L:
- RETURN_LONG(day);
- break;
- case 1L:
- RETURN_STRING(daynamel,1);
- break;
- case 2L:
- RETURN_STRING(daynames,1);
- break;
- default:
- RETURN_LONG(day);
- break;
- }
-}
-/* }}} */
-
-
-/* {{{ proto string jdmonthname(int juliandaycount, int mode)
- Returns name of month for julian day count */
- PHP_FUNCTION(jdmonthname)
-{
- pval **julday, **mode;
- char *monthname = NULL;
- int month, day, year;
-
- if (zend_get_parameters_ex(2, &julday, &mode) != SUCCESS) {
- WRONG_PARAM_COUNT;
- }
-
- convert_to_long_ex(julday);
- convert_to_long_ex(mode);
-
- switch((*mode)->value.lval) {
- case 0L: /* gregorian or julian month */
- SdnToGregorian((*julday)->value.lval,&year, &month, &day);
- monthname = MonthNameShort[month];
- break;
- case 1L: /* gregorian or julian month */
- SdnToGregorian((*julday)->value.lval,&year, &month, &day);
- monthname = MonthNameLong[month];
- break;
- case 2L: /* gregorian or julian month */
- SdnToJulian((*julday)->value.lval, &year,&month, &day);
- monthname = MonthNameShort[month];
- break;
- case 3L: /* gregorian or julian month */
- SdnToJulian((*julday)->value.lval, &year,&month, &day);
- monthname = MonthNameLong[month];
- break;
- case 4L: /* jewish month */
- SdnToJewish((*julday)->value.lval, &year,&month, &day);
- monthname = JewishMonthName[month];
- break;
- case 5L: /* french month */
- SdnToFrench((*julday)->value.lval, &year,&month, &day);
- monthname = FrenchMonthName[month];
- break;
- default: /* default gregorian */
- /* FIXME - need to set monthname to something here ?? */
- break;
- }
-
- RETURN_STRING(monthname,1);
-}
-/* }}} */
-
View Lorry Controller Status