diff options
Diffstat (limited to 'ext/ctype/ctype.c')
| -rw-r--r-- | ext/ctype/ctype.c | 327 |
1 files changed, 0 insertions, 327 deletions
diff --git a/ext/ctype/ctype.c b/ext/ctype/ctype.c deleted file mode 100644 index 6528b9411c..0000000000 --- a/ext/ctype/ctype.c +++ /dev/null @@ -1,327 +0,0 @@ -/* - +----------------------------------------------------------------------+ - | PHP version 4.0 | - +----------------------------------------------------------------------+ - | Copyright (c) 1997-2001 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: Hartmut Holzgraefe <hartmut@six.de> | - +----------------------------------------------------------------------+ - */ - -#ifdef HAVE_CONFIG_H -#include "config.h" -#endif - -#include "php.h" -#include "php_ini.h" -#include "php_ctype.h" -#include "SAPI.h" -#include "ext/standard/info.h" - -#include <ctype.h> - -/* You should tweak config.m4 so this symbol (or some else suitable) - gets defined. -*/ -#if HAVE_CTYPE - -/* If you declare any globals in php_ctype.h uncomment this: -ZEND_DECLARE_MODULE_GLOBALS(ctype) -*/ - -/* True global resources - no need for thread safety here */ -static int le_ctype; - -/* {{{ ctype_functions[] - * Every user visible function must have an entry in ctype_functions[]. - */ -function_entry ctype_functions[] = { - PHP_FE(ctype_alnum, NULL) - PHP_FE(ctype_alpha, NULL) - PHP_FE(ctype_cntrl, NULL) - PHP_FE(ctype_digit, NULL) - PHP_FE(ctype_lower, NULL) - PHP_FE(ctype_graph, NULL) - PHP_FE(ctype_print, NULL) - PHP_FE(ctype_punct, NULL) - PHP_FE(ctype_space, NULL) - PHP_FE(ctype_upper, NULL) - PHP_FE(ctype_xdigit, NULL) - {NULL, NULL, NULL} /* Must be the last line in ctype_functions[] */ -}; -/* }}} */ - -/* {{{ ctype_mpodule_entry - */ -zend_module_entry ctype_module_entry = { - "ctype", - ctype_functions, - NULL, - NULL, - NULL, - NULL, - PHP_MINFO(ctype), - STANDARD_MODULE_PROPERTIES -}; -/* }}} */ - -#ifdef COMPILE_DL_CTYPE -ZEND_GET_MODULE(ctype) -#endif - -#ifndef PHP_EXPERIMENTAL -#define PHP_EXPERIMENTAL(x,y) -#endif - -/* {{{ PHP_MINFO_FUNCTION - */ -PHP_MINFO_FUNCTION(ctype) -{ - php_info_print_table_start(); - php_info_print_table_row(2, "ctype functions", "enabled (experimental)"); - php_info_print_table_end(); -} -/* }}} */ - -/* {{{ ctype - */ -static int ctype(int (*iswhat)(int),zval **c) -{ - switch ((*c)->type) { - case IS_LONG: - return iswhat((*c)->value.lval); - case IS_STRING: - { - char *p; - int n,len; - convert_to_string_ex(c); - p=(*c)->value.str.val; - len = (*c)->value.str.len; - for(n=0;n<len;n++) { - if(!iswhat(*p++)) return 0; - } - return 1; - } - default: - break; - } - return 0; -} -/* }}} */ - -/* {{{ proto bool isalnum(mixed c) - Check for alphanumeric character(s) */ -PHP_FUNCTION(ctype_alnum) -{ - PHP_EXPERIMENTAL("4.0.4dev",NULL) - zval **c; - if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &c) == FAILURE){ - WRONG_PARAM_COUNT; - } - - if(ctype(isalnum,c)) { - RETURN_TRUE; - } - - RETURN_FALSE; -} -/* }}} */ - -/* {{{ proto bool isalpha(mixed c) - Check for alphabetic character(s) */ -PHP_FUNCTION(ctype_alpha) -{ - PHP_EXPERIMENTAL("4.0.4dev",NULL) - zval **c; - if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &c) == FAILURE){ - WRONG_PARAM_COUNT; - } - - if(ctype(isalpha,c)) { - RETURN_TRUE; - } - - RETURN_FALSE; -} -/* }}} */ - -/* {{{ proto bool iscntrl(mixed c) - Check for control character(s) */ -PHP_FUNCTION(ctype_cntrl) -{ - PHP_EXPERIMENTAL("4.0.4dev",NULL) - zval **c; - if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &c) == FAILURE){ - WRONG_PARAM_COUNT; - } - - if(ctype(iscntrl,c)) { - RETURN_TRUE; - } - - RETURN_FALSE; -} -/* }}} */ - -/* {{{ proto bool isdigit(mixed c) - Check for numeric character(s) */ -PHP_FUNCTION(ctype_digit) -{ - PHP_EXPERIMENTAL("4.0.4dev",NULL) - zval **c; - if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &c) == FAILURE){ - WRONG_PARAM_COUNT; - } - - if(ctype(isdigit,c)) { - RETURN_TRUE; - } - - RETURN_FALSE; -} -/* }}} */ - -/* {{{ proto bool islower(mixed c) - Check for lowercase character(s) */ -PHP_FUNCTION(ctype_lower) -{ - PHP_EXPERIMENTAL("4.0.4dev",NULL) - zval **c; - if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &c) == FAILURE){ - WRONG_PARAM_COUNT; - } - - if(ctype(islower,c)) { - RETURN_TRUE; - } - - RETURN_FALSE; -} -/* }}} */ - -/* {{{ proto bool isgraph(mixed c) - Check for any printable character(s) except space */ -PHP_FUNCTION(ctype_graph) -{ - PHP_EXPERIMENTAL("4.0.4dev",NULL) - zval **c; - if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &c) == FAILURE){ - WRONG_PARAM_COUNT; - } - - if(ctype(isgraph,c)) { - RETURN_TRUE; - } - - RETURN_FALSE; -} -/* }}} */ - -/* {{{ proto bool isprint(mixed c) - Check for printable character(s) */ -PHP_FUNCTION(ctype_print) -{ - PHP_EXPERIMENTAL("4.0.4dev",NULL) - zval **c; - if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &c) == FAILURE){ - WRONG_PARAM_COUNT; - } - - if(ctype(isprint,c)) { - RETURN_TRUE; - } - - RETURN_FALSE; -} -/* }}} */ - -/* {{{ proto bool ispunct(mixed c) - Check for any printable character which is not whitespace or an alphanumeric character */ -PHP_FUNCTION(ctype_punct) -{ - PHP_EXPERIMENTAL("4.0.4dev",NULL) - zval **c; - if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &c) == FAILURE){ - WRONG_PARAM_COUNT; - } - - if(ctype(ispunct,c)) { - RETURN_TRUE; - } - - RETURN_FALSE; -} -/* }}} */ - -/* {{{ proto bool isspace(mixed c) - Check for whitespace character(s)*/ -PHP_FUNCTION(ctype_space) -{ - PHP_EXPERIMENTAL("4.0.4dev",NULL) - zval **c; - if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &c) == FAILURE){ - WRONG_PARAM_COUNT; - } - - if(ctype(isspace,c)) { - RETURN_TRUE; - } - - RETURN_FALSE; -} -/* }}} */ - -/* {{{ proto bool isupper(mixed c) - Check for uppercase character(s) */ -PHP_FUNCTION(ctype_upper) -{ - PHP_EXPERIMENTAL("4.0.4dev",NULL) - zval **c; - if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &c) == FAILURE){ - WRONG_PARAM_COUNT; - } - - if(ctype(isupper,c)) { - RETURN_TRUE; - } - - RETURN_FALSE; -} -/* }}} */ - -/* {{{ proto bool isxdigit(mixed c) - Check for character(s) representing a hexadecimal digit */ -PHP_FUNCTION(ctype_xdigit) -{ - PHP_EXPERIMENTAL("4.0.4dev",NULL) - zval **c; - if (ZEND_NUM_ARGS() != 1 || zend_get_parameters_ex(1, &c) == FAILURE){ - WRONG_PARAM_COUNT; - } - - if(ctype(isxdigit,c)) { - RETURN_TRUE; - } - - RETURN_FALSE; -} -/* }}} */ - -#endif /* HAVE_CTYPE */ - -/* - * Local variables: - * tab-width: 4 - * c-basic-offset: 4 - * End: - * vim600: sw=4 ts=4 tw=78 fdm=marker - * vim<600: sw=4 ts=4 tw=78 - */ |