2000-04-17 09:44:49 +00:00
|
|
|
/*
|
|
|
|
+----------------------------------------------------------------------+
|
2004-01-08 08:18:22 +00:00
|
|
|
| PHP Version 5 |
|
2000-04-17 09:44:49 +00:00
|
|
|
+----------------------------------------------------------------------+
|
2006-01-01 12:51:34 +00:00
|
|
|
| Copyright (c) 1997-2006 The PHP Group |
|
2000-04-17 09:44:49 +00:00
|
|
|
+----------------------------------------------------------------------+
|
2006-01-01 12:51:34 +00:00
|
|
|
| This source file is subject to version 3.01 of the PHP license, |
|
2000-04-17 09:44:49 +00:00
|
|
|
| that is bundled with this package in the file LICENSE, and is |
|
2003-06-10 20:04:29 +00:00
|
|
|
| available through the world-wide-web at the following url: |
|
2006-01-01 12:51:34 +00:00
|
|
|
| http://www.php.net/license/3_01.txt |
|
2000-04-17 09:44:49 +00:00
|
|
|
| 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> |
|
2002-09-19 21:51:34 +00:00
|
|
|
| Colin Viebrock <colin@easydns.com> |
|
2002-11-25 12:30:28 +00:00
|
|
|
| Hartmut Holzgraefe <hholzgra@php.net> |
|
2000-04-17 09:44:49 +00:00
|
|
|
+----------------------------------------------------------------------+
|
|
|
|
*/
|
|
|
|
/* $Id: */
|
|
|
|
|
|
|
|
#include "php.h"
|
|
|
|
#include "php_calendar.h"
|
|
|
|
#include "sdncal.h"
|
|
|
|
#include <time.h>
|
|
|
|
|
|
|
|
/* {{{ proto int unixtojd([int timestamp])
|
|
|
|
Convert UNIX timestamp to Julian Day */
|
|
|
|
PHP_FUNCTION(unixtojd)
|
|
|
|
{
|
2005-12-06 02:28:41 +00:00
|
|
|
zval *timestamp;
|
2000-04-17 09:44:49 +00:00
|
|
|
long jdate;
|
|
|
|
time_t t;
|
|
|
|
struct tm *ta, tmbuf;
|
2000-06-05 19:47:54 +00:00
|
|
|
int myargc=ZEND_NUM_ARGS();
|
2000-04-17 09:44:49 +00:00
|
|
|
|
2001-08-11 16:39:07 +00:00
|
|
|
if ((myargc > 1) || (zend_get_parameters(ht, myargc, ×tamp) != SUCCESS)) {
|
2000-04-17 09:44:49 +00:00
|
|
|
WRONG_PARAM_COUNT;
|
|
|
|
}
|
|
|
|
|
|
|
|
if(myargc==1) {
|
|
|
|
convert_to_long(timestamp);
|
2001-09-25 21:58:48 +00:00
|
|
|
t = Z_LVAL_P(timestamp);
|
2000-04-17 09:44:49 +00:00
|
|
|
} else {
|
|
|
|
t = time(NULL);
|
|
|
|
}
|
|
|
|
|
2000-10-30 16:13:03 +00:00
|
|
|
if(t < 0) {
|
|
|
|
RETURN_FALSE;
|
|
|
|
}
|
|
|
|
|
2000-05-04 10:38:17 +00:00
|
|
|
ta = php_localtime_r(&t, &tmbuf);
|
2001-08-11 16:39:07 +00:00
|
|
|
jdate = GregorianToSdn(ta->tm_year+1900, ta->tm_mon+1, ta->tm_mday);
|
2000-04-17 09:44:49 +00:00
|
|
|
|
|
|
|
RETURN_LONG(jdate);
|
|
|
|
}
|
|
|
|
/* }}} */
|
|
|
|
|
|
|
|
/* {{{ proto int jdtounix(int jday)
|
|
|
|
Convert Julian Day to UNIX timestamp */
|
|
|
|
PHP_FUNCTION(jdtounix)
|
|
|
|
{
|
2005-12-06 02:28:41 +00:00
|
|
|
zval *jday;
|
2000-04-17 09:44:49 +00:00
|
|
|
long uday;
|
|
|
|
|
2001-08-11 16:39:07 +00:00
|
|
|
if ((ZEND_NUM_ARGS()!= 1) || (zend_get_parameters(ht, 1, &jday) != SUCCESS)) {
|
2000-04-17 09:44:49 +00:00
|
|
|
WRONG_PARAM_COUNT;
|
|
|
|
}
|
|
|
|
|
|
|
|
convert_to_long(jday);
|
|
|
|
|
2001-09-25 21:58:48 +00:00
|
|
|
uday = Z_LVAL_P(jday) - 2440588 /* J.D. of 1.1.1970 */;
|
2000-04-17 09:44:49 +00:00
|
|
|
|
|
|
|
if(uday<0) RETURN_FALSE; /* before beginning of unix epoch */
|
|
|
|
if(uday>24755) RETURN_FALSE; /* behind end of unix epoch */
|
|
|
|
|
|
|
|
RETURN_LONG(uday*24*3600);
|
|
|
|
}
|
|
|
|
/* }}} */
|
|
|
|
|
2001-06-06 13:06:12 +00:00
|
|
|
/*
|
|
|
|
* Local variables:
|
|
|
|
* tab-width: 4
|
|
|
|
* c-basic-offset: 4
|
|
|
|
* End:
|
2001-09-09 13:29:31 +00:00
|
|
|
* vim600: sw=4 ts=4 fdm=marker
|
|
|
|
* vim<600: sw=4 ts=4
|
2001-06-06 13:06:12 +00:00
|
|
|
*/
|