php-src/ext/standard/browscap.c
2000-02-27 20:23:31 +00:00

126 lines
3.8 KiB
C

/*
+----------------------------------------------------------------------+
| PHP version 4.0 |
+----------------------------------------------------------------------+
| Copyright (c) 1997, 1998, 1999, 2000 The PHP Group |
+----------------------------------------------------------------------+
| This source file is subject to version 2.01 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_01.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: Zeev Suraski <zeev@zend.com> |
+----------------------------------------------------------------------+
*/
#include "php.h"
#include "php_regex.h"
#include "php_browscap.h"
#include "php_ini.h"
#include "zend_globals.h"
#ifndef THREAD_SAFE
HashTable browser_hash;
static char *lookup_browser_name;
static pval *found_browser_entry;
#endif
function_entry browscap_functions[] = {
PHP_FE(get_browser, NULL)
{NULL, NULL, NULL}
};
zend_module_entry browscap_module_entry = {
"browscap", browscap_functions, PHP_MINIT(browscap), PHP_MSHUTDOWN(browscap),
NULL, NULL, NULL, STANDARD_MODULE_PROPERTIES
};
static int browser_reg_compare(zval **browser)
{
pval *browser_name;
regex_t r;
if (found_browser_entry) { /* already found */
return 0;
}
zend_hash_find((*browser)->value.obj.properties, "browser_name_pattern",sizeof("browser_name_pattern"),(void **) &browser_name);
if (!strchr(browser_name->value.str.val,'*')) {
return 0;
}
if (regcomp(&r,browser_name->value.str.val,REG_NOSUB)!=0) {
return 0;
}
if (regexec(&r,lookup_browser_name,0,NULL,0)==0) {
found_browser_entry = *browser;
}
regfree(&r);
return 0;
}
PHP_FUNCTION(get_browser)
{
pval **agent_name,**agent, tmp;
if (!INI_STR("browscap")) {
RETURN_FALSE;
}
switch(ARG_COUNT(ht)) {
case 0:
if (zend_hash_find(&EG(symbol_table), "HTTP_USER_AGENT", sizeof("HTTP_USER_AGENT"), (void **) &agent_name)==FAILURE) {
*agent_name = &tmp;
var_reset(*agent_name);
}
break;
case 1:
if (zend_get_parameters_ex(1,&agent_name)==FAILURE) {
RETURN_FALSE;
}
break;
default:
WRONG_PARAM_COUNT;
break;
}
convert_to_string_ex(agent_name);
if (zend_hash_find(&browser_hash, (*agent_name)->value.str.val,(*agent_name)->value.str.len+1, (void **) &agent)==FAILURE) {
lookup_browser_name = (*agent_name)->value.str.val;
found_browser_entry = NULL;
zend_hash_apply(&browser_hash,(int (*)(void *)) browser_reg_compare);
if (found_browser_entry) {
*agent = found_browser_entry;
} else if (zend_hash_find(&browser_hash, "Default Browser", sizeof("Default Browser"), (void **) &agent)==FAILURE) {
RETURN_FALSE;
}
}
*return_value = **agent;
return_value->type = IS_OBJECT;
pval_copy_constructor(return_value);
return_value->value.obj.properties->pDestructor = ZVAL_DESTRUCTOR;
while (zend_hash_find((*agent)->value.obj.properties, "parent",sizeof("parent"), (void **) &agent_name)==SUCCESS) {
zval *tmp_copy;
if (zend_hash_find(&browser_hash,(*agent_name)->value.str.val, (*agent_name)->value.str.len+1, (void **)&agent)==FAILURE) {
break;
}
zend_hash_merge(return_value->value.obj.properties,(*agent)->value.obj.properties, (copy_ctor_func_t) zval_add_ref, (void *) &tmp_copy, sizeof(pval *), 0);
}
}
/*
* Local variables:
* tab-width: 4
* c-basic-offset: 4
* End:
*/