php-src/ext/rpc/rpc.h

132 lines
6.0 KiB
C

/*
+----------------------------------------------------------------------+
| PHP Version 4 |
+----------------------------------------------------------------------+
| Copyright (c) 1997-2002 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. |
+----------------------------------------------------------------------+
| Author: Harald Radi <h.radi@nme.at> |
+----------------------------------------------------------------------+
*/
#ifndef RPC_H
#define RPC_H
#define FOREACH_HANDLER for (__handler_counter=0; __handler_counter < HANDLER_COUNT; __handler_counter++)
#define HANDLER handler_entries[__handler_counter]
#define HANDLER_COUNT (sizeof(handler_entries) / sizeof(rpc_handler_entry))
#define RPC_HT(intern) (*((intern)->handlers))
#define RPC_CLASS(intern) ((intern)->hash)
#define GET_INTERNAL(intern) rpc_internal *intern; \
if (GET_INTERNAL_EX(intern, object) != SUCCESS) { \
/* TODO: exception */ \
}
#define GET_INTERNAL_EX(intern, object) (((intern = zend_object_store_get_object(object TSRMLS_CC)) == NULL) ? FAILURE : SUCCESS)
#define GET_CLASS(ce) char *key; \
int key_len; \
zend_class_entry **ce; \
\
/* the name of the rpc layer is prepended to '_load' so lets strip everything after \
* the first '_' away from the function name \
*/ \
key = estrdup(get_active_function_name(TSRMLS_C)); \
key_len = strchr(key, '_') - key; \
key[key_len] = '\0'; \
\
/* get the class entry for the requested rpc layer */ \
if (zend_hash_find(CG(class_table), key, key_len + 1, (void **) &ce) != SUCCESS) { \
efree(key); \
/* TODO: exception here */ \
} else { \
efree(key); \
}
#define GET_ARGS_EX(num_args, args, args_free, strip) \
GET_ARGS(num_args, args) \
\
args_free = args; \
\
/* strip away the first parameters */ \
num_args -= strip; \
args = (num_args > 0) ? &args[strip] : NULL;
#define GET_ARGS(num_args, args) \
args = (zval ***) emalloc(sizeof(zval **) * num_args); \
\
if (zend_get_parameters_array_ex(num_args, args) != SUCCESS) { \
efree(args); \
/* TODO: exception */ \
}
#define GET_METHOD_SIGNATURE(intern, method, hash_val, num_args, arg_types) \
GET_SIGNATURE(intern, method->str, method->len, hash_val, num_args, arg_types)
#define GET_SIGNATURE(intern, name, name_len, hash_val, num_args, arg_types) \
hash_val.len = name_len; \
\
if ((*intern->handlers)->hash_type & HASH_WITH_SIGNATURE) { \
zend_uint _signature_counter; \
\
arg_types = (char *) emalloc(sizeof(char) * (num_args + 1)); \
hash_val.len += num_args + 1; \
\
for (_signature_counter = 0; _signature_counter < num_args; _signature_counter++) { \
switch (Z_TYPE_PP(args[_signature_counter])) { \
case IS_NULL: \
arg_types[_signature_counter] = 'n'; \
break; \
case IS_LONG: \
arg_types[_signature_counter] = 'l'; \
break; \
case IS_DOUBLE: \
arg_types[_signature_counter] = 'd'; \
break; \
case IS_STRING: \
arg_types[_signature_counter] = 's'; \
break; \
case IS_ARRAY: \
arg_types[_signature_counter] = 'a'; \
break; \
case IS_OBJECT: \
arg_types[_signature_counter] = 'o'; \
break; \
case IS_BOOL: \
arg_types[_signature_counter] = 'b'; \
break; \
case IS_RESOURCE: \
arg_types[_signature_counter] = 'r'; \
break; \
default: \
arg_types[_signature_counter] = 'u'; \
} \
} \
\
arg_types[_signature_counter] = '\0'; \
} else { \
arg_types = (char *) emalloc(sizeof(char)); \
arg_types[0] = '\0'; \
} \
\
hash_val.str = (char *) emalloc(sizeof(char) * (hash_val.len + 2)); \
memcpy(hash_val.str, arg_types, num_args + 1); \
memcpy(&hash_val.str[hash_val.len - name_len], \
name, name_len + 1);
#define FREE_SIGNATURE(hash_val, arg_types) \
efree(arg_types); \
efree(hash_val.str);
static int __handler_counter;
#endif