diff options
Diffstat (limited to 'ext/icap/php3_icap.c')
| -rw-r--r-- | ext/icap/php3_icap.c | 955 |
1 files changed, 0 insertions, 955 deletions
diff --git a/ext/icap/php3_icap.c b/ext/icap/php3_icap.c deleted file mode 100644 index 8279e41f72..0000000000 --- a/ext/icap/php3_icap.c +++ /dev/null @@ -1,955 +0,0 @@ -/* - +----------------------------------------------------------------------+ - | PHP HTML Embedded Scripting Language Version 3.0 | - +----------------------------------------------------------------------+ - | Copyright (c) 1997-1999 PHP Development Team (See Credits file) | - +----------------------------------------------------------------------+ - | This program is free software; you can redistribute it and/or modify | - | it under the terms of one of the following licenses: | - | | - | A) the GNU General Public License as published by the Free Software | - | Foundation; either version 2 of the License, or (at your option) | - | any later version. | - | | - | B) the PHP License as published by the PHP Development Team and | - | included in the distribution in the file: LICENSE | - | | - | This program is distributed in the hope that it will be useful, | - | but WITHOUT ANY WARRANTY; without even the implied warranty of | - | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | - | GNU General Public License for more details. | - | | - | You should have received a copy of both licenses referred to here. | - | If you did not, or have any questions about PHP licensing, please | - | contact core@php.net. | - +----------------------------------------------------------------------+ - | Authors: | - | Mark Musone <musone@chek.com> | - +----------------------------------------------------------------------+ - */ - -#define ICAP1 - -#ifdef ERROR -#undef ERROR -#endif - -#include "php.h" - -#if COMPILE_DL -#include "dl/phpdl.h" -#endif - -#if HAVE_ICAP - -#include <time.h> -#include <stdio.h> -#include <ctype.h> -#include <signal.h> -#include <stdarg.h> -#include "cal.h" -#include "php_icap.h" -#include "modules.h" -#if (WIN32|WINNT) -#include "winsock.h" -#endif -CALSTREAM *cal_open(); -CALSTREAM *cal_close_it (); -CALSTREAM *cal_close_full (); - - -typedef struct php3_icap_le_struct { - CALSTREAM *icap_stream; - long flags; -} pils; - - -typedef struct cal_list -{ -u_int32_t uid; -struct cal_list *next; -} cal_list_t; - -static cal_list_t *g_cal_list=NULL; -static cal_list_t *g_cal_list_end=NULL; -/* - * this array should be set up as: - * {"PHPScriptFunctionName",dllFunctionName,1} - */ - -function_entry icap_functions[] = { - {"icap_open", php3_icap_open, NULL}, - {"icap_popen", php3_icap_popen, NULL}, - {"icap_reopen", php3_icap_reopen, NULL}, - {"icap_fetch_event", php3_icap_fetch_event, NULL}, - {"icap_list_events", php3_icap_list_events, NULL}, - {"icap_list_alarms", php3_icap_list_alarms, NULL}, - {"icap_create_calendar", php3_icap_create_calendar, NULL}, - {"icap_rename_calendar", php3_icap_rename_calendar, NULL}, - {"icap_delete_calendar", php3_icap_delete_calendar, NULL}, - {"icap_delete_event", php3_icap_delete_event, NULL}, - {"icap_store_event", php3_icap_store_event, NULL}, - {"icap_snooze", php3_icap_snooze, NULL}, - {NULL, NULL, NULL} -}; - - -php3_module_entry php3_icap_module_entry = { - CALVER, icap_functions, PHP_MINIT(icap), NULL, NULL, NULL, PHP_MINFO(icap), 0, 0, 0, NULL -}; - - -#if COMPILE_DL -DLEXPORT php3_module_entry *get_module(void) { return &php3_icap_module_entry; } -#endif - -/* - I believe since this global is used ONLY within this module, - and nothing will link to this module, we can use the simple - thread local_ storage -*/ -int le_icap; -#ifdef OP_RELOGIN -/* AJS: persistent connection type */ -int le_picap; -#endif -char icap_user[80]=""; -char icap_password[80]=""; - -CALSTREAM *cal_close_it (pils *icap_le_struct) -{ - CALSTREAM *ret; - ret = cal_close (icap_le_struct->icap_stream,0); - efree(icap_le_struct); - return ret; -} - - -PHP_MINFO_FUNCTION(icap) -{ - php3_printf("Icap Support enabled<br>"); - php3_printf("<table>"); - php3_printf("<tr><td>Icap Version:</td>"); - php3_printf("<td>%s</td>",CALVER); - php3_printf("</tr></table>"); -} - -PHP_MINIT_FUNCTION(icap) -{ - - le_icap = register_list_destructors(cal_close_it,NULL); - - return SUCCESS; -} - - -static int add_assoc_object(pval *arg, char *key, pval *tmp) -{ - HashTable *symtable; - - if (arg->type == IS_OBJECT) { - symtable = arg->value.obj.properties; - } else { - symtable = arg->value.ht; - } - return zend_hash_update(symtable, key, strlen(key)+1, (void *) &tmp, sizeof(pval *), NULL); -} - - -void php3_icap_do_open(INTERNAL_FUNCTION_PARAMETERS, int persistent) -{ - pval *calendar; - pval *user; - pval *passwd; - pval *options; - CALSTREAM *icap_stream; - pils *icap_le_struct; - long flags=0; - long cl_flags=0; - int ind; - int myargc=ARG_COUNT(ht); - - - if (myargc <3 || myargc >4 || getParameters(ht, myargc, &calendar,&user,&passwd,&options) == FAILURE) { - WRONG_PARAM_COUNT; - } - - convert_to_string(calendar); - convert_to_string(user); - convert_to_string(passwd); - strcpy(icap_user,user->value.str.val); - strcpy(icap_password,passwd->value.str.val); - if(myargc ==4) { - convert_to_long(options); - flags=options->value.lval; - } - icap_stream = cal_open(NULL,calendar->value.str.val,0); - if (!icap_stream) { - php3_error(E_WARNING,"Couldn't open stream %s\n",calendar->value.str.val); - RETURN_FALSE; - } - - icap_le_struct = emalloc(sizeof(pils)); - icap_le_struct->icap_stream = icap_stream; - icap_le_struct->flags = 0; - ind = php3_list_insert(icap_le_struct, le_icap); - RETURN_LONG(ind); -} - - - - -/* {{{ proto int icap_close(int stream_id [, int options]) - Close an ICAP stream */ -void php3_icap_close(INTERNAL_FUNCTION_PARAMETERS) -{ - pval *options, *streamind; - int ind, ind_type; - pils *icap_le_struct=NULL; - int myargcount=ARG_COUNT(ht); - long flags = 0; - - if (myargcount < 1 || myargcount > 2 || getParameters(ht, myargcount, &streamind, &options) == FAILURE) { - WRONG_PARAM_COUNT; - } - convert_to_long(streamind); - ind = streamind->value.lval; - icap_le_struct = (pils *)php3_list_find(ind, &ind_type); - if (!icap_le_struct ) { - php3_error(E_WARNING, "Unable to find stream pointer"); - RETURN_FALSE; - } - if(myargcount==2) { - convert_to_long(options); - flags = options->value.lval; - icap_le_struct->flags = flags; - } - php3_list_delete(ind); - RETURN_TRUE; -} -/* }}} */ - - - - - - - - -/* {{{ proto int icap_open(string calendar, string user, string password [, int options]) - Open an ICAP stream to a calendar */ -void php3_icap_open(INTERNAL_FUNCTION_PARAMETERS) -{ - php3_icap_do_open(INTERNAL_FUNCTION_PARAM_PASSTHRU, 0); -} -/* }}} */ - - -/* {{{ proto int icap_reopen(int stream_id, string calendar [, int options]) - Reopen ICAP stream to new calendar */ -void php3_icap_reopen(INTERNAL_FUNCTION_PARAMETERS) -{ - pval *streamind; - pval *calendar; - pval *options; - CALSTREAM *icap_stream; - pils *icap_le_struct; - int ind, ind_type; - long flags=0; - long cl_flags=0; - int myargc=ARG_COUNT(ht); - - if (myargc<2 || myargc>3 || getParameters(ht,myargc,&streamind, &calendar, &options) == FAILURE) { - WRONG_PARAM_COUNT; - } - - convert_to_long(streamind); - ind = streamind->value.lval; - icap_le_struct = (pils *)php3_list_find(ind, &ind_type); - if (!icap_le_struct ) { - php3_error(E_WARNING, "Unable to find stream pointer"); - RETURN_FALSE; - } - - convert_to_string(calendar); - if(myargc == 3) { - convert_to_long(options); - flags = options->value.lval; - icap_le_struct->flags = cl_flags; - } - // icap_stream = cal_connect(calendar->value.str.val); - // cal_login(icap_stream, calendar->value.str.val); - if (icap_stream == NULL) { - php3_error(E_WARNING,"Couldn't re-open stream\n"); - RETURN_FALSE; - } - RETURN_TRUE; -} -/* }}} */ - - -/* {{{ proto int icap_expunge(int stream_id) - Delete all messages marked for deletion */ -void php3_icap_expunge(INTERNAL_FUNCTION_PARAMETERS) -{ - pval *streamind; - int ind, ind_type; - pval *start,*end; - pils *icap_le_struct; - - if (ARG_COUNT(ht) != 1 || getParameters(ht, 1, &streamind) == FAILURE) { - WRONG_PARAM_COUNT; - } - - convert_to_long(streamind); - - ind = streamind->value.lval; - - icap_le_struct = (pils *)php3_list_find(ind, &ind_type); - - if (!icap_le_struct ) { - php3_error(E_WARNING, "Unable to find stream pointer"); - RETURN_FALSE; - } - -/* cal_expunge (icap_le_struct->icap_stream); -*/ - RETURN_TRUE; -} -/* }}} */ - -/* {{{ proto int icap_fetch_event(int stream_id,int eventid, [int options]) - Fetch an event*/ -void php3_icap_fetch_event(INTERNAL_FUNCTION_PARAMETERS) -{ - pval *streamind,*eventid,*start,*end,*options=NULL; - int ind, ind_type; - pils *icap_le_struct=NULL; - CALEVENT *myevent; - int myargcount=ARG_COUNT(ht); - - if (myargcount < 1 || myargcount > 3 || getParameters(ht, myargcount, &streamind, &eventid,&options) == FAILURE) { - WRONG_PARAM_COUNT; - } - convert_to_long(streamind); - convert_to_long(eventid); - ind = streamind->value.lval; - icap_le_struct = (pils *)php3_list_find(ind, &ind_type); - if (!icap_le_struct ) { - php3_error(E_WARNING, "Unable to find stream pointer"); - RETURN_FALSE; - } - if(myargcount==3) { - convert_to_long(options); - } - cal_fetch(icap_le_struct->icap_stream,eventid->value.lval,&myevent); - - object_init(return_value); - add_property_long(return_value,"id",myevent->id); - add_property_long(return_value,"public",myevent->public); - MAKE_STD_ZVAL(start); - object_init(start); - if(myevent->start.has_date) - { - add_property_long(start,"year",myevent->start.year); - add_property_long(start,"month",myevent->start.mon); - add_property_long(start,"mday",myevent->start.mday); - } - if(myevent->start.has_time) - { - add_property_long(start,"hour",myevent->start.hour); - add_property_long(start,"min",myevent->start.min); - add_property_long(start,"sec",myevent->start.sec); - } - add_assoc_object(return_value, "start",start); - - MAKE_STD_ZVAL(end); - object_init(end); - if(myevent->end.has_date) - { - add_property_long(end,"year",myevent->end.year); - add_property_long(end,"month",myevent->end.mon); - add_property_long(end,"mday",myevent->end.mday); - } - if(myevent->end.has_time) - { - add_property_long(end,"hour",myevent->end.hour); - add_property_long(end,"min",myevent->end.min); - add_property_long(end,"sec",myevent->end.sec); - } - add_assoc_object(return_value, "end",end); - - add_property_string(return_value,"category",myevent->category,1); - add_property_string(return_value,"title",myevent->title,1); - add_property_string(return_value,"description",myevent->description,1); - add_property_long(return_value,"alarm",myevent->alarm); -} -/* }}} */ - -/* {{{ proto array icap_list_events(int stream_id,int begindate, [int enddate]) - Returns list of UIDs for that day or range of days */ -void php3_icap_list_events(INTERNAL_FUNCTION_PARAMETERS) -{ - pval *streamind,*begindate,*enddate; - pval **pvalue; - int ind, ind_type; - unsigned long i; - char *t; - int icap_folders=0; - unsigned int msgno; - pils *icap_le_struct; - cal_list_t *my_cal_list; - datetime_t begincal,endcal; - int myargc; - myargc=ARG_COUNT(ht); - if (myargc <2 || myargc > 3 || getParameters(ht,myargc,&streamind,&begindate,&enddate) == FAILURE) { - WRONG_PARAM_COUNT; - } - - convert_to_long(streamind); - convert_to_array(begindate); - if(myargc == 3) convert_to_array(enddate); - ind = streamind->value.lval; - - icap_le_struct = (pils *)php3_list_find(ind, &ind_type); - - if (!icap_le_struct ) { - php3_error(E_WARNING, "Unable to find stream pointer"); - RETURN_FALSE; - } - - /* Initialize return array */ - if (array_init(return_value) == FAILURE) { - RETURN_FALSE; - } - begincal.has_time=0; - endcal.has_time=0; - if(_php3_hash_find(begindate->value.ht,"year",sizeof("year"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - begincal.year=(*pvalue)->value.lval; - } - if(_php3_hash_find(begindate->value.ht,"month",sizeof("month"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - begincal.mon=(*pvalue)->value.lval; - } - if(_php3_hash_find(begindate->value.ht,"day",sizeof("day"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - begincal.mday=(*pvalue)->value.lval; - } -if(myargc == 3) - { - if(_php3_hash_find(enddate->value.ht,"year",sizeof("year"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - endcal.year=(*pvalue)->value.lval; - } - if(_php3_hash_find(enddate->value.ht,"month",sizeof("month"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - endcal.mon=(*pvalue)->value.lval; - } - if(_php3_hash_find(enddate->value.ht,"day",sizeof("day"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - endcal.mday=(*pvalue)->value.lval; - } - } - - -g_cal_list=NULL; - cal_search_range(icap_le_struct->icap_stream,&begincal,&endcal); - my_cal_list=g_cal_list; - while(my_cal_list != NULL) - { - add_next_index_long(return_value,my_cal_list->uid); - my_cal_list=my_cal_list->next; - free(g_cal_list); - g_cal_list=my_cal_list; - } -} -/* }}} */ - - -/* {{{ proto string icap_create_calendar(int stream_id, string calendar) - Create a new calendar*/ - -void php3_icap_create_calendar(INTERNAL_FUNCTION_PARAMETERS) -{ - pval *streamind, *calendar; - int ind, ind_type; - pils *icap_le_struct; - int myargc=ARG_COUNT(ht); - if (myargc <1 || myargc > 2 || getParameters(ht,myargc,&streamind,&calendar) == FAILURE) { - WRONG_PARAM_COUNT; - } - - convert_to_long(streamind); - convert_to_string(calendar); - ind = streamind->value.lval; - - icap_le_struct = (pils *)php3_list_find(ind, &ind_type); - if (!icap_le_struct ) { - php3_error(E_WARNING, "Unable to find stream pointer"); - RETURN_FALSE; - } -/* - if (icap_create(icap_le_struct->icap_stream,calendar->value.str.val)) - { - RETURN_TRUE; - } - else - { - RETURN_FALSE; - } -*/ -} -/* }}} */ - - -/* {{{ proto string icap_rename(int stream_id, string src_calendar, string dest_calendar) - Rename a calendar*/ -void php3_icap_rename_calendar(INTERNAL_FUNCTION_PARAMETERS) -{ - pval *streamind, *src_calendar,*dest_calendar; - int ind, ind_type; - pils *icap_le_struct; - int myargc=ARG_COUNT(ht); - if (myargc <2 || myargc > 3 || getParameters(ht,myargc,&streamind,&src_calendar,&dest_calendar) == FAILURE) { - WRONG_PARAM_COUNT; - } - - convert_to_long(streamind); - convert_to_string(src_calendar); - convert_to_string(dest_calendar); - ind = streamind->value.lval; - - icap_le_struct = (pils *)php3_list_find(ind, &ind_type); - if (!icap_le_struct ) { - php3_error(E_WARNING, "Unable to find stream pointer"); - RETURN_FALSE; - } -/* - if(icap_rename(icap_le_struct->icap_stream,src_calendar->value.str.val,dest_calendar->value.str.val)) {RETURN_TRUE;} - else {RETURN_FALSE; } -*/ -} -/* }}} */ - - - - -/* {{{ proto int icap_reopen(int stream_id, array date, array time) - list alarms for a given time */ -void php3_icap_list_alarms(INTERNAL_FUNCTION_PARAMETERS) -{ - pval *streamind, *date,*time; - pval **pvalue; - datetime_t mydate; - int ind, ind_type; - pils *icap_le_struct; - int icap_folders=0; - unsigned int msgno; - cal_list_t *my_cal_list; - - int myargc=ARG_COUNT(ht); - if (myargc != 3 || getParameters(ht,myargc,&streamind,&date,&time) == FAILURE) { - WRONG_PARAM_COUNT; - } - - convert_to_long(streamind); - convert_to_array(date); - convert_to_array(time); - ind = streamind->value.lval; - - icap_le_struct = (pils *)php3_list_find(ind, &ind_type); - if (!icap_le_struct ) { - php3_error(E_WARNING, "Unable to find stream pointer"); - RETURN_FALSE; - } - - if (array_init(return_value) == FAILURE) { - RETURN_FALSE; - } - mydate.has_date=1; - mydate.has_time=1; - if(_php3_hash_find(date->value.ht,"year",sizeof("year"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - mydate.year=(*pvalue)->value.lval; - } - if(_php3_hash_find(date->value.ht,"month",sizeof("month"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - mydate.mon=(*pvalue)->value.lval; - } - if(_php3_hash_find(date->value.ht,"day",sizeof("day"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - mydate.mday=(*pvalue)->value.lval; - } - - if(_php3_hash_find(time->value.ht,"hour",sizeof("hour"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - mydate.hour=(*pvalue)->value.lval; - } - if(_php3_hash_find(time->value.ht,"minute",sizeof("minute"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - mydate.min=(*pvalue)->value.lval; - } - mydate.sec=0; - g_cal_list=NULL; - cal_search_alarm(icap_le_struct->icap_stream,&mydate); - my_cal_list=g_cal_list; - while(my_cal_list != NULL) - { - add_next_index_long(return_value,my_cal_list->uid); - my_cal_list=my_cal_list->next; - free(g_cal_list); - g_cal_list=my_cal_list; - } - - -} -/* }}} */ - - -/* {{{ proto string icap_delete_calendar(int stream_id, string calendar) - Delete calendar*/ -void php3_icap_delete_calendar(INTERNAL_FUNCTION_PARAMETERS) -{ - pval *streamind, *calendar; - int ind, ind_type; - pils *icap_le_struct; - int myargc=ARG_COUNT(ht); - if (myargc <1 || myargc > 2 || getParameters(ht,myargc,&streamind,&calendar) == FAILURE) { - WRONG_PARAM_COUNT; - } - - convert_to_long(streamind); - convert_to_string(calendar); - ind = streamind->value.lval; - - icap_le_struct = (pils *)php3_list_find(ind, &ind_type); - if (!icap_le_struct ) { - php3_error(E_WARNING, "Unable to find stream pointer"); - RETURN_FALSE; - } - - if (icap_delete_calendar(icap_le_struct->icap_stream,calendar->value.str.val)) - { - RETURN_TRUE; - } - else - { - RETURN_FALSE; - } - -} -/* }}} */ - - -/* {{{ proto string icap_delete_event(int stream_id, int uid) - Delete event*/ -void php3_icap_delete_event(INTERNAL_FUNCTION_PARAMETERS) -{ - pval *streamind, *uid; - int ind, ind_type; - pils *icap_le_struct; - int myargc=ARG_COUNT(ht); - if (myargc <1 || myargc > 2 || getParameters(ht,myargc,&streamind,&uid) == FAILURE) { - WRONG_PARAM_COUNT; - } - - convert_to_long(streamind); - convert_to_long(uid); - ind = streamind->value.lval; - - icap_le_struct = (pils *)php3_list_find(ind, &ind_type); - if (!icap_le_struct ) { - php3_error(E_WARNING, "Unable to find stream pointer"); - RETURN_FALSE; - } - if (cal_remove(icap_le_struct->icap_stream,uid->value.lval)) - { - RETURN_TRUE; - } - else - { - RETURN_FALSE; - } -} -/* }}} */ - -/* {{{ proto string icap_delete_calendar(int stream_id, int uid) - Delete event*/ -icap_delete_calendar(){ - return 1; -} -/* }}} */ - -void php3_icap_popen(INTERNAL_FUNCTION_PARAMETERS){ -} - - -/* {{{ proto string icap_store_event(int stream_id, object event) - Store an event*/ -void php3_icap_store_event(INTERNAL_FUNCTION_PARAMETERS) -{ - pval *streamind,*storeobject; - int ind, ind_type; - unsigned long i; - char *t; - int icap_folders=0; - unsigned int msgno; - pils *icap_le_struct; - pval **pvalue,**temppvalue; - cal_list_t *my_cal_list; - int myargc; - unsigned long uid; - CALEVENT *myevent; - myargc=ARG_COUNT(ht); - if (myargc !=2 || getParameters(ht,myargc,&streamind,&storeobject) == FAILURE) { - WRONG_PARAM_COUNT; - } - - convert_to_long(streamind); - convert_to_array(storeobject); - - ind = streamind->value.lval; - - icap_le_struct = (pils *)php3_list_find(ind, &ind_type); - - if (!icap_le_struct ) { - php3_error(E_WARNING, "Unable to find stream pointer"); - RETURN_FALSE; - } - - /* Initialize return array */ - if (array_init(return_value) == FAILURE) { - RETURN_FALSE; - } - myevent=calevent_new(); - if(_php3_hash_find(storeobject->value.ht,"uid",sizeof("uid"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - myevent->id=(*pvalue)->value.lval; - } - if(_php3_hash_find(storeobject->value.ht,"public",sizeof("public"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - myevent->public=(*pvalue)->value.lval; - } - if(_php3_hash_find(storeobject->value.ht,"category",sizeof("category"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_string(*pvalue); - myevent->category=strdup((*pvalue)->value.str.val); - } - if(_php3_hash_find(storeobject->value.ht,"title",sizeof("title"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_string(*pvalue); - myevent->title=strdup((*pvalue)->value.str.val); - } - if(_php3_hash_find(storeobject->value.ht,"description",sizeof("description"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_string(*pvalue); - myevent->description=strdup((*pvalue)->value.str.val); - } - - if(_php3_hash_find(storeobject->value.ht,"alarm",sizeof("alarm"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - myevent->alarm=(*pvalue)->value.lval; - } - - - if(_php3_hash_find(storeobject->value.ht,"start",sizeof("start"),(void **) &temppvalue)== SUCCESS){ - SEPARATE_ZVAL(temppvalue); - convert_to_array(*temppvalue); - - if(_php3_hash_find((*temppvalue)->value.ht,"year",sizeof("year"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - myevent->start.year=(*pvalue)->value.lval; - } - if(_php3_hash_find((*temppvalue)->value.ht,"month",sizeof("month"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - myevent->start.mon=(*pvalue)->value.lval; - } - if(_php3_hash_find((*temppvalue)->value.ht,"mday",sizeof("mday"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - myevent->start.mday=(*pvalue)->value.lval; - } - if(_php3_hash_find((*temppvalue)->value.ht,"hour",sizeof("hour"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - myevent->start.hour=(*pvalue)->value.lval; - } - if(_php3_hash_find((*temppvalue)->value.ht,"min",sizeof("min"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - myevent->start.min=(*pvalue)->value.lval; - } - if(_php3_hash_find((*temppvalue)->value.ht,"sec",sizeof("sec"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - myevent->start.sec=(*pvalue)->value.lval; - } - myevent->start.has_date=true; - } - - if(_php3_hash_find(storeobject->value.ht,"end",sizeof("end"),(void **) &temppvalue)== SUCCESS){ - SEPARATE_ZVAL(temppvalue); - convert_to_array(*temppvalue); - - if(_php3_hash_find((*temppvalue)->value.ht,"year",sizeof("year"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - myevent->end.year=(*pvalue)->value.lval; - } - if(_php3_hash_find((*temppvalue)->value.ht,"month",sizeof("month"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - myevent->end.mon=(*pvalue)->value.lval; - } - if(_php3_hash_find((*temppvalue)->value.ht,"mday",sizeof("mday"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - myevent->end.mday=(*pvalue)->value.lval; - } - if(_php3_hash_find((*temppvalue)->value.ht,"hour",sizeof("hour"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - myevent->end.hour=(*pvalue)->value.lval; - } - if(_php3_hash_find((*temppvalue)->value.ht,"min",sizeof("min"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - myevent->end.min=(*pvalue)->value.lval; - } - if(_php3_hash_find((*temppvalue)->value.ht,"sec",sizeof("sec"),(void **) &pvalue)== SUCCESS){ - SEPARATE_ZVAL(pvalue); - convert_to_long(*pvalue); - myevent->end.sec=(*pvalue)->value.lval; - } - myevent->end.has_date=true; - } - - cal_append(icap_le_struct->icap_stream,"INBOX",&uid,myevent); - calevent_free(myevent); - RETURN_LONG(uid); -} -/* }}} */ - - -/* {{{ proto string icap_snooze(int stream_id, int uid) - Snooze an alarm*/ -void php3_icap_snooze(INTERNAL_FUNCTION_PARAMETERS) -{ - pval *streamind,*uid; - int ind, ind_type; - pils *icap_le_struct; - pval **pvalue; - int myargc; - myargc=ARG_COUNT(ht); - if (myargc !=2 || getParameters(ht,myargc,&streamind,&uid) == FAILURE) { - WRONG_PARAM_COUNT; - } - - convert_to_long(streamind); - convert_to_long(uid); - - ind = streamind->value.lval; - - icap_le_struct = (pils *)php3_list_find(ind, &ind_type); - - if (!icap_le_struct ) { - php3_error(E_WARNING, "Unable to find stream pointer"); - RETURN_FALSE; - } - - if(cal_snooze(icap_le_struct->icap_stream,uid->value.lval)) - { - RETURN_TRUE; - } - else - { - RETURN_FALSE; - } - - -} -/* }}} */ - - -/* Interfaces to callbacks */ - - -void cc_searched (unsigned long cal_uid) -{ - - if(g_cal_list==NULL) - { - g_cal_list=malloc(sizeof(struct cal_list)); - g_cal_list->uid=cal_uid; - g_cal_list->next=NULL; - g_cal_list_end=g_cal_list; - } - else - { - g_cal_list_end->next=malloc(sizeof(struct cal_list)); - g_cal_list_end=g_cal_list_end->next; - g_cal_list_end->uid=cal_uid; - g_cal_list_end->next=NULL; - } -} - - - - - - -void cc_appended(u_int32_t uid) -{ - -} - - -void cc_fetched(const CALEVENT *event) -{ - -} - - -void cc_login(const char **user, const char **pwd) -{ - -*user=icap_user; -*pwd=icap_password; -} - - -void cc_vlog(const char *fmt,va_list ap) -{ -} -void cc_vdlog(const char *fmt,va_list ap) -{ -} - -#endif - - -/* - * Local_ variables: - * tab-width: 4 - * c-basic-offset: 4 - * End: - */ - - |